∀ {J : Type u_1} [inst : CategoryTheory.Category.{u_3, u_1} J] (F : CategoryTheory.Functor J AddCommGrpCat)
  [inst_1 : DecidableEq J],
  AddCommGrpCat.Colimits.Relations F ≤
    (DFinsupp.sumAddHom fun j =>
        (AddCommGrpCat.Colimits.Quot.ι (F.comp AddCommGrpCat.uliftFunctor) j).comp
          AddEquiv.ulift.symm.toAddMonoidHom).ker