| 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) |
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) + 1 = i→n(j)
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ i < j ∧ 0 < i → 0 < j ∧ 1 < j], [CSIMPSEQ : ⊦ (vals + vals0) + vals1 = vals + vals0 + vals1], [CSIMPSEQ : ⊦ # val ' = 0 +1], [CSIMPSEQ : ⊦ # (vals + vals0) = # vals + # vals0], [CSIMPSEQ : ⊦ vals + val = vals + val '])]]