new ve

2012-08-28 20:21:14 -05:00
parent fcfc0e52d7
commit 62ab5b3dcb
10 changed files with 399 additions and 251 deletions
--- a/packages/CLPBN/clpbn/discrete_utils.yap
+++ b/packages/CLPBN/clpbn/discrete_utils.yap
@@ -8,7 +8,7 @@
 %
 % remove columns from a table
 %
-project_from_CPT(V,tab(Table,Deps,Szs),tab(NewTable,NDeps,NSzs)) :-
+project_from_CPT(V,f(Table,Deps,Szs),f(NewTable,NDeps,NSzs)) :-
 	propagate_evidence(V,Evs),
 	functor(Table,_,Max),
 	find_projection_factor(Deps, V, NDeps, Szs, NSzs, F, Sz),