Solucionador de crucigramas en PROLOG
El criollo de Paradise Island tiene 14 palabras: "abandonar", "abulón", "anagrama", "bote", "barquero", "niño", "conectar", "elegante", "mejorar", "isla", "hombre", "arena", "sol" y "mujer".
The Paradise Times ha publicado este crucigrama:
l crucigrama contiene algunas de las 14 palabras, pero no otra
Escribe un programa Prolog que comienza desde
word(X) :-
member(X,
[
[a,b,a,n,d,o,n], [a,b,a,l,o,n,e], [a,n,a,g,r,a,m],
[b,o,a,t], [b,o,a,t,m,a,n], [c,h,i,l,d],
[c,o,n,n,e,c,t], [e,l,e,g,a,n,t], [e,n,h,a,n,c,e],
[i,s,l,a,n,d], [m, a, n], [s,a,n,d],
[s,u,n], [w, o, m, a, n]
]).
solution(H1,H2,H3,V1,V2,V3) :-
y define el predicadosolution
de una manera qu
solution(H1,H2,H3,V1,V2,V3)
es cierto si y solo siH1
, H2
, H3
, V1
, V2
yV3
son palabras válidas de Paradise Island que forman un crucigrama válido cuando se escriben en la cuadrícula dada anteriormente. (Por ejemplo, la segunda letra deH1
debe coincidir con la segunda letra deV1
.)
Utilice la consulta
?- solution(H1,H2,H3,V1,V2,V3).
para resolver el crucigrama. Encuentre todas las soluciones al crucigrama.
Sugerencia: es posible que desee comenzar con un crucigrama más pequeño y un léxico menos rico.