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