fact: Definition least_upper_bound_subtype (A : hsubtype P) : UU := least_upper_bound (pr1carrier A).
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.Combinatorics.WellOrderedSets UniMath.OrderTheory.DCPOs.AlternativeDefinitions.Dcpo