Encore une fonction de base

:salut: bonjour, je suis encore désolée j'dois avoir l'air nulle:oops:, mais ça fait quelques heures que je cherche a créer une fonction qui "ajoute" une liste à un atome:
autrement dit, une fonction qui entre x, un atome, et L, une liste.

Code:

---

1 2	(ajout 2 '(3 4)) --> '(2 3 4)

---

Bon. J'ai créé la fonction « rajout » qui ajoute un atome à une liste, si ça peut aider :

Code:

---

1 2 3 4

(define (rajout l x) (if (null? l) (list x) (cons (car l) (rajout (cdr l) x ))))

---

et qui fait :

Code:

---

1 2	(rajout '(1 2) 3) --> '(1 2 3)

---

Salut

Apparemment ça a l'air de fonctionner:

Code:

---

1 2 3 4 5

(define (rajout2 x l) (if (null? l) (list x) (cons x (rajout2 (car l) (cdr l)))))

---

Attention!!! C'est ma première réponse sur le forum Scheme, j'ai commencé il y a même pas une semaine...
Donc à tester... ;)

Vous vous compliquez la vie inutilement... La fonction ajout n'est qu'un synonyme pour cons :

Code:

---

(define (ajout x L) (cons x L))

---

De plus le code de Plegat est à éviter puisqu'il reconstruit la liste en entier inutilement juste pour rajouter un élément au début, en effet (rajout2 (car L) (cdr L)) == L.

--
Jedaï

Raah, je suis trop c...!

J'avais bien vu que c'était bourrin ma méthode... mais je n'ai pas encore certains réflexes sur les bases...

Citation:

---

Envoyé par Jedai

Code:

---

(define (ajout x L) (cons x L))

---

---

En Scheme on préfèrera

Code:

---

(define ajout cons)

---

Pas de problème avec l'inférence de type ici :mrgreen:

Maintenant @mfroger93 merci d'utiliser la balise code :tagcode: et de mettre un titre explicite à ton sujet. ;)

J'avais utilisé cette forme principalement pour être clair du point de vue d'un débutant en langage fonctionnel qui n'a pas trop l'habitude de manipuler des fonctions comme tout autre valeur.

NB : En Haskell tu peux écrire :

Code:

---

ajout = (:)

---

sans problème d'inférence de type (il n'y a pas de classes de type, donc la restriction ne joue pas).

--
Jedaï

Citation:

---

Envoyé par Jedai

J'avais utilisé cette forme principalement pour être clair du point de vue d'un débutant en langage fonctionnel qui n'a pas trop l'habitude de manipuler des fonctions comme tout autre valeur.

NB : En Haskell tu peux écrire :

Code:

---

ajout = (:)

---

sans problème d'inférence de type (il n'y a pas de classes de type, donc la restriction ne joue pas).

--
Jedaï

---

Je te taquinais mon cher :lol: