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