add modes for all_same

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

View file

@ -64,7 +64,7 @@ main_diagonal([M|Ms], I, [D|Ds]) :-
main_diagonal(Ms, I1, Ds).
%% all_same(List)
%% all_same(+List)
%
all_same([Head|Tail]) :-
all_same(Head, Tail).