(defun list_add_verschachtelt (L)
       (cond
         ((null L) nil)
         ((listp (car L)) (if (null (cdr L)) (list_add_verschachtelt (car L)) (+ (list_add_verschachtelt (car L)) (list_add_verschachtelt (cdr L)))))
         (T (if (null (cdr L)) (car L) (+ (car L) (list_add_verschachtelt (cdr L)))))
         )
       )