KummerTheory.primitiveRoot_primePowerClass_ne_one
At the last available prime-power root level, a primitive root of prime order has nonidentity power class. The missing next root level is supplied by maximality of s in the roots-downstairs argument.
Source context 2 commands
Surrounding namespaces, section variables, and local commands at this declaration.
namespace KummerTheory
variable {K : Type*} [Field K]Lean source · statement
theorem primitiveRoot_primePowerClass_ne_one
{r : ℕ} (hr : r.Prime) (s : ℕ) {ζ : Kˣ}
(hζ : IsPrimitiveRoot ζ r)
(hnext : ¬ (primitiveRoots (r ^ (s + 1)) K).Nonempty) :
(ζ : Kˣ ⧸ (powMonoidHom (r ^ s) : Kˣ →* Kˣ).range) ≠ 1