{C : Type u₁} →
  [inst : CategoryTheory.Category.{v₁, u₁} C] →
    [inst_1 : CategoryTheory.MonoidalCategory C] →
      [inst_2 : CategoryTheory.BraidedCategory C] →
        (M : CategoryTheory.Mon (CategoryTheory.Comon C)) →
          ((CategoryTheory.Bimon.ofMonComon C).comp (CategoryTheory.Bimon.toMonComon C)).obj M ≅ M