Guest User

Untitled

a guest
Jun 7th, 2018
93
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Prolog 0.10 KB | None | 0 0
  1. pred([],_,[]).
  2. pred([H|T],L,[H|T1]):-member(H,L),!,pred(T,L,T1).
  3. pred([_|T],L,L1):-pred(T,L,L1).
Add Comment
Please, Sign In to add comment