Update haskell/src/Afgame.hs