| mkfs(class, ty, fieldvar) ' ∈ instfields(st[r -- _type] .type .class), st[r0 -- _type] .type ≤ ty, is_obj(r, st), junkrefs(str, r ' + refs0, (st[r -- mkfs(class, ty, fieldvar) ', refval(r0)][r -- _type]) .type, st[r -- mkfs(class, ty, fieldvar) ', refval(r0)]) ⊦ r0 = jvmref, junkref(str, r0, st), junkref(str, r, st) |
⊦ ¬ junkrefs(str, refs, ty, st) ∧ ¬ junkref(str, r0, st) ∧ is_obj(r, st) ∧ st[r0 -- _type] .type ≤ fs .type ∧ r0 ≠ jvmref ∧ fs ' ∈ instfields(st[r -- _type] .type .class) → ¬ junkrefs(str, refs, ty, st[r -- fs ', refval(r0)])
¬ ( ¬ junkrefs(str, r ' + refs0, (st[r -- mkfs(class, ty, fieldvar) ', refval(r0)][r -- _type]) .type, st) ∧ ¬ junkref(str, r0, st) ∧ is_obj(r, st) ∧ st[r0 -- _type] .type ≤ mkfs(class, ty, fieldvar) .type ∧ r0 ≠ jvmref ∧ mkfs(class, ty, fieldvar) ' ∈ instfields(st[r -- _type] .type .class)), mkfs(class, ty, fieldvar) ' ∈ instfields(st[r -- _type] .type .class), st[r0 -- _type] .type ≤ ty, is_obj(r, st), junkrefs(str, r ' + refs0, (st[r -- mkfs(class, ty, fieldvar) ', refval(r0)][r -- _type]) .type, st[r -- mkfs(class, ty, fieldvar) ', refval(r0)]) ⊦ r0 = jvmref, junkref(str, r0, st), junkref(str, r, st)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (r0, mkfs(class, ty, fieldvar), r, st, (st[r -- mkfs(class, ty, fieldvar) ', refval(r0)] [r -- _type ] ) .type, r ' + refs0, str)]]