∀ {C : Type u} [inst : CategoryTheory.Category.{v, u} C] [inst_1 : CategoryTheory.MonoidalCategory C] (x y z : C)
  [inst_2 : CategoryTheory.Closed x] [inst_3 : CategoryTheory.Closed y],
  CategoryTheory.MonoidalClosed.compTranspose x y z =
    CategoryTheory.CategoryStruct.comp (CategoryTheory.MonoidalCategoryStruct.associator x (x ⟹ y) (y ⟹ z)).inv
      (CategoryTheory.CategoryStruct.comp
        (CategoryTheory.MonoidalCategoryStruct.whiskerRight ((CategoryTheory.ihom.ev x).app y) (y ⟹ z))
        ((CategoryTheory.ihom.ev y).app z))