2011-04-16から1日間の記事一覧
以下の記事を見たので、自分なりに書き直してみた。 http://d.hatena.ne.jp/morning_reading/20110415/p1変更した部分については以下に説明を載せて、最後に全文を載せます。 解説 cls :: IO () cls = putStr "\ESC[2J" type Pos = (Int, Int) type Board = …
以下の記事を見たので、自分なりに書き直してみた。 http://d.hatena.ne.jp/morning_reading/20110415/p1変更した部分については以下に説明を載せて、最後に全文を載せます。 解説 cls :: IO () cls = putStr "\ESC[2J" type Pos = (Int, Int) type Board = …