sml - 计算包含列表的列表的长度(SML)

Question

SML长度函数:

fun length(L) =
    if (L=nil) then 0
    else 1+length(tl(L));

例如:

length [1,2,3] = 3;
length [ [5], [4], [3], [2,1] ] = 4;

根据代码，如果我也想统计list的list中的元素怎么改？

例如:

length [ [5], [4], [3], [2,1] ] = 5;

Answer 1

您可以创建另一个函数来使用您的函数，如下所示:

fun d_length ( [] ) = 0
| d_length ( l :: l' ) = length(l) + d_length(l');

d_length[ [5], [4], [3], [2,1] ];

或者，使用内置的 reducer:

List.foldl (fn(e,a) => length(e) + a) 0 [ [5], [4], [3], [2,1] ];