(Lax) monoidal functors

A lax monoidal functor F between monoidal categories C and D is a functor between the underlying categories equipped with morphisms

• ε : 𝟙_ D ⟶ F.obj (𝟙_ C) (called the unit morphism)
• μ X Y : (F.obj X) ⊗ (F.obj Y) ⟶ F.obj (X ⊗ Y) (called the tensorator, or strength). satisfying various axioms. This is implemented as a typeclass F.LaxMonoidal.

Similarly, we define the typeclass F.OplaxMonoidal. For these oplax monoidal functors, we have similar data η and δ, but with morphisms in the opposite direction.

A monoidal functor (F.Monoidal) is defined here as the combination of F.LaxMonoidal and F.OplaxMonoidal, with the additional conditions that ε/η and μ/δ are inverse isomorphisms.

We show that the composition of (lax) monoidal functors gives a (lax) monoidal functor.

See CategoryTheory.Monoidal.NaturalTransformation for monoidal natural transformations.

We show in CategoryTheory.Monoidal.Mon_ that lax monoidal functors take monoid objects to monoid objects.

References

See https://stacks.math.columbia.edu/tag/0FFL.

class CategoryTheory.Functor.LaxMonoidal {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) : Type (max u₁ v₂)

A functor F : C ⥤ D between monoidal categories is lax monoidal if it is equipped with morphisms ε : 𝟙 _D ⟶ F.obj (𝟙_ C) and μ X Y : F.obj X ⊗ F.obj Y ⟶ F.obj (X ⊗ Y), satisfying the appropriate coherences.

• ε' : 𝟙_ D ⟶ F.obj (𝟙_ C)

  unit morphism

• μ' : (X Y : C) → CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (F.obj Y) ⟶ F.obj (CategoryTheory.MonoidalCategory.tensorObj X Y)

  tensorator

• μ'_natural_left : ∀ {X Y : C} (f : X ⟶ Y) (X' : C), CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (F.map f) (F.obj X')) (CategoryTheory.Functor.LaxMonoidal.μ' Y X') = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ' X X') (F.map (CategoryTheory.MonoidalCategory.whiskerRight f X'))
• μ'_natural_right : ∀ {X Y : C} (X' : C) (f : X ⟶ Y), CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X') (F.map f)) (CategoryTheory.Functor.LaxMonoidal.μ' X' Y) = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ' X' X) (F.map (CategoryTheory.MonoidalCategory.whiskerLeft X' f))
• associativity' : ∀ (X Y Z : C), CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.μ' X Y) (F.obj Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ' (CategoryTheory.MonoidalCategory.tensorObj X Y) Z) (F.map (CategoryTheory.MonoidalCategory.associator X Y Z).hom)) = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.associator (F.obj X) (F.obj Y) (F.obj Z)).hom (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.LaxMonoidal.μ' Y Z)) (CategoryTheory.Functor.LaxMonoidal.μ' X (CategoryTheory.MonoidalCategory.tensorObj Y Z)))

  associativity of the tensorator

• left_unitality' : ∀ (X : C), (CategoryTheory.MonoidalCategory.leftUnitor (F.obj X)).hom = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight CategoryTheory.Functor.LaxMonoidal.ε' (F.obj X)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ' (𝟙_ C) X) (F.map (CategoryTheory.MonoidalCategory.leftUnitor X).hom))
• right_unitality' : ∀ (X : C), (CategoryTheory.MonoidalCategory.rightUnitor (F.obj X)).hom = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) CategoryTheory.Functor.LaxMonoidal.ε') (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ' X (𝟙_ C)) (F.map (CategoryTheory.MonoidalCategory.rightUnitor X).hom))

def CategoryTheory.Functor.LaxMonoidal.ε {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] : 𝟙_ D ⟶ F.obj (𝟙_ C)

the unit morphism of a lax monoidal functor

Equations

• CategoryTheory.Functor.LaxMonoidal.ε F = CategoryTheory.Functor.LaxMonoidal.ε'

def CategoryTheory.Functor.LaxMonoidal.μ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] (X Y : C) : CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (F.obj Y) ⟶ F.obj (CategoryTheory.MonoidalCategory.tensorObj X Y)

the tensorator of a lax monoidal functor

Equations

• CategoryTheory.Functor.LaxMonoidal.μ F X Y = CategoryTheory.Functor.LaxMonoidal.μ' X Y

@[simp]

theorem CategoryTheory.Functor.LaxMonoidal.μ_natural_left {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] {X Y : C} (f : X ⟶ Y) (X' : C) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (F.map f) (F.obj X')) (CategoryTheory.Functor.LaxMonoidal.μ F Y X') = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F X X') (F.map (CategoryTheory.MonoidalCategory.whiskerRight f X'))

@[simp]

theorem CategoryTheory.Functor.LaxMonoidal.μ_natural_left_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] {X Y : C} (f : X ⟶ Y) (X' : C) {Z : D} (h : F.obj (CategoryTheory.MonoidalCategory.tensorObj Y X') ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (F.map f) (F.obj X')) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F Y X') h) = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F X X') (CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.whiskerRight f X')) h)

@[simp]

theorem CategoryTheory.Functor.LaxMonoidal.μ_natural_right {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] {X Y : C} (X' : C) (f : X ⟶ Y) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X') (F.map f)) (CategoryTheory.Functor.LaxMonoidal.μ F X' Y) = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F X' X) (F.map (CategoryTheory.MonoidalCategory.whiskerLeft X' f))

@[simp]

theorem CategoryTheory.Functor.LaxMonoidal.μ_natural_right_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] {X Y : C} (X' : C) (f : X ⟶ Y) {Z : D} (h : F.obj (CategoryTheory.MonoidalCategory.tensorObj X' Y) ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X') (F.map f)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F X' Y) h) = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F X' X) (CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.whiskerLeft X' f)) h)

@[simp]

theorem CategoryTheory.Functor.LaxMonoidal.associativity {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] (X Y Z : C) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.μ F X Y) (F.obj Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F (CategoryTheory.MonoidalCategory.tensorObj X Y) Z) (F.map (CategoryTheory.MonoidalCategory.associator X Y Z).hom)) = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.associator (F.obj X) (F.obj Y) (F.obj Z)).hom (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.LaxMonoidal.μ F Y Z)) (CategoryTheory.Functor.LaxMonoidal.μ F X (CategoryTheory.MonoidalCategory.tensorObj Y Z)))

@[simp]

theorem CategoryTheory.Functor.LaxMonoidal.associativity_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] (X Y Z : C) {Z✝ : D} (h : F.obj (CategoryTheory.MonoidalCategory.tensorObj X (CategoryTheory.MonoidalCategory.tensorObj Y Z)) ⟶ Z✝) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.μ F X Y) (F.obj Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F (CategoryTheory.MonoidalCategory.tensorObj X Y) Z) (CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.associator X Y Z).hom) h)) = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.associator (F.obj X) (F.obj Y) (F.obj Z)).hom (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.LaxMonoidal.μ F Y Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F X (CategoryTheory.MonoidalCategory.tensorObj Y Z)) h))

@[simp]

theorem CategoryTheory.Functor.LaxMonoidal.left_unitality {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] (X : C) : (CategoryTheory.MonoidalCategory.leftUnitor (F.obj X)).hom = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.ε F) (F.obj X)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F (𝟙_ C) X) (F.map (CategoryTheory.MonoidalCategory.leftUnitor X).hom))

theorem CategoryTheory.Functor.LaxMonoidal.left_unitality_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] (X : C) {Z : D} (h : F.obj X ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.leftUnitor (F.obj X)).hom h = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.ε F) (F.obj X)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F (𝟙_ C) X) (CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.leftUnitor X).hom) h))

@[simp]

theorem CategoryTheory.Functor.LaxMonoidal.right_unitality {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] (X : C) : (CategoryTheory.MonoidalCategory.rightUnitor (F.obj X)).hom = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.LaxMonoidal.ε F)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F X (𝟙_ C)) (F.map (CategoryTheory.MonoidalCategory.rightUnitor X).hom))

theorem CategoryTheory.Functor.LaxMonoidal.right_unitality_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] (X : C) {Z : D} (h : F.obj X ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.rightUnitor (F.obj X)).hom h = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.LaxMonoidal.ε F)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F X (𝟙_ C)) (CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.rightUnitor X).hom) h))

@[simp]

theorem CategoryTheory.Functor.LaxMonoidal.μ_natural {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] {X Y X' Y' : C} (f : X ⟶ Y) (g : X' ⟶ Y') : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (F.map f) (F.map g)) (CategoryTheory.Functor.LaxMonoidal.μ F Y Y') = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F X X') (F.map (CategoryTheory.MonoidalCategory.tensorHom f g))

@[simp]

theorem CategoryTheory.Functor.LaxMonoidal.μ_natural_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] {X Y X' Y' : C} (f : X ⟶ Y) (g : X' ⟶ Y') {Z : D} (h : F.obj (CategoryTheory.MonoidalCategory.tensorObj Y Y') ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (F.map f) (F.map g)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F Y Y') h) = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F X X') (CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.tensorHom f g)) h)

@[simp]

theorem CategoryTheory.Functor.LaxMonoidal.left_unitality_inv {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] (X : C) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.leftUnitor (F.obj X)).inv (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.ε F) (F.obj X)) (CategoryTheory.Functor.LaxMonoidal.μ F (𝟙_ C) X)) = F.map (CategoryTheory.MonoidalCategory.leftUnitor X).inv

@[simp]

theorem CategoryTheory.Functor.LaxMonoidal.left_unitality_inv_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] (X : C) {Z : D} (h : F.obj (CategoryTheory.MonoidalCategory.tensorObj (𝟙_ C) X) ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.leftUnitor (F.obj X)).inv (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.ε F) (F.obj X)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F (𝟙_ C) X) h)) = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.leftUnitor X).inv) h

@[simp]

theorem CategoryTheory.Functor.LaxMonoidal.right_unitality_inv {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] (X : C) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.rightUnitor (F.obj X)).inv (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.LaxMonoidal.ε F)) (CategoryTheory.Functor.LaxMonoidal.μ F X (𝟙_ C))) = F.map (CategoryTheory.MonoidalCategory.rightUnitor X).inv

@[simp]

theorem CategoryTheory.Functor.LaxMonoidal.right_unitality_inv_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] (X : C) {Z : D} (h : F.obj (CategoryTheory.MonoidalCategory.tensorObj X (𝟙_ C)) ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.rightUnitor (F.obj X)).inv (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.LaxMonoidal.ε F)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F X (𝟙_ C)) h)) = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.rightUnitor X).inv) h

@[simp]

theorem CategoryTheory.Functor.LaxMonoidal.associativity_inv {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] (X Y Z : C) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.LaxMonoidal.μ F Y Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F X (CategoryTheory.MonoidalCategory.tensorObj Y Z)) (F.map (CategoryTheory.MonoidalCategory.associator X Y Z).inv)) = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.associator (F.obj X) (F.obj Y) (F.obj Z)).inv (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.μ F X Y) (F.obj Z)) (CategoryTheory.Functor.LaxMonoidal.μ F (CategoryTheory.MonoidalCategory.tensorObj X Y) Z))

@[simp]

theorem CategoryTheory.Functor.LaxMonoidal.associativity_inv_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] (X Y Z : C) {Z✝ : D} (h : F.obj (CategoryTheory.MonoidalCategory.tensorObj (CategoryTheory.MonoidalCategory.tensorObj X Y) Z) ⟶ Z✝) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.LaxMonoidal.μ F Y Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F X (CategoryTheory.MonoidalCategory.tensorObj Y Z)) (CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.associator X Y Z).inv) h)) = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.associator (F.obj X) (F.obj Y) (F.obj Z)).inv (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.μ F X Y) (F.obj Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F (CategoryTheory.MonoidalCategory.tensorObj X Y) Z) h))

def CategoryTheory.Functor.LaxMonoidal.ofTensorHom {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} (ε' : 𝟙_ D ⟶ F.obj (𝟙_ C)) (μ' : (X Y : C) → CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (F.obj Y) ⟶ F.obj (CategoryTheory.MonoidalCategory.tensorObj X Y)) (μ'_natural : ∀ {X Y X' Y' : C} (f : X ⟶ Y) (g : X' ⟶ Y'), CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (F.map f) (F.map g)) (μ' Y Y') = CategoryTheory.CategoryStruct.comp (μ' X X') (F.map (CategoryTheory.MonoidalCategory.tensorHom f g)) := by aesop_cat) (associativity' : ∀ (X Y Z : C), CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (μ' X Y) (CategoryTheory.CategoryStruct.id (F.obj Z))) (CategoryTheory.CategoryStruct.comp (μ' (CategoryTheory.MonoidalCategory.tensorObj X Y) Z) (F.map (CategoryTheory.MonoidalCategory.associator X Y Z).hom)) = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.associator (F.obj X) (F.obj Y) (F.obj Z)).hom (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (CategoryTheory.CategoryStruct.id (F.obj X)) (μ' Y Z)) (μ' X (CategoryTheory.MonoidalCategory.tensorObj Y Z))) := by aesop_cat) (left_unitality' : ∀ (X : C), (CategoryTheory.MonoidalCategory.leftUnitor (F.obj X)).hom = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom ε' (CategoryTheory.CategoryStruct.id (F.obj X))) (CategoryTheory.CategoryStruct.comp (μ' (𝟙_ C) X) (F.map (CategoryTheory.MonoidalCategory.leftUnitor X).hom)) := by aesop_cat) (right_unitality' : ∀ (X : C), (CategoryTheory.MonoidalCategory.rightUnitor (F.obj X)).hom = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (CategoryTheory.CategoryStruct.id (F.obj X)) ε') (CategoryTheory.CategoryStruct.comp (μ' X (𝟙_ C)) (F.map (CategoryTheory.MonoidalCategory.rightUnitor X).hom)) := by aesop_cat) : F.LaxMonoidal

