test/detect_files/foo_prolog1.pl - ohcount (85d5c3b4-c1f3-4d55-a24f-4c231b8d4c21/main)

Tree @85d5c3b4-c1f3-4d55-a24f-4c231b8d4c21/main (Download .tar.gz)

% select(Element, List, Remaining)

select(H, [H| T], T).
select(H, [X| R], [X| T]) :-
	select(H, R, T).