[Haskell-cafe] How to make interface IO() to IO a in a command-driven tool