A constructor for lax monoidal functors whose axioms are described by tensorHom instead of whiskerLeft and whiskerRight.

Equations

• One or more equations did not get rendered due to their size.

theorem CategoryTheory.Functor.LaxMonoidal.ofTensorHom_ε {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} (ε' : 𝟙_ D ⟶ F.obj (𝟙_ C)) (μ' : (X Y : C) → CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (F.obj Y) ⟶ F.obj (CategoryTheory.MonoidalCategory.tensorObj X Y)) (μ'_natural : ∀ {X Y X' Y' : C} (f : X ⟶ Y) (g : X' ⟶ Y'), CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (F.map f) (F.map g)) (μ' Y Y') = CategoryTheory.CategoryStruct.comp (μ' X X') (F.map (CategoryTheory.MonoidalCategory.tensorHom f g)) := by aesop_cat) (associativity' : ∀ (X Y Z : C), CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (μ' X Y) (CategoryTheory.CategoryStruct.id (F.obj Z))) (CategoryTheory.CategoryStruct.comp (μ' (CategoryTheory.MonoidalCategory.tensorObj X Y) Z) (F.map (CategoryTheory.MonoidalCategory.associator X Y Z).hom)) = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.associator (F.obj X) (F.obj Y) (F.obj Z)).hom (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (CategoryTheory.CategoryStruct.id (F.obj X)) (μ' Y Z)) (μ' X (CategoryTheory.MonoidalCategory.tensorObj Y Z))) := by aesop_cat) (left_unitality' : ∀ (X : C), (CategoryTheory.MonoidalCategory.leftUnitor (F.obj X)).hom = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom ε' (CategoryTheory.CategoryStruct.id (F.obj X))) (CategoryTheory.CategoryStruct.comp (μ' (𝟙_ C) X) (F.map (CategoryTheory.MonoidalCategory.leftUnitor X).hom)) := by aesop_cat) (right_unitality' : ∀ (X : C), (CategoryTheory.MonoidalCategory.rightUnitor (F.obj X)).hom = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (CategoryTheory.CategoryStruct.id (F.obj X)) ε') (CategoryTheory.CategoryStruct.comp (μ' X (𝟙_ C)) (F.map (CategoryTheory.MonoidalCategory.rightUnitor X).hom)) := by aesop_cat) : CategoryTheory.Functor.LaxMonoidal.ε F = ε'

theorem CategoryTheory.Functor.LaxMonoidal.ofTensorHom_μ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} (ε' : 𝟙_ D ⟶ F.obj (𝟙_ C)) (μ' : (X Y : C) → CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (F.obj Y) ⟶ F.obj (CategoryTheory.MonoidalCategory.tensorObj X Y)) (μ'_natural : ∀ {X Y X' Y' : C} (f : X ⟶ Y) (g : X' ⟶ Y'), CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (F.map f) (F.map g)) (μ' Y Y') = CategoryTheory.CategoryStruct.comp (μ' X X') (F.map (CategoryTheory.MonoidalCategory.tensorHom f g)) := by aesop_cat) (associativity' : ∀ (X Y Z : C), CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (μ' X Y) (CategoryTheory.CategoryStruct.id (F.obj Z))) (CategoryTheory.CategoryStruct.comp (μ' (CategoryTheory.MonoidalCategory.tensorObj X Y) Z) (F.map (CategoryTheory.MonoidalCategory.associator X Y Z).hom)) = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.associator (F.obj X) (F.obj Y) (F.obj Z)).hom (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (CategoryTheory.CategoryStruct.id (F.obj X)) (μ' Y Z)) (μ' X (CategoryTheory.MonoidalCategory.tensorObj Y Z))) := by aesop_cat) (left_unitality' : ∀ (X : C), (CategoryTheory.MonoidalCategory.leftUnitor (F.obj X)).hom = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom ε' (CategoryTheory.CategoryStruct.id (F.obj X))) (CategoryTheory.CategoryStruct.comp (μ' (𝟙_ C) X) (F.map (CategoryTheory.MonoidalCategory.leftUnitor X).hom)) := by aesop_cat) (right_unitality' : ∀ (X : C), (CategoryTheory.MonoidalCategory.rightUnitor (F.obj X)).hom = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (CategoryTheory.CategoryStruct.id (F.obj X)) ε') (CategoryTheory.CategoryStruct.comp (μ' X (𝟙_ C)) (F.map (CategoryTheory.MonoidalCategory.rightUnitor X).hom)) := by aesop_cat) : CategoryTheory.Functor.LaxMonoidal.μ F = μ'

instance CategoryTheory.Functor.LaxMonoidal.id {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] : (CategoryTheory.Functor.id C).LaxMonoidal

Equations

• One or more equations did not get rendered due to their size.

@[simp]

theorem CategoryTheory.Functor.LaxMonoidal.id_ε {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] : CategoryTheory.Functor.LaxMonoidal.ε (CategoryTheory.Functor.id C) = CategoryTheory.CategoryStruct.id (𝟙_ C)

@[simp]

theorem CategoryTheory.Functor.LaxMonoidal.id_μ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] (X Y : C) : CategoryTheory.Functor.LaxMonoidal.μ (CategoryTheory.Functor.id C) X Y = CategoryTheory.CategoryStruct.id (CategoryTheory.MonoidalCategory.tensorObj ((CategoryTheory.Functor.id C).obj X) ((CategoryTheory.Functor.id C).obj Y))

instance CategoryTheory.Functor.LaxMonoidal.comp {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor D E) [F.LaxMonoidal] [G.LaxMonoidal] : (F.comp G).LaxMonoidal

Equations

• One or more equations did not get rendered due to their size.

@[simp]

theorem CategoryTheory.Functor.LaxMonoidal.comp_ε {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor D E) [F.LaxMonoidal] [G.LaxMonoidal] : CategoryTheory.Functor.LaxMonoidal.ε (F.comp G) = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.ε G) (G.map (CategoryTheory.Functor.LaxMonoidal.ε F))

@[simp]

theorem CategoryTheory.Functor.LaxMonoidal.comp_μ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor D E) [F.LaxMonoidal] [G.LaxMonoidal] (X Y : C) : CategoryTheory.Functor.LaxMonoidal.μ (F.comp G) X Y = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ G (F.obj X) (F.obj Y)) (G.map (CategoryTheory.Functor.LaxMonoidal.μ F X Y))

class CategoryTheory.Functor.OplaxMonoidal {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) : Type (max u₁ v₂)

A functor F : C ⥤ D between monoidal categories is oplax monoidal if it is equipped with morphisms η : F.obj (𝟙_ C) ⟶ 𝟙 _D and δ X Y : F.obj (X ⊗ Y) ⟶ F.obj X ⊗ F.obj Y, satisfying the appropriate coherences.

• η' : F.obj (𝟙_ C) ⟶ 𝟙_ D

  counit morphism

• δ' : (X Y : C) → F.obj (CategoryTheory.MonoidalCategory.tensorObj X Y) ⟶ CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (F.obj Y)

  cotensorator

• δ'_natural_left : ∀ {X Y : C} (f : X ⟶ Y) (X' : C), CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ' X X') (CategoryTheory.MonoidalCategory.whiskerRight (F.map f) (F.obj X')) = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.whiskerRight f X')) (CategoryTheory.Functor.OplaxMonoidal.δ' Y X')
• δ'_natural_right : ∀ {X Y : C} (X' : C) (f : X ⟶ Y), CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ' X' X) (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X') (F.map f)) = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.whiskerLeft X' f)) (CategoryTheory.Functor.OplaxMonoidal.δ' X' Y)
• oplax_associativity' : ∀ (X Y Z : C), CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ' (CategoryTheory.MonoidalCategory.tensorObj X Y) Z) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.δ' X Y) (F.obj Z)) (CategoryTheory.MonoidalCategory.associator (F.obj X) (F.obj Y) (F.obj Z)).hom) = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.associator X Y Z).hom) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ' X (CategoryTheory.MonoidalCategory.tensorObj Y Z)) (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.OplaxMonoidal.δ' Y Z)))

  associativity of the tensorator

• oplax_left_unitality' : ∀ (X : C), (CategoryTheory.MonoidalCategory.leftUnitor (F.obj X)).inv = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.leftUnitor X).inv) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ' (𝟙_ C) X) (CategoryTheory.MonoidalCategory.whiskerRight CategoryTheory.Functor.OplaxMonoidal.η' (F.obj X)))
• oplax_right_unitality' : ∀ (X : C), (CategoryTheory.MonoidalCategory.rightUnitor (F.obj X)).inv = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.rightUnitor X).inv) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ' X (𝟙_ C)) (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) CategoryTheory.Functor.OplaxMonoidal.η'))

def CategoryTheory.Functor.OplaxMonoidal.η {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] : F.obj (𝟙_ C) ⟶ 𝟙_ D

the counit morphism of a lax monoidal functor

Equations

• CategoryTheory.Functor.OplaxMonoidal.η F = CategoryTheory.Functor.OplaxMonoidal.η'

def CategoryTheory.Functor.OplaxMonoidal.δ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] (X Y : C) : F.obj (CategoryTheory.MonoidalCategory.tensorObj X Y) ⟶ CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (F.obj Y)

the cotensorator of an oplax monoidal functor

Equations

• CategoryTheory.Functor.OplaxMonoidal.δ F X Y = CategoryTheory.Functor.OplaxMonoidal.δ' X Y

@[simp]

theorem CategoryTheory.Functor.OplaxMonoidal.δ_natural_left {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] {X Y : C} (f : X ⟶ Y) (X' : C) : CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X X') (CategoryTheory.MonoidalCategory.whiskerRight (F.map f) (F.obj X')) = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.whiskerRight f X')) (CategoryTheory.Functor.OplaxMonoidal.δ F Y X')

@[simp]

theorem CategoryTheory.Functor.OplaxMonoidal.δ_natural_left_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] {X Y : C} (f : X ⟶ Y) (X' : C) {Z : D} (h : CategoryTheory.MonoidalCategory.tensorObj (F.obj Y) (F.obj X') ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X X') (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (F.map f) (F.obj X')) h) = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.whiskerRight f X')) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F Y X') h)

@[simp]

theorem CategoryTheory.Functor.OplaxMonoidal.δ_natural_right {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] {X Y : C} (X' : C) (f : X ⟶ Y) : CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X' X) (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X') (F.map f)) = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.whiskerLeft X' f)) (CategoryTheory.Functor.OplaxMonoidal.δ F X' Y)

@[simp]

theorem CategoryTheory.Functor.OplaxMonoidal.δ_natural_right_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] {X Y : C} (X' : C) (f : X ⟶ Y) {Z : D} (h : CategoryTheory.MonoidalCategory.tensorObj (F.obj X') (F.obj Y) ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X' X) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X') (F.map f)) h) = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.whiskerLeft X' f)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X' Y) h)

@[simp]

theorem CategoryTheory.Functor.OplaxMonoidal.associativity {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] (X Y Z : C) : CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F (CategoryTheory.MonoidalCategory.tensorObj X Y) Z) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.δ F X Y) (F.obj Z)) (CategoryTheory.MonoidalCategory.associator (F.obj X) (F.obj Y) (F.obj Z)).hom) = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.associator X Y Z).hom) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X (CategoryTheory.MonoidalCategory.tensorObj Y Z)) (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.OplaxMonoidal.δ F Y Z)))

@[simp]

theorem CategoryTheory.Functor.OplaxMonoidal.associativity_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] (X Y Z : C) {Z✝ : D} (h : CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (CategoryTheory.MonoidalCategory.tensorObj (F.obj Y) (F.obj Z)) ⟶ Z✝) : CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F (CategoryTheory.MonoidalCategory.tensorObj X Y) Z) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.δ F X Y) (F.obj Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.associator (F.obj X) (F.obj Y) (F.obj Z)).hom h)) = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.associator X Y Z).hom) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X (CategoryTheory.MonoidalCategory.tensorObj Y Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.OplaxMonoidal.δ F Y Z)) h))

@[simp]

theorem CategoryTheory.Functor.OplaxMonoidal.left_unitality {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] (X : C) : (CategoryTheory.MonoidalCategory.leftUnitor (F.obj X)).inv = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.leftUnitor X).inv) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F (𝟙_ C) X) (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.η F) (F.obj X)))

theorem CategoryTheory.Functor.OplaxMonoidal.left_unitality_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] (X : C) {Z : D} (h : CategoryTheory.MonoidalCategory.tensorObj (𝟙_ D) (F.obj X) ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.leftUnitor (F.obj X)).inv h = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.leftUnitor X).inv) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F (𝟙_ C) X) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.η F) (F.obj X)) h))

@[simp]

theorem CategoryTheory.Functor.OplaxMonoidal.right_unitality {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] (X : C) : (CategoryTheory.MonoidalCategory.rightUnitor (F.obj X)).inv = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.rightUnitor X).inv) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X (𝟙_ C)) (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.OplaxMonoidal.η F)))

theorem CategoryTheory.Functor.OplaxMonoidal.right_unitality_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] (X : C) {Z : D} (h : CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (𝟙_ D) ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.rightUnitor (F.obj X)).inv h = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.rightUnitor X).inv) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X (𝟙_ C)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.OplaxMonoidal.η F)) h))

@[simp]

