- 416 名前：413 mailto:sage [2006/12/03(日) 23:45:53 ]
- >>414,415
なるほど。ありがとう。
一行入力するごとに結果を返してほしいのだが、いい方法はないのかな。
mapMはsequence . mapらしいので、いろいろ組み合わせて書き直してみた。
main = do cs <- getContents
mapM_ (putStr . unlines =<<) $ map sequence $ map (:[]) $ map hoge $ lines cs
hoge :: String -> IO String
hoge x = return x
こうすれば望みの結果が得られるようなのだが、ちょっとめんどくさすぎるな・・・(・∀・;)
