Lemma has_homsets_Under : has_homsets Undercategory. Proof. intros X Y. apply (isaset_Under_mor X Y). Qed.
Require Import UniMath.Foundations.PartD. Require Import UniMath.Foundations.Propositions. Require Import UniMath.Foundations.Sets. Require Import UniMath.CategoryTheory.Core.Categories. Require Import UniMath.CategoryTheory.Core.Functors.