input newcourbes;
input couleur;
input geometriesyr16;
input TEX;


verbatimtex
%&latex
\documentclass{article}
\usepackage[upright]{fourier}
\usepackage{color}
\def\E{\mathrm{e}}
\let\ve\vec
\def\DR{\mathcal{D}}
\def\CR{\mathcal{C}}
\def\HR{\mathcal{H}}
\newcommand{\Mathbold}[1]{\mbox{\boldmath$#1$\unboldmath}}
\begin{document}
etex
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% aXE

beginfig(9)



repere(0,0,-5,7,-1,1,1cm,1cm);

%r_axes;

drawarrow r_p(-6.5,0)..r_p(6.5,0) ;
grad_x(1,1,red);
label.bot(btex 0 etex,r_p(0,-.2));
draw r_p(0,0.2)..r_p(0,-0.2);

%r_fin;

endfig;

end