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 {4 -1} def
/A1 {-7 2} def
/B1 {-8 3} def
/A2 {-5 0} def
/B2 {-6 3} def
/A3 {-2 2} def
/B3 {-4 1} def
/A4 {-8 -1} def
/B4 {-5 -3} def
/A5 {-4 -4} def
/B5 {0 -3} def



[A1 B1] (->) ligne
[A2 B2] (->) ligne
[A3 B3] (->) ligne
[A4 B4] (->) ligne
[A5 B5] (->) ligne
 
<latex>
$\overrightarrow{u_1}$
</latex>
A1 B1 milieu [t dup] dltexlabel
<latex>
$\overrightarrow{u_2}$
</latex>
A2 B2 milieu [t dup] urtexlabel
<latex>
$\overrightarrow{u_3}$
</latex>
A3 B3 milieu [t dup] drtexlabel
<latex>
$\overrightarrow{u_4}$
</latex>
A4 B4 milieu [t dup] dltexlabel
<latex>
$\overrightarrow{u_5}$
</latex>
A5 B5 milieu [t dup] drtexlabel

/C0 {6 0} def
/C1 {C0 A1 B1 vecteur translatepoint} def
/C2 {C1 A2 B2 vecteur translatepoint} def
/C3 {C2 A3 B3 vecteur translatepoint} def
/C4 {C3 A4 B4 vecteur translatepoint} def
/C5 {C4 A5 B5 vecteur translatepoint} def 

%[C0 C1 dup C2 dup C3 dup C4 dup C5] {4 array astore (->) ligne } 2 papply
%A1 A3 4 array  astore (->) ligne