MapleDEseriesSolnExp.mws
>
ode:=diff(y(x),x,x,x)-x*diff(y(x),x,x)+x*diff(y(x),x)-y(x)=0;
>
ans:=dsolve({ode,y(0)=1,D(y)(0)=1,D(D(y))(0)=1},y(x),type=series);
>