Fichier figure008.mp (figure 2) — Modifié le 23 Mars 2008 à 17 h 56

figure008.mp (figure 2)
Source

input geometriesyr16;
figuremainlevee(0,0,5u,5u);
pair B,F,D;
B=u*(0.75,4);
F-B=u*(3.5,0);
D-B=u*(1,-3);
trace polygone(B,F,D);
trace appelation(B,F,2mm,btex 4,5 etex);
trace appelation(B,D,-2mm,btex 3 etex);
trace appelation(D,F,-2mm,btex 3,5 etex);
nomme.lft(B);
nomme.rt(F);
nomme.bot(D);
finmainlevee;
figuremainlevee(0,0,5u,5u);
pair I,E,G;
I=u*(0.75,0.75);
E-I=u*(3,1);
G-E=u*(0.5,2.25);
trace polygone(I,E,G);
trace appelation(I,E,-2mm,btex 4,5 etex);
trace appelation(E,G,-2mm,btex 6 etex);
trace appelation(I,G,2mm,btex 7,5 etex);
nomme.lft(I);
nomme.lrt(E);
nomme.top(G);
finmainlevee;
end