MUSHROOM
THIS VRML MODEL CAN BE DONE BY USING THIS EQUATION...
plot3d([sin(phi)*cos(theta),sin(phi)*sin(theta),cos(phi)],theta=0..2*Pi,phi=0..Pi/2):
plot3d([cos(theta)/2,sin(theta)/2,z],theta=0..2*Pi,z=-1..0):
display3d({%,%%},scaling=CONSTRAINED);plottools[vrml](%,"MUSHROOM.vrml");