| i0 < j, 0 < i, i0 < i, 0 < i + n→i(# vals), 0 ≤ i0, i0 < i + n→i(# vals), j ≤ n→i(# vals) + i, i ≤ j, 0 ≤ i, 0 ≤ j, 0 ≤ n→i(# vals) + i, i0 < n→i(# vals) + i, 0 < j ⊦ (putArray(vals, r, i, addarray(r, ty, j, st))[r -- i0 ']) = (mklist(initial_value(ty), i→n(i)) + vals)[i→n(i0)] |
⊦ i < j ∨ n→i(# vals) + j ≤ i → (putArray(vals, r, j, st)[r0 -- i ']) = st[r0 -- i ']
i0 < i ∨ n→i(# vals) + i ≤ i0, i0 < j, 0 < i, i0 < i, 0 < i + n→i(# vals), 0 ≤ i0, i0 < i + n→i(# vals), j ≤ n→i(# vals) + i, i ≤ j, 0 ≤ i, 0 ≤ j, 0 ≤ n→i(# vals) + i, i0 < n→i(# vals) + i, 0 < j ⊦ (addarray(r, ty, j, st)[r -- i0 ']) = (mklist(initial_value(ty), i→n(i)) + vals)[i→n(i0)]
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (i0, r, addarray(r, ty, j, st), i, r, vals)]]