Source
%%% somme de 2 vecteurs

%%% les donnees

-4 6 setxrange
-2.1 6 setyrange

/A {-3 -1} def     %% origine pour les vecteurs
/u {0 4.8} def      %% le vecteur u
/v {3.1177 1.8} def     %% le vecteur v

%%% les calculs

/arrowscale {1.5 1.5} def   %% taille des fleches

%% M defini vectoriellement par AM = u + v
/M {
   A 
   u addv 
   v addv
} def

%% A' tel que AA' = u
/A' {A u addv} def
%% A" tel que AA" = v
/A" {A v addv} def

quadrillage


A u vect       %% trace du vecteur u
A v vect       %% trace du vecteur v

pointilles
[A' M A"] ligne

continu
1.5 setlinewidth

A M (->) line

%% la legende

<tex>
$\vec F1$
</tex>
A A' milieu [2 2] ultexlabel

<tex>
$\vec F2$
</tex>
A A" milieu [2 2] dctexlabel

<tex>
$\vec R$
</tex>
A M milieu [2 2] {A M angle} uctexlabel