∀ {C : Type u_2} [inst : CategoryTheory.Category.{u_1, u_2} C] [inst_1 : CategoryTheory.CartesianMonoidalCategory C]
  {X Y : CategoryTheory.Mon C} (φ : X ⟶ Y),
  CategoryTheory.IsMonHom
    ((CategoryTheory.ConcreteCategory.hom ((CategoryTheory.yonedaMon.map φ).app (Opposite.op X.X)))
      (CategoryTheory.CategoryStruct.id X.X))