input geometriesyr16;

figure(0,0,10u,8u);
pair A,B,C,D,E,F,G,H;
A=u*(1,1);
B-A=u*(0,6);
C-B=u*(8,0);
D-A=C-B;
E=1/3[A,B];
F=11/54[B,C];
G=1/3[D,C];
H=11/54[D,A];
trace polygone(A,B,C,D);
trace chemin(E,H,G,F);
trace hachurage(polygone(E,B,F,G,H),45,0.2,0);
trace codeperp(A,B,C,8);
trace codeperp(B,C,D,8);
trace codeperp(C,D,A,8);
trace codeperp(D,A,B,8);
trace cotationmil(A,E,2mm,15,btex 12~cm etex);
trace cotationmil(E,B,2mm,15,btex 24~cm etex);
trace cotationmil(B,F,2mm,15,btex 11~cm etex);
trace cotationmil(G,D,2mm,15,btex 12~cm etex);
trace cotationmil(H,D,-2mm,15,btex 11~cm etex);
trace cotationmil(A,D,-5mm,15,btex 54~cm etex);
fin;

end