| newref(r1, st), st[r -- _type] .type ≤ ty1 ⊦ r1 = jvmref, r = jvmref, junkref(str, r, st), (addarray(r1, ty, vals, st)[r -- _type]) .type ≤ ty1 |
⊦ rk .ref ≠ r → (addarray(r, ty, vals, st)[rk]) = st[rk]
⊦ newref(r, st) → junkref(str, r, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ (r -- sk) .ref = r])], [EXTRATERMS : (r -- _type, st, vals, ty, r1)]]