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).
|
||||
|
||||
|
||||
%% all_same(List)
|
||||
%% all_same(+List)
|
||||
%
|
||||
all_same([Head|Tail]) :-
|
||||
all_same(Head, Tail).
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue