俺版。どっちの方が良いんだろう？

(define (rev tree)
(reverse
(map (lambda (s)
(if (list? s) (rev s) s))
tree)))