| instore(r, class, [], addobj(r1, class1, fis1, st)) ⊦ instore(r, class, [], st), r = r1 |
⊦ instore(r, class, [], st) ↔ r ≠ jvmref ∧ r -- _type ∈ st ∧ st[r -- _type] = typeval(mkclasstype(class))
r ≠ jvmref ∧ r -- _type ∈ addobj(r1, class1, fis1, st) ∧ (addobj(r1, class1, fis1, st)[r -- _type]) = typeval(mkclasstype(class)) ⊦ instore(r, class, [], st), r = r1
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (addobj(r1, class1, fis1, st), class, r)]]