| ⊦ i0 ≤ i ∧ i < j + i0 ∧ 0 ≤ i0 → st[r -- i '] = (getarray(r, i0, j, st)[i→n(i - i0)]) |
i < j + i0, i0 ≤ i, 0 ≤ i, 0 ≤ i0, 0 < j + i0, 0 < j ⊦ st[r -- i '] = (getarray(r, i0, j, st)[i→n(i - i0)])
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ i < j ∧ 0 ≤ i → 0 < j], [CSIMPSEQ : ⊦ i + j = j + i], [CSIMPSEQ : ⊦ i + j + i0 = (i + j) + i0], [CSIMPSEQ : ⊦ i < i + j ↔ 0 < j], [CSIMPFORWARD : ⊦ i ≤ j ∧ j < j0 → i < j0], [CSIMPFORWARD : ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j], [CSIMPFORWARD : ⊦ j ≤ j0 ∧ j0 ≤ j1 → j ≤ j1])]]