%%% 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 $\vec F1$ A A' milieu [2 2] ultexlabel $\vec F2$ A A" milieu [2 2] dctexlabel $\vec R$ A M milieu [2 2] {A M angle} uctexlabel