(defun symbol (x)
(if (eq x 0)
(lambda (y)
(lambda ()
y
)
)
(funcall x)
)
)
(setq test (funcall (symbol 0) 100) )
(symbol test)
$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
(setq test (funcall (symbol 0) (funcall (symbol 0) 100) ) )
(symbol test)
(symbol (symbol test) )