> t
(1 (2 () ()) (3 (4 () ()) (5 () ())))
> (tree? t)
#t
> (depth-tree t)
3
> 
> (memv-tree 1 t)
(1 (2 () ()) (3 (4 () ()) (5 () ())))
> (memv-tree 3 t)
(3 (4 () ()) (5 () ()))
> (memv-tree 5 t)
(5 () ())
> (memv-tree 7 t)
#f
> (and 2 5 #f 6)
#f
> (and 2 5 3 6)
6
> (or 1 5 #t 7)
1
> (or #f #f #f #f)
#f
> (memv-tree 7 t)
#f
> (memv-tree 5 t)
#t
> (memv-tree 5 t)
(5 () ())
> (and x y z)
> (path-tree 3 t)
(3)
> (path-tree 3 t)
[image] [image] cons#f: undefined;
 cannot reference an identifier before its definition
> (path-tree 3 t)
(1 3)
> (path-tree 5 t)
(1 3 5)