input mp-solid

path pp;
pp=(3,-7)..(1,-6)..(5,0.5)..(5,3)..(1,3)..(1,4)..(2,5);

incolor:=0.5[jaune,white];
outcolor:=0.8[bleu,white];

figureespace(-10u,-10u,10u,10u);
Initialisation(500,30,20,25);
draw Revolution("pp",0,length pp,0.2,0,2*pi,pi/12);
finespace;
end