fact: Definition hartogs_number : Ordinal@{A _} := resize_ordinal hartogs_number' hartogs_number_carrier hartogs_equiv.
imports: HoTT(TruncType ExcludedMiddle Modalities.ReflectiveSubuniverse abstract_algebra HSet) HoTT(PropResizing.PropResizing) HoTT(Spaces.Card) HoTT.Sets(Ordinals Powers)