| 0 < fac(2 * j) ∧ 0 < fac(j) * fac(j) ∧ prime(i) ∧ fac(j) * fac(j) | fac(2 * j), i ^ i0 ≤ 2 * j, 2 * j < i ^ (i0 + 1), prime(i), i ^ i0 < i ^ (i0 + 1), 0 ≤ i0, 0 < j, 0 ≤ j, fac(j) * fac(j) | fac(2 * j) ⊦ max_exp(i, fac(2 * j)) - max_exp(i, fac(j) * fac(j)) = Σ countFun(1, i0, λ i0. (2 * j) / i ^ i0 - 2 * j / i ^ i0) |
i ^ i0 ≤ 2 * j, 2 * j < i ^ (i0 + 1), prime(i), i ^ i0 < i ^ (i0 + 1), 0 ≤ i0, 0 < j, 0 ≤ j, fac(j) * fac(j) | fac(2 * j), 0 < fac(2 * j), 0 < fac(j) * fac(j) ⊦ max_exp(i, fac(2 * j)) = Σ countFun(1, i0, λ i0. (2 * j) / i ^ i0 - 2 * j / i ^ i0) + max_exp(i, fac(j) * fac(j))
Used simplifier rules: forward-le-05: ⊦ i < j ∧ 0 ≤ i → 0 < j; (forward) from specification int-abs%sub-eq: ⊦ i - j = i0 ↔ i = i0 + j; from specification int-abs