%  En préambule,  les  sources metapost.  Si  vous lancez  latex  sur ce  fichier,  il vous  placera
% automatiquement le fichier .mp dans le répertoire courant. 


\begin{filecontents*}{semilog.mp}




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

verbatimtex
%&latex
\documentclass{article}
\usepackage[upright]{fourier}
\usepackage{preambule}
\begin{document}
etex



def ilogx(expr i,n,couleur) =
    numeric _a,_b,_c,_d,_m;
    _m:=m;
    _a = floor(_xmin)*_ux+_ox; _b = floor(_ymin)*_uy+_oy;
    _c = (floor(_xmax)+1)*_ux+_ox; _d = (floor(_ymax)+1)*_uy+_oy;
     pickup pencircle scaled  0.1pt;

     path p;
     p:=(0,_b)--(0,_d);
      for k:=0 step .5 until 3 :
    for j:=.2 step .2 until 10 :
      draw p shifted ((i*(k*ln(10)+ln(j))+(1-i)*(10**k))*cm,0);
    endfor;
    endfor;
   
enddef;


for l:=0 step .01 until 1.01 :
  

beginfig( 100*l)


%%%%%%%%%%%%%%%%%%%%%%%
vardef fx(expr t)=
t
enddef;

vardef fy(expr t)=
           3-2*((1-l)*ln(t)+l*t)                   
enddef;
%%%%%%%%%%%%%%%%%%%%%
repere(0,0,-0.5,15,-5,5,1.25cm,1cm);
r_axes;
r_origine;

ilogx(l,1,0.85white);
quad_y(1,0.85white);

draw f_courbe(fx,fy,0.01,15,100)withpen pencircle scaled 1.5bp withcolor red;

r_fin;
endfig;

endfor;





end





\end{filecontents*}




\documentclass{article}

\usepackage{multido,filecontents}
\usepackage{graphicx}
\usepackage[landscape,a4paper,margin=0.2cm]{geometry}

\begin{document}
\multido{\i=0+1}{101}{\includegraphics{semilog.\i}\newpage}
\end{document}
