Advertisement
Guest User

List manipulation

a guest
Jul 23rd, 2019
117
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Prolog 0.42 KB | None | 0 0
  1. :- use_module(library(lists)).
  2. append([], X, X).
  3. append([X | Y], Z, [X | W]) :- append(Y, Z, W).
  4.  
  5. push([], X, [X]).
  6. push([X | Y], Z, [X | W]) :- push(Y, Z, W).
  7.  
  8. pushFirst(X, Z, [Z | X]).
  9.  
  10. length([], 0).
  11. length([H | T], N) :- length(T, N2), N is N2 + 1.
  12.  
  13. max([X],X).
  14. max([X|L],X) :- max(L,M), X > M.
  15. max([X|L],M) :- max(L,M), X =< M.
  16.  
  17. min([X],X).
  18. min([X|L],X) :- min(L,M), X < M.
  19. min([X|L],M) :- min(L,M), X >= M.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement