fact: Definition power_inj `{PropResizing} {C : Type@{i}} (p : C -> HProp@{j}) : C -> HProp@{k}.
imports: HoTT(TruncType ExcludedMiddle Modalities.ReflectiveSubuniverse abstract_algebra HSet) HoTT(PropResizing.PropResizing) HoTT(Spaces.Card) HoTT.Sets(Ordinals Powers)