/stone { % outline_color stone_color x y => - (draw stone)
    STONE_SIZE 2 div 0 360 arc	% set stones path
    gsave 	% save path
       setcolor fill	% fill with stone_color
    grestore	% restore path
    setcolor stroke	% stroke path w/outline_color
    pause	% allow others to execute
} def