input courbescp13;

beginfig(1);
  depart((0,0),(10,7),(5,1),2,1);
  draw grille(0.1);
  draw axes;
  graduantx.bot;
  graduanty.llft;
  draw courbe1(-2.5,2.5,100,x**2) withcolor orange;
  draw labelise1(btex $y=x^2$ etex,0.1);
  draw tangente1(0);
  draw tangente1(2);
endfig;
end