Definition double_bicat_whiskering (B : ver_bicat_sq_bicat_ver_id_comp) : UU := (∏ (w x y z : B) (h₁ : w --> x) (h₂ : y --> z) (v₁ v₁' : w -|-> y) (v₂ : x -|-> z) (τ : v₁ =|=> v₁'), square_double_bicat h₁ h₂ v₁' v₂ → square_double_bicat h₁ h₂ v₁ v₂) × (∏ (w x y z : B) (h₁ : w --> x) (h₂ : y --> z) (v₁ : w -|-> y) (v₂ v₂' : x -|-> z) (τ : v₂ =|=> v₂'), square_double_bicat h₁ h₂ v₁ v₂ → square_double_bicat h₁ h₂ v₁ v₂') × (∏ (w x y z : B) (h₁ h₁' : w --> x) (h₂ : y --> z) (v₁ : w -|-> y) (v₂ : x -|-> z) (τ : h₁ ==> h₁'), square_double_bicat h₁' h₂ v₁ v₂ → square_double_bicat h₁ h₂ v₁ v₂) × (∏ (w x y z : B) (h₁ : w --> x) (h₂ h₂' : y --> z) (v₁ : w -|-> y) (v₂ : x -|-> z) (τ : h₂ ==> h₂'), square_double_bicat h₁ h₂ v₁ v₂ → square_double_bicat h₁ h₂' v₁ v₂).
Require Import UniMath.MoreFoundations.All. Require Import UniMath.CategoryTheory.Core.Prelude. Require Import UniMath.CategoryTheory.TwoSidedDisplayedCats.TwoSidedDispCat. Require Import UniMath.Bicategories.Core.Bicat. Import Bicat.Notations.