| r -- _length ≠ rk, exactarray(refval(r), ty, st[r -- _length] .intval, st[rk, val]), newref(r, st) ⊦ r = jvmref |
⊦ exactarray(refval(r), ty, i, st) → st[r -- _length] .intval = i
newref(r, st), exactarray(refval(r), ty, st[r -- _length] .intval, st[rk, val]) ⊦ r -- _length = rk, r = jvmref
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ rk ≠ rk0 → (st[rk0, val][rk]) = st[rk]])]]