Construct the Astroidal Ellipsoid given by
x = (cos(u)cos(v))3,
y = (sin(u)cos(v))3
z = sin3(v)

> restart:

> with(plots):

Warning, the name changecoords has been redefined

> with(plottools):

> x:=(cos(u)*cos(v))^3:

> y:=(sin(u)*cos(v))^3:

> z:=(sin(v))^3:

> a:=plot3d([x,y,z],v=0..2*Pi,u=0..Pi,scaling=constrained,color=pink):

> vrml(a,"c:/87138/ex10/10-4.wrl",background_color=white):

> display(a);

>