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