| j0 ≠ 0, j0 * i1 = i * i0, all_prime_divisors(i1 / i) = all_prime_divisors(i1) -1l i, 0 < i0, 0 < i, prime(i), i | i1, prime(j0), j0 < j0 * i1, j2 < i0, j2 | i0, prime(j2), 2 ≤ i0, 2 ≤ j0 * i1, 0 ≤ i0, ∀ j1. j0 < j1 ∧ j1 < j0 * i1 ∧ prime(j1) → ¬ j1 | j0 * i1, ∀ j. j2 < j ∧ j < i0 ∧ prime(j) → ¬ j | i0, ∀ j0, i1. i→n(j0) < i→n(i * i0) → i1 | j0 ∧ prime(i1) ∧ 0 < j0 → all_prime_divisors(j0 / i1) = all_prime_divisors(j0) -1l i1 ⊦ j2 = j0, all_prime_divisors(i0 / j2) + j2 ' = (all_prime_divisors(i1) -1l i) + j0 ', prime(j0 * i1), prime(i0) |
j0 * i1 = i * i0, all_prime_divisors(i1 / i) = all_prime_divisors(i1) -1l i, 0 < i0, 0 < i, prime(i), i | i1, prime(j0), j0 < i * i0, j2 < i0, j2 | i0, prime(j2), 2 ≤ i0, 2 ≤ i * i0, 0 ≤ i0, ∀ j1. j0 < j1 ∧ j1 < i * i0 ∧ prime(j1) → ¬ j1 | i * i0, ∀ j. j2 < j ∧ j < i0 ∧ prime(j) → ¬ j | i0, ∀ j0, i1. i→n(j0) < i→n(i * i0) → i1 | j0 ∧ prime(i1) ∧ 0 < j0 → all_prime_divisors(j0 / i1) = all_prime_divisors(j0) -1l i1 ⊦ j2 = j0, all_prime_divisors(i0 / j2) + j2 ' = (all_prime_divisors(i1) -1l i) + j0 ', j0 = 0, prime(i * i0), prime(i0)