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