| ⊦ vals = [], addarray(r, vals, i, st) = (addarray(r, vals .butlast, i, st)[r -- (i + n→i(# vals) - 1) ', vals .last]) |
i + n→i(# vals) = i0 + 1 ⊦ vals = [], addarray(r, vals, i, st) = (addarray(r, vals .butlast, i, st)[r -- i0 ', vals .last])
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ i0 = i - j ↔ i = i0 + j])], [EXTRATERMS : (i + n→i(# vals), 1, i0)]]