theorem CategoryTheory.Functor.OplaxMonoidal.δ_natural {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] {X Y X' Y' : C} (f : X ⟶ Y) (g : X' ⟶ Y') : CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X X') (CategoryTheory.MonoidalCategory.tensorHom (F.map f) (F.map g)) = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.tensorHom f g)) (CategoryTheory.Functor.OplaxMonoidal.δ F Y Y')

@[simp]

theorem CategoryTheory.Functor.OplaxMonoidal.δ_natural_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] {X Y X' Y' : C} (f : X ⟶ Y) (g : X' ⟶ Y') {Z : D} (h : CategoryTheory.MonoidalCategory.tensorObj (F.obj Y) (F.obj Y') ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X X') (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (F.map f) (F.map g)) h) = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.tensorHom f g)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F Y Y') h)

@[simp]

theorem CategoryTheory.Functor.OplaxMonoidal.left_unitality_hom {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] (X : C) : CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F (𝟙_ C) X) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.η F) (F.obj X)) (CategoryTheory.MonoidalCategory.leftUnitor (F.obj X)).hom) = F.map (CategoryTheory.MonoidalCategory.leftUnitor X).hom

@[simp]

theorem CategoryTheory.Functor.OplaxMonoidal.left_unitality_hom_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] (X : C) {Z : D} (h : F.obj X ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F (𝟙_ C) X) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.η F) (F.obj X)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.leftUnitor (F.obj X)).hom h)) = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.leftUnitor X).hom) h

@[simp]

theorem CategoryTheory.Functor.OplaxMonoidal.right_unitality_hom {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] (X : C) : CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X (𝟙_ C)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.OplaxMonoidal.η F)) (CategoryTheory.MonoidalCategory.rightUnitor (F.obj X)).hom) = F.map (CategoryTheory.MonoidalCategory.rightUnitor X).hom

@[simp]

theorem CategoryTheory.Functor.OplaxMonoidal.right_unitality_hom_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] (X : C) {Z : D} (h : F.obj X ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X (𝟙_ C)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.OplaxMonoidal.η F)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.rightUnitor (F.obj X)).hom h)) = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.rightUnitor X).hom) h

@[simp]

theorem CategoryTheory.Functor.OplaxMonoidal.associativity_inv {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] (X Y Z : C) : CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X (CategoryTheory.MonoidalCategory.tensorObj Y Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.OplaxMonoidal.δ F Y Z)) (CategoryTheory.MonoidalCategory.associator (F.obj X) (F.obj Y) (F.obj Z)).inv) = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.associator X Y Z).inv) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F (CategoryTheory.MonoidalCategory.tensorObj X Y) Z) (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.δ F X Y) (F.obj Z)))

@[simp]

theorem CategoryTheory.Functor.OplaxMonoidal.associativity_inv_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] (X Y Z : C) {Z✝ : D} (h : CategoryTheory.MonoidalCategory.tensorObj (CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (F.obj Y)) (F.obj Z) ⟶ Z✝) : CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X (CategoryTheory.MonoidalCategory.tensorObj Y Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.OplaxMonoidal.δ F Y Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.associator (F.obj X) (F.obj Y) (F.obj Z)).inv h)) = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.associator X Y Z).inv) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F (CategoryTheory.MonoidalCategory.tensorObj X Y) Z) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.δ F X Y) (F.obj Z)) h))

instance CategoryTheory.Functor.OplaxMonoidal.id {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] : (CategoryTheory.Functor.id C).OplaxMonoidal

Equations

• One or more equations did not get rendered due to their size.

@[simp]

theorem CategoryTheory.Functor.OplaxMonoidal.id_η {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] : CategoryTheory.Functor.OplaxMonoidal.η (CategoryTheory.Functor.id C) = CategoryTheory.CategoryStruct.id ((CategoryTheory.Functor.id C).obj (𝟙_ C))

@[simp]

theorem CategoryTheory.Functor.OplaxMonoidal.id_δ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] (X Y : C) : CategoryTheory.Functor.OplaxMonoidal.δ (CategoryTheory.Functor.id C) X Y = CategoryTheory.CategoryStruct.id ((CategoryTheory.Functor.id C).obj (CategoryTheory.MonoidalCategory.tensorObj X Y))

instance CategoryTheory.Functor.OplaxMonoidal.comp {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor D E) [F.OplaxMonoidal] [G.OplaxMonoidal] : (F.comp G).OplaxMonoidal

Equations

• One or more equations did not get rendered due to their size.

@[simp]

theorem CategoryTheory.Functor.OplaxMonoidal.comp_η {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor D E) [F.OplaxMonoidal] [G.OplaxMonoidal] : CategoryTheory.Functor.OplaxMonoidal.η (F.comp G) = CategoryTheory.CategoryStruct.comp (G.map (CategoryTheory.Functor.OplaxMonoidal.η F)) (CategoryTheory.Functor.OplaxMonoidal.η G)

@[simp]

theorem CategoryTheory.Functor.OplaxMonoidal.comp_δ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor D E) [F.OplaxMonoidal] [G.OplaxMonoidal] (X Y : C) : CategoryTheory.Functor.OplaxMonoidal.δ (F.comp G) X Y = CategoryTheory.CategoryStruct.comp (G.map (CategoryTheory.Functor.OplaxMonoidal.δ F X Y)) (CategoryTheory.Functor.OplaxMonoidal.δ G (F.obj X) (F.obj Y))

class CategoryTheory.Functor.Monoidal {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) extends F.LaxMonoidal, F.OplaxMonoidal : Type (max u₁ v₂)

A functor between monoidal categories is monoidal if it is lax and oplax monoidals, and both data give inverse isomorphisms.

• ε' : 𝟙_ D ⟶ F.obj (𝟙_ C)
• μ' : (X Y : C) → CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (F.obj Y) ⟶ F.obj (CategoryTheory.MonoidalCategory.tensorObj X Y)
• μ'_natural_left : ∀ {X Y : C} (f : X ⟶ Y) (X' : C), CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (F.map f) (F.obj X')) (CategoryTheory.Functor.LaxMonoidal.μ' Y X') = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ' X X') (F.map (CategoryTheory.MonoidalCategory.whiskerRight f X'))
• μ'_natural_right : ∀ {X Y : C} (X' : C) (f : X ⟶ Y), CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X') (F.map f)) (CategoryTheory.Functor.LaxMonoidal.μ' X' Y) = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ' X' X) (F.map (CategoryTheory.MonoidalCategory.whiskerLeft X' f))
• associativity' : ∀ (X Y Z : C), CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.μ' X Y) (F.obj Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ' (CategoryTheory.MonoidalCategory.tensorObj X Y) Z) (F.map (CategoryTheory.MonoidalCategory.associator X Y Z).hom)) = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.associator (F.obj X) (F.obj Y) (F.obj Z)).hom (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.LaxMonoidal.μ' Y Z)) (CategoryTheory.Functor.LaxMonoidal.μ' X (CategoryTheory.MonoidalCategory.tensorObj Y Z)))
• left_unitality' : ∀ (X : C), (CategoryTheory.MonoidalCategory.leftUnitor (F.obj X)).hom = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight CategoryTheory.Functor.LaxMonoidal.ε' (F.obj X)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ' (𝟙_ C) X) (F.map (CategoryTheory.MonoidalCategory.leftUnitor X).hom))
• right_unitality' : ∀ (X : C), (CategoryTheory.MonoidalCategory.rightUnitor (F.obj X)).hom = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) CategoryTheory.Functor.LaxMonoidal.ε') (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ' X (𝟙_ C)) (F.map (CategoryTheory.MonoidalCategory.rightUnitor X).hom))
• η' : F.obj (𝟙_ C) ⟶ 𝟙_ D
• δ' : (X Y : C) → F.obj (CategoryTheory.MonoidalCategory.tensorObj X Y) ⟶ CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (F.obj Y)
• δ'_natural_left : ∀ {X Y : C} (f : X ⟶ Y) (X' : C), CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ' X X') (CategoryTheory.MonoidalCategory.whiskerRight (F.map f) (F.obj X')) = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.whiskerRight f X')) (CategoryTheory.Functor.OplaxMonoidal.δ' Y X')
• δ'_natural_right : ∀ {X Y : C} (X' : C) (f : X ⟶ Y), CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ' X' X) (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X') (F.map f)) = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.whiskerLeft X' f)) (CategoryTheory.Functor.OplaxMonoidal.δ' X' Y)
• oplax_associativity' : ∀ (X Y Z : C), CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ' (CategoryTheory.MonoidalCategory.tensorObj X Y) Z) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.δ' X Y) (F.obj Z)) (CategoryTheory.MonoidalCategory.associator (F.obj X) (F.obj Y) (F.obj Z)).hom) = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.associator X Y Z).hom) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ' X (CategoryTheory.MonoidalCategory.tensorObj Y Z)) (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.OplaxMonoidal.δ' Y Z)))
• oplax_left_unitality' : ∀ (X : C), (CategoryTheory.MonoidalCategory.leftUnitor (F.obj X)).inv = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.leftUnitor X).inv) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ' (𝟙_ C) X) (CategoryTheory.MonoidalCategory.whiskerRight CategoryTheory.Functor.OplaxMonoidal.η' (F.obj X)))
• oplax_right_unitality' : ∀ (X : C), (CategoryTheory.MonoidalCategory.rightUnitor (F.obj X)).inv = CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.rightUnitor X).inv) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ' X (𝟙_ C)) (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) CategoryTheory.Functor.OplaxMonoidal.η'))
• ε_η : CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.ε F) (CategoryTheory.Functor.OplaxMonoidal.η F) = CategoryTheory.CategoryStruct.id (𝟙_ D)
• η_ε : CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.η F) (CategoryTheory.Functor.LaxMonoidal.ε F) = CategoryTheory.CategoryStruct.id (F.obj (𝟙_ C))
• μ_δ : ∀ (X Y : C), CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F X Y) (CategoryTheory.Functor.OplaxMonoidal.δ F X Y) = CategoryTheory.CategoryStruct.id (CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (F.obj Y))
• δ_μ : ∀ (X Y : C), CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X Y) (CategoryTheory.Functor.LaxMonoidal.μ F X Y) = CategoryTheory.CategoryStruct.id (F.obj (CategoryTheory.MonoidalCategory.tensorObj X Y))

@[simp]

theorem CategoryTheory.Functor.Monoidal.ε_η_assoc {C : Type u₁} {inst✝ : CategoryTheory.Category.{v₁, u₁} C} {inst✝¹ : CategoryTheory.MonoidalCategory C} {D : Type u₂} {inst✝² : CategoryTheory.Category.{v₂, u₂} D} {inst✝³ : CategoryTheory.MonoidalCategory D} {F : CategoryTheory.Functor C D} [self : F.Monoidal] {Z : D} (h : 𝟙_ D ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.ε F) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.η F) h) = h

@[simp]

theorem CategoryTheory.Functor.Monoidal.δ_μ_assoc {C : Type u₁} {inst✝ : CategoryTheory.Category.{v₁, u₁} C} {inst✝¹ : CategoryTheory.MonoidalCategory C} {D : Type u₂} {inst✝² : CategoryTheory.Category.{v₂, u₂} D} {inst✝³ : CategoryTheory.MonoidalCategory D} {F : CategoryTheory.Functor C D} [self : F.Monoidal] (X Y : C) {Z : D} (h : F.obj (CategoryTheory.MonoidalCategory.tensorObj X Y) ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X Y) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F X Y) h) = h

@[simp]

theorem CategoryTheory.Functor.Monoidal.μ_δ_assoc {C : Type u₁} {inst✝ : CategoryTheory.Category.{v₁, u₁} C} {inst✝¹ : CategoryTheory.MonoidalCategory C} {D : Type u₂} {inst✝² : CategoryTheory.Category.{v₂, u₂} D} {inst✝³ : CategoryTheory.MonoidalCategory D} {F : CategoryTheory.Functor C D} [self : F.Monoidal] (X Y : C) {Z : D} (h : CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (F.obj Y) ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F X Y) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X Y) h) = h

@[simp]

theorem CategoryTheory.Functor.Monoidal.η_ε_assoc {C : Type u₁} {inst✝ : CategoryTheory.Category.{v₁, u₁} C} {inst✝¹ : CategoryTheory.MonoidalCategory C} {D : Type u₂} {inst✝² : CategoryTheory.Category.{v₂, u₂} D} {inst✝³ : CategoryTheory.MonoidalCategory D} {F : CategoryTheory.Functor C D} [self : F.Monoidal] {Z : D} (h : F.obj (𝟙_ C) ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.η F) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.ε F) h) = h

def CategoryTheory.Functor.Monoidal.εIso {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] : 𝟙_ D ≅ F.obj (𝟙_ C)

The isomorphism 𝟙_ D ≅ F.obj (𝟙_ C) when F is a monoidal functor.

Equations

• CategoryTheory.Functor.Monoidal.εIso F = { hom := CategoryTheory.Functor.LaxMonoidal.ε F, inv := CategoryTheory.Functor.OplaxMonoidal.η F, hom_inv_id := ⋯, inv_hom_id := ⋯ }

@[simp]

theorem CategoryTheory.Functor.Monoidal.εIso_inv {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] : (CategoryTheory.Functor.Monoidal.εIso F).inv = CategoryTheory.Functor.OplaxMonoidal.η F

@[simp]

theorem CategoryTheory.Functor.Monoidal.εIso_hom {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] : (CategoryTheory.Functor.Monoidal.εIso F).hom = CategoryTheory.Functor.LaxMonoidal.ε F

