simp [Prime]
K : Type u_1
p : ℕ+
hpri : Fact p.Prime
inst✝³ : Field K
inst✝² : CharZero K
inst✝¹ : IsCyclotomicExtension {p} ℚ K
ζ : K
hζ : IsPrimitiveRoot ζ ↑p
hp : p ≠ 2
α : Type u_2
inst✝ : CommMonoidWithZero α
a : αˣ
b : α
⊢ Prime (b * ↑a) ↔ Prime b
no goals