proposition: Lemma arrow_mor_eq {C : category} {f g : arrow C} (γ γ' : f --> g) (H00 : arrow_mor00 γ = arrow_mor00 γ') (H11 : arrow_mor11 γ = arrow_mor11 γ') : γ = γ'.
proof: Proof. apply subtypePath; [intro; apply homset_property|]. apply pathsdirprod; assumption. Qed.
imports: UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Prelude UniMath.CategoryTheory.PrecategoryBinProduct UniMath.CategoryTheory.opp_precat UniMath.CategoryTheory.DisplayedCats.Core UniMath.CategoryTheory.DisplayedCats.SIP UniMath.CategoryTheory.DisplayedCats.Total UniMath.CategoryTheory.Limits.Graphs.Colimits