proposition: Lemma univalent_category_has_groupoid_ob (C : univalent_category): isofhlevel 3 (ob C).
proof: Proof. change (isofhlevel 3 C) with (∏ a b : C, isofhlevel 2 (a = b)). intros a b. apply (isofhlevelweqb _ (tpair _ _ (pr2 C a b))). apply isaset_z_iso. Qed.
imports: UniMath.Foundations.PartA UniMath.Foundations.Sets UniMath.MoreFoundations.PartA UniMath.MoreFoundations.Tactics UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Isos