Definition make_cell_of_internal_sfib_over {B : bicat} {b₁ b₂ e₁ e₂ : B} {fb gb : b₁ --> b₂} {γ : fb ==> gb} {p₁ : e₁ --> b₁} {p₂ : e₂ --> b₂} {fe : mor_of_internal_sfib_over p₁ p₂ fb} {ge : mor_of_internal_sfib_over p₁ p₂ gb} (γe : fe ==> ge) (p : cell_of_internal_sfib_over_homot γ γe) : cell_of_internal_sfib_over γ fe ge := (γe ,, p).
Require Import UniMath.Foundations.All. Require Import UniMath.MoreFoundations.All. Require Import UniMath.CategoryTheory.Core.Categories. Require Import UniMath.CategoryTheory.Core.Isos. Require Import UniMath.CategoryTheory.DisplayedCats.StreetFibration. Require Import UniMath.Bicategories.Core.Bicat. Import Bicat.Notations. Require Import UniMath.Bicategories.Core.Invertible_2cells. Require Import UniMath.Bicategories.Core.Univalence.