Be consistent: constraint is always on top

This commit is contained in:
Tiago Gomes 2012-12-12 15:41:41 +00:00
parent 66cd58655b
commit e66ff6777c
1 changed files with 10 additions and 10 deletions

View File

@ -11,6 +11,16 @@
%:- clpbn:set_clpbn_flag(em_solver,bp).
%:- clpbn:set_clpbn_flag(em_solver,bdd).
professor(p0).
professor(p1).
professor(p2).
professor(p3).
professor(p4).
professor(p5).
professor(p6).
professor(p7).
professor(p8).
bayes abi(K)::[h,m,l] ; abi_table ; [professor(K)].
bayes pop(K)::[h,m,l], abi(K) ; pop_table ; [professor(K)].
@ -32,16 +42,6 @@ goal_list([
abi(p6,_),
pop(p7,_)]).
professor(p0).
professor(p1).
professor(p2).
professor(p3).
professor(p4).
professor(p5).
professor(p6).
professor(p7).
professor(p8).
timed_main :-
statistics(runtime, _),
main(Lik),