∀ {C : Type u} [inst : CategoryTheory.Category.{v, u} C] [inst_1 : CategoryTheory.MonoidalCategory C] (A B : C)
  [inst_2 : CategoryTheory.Closed A] {Z : C} (h : A ⟹ B ⟶ Z),
  CategoryTheory.CategoryStruct.comp ((CategoryTheory.ihom.coev A).app (A ⟹ B))
      (CategoryTheory.CategoryStruct.comp ((CategoryTheory.ihom A).map ((CategoryTheory.ihom.ev A).app B)) h) =
    h