Haskell Chess Game