%ouput=pdf

\setupcolors[state=start]

\definecolor[gridlines][s=0.7]

\startMPinclusions
  color gridlines; gridlines=\MPcolor{gridlines}
\stopMPinclusions


\startMPgraphic{create function path f 5-by-5}

  %define clipping path
  path cpath;
  cpath:=(-5,-5)--(5,-5)--(5,5)--(-5,5)--cycle;

  %create function path
  path p; p:=(-5,f(-5));
  for x=-5 step .1 until 5:
    p:=p--(x,f(x));
  endfor;
  p:=p--(5,f(5));

  %clip function path to clipping path
  p:=p cutbefore cpath;
  p:=reverse p;
  p:=p cutbefore cpath;
  
\stopMPgraphic

\startMPgraphic{scale and draw f 5-by-5}

  %scale function path
  p:=p scaled u;

  %draw function path
  drawdblarrow p withcolor blue;

\stopMPgraphic

\startMPgraphic{draw axis 5-by-5}

  %draw the grid
  for k=-5u step 1u until 5u:
    draw (k,-5u)--(k,5u) withcolor gridlines;
    draw (-5u,k)--(5u,k) withcolor gridlines;
  endfor;

  %draw axes
  drawdblarrow (-5.2u,0)--(5.2u,0);
  drawdblarrow (0,-5.2u)--(0,5.2u);

  %label axes
  label.rt(btex $x$ etex, (5.2u,0));
  label.top(btex $y$ etex, (0,5.2u));
  label.bot(btex $5$ etex, (5u,0));
  label.lft(btex $5$ etex, (0,5u));
  
\stopMPgraphic


\startuseMPgraphic{yeqx2}

  %define function
  vardef f(expr x)=
    x*x
  enddef;

  \includeMPgraphic{create function path f 5-by-5}
  
  %initialize scale
  numeric u; 10u=2in;

  \includeMPgraphic{draw axis 5-by-5}

  \includeMPgraphic{scale and draw f 5-by-5}

  %draw plotted points
  for x=-2 step 1 until 2:
    drawdot ((x,f(x)) scaled u) withpen pencircle scaled 4pt withcolor
    blue;
  endfor;

\stopuseMPgraphic

\startuseMPgraphic{yeq2x2}

  %define function f(x)=x^2
  vardef f(expr x)=
    x*x
  enddef;

  %define function g(x)=2x^2
  vardef g(expr x)=
    2*x*x
  enddef;

  %define clipping path
  path cpath;
  cpath:=(-5,-5)--(5,-5)--(5,10)--(-5,10)--cycle;

  %create first function path
  path p; p:=(-5,f(-5));
  for x=-5 step .1 until 5:
    p:=p--(x,f(x));
  endfor;
  p:=p--(5,f(5));

  %clip function path to clipping path
  p:=p cutbefore cpath;
  p:=reverse p;
  p:=p cutbefore cpath;

  %create second function path
  path q; q:=(-5,g(-5));
  for x=-5 step .1 until 5:
    q:=q--(x,g(x));
  endfor;
  q:=q--(5,g(5));

  %clip function path to clipping path
  q:=q cutbefore cpath;
  q:=reverse q;
  q:=q cutbefore cpath;

  %initialize scale
  numeric u; 10u=2in;

  %draw the grid
  for k=-5u step 1u until 10u:
    draw (-5u,k)--(5u,k) withcolor gridlines;
  endfor;
  for k=-5u step 1u until 5u:
    draw (k,-5u)--(k,10u) withcolor gridlines;
  endfor;

  %draw axes
  drawdblarrow (-5.2u,0)--(5.2u,0);
  drawdblarrow (0,-5.2u)--(0,10.2u);

  %label axes
  label.rt(btex $x$ etex, (5.2u,0));
  label.top(btex $y$ etex, (0,10.2u));
  label.bot(btex $5$ etex, (5u,0));
  label.lft(btex $10$ etex, (0,10u));

  %scale function paths
  p:=p scaled u; q:=q scaled u;

  %draw function paths
  drawdblarrow p withcolor blue;
  drawdblarrow q withcolor red;

  %draw plotted points
  for x=-2 step 1 until 2:
    drawdot ((x,f(x)) scaled u) withpen pencircle scaled 4pt withcolor
    blue;
    drawdot ((x,g(x)) scaled u) withpen pencircle scaled 4pt withcolor
    red;
  endfor;

