函数的functor/application/monad实例的用例

Question

Haskell有functor、application和monad实例，这些实例是为标准库中的函数（特别是部分应用的类型(->)A)定义的，围绕函数组合构建的。

理解这些实例是一个很好的让人省心的练习，但我这里的问题是关于这些实例的实际用途。我很乐意听到人们使用这些代码的现实场景。

Answer 1

例如，(+)<$>(*2)<*>(subtract1)是涉及函数的函数和应用实例的常见模式。当您必须为一系列函数提供单个值时，这特别有用。在本例中，上面的代码等效于\x->(x*2)+(x-1)。虽然这与lifta2非常接近，但您可以无限期地扩展此模式。如果您有一个f函数要接受5个参数，比如a->a->a->a->a->a->a->b，那么您可以像f<$>(+2)<*>(*2)<*>(+1)<*>(subtract3)<*>(/2)那样为它提供一个值。就像下面的情况；

Prelude> (,,,,) <$> (+2) <*> (*2) <*> (+1) <*> (subtract 3) <*> (/2) $ 10
(12.0,20.0,11.0,7.0,5.0)

编辑：我在另一个主题下的评论是@Will Ness的重新评论，这里有一个应用于函数的美丽用法；

Prelude> let isAscending = and . (zipWith (<=) <*> drop 1)
Prelude> isAscending [1,2,3,4]
True
Prelude> isAscending [1,2,5,4]
False