| ⊦ 0 ≤ i → addarray(r, mklist(val, n), i, addarray(r, mklist(val, i→n(i)), 0, st)) = addarray(r, val, n→i(n) + i, st) |
0 ≤ i ⊦ addarray(r, mklist(val, n), i, addarray(r, mklist(val, i→n(i)), 0, st)) = addarray(r, val, n→i(n) + i, st)
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j])]]