Definition make_isEqualizer {x y z : C} (f g : y --> z) (e : x --> y) (H : e · f = e · g) : (∏ (w : C) (h : w --> y) (H' : h · f = h · g), ∃! ψ : w --> x, ψ · e = h) -> isEqualizer f g e H. Proof. intros X. unfold isEqualizer. exact X. Defined.
Require Import UniMath.Foundations.All. Require Import UniMath.MoreFoundations.All. Require Import UniMath.CategoryTheory.Core.Categories. Require Import UniMath.CategoryTheory.Core.Isos. Require Import UniMath.CategoryTheory.Core.Univalence. Require Import UniMath.CategoryTheory.Monics. Require Import UniMath.CategoryTheory.Retracts.