input geometriesyr16;

figuremainlevee(0,0,8u,6u);
pair A,B,C,D,E,F;
A=u*(0.75,0.75);
B=u*(6.75,0.75);
C=u*(6.75,2.75);
D=u*(3.75,2.75);
E=u*(3.75,4.75);
F=u*(0.75,4.75);
trace polygone(A,B,C,D,E,F);
trace codeperp(A,B,C,5);
trace codeperp(B,C,D,5);
trace codeperp(C,D,E,5);
trace codeperp(D,E,F,5);
trace codeperp(E,F,A,5);
trace codesegments(F,E,D,C,2);
trace codesegments(B,C,D,E,4);
trace appelation(F,E,3mm,btex 4~cm etex);
trace appelation(D,E,-3mm,btex 3~cm etex);
finmainlevee;

figuremainlevee(0,0,8u,6u);
pair A,B,C,D;
A=u*(0.75,0.75);
B=u*(3,0.75);
C=u*(5.75,3);
D=u*(3,3);
trace polygone(A,B,C,D);
trace segment(D,B);
trace codeperp(A,B,D,5);
trace codeperp(B,D,C,5);
trace codesegments(A,B,B,D,1);
trace appelation(A,B,-2mm,btex 3~cm etex);
trace appelation(D,C,2mm,btex 4~cm etex);
finmainlevee;

end