リストのインデックス n 番目を置き換える replace 関数。文字列（というかリストなら何でもいい）の n 番目（0 番が最初）を chr で置き換える。 main = print $ replace "Hallo!!" 1 'e' replace :: [a] -> Int -> a -> [a] replace st n chr = take n st …

cat.hs（p.28） ファイルの内容を出力する。 main = do cs <- getContents putStr cs 実行。 $ ghc cat.hs -o cat $ ./cat < cat.hs main = do cs <- getContents putStr cs countline.hs（p.36） ファイルの行数を出力する。 main = do cs <- getContents p…