| ⊦ r = r0, addarray(r, vals, 0, addobj(r0, class, fis, st)[r -- _type, typeval(mkarraytype(ty))][r -- _length, intval(n→i(# vals))]) = addobj(r0, class, fis, addarray(r, ty, vals, st)) |
⊦ r = r0, addarray(r, vals, 0, addobj(r0, class, fis, st[r -- _type, typeval(mkarraytype(ty))][r -- _length, intval(n→i(# vals))])) = addobj(r0, class, fis, addarray(r, ty, vals, st))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ r ≠ r0 → (addobj(r, class1, fis, st) [r0 -- sk, val ] ) = addobj (r, class1, fis, st[r0 -- sk, val])])]]