假设我有一个带有一个参数的函数a和一个带有可能输入的列表b,定义为:
let a x1 = x1 == 3
let b = [3, 3]
现在我想测试b中的所有值都返回True作为a的参数,我可以使用all函数:
all a b
> True
但是,如果a将采用两个参数并且b将是一个元组列表,其中元组中的每个值对应于每个参数,我可以执行类似的操作吗?
E.g:
let a x1 x2 = x1 == 3 && x2 == 1
let b = [(3,1), (3,1)]
all a b
返回:
<interactive>:1:4:
Couldn't match expected type `Bool'
against inferred type `a1 -> Bool'
In the first argument of `all', namely `a'
In the expression: all a b
In the definition of `it': it = all a b
关于如何做到这一点的任何想法?
答案 0 :(得分:11)
要将具有两个参数的函数转换为期望一对的函数,请使用
uncurry :: (r -> s -> t) -> (r, s) -> t
那么,怎么样
all (uncurry a) b