是否有一个函数将函数应用于元组的每个成员？

Question

我想将一个函数应用于同构元组的两个成员，导致另一个元组。从我previous question继我限定的操作，似乎是有道理的对我说：

let (||>>) (a,b) f = f a, f b 

但是，我又觉得这可能是一个常见的情况，但在标准库中找不到它。它存在吗？

Answer 1

我不认为有任何的标准库函数做到这一点。

我个人的偏好是避免过多的运营商定制（它们使代码更短，但他们使其难以对谁没见过的定义之前人们阅读）。应用功能的元组的两个元素在逻辑上是接近上列出了地图操作（适用的功能列表中的所有元素），所以我可能会定义Tuple2.map：

module Tuple2 = 
    let map f (a, b) = (f a, f b) 

然后你可以使用功能很好地与流水线：

let nums = (1, 2) 
nums |> Tuple2.map (fun x -> x + 1)