sudoku(x,board):-
board=x, board = [a1,a2,a3,a4,a5,a6,a7,a8,a9, b1,b2,b3,b4,b5,b6,b7,b8,b9, c1,c2,c3,c4,c5,c6,c7,c8,c9, d1,d2,d3,d4,d5,d6,d7,d8,d9, e1,e2,e3,e4,e5,e6,e7,e8,e9, f1,f2,f3,f4,f5,f6,f7,f8,f9, g1,g2,g3,g4,g5,g6,g7,g8,g9, h1,h2,h3,h4,h5,h6,h7,h8,h9, i1,i2,i3,i4,i5,i6,i7,i8,i9], %rows on board permutation([a1,a2,a3,a4,a5,a6,a7,a8,a9],[1,2,3,4,5,6,7,8,9]), permutation([b1,b2,b3,b4,b5,b6,b7,b8,b9],[1,2,3,4,5,6,7,8,9]), permutation([c1,c2,c3,c4,c5,c6,c7,c8,c9],[1,2,3,4,5,6,7,8,9]), permutation([d1,d2,d3,d4,d5,d6,d7,d8,d9],[1,2,3,4,5,6,7,8,9]), permutation([e1,e2,e3,e4,e5,e6,e7,e8,e9],[1,2,3,4,5,6,7,8,9]), permutation([f1,f2,f3,f4,f5,f6,f7,f8,f9],[1,2,3,4,5,6,7,8,9]), permutation([g1,g2,g3,g4,g5,g6,g7,g8,g9],[1,2,3,4,5,6,7,8,9]), permutation([h1,h2,h3,h4,h5,h6,h7,h8,h9],[1,2,3,4,5,6,7,8,9]), permutation([i1,i2,i3,i4,i5,i6,i7,i8,i9],[1,2,3,4,5,6,7,8,9]), %columns on board permutation([a1,b1,c1,d1,e1,f1,g1,h1,i1],[1,2,3,4,5,6,7,8,9]), permutation([a2,b2,c2,d2,e2,f2,g2,h2,i2],[1,2,3,4,5,6,7,8,9]), permutation([a3,b3,c3,d3,e3,f3,g3,h3,i3],[1,2,3,4,5,6,7,8,9]), permutation([a4,b4,c4,d4,e4,f4,g4,h4,i4],[1,2,3,4,5,6,7,8,9]), permutation([a5,b5,c5,d5,e5,f5,g5,h5,i5],[1,2,3,4,5,6,7,8,9]), permutation([a6,b6,c6,d6,e6,f6,g6,h6,i6],[1,2,3,4,5,6,7,8,9]), permutation([a7,b7,c7,d7,e7,f7,g7,h7,i7],[1,2,3,4,5,6,7,8,9]), permutation([a8,b8,c8,d8,e8,f8,g8,h8,i8],[1,2,3,4,5,6,7,8,9]), permutation([a9,b9,c9,d9,e9,f9,g9,h9,i9],[1,2,3,4,5,6,7,8,9]), %each individual box permutation of 9 different numbers permutation([a1,a2,a3,b1,b2,b3,c1,c2,c3],[1,2,3,4,5,6,7,8,9]), permutation([a4,a5,a6,b4,b5,b6,c4,c5,c6],[1,2,3,4,5,6,7,8,9]), permutation([a7,a8,a9,b7,b8,b9,c7,c8,c9],[1,2,3,4,5,6,7,8,9]), permutation([d1,d2,d3,e1,e2,e3,f1,f2,f3],[1,2,3,4,5,6,7,8,9]), permutation([d4,d5,d6,e4,e5,e6,f4,f5,f6],[1,2,3,4,5,6,7,8,9]), permutation([d7,d8,d9,e7,e8,e9,f7,f8,f9],[1,2,3,4,5,6,7,8,9]), permutation([g1,g2,g3,h1,h2,h3,i1,i2,i3],[1,2,3,4,5,6,7,8,9]), permutation([g4,g5,g6,h4,h5,h6,i4,i5,i6],[1,2,3,4,5,6,7,8,9]), permutation([g7,g8,g9,h7,h8,h9,i7,i8,i9],[1,2,3,4,5,6,7,8,9]). the above solve/2 5 ?- solve(x,y). error: toplevel: undefined procedure: solve/2 (dwim not correct goal)
that happened when tried 2 normal variables
2 ?- solve(x,[,7,2,4,,_,,,1,,8,,7,,,3,2,,6,3,1,,_,,7,,_,,,_,5,2,,,1,4,,,5,9,,4,6,,_,8,4,,,3,7,,,_,,,9,,,_,2,5,3,,6,8,,_,5,,7,,2,,,_,,9,4,6,]). error: toplevel: undefined procedure: solve/2 (dwim not correct goal)
the same happened when 2nd variable input list fixed numbers
i have no idea i'm doing wrong , it's getting frustrating trying think of possible answers when nothing's working can tell me i'm doing wrong?
you meant
solve(x,board):- board = x, board = [a1,a2,a3,a4,a5,a6,a7,a8,a9, b1,b2,b3,b4,b5,b6,b7,b8,b9, c1,c2,c3,c4,c5,c6,c7,c8,c9, d1,d2,d3,d4,d5,d6,d7,d8,d9, ... but think code slow work...
Comments
Post a Comment