7 lblPreambule := "\usepackage[frenchb]{babel}" &
8 "\usepackage[garamond]{mathdesign}" &
9 "\usepackage{amsmath}";
17 vardef f(expr t) = t*t+2/t enddef;
18 vardef g(expr t) = t+1/t enddef;
19 vardef fp(expr t) = t*t enddef;
20 vardef gp(expr t) = t enddef;
22 def avecCrayon(expr t,c) = withpen pencircle scaled t withcolor c enddef;
29 Repere(12,10,5,4,0.7,0.7);
32 Graduations; Unites(1);
34 drawoptions(withcolor LightSlateGrey);
35 trace Droite(Point(-4,-2),Point(4,2));
36 trace (3,0)--(3,2)--(0,2) dashed evenly;
37 trace (-1,0)--(-1,-2)--(0,-2) dashed evenly;
38 trace Courbe(fp,gp,-4,4,500);
40 trace Vecteur((3,2),(5,8/3)) avecCrayon(1,DeepPink);
41 trace Vecteur((-1,-2),(-2.8,-2)) avecCrayon(1,DeepPink);
42 trace Vecteur((-1,-2),(0.8,-2)) avecCrayon(1,DeepPink);
44 trace Courbe(f,g,-5,-0.1,100) avecCrayon(1.5,DarkCyan);
45 trace Courbe(f,g,0.1,5,100) avecCrayon(1.5,DarkCyan);