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