\stopuseMPgraphic


\startuseMPgraphic{yeqhalfx2}

  %define function f(x)=x^2
  vardef f(expr x)=
    x*x
  enddef;

  %define function g(x)=(1/2)x^2
  vardef g(expr x)=
    x*x/2
  enddef;

  %define clipping path
  path cpath;
  cpath:=(-5,-5)--(5,-5)--(5,5)--(-5,5)--cycle;

  %create function path for f
  path p; p:=(-5,f(-5));
  for x=-5 step .1 until 5:
    p:=p--(x,f(x));
  endfor;
  p:=p--(5,f(5));

  %clip function path to clipping path
  p:=p cutbefore cpath;
  p:=reverse p;
  p:=p cutbefore cpath;

  %create function path for g
  path q; q:=(-5,g(-5));
  for x=-5 step .1 until 5:
    q:=q--(x,g(x));
  endfor;
  q:=q--(5,g(5));

  %clip function path to clipping path
  q:=q cutbefore cpath;
  q:=reverse q;
  q:=q cutbefore cpath;

  %initialize scale
  numeric u; 10u=2in;

  %draw the grid
  for k=-5u step 1u until 5u:
    draw (k,-5u)--(k,5u) withcolor gridlines;
    draw (-5u,k)--(5u,k) withcolor gridlines;
  endfor;

  %draw axes
  drawdblarrow (-5.2u,0)--(5.2u,0);
  drawdblarrow (0,-5.2u)--(0,5.2u);

  %label axes
  label.rt(btex $x$ etex, (5.2u,0));
  label.top(btex $y$ etex, (0,5.2u));
  label.bot(btex $5$ etex, (5u,0));
  label.lft(btex $5$ etex, (0,5u));

  %scale function patha
  p:=p scaled u; q:=q scaled u;

  %draw function paths
  drawdblarrow p withcolor blue;
  drawdblarrow q withcolor red;

  %draw plotted points
  for x=-2 step 1 until 2:
    drawdot ((x,f(x)) scaled u) withpen pencircle scaled 4pt withcolor
    blue;
    drawdot ((x,g(x)) scaled u) withpen pencircle scaled 4pt withcolor
    red;
  endfor;

\stopuseMPgraphic


\startuseMPgraphic{yeqminusx2}

  %define function f(x)=x^2
  vardef f(expr x)=
    -x*x
  enddef;

  %define function g(x)=(1/2)x^2
  vardef g(expr x)=
    -x*x/2
  enddef;

  %define clipping path
  path cpath;
  cpath:=(-5,-5)--(5,-5)--(5,5)--(-5,5)--cycle;

  %create function path for f
  path p; p:=(-5,f(-5));
  for x=-5 step .1 until 5:
    p:=p--(x,f(x));
  endfor;
  p:=p--(5,f(5));

  %clip function path to clipping path
  p:=p cutbefore cpath;
  p:=reverse p;
  p:=p cutbefore cpath;

  %create function path for g
  path q; q:=(-5,g(-5));
  for x=-5 step .1 until 5:
    q:=q--(x,g(x));
  endfor;
  q:=q--(5,g(5));

  %clip function path to clipping path
  q:=q cutbefore cpath;
  q:=reverse q;
  q:=q cutbefore cpath;

  %initialize scale
  numeric u; 10u=2in;

  %draw the grid
  for k=-5u step 1u until 5u:
    draw (k,-5u)--(k,5u) withcolor gridlines;
    draw (-5u,k)--(5u,k) withcolor gridlines;
  endfor;

  %draw axes
  drawdblarrow (-5.2u,0)--(5.2u,0);
  drawdblarrow (0,-5.2u)--(0,5.2u);

  %label axes
  label.rt(btex $x$ etex, (5.2u,0));
  label.top(btex $y$ etex, (0,5.2u));
  label.bot(btex $5$ etex, (5u,0));
  label.lft(btex $5$ etex, (0,5u));

  %scale function patha
  p:=p scaled u; q:=q scaled u;

  %draw function paths
  drawdblarrow p withcolor blue;
  drawdblarrow q withcolor red;

  %draw plotted points
  for x=-2 step 1 until 2:
    drawdot ((x,f(x)) scaled u) withpen pencircle scaled 4pt withcolor
    blue;
    drawdot ((x,g(x)) scaled u) withpen pencircle scaled 4pt withcolor
    red;
  endfor;

\stopuseMPgraphic


