make *.pl files in src/prolog/lib available from libraries.rs

This commit is contained in:
Mark Thom
2019-09-26 23:10:04 -06:00
parent 2c1c1b7d12
commit 9a83ccbdbc
19 changed files with 130 additions and 57 deletions

View File

@@ -4,8 +4,8 @@ https://sicstus.sics.se/sicstus/docs/3.7.1/html/sicstus_17.html
:- module(domain, [domain/2]).
:- use_module('src/prolog/lib/atts').
:- use_module('src/prolog/lib/ordsets', [
:- use_module(library(atts)).
:- use_module(library(ordsets), [
ord_intersection/3,
ord_intersect/2,
list_to_ord_set/2

View File

@@ -1,5 +1,5 @@
:- use_module('src/prolog/lib/dcgs').
:- use_module('src/prolog/lib/reif').
:- use_module(library(dcgs)).
:- use_module(library(reif)).
animals([animal(dog, [is_true('has fur'), is_true('says woof')]),
animal(cat, [is_true('has fur'), is_true('says meow')]),

View File

@@ -60,9 +60,9 @@
:- module(zdd, [variables_set_zdd/2]).
:- use_module('src/prolog/lib/atts').
:- use_module('src/prolog/lib/dcgs').
:- use_module('src/prolog/lib/lists').
:- use_module(library(atts)).
:- use_module(library(dcgs)).
:- use_module(library(lists)).
:- attribute zdd_vs/2.

View File

@@ -29,9 +29,9 @@
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - */
:- use_module('src/prolog/lib/dcgs').
:- use_module('src/prolog/lib/dif').
:- use_module('src/prolog/lib/lists').
:- use_module(library(dcgs)).
:- use_module(library(dif)).
:- use_module(library(lists)).
pl_resolution(Clauses0, Chain) :-
maplist(sort, Clauses0, Clauses), % remove duplicates