∀ (R : Type u_3) {A : Type u_1} {M : Type u_2} [inst : Semiring R] [inst_1 : Mul M]
  [inst_2 : NonUnitalNonAssocSemiring A] [inst_3 : Module R A] (f : M →ₙ* A) (t' : R) (a : MonoidAlgebra R M),
  (Finsupp.sum (t' • a) fun m t => t • f m) = (MonoidHom.id R) t' • Finsupp.sum a fun m t => t • f m