| 0 ≤ i, i→n(i) < # vals0, i→n(i) + # vals ≤ # vals0, i→n(i) + n < # vals0, 0 ≤ n→i(n) + i, # vals ≤ n, n→i(# vals0) ≤ n→i(n) + i ⊦ vals0 = [], (addarray(r0, ty, vals0, st)[r0 -- (n→i(n) + i) ']) = (vals + restn(i→n(i) + # vals, vals0))[n] |
0 ≤ i ⊦ n→i(n) ≤ ((* i)) ↔ n ≤ i→n(i)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ 0 ≤ i → i→n(i + n→i(n)) = i→n(i) + n], [CSIMPSEQ : ⊦ i + j + i0 = (i + j) + i0], [CSIMPSEQ : ⊦ i + j = j + i], [CSIMPSEQ : ⊦ m + n = n + m], [CSIMPSEQ : ⊦ m < n → (n ≤ m ↔ false)])], [EXTRATERMS : (n→i(n) + i, # vals0)]]