:- 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.
