Proposition isrefl_quotient_poset : isrefl quotient_poset_hrel. Proof. use setquotunivprop. intro x ; cbn in *. apply hinhpr. exact (inr (refl_PartialOrder RX x)). Qed.
Require Import UniMath.Foundations.All. Require Import UniMath.MoreFoundations.All. Require Import UniMath.OrderTheory.Posets.Basics. Require Import UniMath.OrderTheory.Posets.MonotoneFunctions. Require Import UniMath.OrderTheory.Posets.PointedPosets.