/draw_arc { % x y => - (draws an arc at the specifed location) 100 0 300 arc % radius start finish gsave % save graphics context .5 setgray fill % set the path color and fill it grestore % restore graphics context stroke % draw the arc } def