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

View File

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

View File

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

View File

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

View File

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

View File

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