Construct the solid bounded by the parabolic cylinder z = 4 - y2 and the elliptic paraboloid z = x2 + 3y2.

> restart:

> with(plots):

Warning, the name changecoords has been redefined

> with(plottools):

> x:=2*r*cos(t):

> y:=r*sin(t):

> z:=4-y^2:

> a:=plot3d([x,y,z],t=0..2*Pi,r=0..1,scaling=constrained,color=blue,axes=none):

> z:=x^2+3*y^2:

> b:=plot3d([x,y,z],t=0..2*Pi,r=0..1,scaling=constrained,color=green):

> c:=display(a,b):

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

> display(c);

>