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*t + 1/(t*t) enddef;
19 vardef fp(expr t) = 2*t+t*t enddef;
20 vardef gp(expr t) = t*t enddef;
22 def avecCrayon(expr t,c) = withpen pencircle scaled t withcolor c enddef;
29 Repere(10,10,2,1,1,1);
32 Graduations; Unites(1);
34 drawoptions(withcolor LightSlateGrey);
35 trace (3,0)--(3,2)--(-1,2)--(-1,0) dashed evenly;
36 trace (1,0)--(1,6)--(0,6) dashed evenly;
37 trace Courbe(fp,gp,-5,5,500);
39 trace Vecteur((-1,2),(-1,2)+(0.5,2)) avecCrayon(1,Crimson);
40 trace Vecteur((3,2),(4,2)) avecCrayon(1,Crimson);
41 trace Vecteur((3,2),(2,2)) avecCrayon(1,Crimson);
43 trace Courbe(f,g,-10,-0.05,300) avecCrayon(1.5,DarkGoldenrod);
44 trace Courbe(f,g,0.05,10,300) avecCrayon(1.5,DarkGoldenrod);