0 < j ⊦ getarray(r, i, j, st) = st[r -- i '] ' + getarray(r, i + 1, j - 1, st)
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ i < j ∧ 0 ≤ i → 0 < j])]]