fact: Definition isTotalOrder {X : hSet} (R : hrel X) : hProp := make_hProp (isPartialOrder R × istotal R) (isapropdirprod _ _ (isaprop_isPartialOrder R) (isaprop_istotal R)).
imports: UniMath.Combinatorics.FiniteSets UniMath.Foundations.UnivalenceAxiom UniMath.MoreFoundations.Tactics UniMath.MoreFoundations.DecidablePropositions