Skip to content

Commit 88bb6d2

Browse files
committed
chore(Data/Quot): golf Equivalence.quot_mk_eq_iff (leanprover-community#35319)
1 parent dbe39bd commit 88bb6d2

1 file changed

Lines changed: 2 additions & 10 deletions

File tree

Mathlib/Data/Quot.lean

Lines changed: 2 additions & 10 deletions
Original file line numberDiff line numberDiff line change
@@ -769,13 +769,5 @@ end Quotient
769769

770770
@[simp]
771771
lemma Equivalence.quot_mk_eq_iff {α : Type*} {r : α → α → Prop} (h : Equivalence r) (x y : α) :
772-
Quot.mk r x = Quot.mk r y ↔ r x y := by
773-
constructor
774-
· rw [Quot.eq]
775-
intro hxy
776-
induction hxy with
777-
| rel _ _ H => exact H
778-
| refl _ => exact h.refl _
779-
| symm _ _ _ H => exact h.symm H
780-
| trans _ _ _ _ _ h₁₂ h₂₃ => exact h.trans h₁₂ h₂₃
781-
· exact Quot.sound
772+
Quot.mk r x = Quot.mk r y ↔ r x y :=
773+
Quotient.eq (r := ⟨r, h⟩)

0 commit comments

Comments
 (0)