prologues:=2;

input geometriesyr16;

u:=5mm;

figure(0,0,10u,10u);
pair O;
O=u*(5,5);
path carre;
carre=O--(O+(2u,0))--(O+(2u,2u))--(O+(0,2u))--cycle;
for k=0 upto 9:
  if (k mod 2)=0:
    draw rotation(carre,O,36*k);
  else:
    draw rotation(carre,O,36*k) withcolor gris;
    fi;
endfor;
fin;

end