12-1.mws

>

> restart;

> x:=(1-s)*cos(t):y:=s*sin(t):

> z:=2*s:

> with(plots): 

Warning, the name changecoords has been redefined
> c:=plot3d([x,y,z],s=0..1,t=0..2*Pi,scaling=constrained):

> c;

[Maple Plot]

> with(plottools):

> vrml(c,"c:/040/12/12-1.wrl",background_color=white):

>