input geometriesyr16;
figure(0,0,2u,2u);
path cc;
cc=(cercles((0,0),0.9u) xscaled0.9 yscaled0.75) shifted(u*(1,1));
trace cc withpen pencircle scaled1.25bp;
for k=0 upto 4:
  remplis cercles(pointarc(cc,30+72*k),1.5mm) withcolor 1.25*ciel;
  trace cercles(pointarc(cc,30+72*k),1.5mm);
endfor;
fin;
end