Fichier figure005.mp (figure 2) — Modifié le 23 Mars 2008 à 20 h 38

figure005.mp (figure 2)
Source

input geometriesyr16;

figure(0,0,15u,8u);
pair A,B,C,D,F,G;
A=u*(7,3);
B-A=u*(4,-2);
C-B=u*(-1,1.5);
D-C=u*(-1,1);
path cc;
cc=polygone(A,B,C,D);
F=u*(11,4);
G-F=u*(-5,1.5);
trace cc;
drawarrow F--G;
trace marquedemidroite(F,G);
trace appelation(G,F,2mm,btex $\overrightarrow{v}$ etex);
fin;

figure(0,0,15u,8u);
pair A,B,C,D,F,G;
A=u*(7,3);
B-A=u*(4,-2);
C-B=u*(-1,1.5);
D-C=u*(-1,1);
path cc;
cc=polygone(A,B,C,D);
F=u*(11,4);
G-F=u*(-5,1.5);
trace cc dashed evenly;
drawarrow F--G;
trace marquedemidroite(F,G);
trace appelation(G,F,2mm,btex $\overrightarrow{v}$ etex);
trace cc shifted(G-F);
fin;

end