| i ∈ all_prime_divisors(j), i ^ n→i(#oc(i, all_prime_divisors(j))) * Π(all_prime_divisors(j) -l i) = j, prime(i), 0 < j ⊦ i ^ n→i(#oc(i, all_prime_divisors(j))) | j ∧ ¬ i | j / i ^ n→i(#oc(i, all_prime_divisors(j))) |
i ^ n→i(#oc(i, all_prime_divisors(j))) * Π(all_prime_divisors(j) -l i) = j, prime(i), 0 < j, i | j, 2 ≤ j, 0 ≤ j ⊦ i ^ n→i(#oc(i, all_prime_divisors(j))) | j ∧ ¬ i | j / i ^ n→i(#oc(i, all_prime_divisors(j)))
Used simplifier rules: forward-le-01: ⊦ i ≤ j ∧ 0 ≤ i → 0 ≤ j; (forward) from specification int-abs%all_prime_divisors-in-01: ⊦ j ∈ all_prime_divisors(i) ↔ prime(j) ∧ j | i ∧ 2 ≤ i; from specification intlist