def CategoryTheory.Functor.Monoidal.μIso {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X Y : C) : CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (F.obj Y) ≅ F.obj (CategoryTheory.MonoidalCategory.tensorObj X Y)

The isomorphism F.obj X ⊗ F.obj Y ≅ F.obj (X ⊗ Y) when F is a monoidal functor.

Equations

• CategoryTheory.Functor.Monoidal.μIso F X Y = { hom := CategoryTheory.Functor.LaxMonoidal.μ F X Y, inv := CategoryTheory.Functor.OplaxMonoidal.δ F X Y, hom_inv_id := ⋯, inv_hom_id := ⋯ }

@[simp]

theorem CategoryTheory.Functor.Monoidal.μIso_inv {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X Y : C) : (CategoryTheory.Functor.Monoidal.μIso F X Y).inv = CategoryTheory.Functor.OplaxMonoidal.δ F X Y

@[simp]

theorem CategoryTheory.Functor.Monoidal.μIso_hom {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X Y : C) : (CategoryTheory.Functor.Monoidal.μIso F X Y).hom = CategoryTheory.Functor.LaxMonoidal.μ F X Y

instance CategoryTheory.Functor.Monoidal.instIsIsoε {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] : CategoryTheory.IsIso (CategoryTheory.Functor.LaxMonoidal.ε F)

Equations

• ⋯ = ⋯

instance CategoryTheory.Functor.Monoidal.instIsIsoη {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] : CategoryTheory.IsIso (CategoryTheory.Functor.OplaxMonoidal.η F)

Equations

• ⋯ = ⋯

instance CategoryTheory.Functor.Monoidal.instIsIsoμ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X Y : C) : CategoryTheory.IsIso (CategoryTheory.Functor.LaxMonoidal.μ F X Y)

Equations

• ⋯ = ⋯

instance CategoryTheory.Functor.Monoidal.instIsIsoδ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X Y : C) : CategoryTheory.IsIso (CategoryTheory.Functor.OplaxMonoidal.δ F X Y)

Equations

• ⋯ = ⋯

@[simp]

theorem CategoryTheory.Functor.Monoidal.map_ε_η {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {C' : Type u₁'} [CategoryTheory.Category.{v₁', u₁'} C'] (F : CategoryTheory.Functor C D) [F.Monoidal] (G : CategoryTheory.Functor D C') : CategoryTheory.CategoryStruct.comp (G.map (CategoryTheory.Functor.LaxMonoidal.ε F)) (G.map (CategoryTheory.Functor.OplaxMonoidal.η F)) = CategoryTheory.CategoryStruct.id (G.obj (𝟙_ D))

@[simp]

theorem CategoryTheory.Functor.Monoidal.map_ε_η_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {C' : Type u₁'} [CategoryTheory.Category.{v₁', u₁'} C'] (F : CategoryTheory.Functor C D) [F.Monoidal] (G : CategoryTheory.Functor D C') {Z : C'} (h : G.obj (𝟙_ D) ⟶ Z) : CategoryTheory.CategoryStruct.comp (G.map (CategoryTheory.Functor.LaxMonoidal.ε F)) (CategoryTheory.CategoryStruct.comp (G.map (CategoryTheory.Functor.OplaxMonoidal.η F)) h) = h

@[simp]

theorem CategoryTheory.Functor.Monoidal.map_η_ε {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {C' : Type u₁'} [CategoryTheory.Category.{v₁', u₁'} C'] (F : CategoryTheory.Functor C D) [F.Monoidal] (G : CategoryTheory.Functor D C') : CategoryTheory.CategoryStruct.comp (G.map (CategoryTheory.Functor.OplaxMonoidal.η F)) (G.map (CategoryTheory.Functor.LaxMonoidal.ε F)) = CategoryTheory.CategoryStruct.id (G.obj (F.obj (𝟙_ C)))

@[simp]

theorem CategoryTheory.Functor.Monoidal.map_η_ε_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {C' : Type u₁'} [CategoryTheory.Category.{v₁', u₁'} C'] (F : CategoryTheory.Functor C D) [F.Monoidal] (G : CategoryTheory.Functor D C') {Z : C'} (h : G.obj (F.obj (𝟙_ C)) ⟶ Z) : CategoryTheory.CategoryStruct.comp (G.map (CategoryTheory.Functor.OplaxMonoidal.η F)) (CategoryTheory.CategoryStruct.comp (G.map (CategoryTheory.Functor.LaxMonoidal.ε F)) h) = h

@[simp]

theorem CategoryTheory.Functor.Monoidal.map_μ_δ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {C' : Type u₁'} [CategoryTheory.Category.{v₁', u₁'} C'] (F : CategoryTheory.Functor C D) [F.Monoidal] (G : CategoryTheory.Functor D C') (X Y : C) : CategoryTheory.CategoryStruct.comp (G.map (CategoryTheory.Functor.LaxMonoidal.μ F X Y)) (G.map (CategoryTheory.Functor.OplaxMonoidal.δ F X Y)) = CategoryTheory.CategoryStruct.id (G.obj (CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (F.obj Y)))

@[simp]

theorem CategoryTheory.Functor.Monoidal.map_μ_δ_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {C' : Type u₁'} [CategoryTheory.Category.{v₁', u₁'} C'] (F : CategoryTheory.Functor C D) [F.Monoidal] (G : CategoryTheory.Functor D C') (X Y : C) {Z : C'} (h : G.obj (CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (F.obj Y)) ⟶ Z) : CategoryTheory.CategoryStruct.comp (G.map (CategoryTheory.Functor.LaxMonoidal.μ F X Y)) (CategoryTheory.CategoryStruct.comp (G.map (CategoryTheory.Functor.OplaxMonoidal.δ F X Y)) h) = h

@[simp]

theorem CategoryTheory.Functor.Monoidal.map_δ_μ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {C' : Type u₁'} [CategoryTheory.Category.{v₁', u₁'} C'] (F : CategoryTheory.Functor C D) [F.Monoidal] (G : CategoryTheory.Functor D C') (X Y : C) : CategoryTheory.CategoryStruct.comp (G.map (CategoryTheory.Functor.OplaxMonoidal.δ F X Y)) (G.map (CategoryTheory.Functor.LaxMonoidal.μ F X Y)) = CategoryTheory.CategoryStruct.id (G.obj (F.obj (CategoryTheory.MonoidalCategory.tensorObj X Y)))

@[simp]

theorem CategoryTheory.Functor.Monoidal.map_δ_μ_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {C' : Type u₁'} [CategoryTheory.Category.{v₁', u₁'} C'] (F : CategoryTheory.Functor C D) [F.Monoidal] (G : CategoryTheory.Functor D C') (X Y : C) {Z : C'} (h : G.obj (F.obj (CategoryTheory.MonoidalCategory.tensorObj X Y)) ⟶ Z) : CategoryTheory.CategoryStruct.comp (G.map (CategoryTheory.Functor.OplaxMonoidal.δ F X Y)) (CategoryTheory.CategoryStruct.comp (G.map (CategoryTheory.Functor.LaxMonoidal.μ F X Y)) h) = h

@[simp]

theorem CategoryTheory.Functor.Monoidal.whiskerRight_ε_η {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (T : D) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.ε F) T) (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.η F) T) = CategoryTheory.CategoryStruct.id (CategoryTheory.MonoidalCategory.tensorObj (𝟙_ D) T)

@[simp]

theorem CategoryTheory.Functor.Monoidal.whiskerRight_ε_η_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (T : D) {Z : D} (h : CategoryTheory.MonoidalCategory.tensorObj (𝟙_ D) T ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.ε F) T) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.η F) T) h) = h

@[simp]

theorem CategoryTheory.Functor.Monoidal.whiskerRight_η_ε {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (T : D) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.η F) T) (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.ε F) T) = CategoryTheory.CategoryStruct.id (CategoryTheory.MonoidalCategory.tensorObj (F.obj (𝟙_ C)) T)

@[simp]

theorem CategoryTheory.Functor.Monoidal.whiskerRight_η_ε_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (T : D) {Z : D} (h : CategoryTheory.MonoidalCategory.tensorObj (F.obj (𝟙_ C)) T ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.η F) T) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.ε F) T) h) = h

@[simp]

theorem CategoryTheory.Functor.Monoidal.whiskerRight_μ_δ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X Y : C) (T : D) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.μ F X Y) T) (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.δ F X Y) T) = CategoryTheory.CategoryStruct.id (CategoryTheory.MonoidalCategory.tensorObj (CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (F.obj Y)) T)

@[simp]

theorem CategoryTheory.Functor.Monoidal.whiskerRight_μ_δ_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X Y : C) (T : D) {Z : D} (h : CategoryTheory.MonoidalCategory.tensorObj (CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (F.obj Y)) T ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.μ F X Y) T) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.δ F X Y) T) h) = h

@[simp]

theorem CategoryTheory.Functor.Monoidal.whiskerRight_δ_μ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X Y : C) (T : D) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.δ F X Y) T) (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.μ F X Y) T) = CategoryTheory.CategoryStruct.id (CategoryTheory.MonoidalCategory.tensorObj (F.obj (CategoryTheory.MonoidalCategory.tensorObj X Y)) T)

@[simp]

theorem CategoryTheory.Functor.Monoidal.whiskerRight_δ_μ_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X Y : C) (T : D) {Z : D} (h : CategoryTheory.MonoidalCategory.tensorObj (F.obj (CategoryTheory.MonoidalCategory.tensorObj X Y)) T ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.δ F X Y) T) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.μ F X Y) T) h) = h

@[simp]

theorem CategoryTheory.Functor.Monoidal.whiskerLeft_ε_η {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (T : D) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft T (CategoryTheory.Functor.LaxMonoidal.ε F)) (CategoryTheory.MonoidalCategory.whiskerLeft T (CategoryTheory.Functor.OplaxMonoidal.η F)) = CategoryTheory.CategoryStruct.id (CategoryTheory.MonoidalCategory.tensorObj T (𝟙_ D))

@[simp]

theorem CategoryTheory.Functor.Monoidal.whiskerLeft_ε_η_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (T : D) {Z : D} (h : CategoryTheory.MonoidalCategory.tensorObj T (𝟙_ D) ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft T (CategoryTheory.Functor.LaxMonoidal.ε F)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft T (CategoryTheory.Functor.OplaxMonoidal.η F)) h) = h

@[simp]

theorem CategoryTheory.Functor.Monoidal.whiskerLeft_η_ε {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (T : D) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft T (CategoryTheory.Functor.OplaxMonoidal.η F)) (CategoryTheory.MonoidalCategory.whiskerLeft T (CategoryTheory.Functor.LaxMonoidal.ε F)) = CategoryTheory.CategoryStruct.id (CategoryTheory.MonoidalCategory.tensorObj T (F.obj (𝟙_ C)))

@[simp]

theorem CategoryTheory.Functor.Monoidal.whiskerLeft_η_ε_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (T : D) {Z : D} (h : CategoryTheory.MonoidalCategory.tensorObj T (F.obj (𝟙_ C)) ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft T (CategoryTheory.Functor.OplaxMonoidal.η F)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft T (CategoryTheory.Functor.LaxMonoidal.ε F)) h) = h

@[simp]

theorem CategoryTheory.Functor.Monoidal.whiskerLeft_μ_δ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X Y : C) (T : D) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft T (CategoryTheory.Functor.LaxMonoidal.μ F X Y)) (CategoryTheory.MonoidalCategory.whiskerLeft T (CategoryTheory.Functor.OplaxMonoidal.δ F X Y)) = CategoryTheory.CategoryStruct.id (CategoryTheory.MonoidalCategory.tensorObj T (CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (F.obj Y)))

@[simp]

theorem CategoryTheory.Functor.Monoidal.whiskerLeft_μ_δ_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X Y : C) (T : D) {Z : D} (h : CategoryTheory.MonoidalCategory.tensorObj T (CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (F.obj Y)) ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft T (CategoryTheory.Functor.LaxMonoidal.μ F X Y)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft T (CategoryTheory.Functor.OplaxMonoidal.δ F X Y)) h) = h

@[simp]

theorem CategoryTheory.Functor.Monoidal.whiskerLeft_δ_μ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X Y : C) (T : D) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft T (CategoryTheory.Functor.OplaxMonoidal.δ F X Y)) (CategoryTheory.MonoidalCategory.whiskerLeft T (CategoryTheory.Functor.LaxMonoidal.μ F X Y)) = CategoryTheory.CategoryStruct.id (CategoryTheory.MonoidalCategory.tensorObj T (F.obj (CategoryTheory.MonoidalCategory.tensorObj X Y)))

@[simp]

theorem CategoryTheory.Functor.Monoidal.whiskerLeft_δ_μ_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X Y : C) (T : D) {Z : D} (h : CategoryTheory.MonoidalCategory.tensorObj T (F.obj (CategoryTheory.MonoidalCategory.tensorObj X Y)) ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft T (CategoryTheory.Functor.OplaxMonoidal.δ F X Y)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft T (CategoryTheory.Functor.LaxMonoidal.μ F X Y)) h) = h

theorem CategoryTheory.Functor.Monoidal.map_tensor {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] {X Y X' Y' : C} (f : X ⟶ Y) (g : X' ⟶ Y') : F.map (CategoryTheory.MonoidalCategory.tensorHom f g) = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X X') (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (F.map f) (F.map g)) (CategoryTheory.Functor.LaxMonoidal.μ F Y Y'))

