### Default parameters: `Configure.oz`

Source File

>     functor

>     import
>        Tk(font)

>     export
>        fonts:  Fonts
>        colors: Colors
>        delays: Delays

>     prepare

>        Colors = colors(glass:   steelblue1
>                        cut:     firebrick
>                        sketch:  c(202 225 255)
>                        entry:   wheat
>                        bad:     c(238 44 44)
>                        okay:    c(255 127 0)
>                        good:    c(180 238 180)
>                        neutral: ivory
>                        bg:      ivory)

>        Delays = delays(cut:  400
>                        wait: 1200)

>     define

>        Fonts = fonts(normal:
>                         {New Tk.font tkInit(family:helvetica size:~12)}
>                      bold:
>                         {New Tk.font tkInit(family:helvetica size:~12
>                                             weight:bold)} )

>     end