| i0 ≠ i, i0 ≤ i, 0 ≤ i, 0 ≤ i0, ∀ i0. ¬ i0 < 0 ∧ ¬ i ≤ i0 → st0[r1 -- (i1 + i0) '] = st0[r2 -- (i2 + i0) '] ⊦ st0[r1 -- (i1 + i0) '] = st0[r2 -- (i2 + i0) '], r1 = r2 |
0 ≤ i, 0 ≤ i0, i0 < i, 0 < i, ∀ i0. ¬ i0 < 0 ∧ ¬ i ≤ i0 → st0[r1 -- (i1 + i0) '] = st0[r2 -- (i2 + i0) '] ⊦ st0[r1 -- (i1 + i0) '] = st0[r2 -- (i2 + i0) '], r1 = r2, i0 = i
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ i < j ∧ 0 ≤ i → 0 < j], [CSIMPSEQ : ⊦ i ≠ j → (i ≤ j ↔ i < j)])]]