| ¬ ¬ r ∈ st .refs, st1 .refs ∩ st .refs = ∅, r -- _type ∈ st, r ∈ st1, class+∃(str, st1[r -- _type] .type .class), is_obj(r, st1), r ∈ st ⊦ is_abstract(st1[r -- _type] .type .class), class+∃(str, st[r -- _type] .type .class) ∧ ¬ is_abstract(st[r -- _type] .type .class) |
st1 .refs ∩ st .refs = ∅, r ∈ st, is_obj(r, st1), class+∃(str, st1[r -- _type] .type .class), r ∈ st1, r -- _type ∈ st, r ∈ st .refs ⊦ st = ∅, is_abstract(st1[r -- _type] .type .class), class+∃(str, st[r -- _type] .type .class) ∧ ¬ is_abstract(st[r -- _type] .type .class)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ st .refs = ∅ ↔ st = ∅], [CSIMPFORWARD : ⊦ r ∈ rset → rset ≠ ∅], [CSIMPSEQ : ⊦ rset ∩ rset0 = rset0 ∩ rset], [CSIMPSEQ : ⊦ (rset ∩ rset0) ∩ rset1 = rset ∩ rset0 ∩ rset1])]]