haskell - 寻找haskell高阶函数

Question

将列表压缩到自身上的函数可以定义为:

let adjacent1 l = zip l $ tail l

这有效，但我想以 pointfree 风格定义它。为此，我定义了一个函数 dollarize :

let dollarize f1 f2 x = f1 x $ f2 x
let adjacent1 = dollarize zip tail

这有效，但显然我宁愿不定义自己的高阶函数。有没有办法找到与 dollarize 等效的标准，假设它存在？如果不是，那么存在用于组合功能的此类功能在哪里？

Answer 1

pointfree 工具可以自动为您执行此操作。

$ pointfree "\l -> zip l (tail l)"
ap zip tail
$ pointfree "\f1 f2 x -> f1 x $ f2 x"
ap