input mp-solid

%27''
figureespace(-20u,-20u,20u,20u);
Initialisation(1500,60,20,30);
nb:=16;%16
subh:=18;%18
outcolor:=0.5[jaune,blanc];
incolor:=0.5[violet,blanc];
ObjetTube1("(2*(1+cos(t)),2*tan(t/2),2*sin(t))","(-2*sin(t),2/((cos(t/2))**2),2*cos(t))",1,-2.7468,71,0.0763);
AffichageObjet1;
finespace;

figureespace(-20u,-20u,20u,20u);
Initialisation(1500,60,20,30);
nb:=16;%16
subh:=18;%18
outcolor:=0.5[jaune,blanc];
incolor:=0.5[violet,blanc];
creux:=true;
ObjetTube1("(2*(1+cos(t)),2*tan(t/2),2*sin(t))","(-2*sin(t),2/((cos(t/2))**2),2*cos(t))",1,-2.7468,71,0.0763);
AffichageObjet1;
finespace;
end