| # refs = i→n(countrefs(i ' + ints0)), 0 ≤ i, r ∈ refs, posints(ints0), 0 ≤ n→i(# acc) + 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)))) ⊦ is_arrayref (r, (addmultiarrays(refs, i, acc, ty, (n→i(# acc) + i) ' + ints0, st)[r -- _length]) .intval, addmultiarrays(refs, i, acc, ty, (n→i(# acc) + i) ' + ints0, st)), 0 ∈ ((n→i(# acc) + i) ' + ints0) .butlast |
⊦ # ints = 1 → addmultiarrays(refs, i, acc, ty, ints, st) = addarray(refs .first, ty, ints .first, st)
# ((n→i(# acc) + i) ' + ints0) ≠ 1, # refs = i→n(countrefs(i ' + ints0)), 0 ≤ i, r ∈ refs, posints(ints0), 0 ≤ n→i(# acc) + 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)))) ⊦ is_arrayref (r, (addmultiarrays(refs, i, acc, ty, (n→i(# acc) + i) ' + ints0, st)[r -- _length]) .intval, addmultiarrays(refs, i, acc, ty, (n→i(# acc) + i) ' + ints0, st)), 0 ∈ ((n→i(# acc) + i) ' + ints0) .butlast
# ((n→i(# acc) + i) ' + ints0) = 1, # refs = i→n(countrefs(i ' + ints0)), 0 ≤ i, r ∈ refs, posints(ints0), 0 ≤ n→i(# acc) + 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)))) ⊦ is_arrayref (r, (addarray(refs .first, ty, ((n→i(# acc) + i) ' + ints0) .first, st)[r -- _length]) .intval, addarray(refs .first, ty, ((n→i(# acc) + i) ' + ints0) .first, st)), 0 ∈ ((n→i(# acc) + i) ' + ints0) .butlast
[[CONCRETESIMPRULES : ()], [EXTRATERMS : (st, (n→i(# acc) + i) ' + ints0, ty, acc, i, refs)]]