%% PhS gh %% %% Èchelle et Ètendue de l'image 60 setxunit -1 6.5 setxrange -1 4 setyrange %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %% DANGER !! Il ne faut pas utiliser de variables %% DANGER !! qui commence par les lettres : %% DANGER !! xmin, xmax, ymin et ymax... %% DANGER !! Utiliser x_min, y_min... %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %% procÈdures %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %% on donne ici x(t) /xdet { 1 dict begin /t exch def t end } def %% on donne ici y(t) /ydet { 1 dict begin /t exch def t dup mul dup mul -0.05 mul t dup mul 0.4 mul add t -0.3 mul add 1.5 add end } def %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %% dÈfinitions des couleurs %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% /coul1 {120 255 div 70 255 div 9 255 div setrgbcolor} def %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %% tracÈs %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %% tracÈ des axes et du point Origine 1 setlinewidth 15 setfontsize noir continu traceaxes marks tracerepere 2 setlinewidth noir continu -2 2.5 settrange {xdet 2.5 add} {ydet} courbeparam /fillstyle {hachure} def 1 setlinewidth coul1 continu [0.5 0 0.5 -2 ydet] (-) ligne [5 0 5 2.5 ydet] (-) ligne /x1 0.5 def /x2 1.625 def /x3 2.75 def /x4 3.875 def /x5 5 def [x1 0 x1 x2 -2.5 add ydet x2 dup -2.5 add ydet x2 0] polygone* [x2 0 x2 x3 -2.5 add ydet x3 dup -2.5 add ydet x3 0] polygone* [x3 0 x3 x4 -2.5 add ydet x4 dup -2.5 add ydet x4 0] polygone* [x4 0 x4 x5 -2.5 add ydet x5 dup -2.5 add ydet x5 0] polygone* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %% texte %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% setTimesItalic noir $\displaystyle S_n(f)=\frac{(b-a)}{n}\sum_{i=1}^{n}f(a_i)$ 3.9 3.2 [1.8 dup] cctexlabel coul1 $\xi_{i}=a_{i+1},\; \forall i$ 2 -.5 [1.8 dup] cctexlabel