∀ {R : Type u_3} {R' : Type u_4} [inst : CommSemiring R] [inst_1 : Monoid R'] {M : Type u_1} {N : Type u_2}
  [inst_2 : AddCommMonoid M] [inst_3 : AddCommMonoid N] [inst_4 : DistribMulAction R' M] [inst_5 : Module R M]
  [inst_6 : Module R N] [SMulCommClass R R' M] (r : R'),
  addConGen (TensorProduct.Eqv R M N) ≤ AddCon.ker (TensorProduct.SMul.aux r)