proposition: Proposition ver_locally_univalent_horizontal_dual (H : ver_locally_univalent B) : ver_locally_univalent horizontal_dual_verity_double_bicat.
proof: Proof. intros x y v₁ v₂. use weqhomot. - exact (horizontal_dual_inv2cell_weq v₁ v₂ ∘ make_weq _ (H x y v₁ v₂))%weq. - intro p. induction p. use cell_from_invertible_2cell_eq ; cbn. apply idpath. Qed.
imports: UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Prelude UniMath.CategoryTheory.TwoSidedDisplayedCats.TwoSidedDispCat UniMath.Bicategories.Core.Bicat UniMath.Bicategories.Core.Invertible_2cells UniMath.Bicategories.Core.Univalence UniMath.Bicategories.Core.UnivalenceOp UniMath.Bicategories.Core.Examples.OpMorBicat UniMath.Bicategories.Core.Examples.OpCellBicat UniMath.Bicategories.DoubleCategories.DoubleBicat.VerityDoubleBicat UniMath.Bicategories.DoubleCategories.DoubleBicat.DerivedLaws UniMath.Bicategories.DoubleCategories.DoubleBicat.CellsAndSquares UniMath.Bicategories.DoubleCategories.DoubleBicat.UnderlyingCats UniMath.Bicategories.DoubleCategories.DoubleBicat.LocalUnivalence