Set intersection

Description

Finding the intersection of two sets

Source: PROLOG str. 191 Wydawnictwo PLJ Warszawa 1991 ISBN 83-85190-63-5

Download

Program source code: set_intersection.pl

Listing

czesc_wsp([], X, []).
czesc_wsp([X |R], Y, [X|Z]) :- member(X, Y), !, czesc_wsp(R, Y, Z).
czesc_wsp([X|R], Y, Z) :- czesc_wsp(R, Y, Z).
 
czesc_wsp([1, 2, 8], [2, 5, 6, 8], C).

Comments

pl/prolog/pllib/set_intersection.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