∀ {C : Type u_2} [inst : CategoryTheory.Category.{u_1, u_2} C] [inst_1 : CategoryTheory.MonoidalCategory C]
  {D : Type u_4} [inst_2 : CategoryTheory.Category.{u_3, u_4} D] [inst_3 : CategoryTheory.MonoidalCategory D]
  {F : CategoryTheory.Functor C D} [inst_4 : F.Monoidal] {X Y : CategoryTheory.Mon C}
  (f : F.mapMon.obj X ⟶ F.mapMon.obj Y) (motive : (∃ a, F.map a = f.hom) → Prop) (x : ∃ a, F.map a = f.hom),
  (∀ (g : X.X ⟶ Y.X) (hg : F.map g = f.hom), motive ⋯) → motive x