RECURSIVO.lsp

; INVIERTE Y MUESTRA UNA LISTA DE FORMA RECURSIVA 
; ojo, una funciOn regresa el resultado de su Ultima operaciOn

(defun INVERTIR (L2)
	(if (eql nil (cdr L2))
		L2
		(append (INVERTIR (cdr L2)) (list (car L2)))
	)
)