| ⊦ 0 ≤ i ∧ i < n→i(# vals) → (addarray(r, ty, vals, st)[r -- i ']) = vals[i→n(i)] |
⊦ addarray(r, ty, vals, st) = addarray(r, vals, 0, st[r -- _type, typeval(mkarraytype(ty))][r -- _length, intval(n→i(# vals))])
⊦ 0 ≤ i ∧ i < n→i(# vals) → (addarray(r, vals, 0, st)[r -- i ']) = vals[i→n(i)]
[[CONCRETESIMPRULES : ()]]