input geometriesyr12;
beginfig(1);
  pair F,U,M,S,R,L,E;
  F=u*(1,1);nomme.llft(F);
  U=u*(6,1);nomme.lrt(U);
  path cc;
  cc=cercledia(F,U);
  M=1/2[F,U];
  S=arccercle(F,U,M) intersectionpoint (U--(F rotatedabout(U,40)));nomme.bot(S);
  R=arccercle(S,U,M) intersectionpoint (U--(F rotatedabout(U,70)));nomme.bot(R);
  L=cc intersectionpoint (F--(U rotatedabout(F,65)));nomme.top(L);
  E=arccercle(U,F,M) intersectionpoint (F--(U rotatedabout(F,35)));nomme.top(E);
  draw triangle(F,L,U);
  draw F--E--U;
  draw F--S--U;
  draw F--R--U;
endfig;
end