| r0 ≠ r, newref(r, st0), newref(r, st) ⊦ r = jvmref, (r0 -- sk ∈ addobj(r, class, fis, st) ∪ st0 ↔ r0 -- sk ∈ st ∪ st0) ∧ (addobj(r, class, fis, st) ∪ st0)[r0 -- sk] = (addobj(r, class, fis, st ∪ st0)[r0 -- sk]) |
⊦ r ≠ r0 → (r -- sk ∈ addobj(r0, class1, fis, st) ↔ r -- sk ∈ st)
⊦ r ≠ r0 → (addobj(r, class1, fis, st)[r0 -- sk]) = st[r0 -- sk]
newref(r, st0), newref(r, st) ⊦ r = jvmref, r0 = r, (addobj(r, class, fis, st) ∪ st0)[r0 -- sk] = (st ∪ st0)[r0 -- sk]
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ rk ∈ st ∪ st0 ↔ rk ∈ st ∨ rk ∈ st0])]]