Funkcionalno programiranje

(setq automobili (list 'AUDI 'BMW 'MERCEDES 'PORSCHE)) ;Kreiranje liste
(print automobili)
(print (car automobili)) ;Car - izlistavanje prvog člana iz liste vozila
(print automobili)
(print (cdr automobili)) ;Cdr - izuzimanje prvog para
(print automobili)
(print (cons automobili (cons 'LAMBURGINI nil))) ;Cons - ubacivanje novog člana u listu
(print (append automobili '(TESLA))) ;append - dodavanje novog člana u listu
(print (list automobili ''PORSCHE)); laksi nacin
(print automobili);
(print (last automobili)); Vraca zadnjeg u listi
(print (member 'AUDI automobili)); Vraca sve elemente iz liste pocevsi od navedenog
(setq best(member 'AUDI automobili)); pravljenje nove liste
(print best);
(print (append automobili '(AUDI))) ;append - dodavanje novog člana u listu
(print (reverse automobili)); +obruti REDOSLIJED
(setq folswagen '(GOLF(1 2 3 4 5 6 7) SKODA (SUPERB FABIA OKTAVIA))); nested liste
(print folswagen); ispisivanje folswagen liste

(print(null '())); null je predikat koji porverava dali je lista prazna
(print(null '(automobili))); ako nije vraca nil

(print (listp 8)); proverava da li je parametra lista ili ne ako nije vraca NIL
(print (listp automobili)); ako jeste vraca T
(setq kopija(print folswagen));
(print kopija);

(print (equal automobili folswagen)); equal proverava da li su liste iste
(print (equal kopija folswagen)); ako su iste vraca T