
LOGO 
begin
	MakeWin
	
    clearscreen

    /circle {
        0 10 350 {
            pop
            10 rt
            10 fd
        } for
    } def

    /circles {
        0 10 350 {
	    pause
            pop
            circle
            10 rt
        } for
    } def

	circles
