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