YAMAGUCHI::weblog

海水パンツとゴーグルで、巨万の富を築きました。カリブの怪物、フリーアルバイター瞳です。

ふつうのHaskellプログラミング 第4章 練習問題

  • sort.hs
import System
import List

main = do cs <- getContents
          putStr $ sortLines cs

sortLines :: String -> String
sortLines cs = unlines $ map sort $ lines cs
  • uniq.hs
import System
import List

main = do cs <- getContents
          putStr $ groupLines cs

groupLines :: String -> String
groupLines cs = unlines $ map head $ group $ lines cs

uniq.hsに関してはまとめるだけなのか、まとめてから表示するのか微妙だったけど、とりあえず今までが全部コンソールに表示系のプログラムだったのでそうしてみた。