simplified game-seq whilst using the proper unfold definition from Haskell