Programowanie funkcjonalne LISP.

Question

Witam mam problem odnośnie tego zadania, ponieważ nie rozumiem co się z czego powinno brać, czy ktoś mógłby mi pomóc i wytłumaczyć jakoś, jak się za to zabrać? Z góry dziękuję za pomoc :)

Znajdź wartość COTO ( (A B C) (C B A))= ?
Gdzie:
(DEFINE COTO( LAMBDA (SET1 SET2)
(COND
((NULL SET1) SET2)
((MEMBER (CAR SET1) SET2)
(COTO (CDR SET1) SET2) )
(T (CONS (CAR SET1)
(COTO (CDR SET1) SET2) )) ) )
oraz
• (DEFINE MEMBER (LAMBDA (A LAT)
(COND
((NULL LAT) NIL)
((EQ A (CAR LAT)) T)
(T (MEMBER A (CDR LAT))) ) )