| 0 ≤ st[r -- _length] .intval ⊦ # getintarray(r, st) = i→n(st[r -- _length] .intval) |
⊦ getintarray(r, st) = getintarray(r, 0, st[r -- _length] .intval, st)
⊦ 0 ≤ j → # getintarray(r, i, j, st) = i→n(j)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ i→n(i) = i→n(j) ↔ abs(i) = abs(j)])], [EXTRATERMS : (st, r)]]