\startuseMPgraphic{transleft}

  %define function f(x)=x^2
  vardef f(expr x)=
    x*x
  enddef;

  %define function g(x)=(1/2)x^2
  vardef g(expr x)=
    (x+1)*(x+1)
  enddef;

  %define clipping path
  path cpath;
  cpath:=(-5,-5)--(5,-5)--(5,5)--(-5,5)--cycle;

  %create function path for f
  path p; p:=(-5,f(-5));
  for x=-5 step .1 until 5:
    p:=p--(x,f(x));
  endfor;
  p:=p--(5,f(5));

  %clip function path to clipping path
  p:=p cutbefore cpath;
  p:=reverse p;
  p:=p cutbefore cpath;

  %create function path for g
  path q; q:=(-5,g(-5));
  for x=-5 step .1 until 5:
    q:=q--(x,g(x));
  endfor;
  q:=q--(5,g(5));

  %clip function path to clipping path
  q:=q cutbefore cpath;
  q:=reverse q;
  q:=q cutbefore cpath;

  %initialize scale
  numeric u; 10u=2in;

  %draw the grid
  for k=-5u step 1u until 5u:
    draw (k,-5u)--(k,5u) withcolor gridlines;
    draw (-5u,k)--(5u,k) withcolor gridlines;
  endfor;

  %draw axes
  drawdblarrow (-5.2u,0)--(5.2u,0);
  drawdblarrow (0,-5.2u)--(0,5.2u);

  %label axes
  label.rt(btex $x$ etex, (5.2u,0));
  label.top(btex $y$ etex, (0,5.2u));
  label.bot(btex $5$ etex, (5u,0));
  label.lft(btex $5$ etex, (0,5u));

  %scale function patha
  p:=p scaled u; q:=q scaled u;

  %draw function paths
  drawdblarrow p withcolor blue;
  drawdblarrow q withcolor red;

  %draw plotted points
  for x=-2 step 1 until 2:
    drawdot ((x,f(x)) scaled u) withpen pencircle scaled 4pt withcolor
    blue;
  endfor;
  for x=-3 step 1 until 1:
    drawdot ((x,g(x)) scaled u) withpen pencircle scaled 4pt withcolor
    red;
  endfor;

\stopuseMPgraphic


\startuseMPgraphic{verttrans}

  %define function f(x)=x^2
  vardef f(expr x)=
    x*x
  enddef;

  %define function g(x)=(1/2)x^2
  vardef g(expr x)=
    (x*x)+1
  enddef;

  %define clipping path
  path cpath;
  cpath:=(-5,-5)--(5,-5)--(5,5)--(-5,5)--cycle;

  %create function path for f
  path p; p:=(-5,f(-5));
  for x=-5 step .1 until 5:
    p:=p--(x,f(x));
  endfor;
  p:=p--(5,f(5));

  %clip function path to clipping path
  p:=p cutbefore cpath;
  p:=reverse p;
  p:=p cutbefore cpath;

  %create function path for g
  path q; q:=(-5,g(-5));
  for x=-5 step .1 until 5:
    q:=q--(x,g(x));
  endfor;
  q:=q--(5,g(5));

  %clip function path to clipping path
  q:=q cutbefore cpath;
  q:=reverse q;
  q:=q cutbefore cpath;

  %initialize scale
  numeric u; 10u=2in;

  %draw the grid
  for k=-5u step 1u until 5u:
    draw (k,-5u)--(k,5u) withcolor gridlines;
    draw (-5u,k)--(5u,k) withcolor gridlines;
  endfor;

  %draw axes
  drawdblarrow (-5.2u,0)--(5.2u,0);
  drawdblarrow (0,-5.2u)--(0,5.2u);

  %label axes
  label.rt(btex $x$ etex, (5.2u,0));
  label.top(btex $y$ etex, (0,5.2u));
  label.bot(btex $5$ etex, (5u,0));
  label.lft(btex $5$ etex, (0,5u));

  %scale function patha
  p:=p scaled u; q:=q scaled u;

  %draw function paths
  drawdblarrow p withcolor blue;
  drawdblarrow q withcolor red;

  %draw plotted points
  for x=-2 step 1 until 2:
    drawdot ((x,f(x)) scaled u) withpen pencircle scaled 4pt withcolor
    blue;
    drawdot ((x,g(x)) scaled u) withpen pencircle scaled 4pt withcolor
    red;
  endfor;

