fact: Definition make_comprehension_bicat_structure (B : bicat) (D : disp_bicat B) (χ : disp_psfunctor D (cod_disp_bicat B) (id_psfunctor B)) (HD : global_cleaving D) (Hχ : global_cartesian_disp_psfunctor χ) : comprehension_bicat_structure B := D ,, χ ,, HD ,, Hχ.
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Categories UniMath.Bicategories.Core.Bicat UniMath.Bicategories.DisplayedBicats.DispBicat UniMath.Bicategories.DisplayedBicats.DispPseudofunctor UniMath.Bicategories.DisplayedBicats.CleavingOfBicat UniMath.Bicategories.DisplayedBicats.CartesianPseudoFunctor UniMath.Bicategories.DisplayedBicats.Examples.Codomain UniMath.Bicategories.PseudoFunctors.Display.PseudoFunctorBicat UniMath.Bicategories.PseudoFunctors.PseudoFunctor UniMath.Bicategories.PseudoFunctors.Examples.Identity