| ⊦ 0 < i1 → (val ∈ getarray(r, i0, i1, st) ↔ (∃ i. i0 ≤ i ∧ i < i0 + i1 ∧ st[r -- i '] = val)) |
0 < i1 ⊦ val ∈ getarray(r, i0, i1, st) ↔ (∃ i. ¬ i < i0 ∧ ¬ i0 + i1 ≤ i ∧ st[r -- i '] = val)
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ i < j ∧ 0 ≤ i → 0 < j], [CSIMPSEQ : ⊦ ¬ i < j ↔ j ≤ i], [CSIMPSEQ : ⊦ ¬ i ≤ j ↔ j < i])]]