| prime(i), 0 < j ⊦ #oc(i, all_prime_divisors(i * j)) = #oc(i, all_prime_divisors(j)) + 1 |
⊦ 0 < j ∧ i | j ∧ prime(i) → all_prime_divisors(j / i) = all_prime_divisors(j) -1l i
0 < i * j ∧ i | i * j ∧ prime(i) → all_prime_divisors((i * j) / i) = all_prime_divisors(i * j) -1l i, prime(i), 0 < j ⊦ #oc(i, all_prime_divisors(i * j)) = #oc(i, all_prime_divisors(j)) + 1
Used terms: i * j, i