input geometriesyr15; figure(0,0,8u,8u); pair A,B,C,D,E,F,G,O; O=u*(1,1); A=u*(7,1); B=u*(7,4); D=3/5[O,A]; C-D=B-A; E=3/5[O,B]; G=3/5[O,D]; F=3/5[O,C]; trace polygone(O,C,B,A); trace chemin(G,F,E,D,C); trace segment(O,B); trace codeperp(F,G,D,5); trace codeperp(G,F,E,5); trace codeperp(A,B,C,5); trace codeperp(B,C,D,5); trace codeperp(C,D,A,5); trace codeperp(D,A,B,5); nomme.lft(O); nomme.top(F); nomme.top(C); nomme.top(B); nomme.lrt(A); nomme.bot(D); nomme.bot(G); nomme.lrt(E); fin; end