rw [← hi1, pow_one] at hi
p : ℕ+
L : Type u
inst✝² : Field L
inst✝¹ : CharZero L
inst✝ : IsCyclotomicExtension {p} ℚ L
hp : Fact (↑p).Prime
η₁ η₂ : 𝓞 (CyclotomicField p ℚ)
hη₁ : η₁ ∈ nthRootsFinset (↑p) (𝓞 (CyclotomicField p ℚ))
hη₂ : η₂ ∈ nthRootsFinset (↑p) (𝓞 (CyclotomicField p ℚ))
hdiff : η₁ ≠ η₂
hwlog : η₁ ≠ 1
ph : 2 ≤ p
h : IsPrimitiveRoot η₁ ↑p
i : ℕ
H : i < ↑p
hi : η₁ ^ i = η₂
hi1 : 1 = i
⊢ False
p : ℕ+
L : Type u
inst✝² : Field L
inst✝¹ : CharZero L
inst✝ : IsCyclotomicExtension {p} ℚ L
hp : Fact (↑p).Prime
η₁ η₂ : 𝓞 (CyclotomicField p ℚ)
hη₁ : η₁ ∈ nthRootsFinset (↑p) (𝓞 (CyclotomicField p ℚ))
hη₂ : η₂ ∈ nthRootsFinset (↑p) (𝓞 (CyclotomicField p ℚ))
hdiff : η₁ ≠ η₂
hwlog : η₁ ≠ 1
ph : 2 ≤ p
h : IsPrimitiveRoot η₁ ↑p
i : ℕ
H : i < ↑p
hi : η₁ = η₂
hi1 : 1 = i
⊢ False