input geometriesyr16;

figuremainlevee(0,0,8u,6u);
pair A,B,S,T,U;
B=u*(0.75,0.75);
S-B=u*(4,0);
T-B=u*(0,3);
U=1.5/5[T,S];
A=cercles(T,3u) intersectionpoint perpendiculaire(T,S,U);
trace polygone(B,T,A,S);
trace droite(T,S);
trace segment(A,U);
trace codeperp(T,B,S,8);
trace codeperp(A,U,S,8);
trace appelation(T,A,2mm,btex 3 etex);
trace appelation(B,T,2mm,btex 3 etex);
trace appelation(B,S,-2mm,btex 4 etex);
trace appelation(T,U,2mm,btex 1,5 etex);
nomme.llft(B);
nomme.bot(S);
nomme.llft(U);
nomme.top(T);
nomme.top(A);
finmainlevee;

end