| st[r0 -- mkfs(class, ty0, fieldvar) '] = refval(r1), st[r0 -- mkfs(class0, ty1, fieldvar0) '] = refval(r1), is_obj(str, r0, st), st[r0 -- _type] .type ≤ ty, mkfs(class, ty0, fieldvar) ' ∈ instfields(st[r0 -- _type] .type .class), validrefs(str, r1 ' + refs0 + r ', ty0, st), mkfs(class0, ty1, fieldvar0) ' ∈ instfields(st[r0 -- _type] .type .class), validrefs(str, r1 ' + refs0, ty1, st) ⊦ r0 = jvmref, has_reffield((r1 ' + refs0) .last, st), validrefs(str, r1 ' + refs0, ty0, st) |
⊦ r ≠ jvmref ∧ (¬ is_valid_ref(str, r, st) ∨ ¬ st[r -- _type] .type ≤ ty) → ¬ validrefs(str, r ' + refs, ty, st)
¬ (r1 ≠ jvmref ∧ (¬ is_valid_ref(str, r1, st) ∨ ¬ st[r1 -- _type] .type ≤ ty0)), st[r0 -- mkfs(class, ty0, fieldvar) '] = refval(r1), st[r0 -- mkfs(class0, ty1, fieldvar0) '] = refval(r1), is_obj(str, r0, st), st[r0 -- _type] .type ≤ ty, mkfs(class, ty0, fieldvar) ' ∈ instfields(st[r0 -- _type] .type .class), validrefs(str, r1 ' + refs0 + r ', ty0, st), mkfs(class0, ty1, fieldvar0) ' ∈ instfields(st[r0 -- _type] .type .class), validrefs(str, r1 ' + refs0, ty1, st) ⊦ r0 = jvmref, has_reffield((r1 ' + refs0) .last, st), validrefs(str, r1 ' + refs0, ty0, st)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, ty0, refs0 + r ', r1, str)]]