| i ≤ i1 ∧ i1 < n→i(# vals) + i, 0 ≤ i, 0 ≤ i0 + n→i(# vals), 0 ≤ i0 + i + n→i(# vals), 0 < i0 ⊦ vals[i→n(i1 - i)] = (addarray(r, ty, mklist(initial_value(ty), i→n(i)) + vals + mklist(initial_value(ty), i→n(i0)), st)[r -- i1 ']) |
0 < i0, 0 ≤ i0 + i + n→i(# vals), 0 ≤ i0 + n→i(# vals), 0 ≤ i, i1 < n→i(# vals) + i, i ≤ i1, 0 ≤ i1, 0 < n→i(# vals) + i ⊦ vals[i→n(i1 - i)] = (addarray(r, ty, mklist(initial_value(ty), i→n(i)) + vals + mklist(initial_value(ty), i→n(i0)), st)[r -- i1 ']), vals = []
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ i + j + i0 = (i + j) + i0], [CSIMPSEQ : ⊦ # vals = 0 ↔ vals = []], [CSIMPSEQ : ⊦ 0 < n ↔ n ≠ 0], [CSIMPSEQ : 0 ≤ i ⊦ ((* i)) < n→i(n) ↔ i→n(i) < n], [CSIMPSEQ : ⊦ i < i + j ↔ 0 < j], [CSIMPFORWARD : ⊦ i ≤ j ∧ j < j0 → i < j0], [CSIMPFORWARD : ⊦ j ≤ j0 ∧ j0 ≤ j1 → j ≤ j1], [CSIMPSEQ : ⊦ i + j = j + i])]]