在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