%% 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.3 mul add t 0.3 mul add 1 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 0 settrange {xdet 2.5 add} {ydet} courbeparam 0 2.5 settrange {xdet 2.5 add} {ydet 1.3 add} courbeparam [2.49 0 ydet 2.5 0 ydet] (-[) ligne [2.5 0 ydet 1.3 add 2.51 0 ydet 1.3 add] (]-) ligne [2.5 1.5] points 1 setlinewidth vert pointilles [0.5 0 0.5 -2 ydet] (-) ligne [2.5 0 2.5 0 ydet 1.3 add] (-) ligne [5 0 5 2.5 ydet 1.3 add] (-) ligne %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %% texte %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% setTimesItalic vert $a$ 0.5 -0.4 [2 dup] cctexlabel % % $d$ % % 2.5 -0.4 [2 dup] cctexlabel $b$ 5 -0.4 [2 dup] cctexlabel