| newref(r, st), r0 ∈ st ⊦ (addarray(r, ty, vals, st)[r0 -- sk]) = st[r0 -- sk], r = jvmref |
⊦ rk .ref ≠ r → (addarray(r, ty, vals, st)[rk]) = st[rk]
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (r -- sk) .ref = r], [CSIMPSEQ : ⊦ r ∈ st → ¬ newref(r, st)])], [EXTRATERMS : (r0 -- sk, st, vals, ty, r)]]