∀ {R : Type u} [inst : CommSemiring R] {M : Type u_3} [inst_1 : AddCommMonoid M] [inst_2 : Module R M] {N : Type u_4}
  [inst_3 : AddCommMonoid N] [inst_4 : Module R N] (f : M →ₚₗ[R] N) (S : Type u_5) [inst_5 : CommSemiring S]
  [inst_6 : Algebra R S] (x : M), 1 ⊗ₜ[R] f.ground x = PolynomialLaw.toFun S f (1 ⊗ₜ[R] x)