/****************************************************************************
Prolog to Wam Compiler INRIA Rocquencourt - ChLoE Project
Version 2.21 Daniel Diaz - 1994
File : wamcc4.c
Main : no_main
****************************************************************************/
#define FAST_MATH
#define DEBUG_LEVEL 0
#include "wam_engine.h"
#include "wamcc4.h"
#include "wamcc4.usr"
#define ASCII_PRED "generation_code"
#define PRED X67656E65726174696F6E5F636F6465
#define ARITY 5
Begin_Public_Pred
allocate(7)
get_y_variable(6,0)
get_y_variable(1,1)
get_y_variable(5,2)
get_y_variable(2,3)
put_constant(X6E625F6368756E6B,1,"nb_chunk")
put_y_value(5,0)
builtin_2(g_assign,1,0)
put_constant(X6465627567,2,"debug")
put_x_variable(1,0)
builtin_2(g_read,2,0)
put_x_value(4,0)
put_y_variable(4,2)
put_y_variable(3,3)
put_y_variable(0,4)
call(Pred_Name(X67656E65726174696F6E5F636F64655F2461757831,5),1,1,"generation_code_$aux1",5) /* begin sub 1 */
put_y_value(6,0)
put_y_value(5,1)
put_y_value(4,2)
put_y_value(3,3)
put_y_value(2,4)
call(Pred_Name(X67656E6572655F74657465,5),1,2,"genere_tete",5) /* begin sub 2 */
put_y_value(1,0)
put_y_unsafe_value(0,1)
deallocate
execute(Pred_Name(X67656E6572655F636F727073,2),1,"genere_corps",2)
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "generation_code_$aux1"
#define PRED X67656E65726174696F6E5F636F64655F2461757831
#define ARITY 5
Begin_Private_Pred
try_me_else(1)
math_load_x_value(1,1)
put_integer(0,5)
builtin_2(gt,1,5)
neck_cut
get_list(0)
unify_constant(X6462675F636C61757365,"dbg_clause")
unify_x_local_value(3)
get_list(2)
unify_constant(X6462675F626F6479,"dbg_body")
unify_x_local_value(4)
proceed
label(1)
trust_me_else_fail
get_x_value(3,0)
get_x_value(4,2)
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "genere_tete"
#define PRED X67656E6572655F74657465
#define ARITY 5
Begin_Private_Pred
switch_on_term(G_label(1),fail,fail,fail,G_label(1))
label(1)
allocate(4)
get_structure(X70,4,0,"p")
unify_void(1)
unify_x_variable(5)
unify_x_variable(0)
unify_y_variable(3)
get_y_variable(2,1)
get_y_variable(1,3)
get_x_value(5,4)
put_integer(0,1)
put_y_variable(0,3)
call(Pred_Name(X67656E5F746574655F6C73745F617267,4),1,1,"gen_tete_lst_arg",4) /* begin sub 1 */
put_y_value(3,0)
put_y_value(2,1)
put_y_value(1,2)
put_y_unsafe_value(0,3)
deallocate
execute(Pred_Name(X67656E6572655F746574655F2461757832,4),1,"genere_tete_$aux2",4)
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "genere_tete_$aux2"
#define PRED X67656E6572655F746574655F2461757832
#define ARITY 4
Begin_Private_Pred
try_me_else(1)
math_load_x_value(1,1)
put_integer(1,4)
builtin_2(gt,1,4)
neck_cut
get_list(2)
unify_x_variable(1)
unify_x_local_value(3)
get_structure(X616C6C6F63617465,1,1,"allocate")
unify_x_local_value(0)
proceed
label(1)
trust_me_else_fail
get_x_value(3,2)
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_tete_lst_arg"
#define PRED X67656E5F746574655F6C73745F617267
#define ARITY 4
Begin_Private_Pred
switch_on_term(G_label(1),G_label(2),fail,G_label(4),fail)
label(1)
try_me_else(3)
label(2)
get_nil(0)
get_x_value(2,3)
proceed
label(3)
trust_me_else_fail
label(4)
allocate(5)
get_list(0)
unify_x_variable(0)
unify_y_variable(2)
get_y_variable(3,1)
get_y_variable(1,2)
get_y_bc_reg(4)
put_y_value(3,1)
put_y_variable(0,2)
call(Pred_Name(X67656E5F756E69665F617267,4),1,1,"gen_unif_arg",4) /* begin sub 1 */
cut_y(4)
math_load_y_value(3,0)
function_1(inc,1,0)
put_y_value(2,0)
put_y_value(1,2)
put_y_unsafe_value(0,3)
deallocate
execute(Pred_Name(X67656E5F746574655F6C73745F617267,4),1,"gen_tete_lst_arg",4)
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "genere_corps"
#define PRED X67656E6572655F636F727073
#define ARITY 2
Begin_Private_Pred
switch_on_term(G_label(2),G_label(3),fail,G_label(1),fail)
label(1)
try(5,1) /* begin sub 1 */
retry(7,2) /* begin sub 2 */
retry(9,3) /* begin sub 3 */
trust(11)
label(2)
try_me_else(4)
label(3)
get_nil(0)
get_list(1)
unify_constant(X70726F63656564,"proceed")
unify_nil
proceed
label(4)
retry_me_else(6)
label(5)
get_list(0)
unify_x_variable(0)
unify_void(1)
get_structure(X70,4,0,"p")
unify_void(1)
unify_x_variable(0)
unify_nil
unify_void(1)
get_structure(X2F,2,0,"/")
unify_constant(X6661696C,"fail")
unify_integer(0)
get_list(1)
unify_constant(X6661696C,"fail")
unify_nil
proceed
label(6)
retry_me_else(8)
label(7)
get_list(0)
unify_x_variable(0)
unify_void(1)
get_structure(X70,4,0,"p")
unify_void(1)
unify_x_variable(0)
unify_nil
unify_void(1)
get_structure(X2F,2,0,"/")
unify_constant(X66616C7365,"false")
unify_integer(0)
get_list(1)
unify_constant(X6661696C,"fail")
unify_nil
proceed
label(8)
retry_me_else(10)
label(9)
allocate(7)
get_list(0)
unify_x_variable(0)
unify_y_variable(1)
get_structure(X70,4,0,"p")
unify_y_variable(2)
unify_x_variable(0)
unify_y_variable(4)
unify_void(1)
get_structure(X2F,2,0,"/")
unify_y_variable(6)
unify_y_variable(5)
get_y_variable(3,1)
put_y_value(6,0)
put_y_value(5,1)
call(Pred_Name(X696E6C696E655F707265646963617465,2),0,4,"inline_predicate",2) /* begin sub 4 */
put_y_value(6,0)
put_y_value(5,1)
put_y_value(2,2)
put_y_value(4,3)
put_y_variable(0,4)
put_y_value(3,5)
call(Pred_Name(X67656E5F696E6C696E655F70726564,6),1,5,"gen_inline_pred",6) /* begin sub 5 */
put_y_value(2,0)
put_y_value(1,1)
put_y_unsafe_value(0,2)
deallocate
execute(Pred_Name(X67656E6572655F636F7270735F2461757833,3),1,"genere_corps_$aux3",3)
label(10)
trust_me_else_fail
label(11)
allocate(4)
get_list(0)
unify_x_variable(0)
unify_y_variable(1)
get_structure(X70,4,0,"p")
unify_y_variable(3)
unify_y_variable(2)
unify_x_variable(0)
unify_void(1)
get_x_variable(4,1)
put_integer(0,1)
put_y_value(3,2)
put_y_variable(0,3)
call(Pred_Name(X67656E5F636F7270735F6C73745F617267,5),1,6,"gen_corps_lst_arg",5) /* begin sub 6 */
put_y_value(3,0)
put_y_value(2,1)
put_y_value(1,2)
put_y_unsafe_value(0,3)
deallocate
execute(Pred_Name(X67656E6572655F636F7270735F2461757835,4),1,"genere_corps_$aux5",4)
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "genere_corps_$aux3"
#define PRED X67656E6572655F636F7270735F2461757833
#define ARITY 3
Begin_Private_Pred
try_me_else(1)
get_nil(1)
neck_cut
put_x_value(2,1)
execute(Pred_Name(X67656E6572655F636F7270735F2461757834,2),1,"genere_corps_$aux4",2)
label(1)
trust_me_else_fail
put_x_value(1,0)
put_x_value(2,1)
execute(Pred_Name(X67656E6572655F636F727073,2),1,"genere_corps",2)
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "genere_corps_$aux4"
#define PRED X67656E6572655F636F7270735F2461757834
#define ARITY 2
Begin_Private_Pred
try_me_else(1)
math_load_x_value(0,0)
put_integer(1,2)
builtin_2(gt,0,2)
neck_cut
get_list(1)
unify_constant(X6465616C6C6F63617465,"deallocate")
unify_x_variable(0)
get_list(0)
unify_constant(X70726F63656564,"proceed")
unify_nil
proceed
label(1)
trust_me_else_fail
get_list(1)
unify_constant(X70726F63656564,"proceed")
unify_nil
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "genere_corps_$aux5"
#define PRED X67656E6572655F636F7270735F2461757835
#define ARITY 4
Begin_Private_Pred
try_me_else(1)
get_nil(2)
neck_cut
put_x_value(3,2)
execute(Pred_Name(X67656E6572655F636F7270735F2461757836,3),1,"genere_corps_$aux6",3)
label(1)
trust_me_else_fail
get_x_variable(0,1)
get_list(3)
unify_x_variable(3)
unify_x_variable(1)
get_structure(X63616C6C,1,3,"call")
unify_x_local_value(0)
put_x_value(2,0)
execute(Pred_Name(X67656E6572655F636F727073,2),1,"genere_corps",2)
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "genere_corps_$aux6"
#define PRED X67656E6572655F636F7270735F2461757836
#define ARITY 3
Begin_Private_Pred
try_me_else(1)
math_load_x_value(0,0)
put_integer(1,3)
builtin_2(gt,0,3)
neck_cut
get_list(2)
unify_constant(X6465616C6C6F63617465,"deallocate")
unify_x_variable(0)
get_list(0)
unify_x_variable(0)
unify_nil
get_structure(X65786563757465,1,0,"execute")
unify_x_local_value(1)
proceed
label(1)
trust_me_else_fail
get_list(2)
unify_x_variable(0)
unify_nil
get_structure(X65786563757465,1,0,"execute")
unify_x_local_value(1)
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_corps_lst_arg"
#define PRED X67656E5F636F7270735F6C73745F617267
#define ARITY 5
Begin_Private_Pred
switch_on_term(G_label(1),G_label(2),fail,G_label(4),fail)
label(1)
try_me_else(3)
label(2)
get_nil(0)
get_x_value(3,4)
proceed
label(3)
trust_me_else_fail
label(4)
allocate(6)
get_list(0)
unify_x_variable(0)
unify_y_variable(3)
get_y_variable(5,1)
get_y_variable(2,2)
get_y_variable(1,3)
get_y_bc_reg(4)
put_y_value(5,1)
put_y_value(2,2)
put_y_variable(0,3)
call(Pred_Name(X67656E5F6C6F61645F617267,5),1,1,"gen_load_arg",5) /* begin sub 1 */
math_load_y_value(5,0)
function_1(inc,1,0)
cut_y(4)
put_y_value(3,0)
put_y_value(2,2)
put_y_value(1,3)
put_y_unsafe_value(0,4)
deallocate
execute(Pred_Name(X67656E5F636F7270735F6C73745F617267,5),1,"gen_corps_lst_arg",5)
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_unif_arg"
#define PRED X67656E5F756E69665F617267
#define ARITY 4
Begin_Private_Pred
try_me_else(13)
switch_on_term(G_label(3),G_label(12),fail,fail,G_label(1))
label(1)
switch_on_structure(1,"[(var/3,2),(cst/1,8),(int/1,10)]")
label(2)
try(4,1) /* begin sub 1 */
trust(6)
label(3)
try_me_else(5)
label(4)
get_structure(X766172,3,0,"var")
unify_x_variable(0)
unify_x_variable(5)
unify_void(1)
get_structure(X696776,5,0,"igv")
unify_x_variable(0)
unify_void(4)
get_structure(X78,1,0,"x")
unify_x_variable(0)
get_x_variable(4,1)
get_list(3)
unify_x_variable(3)
unify_x_local_value(2)
put_x_value(5,1)
put_x_value(4,2)
execute(Pred_Name(X67656E5F756E69665F6172675F2461757837,4),1,"gen_unif_arg_$aux7",4)
label(5)
retry_me_else(7)
label(6)
get_structure(X766172,3,0,"var")
unify_x_variable(0)
unify_x_variable(5)
unify_void(1)
get_structure(X696776,5,0,"igv")
unify_x_variable(0)
unify_void(4)
get_structure(X79,1,0,"y")
unify_x_variable(0)
get_x_variable(4,1)
get_list(3)
unify_x_variable(3)
unify_x_local_value(2)
put_x_value(5,1)
put_x_value(4,2)
execute(Pred_Name(X67656E5F756E69665F6172675F2461757838,4),1,"gen_unif_arg_$aux8",4)
label(7)
retry_me_else(9)
label(8)
get_structure(X637374,1,0,"cst")
unify_x_variable(0)
get_list(3)
unify_x_variable(3)
unify_x_local_value(2)
get_structure(X6765745F636F6E7374616E74,2,3,"get_constant")
unify_x_value(0)
unify_x_local_value(1)
proceed
label(9)
retry_me_else(11)
label(10)
get_structure(X696E74,1,0,"int")
unify_x_variable(0)
get_list(3)
unify_x_variable(3)
unify_x_local_value(2)
get_structure(X6765745F696E7465676572,2,3,"get_integer")
unify_x_value(0)
unify_x_local_value(1)
proceed
label(11)
trust_me_else_fail
label(12)
get_constant(X6E696C,0,"nil")
get_list(3)
unify_x_variable(0)
unify_x_local_value(2)
get_structure(X6765745F6E696C,1,0,"get_nil")
unify_x_local_value(1)
proceed
label(13)
trust_me_else_fail
put_structure(X2F,2,4,"/")
unify_x_local_value(0)
unify_x_local_value(1)
put_list(0)
unify_x_value(4)
unify_nil
put_constant(X756E6966,1,"unif")
execute(Pred_Name(X67656E5F6C73745F73747263,4),1,"gen_lst_strc",4)
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_unif_arg_$aux7"
#define PRED X67656E5F756E69665F6172675F2461757837
#define ARITY 4
Begin_Private_Pred
try_me_else(1)
put_constant(X74,4,"t")
builtin_2(term_eq,1,4)
neck_cut
get_structure(X6765745F785F7661726961626C65,2,3,"get_x_variable")
unify_x_local_value(0)
unify_x_local_value(2)
proceed
label(1)
trust_me_else_fail
get_structure(X6765745F785F76616C7565,2,3,"get_x_value")
unify_x_local_value(0)
unify_x_local_value(2)
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_unif_arg_$aux8"
#define PRED X67656E5F756E69665F6172675F2461757838
#define ARITY 4
Begin_Private_Pred
try_me_else(1)
put_constant(X74,4,"t")
builtin_2(term_eq,1,4)
neck_cut
get_structure(X6765745F795F7661726961626C65,2,3,"get_y_variable")
unify_x_local_value(0)
unify_x_local_value(2)
proceed
label(1)
trust_me_else_fail
get_structure(X6765745F795F76616C7565,2,3,"get_y_value")
unify_x_local_value(0)
unify_x_local_value(2)
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_load_arg"
#define PRED X67656E5F6C6F61645F617267
#define ARITY 5
Begin_Private_Pred
try_me_else(13)
switch_on_term(G_label(3),G_label(12),fail,fail,G_label(1))
label(1)
switch_on_structure(1,"[(var/3,2),(cst/1,8),(int/1,10)]")
label(2)
try(4,1) /* begin sub 1 */
trust(6)
label(3)
try_me_else(5)
label(4)
get_structure(X766172,3,0,"var")
unify_x_variable(0)
unify_x_variable(6)
unify_void(1)
get_structure(X696776,5,0,"igv")
unify_x_variable(0)
unify_void(4)
get_structure(X78,1,0,"x")
unify_x_variable(0)
get_x_variable(5,1)
get_x_variable(1,3)
get_list(4)
unify_x_variable(3)
unify_x_local_value(1)
put_x_value(6,1)
put_x_value(5,2)
execute(Pred_Name(X67656E5F6C6F61645F6172675F2461757839,4),1,"gen_load_arg_$aux9",4)
label(5)
retry_me_else(7)
label(6)
get_structure(X766172,3,0,"var")
unify_x_variable(0)
unify_x_variable(8)
unify_void(1)
get_structure(X696776,5,0,"igv")
unify_x_variable(0)
unify_void(3)
unify_x_variable(9)
get_structure(X79,1,0,"y")
unify_x_variable(0)
get_x_variable(7,1)
get_x_variable(6,2)
get_list(4)
unify_x_variable(5)
unify_x_local_value(3)
put_x_value(9,1)
put_x_value(8,2)
put_x_value(7,3)
put_x_value(6,4)
execute(Pred_Name(X67656E5F6C6F61645F6172675F246175783130,6),1,"gen_load_arg_$aux10",6)
label(7)
retry_me_else(9)
label(8)
get_structure(X637374,1,0,"cst")
unify_x_variable(0)
get_list(4)
unify_x_variable(2)
unify_x_local_value(3)
get_structure(X7075745F636F6E7374616E74,2,2,"put_constant")
unify_x_value(0)
unify_x_local_value(1)
proceed
label(9)
retry_me_else(11)
label(10)
get_structure(X696E74,1,0,"int")
unify_x_variable(0)
get_list(4)
unify_x_variable(2)
unify_x_local_value(3)
get_structure(X7075745F696E7465676572,2,2,"put_integer")
unify_x_value(0)
unify_x_local_value(1)
proceed
label(11)
trust_me_else_fail
label(12)
get_constant(X6E696C,0,"nil")
get_list(4)
unify_x_variable(0)
unify_x_local_value(3)
get_structure(X7075745F6E696C,1,0,"put_nil")
unify_x_local_value(1)
proceed
label(13)
trust_me_else_fail
put_structure(X2F,2,2,"/")
unify_x_local_value(0)
unify_x_local_value(1)
put_list(0)
unify_x_value(2)
unify_nil
put_constant(X6C6F6164,1,"load")
put_x_value(3,2)
put_x_value(4,3)
execute(Pred_Name(X67656E5F6C73745F73747263,4),1,"gen_lst_strc",4)
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_load_arg_$aux9"
#define PRED X67656E5F6C6F61645F6172675F2461757839
#define ARITY 4
Begin_Private_Pred
try_me_else(1)
put_constant(X74,4,"t")
builtin_2(term_eq,1,4)
neck_cut
get_structure(X7075745F785F7661726961626C65,2,3,"put_x_variable")
unify_x_local_value(0)
unify_x_local_value(2)
proceed
label(1)
trust_me_else_fail
get_structure(X7075745F785F76616C7565,2,3,"put_x_value")
unify_x_local_value(0)
unify_x_local_value(2)
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_load_arg_$aux10"
#define PRED X67656E5F6C6F61645F6172675F246175783130
#define ARITY 6
Begin_Private_Pred
try_me_else(1)
put_constant(X74,1,"t")
builtin_2(term_eq,2,1)
neck_cut
get_structure(X7075745F795F7661726961626C65,2,5,"put_y_variable")
unify_x_local_value(0)
unify_x_local_value(3)
proceed
label(1)
retry_me_else(2)
put_constant(X74,2,"t")
builtin_2(term_eq,1,2)
put_constant(X6E625F6368756E6B,1,"nb_chunk")
builtin_2(g_read,1,4)
neck_cut
get_structure(X7075745F795F756E736166655F76616C7565,2,5,"put_y_unsafe_value")
unify_x_local_value(0)
unify_x_local_value(3)
proceed
label(2)
trust_me_else_fail
get_structure(X7075745F795F76616C7565,2,5,"put_y_value")
unify_x_local_value(0)
unify_x_local_value(3)
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_lst_strc"
#define PRED X67656E5F6C73745F73747263
#define ARITY 4
Begin_Private_Pred
switch_on_term(G_label(1),G_label(2),fail,G_label(4),fail)
label(1)
try_me_else(3)
label(2)
get_nil(0)
get_x_value(2,3)
proceed
label(3)
trust_me_else_fail
label(4)
allocate(10)
get_list(0)
unify_x_variable(0)
unify_y_variable(8)
get_structure(X2F,2,0,"/")
unify_x_variable(0)
unify_x_variable(4)
get_y_variable(6,1)
get_y_variable(7,2)
get_y_variable(5,3)
put_x_value(4,1)
put_y_value(6,2)
put_y_variable(4,3)
put_y_variable(3,4)
put_y_variable(9,5)
call(Pred_Name(X67656E5F73747263,6),1,1,"gen_strc",6) /* begin sub 1 */
put_y_value(9,0)
put_y_value(6,1)
put_y_variable(2,2)
put_y_variable(1,3)
call(Pred_Name(X67656E5F6C73745F73747263,4),1,2,"gen_lst_strc",4) /* begin sub 2 */
put_y_value(8,0)
put_y_value(6,1)
put_y_value(7,2)
put_y_variable(0,3)
call(Pred_Name(X67656E5F6C73745F73747263,4),1,3,"gen_lst_strc",4) /* begin sub 3 */
put_y_value(6,0)
put_y_value(5,1)
put_y_unsafe_value(4,2)
put_y_unsafe_value(3,3)
put_y_unsafe_value(2,4)
put_y_unsafe_value(1,5)
put_y_unsafe_value(0,6)
deallocate
execute(Pred_Name(X67656E5F6C73745F737472635F246175783131,7),1,"gen_lst_strc_$aux11",7)
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_lst_strc_$aux11"
#define PRED X67656E5F6C73745F737472635F246175783131
#define ARITY 7
Begin_Private_Pred
try_me_else(1)
put_constant(X756E6966,7,"unif")
builtin_2(term_eq,0,7)
neck_cut
get_x_value(3,1)
get_x_value(5,2)
get_x_value(6,4)
proceed
label(1)
trust_me_else_fail
get_x_value(5,1)
get_x_value(3,4)
get_x_value(6,2)
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_strc"
#define PRED X67656E5F73747263
#define ARITY 6
Begin_Private_Pred
switch_on_term(G_label(2),fail,fail,fail,G_label(1))
label(1)
switch_on_structure(1,"[(lst/2,3),(stc/2,5)]")
label(2)
try_me_else(4)
label(3)
allocate(6)
get_structure(X6C7374,2,0,"lst")
unify_y_variable(5)
unify_y_variable(4)
get_y_variable(3,2)
get_y_variable(2,3)
get_list(4)
unify_x_variable(2)
unify_y_variable(1)
get_y_variable(0,5)
put_x_value(1,0)
put_y_value(3,1)
call(Pred_Name(X67656E5F737472635F246175783132,3),1,1,"gen_strc_$aux12",3) /* begin sub 1 */
put_list(1)
unify_y_value(4)
unify_nil
put_list(0)
unify_y_value(5)
unify_x_value(1)
put_y_value(3,1)
put_y_value(2,2)
put_y_value(1,3)
put_y_value(0,4)
deallocate
execute(Pred_Name(X67656E5F756E6966795F6C73745F617267,5),1,"gen_unify_lst_arg",5)
label(4)
trust_me_else_fail
label(5)
allocate(5)
get_structure(X737463,2,0,"stc")
unify_x_variable(0)
unify_y_variable(4)
get_y_variable(3,2)
get_y_variable(2,3)
get_list(4)
unify_x_variable(3)
unify_y_variable(1)
get_y_variable(0,5)
put_y_value(3,2)
call(Pred_Name(X67656E5F737472635F246175783133,4),1,2,"gen_strc_$aux13",4) /* begin sub 2 */
put_y_value(4,0)
put_y_value(3,1)
put_y_value(2,2)
put_y_value(1,3)
put_y_value(0,4)
deallocate
execute(Pred_Name(X67656E5F756E6966795F6C73745F617267,5),1,"gen_unify_lst_arg",5)
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_strc_$aux12"
#define PRED X67656E5F737472635F246175783132
#define ARITY 3
Begin_Private_Pred
try_me_else(1)
put_constant(X756E6966,3,"unif")
builtin_2(term_eq,1,3)
neck_cut
get_structure(X6765745F6C697374,1,2,"get_list")
unify_x_local_value(0)
proceed
label(1)
trust_me_else_fail
get_structure(X7075745F6C697374,1,2,"put_list")
unify_x_local_value(0)
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_strc_$aux13"
#define PRED X67656E5F737472635F246175783133
#define ARITY 4
Begin_Private_Pred
try_me_else(1)
put_constant(X756E6966,4,"unif")
builtin_2(term_eq,2,4)
neck_cut
get_structure(X6765745F737472756374757265,2,3,"get_structure")
unify_x_local_value(0)
unify_x_local_value(1)
proceed
label(1)
trust_me_else_fail
get_structure(X7075745F737472756374757265,2,3,"put_structure")
unify_x_local_value(0)
unify_x_local_value(1)
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_unify_lst_arg"
#define PRED X67656E5F756E6966795F6C73745F617267
#define ARITY 5
Begin_Private_Pred
switch_on_term(G_label(1),G_label(2),fail,G_label(4),fail)
label(1)
try_me_else(3)
label(2)
get_nil(0)
get_x_value(2,3)
get_nil(4)
proceed
label(3)
trust_me_else_fail
label(4)
allocate(9)
get_list(0)
unify_y_variable(8)
unify_y_variable(7)
get_y_variable(6,1)
get_y_variable(5,2)
get_y_variable(4,3)
get_y_variable(3,4)
get_y_bc_reg(0)
put_list(0)
unify_y_value(8)
unify_y_value(7)
put_integer(0,1)
put_y_variable(2,2)
put_y_variable(1,3)
call(Pred_Name(X67656E5F636F6D7074655F766F6964,4),1,1,"gen_compte_void",4) /* begin sub 1 */
put_y_value(8,0)
put_y_value(7,1)
put_y_value(6,2)
put_y_value(5,3)
put_y_value(4,4)
put_y_value(3,5)
put_y_value(2,6)
put_y_value(1,7)
call(Pred_Name(X67656E5F756E6966795F6C73745F6172675F246175783134,8),1,2,"gen_unify_lst_arg_$aux14",8) /* begin sub 2 */
cut_y(0)
deallocate
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_unify_lst_arg_$aux14"
#define PRED X67656E5F756E6966795F6C73745F6172675F246175783134
#define ARITY 8
Begin_Private_Pred
try_me_else(1)
allocate(5)
get_y_variable(4,1)
get_y_variable(3,2)
get_y_variable(2,3)
get_integer(0,6)
neck_cut
put_y_value(3,1)
put_y_variable(1,2)
put_x_value(4,3)
put_y_variable(0,4)
call(Pred_Name(X67656E5F756E6966795F617267,6),1,1,"gen_unify_arg",6) /* begin sub 1 */
put_y_value(4,0)
put_y_value(3,1)
put_y_value(2,2)
put_y_unsafe_value(1,3)
put_y_unsafe_value(0,4)
deallocate
execute(Pred_Name(X67656E5F756E6966795F6C73745F617267,5),1,"gen_unify_lst_arg",5)
label(1)
trust_me_else_fail
get_x_variable(1,2)
get_x_variable(2,3)
get_list(4)
unify_x_variable(0)
unify_x_variable(3)
get_structure(X756E6966795F766F6964,1,0,"unify_void")
unify_x_local_value(6)
put_x_value(7,0)
put_x_value(5,4)
execute(Pred_Name(X67656E5F756E6966795F6C73745F617267,5),1,"gen_unify_lst_arg",5)
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_compte_void"
#define PRED X67656E5F636F6D7074655F766F6964
#define ARITY 4
Begin_Private_Pred
try_me_else(2)
switch_on_term(G_label(1),fail,fail,G_label(1),fail)
label(1)
get_list(0)
unify_x_variable(4)
unify_x_variable(0)
get_structure(X766172,3,4,"var")
unify_void(1)
unify_constant(X74,"t")
unify_constant(X74,"t")
math_load_x_value(1,1)
function_1(inc,1,1)
execute(Pred_Name(X67656E5F636F6D7074655F766F6964,4),1,"gen_compte_void",4)
label(2)
trust_me_else_fail
get_x_value(1,2)
get_x_value(0,3)
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_unify_arg"
#define PRED X67656E5F756E6966795F617267
#define ARITY 6
Begin_Private_Pred
try_me_else(13)
switch_on_term(G_label(3),G_label(12),fail,fail,G_label(1))
label(1)
switch_on_structure(1,"[(var/3,2),(cst/1,8),(int/1,10)]")
label(2)
try(4,1) /* begin sub 1 */
trust(6)
label(3)
try_me_else(5)
label(4)
get_structure(X766172,3,0,"var")
unify_x_variable(0)
unify_x_variable(7)
unify_void(1)
get_structure(X696776,5,0,"igv")
unify_x_variable(0)
unify_x_variable(9)
unify_void(1)
unify_x_variable(8)
unify_void(1)
get_structure(X78,1,0,"x")
unify_x_variable(0)
get_list(3)
unify_x_variable(6)
unify_x_local_value(2)
get_x_value(4,5)
put_x_value(9,1)
put_x_value(8,2)
put_x_value(7,3)
put_x_value(6,4)
execute(Pred_Name(X67656E5F756E6966795F6172675F246175783135,5),1,"gen_unify_arg_$aux15",5)
label(5)
retry_me_else(7)
label(6)
get_structure(X766172,3,0,"var")
unify_x_variable(0)
unify_x_variable(6)
unify_void(1)
get_structure(X696776,5,0,"igv")
unify_x_variable(0)
unify_void(2)
unify_x_variable(7)
unify_void(1)
get_structure(X79,1,0,"y")
unify_x_variable(0)
get_list(3)
unify_x_variable(3)
unify_x_local_value(2)
get_x_value(4,5)
put_x_value(7,1)
put_x_value(6,2)
execute(Pred_Name(X67656E5F756E6966795F6172675F246175783136,4),1,"gen_unify_arg_$aux16",4)
label(7)
retry_me_else(9)
label(8)
get_structure(X637374,1,0,"cst")
unify_x_variable(0)
get_list(3)
unify_x_variable(1)
unify_x_local_value(2)
get_structure(X756E6966795F636F6E7374616E74,1,1,"unify_constant")
unify_x_value(0)
get_x_value(4,5)
proceed
label(9)
retry_me_else(11)
label(10)
get_structure(X696E74,1,0,"int")
unify_x_variable(0)
get_list(3)
unify_x_variable(1)
unify_x_local_value(2)
get_structure(X756E6966795F696E7465676572,1,1,"unify_integer")
unify_x_value(0)
get_x_value(4,5)
proceed
label(11)
trust_me_else_fail
label(12)
get_constant(X6E696C,0,"nil")
get_list(3)
unify_constant(X756E6966795F6E696C,"unify_nil")
unify_x_local_value(2)
get_x_value(4,5)
proceed
label(13)
trust_me_else_fail
get_x_variable(6,0)
get_x_variable(0,1)
get_list(3)
unify_x_variable(1)
unify_x_local_value(2)
get_list(5)
unify_x_variable(2)
unify_x_local_value(4)
get_structure(X2F,2,2,"/")
unify_x_local_value(6)
unify_x_variable(2)
execute(Pred_Name(X67656E5F756E6966795F6172675F246175783137,3),1,"gen_unify_arg_$aux17",3)
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_unify_arg_$aux15"
#define PRED X67656E5F756E6966795F6172675F246175783135
#define ARITY 5
Begin_Private_Pred
try_me_else(1)
put_constant(X74,1,"t")
builtin_2(term_eq,3,1)
neck_cut
get_structure(X756E6966795F785F7661726961626C65,1,4,"unify_x_variable")
unify_x_local_value(0)
proceed
label(1)
retry_me_else(2)
get_integer(0,1)
put_constant(X66,1,"f")
builtin_2(term_eq,2,1)
neck_cut
get_structure(X756E6966795F785F6C6F63616C5F76616C7565,1,4,"unify_x_local_value")
unify_x_local_value(0)
proceed
label(2)
trust_me_else_fail
get_structure(X756E6966795F785F76616C7565,1,4,"unify_x_value")
unify_x_local_value(0)
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_unify_arg_$aux16"
#define PRED X67656E5F756E6966795F6172675F246175783136
#define ARITY 4
Begin_Private_Pred
try_me_else(1)
put_constant(X74,1,"t")
builtin_2(term_eq,2,1)
neck_cut
get_structure(X756E6966795F795F7661726961626C65,1,3,"unify_y_variable")
unify_x_local_value(0)
proceed
label(1)
retry_me_else(2)
put_constant(X66,2,"f")
builtin_2(term_eq,1,2)
neck_cut
get_structure(X756E6966795F795F6C6F63616C5F76616C7565,1,3,"unify_y_local_value")
unify_x_local_value(0)
proceed
label(2)
trust_me_else_fail
get_structure(X756E6966795F795F76616C7565,1,3,"unify_y_value")
unify_x_local_value(0)
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_unify_arg_$aux17"
#define PRED X67656E5F756E6966795F6172675F246175783137
#define ARITY 3
Begin_Private_Pred
try_me_else(1)
put_constant(X756E6966,3,"unif")
builtin_2(term_eq,0,3)
neck_cut
get_structure(X756E6966795F785F7661726961626C65,1,1,"unify_x_variable")
unify_x_local_value(2)
proceed
label(1)
trust_me_else_fail
get_structure(X756E6966795F785F76616C7565,1,1,"unify_x_value")
unify_x_local_value(2)
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_inline_pred"
#define PRED X67656E5F696E6C696E655F70726564
#define ARITY 6
Begin_Private_Pred
try_me_else(14)
switch_on_term(G_label(2),G_label(1),fail,fail,fail)
label(1)
switch_on_constant(1,"[($get_bc_reg,3),($cut,5),($dbg_true,7),(pragma_c,9),(calling_module_nb,11),(=,13)]")
label(2)
try_me_else(4)
label(3)
allocate(2)
get_constant(X246765745F62635F726567,0,"$get_bc_reg")
get_integer(1,1)
get_list(3)
unify_x_variable(0)
unify_nil
get_structure(X766172,3,0,"var")
unify_x_variable(1)
unify_x_variable(0)
unify_void(1)
get_structure(X696776,5,1,"igv")
unify_y_variable(1)
unify_void(4)
get_list(5)
unify_y_variable(0)
unify_x_local_value(4)
call(Pred_Name(X67656E5F696E6C696E655F707265645F246175783138,1),1,1,"gen_inline_pred_$aux18",1) /* begin sub 1 */
put_y_value(1,0)
put_y_value(0,1)
deallocate
execute(Pred_Name(X67656E5F696E6C696E655F707265645F246175783139,2),1,"gen_inline_pred_$aux19",2)
label(4)
retry_me_else(6)
label(5)
get_constant(X24637574,0,"$cut")
get_integer(1,1)
get_list(3)
unify_x_variable(0)
unify_nil
get_structure(X766172,3,0,"var")
unify_x_variable(0)
unify_void(2)
get_structure(X696776,5,0,"igv")
unify_x_variable(0)
unify_void(4)
get_list(5)
unify_x_variable(1)
unify_x_local_value(4)
execute(Pred_Name(X67656E5F696E6C696E655F707265645F246175783230,2),1,"gen_inline_pred_$aux20",2)
label(6)
retry_me_else(8)
label(7)
get_constant(X246462675F74727565,0,"$dbg_true")
get_integer(0,1)
get_x_value(4,5)
proceed
label(8)
retry_me_else(10)
label(9)
get_constant(X707261676D615F63,0,"pragma_c")
get_integer(1,1)
get_list(3)
unify_x_variable(0)
unify_nil
get_structure(X637374,1,0,"cst")
unify_x_variable(0)
get_list(5)
unify_x_variable(1)
unify_x_local_value(4)
get_structure(X707261676D615F63,1,1,"pragma_c")
unify_x_value(0)
proceed
label(10)
retry_me_else(12)
label(11)
get_constant(X63616C6C696E675F6D6F64756C655F6E62,0,"calling_module_nb")
get_integer(1,1)
get_list(3)
unify_x_variable(7)
unify_nil
put_constant(X3D,0,"=")
put_integer(2,1)
put_structure(X696E74,1,3,"int")
unify_constant(X434D4E,"CMN")
put_list(6)
unify_x_value(3)
unify_nil
put_list(3)
unify_x_value(7)
unify_x_value(6)
execute(Pred_Name(X67656E5F696E6C696E655F70726564,6),1,"gen_inline_pred",6)
label(12)
trust_me_else_fail
label(13)
get_constant(X3D,0,"=")
get_integer(2,1)
get_x_variable(0,2)
get_list(3)
unify_x_variable(1)
unify_x_variable(2)
get_list(2)
unify_x_variable(2)
unify_nil
put_x_value(4,3)
put_x_value(5,4)
execute(Pred_Name(X67656E5F696E6C696E655F707265645F246175783231,5),1,"gen_inline_pred_$aux21",5)
label(14)
retry_me_else(15)
allocate(6)
get_y_variable(2,0)
get_integer(1,1)
get_list(3)
unify_y_variable(5)
unify_nil
get_y_variable(0,4)
get_y_variable(4,5)
put_y_value(2,0)
call(Pred_Name(X747970655F746573745F66756E63746F72,1),1,2,"type_test_functor",1) /* begin sub 2 */
put_y_value(5,0)
put_y_variable(1,1)
put_x_variable(2,2)
put_y_variable(3,3)
put_y_value(4,4)
call(Pred_Name(X67656E5F6C6F61645F617267,5),1,3,"gen_load_arg",5) /* begin sub 3 */
put_y_unsafe_value(3,0)
get_list(0)
unify_x_variable(0)
unify_y_local_value(0)
get_structure(X6275696C74696E5F31,2,0,"builtin_1")
unify_y_local_value(2)
unify_y_local_value(1)
deallocate
proceed
label(15)
retry_me_else(16)
allocate(12)
get_y_variable(4,0)
get_integer(3,1)
get_list(3)
unify_y_variable(11)
unify_x_variable(0)
get_list(0)
unify_y_variable(9)
unify_x_variable(0)
get_list(0)
unify_y_variable(7)
unify_nil
get_y_variable(0,4)
get_y_variable(10,5)
put_y_value(4,0)
call(Pred_Name(X7465726D5F6F70655F66756E63746F72,1),1,4,"term_ope_functor",1) /* begin sub 4 */
put_y_value(11,0)
put_y_variable(3,1)
put_x_variable(2,2)
put_y_variable(8,3)
put_y_value(10,4)
call(Pred_Name(X67656E5F6C6F61645F617267,5),1,5,"gen_load_arg",5) /* begin sub 5 */
put_y_value(9,0)
put_y_variable(2,1)
put_x_variable(2,2)
put_y_variable(6,3)
put_y_value(8,4)
call(Pred_Name(X67656E5F6C6F61645F617267,5),1,6,"gen_load_arg",5) /* begin sub 6 */
put_y_value(7,0)
put_y_variable(1,1)
put_x_variable(2,2)
put_y_variable(5,3)
put_y_value(6,4)
call(Pred_Name(X67656E5F6C6F61645F617267,5),1,7,"gen_load_arg",5) /* begin sub 7 */
put_y_unsafe_value(5,0)
get_list(0)
unify_x_variable(0)
unify_y_local_value(0)
get_structure(X6275696C74696E5F33,4,0,"builtin_3")
unify_y_local_value(4)
unify_y_local_value(3)
unify_y_local_value(2)
unify_y_local_value(1)
deallocate
proceed
label(16)
retry_me_else(17)
allocate(10)
get_integer(2,1)
get_list(3)
unify_y_variable(9)
unify_x_variable(1)
get_list(1)
unify_y_variable(7)
unify_nil
get_y_variable(0,4)
get_y_variable(8,5)
get_y_bc_reg(5)
put_y_variable(3,1)
call(Pred_Name(X7465726D5F636D705F66756E63746F725F6E616D65,2),1,8,"term_cmp_functor_name",2) /* begin sub 8 */
put_y_value(9,0)
put_y_variable(2,1)
put_x_variable(2,2)
put_y_variable(6,3)
put_y_value(8,4)
call(Pred_Name(X67656E5F6C6F61645F617267,5),1,9,"gen_load_arg",5) /* begin sub 9 */
put_y_value(7,0)
put_y_variable(1,1)
put_x_variable(2,2)
put_y_variable(4,3)
put_y_value(6,4)
call(Pred_Name(X67656E5F6C6F61645F617267,5),1,10,"gen_load_arg",5) /* begin sub 10 */
cut_y(5)
put_y_unsafe_value(4,0)
get_list(0)
unify_x_variable(0)
unify_y_local_value(0)
get_structure(X6275696C74696E5F32,3,0,"builtin_2")
unify_y_local_value(3)
unify_y_local_value(2)
unify_y_local_value(1)
deallocate
proceed
label(17)
retry_me_else(19)
switch_on_term(G_label(18),G_label(18),fail,fail,fail)
label(18)
allocate(5)
get_constant(X6973,0,"is")
get_integer(2,1)
get_list(3)
unify_y_variable(3)
unify_x_variable(0)
get_list(0)
unify_x_variable(0)
unify_nil
get_y_variable(1,4)
get_y_bc_reg(4)
put_y_variable(2,1)
put_y_variable(0,2)
put_x_value(5,3)
call(Pred_Name(X696E6C696E655F6C6F61645F6D6174685F65787072,4),1,11,"inline_load_math_expr",4) /* begin sub 11 */
cut_y(4)
put_y_value(3,0)
put_y_unsafe_value(2,1)
put_y_value(1,2)
put_y_unsafe_value(0,3)
deallocate
execute(Pred_Name(X67656E5F756E69665F617267,4),1,"gen_unif_arg",4)
label(19)
retry_me_else(20)
allocate(10)
get_integer(2,1)
get_list(3)
unify_y_variable(9)
unify_x_variable(1)
get_list(1)
unify_y_variable(7)
unify_nil
get_y_variable(0,4)
get_y_variable(8,5)
get_y_bc_reg(5)
put_y_variable(3,1)
call(Pred_Name(X6D6174685F636D705F66756E63746F725F6E616D65,2),1,12,"math_cmp_functor_name",2) /* begin sub 12 */
put_y_value(9,0)
put_y_variable(2,1)
put_y_variable(6,2)
put_y_value(8,3)
call(Pred_Name(X696E6C696E655F6C6F61645F6D6174685F65787072,4),1,13,"inline_load_math_expr",4) /* begin sub 13 */
put_y_value(7,0)
put_y_variable(1,1)
put_y_variable(4,2)
put_y_value(6,3)
call(Pred_Name(X696E6C696E655F6C6F61645F6D6174685F65787072,4),1,14,"inline_load_math_expr",4) /* begin sub 14 */
cut_y(5)
put_y_unsafe_value(4,0)
get_list(0)
unify_x_variable(0)
unify_y_local_value(0)
get_structure(X6275696C74696E5F32,3,0,"builtin_2")
unify_y_local_value(3)
unify_y_local_value(2)
unify_y_local_value(1)
deallocate
proceed
label(20)
trust_me_else_fail
allocate(9)
get_y_variable(3,0)
get_integer(2,1)
get_list(3)
unify_y_variable(8)
unify_x_variable(0)
get_list(0)
unify_y_variable(6)
unify_nil
get_y_variable(0,4)
get_y_variable(7,5)
put_y_value(3,0)
call(Pred_Name(X675F7661725F66756E63746F72,1),1,15,"g_var_functor",1) /* begin sub 15 */
put_y_value(8,0)
put_y_variable(2,1)
put_x_variable(2,2)
put_y_variable(5,3)
put_y_value(7,4)
call(Pred_Name(X67656E5F6C6F61645F617267,5),1,16,"gen_load_arg",5) /* begin sub 16 */
put_y_value(6,0)
put_y_variable(1,1)
put_x_variable(2,2)
put_y_variable(4,3)
put_y_value(5,4)
call(Pred_Name(X67656E5F6C6F61645F617267,5),1,17,"gen_load_arg",5) /* begin sub 17 */
put_y_unsafe_value(4,0)
get_list(0)
unify_x_variable(0)
unify_y_local_value(0)
get_structure(X6275696C74696E5F32,3,0,"builtin_2")
unify_y_local_value(3)
unify_y_local_value(2)
unify_y_local_value(1)
deallocate
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_inline_pred_$aux19"
#define PRED X67656E5F696E6C696E655F707265645F246175783139
#define ARITY 2
Begin_Private_Pred
try_me_else(1)
get_structure(X78,1,0,"x")
unify_x_variable(0)
get_structure(X6765745F785F62635F726567,1,1,"get_x_bc_reg")
unify_x_value(0)
proceed
label(1)
trust_me_else_fail
get_structure(X79,1,0,"y")
unify_x_variable(0)
get_structure(X6765745F795F62635F726567,1,1,"get_y_bc_reg")
unify_x_value(0)
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_inline_pred_$aux18"
#define PRED X67656E5F696E6C696E655F707265645F246175783138
#define ARITY 1
Begin_Private_Pred
try_me_else(1)
put_constant(X66,1,"f")
builtin_2(term_eq,0,1)
neck_cut
put_constant(X246765745F62635F7265672075736564207769746820626F756E64207661726961626C652E2E2E,0,"$get_bc_reg used with bound variable...")
execute(Pred_Name(X6572726F72,1),0,"error",1)
label(1)
trust_me_else_fail
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_inline_pred_$aux20"
#define PRED X67656E5F696E6C696E655F707265645F246175783230
#define ARITY 2
Begin_Private_Pred
try_me_else(1)
get_structure(X78,1,0,"x")
unify_x_variable(0)
get_structure(X6375745F78,1,1,"cut_x")
unify_x_value(0)
proceed
label(1)
trust_me_else_fail
get_structure(X79,1,0,"y")
unify_x_variable(0)
get_structure(X6375745F79,1,1,"cut_y")
unify_x_value(0)
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "gen_inline_pred_$aux21"
#define PRED X67656E5F696E6C696E655F707265645F246175783231
#define ARITY 5
Begin_Private_Pred
try_me_else(1)
get_x_variable(7,0)
get_x_variable(6,3)
get_x_variable(5,4)
get_structure(X766172,3,1,"var")
unify_x_variable(1)
unify_x_variable(0)
unify_void(1)
get_structure(X696776,5,1,"igv")
unify_x_variable(1)
unify_void(4)
get_structure(X78,1,1,"x")
unify_x_variable(1)
neck_cut
put_x_value(7,3)
put_x_value(6,4)
execute(Pred_Name(X696E6C696E655F756E69665F7265675F7465726D65,6),1,"inline_unif_reg_terme",6)
label(1)
retry_me_else(2)
get_x_variable(7,0)
get_x_variable(8,1)
get_x_variable(6,3)
get_x_variable(5,4)
get_structure(X766172,3,2,"var")
unify_x_variable(1)
unify_x_variable(0)
unify_void(1)
get_structure(X696776,5,1,"igv")
unify_x_variable(1)
unify_void(4)
get_structure(X78,1,1,"x")
unify_x_variable(1)
neck_cut
put_x_value(8,2)
put_x_value(7,3)
put_x_value(6,4)
execute(Pred_Name(X696E6C696E655F756E69665F7265675F7465726D65,6),1,"inline_unif_reg_terme",6)
label(2)
trust_me_else_fail
allocate(5)
get_y_variable(2,0)
get_y_variable(3,2)
get_y_variable(1,3)
put_x_value(1,0)
put_y_variable(4,1)
put_y_value(2,2)
put_y_variable(0,3)
call(Pred_Name(X67656E5F6C6F61645F617267,5),1,1,"gen_load_arg",5) /* begin sub 1 */
put_x_variable(0,0)
put_y_unsafe_value(4,1)
put_y_value(3,2)
put_y_value(2,3)
put_y_value(1,4)
put_y_unsafe_value(0,5)
deallocate
execute(Pred_Name(X696E6C696E655F756E69665F7265675F7465726D65,6),1,"inline_unif_reg_terme",6)
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "inline_unif_reg_terme"
#define PRED X696E6C696E655F756E69665F7265675F7465726D65
#define ARITY 6
Begin_Private_Pred
try_me_else(2)
switch_on_term(G_label(1),G_label(1),fail,fail,fail)
label(1)
get_constant(X66,0,"f")
put_x_value(2,0)
put_x_value(4,2)
put_x_value(5,3)
execute(Pred_Name(X67656E5F756E69665F617267,4),1,"gen_unif_arg",4)
label(2)
trust_me_else_fail
put_x_value(2,0)
put_x_value(3,2)
put_x_value(4,3)
put_x_value(5,4)
execute(Pred_Name(X67656E5F6C6F61645F617267,5),1,"gen_load_arg",5)
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "type_test_functor"
#define PRED X747970655F746573745F66756E63746F72
#define ARITY 1
Begin_Private_Pred
switch_on_term(G_label(2),G_label(1),fail,fail,fail)
label(1)
switch_on_constant(1,"[(var,3),(nonvar,5),(atom,7),(integer,9),(number,11),(atomic,13),(compound,15),(callable,17)]")
label(2)
try_me_else(4)
label(3)
get_constant(X766172,0,"var")
proceed
label(4)
retry_me_else(6)
label(5)
get_constant(X6E6F6E766172,0,"nonvar")
proceed
label(6)
retry_me_else(8)
label(7)
get_constant(X61746F6D,0,"atom")
proceed
label(8)
retry_me_else(10)
label(9)
get_constant(X696E7465676572,0,"integer")
proceed
label(10)
retry_me_else(12)
label(11)
get_constant(X6E756D626572,0,"number")
proceed
label(12)
retry_me_else(14)
label(13)
get_constant(X61746F6D6963,0,"atomic")
proceed
label(14)
retry_me_else(16)
label(15)
get_constant(X636F6D706F756E64,0,"compound")
proceed
label(16)
trust_me_else_fail
label(17)
get_constant(X63616C6C61626C65,0,"callable")
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "term_ope_functor"
#define PRED X7465726D5F6F70655F66756E63746F72
#define ARITY 1
Begin_Private_Pred
switch_on_term(G_label(2),G_label(1),fail,fail,fail)
label(1)
switch_on_constant(1,"[(arg,3),(functor,5),(compare,7)]")
label(2)
try_me_else(4)
label(3)
get_constant(X617267,0,"arg")
proceed
label(4)
retry_me_else(6)
label(5)
get_constant(X66756E63746F72,0,"functor")
proceed
label(6)
trust_me_else_fail
label(7)
get_constant(X636F6D70617265,0,"compare")
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "term_cmp_functor_name"
#define PRED X7465726D5F636D705F66756E63746F725F6E616D65
#define ARITY 2
Begin_Private_Pred
switch_on_term(G_label(2),G_label(1),fail,fail,fail)
label(1)
switch_on_constant(1,"[(=..,3),(==,5),(\==,7),(@<,9),(@=<,11),(@>,13),(@>=,15)]")
label(2)
try_me_else(4)
label(3)
get_constant(X3D2E2E,0,"=..")
get_constant(X7465726D5F756E6976,1,"term_univ")
proceed
label(4)
retry_me_else(6)
label(5)
get_constant(X3D3D,0,"==")
get_constant(X7465726D5F6571,1,"term_eq")
proceed
label(6)
retry_me_else(8)
label(7)
get_constant(X5C3D3D,0,"\\==")
get_constant(X7465726D5F6E6571,1,"term_neq")
proceed
label(8)
retry_me_else(10)
label(9)
get_constant(X403C,0,"@<")
get_constant(X7465726D5F6C74,1,"term_lt")
proceed
label(10)
retry_me_else(12)
label(11)
get_constant(X403D3C,0,"@=<")
get_constant(X7465726D5F6C7465,1,"term_lte")
proceed
label(12)
retry_me_else(14)
label(13)
get_constant(X403E,0,"@>")
get_constant(X7465726D5F6774,1,"term_gt")
proceed
label(14)
trust_me_else_fail
label(15)
get_constant(X403E3D,0,"@>=")
get_constant(X7465726D5F677465,1,"term_gte")
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "inline_load_math_expr"
#define PRED X696E6C696E655F6C6F61645F6D6174685F65787072
#define ARITY 4
Begin_Private_Pred
try_me_else(13)
switch_on_term(G_label(3),fail,fail,fail,G_label(1))
label(1)
switch_on_structure(1,"[(var/3,4),(int/1,6),(lst/2,8),(stc/2,2)]")
label(2)
try(10,1) /* begin sub 1 */
trust(12)
label(3)
try_me_else(5)
label(4)
get_structure(X766172,3,0,"var")
unify_x_variable(0)
unify_x_variable(7)
unify_void(1)
get_structure(X696776,5,0,"igv")
unify_x_variable(0)
unify_void(4)
get_x_variable(6,1)
get_x_variable(5,2)
get_x_variable(4,3)
put_x_value(7,1)
put_x_value(6,2)
put_x_value(5,3)
execute(Pred_Name(X696E6C696E655F6C6F61645F6D6174685F657870725F246175783232,5),1,"inline_load_math_expr_$aux22",5)
label(5)
retry_me_else(7)
label(6)
get_structure(X696E74,1,0,"int")
unify_x_variable(0)
get_list(3)
unify_x_variable(3)
unify_x_local_value(2)
get_structure(X7075745F696E7465676572,2,3,"put_integer")
unify_x_value(0)
unify_x_local_value(1)
proceed
label(7)
retry_me_else(9)
label(8)
get_structure(X6C7374,2,0,"lst")
unify_x_variable(0)
unify_constant(X6E696C,"nil")
execute(Pred_Name(X696E6C696E655F6C6F61645F6D6174685F65787072,4),1,"inline_load_math_expr",4)
label(9)
retry_me_else(11)
label(10)
allocate(7)
get_structure(X737463,2,0,"stc")
unify_x_variable(0)
unify_x_variable(4)
get_structure(X2F,2,0,"/")
unify_x_variable(0)
unify_void(1)
get_list(4)
unify_y_variable(6)
unify_nil
get_y_variable(4,1)
get_y_variable(3,2)
get_y_variable(5,3)
put_y_variable(2,1)
call(Pred_Name(X696E6C696E655F6C6F61645F6D6174685F657870725F246175783233,2),1,2,"inline_load_math_expr_$aux23",2) /* begin sub 2 */
put_y_value(6,0)
put_y_variable(1,1)
put_y_variable(0,2)
put_y_value(5,3)
call(Pred_Name(X696E6C696E655F6C6F61645F6D6174685F65787072,4),1,3,"inline_load_math_expr",4) /* begin sub 3 */
put_y_value(4,0)
put_y_value(3,1)
put_y_unsafe_value(2,2)
put_y_unsafe_value(1,3)
put_y_unsafe_value(0,4)
deallocate
execute(Pred_Name(X696E6C696E655F6C6F61645F6D6174685F657870725F246175783234,5),1,"inline_load_math_expr_$aux24",5)
label(11)
trust_me_else_fail
label(12)
allocate(8)
get_structure(X737463,2,0,"stc")
unify_x_variable(0)
unify_x_variable(4)
get_structure(X2F,2,0,"/")
unify_x_variable(0)
unify_void(1)
get_list(4)
unify_y_variable(7)
unify_x_variable(4)
get_list(4)
unify_y_variable(5)
unify_nil
get_y_variable(4,1)
get_y_variable(3,2)
get_y_variable(6,3)
put_y_variable(2,1)
call(Pred_Name(X6D6174685F6578705F66756E63746F725F6E616D65,2),1,4,"math_exp_functor_name",2) /* begin sub 4 */
put_y_value(7,0)
put_y_variable(1,1)
put_y_variable(0,2)
put_y_value(6,3)
call(Pred_Name(X696E6C696E655F6C6F61645F6D6174685F65787072,4),1,5,"inline_load_math_expr",4) /* begin sub 5 */
put_y_value(5,0)
put_y_value(4,1)
put_y_value(3,2)
put_y_unsafe_value(2,3)
put_y_unsafe_value(1,4)
put_y_unsafe_value(0,5)
deallocate
execute(Pred_Name(X696E6C696E655F6C6F61645F6D6174685F657870725F246175783235,6),1,"inline_load_math_expr_$aux25",6)
label(13)
trust_me_else_fail
get_x_variable(4,0)
put_structure(X496C6C6567616C2061726974686D657469632065787072657373696F6E202D20756E6B6E6F776E206F7065726174696F6E,1,0,"Illegal arithmetic expression - unknown operation")
unify_x_local_value(4)
execute(Pred_Name(X6572726F72,1),0,"error",1)
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "inline_load_math_expr_$aux22"
#define PRED X696E6C696E655F6C6F61645F6D6174685F657870725F246175783232
#define ARITY 5
Begin_Private_Pred
try_me_else(1)
put_constant(X74,0,"t")
builtin_2(term_eq,1,0)
neck_cut
put_constant(X496C6C6567616C2061726974686D657469632065787072657373696F6E202D2066726565207661726961626C65,0,"Illegal arithmetic expression - free variable")
execute(Pred_Name(X6572726F72,1),0,"error",1)
label(1)
retry_me_else(2)
get_structure(X78,1,0,"x")
unify_x_variable(0)
get_list(4)
unify_x_variable(1)
unify_x_local_value(3)
get_structure(X6D6174685F6C6F61645F785F76616C7565,2,1,"math_load_x_value")
unify_x_value(0)
unify_x_local_value(2)
proceed
label(2)
trust_me_else_fail
get_structure(X79,1,0,"y")
unify_x_variable(0)
get_list(4)
unify_x_variable(1)
unify_x_local_value(3)
get_structure(X6D6174685F6C6F61645F795F76616C7565,2,1,"math_load_y_value")
unify_x_value(0)
unify_x_local_value(2)
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "inline_load_math_expr_$aux24"
#define PRED X696E6C696E655F6C6F61645F6D6174685F657870725F246175783234
#define ARITY 5
Begin_Private_Pred
try_me_else(1)
put_constant(X616464,5,"add")
builtin_2(term_eq,2,5)
neck_cut
get_x_value(3,0)
get_x_value(1,4)
proceed
label(1)
trust_me_else_fail
get_list(4)
unify_x_variable(4)
unify_x_local_value(1)
get_structure(X66756E6374696F6E5F31,3,4,"function_1")
unify_x_local_value(2)
unify_x_local_value(0)
unify_x_local_value(3)
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "inline_load_math_expr_$aux23"
#define PRED X696E6C696E655F6C6F61645F6D6174685F657870725F246175783233
#define ARITY 2
Begin_Private_Pred
try_me_else(1)
put_constant(X2D,2,"-")
builtin_2(term_eq,0,2)
neck_cut
get_constant(X6E6567,1,"neg")
proceed
label(1)
trust_me_else_fail
execute(Pred_Name(X6D6174685F6578705F66756E63746F725F6E616D65,2),1,"math_exp_functor_name",2)
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "inline_load_math_expr_$aux25"
#define PRED X696E6C696E655F6C6F61645F6D6174685F657870725F246175783235
#define ARITY 6
Begin_Private_Pred
try_me_else(1)
allocate(6)
get_y_variable(2,1)
get_y_variable(0,2)
get_y_variable(1,4)
get_y_variable(4,5)
get_y_bc_reg(5)
get_structure(X696E74,1,0,"int")
unify_integer(1)
put_x_value(3,0)
put_y_variable(3,1)
call(Pred_Name(X696E6C696E655F6C6F61645F6D6174685F657870725F246175783236,2),1,1,"inline_load_math_expr_$aux26",2) /* begin sub 1 */
cut_y(5)
put_y_value(4,0)
get_list(0)
unify_x_variable(0)
unify_y_local_value(0)
get_structure(X66756E6374696F6E5F31,3,0,"function_1")
unify_y_local_value(3)
unify_y_local_value(2)
unify_y_local_value(1)
deallocate
proceed
label(1)
trust_me_else_fail
allocate(6)
get_y_variable(3,1)
get_y_variable(0,2)
get_y_variable(4,3)
get_y_variable(2,4)
put_y_variable(1,1)
put_y_variable(5,2)
put_x_value(5,3)
call(Pred_Name(X696E6C696E655F6C6F61645F6D6174685F65787072,4),1,2,"inline_load_math_expr",4) /* begin sub 2 */
put_y_unsafe_value(5,0)
get_list(0)
unify_x_variable(0)
unify_y_local_value(0)
get_structure(X66756E6374696F6E5F32,4,0,"function_2")
unify_y_local_value(4)
unify_y_local_value(3)
unify_y_local_value(2)
unify_y_local_value(1)
deallocate
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "inline_load_math_expr_$aux26"
#define PRED X696E6C696E655F6C6F61645F6D6174685F657870725F246175783236
#define ARITY 2
Begin_Private_Pred
try_me_else(1)
put_constant(X616464,2,"add")
builtin_2(term_eq,0,2)
get_constant(X696E63,1,"inc")
proceed
label(1)
trust_me_else_fail
put_constant(X737562,2,"sub")
builtin_2(term_eq,0,2)
get_constant(X646563,1,"dec")
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "math_exp_functor_name"
#define PRED X6D6174685F6578705F66756E63746F725F6E616D65
#define ARITY 2
Begin_Private_Pred
switch_on_term(G_label(2),G_label(1),fail,fail,fail)
label(1)
switch_on_constant(1,"[(+,3),(-,5),(*,7),(//,9),(mod,11),(/\,13),(\/,15),(^,17),(\,19),(<<,21),(>>,23)]")
label(2)
try_me_else(4)
label(3)
get_constant(X2B,0,"+")
get_constant(X616464,1,"add")
proceed
label(4)
retry_me_else(6)
label(5)
get_constant(X2D,0,"-")
get_constant(X737562,1,"sub")
proceed
label(6)
retry_me_else(8)
label(7)
get_constant(X2A,0,"*")
get_constant(X6D756C,1,"mul")
proceed
label(8)
retry_me_else(10)
label(9)
get_constant(X2F2F,0,"//")
get_constant(X646976,1,"div")
proceed
label(10)
retry_me_else(12)
label(11)
get_constant(X6D6F64,0,"mod")
get_constant(X6D6F64,1,"mod")
proceed
label(12)
retry_me_else(14)
label(13)
get_constant(X2F5C,0,"/\\")
get_constant(X616E64,1,"and")
proceed
label(14)
retry_me_else(16)
label(15)
get_constant(X5C2F,0,"\\/")
get_constant(X6F72,1,"or")
proceed
label(16)
retry_me_else(18)
label(17)
get_constant(X5E,0,"^")
get_constant(X786F72,1,"xor")
proceed
label(18)
retry_me_else(20)
label(19)
get_constant(X5C,0,"\\")
get_constant(X6E6F74,1,"not")
proceed
label(20)
retry_me_else(22)
label(21)
get_constant(X3C3C,0,"<<")
get_constant(X73686C,1,"shl")
proceed
label(22)
trust_me_else_fail
label(23)
get_constant(X3E3E,0,">>")
get_constant(X736872,1,"shr")
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "math_cmp_functor_name"
#define PRED X6D6174685F636D705F66756E63746F725F6E616D65
#define ARITY 2
Begin_Private_Pred
switch_on_term(G_label(2),G_label(1),fail,fail,fail)
label(1)
switch_on_constant(1,"[(=:=,3),(=\=,5),(<,7),(=<,9),(>,11),(>=,13)]")
label(2)
try_me_else(4)
label(3)
get_constant(X3D3A3D,0,"=:=")
get_constant(X6571,1,"eq")
proceed
label(4)
retry_me_else(6)
label(5)
get_constant(X3D5C3D,0,"=\\=")
get_constant(X6E6571,1,"neq")
proceed
label(6)
retry_me_else(8)
label(7)
get_constant(X3C,0,"<")
get_constant(X6C74,1,"lt")
proceed
label(8)
retry_me_else(10)
label(9)
get_constant(X3D3C,0,"=<")
get_constant(X6C7465,1,"lte")
proceed
label(10)
retry_me_else(12)
label(11)
get_constant(X3E,0,">")
get_constant(X6774,1,"gt")
proceed
label(12)
trust_me_else_fail
label(13)
get_constant(X3E3D,0,">=")
get_constant(X677465,1,"gte")
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
#define ASCII_PRED "g_var_functor"
#define PRED X675F7661725F66756E63746F72
#define ARITY 1
Begin_Private_Pred
switch_on_term(G_label(2),G_label(1),fail,fail,fail)
label(1)
switch_on_constant(1,"[(g_assign,3),(g_assignb,5),(g_link,7),(g_read,9),(g_array_size,11)]")
label(2)
try_me_else(4)
label(3)
get_constant(X675F61737369676E,0,"g_assign")
proceed
label(4)
retry_me_else(6)
label(5)
get_constant(X675F61737369676E62,0,"g_assignb")
proceed
label(6)
retry_me_else(8)
label(7)
get_constant(X675F6C696E6B,0,"g_link")
proceed
label(8)
retry_me_else(10)
label(9)
get_constant(X675F72656164,0,"g_read")
proceed
label(10)
trust_me_else_fail
label(11)
get_constant(X675F61727261795F73697A65,0,"g_array_size")
proceed
End_Pred
#undef ASCII_PRED
#undef PRED
#undef ARITY
Begin_Init_Tables(wamcc4)
Define_Atom(X5B5D,"[]")
Define_Atom(X67656E65726174696F6E5F636F6465,"generation_code")
Define_Atom(X6E625F6368756E6B,"nb_chunk")
Define_Atom(X6465627567,"debug")
Define_Atom(X67656E65726174696F6E5F636F64655F2461757831,"generation_code_$aux1")
Define_Atom(X6462675F636C61757365,"dbg_clause")
Define_Atom(X6462675F626F6479,"dbg_body")
Define_Atom(X67656E6572655F74657465,"genere_tete")
Define_Atom(X70,"p")
Define_Atom(X67656E6572655F746574655F2461757832,"genere_tete_$aux2")
Define_Atom(X616C6C6F63617465,"allocate")
Define_Atom(X67656E5F746574655F6C73745F617267,"gen_tete_lst_arg")
Define_Atom(X67656E6572655F636F727073,"genere_corps")
Define_Atom(X70726F63656564,"proceed")
Define_Atom(X2F,"/")
Define_Atom(X6661696C,"fail")
Define_Atom(X66616C7365,"false")
Define_Atom(X67656E6572655F636F7270735F2461757833,"genere_corps_$aux3")
Define_Atom(X67656E6572655F636F7270735F2461757834,"genere_corps_$aux4")
Define_Atom(X6465616C6C6F63617465,"deallocate")
Define_Atom(X67656E6572655F636F7270735F2461757835,"genere_corps_$aux5")
Define_Atom(X63616C6C,"call")
Define_Atom(X67656E6572655F636F7270735F2461757836,"genere_corps_$aux6")
Define_Atom(X65786563757465,"execute")
Define_Atom(X67656E5F636F7270735F6C73745F617267,"gen_corps_lst_arg")
Define_Atom(X67656E5F756E69665F617267,"gen_unif_arg")
Define_Atom(X766172,"var")
Define_Atom(X696776,"igv")
Define_Atom(X78,"x")
Define_Atom(X79,"y")
Define_Atom(X637374,"cst")
Define_Atom(X6765745F636F6E7374616E74,"get_constant")
Define_Atom(X696E74,"int")
Define_Atom(X6765745F696E7465676572,"get_integer")
Define_Atom(X6E696C,"nil")
Define_Atom(X6765745F6E696C,"get_nil")
Define_Atom(X756E6966,"unif")
Define_Atom(X67656E5F756E69665F6172675F2461757837,"gen_unif_arg_$aux7")
Define_Atom(X74,"t")
Define_Atom(X6765745F785F7661726961626C65,"get_x_variable")
Define_Atom(X6765745F785F76616C7565,"get_x_value")
Define_Atom(X67656E5F756E69665F6172675F2461757838,"gen_unif_arg_$aux8")
Define_Atom(X6765745F795F7661726961626C65,"get_y_variable")
Define_Atom(X6765745F795F76616C7565,"get_y_value")
Define_Atom(X67656E5F6C6F61645F617267,"gen_load_arg")
Define_Atom(X7075745F636F6E7374616E74,"put_constant")
Define_Atom(X7075745F696E7465676572,"put_integer")
Define_Atom(X7075745F6E696C,"put_nil")
Define_Atom(X6C6F6164,"load")
Define_Atom(X67656E5F6C6F61645F6172675F2461757839,"gen_load_arg_$aux9")
Define_Atom(X7075745F785F7661726961626C65,"put_x_variable")
Define_Atom(X7075745F785F76616C7565,"put_x_value")
Define_Atom(X67656E5F6C6F61645F6172675F246175783130,"gen_load_arg_$aux10")
Define_Atom(X7075745F795F7661726961626C65,"put_y_variable")
Define_Atom(X7075745F795F756E736166655F76616C7565,"put_y_unsafe_value")
Define_Atom(X7075745F795F76616C7565,"put_y_value")
Define_Atom(X67656E5F6C73745F73747263,"gen_lst_strc")
Define_Atom(X67656E5F6C73745F737472635F246175783131,"gen_lst_strc_$aux11")
Define_Atom(X67656E5F73747263,"gen_strc")
Define_Atom(X6C7374,"lst")
Define_Atom(X737463,"stc")
Define_Atom(X67656E5F737472635F246175783132,"gen_strc_$aux12")
Define_Atom(X6765745F6C697374,"get_list")
Define_Atom(X7075745F6C697374,"put_list")
Define_Atom(X67656E5F737472635F246175783133,"gen_strc_$aux13")
Define_Atom(X6765745F737472756374757265,"get_structure")
Define_Atom(X7075745F737472756374757265,"put_structure")
Define_Atom(X67656E5F756E6966795F6C73745F617267,"gen_unify_lst_arg")
Define_Atom(X67656E5F756E6966795F6C73745F6172675F246175783134,"gen_unify_lst_arg_$aux14")
Define_Atom(X756E6966795F766F6964,"unify_void")
Define_Atom(X67656E5F636F6D7074655F766F6964,"gen_compte_void")
Define_Atom(X67656E5F756E6966795F617267,"gen_unify_arg")
Define_Atom(X756E6966795F636F6E7374616E74,"unify_constant")
Define_Atom(X756E6966795F696E7465676572,"unify_integer")
Define_Atom(X756E6966795F6E696C,"unify_nil")
Define_Atom(X67656E5F756E6966795F6172675F246175783135,"gen_unify_arg_$aux15")
Define_Atom(X756E6966795F785F7661726961626C65,"unify_x_variable")
Define_Atom(X66,"f")
Define_Atom(X756E6966795F785F6C6F63616C5F76616C7565,"unify_x_local_value")
Define_Atom(X756E6966795F785F76616C7565,"unify_x_value")
Define_Atom(X67656E5F756E6966795F6172675F246175783136,"gen_unify_arg_$aux16")
Define_Atom(X756E6966795F795F7661726961626C65,"unify_y_variable")
Define_Atom(X756E6966795F795F6C6F63616C5F76616C7565,"unify_y_local_value")
Define_Atom(X756E6966795F795F76616C7565,"unify_y_value")
Define_Atom(X67656E5F756E6966795F6172675F246175783137,"gen_unify_arg_$aux17")
Define_Atom(X67656E5F696E6C696E655F70726564,"gen_inline_pred")
Define_Atom(X246765745F62635F726567,"$get_bc_reg")
Define_Atom(X24637574,"$cut")
Define_Atom(X246462675F74727565,"$dbg_true")
Define_Atom(X707261676D615F63,"pragma_c")
Define_Atom(X63616C6C696E675F6D6F64756C655F6E62,"calling_module_nb")
Define_Atom(X3D,"=")
Define_Atom(X434D4E,"CMN")
Define_Atom(X6275696C74696E5F31,"builtin_1")
Define_Atom(X6275696C74696E5F33,"builtin_3")
Define_Atom(X6275696C74696E5F32,"builtin_2")
Define_Atom(X6973,"is")
Define_Atom(X67656E5F696E6C696E655F707265645F246175783139,"gen_inline_pred_$aux19")
Define_Atom(X6765745F785F62635F726567,"get_x_bc_reg")
Define_Atom(X6765745F795F62635F726567,"get_y_bc_reg")
Define_Atom(X67656E5F696E6C696E655F707265645F246175783138,"gen_inline_pred_$aux18")
Define_Atom(X246765745F62635F7265672075736564207769746820626F756E64207661726961626C652E2E2E,"$get_bc_reg used with bound variable...")
Define_Atom(X67656E5F696E6C696E655F707265645F246175783230,"gen_inline_pred_$aux20")
Define_Atom(X6375745F78,"cut_x")
Define_Atom(X6375745F79,"cut_y")
Define_Atom(X67656E5F696E6C696E655F707265645F246175783231,"gen_inline_pred_$aux21")
Define_Atom(X696E6C696E655F756E69665F7265675F7465726D65,"inline_unif_reg_terme")
Define_Atom(X747970655F746573745F66756E63746F72,"type_test_functor")
Define_Atom(X6E6F6E766172,"nonvar")
Define_Atom(X61746F6D,"atom")
Define_Atom(X696E7465676572,"integer")
Define_Atom(X6E756D626572,"number")
Define_Atom(X61746F6D6963,"atomic")
Define_Atom(X636F6D706F756E64,"compound")
Define_Atom(X63616C6C61626C65,"callable")
Define_Atom(X7465726D5F6F70655F66756E63746F72,"term_ope_functor")
Define_Atom(X617267,"arg")
Define_Atom(X66756E63746F72,"functor")
Define_Atom(X636F6D70617265,"compare")
Define_Atom(X7465726D5F636D705F66756E63746F725F6E616D65,"term_cmp_functor_name")
Define_Atom(X3D2E2E,"=..")
Define_Atom(X7465726D5F756E6976,"term_univ")
Define_Atom(X3D3D,"==")
Define_Atom(X7465726D5F6571,"term_eq")
Define_Atom(X5C3D3D,"\\==")
Define_Atom(X7465726D5F6E6571,"term_neq")
Define_Atom(X403C,"@<")
Define_Atom(X7465726D5F6C74,"term_lt")
Define_Atom(X403D3C,"@=<")
Define_Atom(X7465726D5F6C7465,"term_lte")
Define_Atom(X403E,"@>")
Define_Atom(X7465726D5F6774,"term_gt")
Define_Atom(X403E3D,"@>=")
Define_Atom(X7465726D5F677465,"term_gte")
Define_Atom(X696E6C696E655F6C6F61645F6D6174685F65787072,"inline_load_math_expr")
Define_Atom(X496C6C6567616C2061726974686D657469632065787072657373696F6E202D20756E6B6E6F776E206F7065726174696F6E,"Illegal arithmetic expression - unknown operation")
Define_Atom(X696E6C696E655F6C6F61645F6D6174685F657870725F246175783232,"inline_load_math_expr_$aux22")
Define_Atom(X496C6C6567616C2061726974686D657469632065787072657373696F6E202D2066726565207661726961626C65,"Illegal arithmetic expression - free variable")
Define_Atom(X6D6174685F6C6F61645F785F76616C7565,"math_load_x_value")
Define_Atom(X6D6174685F6C6F61645F795F76616C7565,"math_load_y_value")
Define_Atom(X696E6C696E655F6C6F61645F6D6174685F657870725F246175783234,"inline_load_math_expr_$aux24")
Define_Atom(X616464,"add")
Define_Atom(X66756E6374696F6E5F31,"function_1")
Define_Atom(X696E6C696E655F6C6F61645F6D6174685F657870725F246175783233,"inline_load_math_expr_$aux23")
Define_Atom(X2D,"-")
Define_Atom(X6E6567,"neg")
Define_Atom(X696E6C696E655F6C6F61645F6D6174685F657870725F246175783235,"inline_load_math_expr_$aux25")
Define_Atom(X66756E6374696F6E5F32,"function_2")
Define_Atom(X696E6C696E655F6C6F61645F6D6174685F657870725F246175783236,"inline_load_math_expr_$aux26")
Define_Atom(X696E63,"inc")
Define_Atom(X737562,"sub")
Define_Atom(X646563,"dec")
Define_Atom(X6D6174685F6578705F66756E63746F725F6E616D65,"math_exp_functor_name")
Define_Atom(X2B,"+")
Define_Atom(X2A,"*")
Define_Atom(X6D756C,"mul")
Define_Atom(X2F2F,"//")
Define_Atom(X646976,"div")
Define_Atom(X6D6F64,"mod")
Define_Atom(X2F5C,"/\\")
Define_Atom(X616E64,"and")
Define_Atom(X5C2F,"\\/")
Define_Atom(X6F72,"or")
Define_Atom(X5E,"^")
Define_Atom(X786F72,"xor")
Define_Atom(X5C,"\\")
Define_Atom(X6E6F74,"not")
Define_Atom(X3C3C,"<<")
Define_Atom(X73686C,"shl")
Define_Atom(X3E3E,">>")
Define_Atom(X736872,"shr")
Define_Atom(X6D6174685F636D705F66756E63746F725F6E616D65,"math_cmp_functor_name")
Define_Atom(X3D3A3D,"=:=")
Define_Atom(X6571,"eq")
Define_Atom(X3D5C3D,"=\\=")
Define_Atom(X6E6571,"neq")
Define_Atom(X3C,"<")
Define_Atom(X6C74,"lt")
Define_Atom(X3D3C,"=<")
Define_Atom(X6C7465,"lte")
Define_Atom(X3E,">")
Define_Atom(X6774,"gt")
Define_Atom(X3E3D,">=")
Define_Atom(X677465,"gte")
Define_Atom(X675F7661725F66756E63746F72,"g_var_functor")
Define_Atom(X675F61737369676E,"g_assign")
Define_Atom(X675F61737369676E62,"g_assignb")
Define_Atom(X675F6C696E6B,"g_link")
Define_Atom(X675F72656164,"g_read")
Define_Atom(X675F61727261795F73697A65,"g_array_size")
Define_Pred(X67656E65726174696F6E5F636F6465,5,1)
Define_Pred(X67656E65726174696F6E5F636F64655F2461757831,5,0)
Define_Pred(X67656E6572655F74657465,5,0)
Define_Pred(X67656E6572655F746574655F2461757832,4,0)
Define_Pred(X67656E5F746574655F6C73745F617267,4,0)
Define_Pred(X67656E6572655F636F727073,2,0)
Define_Pred(X67656E6572655F636F7270735F2461757833,3,0)
Define_Pred(X67656E6572655F636F7270735F2461757834,2,0)
Define_Pred(X67656E6572655F636F7270735F2461757835,4,0)
Define_Pred(X67656E6572655F636F7270735F2461757836,3,0)
Define_Pred(X67656E5F636F7270735F6C73745F617267,5,0)
Define_Pred(X67656E5F756E69665F617267,4,0)
Define_Switch_STC_Table(Swt_Table_Name(X67656E5F756E69665F617267,4,1,stc),3)
Define_Switch_STC(X766172,3,Label_Pred_Name(X67656E5F756E69665F617267,4,2))
Define_Switch_STC(X637374,1,Label_Pred_Name(X67656E5F756E69665F617267,4,8))
Define_Switch_STC(X696E74,1,Label_Pred_Name(X67656E5F756E69665F617267,4,10))
Define_Pred(X67656E5F756E69665F6172675F2461757837,4,0)
Define_Pred(X67656E5F756E69665F6172675F2461757838,4,0)
Define_Pred(X67656E5F6C6F61645F617267,5,0)
Define_Switch_STC_Table(Swt_Table_Name(X67656E5F6C6F61645F617267,5,1,stc),3)
Define_Switch_STC(X766172,3,Label_Pred_Name(X67656E5F6C6F61645F617267,5,2))
Define_Switch_STC(X637374,1,Label_Pred_Name(X67656E5F6C6F61645F617267,5,8))
Define_Switch_STC(X696E74,1,Label_Pred_Name(X67656E5F6C6F61645F617267,5,10))
Define_Pred(X67656E5F6C6F61645F6172675F2461757839,4,0)
Define_Pred(X67656E5F6C6F61645F6172675F246175783130,6,0)
Define_Pred(X67656E5F6C73745F73747263,4,0)
Define_Pred(X67656E5F6C73745F737472635F246175783131,7,0)
Define_Pred(X67656E5F73747263,6,0)
Define_Switch_STC_Table(Swt_Table_Name(X67656E5F73747263,6,1,stc),2)
Define_Switch_STC(X6C7374,2,Label_Pred_Name(X67656E5F73747263,6,3))
Define_Switch_STC(X737463,2,Label_Pred_Name(X67656E5F73747263,6,5))
Define_Pred(X67656E5F737472635F246175783132,3,0)
Define_Pred(X67656E5F737472635F246175783133,4,0)
Define_Pred(X67656E5F756E6966795F6C73745F617267,5,0)
Define_Pred(X67656E5F756E6966795F6C73745F6172675F246175783134,8,0)
Define_Pred(X67656E5F636F6D7074655F766F6964,4,0)
Define_Pred(X67656E5F756E6966795F617267,6,0)
Define_Switch_STC_Table(Swt_Table_Name(X67656E5F756E6966795F617267,6,1,stc),3)
Define_Switch_STC(X766172,3,Label_Pred_Name(X67656E5F756E6966795F617267,6,2))
Define_Switch_STC(X637374,1,Label_Pred_Name(X67656E5F756E6966795F617267,6,8))
Define_Switch_STC(X696E74,1,Label_Pred_Name(X67656E5F756E6966795F617267,6,10))
Define_Pred(X67656E5F756E6966795F6172675F246175783135,5,0)
Define_Pred(X67656E5F756E6966795F6172675F246175783136,4,0)
Define_Pred(X67656E5F756E6966795F6172675F246175783137,3,0)
Define_Pred(X67656E5F696E6C696E655F70726564,6,0)
Define_Switch_CST_Table(Swt_Table_Name(X67656E5F696E6C696E655F70726564,6,1,cst),6)
Define_Switch_CST(X246765745F62635F726567,Label_Pred_Name(X67656E5F696E6C696E655F70726564,6,3))
Define_Switch_CST(X24637574,Label_Pred_Name(X67656E5F696E6C696E655F70726564,6,5))
Define_Switch_CST(X246462675F74727565,Label_Pred_Name(X67656E5F696E6C696E655F70726564,6,7))
Define_Switch_CST(X707261676D615F63,Label_Pred_Name(X67656E5F696E6C696E655F70726564,6,9))
Define_Switch_CST(X63616C6C696E675F6D6F64756C655F6E62,Label_Pred_Name(X67656E5F696E6C696E655F70726564,6,11))
Define_Switch_CST(X3D,Label_Pred_Name(X67656E5F696E6C696E655F70726564,6,13))
Define_Pred(X67656E5F696E6C696E655F707265645F246175783139,2,0)
Define_Pred(X67656E5F696E6C696E655F707265645F246175783138,1,0)
Define_Pred(X67656E5F696E6C696E655F707265645F246175783230,2,0)
Define_Pred(X67656E5F696E6C696E655F707265645F246175783231,5,0)
Define_Pred(X696E6C696E655F756E69665F7265675F7465726D65,6,0)
Define_Pred(X747970655F746573745F66756E63746F72,1,0)
Define_Switch_CST_Table(Swt_Table_Name(X747970655F746573745F66756E63746F72,1,1,cst),8)
Define_Switch_CST(X766172,Label_Pred_Name(X747970655F746573745F66756E63746F72,1,3))
Define_Switch_CST(X6E6F6E766172,Label_Pred_Name(X747970655F746573745F66756E63746F72,1,5))
Define_Switch_CST(X61746F6D,Label_Pred_Name(X747970655F746573745F66756E63746F72,1,7))
Define_Switch_CST(X696E7465676572,Label_Pred_Name(X747970655F746573745F66756E63746F72,1,9))
Define_Switch_CST(X6E756D626572,Label_Pred_Name(X747970655F746573745F66756E63746F72,1,11))
Define_Switch_CST(X61746F6D6963,Label_Pred_Name(X747970655F746573745F66756E63746F72,1,13))
Define_Switch_CST(X636F6D706F756E64,Label_Pred_Name(X747970655F746573745F66756E63746F72,1,15))
Define_Switch_CST(X63616C6C61626C65,Label_Pred_Name(X747970655F746573745F66756E63746F72,1,17))
Define_Pred(X7465726D5F6F70655F66756E63746F72,1,0)
Define_Switch_CST_Table(Swt_Table_Name(X7465726D5F6F70655F66756E63746F72,1,1,cst),3)
Define_Switch_CST(X617267,Label_Pred_Name(X7465726D5F6F70655F66756E63746F72,1,3))
Define_Switch_CST(X66756E63746F72,Label_Pred_Name(X7465726D5F6F70655F66756E63746F72,1,5))
Define_Switch_CST(X636F6D70617265,Label_Pred_Name(X7465726D5F6F70655F66756E63746F72,1,7))
Define_Pred(X7465726D5F636D705F66756E63746F725F6E616D65,2,0)
Define_Switch_CST_Table(Swt_Table_Name(X7465726D5F636D705F66756E63746F725F6E616D65,2,1,cst),7)
Define_Switch_CST(X3D2E2E,Label_Pred_Name(X7465726D5F636D705F66756E63746F725F6E616D65,2,3))
Define_Switch_CST(X3D3D,Label_Pred_Name(X7465726D5F636D705F66756E63746F725F6E616D65,2,5))
Define_Switch_CST(X5C3D3D,Label_Pred_Name(X7465726D5F636D705F66756E63746F725F6E616D65,2,7))
Define_Switch_CST(X403C,Label_Pred_Name(X7465726D5F636D705F66756E63746F725F6E616D65,2,9))
Define_Switch_CST(X403D3C,Label_Pred_Name(X7465726D5F636D705F66756E63746F725F6E616D65,2,11))
Define_Switch_CST(X403E,Label_Pred_Name(X7465726D5F636D705F66756E63746F725F6E616D65,2,13))
Define_Switch_CST(X403E3D,Label_Pred_Name(X7465726D5F636D705F66756E63746F725F6E616D65,2,15))
Define_Pred(X696E6C696E655F6C6F61645F6D6174685F65787072,4,0)
Define_Switch_STC_Table(Swt_Table_Name(X696E6C696E655F6C6F61645F6D6174685F65787072,4,1,stc),4)
Define_Switch_STC(X766172,3,Label_Pred_Name(X696E6C696E655F6C6F61645F6D6174685F65787072,4,4))
Define_Switch_STC(X696E74,1,Label_Pred_Name(X696E6C696E655F6C6F61645F6D6174685F65787072,4,6))
Define_Switch_STC(X6C7374,2,Label_Pred_Name(X696E6C696E655F6C6F61645F6D6174685F65787072,4,8))
Define_Switch_STC(X737463,2,Label_Pred_Name(X696E6C696E655F6C6F61645F6D6174685F65787072,4,2))
Define_Pred(X696E6C696E655F6C6F61645F6D6174685F657870725F246175783232,5,0)
Define_Pred(X696E6C696E655F6C6F61645F6D6174685F657870725F246175783234,5,0)
Define_Pred(X696E6C696E655F6C6F61645F6D6174685F657870725F246175783233,2,0)
Define_Pred(X696E6C696E655F6C6F61645F6D6174685F657870725F246175783235,6,0)
Define_Pred(X696E6C696E655F6C6F61645F6D6174685F657870725F246175783236,2,0)
Define_Pred(X6D6174685F6578705F66756E63746F725F6E616D65,2,0)
Define_Switch_CST_Table(Swt_Table_Name(X6D6174685F6578705F66756E63746F725F6E616D65,2,1,cst),11)
Define_Switch_CST(X2B,Label_Pred_Name(X6D6174685F6578705F66756E63746F725F6E616D65,2,3))
Define_Switch_CST(X2D,Label_Pred_Name(X6D6174685F6578705F66756E63746F725F6E616D65,2,5))
Define_Switch_CST(X2A,Label_Pred_Name(X6D6174685F6578705F66756E63746F725F6E616D65,2,7))
Define_Switch_CST(X2F2F,Label_Pred_Name(X6D6174685F6578705F66756E63746F725F6E616D65,2,9))
Define_Switch_CST(X6D6F64,Label_Pred_Name(X6D6174685F6578705F66756E63746F725F6E616D65,2,11))
Define_Switch_CST(X2F5C,Label_Pred_Name(X6D6174685F6578705F66756E63746F725F6E616D65,2,13))
Define_Switch_CST(X5C2F,Label_Pred_Name(X6D6174685F6578705F66756E63746F725F6E616D65,2,15))
Define_Switch_CST(X5E,Label_Pred_Name(X6D6174685F6578705F66756E63746F725F6E616D65,2,17))
Define_Switch_CST(X5C,Label_Pred_Name(X6D6174685F6578705F66756E63746F725F6E616D65,2,19))
Define_Switch_CST(X3C3C,Label_Pred_Name(X6D6174685F6578705F66756E63746F725F6E616D65,2,21))
Define_Switch_CST(X3E3E,Label_Pred_Name(X6D6174685F6578705F66756E63746F725F6E616D65,2,23))
Define_Pred(X6D6174685F636D705F66756E63746F725F6E616D65,2,0)
Define_Switch_CST_Table(Swt_Table_Name(X6D6174685F636D705F66756E63746F725F6E616D65,2,1,cst),6)
Define_Switch_CST(X3D3A3D,Label_Pred_Name(X6D6174685F636D705F66756E63746F725F6E616D65,2,3))
Define_Switch_CST(X3D5C3D,Label_Pred_Name(X6D6174685F636D705F66756E63746F725F6E616D65,2,5))
Define_Switch_CST(X3C,Label_Pred_Name(X6D6174685F636D705F66756E63746F725F6E616D65,2,7))
Define_Switch_CST(X3D3C,Label_Pred_Name(X6D6174685F636D705F66756E63746F725F6E616D65,2,9))
Define_Switch_CST(X3E,Label_Pred_Name(X6D6174685F636D705F66756E63746F725F6E616D65,2,11))
Define_Switch_CST(X3E3D,Label_Pred_Name(X6D6174685F636D705F66756E63746F725F6E616D65,2,13))
Define_Pred(X675F7661725F66756E63746F72,1,0)
Define_Switch_CST_Table(Swt_Table_Name(X675F7661725F66756E63746F72,1,1,cst),5)
Define_Switch_CST(X675F61737369676E,Label_Pred_Name(X675F7661725F66756E63746F72,1,3))
Define_Switch_CST(X675F61737369676E62,Label_Pred_Name(X675F7661725F66756E63746F72,1,5))
Define_Switch_CST(X675F6C696E6B,Label_Pred_Name(X675F7661725F66756E63746F72,1,7))
Define_Switch_CST(X675F72656164,Label_Pred_Name(X675F7661725F66756E63746F72,1,9))
Define_Switch_CST(X675F61727261795F73697A65,Label_Pred_Name(X675F7661725F66756E63746F72,1,11))
Init_Usr_File
End_Init_Tables
Begin_Exec_Directives(wamcc4)
End_Exec_Directives
syntax highlighted by Code2HTML, v. 0.9.1