>>377
そうかなあ
(define (tree-map f tree)
  (cond ((null? tree) tree)
        ((not (pair? tree)) (f tree))
        (else (cons (tree-map f (car tree)) (tree-map f (cdr tree))))))
こんな感じで分岐させるのが普通なイメージだけど
Pythonの標準ライブラリのディレクトリでgrep -r isinstaceしてごらんよ

Haskellあたりだとパターンマッチだから同じ分岐でもcondよりは綺麗