%% auteur : 

-5 7 setxrange
-7 6 setyrange


quadrillage
.7 setlinewidth
1 1 setsubtkstep
tracerepere



<tex>
$\vec \imath $
</tex>
.4 -.1 [1.5 dup] dctexlabel

<tex>
$\vec \jmath $ 
</tex>
-.1 .2 [1.5 dup] ultexlabel

setTimesItalic
   (x) xmax 0 (-10 0) ultext
   (y) 0 ymax  (0 -10) drtext
(O) O dltext