| st1 .refs ∩ st .refs = ∅, st[r -- mkfs(class, ty0, fieldvar) '] = refval(r0), r -- mkfs(class, ty0, fieldvar) ' ∈ st, is_obj(str, r, st1), mkfs(class, ty0, fieldvar) ' ∈ instfields(st1[r -- _type] .type .class), junkrefs(str, r0 ' + acc, ty0, st1 ∪ st), r ∈ st1 .refs, st1[r -- _type] .type ≤ ty, r ∈ 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, r -- _type ∈ st, ∃ 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), 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) |
st[r -- mkfs(class, ty0, fieldvar) '] = refval(r0), st1 .refs ∩ st .refs = ∅, r ∈ st, st1[r -- _type] .type ≤ ty, r ∈ st1 .refs, junkrefs(str, r0 ' + acc, ty0, st1 ∪ st), mkfs(class, ty0, fieldvar) ' ∈ instfields(st1[r -- _type] .type .class), is_obj(str, r, st1), r -- mkfs(class, ty0, fieldvar) ' ∈ 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 = ∅, r -- _type ∈ st, 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)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ st .refs = ∅ ↔ st = ∅], [CSIMPFORWARD : ⊦ r ∈ rset → rset ≠ ∅], [CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1], [CSIMPSEQ : ⊦ rset ∩ rset0 = rset0 ∩ rset], [CSIMPSEQ : ⊦ (rset ∩ rset0) ∩ rset1 = rset ∩ rset0 ∩ rset1])]]