implementation module Gtk.Tune import StdEnv import Control.Applicative import Control.Monad import Gtk (<<@) infixl 2 :: !(GtkM elem) !option -> GtkM elem | tune elem option (<<@) elemf option = elemf >>= tune option