2008-04-14 Ex 2.18 SICP (define (reverse xs) (if (null? xs) '() (append (reverse (cdr xs)) (list (car xs))))) なんか append を使うのは反則な気がしなくもない。