( append '() '(a) )
(define (append x z)
(cond ((null? x) z)
(else (cons (car x) (append (cdr x) z))) ))
xが空リストであるから
評価は'(a)