The game of chess, implemented in Haskell