[Haskell] Re: Mixing monadic and non-monadic functions