| 0 ≤ i ⊦ addarray(r, mklist(val, n), i, addarray(r, mklist(val, i→n(i)), 0, st)) = addarray(r, val, n→i(n) + i, st) |
⊦ addarray(r, mklist(val, n), n→i(m), addarray(r, mklist(val, m), 0, st)) = addarray(r, val, n→i(n) + n→i(m), st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ i + j = j + i], [CSIMPSEQ : ⊦ 0 ≤ i → n→i(i→n(i)) = i])], [EXTRATERMS : (r, val, n, i→n(i), st)]]