fact: Definition get_hor_sq_identity {C : predoublecategory_sq_hor_data} : (∏ (a b : C) (f: a -v-> b), (sqq (hor_identity a) f f (hor_identity b))) := pr1 (pr2 C).
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