| newref(r, st) ⊦ st ⊆ addobj(r, class1, fis, st0) ↔ st ⊆ st0, r = jvmref |
⊦ st1 ⊆ st2 ↔ (∀ rk. rk ∈ st1 → rk ∈ st2 ∧ st1[rk] = st2[rk])
newref(r, st) ⊦ (∀ rk. rk ∈ st → rk ∈ addobj(r, class1, fis, st0) ∧ st[rk] = (addobj(r, class1, fis, st0)[rk])) ↔ st ⊆ st0, r = jvmref
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (addobj(r, class1, fis, st0), st)]]