fact: Definition height_stn {X:FiniteOrderedSet} : X -> stn (cardinalityFiniteSet X).
imports: UniMath.Combinatorics.FiniteSets UniMath.Foundations.UnivalenceAxiom UniMath.MoreFoundations.Tactics UniMath.MoreFoundations.DecidablePropositions