doc/figures/objetcylindre.mp

   1 input mp-solid
   2
   3 outcolor:=0.5[ciel,blanc];
   4 incolor:=0.5[jaune,blanc];
   5
   6 nb:=24;subh:=9;
   7 creux:=true;
   8 arcenciel:=true;
   9 figureespace(-10u,-10u,10u,10u);
  10 Initialisation(500,30,40,20);
  11 Objetcylindre1("r=2","h=4");%ok
  12 AffichageObjet1;
  13 TraceAxes;
  14 finespace;
  15
  16 creux:=false;
  17 arcenciel:=false;
  18
  19 figureespace(-10u,-10u,10u,10u);
  20 Initialisation(500,30,40,20);
  21 Objetcylindre1("r=2","h=4");%ok
  22 AffichageObjet1;
  23 TraceAxes;
  24 finespace;
  25 end