Cond Construir en LISP

En este artículo, discutiremos la construcción cond en LISP. El cond es una declaración de toma de decisiones que se utiliza para hacer un número n de condiciones de prueba. Comprobará todas las condiciones.

Sintaxis :

(cond   (condition1 statements)
(condition2 statements)
(condition3 statements)
...
(conditionn statements)
)

Aquí,

1. Las condiciones especifican condiciones diferentes: si la condición 1 no se cumple, pasa a la siguiente condición, es decir, a la última condición.
2. Las declaraciones especifican el trabajo realizado en función de la condición.

Nota: Ejecutará solo una declaración.

Ejemplo 1 : programa LISP para comprobar si un número es mayor que 200 o no

;set value1 to 500
(setq val1 500)
  
;check whether the val1 is greater than 200
(cond ((> val1 200)
   (format t "Greater than 200"))
   (t (format t "Less than 200")))

Producción:

Greater than 200

Ejemplo 2: Demostración con operadores de comparación

;set value1 to 500
(setq val1 500)
  
;check whether the val1 is greater  than 200
(cond ((> val1 200)
   (format t "Greater than 200"))
   (t (format t "Not")))
     
 (terpri)
   
;check whether the val1 is equal to 500
(cond ((= val1 500)
   (format t "equal to 500"))
   (t (format t "Not")))
     
 (terpri)
   
;check whether the val1 is equal to 600
(cond ((= val1 600)
   (format t "equal to 500"))
   (t (format t "Not")))
 (terpri)
   
 ;check whether the val1 is greater than or equal to 400
(cond ((>= val1 400)
   (format t "greater than or equal to 400"))
   (t (format t "Not")))
     
 (terpri)
   
;check whether the val1 is less than or equal to 600
(cond ((<= val1 600)
   (format t "less than or equal to 600"))
   (t (format t "Not")))

Producción:

Greater than 200
equal to 500
Not
greater than or equal to 400
less than or equal to 600