This commit is contained in:
rhiannon morris 2023-12-07 19:41:07 +01:00
parent ed05bffe65
commit 8d1ac2291e

View file

@ -74,8 +74,6 @@ joker(11, 0).
joker(X, X) :- X \= 11. joker(X, X) :- X \= 11.
part1_to_part2(Xs-B, Ys-B) :- maplist(joker, Xs, Ys). part1_to_part2(Xs-B, Ys-B) :- maplist(joker, Xs, Ys).
with_hand(Xs-B, H-Xs-B) :- hand(Xs, H).
part2(File) :- part2(File) :-
phrase_from_file(lines(Ls0), File), phrase_from_file(lines(Ls0), File),
maplist(part1_to_part2, Ls0, Ls), maplist(part1_to_part2, Ls0, Ls),