doc/figures/npresentation.mp

   1 input mp-solid;
   2
   3 figureespace(-10u,-20u,10u,10u);
   4 Initialisation(1000,15,70,40);
   5 outcolor:=0.5[green,white];
   6 draw Tube("(2*cosd(t)+cosd(3*t),2*sind(t)-sind(3*t),2*sqrt(2)*sind(2*t))","(-2*sind(t)-3*sind(3*t),2*cosd(t)-3*cosd(3*t),4*sqrt(2)*cosd(2*t))","(-2*cosd(t)-9*cosd(3*t),-2*sind(t)+9*sind(3*t),-8*sqrt(2)*sind(2*t))",0.1,90,180,1.5);
   7 finespace;
   8
   9 figureespace(-10u,-20u,10u,10u);
  10 Initialisation(1000,15,20,40);
  11 outcolor:=0.5[jaune,white];
  12 draw Tube("(cos(t),1.5*sin(t),0.2*t)","(-sin(t),1.5*cos(t),0.2)","(-cos(t),-1.5*sin(t),0)",0.1,0,180,0.1);
  13 finespace;
  14 end