| fac(i - j) * fac(j) ≠ 0, (fac(i - j) * fac(j)) * i0 = fac(i), j ≤ i, 0 < i, 0 ≤ j, 0 ≤ i, fac(i + 1 - j) * fac(j - 1) | (fac(i - j) * fac(j)) * i0, 0 < j ⊦ i0 * j = ((fac(i - j) * fac(j)) * i0) / (fac(i + 1 - j) * fac(j - 1)) * (i + 1 - j) |
(fac(i - j) * fac(j)) * i0 = fac(i), j ≤ i, 0 < i, 0 ≤ j, 0 ≤ i, fac(i + 1 - j) * fac(j - 1) | fac(i), 0 < j ⊦ i0 * j = fac(i) / (fac(i + 1 - j) * fac(j - 1)) * (i + 1 - j)
Used simplifier rules: fac-not-zero: ⊦ fac(i) * fac(j) ≠ 0;%commutativity: ⊦ i * j = j * i; from specification int-mult%associativity: ⊦ i * j * j0 = (i * j) * j0; from specification int-mult