Présentation de 068.jps

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


1 setlinewidth
vert
pointilles
-2 2.5 settrange
{xdet 2.5 add} {ydet 0.4 add} courbeparam
{xdet 2.5 add} {ydet -0.4 add} courbeparam

bleu
continu
[0.5 2.6 0.8 2.6] (-) ligne
[0.8 2.4 1.1 2.4] (-) ligne
[1.1 2.1 1.4 2.1] (-) ligne
[1.4 1.8 1.7 1.8] (-) ligne
[1.7 1.55 2.1 1.55] (-) ligne
[2.1 1.25 3.5 1.25] (-) ligne
[3.5 1.4 4.7 1.4] (-) ligne
[4.7 1.15 5 1.15] (-) ligne

rouge
[0.5 2.05 1 2.05]  (-) ligne
[1 1.75 1.35 1.75] (-) ligne
[1.35 1.4 1.7 1.4] (-) ligne
[1.7 1.15 2 1.15] (-) ligne
[2 0.9 4 0.9] (-) ligne
[4 1.05 4.7 1.05] (-) ligne
[4.7 0.75 5 0.75] (-) ligne


noir
continu
[0.5 0 0.5 -2 ydet 0.4 add] (-) ligne
[5 0 5 2.5 ydet 0.4 add] (-) ligne


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

%% texte

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

setTimesItalic