小编Erd*_*007的帖子

我有以下类型：

data Tree = Branch (Tree) (Tree) | Leaf Int deriving(Show)

现在我想创建一个函数来给出树中最高值的叶子。但我被困住了，因为我不知道如何获取给定树的以下两棵树。

例如我有一棵树 a 看起来像这样：let a = Branch (Leaf 10) (Leaf 2)

如何读取10另一个函数中具有值的叶子？