The "2048" game in Haskell.