| fs ' = _type, newref(r0, st0), newref(r0, st) ⊦ r0 = jvmref, typeval(mkarraytype(ty)) = (st ∪ addarray(r0, ty, vals, st0))[r0 -- _type] |
⊦ rk ∈ st0 → (st ∪ st0)[rk] = st0[rk]
⊦ r -- _type ∈ addarray(r, ty, vals, st)
⊦ (addarray(r, ty, vals, st)[r -- _type]) = typeval(mkarraytype(ty))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ rk ∈ st0 → (st ∪ st0)[rk] = st[rk]], [CSIMPSEQ : ⊦ typeval(ty) = typeval(ty0) ↔ ty = ty0])], [EXTRATERMS : (r0 -- _type, addarray(r0, ty, vals, st0), st)]]