∀ {C : Type u_2} [inst : CategoryTheory.Category.{u_1, u_2} C] {J : Type u_4}
  [inst_1 : CategoryTheory.Category.{u_3, u_4} J] {T : CategoryTheory.Comonad C}
  {D : CategoryTheory.Functor J T.Coalgebra} (c : CategoryTheory.Limits.Cone (D.comp T.forget))
  (t : CategoryTheory.Limits.IsLimit c) [inst_2 : CategoryTheory.Limits.PreservesLimit (D.comp T.forget) T.toFunctor]
  [inst_3 : CategoryTheory.Limits.PreservesLimit ((D.comp T.forget).comp T.toFunctor) T.toFunctor] (A B : J)
  (f : A ⟶ B),
  CategoryTheory.CategoryStruct.comp
      (((CategoryTheory.Functor.const J).obj (CategoryTheory.Comonad.ForgetCreatesLimits'.conePoint c t)).map f)
      { f := c.π.app B, h := ⋯ } =
    CategoryTheory.CategoryStruct.comp { f := c.π.app A, h := ⋯ } (D.map f)