%mathmuse.sci.ibaraki.ac.jp/geom/param1E.html

input mp-solid

%15"
figureespace(-10u,-10u,10u,10u);
Initialisation(2000,-40,10,90);
incolor=0.5[vert,white];
outcolor=0.5[jaune,white];
draw Sparam("(sin(v)*cos(u),2*cos(v),4*sin(v)*cos(v))",-pi,pi,pi/24,-pi,pi,pi/24);
finespace;
end