import Graphics.UI.WX
main = io >> io where io = start (frame [] >> return ())