\stopuseMPgraphic


\startuseMPgraphic{series1}

  %define function f(x)=-x^2
  vardef f(expr x)=
    -x*x
  enddef;

  %define clipping path
  path cpath;
  cpath:=(-5,-5)--(5,-5)--(5,5)--(-5,5)--cycle;

  %create function path for f
  path p; p:=(-5,f(-5));
  for x=-5 step .1 until 5:
    p:=p--(x,f(x));
  endfor;
  p:=p--(5,f(5));

  %clip function path to clipping path
  p:=p cutbefore cpath;
  p:=reverse p;
  p:=p cutbefore cpath;

  %initialize scale
  numeric u; 10u=1.5in;

  %draw the grid
  for k=-5u step 1u until 5u:
    draw (k,-5u)--(k,5u) withcolor gridlines;
    draw (-5u,k)--(5u,k) withcolor gridlines;
  endfor;

  %draw axes
  drawdblarrow (-5.2u,0)--(5.2u,0);
  drawdblarrow (0,-5.2u)--(0,5.2u);

  %label axes
  label.rt(btex $x$ etex, (5.2u,0));
  label.top(btex $y$ etex, (0,5.2u));
  label.bot(btex $5$ etex, (5u,0));
  label.lft(btex $5$ etex, (0,5u));

  %scale function patha
  p:=p scaled u; 

  %draw function paths
  drawdblarrow p withcolor blue;

\stopuseMPgraphic


\startuseMPgraphic{series2}

  %define function f(x)=-x^2
  vardef f(expr x)=
    -(x+2)*(x+2)
  enddef;

  %define clipping path
  path cpath;
  cpath:=(-5,-5)--(5,-5)--(5,5)--(-5,5)--cycle;

  %create function path for f
  path p; p:=(-5,f(-5));
  for x=-5 step .1 until 5:
    p:=p--(x,f(x));
  endfor;
  p:=p--(5,f(5));

  %clip function path to clipping path
  p:=p cutbefore cpath;
  p:=reverse p;
  p:=p cutbefore cpath;

  %initialize scale
  numeric u; 10u=1.5in;

  %draw the grid
  for k=-5u step 1u until 5u:
    draw (k,-5u)--(k,5u) withcolor gridlines;
    draw (-5u,k)--(5u,k) withcolor gridlines;
  endfor;

  %draw axes
  drawdblarrow (-5.2u,0)--(5.2u,0);
  drawdblarrow (0,-5.2u)--(0,5.2u);

  %label axes
  label.rt(btex $x$ etex, (5.2u,0));
  label.top(btex $y$ etex, (0,5.2u));
  label.bot(btex $5$ etex, (5u,0));
  label.lft(btex $5$ etex, (0,5u));

  %scale function patha
  p:=p scaled u; 

  %draw function paths
  drawdblarrow p withcolor blue;

\stopuseMPgraphic


\startuseMPgraphic{series3}

  %define function f(x)=-x^2
  vardef f(expr x)=
    -(x+2)*(x+2)+3
  enddef;

  %define clipping path
  path cpath;
  cpath:=(-5,-5)--(5,-5)--(5,5)--(-5,5)--cycle;

  %create function path for f
  path p; p:=(-5,f(-5));
  for x=-5 step .1 until 5:
    p:=p--(x,f(x));
  endfor;
  p:=p--(5,f(5));

  %clip function path to clipping path
  p:=p cutbefore cpath;
  p:=reverse p;
  p:=p cutbefore cpath;

  %initialize scale
  numeric u; 10u=1.5in;

  %draw the grid
  for k=-5u step 1u until 5u:
    draw (k,-5u)--(k,5u) withcolor gridlines;
    draw (-5u,k)--(5u,k) withcolor gridlines;
  endfor;

  %draw axes
  drawdblarrow (-5.2u,0)--(5.2u,0);
  drawdblarrow (0,-5.2u)--(0,5.2u);

  %label axes
  label.rt(btex $x$ etex, (5.2u,0));
  label.top(btex $y$ etex, (0,5.2u));
  label.bot(btex $5$ etex, (5u,0));
  label.lft(btex $5$ etex, (0,5u));

  %scale function patha
  p:=p scaled u; 

  %draw function paths
  drawdblarrow p withcolor blue;

\stopuseMPgraphic


