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+sumTotaltail。
执行示例：
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