verbatimtex
%&latex
\documentclass{article}
\usepackage[frenchb]{babel}
\begin{document}
etex
%%

input geometriesyr16;

u:=0.8cm;

figuremainlevee(-5u,-5u,5u,5u);
pair A,B,C,D,E,O;
O=u*(0,0);
A=u*(2.2,-2.8);
B=u*(2.8,1.5);
C=u*(-0.5,2.6);
D=u*(-4.1,0.6);
E=u*(-2.9,-1.8);
trace polygone(A,B,C,D,E);
trace segment(O,A);
trace segment(O,B);
trace segment(O,C);
trace segment(O,D);
trace segment(O,E);
nomme.lrt(A);
nomme.rt(B);
nomme.top(C);
nomme.lft(D);
nomme.llft(E);
nomme.bot(O);
trace Codeangle(B,O,C,1,btex 75\degres etex);
trace Codeangle(O,B,A,2,btex 55\degres etex);
trace Codeangle(A,O,B,4,btex 78\degres etex);
trace Codeangle(D,O,E,0,btex 40\degres etex);
trace appelation(D,C,5,btex 6~cm etex);
trace appelation(D,O,5,btex 6,5~cm etex);
trace appelation(O,C,5,btex 4~cm etex);
trace appelation(O,B,5,btex 4~cm etex);
trace appelation(E,O,-5,btex 5~cm etex);
finmainlevee;

end