ocaml - ツリー内の値の合計を計算します

Question

整数のツリーを定義したとします:

type inttree = Int of int | Node of inttree * inttree ;;

そのツリーの要素の合計を見つける方法はありますか?

Answer 1

次のような単純な再帰関数（深さ優先トラバーサルを行う）を試してください

 let rec mysum t = match t with
      Int x -> x
    | Node (l,r) -> mysum l + mysum r
 ;;

最初の行はそうかもしれませんlet rec mysum = function(スタイルの問題です)。