∀ {C : Type u} [inst : CategoryTheory.Category.{v, u} C] {D : Type u_1} [inst_1 : CategoryTheory.Category.{v_1, u_1} D]
  (F : CategoryTheory.Functor (CategoryTheory.WithTerminal C) D),
  (CategoryTheory.WithTerminal.mkCommaObject F).right = F.obj CategoryTheory.WithTerminal.star