simp_rw [eq_comm (a := t)]
α : Type u_1
inst✝² : CompleteLattice α
s✝¹ x y z : α
s✝ t✝ : Set α
a b : α
P : Partition s✝
r : α → α → Prop
inst✝¹ : IsSymm α r
inst✝ : IsTrans α r
s t : Set α
⊢ t ∈ ofRel r ↔ ∃ x, r x x ∧ t = {y | r x y}
α : Type u_1
inst✝² : CompleteLattice α
s✝¹ x y z : α
s✝ t✝ : Set α
a b : α
P : Partition s✝
r : α → α → Prop
inst✝¹ : IsSymm α r
inst✝ : IsTrans α r
s t : Set α
⊢ t ∈ ofRel r ↔ ∃ x, r x x ∧ {y | r x y} = t