我正在寻找Scala中可用的F#“案例类”中的等价物。
如果您希望使用方法和字段创建自定义类并且仍然可以将它们与模式匹配一起使用,则案例类非常有用,如Scala网站的article中所述。
有人知道F#中是否存在相同的内容吗?
答案 0 :(得分:27)
正如Brian所提到的,模式匹配有两种方式:1。判别的联合和2.现有类型的活动模式。
让我们从这个Scala示例开始:
abstract class Term
case class Var(name: String) extends Term
case class Fun(arg: String, body: Term) extends Term
case class App(f: Term, v: Term) extends Term
这个OO设计可以转换为F#中的歧视联盟(DU):
type Term =
Var of string
| Fun of string * Term
| App of Term * Term
基于此DU,您可以匹配Term
值以查找它所属的子类型:
let eval (t: Term) =
match t with
| Var (name) -> ...
| Fun (para, body) -> ...
| App (t1, t2) -> ...
请注意,您可以在此Term
类型上定义方法和属性:
type Term =
Var of string
| Fun of string * Term
| App of Term * Term
with
member x.Type() =
match x with
| Var _ -> 0
| Fun _ -> 1
| App _ -> 2
现在出现了差异:
您无法在其子类型上定义方法:Var
,Fun
和App
。
您可以在Term
上定义的方法是不可变的。
一旦定义了DU,就无法对其进行扩展。想想你现在需要向For
添加Term
子类型。然后,您必须更改模式匹配Term
的大量代码。
在oo设计中,它不是一个问题。因为新的子类型可以携带自己的实现。
在F#中,当您想要在子类型上构建简洁类型匹配时,应首先考虑DU。但它也有明显的限制。我认为活动模式匹配更像是Scala中的case类(我只读了一点Scala):
// define the classes for different term types
[<AbstractClass>]
type Term() =
abstract Value: int with get
type Var(name:string) =
inherit Term()
override x.Value =
0
member x.Name with get() = name
type Fun(name:string, body:Term) =
inherit Term()
override x.Value =
0
member x.Name with get() = name
member x.Body with get() = body
type App(t1:Term, t2:Term) =
inherit Term()
override x.Value =
0
member x.Term1 with get() = t1
member x.Term2 with get() = t2
// the pattern function
let (|TVar|TFun|TApp|) (x:Term) =
match x with
| :? Var ->
let y = x :?> Var
TVar(y.Name)
| :? Fun ->
let y = x :?> Fun
TFun(y.Name, y.Body)
| :? App ->
let y = x :?> App
TApp(y.Term1, y.Term2)
和使用活动模式的eval
函数:
let eval2 (t:Term) =
match t with
| TVar (name) -> 0
| TFun (name, body) -> 0
| TApp (t1, t2) -> 0
活动模式结合了双方的好处:功能编程和面向对象。
您可以参考Don Syme的the original paper on active pattern。
答案 1 :(得分:7)
受歧视的工会?您可以向它们添加成员方法。或者,您可以在现有类上使用活动模式。