Haskellだと10倍の時間をかけて10分の1の行数ですみます。