%% PhS
%%
%% échelle et étendue de l'image
60 setxunit
-1.2 4.5 setxrange
-1.2 4.5 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 dup mul mul 0.6 mul
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
-1.5 2 settrange
{xdet 2.1 add} {ydet 0.7 add} courbeparam
orange
-1.5 2 settrange
{ydet 0.7 add} {xdet 2.1 add} courbeparam
vert
1 setlinewidth
[1.1 0.7 3.1 0.7] (<->) ligne
[0.7 1.1 0.7 3.1] (<->) ligne
[3.5 1.4 ydet 0.7 add -0.35 -1.2 addv 3.5 1.4 ydet 0.7 add 0.35 1.2 addv] (<->) ligne
[1.4 ydet 0.7 add 3.5 -1.2 -0.35 addv 1.4 ydet 0.7 add 3.5 1.2 0.35 addv] (<->) ligne
noir
[2.1 0.7 0.7 2.1 3.5 1.4 ydet 0.7 add 1.4 ydet 0.7 add 3.5] points
rouge
mixte
[-3 -3 6 6] (-) ligne
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% texte
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
setTimesItalic
coul1
<latex>
$\mathcal{C}_f$
</latex>
3.9 1 [3 dup] cctexlabel
orange
<latex>
$\mathcal{C}_{f^{-1}}$
</latex>
1 3.9 [3 dup] cctexlabel
|