我试图了解此代码如何转换文件
contents <- readFile "graph.txt"
let graph = readGraph contents
readGraph = transpose . str2int . map words . lines
str2int = map.map $ zero2inf . fromIntegral . (\xs -> read xs :: Int)
zero2inf x = if x == 0 then 1/0 else x
实际的txt文件有以下信息
0 0 0 0 0
8 0 0 0 0
15 13 0 0 0
9 1 8 0 0
1 9 6 1 0
有人可以给我描述一下代码运行后数据的样子吗?它是一个列表吗?或者它是什么?
我认为这里的重要线路是
readGraph = transpose . str2int . map words . lines