可以匹配预期的类型＆＃x2018; int＆＃x2019;使用实际类型（int，int，int）

Question

我有一个动态的txt文件示例（1,1,1），我试图从文件中读取它们 将它们传递到问题功能。

函数问题:: int-＆gt; int-＆gt; int-＆gt; [int]

   args <- getArgs
   contents <- readFile (head args)
   let value = read contents::(Int,Int,Int)

   //print(show(problem 1 1 1))
   print(show(problem value))

无法匹配预期的类型'int' 使用实际类型'（int，int，int）'

Answer 1

您需要提取三个int值，以便将它们单独传递到问题。

let (a, b, c) = read contents :: (Int, Int, Int)
print (show (problem a b c))

相反，您可以定义uncurry3函数以适应问题与元组一起使用。

uncurry3 :: (a -> b -> c -> d) -> ((a, b, c) -> d)
uncurry3 f = \(x,y,z) -> f x y z

print (show ((uncurry3 problem) value))