My implementation of the 2048 game in Haskell.