Haskell Snake clone.