Pentago game implementation in Haskell