Discussion :

[Zenol]

Très joli les parentèses... C'est pour décorer?
Désoler, blague de très mauavais gout. Mais je trouve que toute ces parentèses, même apprès identation, rendent la lecture dificile.
J'ai esseiller de comprendre, mais n'ayen aucune notion de LISP ou scheme, j'ai un peut de mal. ^^
[Mais bon vous vous en fichez, ce n'est pas mon problème...]

[Trap D]

LISP : Langage Insipide Stupidement Parenthésé.
LISP : Liste Interminable de Stupides Parenthèses

[Tellmarch]

ah je croyais que c'était

Lot of Insipid and Stupid Parenthesis

[Trap D]

Pour clore le sujet sur la suppression des occurences dans une liste, voici une fonction en Scheme qui me paraît satisfaisante (en fait c'est l'équivalent de la fonction que j'avais donnée en LISP, il suffisait de trouver la syntaxe pour définir des fonctions récursives internes : un let tout bêtement ) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
(define (ote_les_occurences_2 l)
  (if  (cons? l)
       (cons (car l) 
            (ote_les_occurences_2
              (let ote_une_occurence_2 ((li l))
                     (if (cons? (cdr li)) 
                         (if (eq? (car li) (cadr li)) 
                             (ote_une_occurence_2 (cons (car li) (cddr li)))
                             (cons (cadr li) (ote_une_occurence_2 (cons (car li) (cddr li))))
       )    ) )      )   )                  
       ()
) )

[Tellmarch]

oui si on définit une fonction temporaire c'est assez facile, mais dans la question il avait dit :

- je ne peut pas utiliser de fonction auxilliaire (calcule de taille, i éme element, ....)

du coup c'était pas tres clair...

[Trap D]

Je n'ai pas très bien compris ce qu'il voulait exactement, puisqu'il a semblé se satisfaire de la solution avec 2 fonctions donnée plus haut (celle avec g et test).

Enfin, moi au moins j'aurais planché sur Scheme que je ne connaissais pas