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