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

ex01.mp (figure 1)
Source

input mp-solid

outcolor:=0.5[rouge,blanc];
incolor:=0.5[vert,blanc];

figureespace(-10u,-10u,10u,10u);
Initialisation(500,40,20,100);
nb:=18;
TR:=(0,0,-1.5);
creux:=true;
Objetcylindre1("r=0.25","h=3");
outcolor:=0.5[jaune,blanc];
TR:=(0,0,0);
creux:=false;
ObjetTube2("(cos(t),sin(t),0.25)","(-sin(t),cos(t),0)",0.15,0,50,0.12566);
nbobj=2;
DessineFusion;
finespace;
end