[Haskell-beginners] Closing a channel