ぷよぷよ19連鎖のやつをHaskellで書いてみた

たしか、Haskellもくもく会のときにやったやつ。ちょっと前の物だけど、ブログをずっと更新していなかったので、ブログに書いてみる。
http://okajima.air-nifty.com/b/2011/01/2011-ffac.html ネタ元はこちら。

実行結果はこんな感じ。http://ideone.com/MoMCka

4つ以上連なっているかどうかの判定がいけてないと思う。もっと簡単な方法も早い方法もあると思う。いつか気が向いたら書き直す。