| st[r -- sk] = refval(r0), st0[r -- _type] .type = mkclasstype(class), r ∈ st0, sk ∈ instfields(class), fits(r0, sks0, st), st0 ⊆ st, is_obj(str, r, st0), r -- _type ∈ st0, ∀ st0, st, r, str. st0 ⊆ st ∧ fits(r, sks0, st) → junkref(str, r, st0) ∨ fits(r, sks0, st0) ⊦ r = jvmref, junkref(str, r, st0), r -- sk ∈ st0 |
⊦ ¬ r -- sk ∈ st ∧ sk ∈ instfields(st[r -- _type] .type .class) → ¬ is_obj(str, r, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ mkclasstype(class) .class = class])], [EXTRATERMS : (r, sk, st0, str)]]