Lean4
/-- Split equalizers are absolute: they are preserved by any functor. -/
@[simps]
def map {W : C} {ι : W ⟶ X} (q : IsSplitEqualizer f g ι) (F : C ⥤ D) : IsSplitEqualizer (F.map f) (F.map g) (F.map ι)
where
leftRetraction := F.map q.leftRetraction
rightRetraction := F.map q.rightRetraction
condition := by rw [← F.map_comp, q.condition, F.map_comp]
ι_leftRetraction := by rw [← F.map_comp, q.ι_leftRetraction, F.map_id]
bottom_rightRetraction := by rw [← F.map_comp, q.bottom_rightRetraction, F.map_id]
top_rightRetraction := by rw [← F.map_comp, q.top_rightRetraction, F.map_comp]