| st[r0 -- _type] .type = mkclasstype(class), validref(str, r, ty, st) ⊦ fs ' = _type, validref(str, r, ty, st[r0 -- fs ', val]), fs ' ∈ instfields(class) |
⊦ validref(str, r, ty, st) ↔ r = jvmref ∨ st[r -- _type] .type ≤ ty ∧ ¬ junkref(str, r, st)
st[r0 -- _type] .type = mkclasstype(class), validref(str, r, ty, st) ⊦ fs ' = _type, r = jvmref ∨ (st[r0 -- fs ', val][r -- _type]) .type ≤ ty ∧ ¬ junkref(str, r, st[r0 -- fs ', val]), fs ' ∈ instfields(class)
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st[r0 -- fs ', val], ty, r, str)]]