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