Discussion :

[sedik.h]

Je veux une fonction semblable à la fonction memberchk, mais à la place de vérifier un élément, il faut vérifier une liste d'élément, quelque chose comme ça:

Code :

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

memberchk([2,3],[1,2,3,4])

Merci préalablement pour votre aide.

[Trap D]

Il faut prendre chacun des éléments de la première liste et regarder si ilqs appartiennent à la seconde liste.
Question quel est le résultat attendu pour
1°) lstmemberchk([2,3],[1,2,3,4]) ?
2°) lstmemberchk([2,5],[1,2,3,4]) ?
3°) lstmemberchk([5],[1,2,3,4]) ?

[sedik.h]

Bonjour Trap D, et merci pour votre réponse.

La réponse à ces questions:
1) true
2) false
3) false

mais j'ai testé cette fonction "lstmemberchk" et ça n'a pas marché, ça me donne cette erreur:

Code :

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

ERROR: toplevel: Undefined procedure: lstmember/2 (DWIM could not correct goal

Au fait, en cherchant sur le net j'ai trouvé cette réponse:

Code :

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

1
2
3
4
5
appartient(E,[E|_]).
appartient(E,[_|L]) :- appartient(E,L).
 
inclus([],_).
inclus([E|L1],L2):-appartient(E,L2),inclus(L1,L2).

et quand je fais l'appel comme ça par exemple: inclus([2,3],[1,2,3,4]), ça me donne ce que je cherche

Merci beaucoup

[Trap D]

C'est le problème du net, on trouve la solution sans avoir besoin de réfléchir, est-ce une bonne chose

PS : lstmemberchk c'était à vous de l'écrire !