lunes, 21 de enero de 2008

Resta de dos conjuntos en Lenguaje Scheme

Definir una función resta con dos parámetros del tipo lista l1 y l2, que devuelva una lista con el conjunto resta del primer parámetro menos el segundo. La resta del A-B se define como los elementos en A que no están en B.

(define (resta L1 L2)
(if (null? L1) null
(if (null? L2) L1
(if (esta (car L1) (interseccion L1 L2))
(resta (cdr L1) L2)
(cons (car L1) (resta (cdr L1) L2))))))