java/com/googlecode/prolog_cafe/builtin/system.pl [1:215]: - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - %:- op(1150, fx, (package)). %package(_). :- package 'com.googlecode.prolog_cafe.builtin'. :- public system_predicate/1. system_predicate(system_predicate(_)). % Control constructs system_predicate(true). system_predicate(therwise). system_predicate(fail). system_predicate(false). system_predicate((!)). system_predicate('$get_level'(_)). system_predicate('$neck_cut'). system_predicate('$cut'(_)). system_predicate((_ ^ _)). system_predicate((_ , _)). system_predicate((_ ; _)). system_predicate((_ -> _)). system_predicate(call(_)). system_predicate(catch(_,_,_)). system_predicate(throw(_)). system_predicate(on_exception(_,_,_)). system_predicate(raise_exception(_)). % Term unification system_predicate((_ = _)). system_predicate('$unify'(_,_)). system_predicate((_ \= _)). system_predicate('$not_unifiable'(_,_)). % Type testing system_predicate(var(_)). system_predicate(atom(_)). system_predicate(integer(_)). system_predicate(float(_)). system_predicate(atomic(_)). system_predicate(compound(_)). system_predicate(nonvar(_)). system_predicate(number(_)). system_predicate(java(_)). system_predicate(java(_,_)). system_predicate(closure(_)). system_predicate(ground(_)). system_predicate(callable(_)). % Term comparison system_predicate((_ == _)). system_predicate('$equality_of_term'(_,_)). system_predicate((_ \== _)). system_predicate('$inequality_of_term'(_,_)). system_predicate((_ @< _)). system_predicate('$before'(_,_)). system_predicate((_ @> _)). system_predicate('$after'(_,_)). system_predicate((_ @=< _)). system_predicate('$not_after'(_,_)). system_predicate((_ @>= _)). system_predicate('$not_before'(_,_)). system_predicate(?=(_,_)). system_predicate('$identical_or_cannot_unify'(_,_)). system_predicate(compare(_,_,_)). system_predicate(sort(_,_)). system_predicate(keysort(_,_)). %system_predicate(merge(_,_,_)). % Term creation and decomposition system_predicate(arg(_,_,_)). system_predicate(functor(_,_,_)). system_predicate((_ =.. _)). system_predicate('$univ'(_,_)). system_predicate(copy_term(_,_)). % Arithmetic evaluation system_predicate(is(_,_)). system_predicate('$abs'(_,_)). system_predicate('$asin'(_,_)). system_predicate('$acos'(_,_)). system_predicate('$atan'(_,_)). system_predicate('$bitwise_conj'(_,_,_)). system_predicate('$bitwise_disj'(_,_,_)). system_predicate('$bitwise_exclusive_or'(_,_,_)). system_predicate('$bitwise_neg'(_,_)). system_predicate('$ceil'(_,_)). system_predicate('$cos'(_,_)). system_predicate('$degrees'(_,_)). system_predicate('$exp'(_,_)). system_predicate('$float'(_,_)). system_predicate('$float_integer_part'(_,_)). system_predicate('$float_fractional_part'(_,_)). system_predicate('$float_quotient'(_,_,_)). system_predicate('$floor'(_,_)). system_predicate('$int_quotient'(_,_,_)). system_predicate('$log'(_,_)). system_predicate('$max'(_,_,_)). system_predicate('$min'(_,_,_)). system_predicate('$minus'(_,_,_)). system_predicate('$mod'(_,_,_)). system_predicate('$multi'(_,_,_)). system_predicate('$plus'(_,_,_)). system_predicate('$pow'(_,_,_)). system_predicate('$radians'(_,_)). system_predicate('$rint'(_,_)). system_predicate('$round'(_,_)). system_predicate('$shift_left'(_,_,_)). system_predicate('$shift_right'(_,_,_)). system_predicate('$sign'(_,_)). system_predicate('$sin'(_,_)). system_predicate('$sqrt'(_,_)). system_predicate('$tan'(_,_)). system_predicate('$truncate'(_,_)). % Arithmetic comparison system_predicate((_ =:= _)). system_predicate('$arith_equal'(_,_)). system_predicate((_ =\= _)). system_predicate('$arith_not_equal'(_,_)). system_predicate((_ < _)). system_predicate('$less_than'(_,_)). system_predicate((_ =< _)). system_predicate('$less_or_equal'(_,_)). system_predicate((_ > _)). system_predicate('$greater_than'(_,_)). system_predicate((_ >= _)). system_predicate('$greater_or_equal'(_,_)). % Clause retrieval and information system_predicate(clause(_,_)). system_predicate(initialization(_,_)). system_predicate('$new_indexing_hash'(_,_,_)). % Clause creation and destruction system_predicate(assert(_)). system_predicate(assertz(_)). system_predicate(asserta(_)). system_predicate(retract(_)). system_predicate(abolish(_)). system_predicate(retractall(_)). % All solutions system_predicate(findall(_,_,_)). system_predicate(bagof(_,_,_)). system_predicate(setof(_,_,_)). % Stream selection and control system_predicate(open(_,_,_)). system_predicate(open(_,_,_,_)). system_predicate(close(_)). system_predicate(close(_,_)). system_predicate(flush_output(_)). % Character input/output system_predicate(get_char(_,_)). system_predicate(get_code(_,_)). system_predicate(put_char(_,_)). system_predicate(put_code(_,_)). system_predicate(nl(_)). system_predicate(get(_,_)). system_predicate(put(_,_)). system_predicate(tab(_,_)). system_predicate(skip(_,_)). % Term input/output system_predicate(read(_,_)). system_predicate(read_with_variables(_,_,_)). system_predicate(read_line(_,_)). system_predicate(write(_,_)). system_predicate(writeq(_,_)). system_predicate(write_canonical(_,_)). system_predicate(write_term(_,_)). system_predicate(write_term(_,_,_)). system_predicate(op(_,_,_)). system_predicate(current_op(_,_,_)). % Logic and control system_predicate(\+(_)). system_predicate(once(_)). system_predicate(repeat). % Atomic term processing system_predicate(atom_length(_,_)). system_predicate(atom_concat(_,_,_)). system_predicate(sub_atom(_,_,_,_,_)). system_predicate(atom_chars(_,_)). system_predicate(atom_codes(_,_)). system_predicate(char_code(_,_)). system_predicate(number_chars(_,_)). system_predicate(number_codes(_,_)). system_predicate(name(_,_)). % Implementation defined hooks system_predicate(set_prolog_flag(_,_)). system_predicate(current_prolog_flag(_,_)). system_predicate(halt). system_predicate(halt(_)). system_predicate(abort). % DCG system_predicate('C'(_,_,_)). system_predicate(expand_term(_,_)). % Hash creation and control system_predicate(new_hash(_)). system_predicate(new_hash(_,_)). system_predicate(hash_clear(_)). system_predicate(hash_contains_key(_,_)). system_predicate(hash_get(_,_,_)). system_predicate(hash_is_empty(_)). system_predicate(hash_keys(_,_)). system_predicate(hash_map(_,_)). system_predicate(hash_put(_,_,_)). system_predicate(hash_remove(_,_)). system_predicate(hash_size(_,_)). system_predicate('$get_hash_manager'(_)). % Prolog interpreter system_predicate(cafeteria). system_predicate(consult(_)). system_predicate(trace). system_predicate(notrace). system_predicate(debug). system_predicate(nodebug). system_predicate(leash(_)). system_predicate(spy(_)). system_predicate(nospy(_)). system_predicate(nospyall). system_predicate(listing). system_predicate(listing(_)). % Misc system_predicate(length(_,_)). system_predicate(numbervars(_,_,_)). system_predicate(statistics(_,_)). % END - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - src/builtin/system.pl [1:215]: - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - %:- op(1150, fx, (package)). %package(_). :- package 'com.googlecode.prolog_cafe.builtin'. :- public system_predicate/1. system_predicate(system_predicate(_)). % Control constructs system_predicate(true). system_predicate(therwise). system_predicate(fail). system_predicate(false). system_predicate((!)). system_predicate('$get_level'(_)). system_predicate('$neck_cut'). system_predicate('$cut'(_)). system_predicate((_ ^ _)). system_predicate((_ , _)). system_predicate((_ ; _)). system_predicate((_ -> _)). system_predicate(call(_)). system_predicate(catch(_,_,_)). system_predicate(throw(_)). system_predicate(on_exception(_,_,_)). system_predicate(raise_exception(_)). % Term unification system_predicate((_ = _)). system_predicate('$unify'(_,_)). system_predicate((_ \= _)). system_predicate('$not_unifiable'(_,_)). % Type testing system_predicate(var(_)). system_predicate(atom(_)). system_predicate(integer(_)). system_predicate(float(_)). system_predicate(atomic(_)). system_predicate(compound(_)). system_predicate(nonvar(_)). system_predicate(number(_)). system_predicate(java(_)). system_predicate(java(_,_)). system_predicate(closure(_)). system_predicate(ground(_)). system_predicate(callable(_)). % Term comparison system_predicate((_ == _)). system_predicate('$equality_of_term'(_,_)). system_predicate((_ \== _)). system_predicate('$inequality_of_term'(_,_)). system_predicate((_ @< _)). system_predicate('$before'(_,_)). system_predicate((_ @> _)). system_predicate('$after'(_,_)). system_predicate((_ @=< _)). system_predicate('$not_after'(_,_)). system_predicate((_ @>= _)). system_predicate('$not_before'(_,_)). system_predicate(?=(_,_)). system_predicate('$identical_or_cannot_unify'(_,_)). system_predicate(compare(_,_,_)). system_predicate(sort(_,_)). system_predicate(keysort(_,_)). %system_predicate(merge(_,_,_)). % Term creation and decomposition system_predicate(arg(_,_,_)). system_predicate(functor(_,_,_)). system_predicate((_ =.. _)). system_predicate('$univ'(_,_)). system_predicate(copy_term(_,_)). % Arithmetic evaluation system_predicate(is(_,_)). system_predicate('$abs'(_,_)). system_predicate('$asin'(_,_)). system_predicate('$acos'(_,_)). system_predicate('$atan'(_,_)). system_predicate('$bitwise_conj'(_,_,_)). system_predicate('$bitwise_disj'(_,_,_)). system_predicate('$bitwise_exclusive_or'(_,_,_)). system_predicate('$bitwise_neg'(_,_)). system_predicate('$ceil'(_,_)). system_predicate('$cos'(_,_)). system_predicate('$degrees'(_,_)). system_predicate('$exp'(_,_)). system_predicate('$float'(_,_)). system_predicate('$float_integer_part'(_,_)). system_predicate('$float_fractional_part'(_,_)). system_predicate('$float_quotient'(_,_,_)). system_predicate('$floor'(_,_)). system_predicate('$int_quotient'(_,_,_)). system_predicate('$log'(_,_)). system_predicate('$max'(_,_,_)). system_predicate('$min'(_,_,_)). system_predicate('$minus'(_,_,_)). system_predicate('$mod'(_,_,_)). system_predicate('$multi'(_,_,_)). system_predicate('$plus'(_,_,_)). system_predicate('$pow'(_,_,_)). system_predicate('$radians'(_,_)). system_predicate('$rint'(_,_)). system_predicate('$round'(_,_)). system_predicate('$shift_left'(_,_,_)). system_predicate('$shift_right'(_,_,_)). system_predicate('$sign'(_,_)). system_predicate('$sin'(_,_)). system_predicate('$sqrt'(_,_)). system_predicate('$tan'(_,_)). system_predicate('$truncate'(_,_)). % Arithmetic comparison system_predicate((_ =:= _)). system_predicate('$arith_equal'(_,_)). system_predicate((_ =\= _)). system_predicate('$arith_not_equal'(_,_)). system_predicate((_ < _)). system_predicate('$less_than'(_,_)). system_predicate((_ =< _)). system_predicate('$less_or_equal'(_,_)). system_predicate((_ > _)). system_predicate('$greater_than'(_,_)). system_predicate((_ >= _)). system_predicate('$greater_or_equal'(_,_)). % Clause retrieval and information system_predicate(clause(_,_)). system_predicate(initialization(_,_)). system_predicate('$new_indexing_hash'(_,_,_)). % Clause creation and destruction system_predicate(assert(_)). system_predicate(assertz(_)). system_predicate(asserta(_)). system_predicate(retract(_)). system_predicate(abolish(_)). system_predicate(retractall(_)). % All solutions system_predicate(findall(_,_,_)). system_predicate(bagof(_,_,_)). system_predicate(setof(_,_,_)). % Stream selection and control system_predicate(open(_,_,_)). system_predicate(open(_,_,_,_)). system_predicate(close(_)). system_predicate(close(_,_)). system_predicate(flush_output(_)). % Character input/output system_predicate(get_char(_,_)). system_predicate(get_code(_,_)). system_predicate(put_char(_,_)). system_predicate(put_code(_,_)). system_predicate(nl(_)). system_predicate(get(_,_)). system_predicate(put(_,_)). system_predicate(tab(_,_)). system_predicate(skip(_,_)). % Term input/output system_predicate(read(_,_)). system_predicate(read_with_variables(_,_,_)). system_predicate(read_line(_,_)). system_predicate(write(_,_)). system_predicate(writeq(_,_)). system_predicate(write_canonical(_,_)). system_predicate(write_term(_,_)). system_predicate(write_term(_,_,_)). system_predicate(op(_,_,_)). system_predicate(current_op(_,_,_)). % Logic and control system_predicate(\+(_)). system_predicate(once(_)). system_predicate(repeat). % Atomic term processing system_predicate(atom_length(_,_)). system_predicate(atom_concat(_,_,_)). system_predicate(sub_atom(_,_,_,_,_)). system_predicate(atom_chars(_,_)). system_predicate(atom_codes(_,_)). system_predicate(char_code(_,_)). system_predicate(number_chars(_,_)). system_predicate(number_codes(_,_)). system_predicate(name(_,_)). % Implementation defined hooks system_predicate(set_prolog_flag(_,_)). system_predicate(current_prolog_flag(_,_)). system_predicate(halt). system_predicate(halt(_)). system_predicate(abort). % DCG system_predicate('C'(_,_,_)). system_predicate(expand_term(_,_)). % Hash creation and control system_predicate(new_hash(_)). system_predicate(new_hash(_,_)). system_predicate(hash_clear(_)). system_predicate(hash_contains_key(_,_)). system_predicate(hash_get(_,_,_)). system_predicate(hash_is_empty(_)). system_predicate(hash_keys(_,_)). system_predicate(hash_map(_,_)). system_predicate(hash_put(_,_,_)). system_predicate(hash_remove(_,_)). system_predicate(hash_size(_,_)). system_predicate('$get_hash_manager'(_)). % Prolog interpreter system_predicate(cafeteria). system_predicate(consult(_)). system_predicate(trace). system_predicate(notrace). system_predicate(debug). system_predicate(nodebug). system_predicate(leash(_)). system_predicate(spy(_)). system_predicate(nospy(_)). system_predicate(nospyall). system_predicate(listing). system_predicate(listing(_)). % Misc system_predicate(length(_,_)). system_predicate(numbervars(_,_,_)). system_predicate(statistics(_,_)). % END - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -