2048Haskell-

2048をHaskellで真似た。約80行のコードです。
関数を外に出したりネストを調整して、コードを見やすくしたいです。
時間があれば、スコア機能の実装とインターフェースと入出力を向上させたいです。