This repository has been archived on 2023-08-20. You can view files and clone it, but cannot push or open issues or pull requests.
yap-6.3/packages/meld/meldp.yap
2011-05-11 09:28:40 +01:00

25 lines
233 B
Prolog

:- module(meld_program,
[
run/1
]).
:- use_module(meldi,
[
push/1,
first/2,
min/3,
max/3
]).
% built-ins.
:- dynamic root/1, neighbor/2, temperature/2.
trace(A,B) :- !,
writeln((A:-B)),
trace.
run([]) :- fail.