PROLOG: No muestra el resultado completo
Publicado por Ismael (1 intervención) el 18/06/2019 01:59:44
Programe el problema de los misioneros y los caníbales, lo hice con una búsqueda por profundidad, donde pongo cada nivel del grafo en el código, el nodo desde donde se inicia y el nodo meta, ejecuta bien el programa pero a la hora de ver los resultados me sale esto:
Y no se como hacer que me muestre el resultado completo.
Éste es el código:
Y no se como hacer que me muestre el resultado completo.
Éste es el código:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
ninicial([f, 3, 3, 0, 0]).
nmeta([d, 0, 0, 3, 3]).
t([f, 3, 3, 0, 0], [d, 2, 2, 1, 1]).
t([f, 3, 3, 0, 0], [d, 3, 2, 0, 1]).
t([f, 3, 3, 0, 0], [d, 3, 1, 0, 2]).
t([d, 2, 2, 1, 1], [f, 3, 2, 0, 1]).
t([d, 3, 1, 0, 2], [f, 3, 2, 0, 1]).
t([f, 3, 2, 0, 1], [d, 3, 0, 0, 3]).
t([d, 3, 0, 0, 3], [f, 3, 1, 0, 2]).
t([f, 3, 1, 0, 2], [d, 1, 1, 2, 2]).
t([d, 1, 1, 2, 2], [f, 2, 2, 1, 1]).
t([f, 2, 2, 1, 1], [d, 0, 2, 3, 1]).
t([d, 0, 2, 3, 1], [f, 0, 3, 3, 0]).
t([f, 0, 3, 3, 0], [d, 0, 1, 3, 2]).
t([d, 0, 1, 3, 2], [f, 1, 1, 2, 2]).
t([f, 1, 1, 2, 2], [d, 0, 0, 3, 3]).
%Llamadobpp(N, Ruta):-ninicial(N), bpp1(N, Ruta).
%No es necesario que N sea inicial, puede quitar ninicial(N).
%Caso basebpp1(N, [N]):-nmeta(N).
%Caso recursivobpp1(N, [N|Ruta1]):-t(N, N1), bpp1(N1, Ruta1).
Valora esta pregunta
0