4 (println (first L)) ; le premier élément
5 (println (rest L)) ; la liste privée du premier élément
6 (println (last L)) ; le dernier élément
10 ; return an error: empty list
11 ;(println (first '()))
14 (define (list-length a-list)
16 (+ 1 (list-length (rest a-list)))
19 (println (list-length L))