input mp-solid

figureespace(-4u,-3u,5u,5u);
Initialisation(500,30,20,15);
creux:=false;
nb:=18;subh:=18;
angx:=90;
TR:=(0,-2.5,0);
outcolor:=vert;
Objetcalotte1("R=5","phib=-pi/6","phih=pi/2");
angx:=-90;
TR:=(0,2.5,0);
Objetcalotte2("R=5","phib=-pi/6","phih=pi/2");
nbobj:=2;
DessineFusion;
TraceAxesD(12,10,7);
finespace;
end