\startuseMPgraphic{axis1}

  %define function f(x)=-(x+2)^2+3
  vardef f(expr x)=
    -(x+2)*(x+2)+3
  enddef;

  %define clipping path
  path cpath;
  cpath:=(-5,-5)--(5,-5)--(5,5)--(-5,5)--cycle;

  %create function path for f
  path p; p:=(-5,f(-5));
  for x=-5 step .1 until 5:
    p:=p--(x,f(x));
  endfor;
  p:=p--(5,f(5));

  %clip function path to clipping path
  p:=p cutbefore cpath;
  p:=reverse p;
  p:=p cutbefore cpath;

  %initialize scale
  numeric u; 10u=2in;

  %draw the grid
  for k=-5u step 1u until 5u:
    draw (k,-5u)--(k,5u) withcolor gridlines;
    draw (-5u,k)--(5u,k) withcolor gridlines;
  endfor;

  %draw axes
  drawdblarrow (-5.2u,0)--(5.2u,0);
  drawdblarrow (0,-5.2u)--(0,5.2u);

  %label axes
  label.rt(btex $x$ etex, (5.2u,0));
  label.top(btex $y$ etex, (0,5.2u));
  label.bot(btex $5$ etex, (5u,0));
  label.lft(btex $5$ etex, (0,5u));

  %scale function patha
  p:=p scaled u; 

  %draw function paths
  drawdblarrow p withcolor blue;

  %axis of symmetry
  drawdblarrow (-2u,-5u)--(-2u,5u) withcolor red;

  %label axis and vertex
  drawdot (-2u,3u) withpen pencircle scaled 4pt;
  label.ulft(btex $(-2,3)$ etex, (-2u,3u));
  label.bot(btex $x=-2$ etex, (-2u,-5u));

\stopuseMPgraphic


\startuseMPgraphic{axis2}

  %initialize scale
  numeric u; 10u=1.5in;

  %draw the grid
  for k=-5u step 1u until 5u:
    draw (k,-5u)--(k,5u) withcolor gridlines;
    draw (-5u,k)--(5u,k) withcolor gridlines;
  endfor;

  %draw axes
  drawdblarrow (-5.2u,0)--(5.2u,0);
  drawdblarrow (0,-5.2u)--(0,5.2u);

  %label axes
  label.rt(btex $x$ etex, (5.2u,0));
  label.top(btex $y$ etex, (0,5.2u));
  label.bot(btex $5$ etex, (5u,0));
  label.lft(btex $5$ etex, (0,5u));

  %axis of symmetry
  drawdblarrow (-2u,-5u)--(-2u,5u) withcolor red;

  %label axis and vertex
  drawdot (-2u,3u) withpen pencircle scaled 4pt;
  label.ulft(btex $(-2,3)$ etex, (-2u,3u));
  label.bot(btex $x=-2$ etex, (-2u,-5u));

\stopuseMPgraphic


\startuseMPgraphic{axis3}

  %initialize scale
  numeric u; 10u=1.5in;

  %draw the grid
  for k=-5u step 1u until 5u:
    draw (k,-5u)--(k,5u) withcolor gridlines;
    draw (-5u,k)--(5u,k) withcolor gridlines;
  endfor;

  %draw axes
  drawdblarrow (-5.2u,0)--(5.2u,0);
  drawdblarrow (0,-5.2u)--(0,5.2u);

  %label axes
  label.rt(btex $x$ etex, (5.2u,0));
  label.top(btex $y$ etex, (0,5.2u));
  label.bot(btex $5$ etex, (5u,0));
  label.lft(btex $5$ etex, (0,5u));

  %axis of symmetry
  drawdblarrow (-2u,-5u)--(-2u,5u) withcolor red;

  %label axis and vertex
  drawdot (-2u,3u) withpen pencircle scaled 4pt;
  label.ulft(btex $(-2,3)$ etex, (-2u,3u));
  label.bot(btex $x=-2$ etex, (-2u,-5u));

  %draw plotted poitns
  drawdot (-1u,2u) withpen pencircle scaled 4pt;
  drawdot (0u,-1u) withpen pencircle scaled 4pt;

\stopuseMPgraphic


