fact: Definition get_predoublecategory_ver_left_unitor_naturality {C : predoublecategory} {a b c d : C} {f: a -h-> b} {g: a -v-> c} {h: b -v-> d} {k: c -h-> d} (α : sqq f g h k) : ((ver_sq_identity f) ·sqv α) ·sqh (pr1 (get_ver_left_unitor h)) = boundary_sq_transport (id_hor_right _ @ !(id_hor_left _)) (id_hor_right _ @ !(id_hor_left _)) ((pr1 (get_ver_left_unitor g)) ·sqh α) := (pr12 C) a b c d f g h k α.
imports: UniMath.Foundations.Propositions UniMath.Foundations.Sets UniMath.MoreFoundations.PartA UniMath.MoreFoundations.Notations UniMath.CategoryTheory.Core.Prelude UniMath.CategoryTheory.TwoSidedDisplayedCats.TwoSidedDispCat UniMath.CategoryTheory.TwoSidedDisplayedCats.Univalence