# $XConsortium: circle,v 1.2 94/04/01 16:33:15 matt Exp $
# This dish script draws a single circle

set style [figure_kit default_style]
main 0 [
    figure_kit figure_root [
        figure_kit circle 0 style 0 0 100
    ]
]