重複行チェックが2秒になった
すばらしい
今までのツールの出力と比較して一致したから動作は大丈夫だろう
ソートにタプル渡してもちゃんとソートできるのが良い
渡すのは zip (lines str) [1..]
hoge::[(String,Int)]->String
hoge = unlines . snd . unzip . sort . switch(タプル要素入れ替え) . uniqueline(となり合う重複削除) . sort
これ以上は処理時間を計る方法から探さないと比較できないし、アイデアもないから
ここまでかな