% Format: metapost

beginfig(1);
prologues:=0;

% Zvolim prumer 4", t.j. 288 bodu:
for n=288 downto 1:

% Definice funkce:
% Tady muzete definovat cokoliv, co dava c(n) tak ze c je v intervalu <0,1>
% pro n v intervalu <1,288> (ja jsem pouzil vlnovku, funkci sinus)
c:=0.5*(sind(5*n)+1);

% kresleni kruhu:
% (stred posouvame do bodu (9cm,12cm) aby byl priblizne uprostred stranky
% a ne v levem dolnim rohu)
fill fullcircle scaled n shifted (9cm,12cm) withcolor c*white;

endfor;
endfig;
end;


