Haskell for AIZU ONLINE JUDGE