Module docstring
{"# Associated elements in rings "}
{"# Associated elements in rings "}
Associated.neg_left
theorem
(h : Associated a b) : Associated (-a) b
lemma neg_left (h : Associated a b) : Associated (-a) b := let ⟨u, hu⟩ := h; ⟨-u, by simp [hu]⟩
Associated.neg_right
theorem
(h : Associated a b) : Associated a (-b)
lemma neg_right (h : Associated a b) : Associated a (-b) := h.symm.neg_left.symm
Associated.neg_neg
theorem
(h : Associated a b) : Associated (-a) (-b)
lemma neg_neg (h : Associated a b) : Associated (-a) (-b) := h.neg_left.neg_right