Proposition Equalizer_pr1_monotone {X : hSet} (RX : PartialOrder X) (Y : hSet) (f g : X → Y) : is_monotone (Equalizer_order RX Y f g) RX (λ z, pr1 z). Proof. intros x y p. exact p. Qed.
Require Import UniMath.Foundations.All. Require Import UniMath.MoreFoundations.All. Require Import UniMath.OrderTheory.Posets.Basics.