Lemma has_homsets_induced_precategory (M : category) {X:Type} (j : X -> ob M) : has_homsets (induced_precategory M j). Proof. intros a b. apply M. Defined.
Require Import UniMath.Foundations.PartA. Require Import UniMath.Foundations.UnivalenceAxiom. Require Import UniMath.MoreFoundations.Tactics. Require Import UniMath.CategoryTheory.Core.Categories. Require Import UniMath.CategoryTheory.Core.Isos.