[Haskell] writing a shell in Haskell