mais pourquoi :( unbound variable... scheme
mais pourquoi :( unbound variable... scheme - Algo - Programmation
Marsh Posté le 22-10-2002 à 18:30:52
parenthese de merde 
---------------
Les accents sont en option... j'ai un clavier qwertz.
Marsh Posté le 22-10-2002 à 18:36:35
laisses tomber bourdel 
---------------
"OCPLB : On Casse Pas Le Binôme, 'moiselle Jade, Carlson & Peters, page 823 !"
Marsh Posté le 22-10-2002 à 18:40:40
(define (tri L comparateur)
(define (separer L)
(if (null? L) ()
(cons (list (car L)) (separer (cdr L)))))
(define (fusion L1 L2 comparateur)
(cond
((null? L1) L2)
((null? L2) L1)
((comparateur (car L2) (car L1))
(cons (car L2) (fusion L1 (cdr L2) comparateur)))
(else
(cons (car L1) (fusion (cdr L1) L2 comparateur)))))
(define (deux L)
(if (null? (cdr L)) L
(cons (fusion (car L) (cadr L) comparateur) (deux (cddr
L)))))
(define (aux L)
(if (null? (cdr L)) (car L)
(aux (deux L))))
(aux (deux (separer L))))
erreur dans un cdr :'(
---------------
Les accents sont en option... j'ai un clavier qwertz.
Sujets relatifs:
- pb exportation de variable de flash vers php :(
- Trouver un mot ENVIRON vers la fin d'un texte de longueur variable
- savoir si une variable est de type entier
- probleme avec une variable NULL (en access)
- Commment déclarer une variable utilisable ds tout le projet ???
- probleme de changement de type pour une variable [newbies du Python]
- [PHP] Order by une variable ???
- [C] probleme de variable ....
- Bonjour .. possible de créer une variable globale entre 2 scripts PHP?
- mon editeur scheme il ne fait pas ce aue je veux
Marsh Posté le 22-10-2002 à 18:23:16
(define (tri L comparateur)
(define (separer L)
(if (null? L) ()
(cons (list (car L)) (separer (cdr L)))))
(define (fusion L1 L2 comparateur)
(cond
((null? L1) L2)
((null? L2) L1)
((comparateur (car L2) (car L1))
(cons (car L2) (fusion L1 (cdr L2) comparateur)))
(else
(cons (car L1) (fusion (cdr L1) L2 comparateur))))))))
(define (deux L)
(if (null? (cdr L)) L
(cons (fusion (car L) (cadr L) comparateur) (deux (cddr
L)))))
(define (aux L)
(if (null? (cdr L)) (car L)
(aux (deux L))))
(aux (deux (separer L))))
ce programme doit realiser un tri... mais j ai un message d erreur "separer unbound variable"
---------------
Les accents sont en option... j'ai un clavier qwertz.