Blob

Date:
Message:
Import sources
Actions:
History | Blame | Raw File
1 (defun square-tree-direct (tree)

2   (cond ((null tree) nil)

3 	((not (consp tree))