计划 - 列表

Question

我想实现一个功能列表的其中钙总和的总和，它的名字是sum -

(define (sum elemList) 
    (if 
    (null? elemList) 
    (+ (car elemList) (sum (cdr elemList))) 
    0 
) 
) 

上述实施给出错误的结果，例如 -

> (sum (list 1 2 3 4)) 
0 

我在这里做错了什么？

Answer 1

我认为你换了然后和if的其他部分：

(define (sum elemList) 
    (if 
    (null? elemList) 
    0 
    (+ (car elemList) (sum (cdr elemList))) 
) 
) 

在原有的功能，对于每一个非空列表，返回0。