doc/figures/coloriagez.mp

   1 input mp-solid
   2
   3 %9s
   4 figureespace(-10u,-10u,10u,20u);
   5 Initialisation(500,-120,10,25);
   6 couleurz:=true;
   7 rayd:=0.01;
   8 draw SurfZ("10*(X**3+X*(Y**4)-(X/5))*exp(-(X**2+Y**2))+exp(-((X-1.225)**2+Y**2))",4,0.2,120);
   9 finespace;
  10
  11 %9s
  12 figureespace(-10u,-10u,10u,20u);
  13 Initialisation(500,-120,10,25);
  14 couleurz:=true; cz1:=jaune; cz2:=rouge;
  15 rayd:=0.01;
  16 draw SurfZ("10*(X**3+X*(Y**4)-(X/5))*exp(-(X**2+Y**2))+exp(-((X-1.225)**2+Y**2))",4,0.2,120);
  17 finespace;
  18 end