doc/figures/objetruban.mp

   1 input mp-solid
   2
   3 figureespace(-10u,-10u,10u,10u);
   4 Initialisation(500,-30,20,30);
   5 nb:=14; subh:=12;
   6 eclairage:=false;
   7 outcolor:=blanc;
   8 Objetgrille1("am=-1","an=6","bm=-1","bn=5");
   9 AffichageObjet1;
  10 eclairage:=true;
  11 outcolor:=0.5[rouge,blanc];
  12 incolor:=0.5[vert,blanc];
  13 subh:=3;
  14 ObjetRuban2("h=2")((0,0,0),(2,2,0),(4,0,0),(6,2,0));
  15 AffichageObjet2;
  16 TraceAxes;
  17 finespace;
  18 end