| ⊦ r = jvmref, (addobj(r, class, fis, addclass(class0, fis0, st))[r -- sk]) = (addobj(r, class, fis, st)[r -- sk]) |
⊦ ¬ sk ∈ fis ∧ sk ≠ _type → (addobj(r, class, fis, st)[r -- sk]) = st[r -- sk]
⊦ sk ∈ fis → (addobj(r, class, fis, st)[r -- sk]) = fis[sk]
¬ _type ∈ fis ⊦ (addobj(r, class1, fis, st)[r -- _type]) = typeval(mkclasstype(class1))
r ≠ jvmref ⊦ (addclass(class1, fis, st)[r -- sk]) = st[r -- sk]
⊦ ¬ sk ∈ fis ∧ sk ≠ _type → (addobj(r, class, fis, st)[r -- sk]) = st[r -- sk]
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ typeval(ty) = typeval(ty0) ↔ ty = ty0])], [EXTRATERMS : (sk, addclass(class0, fis0, st), fis, class, r)]]