Fichier list.ex / 17 fevrier 2000

> (list 4 (+ 2 1) 2)
(4 3 2)

> (list 3 3 3 3 3 3 3 3  3 3 3 3 (+ 2 1))
(3 3 3 3 3 3 3 3 3 3 3 3 3)

> (define x (list 3 5 2 8))

> x
(3 5 2 8)

> (define a 3)

> a
3

> (list x a 2 a)
((3 5 2 8) 3 2 3)

> (define (som-prod a b) (list (+ a b) (* a b)))

> (som-prod 1 2)
(3 2)

> (som-prod 4 5)
(9 20)

> (som-prod 9878976574546 87987675654654543543)
(87987685533631118089 869228186641083620631401342456478)

> (define resultat (som-prod 13 15))

> resultat
(28 195)

> (car resultat)
28

> (cdr resultat)
(195)