;;; Test cases (can be used for other binary tree problems as well) (setf t1 '(a (b (d nil nil) (e nil nil)) (c nil (f (g nil nil) nil)))) (setf t2 '(a nil nil)) (setf t3 'nil)