| st[r -- (i0 + j) '] .intval ∈ getintarray(r, i0, i1, st), j < i1, 0 ≤ i1, 0 ≤ j, 0 < i1, ∀ st, i0, r, i, j0. i→n(j0) < i→n(i1 + 1) → (true → (i ∈ getintarray(r, i0, j0, st) ↔ (∃ j1. i = st[r -- (i0 + j1) '] .intval ∧ ¬ j1 < 0 ∧ ¬ j0 ≤ j1))) ⊦ ∃ j0. st[r -- (i0 + j) '] .intval = st[r -- (i0 + j0) '] .intval ∧ ¬ j0 < 0 ∧ ¬ i1 < j0 |
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ i + j = j + i], [CSIMPSEQ : ⊦ i ≤ j → (¬ ¬ j < i ↔ false)], [CSIMPSEQ : ⊦ i < j → ¬ j < i])], [EXTRATERMS : (j)]]