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