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