proposition: Lemma isfullyfaithful_isfull_isfaithful_helper `{IsFull} `{IsFaithful} (H' : forall x y (m : morphism set_cat x y), IsEpimorphism m -> IsMonomorphism m -> IsIsomorphism m) : IsFullyFaithful.
proof: Proof. intros ? ?; hnf in * |- . apply H'; eauto. Qed.
imports: Category.Core Functor.Core HomFunctor Category.Morphisms Category.Dual Functor.Dual Category.Prod Functor.Prod NaturalTransformation.Core SetCategory.Core Functor.Composition.Core Basics.Trunc Types.Universe HIT.iso HoTT.Truncations.Core