| ints0 = i0 + ints1, # refs = i→n(countrefs(i ' + ints0)), r ∈ refs, posints(ints0), 0 < n→i(# acc) + i, 0 < i, ∀ st, ty, ints, i, acc, r, refs0. # refs0 < # refs → ( true → ( r ∈ refs0 ∧ n→i(# acc) + i = ints .first ∧ # refs0 = i→n(countrefs(i ' + ints .rest)) ∧ ints ≠ [] ∧ 0 ≤ i ∧ posints(ints) ∧ ¬ 0 ∈ ints .butlast ∧ i ≤ ints .first → is_arrayref(r, (addmultiarrays(refs0, i, acc, ty, ints, st)[r -- _length]) .intval, addmultiarrays(refs0, i, acc, ty, ints, st)))) ⊦ ints0 = [], 0 = n→i(# acc) + i, i = 0, 0 ∈ ints0 .butlast, is_arrayref (r, (addmultiarrays (firstn(# refs - i→n(countrefs(ints0)), refs), i - 1, lastn(i→n(countrefs(ints0)), refs) .first ' + acc, ty, (n→i(# acc) + i) ' + ints0, addmultiarrays(lastn(i→n(countrefs(ints0)), refs), i0, [], ty, ints0, st)) [r -- _length ] ) .intval, addmultiarrays (firstn(# refs - i→n(countrefs(ints0)), refs), i - 1, lastn(i→n(countrefs(ints0)), refs) .first ' + acc, ty, (n→i(# acc) + i) ' + ints0, addmultiarrays(lastn(i→n(countrefs(ints0)), refs), i0, [], ty, ints0, st))) |
# refs = i→n(countrefs(i ' + i0 ' + ints1)), 0 < n→i(# acc) + i, 0 < i, r ∈ refs, posints(ints1), 0 ≤ i0, ∀ st, ty, ints, i, acc, r, refs0. # refs0 < # refs → ( true → ( r ∈ refs0 ∧ n→i(# acc) + i = ints .first ∧ # refs0 = i→n(countrefs(i ' + ints .rest)) ∧ ints ≠ [] ∧ 0 ≤ i ∧ posints(ints) ∧ ¬ 0 ∈ ints .butlast ∧ i ≤ ints .first → is_arrayref(r, (addmultiarrays(refs0, i, acc, ty, ints, st)[r -- _length]) .intval, addmultiarrays(refs0, i, acc, ty, ints, st)))) ⊦ 0 = n→i(# acc) + i, i = 0, 0 ∈ (i0 ' + ints1) .butlast, is_arrayref (r, (addmultiarrays (firstn(# refs - i→n(countrefs(i0 ' + ints1)), refs), i - 1, lastn(i→n(countrefs(i0 ' + ints1)), refs) .first ' + acc, ty, (n→i(# acc) + i) ' + i0 ' + ints1, addmultiarrays(lastn(i→n(countrefs(i0 ' + ints1)), refs), i0, [], ty, i0 ' + ints1, st)) [r -- _length ] ) .intval, addmultiarrays (firstn(# refs - i→n(countrefs(i0 ' + ints1)), refs), i - 1, lastn(i→n(countrefs(i0 ' + ints1)), refs) .first ' + acc, ty, (n→i(# acc) + i) ' + i0 ' + ints1, addmultiarrays(lastn(i→n(countrefs(i0 ' + ints1)), refs), i0, [], ty, i0 ' + ints1, st)))
[[CONCRETESIMPRULES : ([CSIMPFORWARD : ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j], [CSIMPSEQ : ⊦ posints(i ' + ints) ↔ 0 ≤ i ∧ posints(ints)], [CSIMPSEQ : ⊦ i + j = j + i], [CSIMPSEQ : ⊦ i + j + i0 = (i + j) + i0], [CSIMPSEQ : ⊦ (ints + ints0) + ints1 = ints + ints0 + ints1], [CSIMPSEQ : ⊦ i ' + ints ≠ []], [CSIMPSEQ : ⊦ i + ints = i ' + ints])]]