Recherche:

Reprenons ce que dois faire corrigeSimple :

A chaque étape, la liste L est décomposée en 3 éléments (car l) (cadr L) et (cddr L)
Verifier l'ordre croissant :
si deux éléments consécutifs sont...

Ça marche effectivement avec (list 1 3) mais ça devrait fonctionner aussi avec (cons 1 3) qui est une paire pointée dans le test (pair? (cons 1 3)) réussit et donne 1 et ensuite 3 car le test (pair?...

Ce code
(define (xfiltre test? L)
(if (pair? L)
(let ((k (xfiltre test? (cdr L))))
(if (test? (car L))
(cons (car L)
k)
k))
(list)))...

Au vu de votre réponse, je crois que vous n'avez pas compris le principe de la récursivité.
Voici la solution pour xFiltre.

(define (xfiltre test? L)
(if (pair? L)
(let ((k (xfiltre...

pour xFiltre, c'est tout simple, que renvoies-tu lorsque le test if (pair? L)
échoue ?

Pour corrigeSimple c'est un peu plus complique, qu'attends-tu exactement comme résultat pour (corrigeSimple...

:tagcode:


(define (xfiltre test? L)
(if (pair? L)
(let ((k (xfiltre test? (cdr L))))
(if (test? (car L))
(cons (car L)
k)
k)

Il ne faut pas hésiter à poster le code :

;;; corrigesimple: liste (number ) ---> liste (number)
;;; vérifier l'ordre croissant des chiffres
;;; si 2 nombres sont en ordre inverse, les permuter....