┌─10
　┌─┼─20
　│　 └─30
　│　 ┌─40
─┼─┼─50
　│　 └─60
　│　 ┌─70
　└─┼─80
　　　 └─90

を表す引数なしの関数tree定義して、

次に，car や cdr 等以外の何らかのコマンドや関数等を使って，tree から次のような要素を取り出すにはどうすればいいんですか？

> XXXXXX
10
>　XXXXXX
20