| (st1 ∪ st)[r -- mkfs(class, ty0, fieldvar) '] = refval(r0), st1 .refs ∩ st .refs = ∅, r ∈ st, mkfs(class, ty0, fieldvar) ' ∈ instfields(st[r -- _type] .type .class), is_obj(str, r, st1), st[r -- _type] .type ≤ ty, r -- _type ∈ st, st1[r -- _type] .type ≤ ty, r ∈ st1 .refs, junkrefs(str, r0 ' + acc, ty0, st1 ∪ st), ∀ st1, st, r, str, ty. st1 .refs ∩ st .refs = ∅ ∧ r ∈ st1 ∧ junkrefs(str, r ' + acc, ty, st1 ∪ st) → junkrefs(str, r ' + acc, ty, st1) ⊦ r = jvmref, st1 = ∅, mkfs(class, ty0, fieldvar) ' ∈ instfields(st1[r -- _type] .type .class) ∧ is_referencevalue(st1[r -- mkfs(class, ty0, fieldvar) ']) ∧ r0 = st1[r -- mkfs(class, ty0, fieldvar) '] .refval ∧ junkrefs(str, st1[r -- mkfs(class, ty0, fieldvar) '] .refval ' + acc, ty0, st1), ∃ fs0. fs0 ' ∈ instfields(st1[r -- _type] .type .class) ∧ is_referencevalue(st1[r -- fs0 ']) ∧ r0 = st1[r -- fs0 '] .refval ∧ junkrefs(str, st1[r -- fs0 '] .refval ' + acc, fs0 .type, st1) |
⊦ r ∈ st ↔ r ∈ st .refs
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (rset ∩ rset0) ∩ rset1 = rset ∩ rset0 ∩ rset1], [CSIMPSEQ : ⊦ rset ∩ rset0 = rset0 ∩ rset], [CSIMPSEQ : ⊦ rset ∩ rset0 = ∅ ∧ r ∈ rset → (¬ ¬ r ∈ rset0 ↔ false)])], [EXTRATERMS : (st, r)]]