fact: Definition is_chain {P : Poset} {I} (p : I -> P) : hProp := ∀ i j : I, comparable (p i) (p j).
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.Combinatorics.WellOrderedSets UniMath.OrderTheory.DCPOs.AlternativeDefinitions.Dcpo