rw [← pow_mul, mul_comm, pow_mul, hζ.unit'_coe.pow_eq_one, one_pow]
p : ℕ+
K : Type u_1
inst✝² : Field K
ζ : K
hζ : IsPrimitiveRoot ζ ↑p
inst✝¹ : NumberField K
inst✝ : IsCyclotomicExtension {p} ℚ K
h : p ≠ 2
u : (𝓞 K)ˣ
n : ℕ
hp : (↑p).Prime
H : u * ((unitGalConj K p) u)⁻¹ = -hζ.unit' ^ n
⊢ (↑hζ.unit' ^ n) ^ ↑p = 1
no goals