| st[r1 -- mkfs(class, ty1, fieldvar) '] = refval(r2), is_obj(str, r1, st), st[r1 -- _type] .type ≤ ty, mkfs(class, ty1, fieldvar) ' ∈ instfields(st[r1 -- _type] .type .class), junkrefs(str, r2 ' + refs, ty1, st[r0 -- sk, val]), path∃(str, r2, r0, st) ⊦ sk = _type, r1 = jvmref, r1 = r0, r2 = jvmref, junkrefs(str, r2 ' + refs, ty1, st), st[r2 -- _type] .type ≤ ty1 |
⊦ r ≠ jvmref ∧ (¬ is_valid_ref(str, r, st) ∨ ¬ st[r -- _type] .type ≤ ty) → junkrefs(str, r ' + refs, ty, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1])], [EXTRATERMS : (st, ty1, refs, r2, str)]]