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

module system

This commit is contained in:
Vitor Santos Costa 2014-08-04 21:31:32 -05:00
parent 63d2f0f57e
commit c6652c0ef6
5 changed files with 12 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/CLPBN/clpbn/bnt.yap
View File

@ -16,6 +16,8 @@
:- use_module(library('clpbn/discrete_utils'), :- use_module(library('clpbn/discrete_utils'),
[reorder_CPT/5]). [reorder_CPT/5]).
:- use_module(library('atts')).
:- use_module(library(matlab), :- use_module(library(matlab),
[start_matlab/1, [start_matlab/1,
close_matlab/0, close_matlab/0,

10
packages/CLPBN/clpbn/hmm.yap
View File

@ -7,13 +7,15 @@
:- ensure_loaded(library(clpbn)). :- ensure_loaded(library(clpbn)).
:- use_module(library(atts)).
:- use_module(library(lists), :- use_module(library(lists),
[nth/3]). [nth/3]).
:- use_module(library(nbhash), :- use_module(library(bhash),
[nb_hash_new/2, [b_hash_new/2,
nb_hash_lookup/3, b_hash_lookup/3,
nb_hash_insert/3 b_hash_insert/3
]). ]).
:- ensure_loaded(library(tries)). :- ensure_loaded(library(tries)).

2
packages/CLPBN/clpbn/pgrammar.yap
View File

@ -17,7 +17,7 @@
:- use_module(library(lists), :- use_module(library(lists),
[sum_list/2]). [sum_list/2]).
:- use_module(library(matrix)], :- use_module(library(matrix),
[matrix_new/3, [matrix_new/3,
matrix_add/3, matrix_add/3,
matrix_get/3, matrix_get/3,

3
packages/CLPBN/clpbn/table.yap
View File

@ -110,8 +110,7 @@ clpbn_table(F/N,M) :-
asserta(clpbn_table(S, M, IGoal)), asserta(clpbn_table(S, M, IGoal)),
assert((M:S :- assert((M:S :-
!, !,
% write(S: ' ' ), b_getval((clpbn_tables), Tab),
b_getval(clpbn_tables, Tab),
% V2 is unbound. % V2 is unbound.
(b_hash_lookup(Key, V2, Tab) -> (b_hash_lookup(Key, V2, Tab) ->
% (attvar(V2) -> writeln(ok:A0:V2) ; writeln(error(V2:should_be_attvar(S)))), % (attvar(V2) -> writeln(ok:A0:V2) ; writeln(error(V2:should_be_attvar(S)))),

3
packages/CLPBN/learning/aleph_params.yap
View File

@ -20,7 +20,8 @@
[{}/1, [{}/1,
clpbn_flag/2, clpbn_flag/2,
clpbn_flag/3, clpbn_flag/3,
set_clpbn_flag/2 set_clpbn_flag/2,
op(500, xfy, with)
]). ]).
:- use_module(library('clpbn/learning/em')). :- use_module(library('clpbn/learning/em')).