diogo
/
yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
This repository has been archived on 2023-08-20. You can view files and clone it, but cannot push or open issues or pull requests.
yap-6.3/packages/CLPBN/clpbn/horus.yap

57 lines
1.5 KiB
Plaintext
Raw Normal View History

yay, my first commit
2012-03-31 23:27:37 +01:00
/*******************************************************
rename bp.yap and fove.yap
2012-05-23 19:15:23 +01:00
Horus Interface
More whitespace cleanups
2012-12-20 23:19:10 +00:00
yay, my first commit
2012-03-31 23:27:37 +01:00
********************************************************/
add more support for FOVE.
2012-03-22 19:10:15 +00:00
:- module(clpbn_horus,
Fix typo
2013-01-07 14:04:44 +00:00
[set_horus_flag/2,
Use tabs instead of spaces for consistency
2012-12-17 12:13:08 +00:00
cpp_create_lifted_network/3,
cpp_create_ground_network/4,
More cleanups
2012-12-18 22:47:43 +00:00
cpp_set_parfactors_params/3,
cpp_set_factors_params/3,
Use tabs instead of spaces for consistency
2012-12-17 12:13:08 +00:00
cpp_run_lifted_solver/3,
cpp_run_ground_solver/3,
cpp_set_vars_information/2,
cpp_set_horus_flag/2,
cpp_free_lifted_network/1,
cpp_free_ground_network/1
]).
yay, my first commit
2012-03-31 23:27:37 +01:00
More cleanups
2012-12-18 22:47:43 +00:00
:- catch(load_foreign_files([horus], [], init_predicates), _, patch_things_up)
-> true ; warning.
add more support for FOVE.
2012-03-22 19:10:15 +00:00
refactor the city benchmarks and introduce set_solver/1
2012-04-11 19:15:52 +01:00
PFL support.
2012-04-03 15:01:35 +01:00
patch_things_up :-
Use tabs instead of spaces for consistency
2012-12-17 12:13:08 +00:00
assert_static(clpbn_horus:cpp_set_horus_flag(_,_)).
PFL support.
2012-04-03 15:01:35 +01:00
warning :-
More cleanups
2012-12-18 22:47:43 +00:00
format(user_error,"Horus library not installed: cannot use hve, bp, cbp, lve, lkc and lbp~n.",[]).
PFL support.
2012-04-03 15:01:35 +01:00
prefix calls to c++ functions with cpp_
2012-05-23 20:34:57 +01:00
set_horus_flag(K,V) :- cpp_set_horus_flag(K,V).
yay, my first commit
2012-03-31 23:27:37 +01:00
Improve solver flags
2012-12-27 23:21:32 +00:00
:- cpp_set_horus_flag(verbosity, 0).
yay, my first commit
2012-03-31 23:27:37 +01:00
Chanse use_logarithms default to true. Reasoning: - In small networks, the use of logarithms is not noticed in terms of performance. - In large networks, the chance to have a division by 0 is too high when not using logarithms.
2013-01-04 19:48:31 +00:00
%:- cpp_set_horus_flag(use_logarithms, false).
:- cpp_set_horus_flag(use_logarithms, true).
yay, my first commit
2012-03-31 23:27:37 +01:00
Improve solver flags
2012-12-27 23:21:32 +00:00
%:- cpp_set_horus_flag(hve_elim_heuristic, sequential).
%:- cpp_set_horus_flag(hve_elim_heuristic, min_neighbors).
%:- cpp_set_horus_flag(hve_elim_heuristic, min_weight).
%:- cpp_set_horus_flag(hve_elim_heuristic, min_fill).
:- cpp_set_horus_flag(hve_elim_heuristic, weighted_min_fill).
yay, my first commit
2012-03-31 23:27:37 +01:00
Improve solver flags
2012-12-27 23:21:32 +00:00
:- cpp_set_horus_flag(bp_msg_schedule, seq_fixed).
%:- cpp_set_horus_flag(bp_msg_schedule, seq_random).
%:- cpp_set_horus_flag(bp_msg_schedule, parallel).
%:- cpp_set_horus_flag(bp_msg_schedule, max_residual).
:- cpp_set_horus_flag(bp_accuracy, 0.0001).
:- cpp_set_horus_flag(bp_max_iter, 1000).
yay, my first commit
2012-03-31 23:27:37 +01:00