f# - 在F#中结合功能和管道运算符

Question

我正在一个项目上，我想创建一个非常紧凑的方法来创建实体和属性。

我想使用管道运算符执行此操作。但是我想为该运算符添加额外的功能。

例如:

let entity = (entity "name")
                 |>> (attribute "attr" String)
                 |>> (attribute "two"  String)

在此示例中，| >>将是管道运算符以及向实体添加属性的功能。

我知道这可行:

let entity = (entity "name")
             |> addAttr (attribute "attr" String)

所以我想知道的是，是否有可能取代

|> addAttr

和

|>> 

谢谢您的帮助

(我不知道这是否有可能)

Answer 1

您可以像这样简单地定义它:

let (|>>) e a = e |> addAttr a