Echo Server and Client in Haskell