| ⊦ n < # getintarray(r, i, j, st) → (getintarray(r, i, j, st)[n]) = st[r -- (i + n→i(n)) '] .intval |
⊦ getintarray(r, i, j, st) = [] ↔ j ≤ 0
n < # getintarray(r, i, j, st), 0 < j ⊦ (getintarray(r, i, j, st)[n]) = st[r -- (i + n→i(n)) '] .intval
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ i < j ∧ 0 ≤ i → 0 < j], [CSIMPSEQ : ⊦ ¬ i ≤ j ↔ j < i], [CSIMPSEQ : ⊦ # ints = 0 ↔ ints = []], [CSIMPFORWARD : ⊦ m < n → n ≠ 0])]]