Présentation de 070.jps

/syracuse/bbgraf/albums/integration/070.jpg
%% PhS %% %% échelle et étendue de l'image 60 setxunit -1 6 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 coul1 continu -2 2.5 settrange {xdet 2.5 add} {ydet} courbeparam /fillstyle {hachure} def 0.5 5 {-2.5 add ydet} Fillcourbe 1 setlinewidth noir continu [0.5 0 0.5 -2 ydet] (-) ligne [5 0 5 2.5 ydet] (-) ligne rouge 2 setlinewidth [0 1.836 5.5 1.836] (-) ligne 1 setlinewidth pointilles [5 2.5 ydet 5 1.836] (-) ligne %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %% texte %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% setTimesItalic noir <latex> $\displaystyle\frac{1}{b-a}\int_{a}^{b}f$ </latex> 4 3 [2 dup] cctexlabel vert <latex> $a$ </latex> 0.5 -0.3 [2 dup] cctexlabel <latex> $b$ </latex> 5 -0.4 [2 dup] cctexlabel