∀ {C : Type u₁} [inst : CategoryTheory.Category.{v₁, u₁} C] [inst_1 : CategoryTheory.MonoidalCategory C] {D : Type u₂}
  [inst_2 : CategoryTheory.Category.{v₂, u₂} D] [inst_3 : CategoryTheory.MonoidalCategory D]
  {F : CategoryTheory.Functor C D} {G : CategoryTheory.Functor D C} (a : F ⊣ G) [inst_4 : F.Monoidal]
  [inst_5 : G.LaxMonoidal] [inst_6 : a.IsMonoidal],
  a.mapAddMon.unit =
    CategoryTheory.CategoryStruct.comp CategoryTheory.Functor.mapAddMonIdIso.inv
      (CategoryTheory.CategoryStruct.comp (CategoryTheory.Functor.mapAddMonNatTrans a.unit)
        CategoryTheory.Functor.mapAddMonCompIso.hom)