7 lblPreambule := "\usepackage[frenchb]{babel}" &
8 "\usepackage[garamond]{mathdesign}" &
9 "\usepackage{amsmath}\usepackage{mflogo}";
17 vardef f(expr x) = x*(Pi-x) enddef; % f
18 vardef g(expr x) = Pi-2*x enddef; % f'
19 vardef h(expr x) = -2 enddef; % f''
21 def avecCrayon(expr t,c) = withpen pencircle scaled t withcolor c enddef;
27 Repere(10,6,5,3,.8,0.8);
32 trace (Pi,-2)--(Pi,2) dashed evenly;
33 trace (-Pi,-2)--(-Pi,2) dashed evenly;
35 trace Representation(f,0,Pi,100) avecCrayon(1.5,Indigo);
36 trace (Representation(f,0,Pi,100) scaled -1) avecCrayon(1.5,Indigo);
37 trace (Representation(f,0,Pi,100) shifted (-2*Pi,0)) avecCrayon(1.5,Indigo);
38 trace (Representation(f,0,Pi,100) scaled -1 shifted (2*Pi,0)) avecCrayon(1.5,Indigo);
40 trace Representation(g,0,Pi,100) avecCrayon(1.5,Olive);
41 trace (Representation(g,0,Pi,100) xscaled -1) avecCrayon(1.5,Olive);
42 trace (Representation(g,0,Pi,100) shifted (-2*Pi,0)) avecCrayon(1.5,Olive);
43 trace (Representation(g,0,Pi,100) xscaled -1 shifted (2*Pi,0)) avecCrayon(1.5,Olive);
45 trace Representation(h,0,Pi,100) avecCrayon(1.5,Orange);
46 trace (Representation(h,0,Pi,100) scaled -1) avecCrayon(1.5,Orange);
47 trace (Representation(h,0,Pi,100) shifted (-2*Pi,0)) avecCrayon(1.5,Orange);
48 trace (Representation(h,0,Pi,100) scaled -1 shifted (2*Pi,0)) avecCrayon(1.5,Orange);
55 label.urt(TEX("\(-\pi\)"), (-Pi,0) gddEnPlace) withcolor Peru;
56 label.ulft(TEX("\(\pi\)"), (Pi,0) gddEnPlace) withcolor Peru;
59 trace (0,-0.5)--(1,-0.5) avecCrayon(1.5,Indigo);
60 label.rt(TEX("\(f\)"), (1,-0.5) gddEnPlace);
61 trace (2,-0.5)--(3,-0.5) avecCrayon(1.5,Olive);
62 label.rt(TEX("\(f'\)"), (3,-0.5) gddEnPlace);
63 trace (4,-0.5)--(5,-0.5) avecCrayon(1.5,Orange);
64 label.rt(TEX("\(f''\)"), (5,-0.5) gddEnPlace);
66 label.lft(TEX("\MP{}"), (10,-0.5) gddEnPlace);