A MUD in Haskell