| ¬(prime(i) ∧ 0 < i1 ∧ 0 ≤ j2 ∧ j2 < i), j2 < i, 1 < i ^ i0, 0 ≤ i0, 0 < i ^ i0, i1 * i + j2 < i ^ i0, prime(i), 0 ≤ j2, 0 < i, 0 < i1 * i + j2, ∀ j0, i2, i0. i→n(j0) < i→n(i1 * i + j2) → prime(i2) ∧ j0 < i2 ^ i0 ∧ 0 < j0 ∧ 0 < i2 ^ i0 ∧ 0 ≤ i0 ∧ 1 < i2 ^ i0 → max_exp(i2, fac(j0)) = Σ countFun(1, i0, λ j1. j0 / i2 ^ j1) ⊦ max_exp(i, fac(i1 * i + j2)) = Σ countFun(1, i0, λ j0. (i1 * i + j2) / i ^ j0) |
i1 < i1 * i + j2, i1 < i, i1 < i ^ i0, i1 ≤ 0, 0 < i1 * i + j2, 0 < i, 0 ≤ j2, prime(i), i1 * i + j2 < i ^ i0, 0 < i ^ i0, 0 ≤ i0, 1 < i ^ i0, j2 < i, ∀ j0, i2, i0. i→n(j0) < i→n(i1 * i + j2) → prime(i2) ∧ j0 < i2 ^ i0 ∧ 0 < j0 ∧ 0 < i2 ^ i0 ∧ 0 ≤ i0 ∧ 1 < i2 ^ i0 → max_exp(i2, fac(j0)) = Σ countFun(1, i0, λ j1. j0 / i2 ^ j1) ⊦ max_exp(i, fac(i1 * i + j2)) = Σ countFun(1, i0, λ j0. (i1 * i + j2) / i ^ j0)
Used simplifier rules: forward-le-04: ⊦ j ≤ i ∧ i ≤ 0 → j ≤ 0; (forward) from specification int-abs%forward-lele: ⊦ j ≤ j0 ∧ j0 ≤ j1 → j ≤ j1; (forward) from specification int-abs%forward-lels: ⊦ i ≤ j ∧ j < j0 → i < j0; (forward) from specification int-abs%lels: ⊦ ¬ i < j ↔ j ≤ i; from specification int-abs%zero-gels-04: ⊦ i ≤ 0 ∧ 0 ≤ j → i ≤ j; from specification int-abs