Dynamic memory

Description

Example with dynamic memory, collecting all solution

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

Download

Program source code: dynamic_memory.pl

Listing

utw_liste_rozw(Co, Cel, _) :- asserta(wybrany(ini)), call(Cel), asserta(wybrany(Co)), fail.
 
utw_liste_rozw(_, _, Lista_rozw) :- zbieraj([], Lista_rob), !, Lista_rozw = Lista_rob.
 
zbieraj(S, L) :- pob_nast(X), !, zbieraj([X|S], L).
zbieraj(L, L).
 
pob_nast(X) :- retract(wybrany(X)), !, X \= ini.

Comments

pl/prolog/pllib/dynamic_memory.txt · ostatnio zmienione: 2017/07/17 08:08 (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