0

我是函数式编程的新手,我有一个任务来计算列表的部分总和。例如 - psum [1,1,1,1,1];val it = [1,2,3,4,5]:int 列表

到目前为止,这是我的代码。但是在函数 psum2[L] 中,我不知道如何遍历每个值并将它们相加,所以我只打印列表。

fun psum2(L) : int list = 
   if L=nil then []
   else L;

fun pSum(L) : int list = 
   psum2(L);

exception Empty_List;

psum([2,3,4]);
4

1 回答 1

1

您的问题有点宽泛,但这是汇总列表的一种方法。也许您可以根据自己的目的对其进行调整:

fun sum [] = 0
  | sum (h::t) = h + sum t
于 2013-01-17T21:55:43.760 回答