| newref(r0, st), newref(r0, st0) ⊦ r0 = jvmref, typeval(mkclasstype(class)) = (st ∪ addobj(r0, class, fis, st0))[r0 -- _type], _type ∈ fis |
⊦ rk ∈ st0 → (st ∪ st0)[rk] = st0[rk]
⊦ r -- _type ∈ addobj(r, class1, fis, st)
¬ _type ∈ fis ⊦ (addobj(r, class1, fis, st)[r -- _type]) = typeval(mkclasstype(class1))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ rk ∈ st0 → (st ∪ st0)[rk] = st[rk]], [CSIMPSEQ : ⊦ typeval(ty) = typeval(ty0) ↔ ty = ty0])], [EXTRATERMS : (r0 -- _type, addobj(r0, class, fis, st0), st)]]