∀ {C : Type u} [inst : CategoryTheory.Category.{v, u} C] [inst_1 : CategoryTheory.MonoidalCategory C] {A B : C} (X : C)
  {Y : C} [inst_2 : CategoryTheory.Closed A] [inst_3 : CategoryTheory.Closed B] (f : Y ⟶ A ⟹ X) (g : B ⟶ A) {Z : C}
  (h : X ⟶ Z),
  CategoryTheory.CategoryStruct.comp
      (CategoryTheory.MonoidalClosed.uncurry
        (CategoryTheory.CategoryStruct.comp f ((CategoryTheory.MonoidalClosed.pre g).app X)))
      h =
    CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.whiskerRight g Y)
      (CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalClosed.uncurry f) h)