Lisp

Question 1

(cons x y)

Answer 1

Ajoute x dans la liste y (non destructif)
> (cons ‘a ‘(b c))
> (a b c)

Question 2

(push x y)

Answer 2

Ajoute x dans la liste y (destructif)
> (push ‘a ‘(b c))
> (a b c)

Question 3

(pushnew x y)

Answer 3

Ajoute x dans la liste y s’il n’y est pas déjà (destructif)
> (pushnew ‘a ‘(b c))
> (a b c)

Question 4

(symbol-value x)

Answer 4

valeur d’un symbol (pas nombre)

Question 5

(last x)

Answer 5

Retourne une liste contenant le dernier élément de x

Question 6

(append x y)

Answer 6

concatène deux listes (non destructif)

Question 7

(member x y)

Answer 7

Vérifie si un élément fait partie d’une liste, si oui liste à partir de la première occurrence, nil sinon
/!\ Ajouter :test ‘equal si l’élément recherché n’est pas un atome !

Question 8

(length x)

Answer 8

Retourne le nombre d’éléments de la liste

Question 9

(nconc x y)

Answer 9

concatène deux listes (destructif, x modifiée)

Question 10

(eq x y)

Answer 10

Egalité des pointeurs

Question 11

(equal x y)

Answer 11

Egalité aux feuilles de l’objet référencé

Question 12

(= x y)

Answer 12

Egalité des nombres

Question 13

Prédicats

Answer 13

NUMBERP LISTP FLOATP INTEGERP NULL SYMBOLP STRINGP ATOM

Question 14

fonction anonyme

Answer 14

((lambda (xx) (list xx xx)) ‘a)

Question 15

fonction apply

Answer 15

(apply ff 2 3 ())

fonction puis arguments, dernier = liste dont chaque element est un argument

Question 16

fonction funcall

Answer 16

(funcall ff 2 3)

fonction puis arguments

Question 17

variable étendue aux sous fonctions

Answer 17

(declare (special x))

Question 18

variable locale

Answer 18

(let(*) ((var val) (var val))
<code>
)</code>

Question 19

variable globale

Answer 19

(defvar var init)

defparameter var new

Question 20

bloc

Answer 20

(progn <code> )</code>

(prog1 <code> ) retourne la valeur de la première expression évaluée</code></code>

Question 21

switch

Answer 21

(cond
( )
( )
)

Question 22

when

Answer 22

(when p a) = (unless (not p) a)

Question 23

loop

Answer 23

(loop for x in list do )
(loop for x from 1 to 100 [until ] do )
collect/count/sum… sans parenthèses !
ex : (loop for x in liste sum x)

Question 24

dolist

Answer 24

(dolist (var list [result])

)

Question 25

dotimes

Answer 25

(dotimes (var count [result]) ) de 0 inclus à count exclus

Question 26

do

Answer 26

(do(*) ((var init step)) (testfin) )

Question 27

mapcar

Answer 27

fonction appliquée successivement au car de chaque liste (mapcar #'(lambda (l) (+ (car l) (cadr l))) '((3 7)(2 3)(2 9)(5 3))) mapc retourne seulement la premiere liste, mapcan fait nconc à la place de list

Question 28

maplist

Answer 28

fonction appliquée successivement au cdr de chaque liste, mapl retourne seulement la premiere liste, mapcon fait nconc à la place de list

Question 29

générer index

Answer 29

(gentemp "N")

Question 30

(assoc x l)

Answer 30

Retourne la liste dans l qui commence par x | /!\ Ajouter :test 'equal si l'élément recherché n'est pas un atome !

Question 31

opérations ensemblistes pour listes

Answer 31

(union l1 l2) (intersection l1 l2) destructif (nunion l1 l2) (nintersection l1 l2) destructif

Question 32

(butlast liste)

Answer 32

Renvoie tout sauf le dernier élément, nbutlast destructif.

Question 33

incrémenter/décrémenter

Answer 33

(incf var) (decf var) destructif

Question 34

(pop liste)

Answer 34

retourne 1er élément et l'enlève de la liste

Question 35

Test negatif, positif, paire, impaire

Answer 35

minusp plusp evenp oddp

Question 36

Valeur absolue, valeur aléatoire < x

Answer 36

(abs x) (random x)

Question 37

renverser une liste

Answer 37

(reverse liste)

Question 38

affichage format

Answer 38

(format t "texte: ~S" var) 1er : t (print), nil (return string), stream (to file) ~% retour à la ligne