| all_prime_divisors((j / max_prime_divisor(j)) / max_prime_divisor(j)) = all_prime_divisors(j / max_prime_divisor(j)), 2 ≤ j, 0 < j, 0 ≤ j, 0 < j / max_prime_divisor(j), 0 ≤ j / max_prime_divisor(j), ∀ 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 / max_prime_divisor(j)) / max_prime_divisor(j / max_prime_divisor(j))) + max_prime_divisor(j / max_prime_divisor(j)) ' = all_prime_divisors(j / max_prime_divisor(j)), prime(j), prime(j / max_prime_divisor(j)), prime(max_prime_divisor(j)) ∧ max_prime_divisor(j) | j / max_prime_divisor(j) ∧ 2 ≤ j / max_prime_divisor(j) |
all_prime_divisors((j / max_prime_divisor(j)) / max_prime_divisor(j)) = all_prime_divisors(j / max_prime_divisor(j)), 2 ≤ j, 0 < j, 0 ≤ j, 0 < j / max_prime_divisor(j), 0 ≤ j / max_prime_divisor(j), ∀ 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 / max_prime_divisor(j)) / max_prime_divisor(j / max_prime_divisor(j))) + max_prime_divisor(j / max_prime_divisor(j)) ' = all_prime_divisors(j / max_prime_divisor(j)), prime(j), prime(j / max_prime_divisor(j)), max_prime_divisor(j) | j / max_prime_divisor(j)
Used simplifier rules: max_prime_divisor-ge2: ⊦ ¬ prime(i) ∧ 2 ≤ i → 2 ≤ i / max_prime_divisor(i); from specification int-gcd%max_prime_divisor-prime: ⊦ ¬ prime(i) ∧ 2 ≤ i → prime(max_prime_divisor(i)); from specification int-gcd