在Haskell中应用函数列表

Question

我写了一个函数，它将函数列表应用于一个项目。

applyAll :: [a -> b] -> a -> [b] 
applyAll [] _ = [] 
applyAll (f:fs) x = (f x) : (applyAll fs x) 

有没有更好的方法来做到这一点？

Answer 1

你可以使用：

applyAll l v = fmap ($ v) l 

fmap在输入列表（实际上任何函子）提升的功能。 $的类型为(a -> b) -> a -> b，因此它将函数应用于给定值。 ($ v)是section，它将给定的函数应用于v。

Answer 2

李的解决办法是什么我建议，但这种读取甚至更好：

import Control.Applicative 

applyAll' fs v = fs <*> pure v 

或

applyAll'' fs v = fs <*> [v] 

这类品牌的东西比需要更复杂，虽然：我们真的只需要列表的Functor实例，而applyAll'会注入并立即从Applicative实例中提取。

Answer 3

这个函数实际上已经存在的一元函数的一个特例：

applyAll :: [a -> b] -> a -> [b] 
applyAll = sequence