(defun print-list(lst)
	(if lst
		(progn
			(print(car lst))
			(print-list(cdr lst)))
		'DONE))