small
- do not call goal expansion on meta-calls (that is done by undef). - docs updates - fix init code
This commit is contained in:
@@ -291,7 +291,7 @@ propagate_evidence(InterpretationID,Query_Type) :-
|
||||
% iterate over all evidence atoms
|
||||
forall(user:known(InterpretationID,Atom,Value),
|
||||
(
|
||||
catch( rounder_compute_reachable_atoms(Atom,InterpretationID,Success), _, fail),
|
||||
catch( grounder_compute_reachable_atoms(Atom,InterpretationID,Success), _, fail),
|
||||
(
|
||||
(Success==true; Value==false)
|
||||
->
|
||||
@@ -385,7 +385,6 @@ propagate_evidence(InterpretationID,Query_Type) :-
|
||||
print_script_per_cluster([],_,_,Seen_Atoms,Seen_Atoms,Cluster_IDs,Cluster_IDs).
|
||||
print_script_per_cluster([Refs|T],InterpretationID,Cluster_ID,Old_Seen_Atoms,Seen_Atoms,Old_Cluster_IDs,Cluster_IDs) :-
|
||||
create_bdd_file_name(InterpretationID,Cluster_ID,File_Name),
|
||||
%trace,
|
||||
once(print_simplecudd_script(Refs,File_Name,This_Seen_Atoms)),
|
||||
New_Seen_Atoms is Old_Seen_Atoms+This_Seen_Atoms,
|
||||
Next_Cluster_ID is Cluster_ID+1,
|
||||
|
@@ -261,7 +261,6 @@
|
||||
:- style_check(all).
|
||||
:- yap_flag(unknown,error).
|
||||
|
||||
|
||||
% this is a test to determine whether YAP provides the needed trie library
|
||||
:- initialization(
|
||||
( predicate_property(trie_disable_hash, imported_from(tries)) ->
|
||||
|
Reference in New Issue
Block a user