%% auteur :
-5 7 setxrange
-7 6 setyrange
quadrillage
.7 setlinewidth
1 1 setsubtkstep
tracerepere
$\vec \imath $
.4 -.1 [1.5 dup] dctexlabel
$\vec \jmath $
-.1 .2 [1.5 dup] ultexlabel
setTimesItalic
(x) xmax 0 (-10 0) ultext
(y) 0 ymax (0 -10) drtext
(O) O dltext