add modes for all_same
This commit is contained in:
parent
15c51a8637
commit
08bcabcc8c
1 changed files with 1 additions and 1 deletions
2
main.pl
2
main.pl
|
|
@ -64,7 +64,7 @@ main_diagonal([M|Ms], I, [D|Ds]) :-
|
||||||
main_diagonal(Ms, I1, Ds).
|
main_diagonal(Ms, I1, Ds).
|
||||||
|
|
||||||
|
|
||||||
%% all_same(List)
|
%% all_same(+List)
|
||||||
%
|
%
|
||||||
all_same([Head|Tail]) :-
|
all_same([Head|Tail]) :-
|
||||||
all_same(Head, Tail).
|
all_same(Head, Tail).
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue