fact: Definition right_assoc := (tensor ∘ (Functor.Prod.pair 1 tensor) )%functor.
imports: Basics.Utf8 Category.Core Category.Morphisms Functor.Core Functor.Utf8 NaturalTransformation.Core FunctorCategory.Core FunctorCategory.Morphisms ProductLaws