| st[r -- mkfs(class, ty0, fieldvar) '] = refval(r0), is_referencevalue(st[r -- mkfs(class, ty0, fieldvar) ']), validrefs(str, refs + r ', ty, st), is_referencevalue(st[r -- mkfs(class, ty0, fieldvar) ']), is_obj(str, r, st), mkfs(class, ty0, fieldvar) ' ∈ instfields(st[r -- _type] .type .class), st[r0 -- _type] .type ≤ ty0, is_valid_ref(str, r0, st), type∃(str, st[r0 -- _type] .type) ⊦ validrefs(str, refs + r ' + r0 ', ty, st), validrefs(str, r0 ', ty0, st) |
st[r -- mkfs(class, ty0, fieldvar) '] = refval(r0), type∃(str, st[r0 -- _type] .type), is_valid_ref(str, r0, st), st[r0 -- _type] .type ≤ ty0, mkfs(class, ty0, fieldvar) ' ∈ instfields(st[r -- _type] .type .class), is_obj(str, r, st), validrefs(str, refs + r ', ty, st) ⊦ validrefs(str, r0 ', ty0, st), validrefs(str, refs + r ' + r0 ', ty, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ is_referencevalue(refval(r))])]]