exemples/courbes/cp03.mp

   1 input gdd;
   2 input gdd-rep;
   3 input gdd-lbl;
   4 input gdd-tra;
   5 input svgnames;
   6
   7 lblPreambule := "\usepackage[frenchb]{babel}"       &
   8                 "\usepackage[garamond]{mathdesign}" &
   9                 "\usepackage{amsmath}";
  10
  11 input gdd-fct;
  12 input gdd-plt;
  13
  14 labeloffset := 6;
  15 gddU:=1cm;
  16
  17 vardef f(expr t) = t*t enddef;
  18 vardef g(expr t) = t*t*t enddef;
  19
  20 def avecCrayon(expr t,c) = withpen pencircle scaled t withcolor c enddef;
  21
  22
  23
  24 beginfig(1);
  25
  26
  27  Repere(8,12,2,6,1,1);
  28  Axes;
  29  Debut;
  30   Graduations; Unites(1);
  31
  32
  33   trace Vecteur((0,0),(2,0)) avecCrayon(1,Crimson);
  34
  35   trace Courbe(f,g,-3,3,300) avecCrayon(1.5,DarkTurquoise);
  36
  37   pointe Point(0,0);
  38
  39  Fin;
  40
  41
  42 endfig;
  43
  44 end