theorem CategoryTheory.Functor.Monoidal.map_tensor_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] {X Y X' Y' : C} (f : X ⟶ Y) (g : X' ⟶ Y') {Z : D} (h : F.obj (CategoryTheory.MonoidalCategory.tensorObj Y Y') ⟶ Z) : CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.tensorHom f g)) h = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X X') (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (F.map f) (F.map g)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F Y Y') h))

theorem CategoryTheory.Functor.Monoidal.map_whiskerLeft {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X : C) {Y Z : C} (f : Y ⟶ Z) : F.map (CategoryTheory.MonoidalCategory.whiskerLeft X f) = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X Y) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (F.map f)) (CategoryTheory.Functor.LaxMonoidal.μ F X Z))

theorem CategoryTheory.Functor.Monoidal.map_whiskerLeft_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X : C) {Y Z : C} (f : Y ⟶ Z) {Z✝ : D} (h : F.obj (CategoryTheory.MonoidalCategory.tensorObj X Z) ⟶ Z✝) : CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.whiskerLeft X f)) h = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X Y) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (F.map f)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F X Z) h))

theorem CategoryTheory.Functor.Monoidal.map_whiskerRight {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] {X Y : C} (f : X ⟶ Y) (Z : C) : F.map (CategoryTheory.MonoidalCategory.whiskerRight f Z) = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X Z) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (F.map f) (F.obj Z)) (CategoryTheory.Functor.LaxMonoidal.μ F Y Z))

theorem CategoryTheory.Functor.Monoidal.map_whiskerRight_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] {X Y : C} (f : X ⟶ Y) (Z : C) {Z✝ : D} (h : F.obj (CategoryTheory.MonoidalCategory.tensorObj Y Z) ⟶ Z✝) : CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.whiskerRight f Z)) h = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X Z) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (F.map f) (F.obj Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F Y Z) h))

theorem CategoryTheory.Functor.Monoidal.map_associator {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X Y Z : C) : F.map (CategoryTheory.MonoidalCategory.associator X Y Z).hom = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F (CategoryTheory.MonoidalCategory.tensorObj X Y) Z) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.δ F X Y) (F.obj Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.associator (F.obj X) (F.obj Y) (F.obj Z)).hom (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.LaxMonoidal.μ F Y Z)) (CategoryTheory.Functor.LaxMonoidal.μ F X (CategoryTheory.MonoidalCategory.tensorObj Y Z)))))

theorem CategoryTheory.Functor.Monoidal.map_associator_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X Y Z : C) {Z✝ : D} (h : F.obj (CategoryTheory.MonoidalCategory.tensorObj X (CategoryTheory.MonoidalCategory.tensorObj Y Z)) ⟶ Z✝) : CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.associator X Y Z).hom) h = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F (CategoryTheory.MonoidalCategory.tensorObj X Y) Z) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.δ F X Y) (F.obj Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.associator (F.obj X) (F.obj Y) (F.obj Z)).hom (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.LaxMonoidal.μ F Y Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F X (CategoryTheory.MonoidalCategory.tensorObj Y Z)) h))))

theorem CategoryTheory.Functor.Monoidal.map_associator_inv {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X Y Z : C) : F.map (CategoryTheory.MonoidalCategory.associator X Y Z).inv = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X (CategoryTheory.MonoidalCategory.tensorObj Y Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.OplaxMonoidal.δ F Y Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.associator (F.obj X) (F.obj Y) (F.obj Z)).inv (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.μ F X Y) (F.obj Z)) (CategoryTheory.Functor.LaxMonoidal.μ F (CategoryTheory.MonoidalCategory.tensorObj X Y) Z))))

theorem CategoryTheory.Functor.Monoidal.map_associator_inv_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X Y Z : C) {Z✝ : D} (h : F.obj (CategoryTheory.MonoidalCategory.tensorObj (CategoryTheory.MonoidalCategory.tensorObj X Y) Z) ⟶ Z✝) : CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.associator X Y Z).inv) h = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X (CategoryTheory.MonoidalCategory.tensorObj Y Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.OplaxMonoidal.δ F Y Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.associator (F.obj X) (F.obj Y) (F.obj Z)).inv (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.μ F X Y) (F.obj Z)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F (CategoryTheory.MonoidalCategory.tensorObj X Y) Z) h))))

theorem CategoryTheory.Functor.Monoidal.map_leftUnitor {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X : C) : F.map (CategoryTheory.MonoidalCategory.leftUnitor X).hom = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F (𝟙_ C) X) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.η F) (F.obj X)) (CategoryTheory.MonoidalCategory.leftUnitor (F.obj X)).hom)

theorem CategoryTheory.Functor.Monoidal.map_leftUnitor_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X : C) {Z : D} (h : F.obj X ⟶ Z) : CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.leftUnitor X).hom) h = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F (𝟙_ C) X) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.OplaxMonoidal.η F) (F.obj X)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.leftUnitor (F.obj X)).hom h))

theorem CategoryTheory.Functor.Monoidal.map_leftUnitor_inv {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X : C) : F.map (CategoryTheory.MonoidalCategory.leftUnitor X).inv = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.leftUnitor (F.obj X)).inv (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.ε F) (F.obj X)) (CategoryTheory.Functor.LaxMonoidal.μ F (𝟙_ C) X))

theorem CategoryTheory.Functor.Monoidal.map_leftUnitor_inv_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X : C) {Z : D} (h : F.obj (CategoryTheory.MonoidalCategory.tensorObj (𝟙_ C) X) ⟶ Z) : CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.leftUnitor X).inv) h = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.leftUnitor (F.obj X)).inv (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (CategoryTheory.Functor.LaxMonoidal.ε F) (F.obj X)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F (𝟙_ C) X) h))

theorem CategoryTheory.Functor.Monoidal.map_rightUnitor {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X : C) : F.map (CategoryTheory.MonoidalCategory.rightUnitor X).hom = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X (𝟙_ C)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.OplaxMonoidal.η F)) (CategoryTheory.MonoidalCategory.rightUnitor (F.obj X)).hom)

theorem CategoryTheory.Functor.Monoidal.map_rightUnitor_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X : C) {Z : D} (h : F.obj X ⟶ Z) : CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.rightUnitor X).hom) h = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F X (𝟙_ C)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.OplaxMonoidal.η F)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.rightUnitor (F.obj X)).hom h))

theorem CategoryTheory.Functor.Monoidal.map_rightUnitor_inv {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X : C) : F.map (CategoryTheory.MonoidalCategory.rightUnitor X).inv = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.rightUnitor (F.obj X)).inv (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.LaxMonoidal.ε F)) (CategoryTheory.Functor.LaxMonoidal.μ F X (𝟙_ C)))

theorem CategoryTheory.Functor.Monoidal.map_rightUnitor_inv_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X : C) {Z : D} (h : F.obj (CategoryTheory.MonoidalCategory.tensorObj X (𝟙_ C)) ⟶ Z) : CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.rightUnitor X).inv) h = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.rightUnitor (F.obj X)).inv (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (CategoryTheory.Functor.LaxMonoidal.ε F)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ F X (𝟙_ C)) h))

noncomputable def CategoryTheory.Functor.Monoidal.μNatIso {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] : (F.prod F).comp (CategoryTheory.MonoidalCategory.tensor D) ≅ (CategoryTheory.MonoidalCategory.tensor C).comp F

The tensorator as a natural isomorphism.

Equations

• CategoryTheory.Functor.Monoidal.μNatIso F = CategoryTheory.NatIso.ofComponents (fun (x : C × C) => CategoryTheory.Functor.Monoidal.μIso F x.1 x.2) ⋯

@[simp]

theorem CategoryTheory.Functor.Monoidal.μNatIso_hom_app {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X : C × C) : (CategoryTheory.Functor.Monoidal.μNatIso F).hom.app X = CategoryTheory.Functor.LaxMonoidal.μ F X.1 X.2

@[simp]

theorem CategoryTheory.Functor.Monoidal.μNatIso_inv_app {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X : C × C) : (CategoryTheory.Functor.Monoidal.μNatIso F).inv.app X = CategoryTheory.Functor.OplaxMonoidal.δ F X.1 X.2

noncomputable def CategoryTheory.Functor.Monoidal.commTensorLeft {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X : C) : F.comp (CategoryTheory.MonoidalCategory.tensorLeft (F.obj X)) ≅ (CategoryTheory.MonoidalCategory.tensorLeft X).comp F

Monoidal functors commute with left tensoring up to isomorphism

Equations

• CategoryTheory.Functor.Monoidal.commTensorLeft F X = CategoryTheory.NatIso.ofComponents (fun (Y : C) => CategoryTheory.Functor.Monoidal.μIso F X Y) ⋯

@[simp]

theorem CategoryTheory.Functor.Monoidal.commTensorLeft_hom_app {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X X✝ : C) : (CategoryTheory.Functor.Monoidal.commTensorLeft F X).hom.app X✝ = CategoryTheory.Functor.LaxMonoidal.μ F X X✝

@[simp]

theorem CategoryTheory.Functor.Monoidal.commTensorLeft_inv_app {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X X✝ : C) : (CategoryTheory.Functor.Monoidal.commTensorLeft F X).inv.app X✝ = CategoryTheory.Functor.OplaxMonoidal.δ F X X✝

noncomputable def CategoryTheory.Functor.Monoidal.commTensorRight {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X : C) : F.comp (CategoryTheory.MonoidalCategory.tensorRight (F.obj X)) ≅ (CategoryTheory.MonoidalCategory.tensorRight X).comp F

Monoidal functors commute with right tensoring up to isomorphism

Equations

• CategoryTheory.Functor.Monoidal.commTensorRight F X = CategoryTheory.NatIso.ofComponents (fun (Y : C) => CategoryTheory.Functor.Monoidal.μIso F Y X) ⋯

@[simp]

theorem CategoryTheory.Functor.Monoidal.commTensorRight_hom_app {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X X✝ : C) : (CategoryTheory.Functor.Monoidal.commTensorRight F X).hom.app X✝ = CategoryTheory.Functor.LaxMonoidal.μ F X✝ X

@[simp]

theorem CategoryTheory.Functor.Monoidal.commTensorRight_inv_app {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.Monoidal] (X X✝ : C) : (CategoryTheory.Functor.Monoidal.commTensorRight F X).inv.app X✝ = CategoryTheory.Functor.OplaxMonoidal.δ F X✝ X

instance CategoryTheory.Functor.Monoidal.instId {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] : (CategoryTheory.Functor.id C).Monoidal

Equations

• CategoryTheory.Functor.Monoidal.instId = CategoryTheory.Functor.Monoidal.mk ⋯ ⋯ ⋯ ⋯

instance CategoryTheory.Functor.Monoidal.instComp {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor D E) [F.Monoidal] [G.Monoidal] : (F.comp G).Monoidal

Equations

• CategoryTheory.Functor.Monoidal.instComp F G = CategoryTheory.Functor.Monoidal.mk ⋯ ⋯ ⋯ ⋯

structure CategoryTheory.Functor.CoreMonoidal {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) : Type (max u₁ v₂)

Structure which is a helper in order to show that a functor is monoidal. It consists of isomorphisms εIso and μIso such that the morphisms .hom induced by these isomorphisms satisfy the axioms of lax monoidal functors.

• εIso : 𝟙_ D ≅ F.obj (𝟙_ C)

  unit morphism

• μIso : (X Y : C) → CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (F.obj Y) ≅ F.obj (CategoryTheory.MonoidalCategory.tensorObj X Y)

  tensorator

• μIso_hom_natural_left : ∀ {X Y : C} (f : X ⟶ Y) (X' : C), CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (F.map f) (F.obj X')) (self.μIso Y X').hom = CategoryTheory.CategoryStruct.comp (self.μIso X X').hom (F.map (CategoryTheory.MonoidalCategory.whiskerRight f X'))
• μIso_hom_natural_right : ∀ {X Y : C} (X' : C) (f : X ⟶ Y), CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X') (F.map f)) (self.μIso X' Y).hom = CategoryTheory.CategoryStruct.comp (self.μIso X' X).hom (F.map (CategoryTheory.MonoidalCategory.whiskerLeft X' f))
• associativity : ∀ (X Y Z : C), CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (self.μIso X Y).hom (F.obj Z)) (CategoryTheory.CategoryStruct.comp (self.μIso (CategoryTheory.MonoidalCategory.tensorObj X Y) Z).hom (F.map (CategoryTheory.MonoidalCategory.associator X Y Z).hom)) = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.associator (F.obj X) (F.obj Y) (F.obj Z)).hom (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (self.μIso Y Z).hom) (self.μIso X (CategoryTheory.MonoidalCategory.tensorObj Y Z)).hom)

  associativity of the tensorator

• left_unitality : ∀ (X : C), (CategoryTheory.MonoidalCategory.leftUnitor (F.obj X)).hom = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight self.εIso.hom (F.obj X)) (CategoryTheory.CategoryStruct.comp (self.μIso (𝟙_ C) X).hom (F.map (CategoryTheory.MonoidalCategory.leftUnitor X).hom))
• right_unitality : ∀ (X : C), (CategoryTheory.MonoidalCategory.rightUnitor (F.obj X)).hom = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) self.εIso.hom) (CategoryTheory.CategoryStruct.comp (self.μIso X (𝟙_ C)).hom (F.map (CategoryTheory.MonoidalCategory.rightUnitor X).hom))

@[simp]

theorem CategoryTheory.Functor.CoreMonoidal.μIso_hom_natural_right_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} (self : F.CoreMonoidal) {X Y : C} (X' : C) (f : X ⟶ Y) {Z : D} (h : F.obj (CategoryTheory.MonoidalCategory.tensorObj X' Y) ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X') (F.map f)) (CategoryTheory.CategoryStruct.comp (self.μIso X' Y).hom h) = CategoryTheory.CategoryStruct.comp (self.μIso X' X).hom (CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.whiskerLeft X' f)) h)

