前記事（http://hshstter.hatenablog.com/entry/2012/04/15/121001）でTemplate Haskellを使ってみましたが、Mainモジュールにはもっと大きなboilerplateがあるので、それを何とか出来ないかと思ってやってみました。今まで気になっていたけどどうしても直せ…

小ネタ。 Mainモジュールに次のようなコード (body, width, height) <- (,,) <$> newIORef "" <*> newIORef 300 <*> newIORef 0 (tlBody, tlWidth, tlHeight) <- (,,) <$> readIORef body <*> readIORef width <*> readIORef height があり、ふと「タプル版m…