Fichier ex10.mp (figure 1) — Modifié le 3 Août 2008 à 07 h 09

ex10.mp (figure 1)
Source

input mp-solid

%10"
figureespace(-10u,-10u,10u,10u);
Initialisation(1000,20,45,35);
nb:=16;
arcenciel:=true;
incolor:=0.95white;
draw Tuben("(2*(1+cos(t)),2*tan(t/2),2*sin(t))","(-2*sin(t),1/((cos(t/2))**2),2*cos(t))",0.2,-2,100,0.04);
finespace;
end