Présentation de 167.jps

%% PhS

%% 


%% échelle et étendue de l'image

50 setxunit
-1.5 6  setxrange
-1.5 3  setyrange
/xgauche -6 def    %% c'est la limite gauche de l'image

/xdroite 6 def     %% c'est la limite droite de l'image

/ybasse  -4 def    %% c'est la limite basse de l'image

/yhaute  4 def     %% c'est la limite haute de l'image


10 4 point 

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%%  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...

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%



%% plages initiales pour les paramètres (peuvent être modifiées pour chaque fonctions tracées

/x_min -5 def
/x_max 5 def
/t_min -9 def
/t_max 9 def


%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%% 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 1 add div t abs sqrt mul 0.5 sub 1.5 mul t 0.1 mul add
end
	} def


%% dessine un bout de droite

/bddroite { %% Ax Ay Bx By kg (=proportion vers A) kd (=prop vers B) 

8 dict begin
	/kd exch def
	/kg exch def
	/By exch def
	/Bx exch def
	/B {Bx By} def
	/Ay exch def
	/Ax exch def
	/A {Ax Ay} def
	gsave
	[A A B vecteur kg mulv addv A A B vecteur kd mulv addv] ligne
	grestore
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 6 settrange
{xdet} {ydet} courbeparam

1 setlinewidth
noir
[1.5 dup ydet 4.4 dup ydet] (-) ligne

vert
pointilles
[1.5 0 1.5 dup ydet ] (-) ligne
[0 1.5 ydet 1.5 dup ydet] (-) ligne
[4.4 0 4.4 dup ydet ] (-) ligne

noir
[1.5 dup ydet 4.4 dup ydet] points

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%% texte

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

setTimesItalic


noir
<latex>
$\mathcal{C}_f$
</latex>
1 2.5 [2.5 dup] cctexlabel

vert
<latex>
$a$
</latex>
1.5 -0.3 [2 dup] cctexlabel

<latex>
$a+h$
</latex>
4.4 -0.3 [2 dup] cctexlabel

<latex>
$f(a)$
</latex>
-0.5 0.7 [2 dup] cctexlabel