minimal 2048 in haskell