F# 计算列表中数字的总和

示例

通过递归

let rec sumTotal list = 
    match list with
    | [] -> 0 // empty list -> return 0
    | head :: tail -> head + sumTotal tail

上面的例子表示：“看list，它是空返回0，否则它是一个非空列表所以它可能是？。 [1]，[1; 2][1; 2; 3]等，如果list是[1]然后将其绑定变量head到1并tail以[]再执行head + sumTotal tail。

执行示例：

sumTotal [1; 2; 3]
// head -> 1, tail -> [2; 3]
1 + sumTotal [2; 3]
1 + (2 + sumTotal [3])
1 + (2 + (3 + sumTotal [])) // sumTotal []定义为0，递归在此处停止
1 + (2 + (3 + 0)))
1 + (2 + 3)
1 + 5 
6

封装上述模式的更通用方法是使用功能折叠！sumTotal变成这个：

let sumTotal list =List.fold(+) 0 list