input mp-solid

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

nb:=24;subh:=36;
figureespace(-10u,-10u,10u,10u);
Initialisation(500,30,40,20);
Objettore1("R=2.5","r=1.5");%ok
AffichageObjet1;
TraceAxes;
finespace;
end