Fichier ex07.mp (figure 1) — Modifié le 3 Août 2008 à 07 h 09
Source
%http://melusine.eu.org/lab/bpst/pst-solides3d/surfaces/trompette.pst
input mp-solid
%1''
figureespace(-10u,-10u,10u,10u);
Initialisation(2000,40,30,75);
incolor=0.5[jaune,white];
outcolor=0.5[vert,white];
draw Sparam("(cos(u)*sin(v),cos(v)+ln(tan(0.5*v))+2,sin(u)*sin(v))",0,2*pi,pi/12,0.01,2,0.1);
finespace;
end