proposition: Proposition disp_functor_disp_ess_surj_to_split {C : category} {D₁ D₂ : disp_cat C} (HD₁ : is_univalent_disp D₁) (HD₂ : is_univalent_disp D₂) {F : disp_functor (functor_identity C) D₁ D₂} (H₁ : disp_functor_disp_ess_surj F) (H₂ : disp_functor_ff F) : disp_functor_disp_ess_split_surj F.
proof: Proof. intros x yy. refine (factor_through_squash _ (λ z, z) (H₁ x yy)). refine (isofhlevelweqf _ _ (isaprop_hfiber_ff_disp HD₁ HD₂ H₂ x yy)). use weqfibtototal. intro xx ; cbn. exact (make_weq _ (HD₂ x x (idpath _) _ _)). Defined.
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Prelude UniMath.CategoryTheory.Adjunctions.Core UniMath.CategoryTheory.Equivalences.Core UniMath.CategoryTheory.DisplayedCats.Core UniMath.CategoryTheory.DisplayedCats.Functors UniMath.CategoryTheory.DisplayedCats.NaturalTransformations UniMath.CategoryTheory.DisplayedCats.Isos UniMath.CategoryTheory.DisplayedCats.Univalence UniMath.CategoryTheory.DisplayedCats.Equivalences UniMath.CategoryTheory.DisplayedCats.Fibrations UniMath.CategoryTheory.DisplayedCats.DisplayedFunctorEq