Recursion 参数化数据类型

如何编写定义参数化数据的f#递归数据类型

type Three <'a>

如果我输入：

let tree = Node(1, Node(2, Leaf, Leaf), Node(3, Node(4, Leaf, Leaf), Leaf))
tree

---

您可以使用它来定义树。你们问题中的叶子在这里被称为空的

type Tree<'a> = Empty | Node of Tree * 'a * Tree

类型树
type Tree<'a> = Empty | Node of Tree * 'a * Tree