\startuseMPgraphic{axis4}

  %initialize scale
  numeric u; 10u=1.5in;

  %draw the grid
  for k=-5u step 1u until 5u:
    draw (k,-5u)--(k,5u) withcolor gridlines;
    draw (-5u,k)--(5u,k) withcolor gridlines;
  endfor;

  %draw axes
  drawdblarrow (-5.2u,0)--(5.2u,0);
  drawdblarrow (0,-5.2u)--(0,5.2u);

  %label axes
  label.rt(btex $x$ etex, (5.2u,0));
  label.top(btex $y$ etex, (0,5.2u));
  label.bot(btex $5$ etex, (5u,0));
  label.lft(btex $5$ etex, (0,5u));

  %axis of symmetry
  drawdblarrow (-2u,-5u)--(-2u,5u) withcolor red;

  %label axis and vertex
  drawdot (-2u,3u) withpen pencircle scaled 4pt;
  label.ulft(btex $(-2,3)$ etex, (-2u,3u));
  label.bot(btex $x=-2$ etex, (-2u,-5u));

  %draw plotted points
  drawdot (-1u,2u) withpen pencircle scaled 4pt;
  drawdot (0u,-1u) withpen pencircle scaled 4pt;
  drawdot (-3u,2u) withpen pencircle scaled 4pt;
  drawdot (-4u,-1u) withpen pencircle scaled 4pt;

\stopuseMPgraphic


\startuseMPgraphic{axis5}

  %define function f(x)=-x^2
  vardef f(expr x)=
    -(x+2)*(x+2)+3
  enddef;

  %define clipping path
  path cpath;
  cpath:=(-5,-5)--(5,-5)--(5,5)--(-5,5)--cycle;

  %create function path for f
  path p; p:=(-5,f(-5));
  for x=-5 step .1 until 5:
    p:=p--(x,f(x));
  endfor;
  p:=p--(5,f(5));

  %clip function path to clipping path
  p:=p cutbefore cpath;
  p:=reverse p;
  p:=p cutbefore cpath;

  %initialize scale
  numeric u; 10u=2in;

  %draw the grid
  for k=-5u step 1u until 5u:
    draw (k,-5u)--(k,5u) withcolor gridlines;
    draw (-5u,k)--(5u,k) withcolor gridlines;
  endfor;

  %draw axes
  drawdblarrow (-5.2u,0)--(5.2u,0);
  drawdblarrow (0,-5.2u)--(0,5.2u);

  %label axes
  label.rt(btex $x$ etex, (5.2u,0));
  label.top(btex $y$ etex, (0,5.2u));
  label.bot(btex $5$ etex, (5u,0));
  label.lft(btex $5$ etex, (0,5u));

  %scale function patha
  p:=p scaled u; 

  %draw function paths
  drawdblarrow p withcolor blue;

  %axis of symmetry
  drawdblarrow (-2u,-5u)--(-2u,5u) withcolor red;

  %label axis and vertex
  drawdot (-2u,3u) withpen pencircle scaled 4pt;
  label.ulft(btex $(-2,3)$ etex, (-2u,3u));
  label.bot(btex $x=-2$ etex, (-2u,-5u));

  %draw plotted points
  drawdot (-1u,2u) withpen pencircle scaled 4pt;
  drawdot (0u,-1u) withpen pencircle scaled 4pt;
  drawdot (-3u,2u) withpen pencircle scaled 4pt;
  drawdot (-4u,-1u) withpen pencircle scaled 4pt;

\stopuseMPgraphic

\starttext

\startMPpage
  \includeMPgraphic{yeqx2}
\stopMPpage


\startMPpage
  \includeMPgraphic{yeq2x2}
\stopMPpage


\startMPpage
  \includeMPgraphic{yeqhalfx2}
\stopMPpage


\startMPpage
  \includeMPgraphic{yeqminusx2}
\stopMPpage


\startMPpage
  \includeMPgraphic{transleft}
\stopMPpage


\startMPpage
  \includeMPgraphic{verttrans}
\stopMPpage


\startMPpage
  \includeMPgraphic{series1}
\stopMPpage

\startMPpage
  \includeMPgraphic{series2}
\stopMPpage

\startMPpage
  \includeMPgraphic{series3}
\stopMPpage

\startMPpage
  \includeMPgraphic{axis1}
\stopMPpage

\startMPpage
  \includeMPgraphic{axis2}
\stopMPpage

\startMPpage
  \includeMPgraphic{axis3}
\stopMPpage

\startMPpage
  \includeMPgraphic{axis4}
\stopMPpage

\startMPpage
  \includeMPgraphic{axis5}
\stopMPpage


\stoptext

%%% Local Variables:
%%% mode: conTeXt-en
%%% End: