| ⊦ r = r0, getintarray(r, 0, (st[r0 -- sk, val][r -- _length]) .intval, st[r0 -- sk, val]) = getintarray(r, st) |
⊦ r ≠ r0 → getintarray(r, i, j, st[r0 -- sk, val]) = getintarray(r, i, j, st)
⊦ r = r0, getintarray(r, 0, st[r -- _length] .intval, st) = getintarray(r, st)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ r ≠ r0 → (st[r0 -- sk0, val][r -- sk]) = st[r -- sk]])]]