@[simp]

theorem CategoryTheory.Functor.CoreMonoidal.associativity_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} (self : F.CoreMonoidal) (X Y Z : C) {Z✝ : D} (h : F.obj (CategoryTheory.MonoidalCategory.tensorObj X (CategoryTheory.MonoidalCategory.tensorObj Y Z)) ⟶ Z✝) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (self.μIso X Y).hom (F.obj Z)) (CategoryTheory.CategoryStruct.comp (self.μIso (CategoryTheory.MonoidalCategory.tensorObj X Y) Z).hom (CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.associator X Y Z).hom) h)) = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.associator (F.obj X) (F.obj Y) (F.obj Z)).hom (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) (self.μIso Y Z).hom) (CategoryTheory.CategoryStruct.comp (self.μIso X (CategoryTheory.MonoidalCategory.tensorObj Y Z)).hom h))

@[simp]

theorem CategoryTheory.Functor.CoreMonoidal.μIso_hom_natural_left_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} (self : F.CoreMonoidal) {X Y : C} (f : X ⟶ Y) (X' : C) {Z : D} (h : F.obj (CategoryTheory.MonoidalCategory.tensorObj Y X') ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight (F.map f) (F.obj X')) (CategoryTheory.CategoryStruct.comp (self.μIso Y X').hom h) = CategoryTheory.CategoryStruct.comp (self.μIso X X').hom (CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.whiskerRight f X')) h)

theorem CategoryTheory.Functor.CoreMonoidal.right_unitality_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} (self : F.CoreMonoidal) (X : C) {Z : D} (h : F.obj X ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.rightUnitor (F.obj X)).hom h = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerLeft (F.obj X) self.εIso.hom) (CategoryTheory.CategoryStruct.comp (self.μIso X (𝟙_ C)).hom (CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.rightUnitor X).hom) h))

theorem CategoryTheory.Functor.CoreMonoidal.left_unitality_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} (self : F.CoreMonoidal) (X : C) {Z : D} (h : F.obj X ⟶ Z) : CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.leftUnitor (F.obj X)).hom h = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.whiskerRight self.εIso.hom (F.obj X)) (CategoryTheory.CategoryStruct.comp (self.μIso (𝟙_ C) X).hom (CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.MonoidalCategory.leftUnitor X).hom) h))

def CategoryTheory.Functor.CoreMonoidal.toLaxMonoidal {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} (h : F.CoreMonoidal) : F.LaxMonoidal

The lax monoidal functor structure induced by a Functor.CoreMonoidal structure.

Equations

• h.toLaxMonoidal = { ε' := h.εIso.hom, μ' := fun (X Y : C) => (h.μIso X Y).hom, μ'_natural_left := ⋯, μ'_natural_right := ⋯, associativity' := ⋯, left_unitality' := ⋯, right_unitality' := ⋯ }

theorem CategoryTheory.Functor.CoreMonoidal.toLaxMonoidal_ε {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} (h : F.CoreMonoidal) : CategoryTheory.Functor.LaxMonoidal.ε F = h.εIso.hom

theorem CategoryTheory.Functor.CoreMonoidal.toLaxMonoidal_μ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} (h : F.CoreMonoidal) (X Y : C) : CategoryTheory.Functor.LaxMonoidal.μ F X Y = (h.μIso X Y).hom

def CategoryTheory.Functor.CoreMonoidal.toOplaxMonoidal {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} (h : F.CoreMonoidal) : F.OplaxMonoidal

The oplax monoidal functor structure induced by a Functor.CoreMonoidal structure.

Equations

• One or more equations did not get rendered due to their size.

theorem CategoryTheory.Functor.CoreMonoidal.toOplaxMonoidal_η {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} (h : F.CoreMonoidal) : CategoryTheory.Functor.OplaxMonoidal.η F = h.εIso.inv

theorem CategoryTheory.Functor.CoreMonoidal.toOplaxMonoidal_δ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} (h : F.CoreMonoidal) (X Y : C) : CategoryTheory.Functor.OplaxMonoidal.δ F X Y = (h.μIso X Y).inv

def CategoryTheory.Functor.CoreMonoidal.toMonoidal {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} (h : F.CoreMonoidal) : F.Monoidal

The monoidal functor structure induced by a Functor.CoreMonoidal structure.

Equations

• h.toMonoidal = CategoryTheory.Functor.Monoidal.mk ⋯ ⋯ ⋯ ⋯

@[simp]

theorem CategoryTheory.Functor.CoreMonoidal.toMonoidal_toOplaxMonoidal {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} (h : F.CoreMonoidal) : CategoryTheory.Functor.Monoidal.toOplaxMonoidal = h.toOplaxMonoidal

@[simp]

theorem CategoryTheory.Functor.CoreMonoidal.toMonoidal_toLaxMonoidal {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} (h : F.CoreMonoidal) : CategoryTheory.Functor.Monoidal.toLaxMonoidal = h.toLaxMonoidal

noncomputable def CategoryTheory.Functor.CoreMonoidal.ofLaxMonoidal {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] [CategoryTheory.IsIso (CategoryTheory.Functor.LaxMonoidal.ε F)] [∀ (X Y : C), CategoryTheory.IsIso (CategoryTheory.Functor.LaxMonoidal.μ F X Y)] : F.CoreMonoidal

The Functor.CoreMonoidal structure given by a lax monoidal functor such that ε and μ are isomorphisms.

Equations

• One or more equations did not get rendered due to their size.

noncomputable def CategoryTheory.Functor.CoreMonoidal.ofOplaxMonoidal {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] [CategoryTheory.IsIso (CategoryTheory.Functor.OplaxMonoidal.η F)] [∀ (X Y : C), CategoryTheory.IsIso (CategoryTheory.Functor.OplaxMonoidal.δ F X Y)] : F.CoreMonoidal

The Functor.CoreMonoidal structure given by an oplax monoidal functor such that η and δ are isomorphisms.

Equations

• One or more equations did not get rendered due to their size.

noncomputable def CategoryTheory.Functor.Monoidal.ofLaxMonoidal {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] [CategoryTheory.IsIso (CategoryTheory.Functor.LaxMonoidal.ε F)] [∀ (X Y : C), CategoryTheory.IsIso (CategoryTheory.Functor.LaxMonoidal.μ F X Y)] : F.Monoidal

The Functor.Monoidal structure given by a lax monoidal functor such that ε and μ are isomorphisms.

Equations

• CategoryTheory.Functor.Monoidal.ofLaxMonoidal F = (CategoryTheory.Functor.CoreMonoidal.ofLaxMonoidal F).toMonoidal

noncomputable def CategoryTheory.Functor.Monoidal.ofOplaxMonoidal {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.OplaxMonoidal] [CategoryTheory.IsIso (CategoryTheory.Functor.OplaxMonoidal.η F)] [∀ (X Y : C), CategoryTheory.IsIso (CategoryTheory.Functor.OplaxMonoidal.δ F X Y)] : F.Monoidal

The Functor.Monoidal structure given by an oplax monoidal functor such that η and δ are isomorphisms.

Equations

• CategoryTheory.Functor.Monoidal.ofOplaxMonoidal F = (CategoryTheory.Functor.CoreMonoidal.ofOplaxMonoidal F).toMonoidal

instance CategoryTheory.Functor.instLaxMonoidalProdProd {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] {C' : Type u₁'} [CategoryTheory.Category.{v₁', u₁'} C'] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor E C') [CategoryTheory.MonoidalCategory C'] [F.LaxMonoidal] [G.LaxMonoidal] : (F.prod G).LaxMonoidal

Equations

• One or more equations did not get rendered due to their size.

@[simp]

theorem CategoryTheory.Functor.prod_ε_fst {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] {C' : Type u₁'} [CategoryTheory.Category.{v₁', u₁'} C'] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor E C') [CategoryTheory.MonoidalCategory C'] [F.LaxMonoidal] [G.LaxMonoidal] : (CategoryTheory.Functor.LaxMonoidal.ε (F.prod G)).1 = CategoryTheory.Functor.LaxMonoidal.ε F

@[simp]

theorem CategoryTheory.Functor.prod_ε_snd {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] {C' : Type u₁'} [CategoryTheory.Category.{v₁', u₁'} C'] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor E C') [CategoryTheory.MonoidalCategory C'] [F.LaxMonoidal] [G.LaxMonoidal] : (CategoryTheory.Functor.LaxMonoidal.ε (F.prod G)).2 = CategoryTheory.Functor.LaxMonoidal.ε G

@[simp]

theorem CategoryTheory.Functor.prod_μ_fst {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] {C' : Type u₁'} [CategoryTheory.Category.{v₁', u₁'} C'] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor E C') [CategoryTheory.MonoidalCategory C'] [F.LaxMonoidal] [G.LaxMonoidal] (X Y : C × E) : (CategoryTheory.Functor.LaxMonoidal.μ (F.prod G) X Y).1 = CategoryTheory.Functor.LaxMonoidal.μ F X.1 Y.1

@[simp]

theorem CategoryTheory.Functor.prod_μ_snd {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] {C' : Type u₁'} [CategoryTheory.Category.{v₁', u₁'} C'] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor E C') [CategoryTheory.MonoidalCategory C'] [F.LaxMonoidal] [G.LaxMonoidal] (X Y : C × E) : (CategoryTheory.Functor.LaxMonoidal.μ (F.prod G) X Y).2 = CategoryTheory.Functor.LaxMonoidal.μ G X.2 Y.2

instance CategoryTheory.Functor.instOplaxMonoidalProdProd {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] {C' : Type u₁'} [CategoryTheory.Category.{v₁', u₁'} C'] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor E C') [CategoryTheory.MonoidalCategory C'] [F.OplaxMonoidal] [G.OplaxMonoidal] : (F.prod G).OplaxMonoidal

Equations

• One or more equations did not get rendered due to their size.

@[simp]

theorem CategoryTheory.Functor.prod_η_fst {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] {C' : Type u₁'} [CategoryTheory.Category.{v₁', u₁'} C'] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor E C') [CategoryTheory.MonoidalCategory C'] [F.OplaxMonoidal] [G.OplaxMonoidal] : (CategoryTheory.Functor.OplaxMonoidal.η (F.prod G)).1 = CategoryTheory.Functor.OplaxMonoidal.η F

@[simp]

theorem CategoryTheory.Functor.prod_η_snd {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] {C' : Type u₁'} [CategoryTheory.Category.{v₁', u₁'} C'] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor E C') [CategoryTheory.MonoidalCategory C'] [F.OplaxMonoidal] [G.OplaxMonoidal] : (CategoryTheory.Functor.OplaxMonoidal.η (F.prod G)).2 = CategoryTheory.Functor.OplaxMonoidal.η G

@[simp]

theorem CategoryTheory.Functor.prod_δ_fst {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] {C' : Type u₁'} [CategoryTheory.Category.{v₁', u₁'} C'] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor E C') [CategoryTheory.MonoidalCategory C'] [F.OplaxMonoidal] [G.OplaxMonoidal] (X Y : C × E) : (CategoryTheory.Functor.OplaxMonoidal.δ (F.prod G) X Y).1 = CategoryTheory.Functor.OplaxMonoidal.δ F X.1 Y.1

@[simp]

theorem CategoryTheory.Functor.prod_δ_snd {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] {C' : Type u₁'} [CategoryTheory.Category.{v₁', u₁'} C'] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor E C') [CategoryTheory.MonoidalCategory C'] [F.OplaxMonoidal] [G.OplaxMonoidal] (X Y : C × E) : (CategoryTheory.Functor.OplaxMonoidal.δ (F.prod G) X Y).2 = CategoryTheory.Functor.OplaxMonoidal.δ G X.2 Y.2

instance CategoryTheory.Functor.instMonoidalProdProd {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] {C' : Type u₁'} [CategoryTheory.Category.{v₁', u₁'} C'] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor E C') [CategoryTheory.MonoidalCategory C'] [F.Monoidal] [G.Monoidal] : (F.prod G).Monoidal

Equations

• F.instMonoidalProdProd G = CategoryTheory.Functor.Monoidal.mk ⋯ ⋯ ⋯ ⋯

instance CategoryTheory.Functor.instMonoidalProdDiag {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] : (CategoryTheory.Functor.diag C).Monoidal

Equations

• One or more equations did not get rendered due to their size.

@[simp]

theorem CategoryTheory.Functor.diag_ε {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] : CategoryTheory.Functor.LaxMonoidal.ε (CategoryTheory.Functor.diag C) = CategoryTheory.CategoryStruct.id (𝟙_ (C × C))

@[simp]

theorem CategoryTheory.Functor.diag_η {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] : CategoryTheory.Functor.OplaxMonoidal.η (CategoryTheory.Functor.diag C) = CategoryTheory.CategoryStruct.id ((CategoryTheory.Functor.diag C).obj (𝟙_ C))

@[simp]

theorem CategoryTheory.Functor.diag_μ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] (X Y : C) : CategoryTheory.Functor.LaxMonoidal.μ (CategoryTheory.Functor.diag C) X Y = CategoryTheory.CategoryStruct.id (CategoryTheory.MonoidalCategory.tensorObj ((CategoryTheory.Functor.diag C).obj X) ((CategoryTheory.Functor.diag C).obj Y))

@[simp]

theorem CategoryTheory.Functor.diag_δ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] (X Y : C) : CategoryTheory.Functor.OplaxMonoidal.δ (CategoryTheory.Functor.diag C) X Y = CategoryTheory.CategoryStruct.id ((CategoryTheory.Functor.diag C).obj (CategoryTheory.MonoidalCategory.tensorObj X Y))

instance CategoryTheory.Functor.LaxMonoidal.prod' {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor C E) [F.LaxMonoidal] [G.LaxMonoidal] : (F.prod' G).LaxMonoidal

The functor C ⥤ D × E obtained from two lax monoidal functors is lax monoidal.

Equations

• CategoryTheory.Functor.LaxMonoidal.prod' F G = inferInstanceAs ((CategoryTheory.Functor.diag C).comp (F.prod G)).LaxMonoidal

@[simp]

theorem CategoryTheory.Functor.prod'_ε_fst {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor C E) [F.LaxMonoidal] [G.LaxMonoidal] : (CategoryTheory.Functor.LaxMonoidal.ε (F.prod' G)).1 = CategoryTheory.Functor.LaxMonoidal.ε F

@[simp]

theorem CategoryTheory.Functor.prod'_ε_snd {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor C E) [F.LaxMonoidal] [G.LaxMonoidal] : (CategoryTheory.Functor.LaxMonoidal.ε (F.prod' G)).2 = CategoryTheory.Functor.LaxMonoidal.ε G

@[simp]

theorem CategoryTheory.Functor.prod'_μ_fst {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor C E) [F.LaxMonoidal] [G.LaxMonoidal] (X Y : C) : (CategoryTheory.Functor.LaxMonoidal.μ (F.prod' G) X Y).1 = CategoryTheory.Functor.LaxMonoidal.μ F X Y

@[simp]

theorem CategoryTheory.Functor.prod'_μ_snd {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor C E) [F.LaxMonoidal] [G.LaxMonoidal] (X Y : C) : (CategoryTheory.Functor.LaxMonoidal.μ (F.prod' G) X Y).2 = CategoryTheory.Functor.LaxMonoidal.μ G X Y

