exact hx
case a.h
p : ℕ
hpri : Fact p.Prime
x : 𝓞 (CyclotomicField ⟨p, ⋯⟩ ℚ)
hx : IsPrimitiveRoot (↑x) p
⊢ IsPrimitiveRoot ((algebraMap (𝓞 (CyclotomicField ⟨p, ⋯⟩ ℚ)) (CyclotomicField ⟨p, ⋯⟩ ℚ)) x) p
no goals