Discussion :

[SteelBox]

Bonjour,

J'ai un petit problème dans un projet de Prolog. Voici ce qui me pose problème. Lorsque je rentre la règle suivante :

Code :

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

1
2
 
test(F,List):-not(member(F,List)),append(List,F,L),write(L).

Le résultat L est une simple liste, alors que je voudrais une liste de listes sachant que l'appel se fait de la fonction suivante :

?- test([1,2,3,4,0,6,7,8,9],[1,2]).

donne :

[1, 2, 1, 2, 3, 4, 0, 6, 7, 8, 9]
Yes

Comment récupérer une liste de listes ?
Merci

[Trap D]

Je pense, d'après ce que tu dis, que déjà tu devrais faire,( si j'ai bien compris tu teste si une liste est une sous liste d'une autre liste)

Code :

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

test([1,2], [[1,2,3,4,0,6,7,8,9]]).

Et donc ensuite j'écrirais la règle sous cette forme

Code :

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

1
2
test(A, B) :-
	not(member(A, B)), append(B, [A], L), write(L).

avec comme résultat

Code :

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

1
2
 test([1,2], [[1,2,3,4,0,6,7,8,9]]).
[[1, 2, 3, 4, 0, 6, 7, 8, 9], [1, 2]]

[SteelBox]

Merci beaucoup.
J'en profite pour demander si pour un taquin (sous forme d'une liste de nombres), la solution de mémoriser les listes déjà effectuées afin de ne pas revenir sur ses pas est une bonne solution ?
Etape suivante : chercher une heuristique qui permet de converger plus vite

[Trap D]

oui, c'est une solution, celà dépend de la méthode de résolution que tu envisages.
(style le mec qui se mouille pas trop )

[SteelBox]

Euh, encore un problème avec prolog. Lorsque j'ai des listes trop grandes, il ne m'affiche pas tout.

Voici ce que ca donne :

A = [h, d, b, b, g, h, h, d, b|...]

Comment avoir toute la liste ?

[Trap D]

Ben tu t'écris un write_list :

Code :

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

1
2
3
write_liste([]) :- writeln(' ').
write_liste([A|B]) :-
	write(A), write(' '), write_liste(B).

Pour en revenir à ta question précédente, pour les prog en prolog je fais comme ça (mémoriser les actions dans des listes et regarder si j'ai déjà fait), j'ai appris tout seul et je n'ai pas encore eu le temps de lire et comprendre en entier "L'Art de Prolog".

J'ai fait un taquin en C, où j'ai travaillé différemment.