∀ {C : Type u₁} [inst : CategoryTheory.Category.{v₁, u₁} C] [inst_1 : CategoryTheory.CartesianMonoidalCategory C]
  {D : Type u₂} [inst_2 : CategoryTheory.Category.{v₂, u₂} D] [inst_3 : CategoryTheory.CartesianMonoidalCategory D]
  {F : CategoryTheory.Functor C D} [inst_4 : F.Monoidal] (hF : F.FullyFaithful) {X Y : CategoryTheory.Grp C}
  (f : F.mapGrp.obj X ⟶ F.mapGrp.obj Y), hF.mapGrp.preimage f = CategoryTheory.Grp.homMk' (hF.mapMon.preimage f.hom)