| 0 < i, 0 ≤ i0, 0 ≤ i + i0, 0 ≤ i, ∀ r, st, i1, i0, j0. i→n(j0) < i→n(i + 1) → (0 ≤ i0 ∧ 0 < j0 + i0 ∧ 0 < j0 ∧ i1 < j0 ∧ 0 ≤ i1 + i0 ∧ 0 ≤ i1 → st[r -- (i1 + i0) '] = (getarray(r, i0, j0, st)[i→n(i1)])) ⊦ st[r -- (i + i0) '] = (getarray(r, i0, i, st) + st[r -- (i0 + i) '] ')[i→n(i)] |
⊦ n = # vals → (vals + val ')[n] = val
⊦ 0 < j → # getarray(r, i, j, st) = i→n(j)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ i→n(i) = i→n(j) ↔ abs(i) = abs(j)], [CSIMPSEQ : ⊦ i + j = j + i])], [EXTRATERMS : (i→n(i), st[r -- (i0 + i) '], getarray(r, i0, i, st))]]