instance CategoryTheory.Functor.OplaxMonoidal.prod' {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor C E) [F.OplaxMonoidal] [G.OplaxMonoidal] : (F.prod' G).OplaxMonoidal

The functor C ⥤ D × E obtained from two oplax monoidal functors is oplax monoidal.

Equations

• CategoryTheory.Functor.OplaxMonoidal.prod' F G = inferInstanceAs ((CategoryTheory.Functor.diag C).comp (F.prod G)).OplaxMonoidal

@[simp]

theorem CategoryTheory.Functor.prod'_η_fst {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor C E) [F.OplaxMonoidal] [G.OplaxMonoidal] : (CategoryTheory.Functor.OplaxMonoidal.η (F.prod' G)).1 = CategoryTheory.Functor.OplaxMonoidal.η F

@[simp]

theorem CategoryTheory.Functor.prod'_η_snd {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor C E) [F.OplaxMonoidal] [G.OplaxMonoidal] : (CategoryTheory.Functor.OplaxMonoidal.η (F.prod' G)).2 = CategoryTheory.Functor.OplaxMonoidal.η G

@[simp]

theorem CategoryTheory.Functor.prod'_δ_fst {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor C E) [F.OplaxMonoidal] [G.OplaxMonoidal] (X Y : C) : (CategoryTheory.Functor.OplaxMonoidal.δ (F.prod' G) X Y).1 = CategoryTheory.Functor.OplaxMonoidal.δ F X Y

@[simp]

theorem CategoryTheory.Functor.prod'_δ_snd {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor C E) [F.OplaxMonoidal] [G.OplaxMonoidal] (X Y : C) : (CategoryTheory.Functor.OplaxMonoidal.δ (F.prod' G) X Y).2 = CategoryTheory.Functor.OplaxMonoidal.δ G X Y

@[simp]

theorem CategoryTheory.Functor.prod_comp_fst {C : Type u_1} {D : Type u_2} [CategoryTheory.Category.{u_3, u_1} C] [CategoryTheory.Category.{u_4, u_2} D] {X Y Z : C × D} (f : X ⟶ Y) (g : Y ⟶ Z) : (CategoryTheory.CategoryStruct.comp f g).1 = CategoryTheory.CategoryStruct.comp f.1 g.1

theorem CategoryTheory.Functor.prod_comp_fst_assoc {C : Type u_1} {D : Type u_2} [CategoryTheory.Category.{u_3, u_1} C] [CategoryTheory.Category.{u_4, u_2} D] {X Y Z : C × D} (f : X ⟶ Y) (g : Y ⟶ Z) {Z✝ : C} (h : Z.1 ⟶ Z✝) : CategoryTheory.CategoryStruct.comp (CategoryTheory.CategoryStruct.comp f g).1 h = CategoryTheory.CategoryStruct.comp f.1 (CategoryTheory.CategoryStruct.comp g.1 h)

@[simp]

theorem CategoryTheory.Functor.prod_comp_snd {C : Type u_1} {D : Type u_2} [CategoryTheory.Category.{u_3, u_1} C] [CategoryTheory.Category.{u_4, u_2} D] {X Y Z : C × D} (f : X ⟶ Y) (g : Y ⟶ Z) : (CategoryTheory.CategoryStruct.comp f g).2 = CategoryTheory.CategoryStruct.comp f.2 g.2

theorem CategoryTheory.Functor.prod_comp_snd_assoc {C : Type u_1} {D : Type u_2} [CategoryTheory.Category.{u_3, u_1} C] [CategoryTheory.Category.{u_4, u_2} D] {X Y Z : C × D} (f : X ⟶ Y) (g : Y ⟶ Z) {Z✝ : D} (h : Z.2 ⟶ Z✝) : CategoryTheory.CategoryStruct.comp (CategoryTheory.CategoryStruct.comp f g).2 h = CategoryTheory.CategoryStruct.comp f.2 (CategoryTheory.CategoryStruct.comp g.2 h)

instance CategoryTheory.Functor.Monoidal.prod' {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {E : Type u₃} [CategoryTheory.Category.{v₃, u₃} E] [CategoryTheory.MonoidalCategory E] (F : CategoryTheory.Functor C D) (G : CategoryTheory.Functor C E) [F.Monoidal] [G.Monoidal] : (F.prod' G).Monoidal

The functor C ⥤ D × E obtained from two monoidal functors is monoidal.

Equations

• CategoryTheory.Functor.Monoidal.prod' F G = CategoryTheory.Functor.Monoidal.mk ⋯ ⋯ ⋯ ⋯

def CategoryTheory.Adjunction.rightAdjointLaxMonoidal {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} {G : CategoryTheory.Functor D C} (adj : F ⊣ G) [F.OplaxMonoidal] : G.LaxMonoidal

The right adjoint of an oplax monoidal functor is lax monoidal.

Equations

• One or more equations did not get rendered due to their size.

theorem CategoryTheory.Adjunction.rightAdjointLaxMonoidal_ε {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} {G : CategoryTheory.Functor D C} (adj : F ⊣ G) [F.OplaxMonoidal] : CategoryTheory.Functor.LaxMonoidal.ε G = (adj.homEquiv (𝟙_ C) (𝟙_ D)) (CategoryTheory.Functor.OplaxMonoidal.η F)

theorem CategoryTheory.Adjunction.rightAdjointLaxMonoidal_μ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} {G : CategoryTheory.Functor D C} (adj : F ⊣ G) [F.OplaxMonoidal] (X Y : D) : CategoryTheory.Functor.LaxMonoidal.μ G X Y = (adj.homEquiv (CategoryTheory.MonoidalCategory.tensorObj (G.obj X) (G.obj Y)) (CategoryTheory.MonoidalCategory.tensorObj ((CategoryTheory.Functor.id D).obj X) ((CategoryTheory.Functor.id D).obj Y))) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F (G.obj X) (G.obj Y)) (CategoryTheory.MonoidalCategory.tensorHom (adj.counit.app X) (adj.counit.app Y)))

class CategoryTheory.Adjunction.IsMonoidal {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} {G : CategoryTheory.Functor D C} (adj : F ⊣ G) [F.OplaxMonoidal] [G.LaxMonoidal] : Prop

When adj : F ⊣ G is an adjunction, with F oplax monoidal and G monoidal, this typeclass expresses compatibilities between the adjunction and the (op)lax monoidal structures.

• leftAdjoint_ε : CategoryTheory.Functor.LaxMonoidal.ε G = (adj.homEquiv (𝟙_ C) (𝟙_ D)) (CategoryTheory.Functor.OplaxMonoidal.η F)
• leftAdjoint_μ : ∀ (X Y : D), CategoryTheory.Functor.LaxMonoidal.μ G X Y = (adj.homEquiv (CategoryTheory.MonoidalCategory.tensorObj (G.obj X) (G.obj Y)) (CategoryTheory.MonoidalCategory.tensorObj ((CategoryTheory.Functor.id D).obj X) ((CategoryTheory.Functor.id D).obj Y))) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F (G.obj X) (G.obj Y)) (CategoryTheory.MonoidalCategory.tensorHom (adj.counit.app X) (adj.counit.app Y)))

instance CategoryTheory.Adjunction.instIsMonoidal {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} {G : CategoryTheory.Functor D C} (adj : F ⊣ G) [F.OplaxMonoidal] : adj.IsMonoidal

Equations

• ⋯ = ⋯

theorem CategoryTheory.Adjunction.unit_app_unit_comp_map_η {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} {G : CategoryTheory.Functor D C} (adj : F ⊣ G) [F.OplaxMonoidal] [G.LaxMonoidal] [adj.IsMonoidal] : CategoryTheory.CategoryStruct.comp (adj.unit.app (𝟙_ C)) (G.map (CategoryTheory.Functor.OplaxMonoidal.η F)) = CategoryTheory.Functor.LaxMonoidal.ε G

theorem CategoryTheory.Adjunction.unit_app_unit_comp_map_η_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} {G : CategoryTheory.Functor D C} (adj : F ⊣ G) [F.OplaxMonoidal] [G.LaxMonoidal] [adj.IsMonoidal] {Z : C} (h : G.obj (𝟙_ D) ⟶ Z) : CategoryTheory.CategoryStruct.comp (adj.unit.app (𝟙_ C)) (CategoryTheory.CategoryStruct.comp (G.map (CategoryTheory.Functor.OplaxMonoidal.η F)) h) = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.ε G) h

theorem CategoryTheory.Adjunction.unit_app_tensor_comp_map_δ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} {G : CategoryTheory.Functor D C} (adj : F ⊣ G) [F.OplaxMonoidal] [G.LaxMonoidal] [adj.IsMonoidal] (X Y : C) : CategoryTheory.CategoryStruct.comp (adj.unit.app (CategoryTheory.MonoidalCategory.tensorObj X Y)) (G.map (CategoryTheory.Functor.OplaxMonoidal.δ F X Y)) = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (adj.unit.app X) (adj.unit.app Y)) (CategoryTheory.Functor.LaxMonoidal.μ G (F.obj X) (F.obj Y))

theorem CategoryTheory.Adjunction.unit_app_tensor_comp_map_δ_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} {G : CategoryTheory.Functor D C} (adj : F ⊣ G) [F.OplaxMonoidal] [G.LaxMonoidal] [adj.IsMonoidal] (X Y : C) {Z : C} (h : G.obj (CategoryTheory.MonoidalCategory.tensorObj (F.obj X) (F.obj Y)) ⟶ Z) : CategoryTheory.CategoryStruct.comp (adj.unit.app (CategoryTheory.MonoidalCategory.tensorObj X Y)) (CategoryTheory.CategoryStruct.comp (G.map (CategoryTheory.Functor.OplaxMonoidal.δ F X Y)) h) = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (adj.unit.app X) (adj.unit.app Y)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ G (F.obj X) (F.obj Y)) h)

theorem CategoryTheory.Adjunction.map_ε_comp_counit_app_unit {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} {G : CategoryTheory.Functor D C} (adj : F ⊣ G) [F.OplaxMonoidal] [G.LaxMonoidal] [adj.IsMonoidal] : CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.Functor.LaxMonoidal.ε G)) (adj.counit.app (𝟙_ D)) = CategoryTheory.Functor.OplaxMonoidal.η F

theorem CategoryTheory.Adjunction.map_ε_comp_counit_app_unit_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} {G : CategoryTheory.Functor D C} (adj : F ⊣ G) [F.OplaxMonoidal] [G.LaxMonoidal] [adj.IsMonoidal] {Z : D} (h : 𝟙_ D ⟶ Z) : CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.Functor.LaxMonoidal.ε G)) (CategoryTheory.CategoryStruct.comp (adj.counit.app (𝟙_ D)) h) = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.η F) h

theorem CategoryTheory.Adjunction.map_μ_comp_counit_app_tensor {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} {G : CategoryTheory.Functor D C} (adj : F ⊣ G) [F.OplaxMonoidal] [G.LaxMonoidal] [adj.IsMonoidal] (X Y : D) : CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.Functor.LaxMonoidal.μ G X Y)) (adj.counit.app (CategoryTheory.MonoidalCategory.tensorObj X Y)) = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F (G.obj X) (G.obj Y)) (CategoryTheory.MonoidalCategory.tensorHom (adj.counit.app X) (adj.counit.app Y))

