-5 8 setxrange
-3 8 setyrange

.5 .5 setquadrillagestep
quadrillage

currentlinewidth 2 mul setlinewidth

tracerepere
marks

medium setlinewidth
0 3 2 3 droite   %% D3
0 3 3 0 droite   %% D2
O 1 2 droite	 %% D1
0 -1 1 0 droite  %% D4



setTimesItalic
   (D) -2 3 ultext
   (3) indice
   (D) -2 5 urtext
   (2) indice
   (D) 3 5 urtext
   (1) indice
   (D) 6 5 drtext
   (4) indice