解析輸入和做動作

Question

我們必須像一個標準輸入：

1 2 3 
4 5 6 
1 3 2 
5 3 2 
... 

每一行包括恰好三個數字，每行，我們想計算的函數值

f :: (Int, Int, Int) -> Int 

和打印結果。怎麼做？

Answer 1

我會指出一些有用的功能，這將幫助你在你的追求：

readFile :: FilePath -> IO String 

lines :: String -> [String] 

words :: String -> [String] 

print :: (Show a) => a -> IO() 

我建議你打開一個ghci會議，嘗試這些功能一點點，看看他們做什麼，嘗試以創造性的方式將它們混合在一起。我會給你一個開始：

Prelude> str <- readFile "test.txt" 
Prelude> print (length (lines str)) 
<The number of lines in the file "test.txt"> 

Answer 2

一個簡單的解決方案：

tuple3 :: [Int] -> (Int,Int,Int) 
tuple3 [x,y,z] = (x,y,z) 

main = mapM_ print . map (f . tuple3 . map read . words) . lines =<< getContents 

我還是不明白爲什麼要使用一個元組作爲參數，它會導致難看的轉換。