theorem CategoryTheory.Adjunction.map_μ_comp_counit_app_tensor_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] {F : CategoryTheory.Functor C D} {G : CategoryTheory.Functor D C} (adj : F ⊣ G) [F.OplaxMonoidal] [G.LaxMonoidal] [adj.IsMonoidal] (X Y : D) {Z : D} (h : CategoryTheory.MonoidalCategory.tensorObj X Y ⟶ Z) : CategoryTheory.CategoryStruct.comp (F.map (CategoryTheory.Functor.LaxMonoidal.μ G X Y)) (CategoryTheory.CategoryStruct.comp (adj.counit.app (CategoryTheory.MonoidalCategory.tensorObj X Y)) h) = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ F (G.obj X) (G.obj Y)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (adj.counit.app X) (adj.counit.app Y)) h)

instance CategoryTheory.Equivalence.instMonoidalFunctorSymmOfInverse {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (e : C ≌ D) [e.inverse.Monoidal] : e.symm.functor.Monoidal

Equations

• e.instMonoidalFunctorSymmOfInverse = inferInstanceAs e.inverse.Monoidal

instance CategoryTheory.Equivalence.instMonoidalInverseSymmOfFunctor {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (e : C ≌ D) [e.functor.Monoidal] : e.symm.inverse.Monoidal

Equations

• e.instMonoidalInverseSymmOfFunctor = inferInstanceAs e.functor.Monoidal

noncomputable def CategoryTheory.Equivalence.inverseMonoidal {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (e : C ≌ D) [e.functor.Monoidal] : e.inverse.Monoidal

If a monoidal functor F is an equivalence of categories then its inverse is also monoidal.

Equations

• e.inverseMonoidal = CategoryTheory.Functor.Monoidal.ofLaxMonoidal e.inverse

@[reducible, inline]

abbrev CategoryTheory.Equivalence.IsMonoidal {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (e : C ≌ D) [e.functor.Monoidal] [e.inverse.Monoidal] : Prop

An equivalence of categories involving monoidal functors is monoidal if the underlying adjunction satisfies certain compatibilities with respect to the monoidal funtor data.

Equations

• e.IsMonoidal = e.toAdjunction.IsMonoidal

theorem CategoryTheory.Equivalence.unitIso_hom_app_comp_inverse_map_η_functor {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (e : C ≌ D) [e.functor.Monoidal] [e.inverse.Monoidal] [e.IsMonoidal] : CategoryTheory.CategoryStruct.comp (e.unitIso.hom.app (𝟙_ C)) (e.inverse.map (CategoryTheory.Functor.OplaxMonoidal.η e.functor)) = CategoryTheory.Functor.LaxMonoidal.ε e.inverse

theorem CategoryTheory.Equivalence.unitIso_hom_app_comp_inverse_map_η_functor_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (e : C ≌ D) [e.functor.Monoidal] [e.inverse.Monoidal] [e.IsMonoidal] {Z : C} (h : e.inverse.obj (𝟙_ D) ⟶ Z) : CategoryTheory.CategoryStruct.comp (e.unitIso.hom.app (𝟙_ C)) (CategoryTheory.CategoryStruct.comp (e.inverse.map (CategoryTheory.Functor.OplaxMonoidal.η e.functor)) h) = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.ε e.inverse) h

theorem CategoryTheory.Equivalence.unitIso_hom_app_tensor_comp_inverse_map_δ_functor {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (e : C ≌ D) [e.functor.Monoidal] [e.inverse.Monoidal] [e.IsMonoidal] (X Y : C) : CategoryTheory.CategoryStruct.comp (e.unitIso.hom.app (CategoryTheory.MonoidalCategory.tensorObj X Y)) (e.inverse.map (CategoryTheory.Functor.OplaxMonoidal.δ e.functor X Y)) = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (e.unitIso.hom.app X) (e.unitIso.hom.app Y)) (CategoryTheory.Functor.LaxMonoidal.μ e.inverse (e.functor.obj X) (e.functor.obj Y))

theorem CategoryTheory.Equivalence.unitIso_hom_app_tensor_comp_inverse_map_δ_functor_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (e : C ≌ D) [e.functor.Monoidal] [e.inverse.Monoidal] [e.IsMonoidal] (X Y : C) {Z : C} (h : e.inverse.obj (CategoryTheory.MonoidalCategory.tensorObj (e.functor.obj X) (e.functor.obj Y)) ⟶ Z) : CategoryTheory.CategoryStruct.comp (e.unitIso.hom.app (CategoryTheory.MonoidalCategory.tensorObj X Y)) (CategoryTheory.CategoryStruct.comp (e.inverse.map (CategoryTheory.Functor.OplaxMonoidal.δ e.functor X Y)) h) = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (e.unitIso.hom.app X) (e.unitIso.hom.app Y)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ e.inverse (e.functor.obj X) (e.functor.obj Y)) h)

theorem CategoryTheory.Equivalence.functor_map_ε_inverse_comp_counitIso_hom_app {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (e : C ≌ D) [e.functor.Monoidal] [e.inverse.Monoidal] [e.IsMonoidal] : CategoryTheory.CategoryStruct.comp (e.functor.map (CategoryTheory.Functor.LaxMonoidal.ε e.inverse)) (e.counitIso.hom.app (𝟙_ D)) = CategoryTheory.Functor.OplaxMonoidal.η e.functor

theorem CategoryTheory.Equivalence.functor_map_ε_inverse_comp_counitIso_hom_app_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (e : C ≌ D) [e.functor.Monoidal] [e.inverse.Monoidal] [e.IsMonoidal] {Z : D} (h : 𝟙_ D ⟶ Z) : CategoryTheory.CategoryStruct.comp (e.functor.map (CategoryTheory.Functor.LaxMonoidal.ε e.inverse)) (CategoryTheory.CategoryStruct.comp (e.counitIso.hom.app (𝟙_ D)) h) = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.η e.functor) h

theorem CategoryTheory.Equivalence.functor_map_μ_inverse_comp_counitIso_hom_app_tensor {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (e : C ≌ D) [e.functor.Monoidal] [e.inverse.Monoidal] [e.IsMonoidal] (X Y : D) : CategoryTheory.CategoryStruct.comp (e.functor.map (CategoryTheory.Functor.LaxMonoidal.μ e.inverse X Y)) (e.counitIso.hom.app (CategoryTheory.MonoidalCategory.tensorObj X Y)) = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ e.functor (e.inverse.obj X) (e.inverse.obj Y)) (CategoryTheory.MonoidalCategory.tensorHom (e.counitIso.hom.app X) (e.counitIso.hom.app Y))

theorem CategoryTheory.Equivalence.functor_map_μ_inverse_comp_counitIso_hom_app_tensor_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (e : C ≌ D) [e.functor.Monoidal] [e.inverse.Monoidal] [e.IsMonoidal] (X Y : D) {Z : D} (h : CategoryTheory.MonoidalCategory.tensorObj X Y ⟶ Z) : CategoryTheory.CategoryStruct.comp (e.functor.map (CategoryTheory.Functor.LaxMonoidal.μ e.inverse X Y)) (CategoryTheory.CategoryStruct.comp (e.counitIso.hom.app (CategoryTheory.MonoidalCategory.tensorObj X Y)) h) = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.OplaxMonoidal.δ e.functor (e.inverse.obj X) (e.inverse.obj Y)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (e.counitIso.hom.app X) (e.counitIso.hom.app Y)) h)

theorem CategoryTheory.Equivalence.unitIso_hom_app_tensor_comp_inverse_map_δ_functor__ {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (e : C ≌ D) [e.functor.Monoidal] [e.inverse.Monoidal] [e.IsMonoidal] (X Y : C) : CategoryTheory.CategoryStruct.comp (e.unitIso.hom.app (CategoryTheory.MonoidalCategory.tensorObj X Y)) (e.inverse.map (CategoryTheory.Functor.OplaxMonoidal.δ e.functor X Y)) = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (e.unitIso.hom.app X) (e.unitIso.hom.app Y)) (CategoryTheory.Functor.LaxMonoidal.μ e.inverse (e.functor.obj X) (e.functor.obj Y))

theorem CategoryTheory.Equivalence.unitIso_hom_app_tensor_comp_inverse_map_δ_functor___assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (e : C ≌ D) [e.functor.Monoidal] [e.inverse.Monoidal] [e.IsMonoidal] (X Y : C) {Z : C} (h : e.inverse.obj (CategoryTheory.MonoidalCategory.tensorObj (e.functor.obj X) (e.functor.obj Y)) ⟶ Z) : CategoryTheory.CategoryStruct.comp (e.unitIso.hom.app (CategoryTheory.MonoidalCategory.tensorObj X Y)) (CategoryTheory.CategoryStruct.comp (e.inverse.map (CategoryTheory.Functor.OplaxMonoidal.δ e.functor X Y)) h) = CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategory.tensorHom (e.unitIso.hom.app X) (e.unitIso.hom.app Y)) (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ e.inverse (e.functor.obj X) (e.functor.obj Y)) h)

theorem CategoryTheory.Equivalence.counitIso_inv_app_comp_functor_map_η_inverse {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (e : C ≌ D) [e.functor.Monoidal] [e.inverse.Monoidal] [e.IsMonoidal] : CategoryTheory.CategoryStruct.comp (e.counitIso.inv.app (𝟙_ D)) (e.functor.map (CategoryTheory.Functor.OplaxMonoidal.η e.inverse)) = CategoryTheory.Functor.LaxMonoidal.ε e.functor

theorem CategoryTheory.Equivalence.counitIso_inv_app_comp_functor_map_η_inverse_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (e : C ≌ D) [e.functor.Monoidal] [e.inverse.Monoidal] [e.IsMonoidal] {Z : D} (h : e.functor.obj (𝟙_ C) ⟶ Z) : CategoryTheory.CategoryStruct.comp (e.counitIso.inv.app (𝟙_ D)) (CategoryTheory.CategoryStruct.comp (e.functor.map (CategoryTheory.Functor.OplaxMonoidal.η e.inverse)) h) = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.ε e.functor) h

theorem CategoryTheory.Equivalence.counitIso_inv_app_tensor_comp_functor_map_δ_inverse {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (e : C ≌ D) [e.functor.Monoidal] [e.inverse.Monoidal] [e.IsMonoidal] (X Y : C) : CategoryTheory.CategoryStruct.comp (e.counitIso.inv.app (CategoryTheory.MonoidalCategory.tensorObj (e.functor.obj X) (e.functor.obj Y))) (e.functor.map (CategoryTheory.Functor.OplaxMonoidal.δ e.inverse (e.functor.obj X) (e.functor.obj Y))) = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ e.functor X Y) (e.functor.map (CategoryTheory.MonoidalCategory.tensorHom (e.unitIso.hom.app X) (e.unitIso.hom.app Y)))

theorem CategoryTheory.Equivalence.counitIso_inv_app_tensor_comp_functor_map_δ_inverse_assoc {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (e : C ≌ D) [e.functor.Monoidal] [e.inverse.Monoidal] [e.IsMonoidal] (X Y : C) {Z : D} (h : e.functor.obj (CategoryTheory.MonoidalCategory.tensorObj (e.inverse.obj (e.functor.obj X)) (e.inverse.obj (e.functor.obj Y))) ⟶ Z) : CategoryTheory.CategoryStruct.comp (e.counitIso.inv.app (CategoryTheory.MonoidalCategory.tensorObj (e.functor.obj X) (e.functor.obj Y))) (CategoryTheory.CategoryStruct.comp (e.functor.map (CategoryTheory.Functor.OplaxMonoidal.δ e.inverse (e.functor.obj X) (e.functor.obj Y))) h) = CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.LaxMonoidal.μ e.functor X Y) (CategoryTheory.CategoryStruct.comp (e.functor.map (CategoryTheory.MonoidalCategory.tensorHom (e.unitIso.hom.app X) (e.unitIso.hom.app Y))) h)

instance CategoryTheory.Equivalence.isMonoidal_symm {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (e : C ≌ D) [e.functor.Monoidal] [e.inverse.Monoidal] [e.IsMonoidal] : e.symm.IsMonoidal

The inverse of a monoidal category equivalence is also a monoidal category equivalence.

Equations

• ⋯ = ⋯

structure CategoryTheory.LaxMonoidalFunctor (C : Type u₁) [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] (D : Type u₂) [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] extends CategoryTheory.Functor C D : Type (max (max (max u₁ u₂) v₁) v₂)

Bundled version of lax monoidal functors. This type is equipped with a category structure in CategoryTheory.Monoidal.NaturalTransformation.

• obj : C → D
• map : {X Y : C} → (X ⟶ Y) → (self.obj X ⟶ self.obj Y)
• map_id : ∀ (X : C), self.map (CategoryTheory.CategoryStruct.id X) = CategoryTheory.CategoryStruct.id (self.obj X)
• map_comp : ∀ {X Y Z : C} (f : X ⟶ Y) (g : Y ⟶ Z), self.map (CategoryTheory.CategoryStruct.comp f g) = CategoryTheory.CategoryStruct.comp (self.map f) (self.map g)
• laxMonoidal : self.LaxMonoidal

def CategoryTheory.LaxMonoidalFunctor.of {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] : CategoryTheory.LaxMonoidalFunctor C D

Constructor for LaxMonoidalFunctor C D.

Equations

• CategoryTheory.LaxMonoidalFunctor.of F = { toFunctor := F, laxMonoidal := inferInstance }

@[simp]

theorem CategoryTheory.LaxMonoidalFunctor.of_toFunctor {C : Type u₁} [CategoryTheory.Category.{v₁, u₁} C] [CategoryTheory.MonoidalCategory C] {D : Type u₂} [CategoryTheory.Category.{v₂, u₂} D] [CategoryTheory.MonoidalCategory D] (F : CategoryTheory.Functor C D) [F.LaxMonoidal] : (CategoryTheory.LaxMonoidalFunctor.of F).toFunctor = F