SoloCodigo

Programación Específica => Inteligencia Artificial => Mensaje iniciado por: orlando84 en Viernes 24 de Noviembre de 2006, 23:44

Título: Lisp
Publicado por: orlando84 en Viernes 24 de Noviembre de 2006, 23:44
hola..tengo una consulta sobre este codigo escrito en lisp..si alguien puede ayudarme por favor

(defun p9(lista)
((null lista) nil)            -----> esta linea de codigo para q sirve?
(mensaje "Lista: " lista)
(mensaje "Elemento a buscar: ")
(setq elem (read))
(loop
   ((null lista) (mensaje "No se encontró elemento " elem " en la lista"))
   ((equal (pop lista) elem)
   (mensaje "Se encontró el elemento " elem " en la lista"))))

(defun mensaje l
   ((null l) nil)
   (terpri)
   (loop
      ((null l))
      (princ (pop l))))


lo q kiero saber es para q sirve  esta linea de codigo((null lista) nil)  
o si tengo ((null lista) (terpri) nil)  para q sirve

el codigo es para buscar un elemento en una lista.


y otra consulta es xq cuando lo ejecuta y x ejm la lista es (orlando enrique) y deseo ver si el elemento enrique esta en la lista: cuando lo encuentra sale

 Se encontró el elemento enrique en la listaT

que significa esa T ???