exact hu.dvd
case neg.hu
K : Type u_1
p : ℕ+
hpri : Fact p.Prime
inst✝⁵ : Field K
inst✝⁴ : CharZero K
inst✝³ : IsCyclotomicExtension {p} ℚ K
ζ : K
hζ : IsPrimitiveRoot ζ ↑p
M : Type u_2
inst✝² : CancelCommMonoidWithZero M
inst✝¹ : DecidableRel fun a b => a ∣ b
inst✝ : UniqueFactorizationMonoid M
b : M
hb : ¬b = 0
u : M
hu : IsUnit u
ha : u ≠ 0
H : ∀ (p : M), Prime p → multiplicity p u ≤ multiplicity p b
⊢ u ∣ b
no goals