actually generate solutions

This commit is contained in:
wi11-holdsworth 2025-08-26 21:34:26 +10:00
parent a568d59ce6
commit 15c51a8637

View file

@ -18,10 +18,11 @@ puzzle_solution(Puzzle) :-
%% valid(+Row) %% valid(+Row)
% %
valid_row([Head|Tail]) :- valid_row([Head|Row]) :-
Tail ins 1..9, Row ins 1..9,
all_distinct(Tail), all_distinct(Row),
valid_head(Head, Tail). valid_head(Head, Row),
label(Row).
%% valid_head(+Head, +Tail) %% valid_head(+Head, +Tail)