| 0 ≤ i, 0 < i, ∀ st, val, r, i0. i→n(i0) < i→n(i) → (0 ≤ i0 → getarray(r, 0, i0, addarray(r, val, i0, st)) = mklist(val, i→n(i0))) ⊦ getarray(r, 0, i, addarray(r, val, i - 1, st)[r -- (i - 1) ', val]) = mklist(val, i→n(i)) |
i = i1 + 1, 0 ≤ i, 0 < i, ∀ st, val, r, i0. i→n(i0) < i→n(i) → (0 ≤ i0 → getarray(r, 0, i0, addarray(r, val, i0, st)) = mklist(val, i→n(i0))) ⊦ getarray(r, 0, i, addarray(r, val, i1, st)[r -- i1 ', val]) = mklist(val, i→n(i))
[[CONCRETESIMPRULES : ([CSIMPELIM : ⊦ i0 = i - j ↔ i = i0 + j])], [EXTRATERMS : (i, 1, i1)]]