Source
%% auteur : Peric
28.54 setxunit
28.54 setyunit
/quadrillagegray 0.6 def
1 setquadrillagexstep
1 setquadrillageystep
quadrillage

/xmarkstyle {[2 dup] dltext} def
/ymarkstyle {[2 dup] ultext} def
-10 10 setxrange
-5 5 setyrange
%1 1 settkstep
%1 1 setmkstep
%ticks
%marks
%0 xmark
%traceaxes
%axesarrow
%unites


/t {2}def
/ahlength {10} def
2 setlinewidth 
1 setlinejoin

/A {-8 2} def
/B {5 1} def
[A B] {plus3} papply
[-8 2 -5 3] (->) ligne 
[-8 2 -6 -2] (->) ligne 
(A) A [t dup] ultext
(B) B [t dup] ultext

<latex>
$\overrightarrow{u}$
</latex>
-8 2 -5 3 milieu [t dup] uctexlabel
<latex>
$\overrightarrow{v}$
</latex>
-8 2 -6 -2 milieu [t dup] dltexlabel