Почему этот код для вычисления суммы элементов в списке не работает для этого конкретного примера?

Question

Этот код предназначен для вычисления суммы элементов в списке.

(define (sum lst)
  (cond ((null? lst) 0)
        ((null? lst) lst)
        (else (+ (car lst)
                 (sum (cdr lst))))))

Этот код работал с (sum '(1 2 3)), но этот код не работает для (sum '(1 (1 1))), и я не знаюпочему.