The following program was created to determine a Hermite polynomial. Can anyone see where the error lies? Thanks!

restart; f:=x-> (x*(cos(x)))- ((x*x(sin(x/2))));
                 f := x -> x cos(x) - x x(sin(1/2 x))

                              fp := D(f)