have hdd := not_eq_neg_self hd
d a b : ℕ
hd : ↑d ≠ 0
hcop : Nat.Coprime a b
hab : ↑a = ↑b
⊢ ↑a = ↑d ∨ ↑a = -↑d
d a b : ℕ
hd : ↑d ≠ 0
hcop : Nat.Coprime a b
hab : ↑a = ↑b
hdd : -↑d ≠ ↑d
⊢ ↑a = ↑d ∨ ↑a = -↑d