assert(3)

This commit is contained in:
Vitor Santos Costa
2019-03-09 11:23:30 +00:00
parent 9378622d42
commit ab56074bb1
6 changed files with 58 additions and 57 deletions

View File

@@ -32,8 +32,8 @@ path(X,Y,A,R) :-
path(Z,Y,[Z|A],R).
% using directed edges in both directions
edge(X,Y) :- problog:dir_edge(Y,X).
edge(X,Y) :- problog:dir_edge(X,Y).
edge(X,Y) :- dir_edge(Y,X).
edge(X,Y) :- dir_edge(X,Y).
% checking whether node hasn't been visited before
absent(_,[]).

View File

@@ -98,3 +98,4 @@ test_example(33,path(5,4),0.57).
test_example(34,path(6,4),0.51).
test_example(35,path(6,5),0.69).
:- set_problog_flag(init_method,([Query,X,Y],N,Bdd,graph2bdd(X,Y,N,Bdd))).