Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- randomList(L, D) :- randomList([], L, D).
- randomList(_, [], _).
- randomList(Acc, [E|L], D) :- member(E, D), randomList([E|Acc], L, D).
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement