1:- module(logicmoo_planner,[load_planner_api/0]). 2
3:- style_check(-singleton). 4
5:- use_module(library(prolog_pack)). 6:- if( \+ prolog_pack:current_pack(planner_api)). 7:- dynamic user:file_search_path/2. 8:- multifile user:file_search_path/2. 9:- prolog_load_context(directory,Dir),
10 DirFor = planner,
11 (( \+ user:file_search_path(DirFor,Dir)) ->asserta(user:file_search_path(DirFor,Dir));true),
12 absolute_file_name('../..',Y,[relative_to(Dir),file_type(directory)]),
13 (( \+ user:file_search_path(pack,Y)) ->asserta(user:file_search_path(pack,Y));true). 14:- attach_packs. 15:- initialization(attach_packs). 16:- endif. 17
18
19:- if( \+ user:file_search_path(pddl,_) ). 20:- prolog_load_context(directory,Dir),
21 must((absolute_file_name('../pddl',Y,[relative_to(Dir),file_type(directory)]),
22 asserta(user:file_search_path(pddl,Y)))). 23:- endif. 24
25
29load_planner_api:- ensure_loaded(library(rsasak_forward_wa_star_h_add)).
31:- fixup_exports.