fact: Definition morphism_class (C : category) : UU := ∏ (X Y : C), hsubtype (X --> Y).
imports: UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Prelude UniMath.CategoryTheory.opp_precat UniMath.ModelCategories.Retract