input mp-solid

nb:=12;
%20''
figureespace(-10u,-10u,10u,10u);
Initialisation(500,0,20,10);
subh:=24;
creux:=false;
incolor:=0.5[vert,blanc];
outcolor:=0.5[marron,blanc];
Objetcylindre1("r=3","h=16");
outcolor:=0.5[jaune,white];
incolor:=0.5[gris,blanc];
creux:=true;
TR:=(0,0,sqrt(27));
Objetcalotte2("R=6","phib=-pi/3","phih=0");
TR:=(0,0,10);
Objetcalotte3("R=5","phib=-(pi/2)+0.6435","phih=0");
TR:=(0,0,12+sqrt(3));
Objetcalotte4("R=4","phib=-(pi/2)+0.84806","phih=0");
TR:=(0,0,16);
Objetcalotte5("R=3","phib=0","phih=pi/2");
nbobj:=5;
DessineFusion;
finespace;
end