F＃一覧リストの合計

Question

私は自分のデータ型を作成しました。リストのリストであるそのデータ型のすべての数値の合計を作成しようとしています。私はF＃で初心者だし、その上に私の頭を把握しようとしている

type elist = A | L of int * elist 

マイデータ型

あらゆるF＃ライブラリを使用する必要はありません。私はこれを再帰的にやりたい私の考えることは、リストの最後まで移動して合計を開始し、先頭に戻ってそれぞれを追加することです。

例：

val it : int 16 

を返す必要があります

let l = L(4, L(3, L(6, L(3, A)))) 

はここに私のコードだと私はそれが間違っている知っている：

let rec sum l = 
    let a = 0 
    match l with 
    | A -> 0 
    | L(head,A) -> head 
    | L(head,tail) -> sum tail + a 

Answer 1

あなたはほとんどそこにいます。必要に応じてl = L(4, L(3, L(6, L(3, A))))が

val it : int = 16 

を与えるとき

let rec sum l = 
    match l with 
    | A -> 0 
    | L(head,A) -> head 
    | L(head,tail) -> head + sum tail 

その後sum lを評価する：あなたが必要なのはaを失うことがあります。