我想在列表理解中构建一个矩阵。对于每一行,我需要getLine并解析它。
简而言之,我想做这样的事情。
fun = [ getLine | y <- [0..4]]
如果我运行此函数,而不是尝试从命令提示符为每一行获取getLine,我会因使用&#39; print&#39;而出现(Show(IO String))No Instance的错误。
我收到错误消息,但是我如何在列表理解中获取线条?
答案 0 :(得分:8)
如果您想要列出一系列操作,请按顺序评估每个操作,并返回每个结果 - [IO a] -> IO [a]
- 这里有sequence
:
fun = sequence [getLine | y <- [0..4]]
这可以简化为Control.Monad.replicateM
:
fun = replicateM 5 getLine