7 lblPreambule := "\usepackage[frenchb]{babel}" &
8 "\usepackage[garamond]{mathdesign}" &
9 "\usepackage{amsmath}";
17 vardef f(expr t) = 1/t + 1/(t+1) enddef;
18 vardef g(expr t) = 1/t + 1/(1+2*t+t**2) enddef;
19 vardef p(expr x) = x*(x+2)+2 enddef;
21 def avecCrayon(expr t,c) = withpen pencircle scaled t withcolor c enddef;
28 Repere(10,10,5,5,1,1);
31 Graduations; Unites(1);
33 drawoptions(withcolor LightSlateGrey);
34 trace Droite(origine,Point(1,1));
35 trace Representation(p,-3,1,20);
37 trace Courbe(f,g,-20,-1.1,300) avecCrayon(1.5,Teal);
38 trace Courbe(f,g,-0.9,-0.1,300) avecCrayon(1.5,Teal);
39 trace Courbe(f,g,0.1,20,300) avecCrayon(1.5,Teal);
43 pointe Point(-0.526,-0.140);