| # vals1 = # vals1, ∀ val, st, ty, r, i, vals0. # vals0 < # vals1 + 1 → (true → (0 ≤ i ∧ i→n(i) < # vals0 → (addarray(r, ty, vals0, st)[r -- i ', val]) = addarray(r, ty, vals0[i→n(i), val], st))) ⊦ (addarray(r, ty, vals1, st)[r -- n→i(# vals1) ', val][r -- _length, intval(n→i(# vals1) + 1)]) = addarray(r, ty, vals1 + val ', st) |
∀ val, st, ty, r, i, vals0. # vals0 < # vals1 + 1 → (true → (0 ≤ i ∧ i→n(i) < # vals0 → (addarray(r, ty, vals0, st)[r -- i ', val]) = addarray(r, ty, vals0[i→n(i), val], st))) ⊦ (addarray(r, ty, vals1, st)[r -- n→i(# vals1) ', val][r -- _length, intval(n→i(# vals1) + 1)]) = addarray(r, ty, vals1 + val ', st)
[[CONCRETESIMPRULES : ()]]