Fichier 1317.jps — Modifié le 2 Décembre 2007 à 14 h 39
%%% 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