| i ≤ j, 0 ≤ i, 0 ≤ j, n→i(# vals) + i < j ⊦ putArray(vals, r, i, addarray(r, ty, j, st)) = (addarray(r, ty, mklist(initial_value(ty), i→n(i)) + vals + mklist(initial_value(ty), i→n(j - i + n→i(# vals))), st)[r -- _length, intval(j)]) |
j = i0 + i + n→i(# vals), i ≤ j, 0 ≤ i, 0 ≤ j, n→i(# vals) + i < j ⊦ putArray(vals, r, i, addarray(r, ty, j, st)) = (addarray(r, ty, mklist(initial_value(ty), i→n(i)) + vals + mklist(initial_value(ty), i→n(i0)), st)[r -- _length, intval(j)])
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ i0 = i - j ↔ i = i0 + j])], [EXTRATERMS : (j, i + n→i(# vals), i0)]]