pub fn is_prime_power<I>(ZZ: I, n: &El<I>) -> Option<(El<I>, usize)>where I: RingStore + Copy, I::Type: IntegerRing,
If the given integer is a power of a prime p, returns Some((p, ln(n)/ln(p))).
p
Some((p, ln(n)/ln(p)))