是否可以在F#中编写默认函数

Question

默认或无点风格编程允许人们创建函数而不考虑它们的参数。这可以在 F# 中完成吗？

Answer 1

只是为了配合查克的回答&克里斯史密斯的评论，你可以写

let digits = string_of_int >> String.length
digits 9000;; // 4
[1; 10; 100] |> List.map digits;; // [1;2;3]

当你结合这些成分和具有高阶函数的管道运算符，您可以非常简洁地完成复杂的事情：

let prodSqrtAbs = Seq.map (abs>>sqrt) >> Seq.reduce (*)
prodSqrtAbs [| -9.0; 4.0 |];;  // 6.0

---

编辑：我刚刚读到有关 J 及其隐式分叉运算符的信息。那是非常强大的。您可以在 F# 中构建等效的高阶运算符，但它们不会隐式应用。因此，例如，首先定义 lift （使用显式参数）

let lift op a b x = op (a x) (b x)

，然后显式应用它

let avg = lift (/) List.sum List.length

以获得类似于 您链接到的维基百科页面上的 J 示例。但它并不完全“默契”。

Answer 2

当然。您所需要的只是函数组合和柯里化，而这两者在 F# 中都是可能的。

let compose f1 f2 = fun x -> f1 (f2 x);;
let digits = compose String.length string_of_int;;
digits 9000;; // 4