1#!/usr/bin/env swipl 2 3:- module(logicmoo_nlu,[]). 4 5% ============================================== 6% [Required] Load the Logicmoo User System 7% ============================================== 8:- ensure_loaded(library(logicmoo_lib)). 9 10:- if( \+ exists_source(library('logicmoo_nlu/nl_pipeline.pl'))). 11:- add_pack_path(packs_xtra). 12:- endif. 13 14 15:- if( \+ exists_source(library('logicmoo_nlu/parser_sharing.pl'))). 16:- add_pack_path(packs_sys). 17:- endif. 18 19:- use_module(library(logicmoo_nlu/nl_pipeline)). 20:- use_module(library(logicmoo_nlu/parser_sharing)). 21:- use_module(library(logicmoo_nlu/parser_pldata)). 22:- use_module(library(logicmoo_nlu/parser_tokenize)). 23:- use_module(library(logicmoo_nlu/parser_chat80)). 24:- use_module(library(logicmoo_nlu/parser_e2c)). 25 26 27/* 28% :- system:ensure_loaded(pack(logicmoo_nlu/prolog/logicmoo_nlu/parser_chat80)). 29%:- system:ensure_loaded(pack(logicmoo_nlu/prolog/logicmoo_nlu/parser_pldata)). 30 31:- use_module(library(logicmoo_nlu/parser_sharing)). 32:- use_module(library(logicmoo_nlu/parser_tokenize)). 33 34:- if(exists_source(library(logicmoo_nlu))). 35% 36:- use_module(library(logicmoo_nlu)). 37%:- use_module(library(logicmoo_nlu/parser_tokenize)). 38%:- use_module(library(logicmoo_nlu/nl_pipeline)). 39:- else. 40% :- system:ensure_loaded(pack(logicmoo_nlu/prolog/logicmoo_nlu/parser_sharing)). 41:- if(exists_source(pack(logicmoo_nlu/ext/pldata/nl_iface))). 42:- ensure_loaded(pack(logicmoo_nlu/ext/pldata/nl_iface)). 43:- ensure_loaded(library(nldata/nl_iface)). 44:- else. 45:- if(exists_source(library(nldata/nl_iface))). 46% being in user is just to help debugging from console 47%:- user:ensure_loaded(library(nldata/nl_iface)). 48:- endif. 49:- endif. 50:- load_wordnet. 51:- endif. 52 53*/ 54 55 56:- current_prolog_flag(access_level,WAS),!, 57 set_prolog_flag(access_level,user), 58 reexport(library('logicmoo_nlu/nl_pipeline.pl')), 59 set_prolog_flag(access_level,WAS).