Select first

Description

Selecting the first occurrence of an element from a list

Source: The Art of Prolog

Download

Program source code: select_first.pl

Listing

/*
   select_first(X,Xs,Ys) :- 
	Ys is the list obtained by removing the 
	first occurrence of X from the list Xs.
*/
     select_first(X,[X|Xs],Xs).
     select_first(X,[Y|Ys],[Y|Zs]) :- X \== Y, select_first(X,Ys,Zs).
 
%  Program 7.4    Selecting the first occurrence of an element from a list

Comments

pl/prolog/pllib/select_first.txt · ostatnio zmienione: 2019/06/27 15:50 (edycja zewnętrzna)
www.chimeric.de Valid CSS Driven by DokuWiki do yourself a favour and use a real browser - get firefox!! Recent changes RSS feed Valid XHTML 1.0