| # (i1 ' + ints1) > 1 ∧ (i1 ' + ints1) .first > 0, (addmultiarrays (firstn(# refs - i→n(1 + (i1 ' + ints1) .first * countrefs((i1 ' + ints1) .rest)), refs), i2, r0 ' + acc, ty, i0 ' + i1 ' + ints1, addmultiarrays(r0 ' + refs1, i1, [], ty, i1 ' + ints1, st)) [r -- sk ] ) = (addmultiarrays(r0 ' + refs1, i1, [], ty, i1 ' + ints1, st)[r -- sk]), # refs = 1 + i→n(1 + (i1 ' + ints1) .first * countrefs((i1 ' + ints1) .rest)) * i→n(i2) + i→n(1 + (i1 ' + ints1) .first * countrefs((i1 ' + ints1) .rest)), lastn(i→n(1 + (i1 ' + ints1) .first * countrefs((i1 ' + ints1) .rest)), refs) = r0 ' + refs1, posints(ints1), 0 ≤ i1, 0 < i0, i2 < i0, 0 ≤ i2, ∀ sk, st, ty, acc, ints, i, r, refs0. # refs0 < # refs → ( true → ( ¬ r ∈ refs0 ∧ # refs0 = i→n(countrefs(i ' + ints .rest)) ∧ ints ≠ [] ∧ 0 ≤ i ∧ posints(ints) ∧ ¬ 0 ∈ ints .butlast ∧ i ≤ ints .first → (addmultiarrays(refs0, i, acc, ty, ints, st)[r -- sk]) = st[r -- sk])) ⊦ (addmultiarrays(r0 ' + refs1, i1, [], ty, i1 ' + ints1, st)[r -- sk]) = st[r -- sk], 0 = i0, (~1) = i2, r ∈ refs, 0 ∈ (i1 ' + ints1) .butlast, r ≠ r0 ∧ ¬ r ∈ refs1 ∧ 1 + # refs1 = i→n(1 + (i1 ' + ints1) .first * countrefs((i1 ' + ints1) .rest)) |
⊦ 0 ≤ i → i→n(1 + countrefs(ints) * i) = 1 + i→n(countrefs(ints)) * i→n(i)
⊦ 0 < i → i→n(1 + countrefs(ints) * i) = 1 + i→n(countrefs(ints)) * i→n(i)
(addmultiarrays (firstn(# refs - 1 + i→n(countrefs(ints1)) * i→n(i1), refs), i2, r0 ' + acc, ty, i0 ' + i1 ' + ints1, addmultiarrays(r0 ' + refs1, i1, [], ty, i1 ' + ints1, st)) [r -- sk ] ) = (addmultiarrays(r0 ' + refs1, i1, [], ty, i1 ' + ints1, st)[r -- sk]), # refs = 2 + i→n(countrefs(ints1)) * i→n(i1) + i→n(i2) * i→n(countrefs(ints1)) * i→n(i1) + i→n(i2), lastn(1 + i→n(countrefs(ints1)) * i→n(i1), refs) = r0 ' + refs1, 0 < i0, i2 < i0, 0 ≤ i2, posints(ints1), 0 < i1, ∀ sk, st, ty, acc, ints, i, r, refs0. # refs0 < # refs → ( true → ( ¬ r ∈ refs0 ∧ # refs0 = i→n(countrefs(i ' + ints .rest)) ∧ ints ≠ [] ∧ 0 ≤ i ∧ posints(ints) ∧ ¬ 0 ∈ ints .butlast ∧ i ≤ ints .first → (addmultiarrays(refs0, i, acc, ty, ints, st)[r -- sk]) = st[r -- sk])) ⊦ (addmultiarrays(r0 ' + refs1, i1, [], ty, i1 ' + ints1, st)[r -- sk]) = st[r -- sk], 0 = i0, (~1) = i2, ints1 = [], 0 = i1, r ∈ refs, 0 ∈ ints1 .butlast, r ≠ r0 ∧ ¬ r ∈ refs1 ∧ # refs1 = i→n(countrefs(ints1)) * i→n(i1)
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ r ∈ r0 ' ↔ r = r0], [CSIMPSEQ : ⊦ r ∈ refs + refs0 ↔ ¬ ¬ (r ∈ refs ∨ r ∈ refs0)], [CSIMPFORWARD : ⊦ i < j ∧ 0 ≤ i → 0 < j], [CSIMPSEQ : ⊦ (refs + refs0) + refs1 = refs + refs0 + refs1], [CSIMPFORWARD : ⊦ r ' + refs = refs0 → r ∈ refs0], [CSIMPSEQ : ⊦ m + n = m + n0 ↔ n = n0], [CSIMPSEQ : ⊦ i ≠ j → (i ≤ j ↔ i < j)], [CSIMPSEQ : ⊦ ¬ i ∈ i0 ' + ints ↔ i ≠ i0 ∧ ¬ i ∈ ints], [CSIMPSEQ : ⊦ ints ≠ [] → (ints0 + ints) .butlast = ints0 + ints .butlast], [CSIMPSEQ : ⊦ i > j ↔ j < i], [CSIMPSEQ : ⊦ # ints = 0 ↔ ints = []], [CSIMPSEQ : ⊦ m + n = 1 ↔ m = 0 ∧ n = 1 ∨ n = 0 ∧ m = 1], [CSIMPSEQ : ⊦ m + 1 ≠ 0], [CSIMPSEQ : ⊦ 1 < m ↔ ¬ (m = 0 ∨ m = 1)], [CSIMPSEQ : ⊦ m > n ↔ n < m], [CSIMPSEQ : ⊦ # i ' = 0 +1], [CSIMPSEQ : ⊦ # (ints + ints0) = # ints + # ints0], [CSIMPSEQ : ⊦ m * n = n * m], [CSIMPSEQ : ⊦ m0 * m * n = (m0 * m) * n], [CSIMPSEQ : ⊦ m + n = n + m], [CSIMPSEQ : ⊦ (m + n0) + n1 = m + n0 + n1], [CSIMPSEQ : ⊦ m * (n + 1) = m * n + m], [CSIMPSEQ : ⊦ i + j = j + i], [CSIMPSEQ : ⊦ i + j + i0 = (i + j) + i0], [CSIMPSEQ : ⊦ i * j = j * i], [CSIMPSEQ : ⊦ i * j * j0 = (i * j) * j0], [CSIMPSEQ : ⊦ (i ' + ints) .first = i], [CSIMPSEQ : ⊦ (ints + ints0) + ints1 = ints + ints0 + ints1], [CSIMPSEQ : ⊦ (i ' + ints) .rest = ints])]]