%% PhS
%%
40 setxunit
0 8.5 setxrange
-3 3.2 setyrange
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% definition des points
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
/H1 {0 0} def
/H2 {8 0} def
/V1 {2 -3} def
/V2 {2 3.2} def
/K {2 0} def
/F {5 0} def
/D {1.8 -3} def
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% definition d'une couleur
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
/coul1 {120 255 div 70 255 div 9 255 div setrgbcolor} def
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% tracés
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
1.3 setlinewidth
[H1 H2] ligne
[V1 V2] ligne
[K F] points
coul1
150 210 8 0 5 Cercle
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% texte
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
setTimesItalic
noir
(K) K [2 dup] dltext
rouge
(F) F [2 dup] dctext
noir
<latex>
$ \mathcal{D} $
</latex>
2.4 -2.7 [2 dup] cctexlabel
<latex>
$ \Delta $
</latex>
7.5 0 [2 dup] dctexlabel
|