[Haskell-beginners] Fish tank monad