| i ≤ j, 0 ≤ i, 0 ≤ j ⊦ putArray(vals, r, i, addarray(r, ty, j, st)) = (addarray(r, ty, mklist(initial_value(ty), i→n(i)) + vals + ((¬ j ≤ n→i(# vals) + i ⊃ mklist(initial_value(ty), i→n(j - i + n→i(# vals))); [])), st) [r -- _length, intval(j) ] ) |
¬ j ≤ n→i(# vals) + i, i ≤ j, 0 ≤ i, 0 ≤ j ⊦ putArray(vals, r, i, addarray(r, ty, j, st)) = (addarray(r, ty, mklist(initial_value(ty), i→n(i)) + vals + mklist(initial_value(ty), i→n(j - i + n→i(# vals))), st)[r -- _length, intval(j)])
j ≤ n→i(# vals) + i, i ≤ j, 0 ≤ i, 0 ≤ j ⊦ putArray(vals, r, i, addarray(r, ty, j, st)) = (addarray(r, ty, mklist(initial_value(ty), i→n(i)) + vals + [], st)[r -- _length, intval(j)])
[[CONCRETESIMPRULES : ()]]