| j0 = j / i, 1 < i ^ i0, 0 ≤ i0, 0 < i ^ i0, 0 < j, j < i ^ i0, prime(i), ∀ j0, i, i0. i→n(j0) < i→n(j) → prime(i) ∧ j0 < i ^ i0 ∧ 0 < j0 ∧ 0 < i ^ i0 ∧ 0 ≤ i0 ∧ 1 < i ^ i0 → max_exp(i, fac(j0)) = Σ countFun(1, i0, λ j1. j0 / i ^ j1) ⊦ max_exp(i, fac(j)) = Σ countFun(1, i0, λ j0. j / i ^ j0) |
j = i1 * i + j2 ∧ 0 ≤ j2 ∧ j2 < i ∧ 0 < i, j0 = i1, 1 < i ^ i0, 0 ≤ i0, 0 < i ^ i0, 0 < j, j < i ^ i0, prime(i), ∀ j0, i, i0. i→n(j0) < i→n(j) → prime(i) ∧ j0 < i ^ i0 ∧ 0 < j0 ∧ 0 < i ^ i0 ∧ 0 ≤ i0 ∧ 1 < i ^ i0 → max_exp(i, fac(j0)) = Σ countFun(1, i0, λ j1. j0 / i ^ j1) ⊦ max_exp(i, fac(j)) = Σ countFun(1, i0, λ j0. j / i ^ j0)
Used simplifier rules: lels: ⊦ ¬ i < j ↔ j ≤ i; from specification int-abs%prime-not-neg-01: ⊦ j ≤ 0 → ¬ prime(j); from specification int-gcd%⊦ 0 < j ∧ 0 < i → (i0 = i / j ∧ j0 = i % j ↔ i = i0 * j + j0 ∧ 0 ≤ j0 ∧ j0 < j); (elim) Used terms: j, i, i1, j2