input mp-solid

outcolor:=0.5[ciel,blanc];
incolor:=0.5[jaune,blanc];

nb:=24;

figureespace(-10u,-10u,10u,10u);
Initialisation(500,30,10,50);
Lumiere:=Oeil;
angy:=80;
subh:=24;
Objetcalotte1("R=2","phib=-pi/2","phih=pi/6");
outcolor:=0.5[rouge,blanc];
incolor:=0.5[vert,blanc];
TR:=(1,0,0);
Objetcalotte2("R=1.5","phib=-pi/2","phih=pi/6");
outcolor:=0.5[orange,blanc];
incolor:=0.5[gris,blanc];
TR:=(2,0,0);
Objetcalotte3("R=1","phib=-pi/2","phih=pi/6");
nbobj:=3;
DessineFusion;
finespace;
end