%by pst-solides3d

input mp-solid
figureespace(-20u,-20u,20u,20u);
Initialisation(500,10,10,150);
for k=1 upto 3:
  Ferme[k]:=true;
endfor;
nb:=15;%15
subh:=18;%18
outcolor:=bleu;
Objettore1("R=0.9","r=0.25");
outcolor:=jaune;
angx:=90;
angz:=90;
Objettore2("R=1.4","r=0.25");
outcolor:=rouge;
angx:=0;angy:=90;angz:=90;
Objettore3("R=0.4","r=0.25");
nbobj:=3;
DessineFusion;
finespace;
end