Haskell Code Main Game