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

anaconda

Browse Source
This commit is contained in:
Vitor Santos Costa
2017-11-11 02:15:59 +00:00
parent 4271f3debe
commit d23f7c149f
13 changed files with 902 additions and 1026 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
packages/cplint/cplint_yap.c
View File

@@ -134,7 +134,7 @@ static YAP_Bool compute_prob(void)
expr expression;
DdNode * function;
DdManager * mgr;
int nBVar,i,intBits,create_dot;
int nBVar,i,create_dot;
FILE * file;
DdNode * array[1];
double prob;
@@ -184,11 +184,10 @@ static YAP_Bool compute_prob(void)
array[0]=function;
onames[0]="Out";
file = open_file("cpl.dot", "w");
Cudd_DumpDot(mgr,1,array,names,onames,file);
Cudd_DumpDot(mgr,1,array,names,( char * const*)onames,file);
fclose(file);
}
nodes=init_table(vars.nBVar);
intBits=sizeof(unsigned int)*8;
prob=Prob(function,vars,nodes);
out=YAP_MkFloatTerm(prob);
destroy_table(nodes,vars.nBVar);