∀ {R : Type u_1} {M : Type u_2} [inst : CommRing R] [inst_1 : AddCommGroup M] [inst_2 : Module R M] (p : Polynomial R)
  (a : PolynomialModule R M),
  (PolynomialModule.comp p) a =
    (PolynomialModule.eval p) ((PolynomialModule.map (Polynomial R) (PolynomialModule.lsingle R 0)) a)