%% PhS
%%

50 setxunit
0 6.5 setxrange
-3.5 3 setyrange

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% definition des points
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

/a {3} def

/A {2 3} def
/B {2 -3.5} def
/H {2 1.2} def
/M {4 1.2} def
/F {5.5 -0.5} def
/D {2.3 2.4} def



%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% definition d'une couleur
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

/coul1 {120 255 div 70 255 div 9 255 div setrgbcolor} def





%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% tracés
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

1.5 setlinewidth
noir
[A B] ligne
coul1
[H M F] ligne
noir
[H M F] points


setTimesItalic
bleu
   (H) H [2 dup] cltext
noir
   (M) M [2 dup] uctext
rouge
   (F) F [2 dup] drtext



%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% texte
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

noir
<latex>
$ \mathcal{D} $
</latex>
D [2 dup] cctexlabel


<latex>
\fbox{$ MF=e\cdot MH $}
</latex>
4.2 -2.1 [2 dup] cctexlabel