Fichier figure033.mp (figure 1) — Modifié le 23 Mars 2008 à 18 h 40

figure033.mp (figure 1)
Source

input geometriesyr16;

figuremainlevee(0,0,6u,5u);
pair T,R,I;
R=u*(0.75,0.75);
I=u*(4.25,0.75);
T=u*(0.75,3.25);
trace triangle(T,R,I);
trace codeperp(T,R,I,8);
nomme.llft(R);
nomme.ulft(T);
nomme.lrt(I);
finmainlevee;

end