| 0 < i, i ≤ n→i(# vals) ⊦ (addarray(r, ty, val ' + vals, st)[r -- i ']) = (addarray(r, ty, vals, st)[r -- (i - 1) ']), vals = [] |
i = i0 + 1, 0 < i, i ≤ n→i(# vals) ⊦ (addarray(r, ty, val ' + vals, st)[r -- i ']) = (addarray(r, ty, vals, st)[r -- i0 ']), vals = []
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ i0 = i - j ↔ i = i0 + j])], [EXTRATERMS : (i, 1, i0)]]