`{PropResizing} {A : Ordinal} {a : A} : forall x : ↓a, out x < a. Proof. intros x. exact (equiv_smalltype _ (proj2 x)). Defined.
From HoTT Require Import TruncType ExcludedMiddle Modalities.ReflectiveSubuniverse abstract_algebra. From HoTT Require Import Universes.Smallness. From HoTT Require Import Colimits.Quotient. From HoTT Require Import HSet.