| st[jvmref -- mkfs(class, ty, fieldvar) '] = refval(r0), type∃(str, ty), jvmref ∈ st, is_reftype(ty), okval(val, ty0), mkfs(class, ty, fieldvar) ' ∈ statfields(class), tdname∃(str, class), initdone(class, st), jvmref -- mkfs(class, ty, fieldvar) ' ∈ st, is_referencevalue(st[jvmref -- mkfs(class, ty, fieldvar) ']), validrefval(str, st[jvmref -- mkfs(class, ty, fieldvar) '], ty, st), jvmref ≠ r ∨ class ≠ class0 ∨ ty ≠ ty0 ∨ fieldvar ≠ fieldvar0 ⊦ mkfs(class0, ty0, fieldvar0) ' = _length, ty0 = void_type, r -- mkfs(class0, ty0, fieldvar0) ' = _uninit, ty = void_type, is_referencevalue(val), validref(str, r0, ty, st[r -- mkfs(class0, ty0, fieldvar0) ', val]) |
⊦ validrefval(str, refval(r), ty, st) ↔ validref(str, r, ty, st)
st[jvmref -- mkfs(class, ty, fieldvar) '] = refval(r0), jvmref -- mkfs(class, ty, fieldvar) ' ∈ st, initdone(class, st), tdname∃(str, class), mkfs(class, ty, fieldvar) ' ∈ statfields(class), okval(val, ty0), is_reftype(ty), jvmref ∈ st, type∃(str, ty), validref(str, r0, ty, st), jvmref ≠ r ∨ class ≠ class0 ∨ ty ≠ ty0 ∨ fieldvar ≠ fieldvar0 ⊦ ty = void_type, r -- mkfs(class0, ty0, fieldvar0) ' = _uninit, ty0 = void_type, mkfs(class0, ty0, fieldvar0) ' = _length, validref(str, r0, ty, st[r -- mkfs(class0, ty0, fieldvar0) ', val]), is_referencevalue(val)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ is_referencevalue(refval(r))])]]