| ¬ arraycomp(r1, i1, r2, i2, j, st) → getarray(r1, i1, j, st) ≠ getarray(r2, i2, j, st), getarray(r1, i1, j, st) = getarray(r2, i2, j, st), 0 ≤ i, i < j, 0 < j ⊦ st[r1 -- (i1 + i) '] = st[r2 -- (i2 + i) '] |
⊦ 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, ∀ i0. ¬ i0 < 0 ∧ ¬ j ≤ i0 → st[r1 -- (i1 + i0) '] = st[r2 -- (i2 + i0) '] ⊦ st[r1 -- (i1 + i) '] = st[r2 -- (i2 + i) ']
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ ¬ i < j ↔ j ≤ i], [CSIMPSEQ : ⊦ ¬ i ≤ j ↔ j < i])]]