fact: Definition power_morph `{PropResizing} {ua : Univalence} {C B : Type@{i}} (f : C -> B) : (C -> HProp) -> (B -> HProp).
imports: HoTT(TruncType ExcludedMiddle Modalities.ReflectiveSubuniverse abstract_algebra HSet) HoTT(PropResizing.PropResizing) HoTT(Spaces.Card) HoTT.Sets(Ordinals Powers)