>

restart;

>	with(plots):with(plottools);

Warning, the name changecoords has been redefined

Warning, the assigned name arrow now has a global binding

>	pp:=tubeplot([x,0,0],x=-2*Pi..2*Pi,radius=sin(3*x)+cos(5*x)+2,grid=[51,51],scaling=constrained,title="930232"):

>	vrml(pp,"c:/pp34.wrl");

>

pp;

>