Proposition isaprop_bottom_element {X : hSet} (RX : PartialOrder X) : isaprop (bottom_element RX). Proof. use invproofirrelevance. exact (bottom_element_eq RX). Qed.
Require Import UniMath.Foundations.All. Require Import UniMath.MoreFoundations.All. Require Import UniMath.OrderTheory.Posets.Basics. Require Import UniMath.OrderTheory.Posets.MonotoneFunctions.