prodComparisonBifunctorNatTrans

Mathlib.CategoryTheory.Monoidal.Cartesian.Basic

URI: https://scilib.ai/kg/mathlib#CategoryTheory.CartesianMonoidalCategory.prodComparisonBifunctorNatTrans

Lean4

/-- The product comparison morphism from `F(- ⊗ -)` to `F- ⊗ F-`, whose components are given by
`prodComparison`. -/
@[simps]
def prodComparisonBifunctorNatTrans :
    curriedTensor C ⋙ (Functor.whiskeringRight _ _ _).obj F ⟶ F ⋙ curriedTensor D ⋙ (Functor.whiskeringLeft _ _ _).obj F
    where
  app A := prodComparisonNatTrans F A
  naturality x y
    f := by
    ext z
    apply hom_ext <;> simp [← Functor.map_comp]

Похожие утверждения

Научная платформа российской исследовательской школы.

Разделы

MathLib Explorer
Graph RAG
Лаборатория
Блог
О проекте
Команда

Аффилиация

Вычислительный центр им. А. А. Дороницына при ФИЦ «Информатика и Управление» РАН frccsc.ru