>

restart;

>	with(plots):

Warning, the name changecoords has been redefined

>	implicitplot3d(x*y*z=x^2+y^2-z^2, x=-1..1, y=-1..1, z=-1..1, title = "(14.6) Example 2");

>	implicitplot3d(1+2*x*y*z = exp(x*y*z), x=-1..1, y=-1..1, z=-1..1, title="(14.5) Example 7");

>	implicitplot3d([x^2*y + 15*y^2 + 6 *z^2 = 22, 2*x+31*y+12*z=45], x=0..2, y=0..2, z=0..2, color=[blue,red],title = "(14.6), Example 5");

>	plot3d((1-y^2)*x*(2-x), x=0..2.5, y=-1.5..1.5, axes=boxed, title="(14.7) Example 1");

>