| 0 < j ⊦ getarray(r, i, j, st) = getarray(r, i, j - 1, st) + st[r -- (i + j - 1) '] ' |
j = i0 + 1, 0 < j ⊦ getarray(r, i, j, st) = getarray(r, i, i0, st) + st[r -- (i + j - 1) '] '
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ i0 = i - j ↔ i = i0 + j])], [EXTRATERMS : (j, 1, i0)]]