fact: Definition skewmonoidal_data : UU := ∑ (V : category)(tensor : V ⊠ V ⟶ V) (I : V), φ₁ tensor I ⟹ functor_identity V × functor_identity V ⟹ φ₂ tensor I × (tensor × (functor_identity _))%F ∙ tensor ⟹ (precategory_binproduct_unassoc _ _ _) ∙ (functor_identity V × tensor)%F ∙ tensor .
imports: UniMath.Foundations.PartD UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Isos UniMath.CategoryTheory.Core.NaturalTransformations UniMath.CategoryTheory.Core.Functors UniMath.CategoryTheory.ProductCategory UniMath.CategoryTheory.PrecategoryBinProduct UniMath.CategoryTheory.whiskering