proposition: 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: Proof. intros x y p. exact p. Qed.
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.OrderTheory.Posets.Basics