| i < n→i(# vals), 0 ≤ i ⊦ vals = [], (putArray(vals, r0, 0, addarray(r0, ty, n→i(# vals), st))[r0 -- i ']) = vals[i→n(i)] |
⊦ j ≤ i ∧ i < n→i(# vals) + j → (putArray(vals, r, j, st)[r -- i ']) = vals[i→n(i - j)]
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ i - 0 = i], [CSIMPSEQ : ⊦ ¬ i ≤ j ↔ j < i], [CSIMPSEQ : ⊦ i ≤ j → (¬ ¬ j < i ↔ false)], [CSIMPSEQ : ⊦ i + 0 = i], [CSIMPSEQ : ⊦ i + j + i0 = (i + j) + i0], [CSIMPSEQ : ⊦ i + j = j + i], [CSIMPSEQ : ⊦ ¬ i < j ↔ j ≤ i], [CSIMPSEQ : ⊦ i < j → (¬ ¬ j ≤ i ↔ false)])], [EXTRATERMS : (i, addarray(r0, ty, n→i(# vals), st), 0, r0, vals)]]