diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

CLP(BN) fixes

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@2096 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc
2008-02-13 11:57:46 +00:00
parent a4a26478e0
commit d86f30a2eb
8 changed files with 58 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
CLPBN/clpbn/matrix_cpt_utils.yap
View File

@@ -49,7 +49,7 @@ project_from_CPT(V,tab(Table,Deps,_),tab(NewTable,NDeps,NSzs)) :-
matrix_dims(NewTable, NSzs).
evidence(V, Pos) :-
clpbn:get_atts(V, [evidence(Pos),dist(Id,_)]).
clpbn:get_atts(V, [evidence(Pos)]).
vnth([V1|Deps], N, V, N, Deps) :-
V == V1, !.