/**
 ** This file was automatically generated by the Cyclone scheme compiler
 ** http://justinethier.github.io/cyclone/
 **
 ** (c) 2014-2024 Justin Ethier
 ** Version 0.36.0 
 **
 **/

#define closcall1(td, clo, buf) \
if (obj_is_not_closure(clo)) { \
   Cyc_apply(td, clo, 1, buf ); \
} else { \
   ((clo)->fn)(td, clo, 1, buf); \
;\
}
#define return_closcall1(td, clo,a1) { \
 char top; \
 object buf[1]; buf[0] = a1;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 1); \
     return; \
 } else {\
     closcall1(td, (closure) (clo), buf); \
     return;\
 } \
}

#define continue_or_gc1(td, clo,a1) { \
 char *top = alloca(sizeof(char)); \
 if (stack_overflow(top, (((gc_thread_data *)data)->stack_limit))) { \
     object buf[1]; buf[0] = a1;\
     GC(td, clo, buf, 1); \
     return; \
 } else {\
     continue;\
 } \
}

#define return_direct1(td, _fn,a1) { \
 char top; \
 object buf[1]; buf[0] = a1; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     mclosure0(c1, (function_type) _fn); \
     GC(td, &c1, buf, 1); \
     return; \
 } else { \
     (_fn)(td, (closure)_fn, 1, buf); \
 }}

#define return_direct_with_clo1(td, clo, _fn,a1) { \
 char top; \
 object buf[1]; buf[0] = a1;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 1); \
     return; \
 } else { \
     (_fn)(td, (closure)(clo), 1, buf); \
 }}

#define closcall2(td, clo, buf) \
if (obj_is_not_closure(clo)) { \
   Cyc_apply(td, clo, 2, buf ); \
} else { \
   ((clo)->fn)(td, clo, 2, buf); \
;\
}
#define return_closcall2(td, clo,a1,a2) { \
 char top; \
 object buf[2]; buf[0] = a1;buf[1] = a2;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 2); \
     return; \
 } else {\
     closcall2(td, (closure) (clo), buf); \
     return;\
 } \
}

#define continue_or_gc2(td, clo,a1,a2) { \
 char *top = alloca(sizeof(char)); \
 if (stack_overflow(top, (((gc_thread_data *)data)->stack_limit))) { \
     object buf[2]; buf[0] = a1;buf[1] = a2;\
     GC(td, clo, buf, 2); \
     return; \
 } else {\
     continue;\
 } \
}

#define return_direct2(td, _fn,a1,a2) { \
 char top; \
 object buf[2]; buf[0] = a1;buf[1] = a2; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     mclosure0(c1, (function_type) _fn); \
     GC(td, &c1, buf, 2); \
     return; \
 } else { \
     (_fn)(td, (closure)_fn, 2, buf); \
 }}

#define return_direct_with_clo2(td, clo, _fn,a1,a2) { \
 char top; \
 object buf[2]; buf[0] = a1;buf[1] = a2;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 2); \
     return; \
 } else { \
     (_fn)(td, (closure)(clo), 2, buf); \
 }}

#define closcall3(td, clo, buf) \
if (obj_is_not_closure(clo)) { \
   Cyc_apply(td, clo, 3, buf ); \
} else { \
   ((clo)->fn)(td, clo, 3, buf); \
;\
}
#define return_closcall3(td, clo,a1,a2,a3) { \
 char top; \
 object buf[3]; buf[0] = a1;buf[1] = a2;buf[2] = a3;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 3); \
     return; \
 } else {\
     closcall3(td, (closure) (clo), buf); \
     return;\
 } \
}

#define continue_or_gc3(td, clo,a1,a2,a3) { \
 char *top = alloca(sizeof(char)); \
 if (stack_overflow(top, (((gc_thread_data *)data)->stack_limit))) { \
     object buf[3]; buf[0] = a1;buf[1] = a2;buf[2] = a3;\
     GC(td, clo, buf, 3); \
     return; \
 } else {\
     continue;\
 } \
}

#define return_direct3(td, _fn,a1,a2,a3) { \
 char top; \
 object buf[3]; buf[0] = a1;buf[1] = a2;buf[2] = a3; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     mclosure0(c1, (function_type) _fn); \
     GC(td, &c1, buf, 3); \
     return; \
 } else { \
     (_fn)(td, (closure)_fn, 3, buf); \
 }}

#define return_direct_with_clo3(td, clo, _fn,a1,a2,a3) { \
 char top; \
 object buf[3]; buf[0] = a1;buf[1] = a2;buf[2] = a3;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 3); \
     return; \
 } else { \
     (_fn)(td, (closure)(clo), 3, buf); \
 }}

#define closcall4(td, clo, buf) \
if (obj_is_not_closure(clo)) { \
   Cyc_apply(td, clo, 4, buf ); \
} else { \
   ((clo)->fn)(td, clo, 4, buf); \
;\
}
#define return_closcall4(td, clo,a1,a2,a3,a4) { \
 char top; \
 object buf[4]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 4); \
     return; \
 } else {\
     closcall4(td, (closure) (clo), buf); \
     return;\
 } \
}

#define continue_or_gc4(td, clo,a1,a2,a3,a4) { \
 char *top = alloca(sizeof(char)); \
 if (stack_overflow(top, (((gc_thread_data *)data)->stack_limit))) { \
     object buf[4]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;\
     GC(td, clo, buf, 4); \
     return; \
 } else {\
     continue;\
 } \
}

#define return_direct4(td, _fn,a1,a2,a3,a4) { \
 char top; \
 object buf[4]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     mclosure0(c1, (function_type) _fn); \
     GC(td, &c1, buf, 4); \
     return; \
 } else { \
     (_fn)(td, (closure)_fn, 4, buf); \
 }}

#define return_direct_with_clo4(td, clo, _fn,a1,a2,a3,a4) { \
 char top; \
 object buf[4]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 4); \
     return; \
 } else { \
     (_fn)(td, (closure)(clo), 4, buf); \
 }}

#define closcall5(td, clo, buf) \
if (obj_is_not_closure(clo)) { \
   Cyc_apply(td, clo, 5, buf ); \
} else { \
   ((clo)->fn)(td, clo, 5, buf); \
;\
}
#define return_closcall5(td, clo,a1,a2,a3,a4,a5) { \
 char top; \
 object buf[5]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;buf[4] = a5;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 5); \
     return; \
 } else {\
     closcall5(td, (closure) (clo), buf); \
     return;\
 } \
}

#define continue_or_gc5(td, clo,a1,a2,a3,a4,a5) { \
 char *top = alloca(sizeof(char)); \
 if (stack_overflow(top, (((gc_thread_data *)data)->stack_limit))) { \
     object buf[5]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;buf[4] = a5;\
     GC(td, clo, buf, 5); \
     return; \
 } else {\
     continue;\
 } \
}

#define return_direct5(td, _fn,a1,a2,a3,a4,a5) { \
 char top; \
 object buf[5]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;buf[4] = a5; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     mclosure0(c1, (function_type) _fn); \
     GC(td, &c1, buf, 5); \
     return; \
 } else { \
     (_fn)(td, (closure)_fn, 5, buf); \
 }}

#define return_direct_with_clo5(td, clo, _fn,a1,a2,a3,a4,a5) { \
 char top; \
 object buf[5]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;buf[4] = a5;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 5); \
     return; \
 } else { \
     (_fn)(td, (closure)(clo), 5, buf); \
 }}

#define closcall7(td, clo, buf) \
if (obj_is_not_closure(clo)) { \
   Cyc_apply(td, clo, 7, buf ); \
} else { \
   ((clo)->fn)(td, clo, 7, buf); \
;\
}
#define return_closcall7(td, clo,a1,a2,a3,a4,a5,a6,a7) { \
 char top; \
 object buf[7]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;buf[4] = a5;buf[5] = a6;buf[6] = a7;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 7); \
     return; \
 } else {\
     closcall7(td, (closure) (clo), buf); \
     return;\
 } \
}

#define continue_or_gc7(td, clo,a1,a2,a3,a4,a5,a6,a7) { \
 char *top = alloca(sizeof(char)); \
 if (stack_overflow(top, (((gc_thread_data *)data)->stack_limit))) { \
     object buf[7]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;buf[4] = a5;buf[5] = a6;buf[6] = a7;\
     GC(td, clo, buf, 7); \
     return; \
 } else {\
     continue;\
 } \
}

#define return_direct7(td, _fn,a1,a2,a3,a4,a5,a6,a7) { \
 char top; \
 object buf[7]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;buf[4] = a5;buf[5] = a6;buf[6] = a7; \
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     mclosure0(c1, (function_type) _fn); \
     GC(td, &c1, buf, 7); \
     return; \
 } else { \
     (_fn)(td, (closure)_fn, 7, buf); \
 }}

#define return_direct_with_clo7(td, clo, _fn,a1,a2,a3,a4,a5,a6,a7) { \
 char top; \
 object buf[7]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;buf[4] = a5;buf[5] = a6;buf[6] = a7;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 7); \
     return; \
 } else { \
     (_fn)(td, (closure)(clo), 7, buf); \
 }}

#include "cyclone/types.h"
object __glo_lib_91init_117schemecyclonetransforms_scheme_cyclone_transforms = NULL;
object __glo_cps_91convert_scheme_cyclone_transforms = NULL;
object __glo__85prim_91args_91table_85_scheme_cyclone_transforms = NULL;
object __glo_prim_91convert_scheme_cyclone_transforms = NULL;
object __glo_alpha_91convert_scheme_cyclone_transforms = NULL;
object __glo_flatten_91sequence_scheme_cyclone_transforms = NULL;
object __glo_wrap_91mutables_scheme_cyclone_transforms = NULL;
object __glo_analyze_91mutable_91variables_scheme_cyclone_transforms = NULL;
object __glo_is_91mutable_127_scheme_cyclone_transforms = NULL;
object __glo_mark_91mutable_scheme_cyclone_transforms = NULL;
object __glo_clear_91mutables_scheme_cyclone_transforms = NULL;
object __glo_mutable_91variables_scheme_cyclone_transforms = NULL;
object __glo_free_91vars_scheme_cyclone_transforms = NULL;
object __glo_filter_91unused_91variables_scheme_cyclone_transforms = NULL;
object __glo_global_91vars_scheme_cyclone_transforms = NULL;
object __glo_has_91global_127_scheme_cyclone_transforms = NULL;
object __glo_isolate_91globals_scheme_cyclone_transforms = NULL;
object __glo_cell_91get_91_125cell_191_191inline_191_191_scheme_cyclone_transforms = NULL;
object __glo_cell_91get_91_125cell_scheme_cyclone_transforms = NULL;
object __glo_cell_91get_127_scheme_cyclone_transforms = NULL;
object __glo_cell_91_125value_191_191inline_191_191_scheme_cyclone_transforms = NULL;
object __glo_cell_91_125value_scheme_cyclone_transforms = NULL;
object __glo_cell_127_scheme_cyclone_transforms = NULL;
object __glo_set_91cell_67_91_125value_191_191inline_191_191_scheme_cyclone_transforms = NULL;
object __glo_set_91cell_67_91_125value_scheme_cyclone_transforms = NULL;
object __glo_set_91cell_67_91_125cell_191_191inline_191_191_scheme_cyclone_transforms = NULL;
object __glo_set_91cell_67_91_125cell_scheme_cyclone_transforms = NULL;
object __glo_set_91cell_67_127_scheme_cyclone_transforms = NULL;
object __glo_env_91get_91_125env_191_191inline_191_191_scheme_cyclone_transforms = NULL;
object __glo_env_91get_91_125env_scheme_cyclone_transforms = NULL;
object __glo_env_91get_91_125field_191_191inline_191_191_scheme_cyclone_transforms = NULL;
object __glo_env_91get_91_125field_scheme_cyclone_transforms = NULL;
object __glo_env_91get_91_125id_191_191inline_191_191_scheme_cyclone_transforms = NULL;
object __glo_env_91get_91_125id_scheme_cyclone_transforms = NULL;
object __glo_env_91get_127_scheme_cyclone_transforms = NULL;
object __glo_env_91make_91_125values_scheme_cyclone_transforms = NULL;
object __glo_env_91make_91_125fields_scheme_cyclone_transforms = NULL;
object __glo_env_91make_91_125id_191_191inline_191_191_scheme_cyclone_transforms = NULL;
object __glo_env_91make_91_125id_scheme_cyclone_transforms = NULL;
object __glo_env_91make_127_scheme_cyclone_transforms = NULL;
object __glo_closure_91_125fv_191_191inline_191_191_scheme_cyclone_transforms = NULL;
object __glo_closure_91_125fv_scheme_cyclone_transforms = NULL;
object __glo_closure_91_125env_191_191inline_191_191_scheme_cyclone_transforms = NULL;
object __glo_closure_91_125env_scheme_cyclone_transforms = NULL;
object __glo_closure_91_125lam_191_191inline_191_191_scheme_cyclone_transforms = NULL;
object __glo_closure_91_125lam_scheme_cyclone_transforms = NULL;
object __glo_closure_127_scheme_cyclone_transforms = NULL;
object __glo_begin_91_125exps_191_191inline_191_191_scheme_cyclone_transforms = NULL;
object __glo_begin_91_125exps_scheme_cyclone_transforms = NULL;
object __glo_precompute_91prim_91app_127_scheme_cyclone_transforms = NULL;
object __glo_app_91_125args_191_191inline_191_191_scheme_cyclone_transforms = NULL;
object __glo_app_91_125args_scheme_cyclone_transforms = NULL;
object __glo_app_91_125fun_191_191inline_191_191_scheme_cyclone_transforms = NULL;
object __glo_app_91_125fun_scheme_cyclone_transforms = NULL;
object __glo_list_91_125pair_scheme_cyclone_transforms = NULL;
object __glo_list_91_125lambda_91formals_scheme_cyclone_transforms = NULL;
object __glo_lambda_91num_91args_scheme_cyclone_transforms = NULL;
object __glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms = NULL;
object __glo_ast_117lambda_91formals_91type_scheme_cyclone_transforms = NULL;
object __glo_letrec_91_125args_scheme_cyclone_transforms = NULL;
object __glo_letrec_91_125bound_91vars_scheme_cyclone_transforms = NULL;
object __glo_letrec_91_125exp_191_191inline_191_191_scheme_cyclone_transforms = NULL;
object __glo_letrec_91_125exp_scheme_cyclone_transforms = NULL;
object __glo_letrec_91_125bindings_191_191inline_191_191_scheme_cyclone_transforms = NULL;
object __glo_letrec_91_125bindings_scheme_cyclone_transforms = NULL;
object __glo_letrec_127_scheme_cyclone_transforms = NULL;
object __glo_let_91_125args_scheme_cyclone_transforms = NULL;
object __glo_let_91_125bound_91vars_scheme_cyclone_transforms = NULL;
object __glo_let_91_125exp_191_191inline_191_191_scheme_cyclone_transforms = NULL;
object __glo_let_91_125exp_scheme_cyclone_transforms = NULL;
object __glo_let_91_125bindings_191_191inline_191_191_scheme_cyclone_transforms = NULL;
object __glo_let_91_125bindings_scheme_cyclone_transforms = NULL;
object __glo_let_127_scheme_cyclone_transforms = NULL;
object __glo_assq_91remove_91keys_scheme_cyclone_transforms = NULL;
object __glo_assq_91remove_91key_scheme_cyclone_transforms = NULL;
object __glo_azip_scheme_cyclone_transforms = NULL;
object __glo_reduce_scheme_cyclone_transforms = NULL;
object __glo_difference_scheme_cyclone_transforms = NULL;
object __glo__union_scheme_cyclone_transforms = NULL;
object __glo_remove_scheme_cyclone_transforms = NULL;
object __glo_insert_scheme_cyclone_transforms = NULL;
object __glo_symbol_121_127_scheme_cyclone_transforms = NULL;
object __glo_symbol_121_127_191_191inline_191_191_scheme_cyclone_transforms = NULL;
object __glo_void_191_191inline_191_191_scheme_cyclone_transforms = NULL;
object __glo__void_scheme_cyclone_transforms = NULL;
object __glo_list_91index_scheme_cyclone_transforms = NULL;
object __glo_basename_scheme_cyclone_transforms = NULL;
object __glo_cyc_117error_scheme_cyclone_transforms = NULL;
object __glo_trace_117debug_scheme_cyclone_transforms = NULL;
object __glo_trace_117info_scheme_cyclone_transforms = NULL;
object __glo_trace_117warn_scheme_cyclone_transforms = NULL;
object __glo_trace_117error_scheme_cyclone_transforms = NULL;
object __glo_trace_scheme_cyclone_transforms = NULL;
object __glo__85trace_91level_85_scheme_cyclone_transforms = NULL;
object __glo__85do_91code_91gen_85_scheme_cyclone_transforms = NULL;
object __glo_built_91in_91syms_scheme_cyclone_transforms = NULL;
object __glo_validate_91keyword_91syntax_scheme_cyclone_transforms = NULL;
object __glo__85primitives_85_scheme_cyclone_transforms = NULL;
extern object __glo__85primitives_85_scheme_cyclone_primitives;
extern object __glo_member_scheme_base;
extern object __glo_assoc_scheme_base;
extern object __glo_cons_91source_scheme_base;
extern object __glo_syntax_91rules_scheme_base;
extern object __glo_letrec_85_scheme_base;
extern object __glo_guard_scheme_base;
extern object __glo_guard_91aux_scheme_base;
extern object __glo_define_91record_91type_scheme_base;
extern object __glo_record_127_scheme_base;
extern object __glo_is_91a_127_scheme_base;
extern object __glo_register_91simple_91type_scheme_base;
extern object __glo_make_91type_91predicate_scheme_base;
extern object __glo_make_91constructor_scheme_base;
extern object __glo_make_91constructor_95args_scheme_base;
extern object __glo_make_91getter_scheme_base;
extern object __glo_make_91setter_scheme_base;
extern object __glo_slot_91ref_scheme_base;
extern object __glo_slot_91set_67_scheme_base;
extern object __glo_type_91slot_91offset_scheme_base;
extern object __glo_make_91record_91marker_scheme_base;
extern object __glo_receive_scheme_base;
extern object __glo_abs_scheme_base;
extern object __glo_max_scheme_base;
extern object __glo_min_scheme_base;
extern object __glo_modulo_scheme_base;
extern object __glo_floor_91remainder_scheme_base;
extern object __glo_even_127_scheme_base;
extern object __glo_exact_91integer_127_scheme_base;
extern object __glo_exact_91integer_91sqrt_scheme_base;
extern object __glo_exact_127_scheme_base;
extern object __glo_inexact_127_scheme_base;
extern object __glo_odd_127_scheme_base;
extern object __glo_complex_127_scheme_base;
extern object __glo_rational_127_scheme_base;
extern object __glo_bignum_127_scheme_base;
extern object __glo_gcd_scheme_base;
extern object __glo_lcm_scheme_base;
extern object __glo_quotient_scheme_base;
extern object __glo_remainder_scheme_base;
extern object __glo_truncate_91quotient_scheme_base;
extern object __glo_truncate_91remainder_scheme_base;
extern object __glo_truncate_95_scheme_base;
extern object __glo_floor_91quotient_scheme_base;
extern object __glo_floor_91remainder_scheme_base;
extern object __glo_floor_95_scheme_base;
extern object __glo_square_scheme_base;
extern object __glo_expt_scheme_base;
extern object __glo_call_91with_91current_91continuation_scheme_base;
extern object __glo_call_95cc_scheme_base;
extern object __glo_call_91with_91values_scheme_base;
extern object __glo_dynamic_91wind_scheme_base;
extern object __glo_values_scheme_base;
extern object __glo_char_123_127_scheme_base;
extern object __glo_char_121_127_scheme_base;
extern object __glo_char_125_127_scheme_base;
extern object __glo_char_121_123_127_scheme_base;
extern object __glo_char_125_123_127_scheme_base;
extern object __glo_string_123_127_scheme_base;
extern object __glo_string_121_127_scheme_base;
extern object __glo_string_121_123_127_scheme_base;
extern object __glo_string_125_127_scheme_base;
extern object __glo_string_125_123_127_scheme_base;
extern object __glo_fast_91string_123_127_scheme_base;
extern object __glo_fast_91string_121_127_scheme_base;
extern object __glo_fast_91string_121_123_127_scheme_base;
extern object __glo_fast_91string_125_127_scheme_base;
extern object __glo_fast_91string_125_123_127_scheme_base;
extern object __glo_foldl_scheme_base;
extern object __glo_foldr_scheme_base;
extern object __glo_not_scheme_base;
extern object __glo_list_127_scheme_base;
extern object __glo_zero_127_scheme_base;
extern object __glo_positive_127_scheme_base;
extern object __glo_negative_127_scheme_base;
extern object __glo_append_scheme_base;
extern object __glo__list_scheme_base;
extern object __glo_make_91list_scheme_base;
extern object __glo_list_91copy_scheme_base;
extern object __glo_map_scheme_base;
extern object __glo_Cyc_91map_91loop_911_scheme_base;
extern object __glo_Cyc_91map_91loop_912_scheme_base;
extern object __glo_Cyc_91for_91each_91loop_911_scheme_base;
extern object __glo_Cyc_91for_91each_91loop_912_scheme_base;
extern object __glo_for_91each_scheme_base;
extern object __glo_list_91tail_scheme_base;
extern object __glo_list_91ref_scheme_base;
extern object __glo_list_91set_67_scheme_base;
extern object __glo_reverse_scheme_base;
extern object __glo_boolean_123_127_scheme_base;
extern object __glo_symbol_123_127_scheme_base;
extern object __glo_Cyc_91obj_123_127_scheme_base;
extern object __glo_vector_scheme_base;
extern object __glo_vector_91append_scheme_base;
extern object __glo_vector_91copy_scheme_base;
extern object __glo_vector_91copy_67_scheme_base;
extern object __glo_vector_91fill_67_scheme_base;
extern object __glo_vector_91_125list_scheme_base;
extern object __glo_vector_91_125string_scheme_base;
extern object __glo_vector_91map_scheme_base;
extern object __glo_vector_91for_91each_scheme_base;
extern object __glo_make_91string_scheme_base;
extern object __glo_string_scheme_base;
extern object __glo_string_91copy_scheme_base;
extern object __glo_string_91copy_67_scheme_base;
extern object __glo_string_91fill_67_scheme_base;
extern object __glo_string_91_125list_scheme_base;
extern object __glo_string_91_125vector_scheme_base;
extern object __glo_string_91map_scheme_base;
extern object __glo_string_91for_91each_scheme_base;
extern object __glo_make_91parameter_scheme_base;
extern object __glo_current_91output_91port_scheme_base;
extern object __glo_current_91input_91port_scheme_base;
extern object __glo_current_91error_91port_scheme_base;
extern object __glo_call_91with_91port_scheme_base;
extern object __glo_error_91object_127_scheme_base;
extern object __glo_error_91object_91message_scheme_base;
extern object __glo_error_91object_91irritants_scheme_base;
extern object __glo_error_95loc_scheme_base;
extern object __glo_error_scheme_base;
extern object __glo_raise_scheme_base;
extern object __glo_raise_91continuable_scheme_base;
extern object __glo_with_91handler_scheme_base;
extern object __glo_with_91exception_91handler_scheme_base;
extern object __glo_Cyc_91add_91exception_91handler_scheme_base;
extern object __glo_Cyc_91remove_91exception_91handler_scheme_base;
extern object __glo_newline_scheme_base;
extern object __glo_write_91char_scheme_base;
extern object __glo_write_91string_scheme_base;
extern object __glo_write_91string_911_scheme_base;
extern object __glo_write_91string_912_scheme_base;
extern object __glo_flush_91output_91port_scheme_base;
extern object __glo_char_91ready_127_scheme_base;
extern object __glo_peek_91char_scheme_base;
extern object __glo_read_91char_scheme_base;
extern object __glo_read_91line_scheme_base;
extern object __glo_read_91string_scheme_base;
extern object __glo_input_91port_127_scheme_base;
extern object __glo_output_91port_127_scheme_base;
extern object __glo_input_91port_91open_127_scheme_base;
extern object __glo_output_91port_91open_127_scheme_base;
extern object __glo_get_91output_91string_scheme_base;
extern object __glo_open_91output_91string_scheme_base;
extern object __glo_open_91input_91string_scheme_base;
extern object __glo_get_91output_91bytevector_scheme_base;
extern object __glo_open_91input_91bytevector_scheme_base;
extern object __glo_open_91output_91bytevector_scheme_base;
extern object __glo_features_scheme_base;
extern object __glo_Cyc_91add_91feature_67_scheme_base;
extern object __glo_Cyc_91version_scheme_base;
extern object __glo_any_scheme_base;
extern object __glo_every_scheme_base;
extern object __glo_and_scheme_base;
extern object __glo_or_scheme_base;
extern object __glo_let_scheme_base;
extern object __glo_let_85_scheme_base;
extern object __glo_letrec_scheme_base;
extern object __glo_let_85_91values_scheme_base;
extern object __glo_let_91values_scheme_base;
extern object __glo_define_91values_scheme_base;
extern object __glo_begin_scheme_base;
extern object __glo__case_scheme_base;
extern object __glo_cond_scheme_base;
extern object __glo_cond_91expand_scheme_base;
extern object __glo__do_scheme_base;
extern object __glo_when_scheme_base;
extern object __glo_unless_scheme_base;
extern object __glo_quasiquote_scheme_base;
extern object __glo_floor_scheme_base;
extern object __glo_ceiling_scheme_base;
extern object __glo_truncate_scheme_base;
extern object __glo_round_scheme_base;
extern object __glo_exact_scheme_base;
extern object __glo_inexact_scheme_base;
extern object __glo_eof_91object_scheme_base;
extern object __glo__void_scheme_cyclone_transforms;
extern object __glo_syntax_91error_scheme_base;
extern object __glo_bytevector_91copy_scheme_base;
extern object __glo_bytevector_91copy_67_scheme_base;
extern object __glo_utf8_91_125string_scheme_base;
extern object __glo_string_91_125utf8_scheme_base;
extern object __glo_denominator_scheme_base;
extern object __glo_numerator_scheme_base;
extern object __glo_parameterize_scheme_base;
extern object __glo_read_91bytevector_scheme_base;
extern object __glo_read_91bytevector_67_scheme_base;
extern object __glo_write_91bytevector_scheme_base;
extern object __glo_peek_91u8_scheme_base;
extern object __glo_read_91u8_scheme_base;
extern object __glo_write_91u8_scheme_base;
extern object __glo_binary_91port_127_scheme_base;
extern object __glo_textual_91port_127_scheme_base;
extern object __glo_rationalize_scheme_base;
extern object __glo_char_91alphabetic_127_scheme__char;
extern object __glo_char_91downcase_scheme__char;
extern object __glo_char_91foldcase_scheme__char;
extern object __glo_char_91lower_91case_127_scheme__char;
extern object __glo_char_91numeric_127_scheme__char;
extern object __glo_char_91upcase_scheme__char;
extern object __glo_char_91upper_91case_127_scheme__char;
extern object __glo_char_91whitespace_127_scheme__char;
extern object __glo_char_91ci_121_123_127_scheme__char;
extern object __glo_char_91ci_121_127_scheme__char;
extern object __glo_char_91ci_123_127_scheme__char;
extern object __glo_char_91ci_125_123_127_scheme__char;
extern object __glo_char_91ci_125_127_scheme__char;
extern object __glo_digit_91value_scheme__char;
extern object __glo_string_91upcase_scheme__char;
extern object __glo_string_91downcase_scheme__char;
extern object __glo_string_91foldcase_scheme__char;
extern object __glo_string_91ci_121_123_127_scheme__char;
extern object __glo_string_91ci_121_127_scheme__char;
extern object __glo_string_91ci_123_127_scheme__char;
extern object __glo_string_91ci_125_123_127_scheme__char;
extern object __glo_string_91ci_125_127_scheme__char;
extern object __glo_eval_scheme_eval;
extern object __glo_eval_91from_91c_scheme_eval;
extern object __glo_create_91environment_scheme_eval;
extern object __glo_setup_91environment_scheme_eval;
extern object __glo__75import_scheme_eval;
extern object __glo_imported_127_scheme_eval;
extern object __glo__75set_91import_91dirs_67_scheme_eval;
extern object __glo_import_91shared_91object_scheme_eval;
extern object __glo__85defined_91macros_85_scheme_eval;
extern object __glo_get_91macros_scheme_eval;
extern object __glo_macro_117macro_127_scheme_eval;
extern object __glo_macro_117expand_scheme_eval;
extern object __glo_macro_117add_67_scheme_eval;
extern object __glo_macro_117cleanup_scheme_eval;
extern object __glo_macro_117load_91env_67_scheme_eval;
extern object __glo_macro_117get_91env_scheme_eval;
extern object __glo_macro_117get_91defined_91macros_scheme_eval;
extern object __glo_expand_scheme_eval;
extern object __glo_expand_91lambda_91body_scheme_eval;
extern object __glo_call_91with_91input_91file_scheme_file;
extern object __glo_call_91with_91output_91file_scheme_file;
extern object __glo_with_91input_91from_91file_scheme_file;
extern object __glo_with_91output_91to_91file_scheme_file;
extern object __glo_read_scheme_read;
extern object __glo_read_91all_scheme_read;
extern object __glo_read_91all_95source_scheme_read;
extern object __glo_include_scheme_read;
extern object __glo_include_91ci_scheme_read;
extern object __glo_display_scheme_write;
extern object __glo_write_scheme_write;
extern object __glo_write_91shared_scheme_write;
extern object __glo_write_91simple_scheme_write;
extern object __glo_ast_117make_91lambda_scheme_cyclone_ast;
extern object __glo_ast_117_75make_91lambda_scheme_cyclone_ast;
extern object __glo_ast_117lambda_127_scheme_cyclone_ast;
extern object __glo_ast_117lambda_91id_scheme_cyclone_ast;
extern object __glo_ast_117lambda_91args_scheme_cyclone_ast;
extern object __glo_ast_117set_91lambda_91args_67_scheme_cyclone_ast;
extern object __glo_ast_117lambda_91body_scheme_cyclone_ast;
extern object __glo_ast_117set_91lambda_91body_67_scheme_cyclone_ast;
extern object __glo_ast_117lambda_91has_91cont_scheme_cyclone_ast;
extern object __glo_ast_117set_91lambda_91has_91cont_67_scheme_cyclone_ast;
extern object __glo_ast_117get_91next_91lambda_91id_67_scheme_cyclone_ast;
extern object __glo_ast_117reset_91lambda_91ids_67_scheme_cyclone_ast;
extern object __glo_ast_117ast_91_125pp_91sexp_scheme_cyclone_ast;
extern object __glo_ast_117ast_91_125sexp_scheme_cyclone_ast;
extern object __glo_ast_117sexp_91_125ast_scheme_cyclone_ast;
extern object __glo__85Cyc_91version_91banner_85_scheme_cyclone_common;
extern object __glo__85version_85_scheme_cyclone_common;
extern object __glo__85version_91number_85_scheme_cyclone_common;
extern object __glo__85version_91name_85_scheme_cyclone_common;
extern object __glo__85version_91banner_85_scheme_cyclone_common;
extern object __glo__85c_91file_91header_91comment_85_scheme_cyclone_common;
extern object __glo__85reader_91source_91db_85_scheme_cyclone_common;
extern object __glo_memloc_scheme_cyclone_common;
extern object __glo_library_127_scheme_cyclone_libraries;
extern object __glo_library_91exists_127_scheme_cyclone_libraries;
extern object __glo_lib_117list_91_125import_91set_scheme_cyclone_libraries;
extern object __glo_lib_117name_scheme_cyclone_libraries;
extern object __glo_lib_117name_91_125string_scheme_cyclone_libraries;
extern object __glo_lib_117name_91_125symbol_scheme_cyclone_libraries;
extern object __glo_lib_117name_91_125unique_91string_scheme_cyclone_libraries;
extern object __glo_lib_117result_scheme_cyclone_libraries;
extern object __glo_lib_117exports_scheme_cyclone_libraries;
extern object __glo_lib_117rename_91exports_scheme_cyclone_libraries;
extern object __glo_lib_117imports_scheme_cyclone_libraries;
extern object __glo_lib_117body_scheme_cyclone_libraries;
extern object __glo_lib_117cond_91expand_scheme_cyclone_libraries;
extern object __glo_lib_117cond_91expand_91decls_scheme_cyclone_libraries;
extern object __glo_lib_117includes_scheme_cyclone_libraries;
extern object __glo_lib_117include_91c_91headers_scheme_cyclone_libraries;
extern object __glo_lib_117inlines_scheme_cyclone_libraries;
extern object __glo_lib_117import_91set_117library_91name_127_scheme_cyclone_libraries;
extern object __glo_lib_117import_91set_91_125import_91set_scheme_cyclone_libraries;
extern object __glo_lib_117import_91_125library_91name_scheme_cyclone_libraries;
extern object __glo_lib_117import_91_125filename_scheme_cyclone_libraries;
extern object __glo_lib_117import_91_125metalist_scheme_cyclone_libraries;
extern object __glo_lib_117import_91_125path_scheme_cyclone_libraries;
extern object __glo_lib_117check_91system_91path_scheme_cyclone_libraries;
extern object __glo_lib_117read_91imports_scheme_cyclone_libraries;
extern object __glo_lib_117read_91includes_scheme_cyclone_libraries;
extern object __glo_lib_117import_91_125export_91list_scheme_cyclone_libraries;
extern object __glo_lib_117import_91set_95exports_91_125imports_scheme_cyclone_libraries;
extern object __glo_lib_117resolve_91meta_scheme_cyclone_libraries;
extern object __glo_lib_117get_91all_scheme_cyclone_libraries;
extern object __glo_lib_117get_91all_91import_91deps_scheme_cyclone_libraries;
extern object __glo_lib_117get_91dep_91list_scheme_cyclone_libraries;
extern object __glo_lib_117c_91linker_91options_scheme_cyclone_libraries;
extern object __glo_lib_117read_91c_91linker_91options_scheme_cyclone_libraries;
extern object __glo_lib_117get_91all_91c_91linker_91options_scheme_cyclone_libraries;
extern object __glo_lib_117c_91compiler_91options_scheme_cyclone_libraries;
extern object __glo_lib_117read_91c_91compiler_91options_scheme_cyclone_libraries;
extern object __glo_lib_117get_91all_91c_91compiler_91options_scheme_cyclone_libraries;
extern object __glo_lib_117imports_91_125idb_scheme_cyclone_libraries;
extern object __glo_lib_117idb_117ids_scheme_cyclone_libraries;
extern object __glo_lib_117idb_117lookup_scheme_cyclone_libraries;
extern object __glo_lib_117idb_117entry_91_125library_91name_scheme_cyclone_libraries;
extern object __glo_lib_117idb_117entry_91_125library_91id_scheme_cyclone_libraries;
extern object __glo_prim_127_scheme_cyclone_primitives;
extern object __glo__85primitives_85_scheme_cyclone_transforms;
extern object __glo__85primitives_91num_91args_85_scheme_cyclone_primitives;
extern object __glo_prim_91call_127_scheme_cyclone_primitives;
extern object __glo_prim_91_125c_91func_scheme_cyclone_primitives;
extern object __glo_prim_91_125c_91func_91uses_91alloca_127_scheme_cyclone_primitives;
extern object __glo_prim_95data_91arg_127_scheme_cyclone_primitives;
extern object __glo_prim_95c_91var_91pointer_scheme_cyclone_primitives;
extern object __glo_prim_95c_91var_91assign_scheme_cyclone_primitives;
extern object __glo_prim_95cvar_127_scheme_cyclone_primitives;
extern object __glo_prim_117inline_91convert_91prim_91call_scheme_cyclone_primitives;
extern object __glo_prim_117check_91arg_91count_scheme_cyclone_primitives;
extern object __glo_prim_117mutates_127_scheme_cyclone_primitives;
extern object __glo_prim_117cont_127_scheme_cyclone_primitives;
extern object __glo_prim_117cont_95no_91args_127_scheme_cyclone_primitives;
extern object __glo_prim_117arg_91count_127_scheme_cyclone_primitives;
extern object __glo_prim_117allocates_91object_127_scheme_cyclone_primitives;
extern object __glo_prim_117immutable_91args_95result_127_scheme_cyclone_primitives;
extern object __glo_prim_117udf_127_scheme_cyclone_primitives;
extern object __glo_prim_117add_91udf_67_scheme_cyclone_primitives;
extern object __glo_prim_117func_91_125prim_scheme_cyclone_primitives;
extern object __glo_pretty_91print_scheme_cyclone_pretty_91print;
extern object __glo_define_91syntax_127_scheme_cyclone_util;
extern object __glo_let_91syntax_127_scheme_cyclone_util;
extern object __glo_letrec_91syntax_127_scheme_cyclone_util;
extern object __glo_tagged_91list_127_scheme_cyclone_util;
extern object __glo_if_127_scheme_cyclone_util;
extern object __glo_if_91syntax_127_scheme_cyclone_util;
extern object __glo_begin_127_scheme_cyclone_util;
extern object __glo_lambda_127_scheme_cyclone_util;
extern object __glo_pair_91_125list_scheme_cyclone_util;
extern object __glo_define_91lambda_127_scheme_cyclone_util;
extern object __glo_define_91_125lambda_scheme_cyclone_util;
extern object __glo_formals_91_125list_scheme_cyclone_util;
extern object __glo_lambda_91formals_91_125list_scheme_cyclone_util;
extern object __glo_lambda_91varargs_127_scheme_cyclone_util;
extern object __glo_lambda_91_125formals_scheme_cyclone_util;
extern object __glo_lambda_91_125exp_scheme_cyclone_util;
extern object __glo_lambda_91formals_91type_scheme_cyclone_util;
extern object __glo_lambda_91varargs_91var_scheme_cyclone_util;
extern object __glo_pack_91lambda_91arguments_scheme_cyclone_util;
extern object __glo_if_91_125condition_scheme_cyclone_util;
extern object __glo_if_91_125then_scheme_cyclone_util;
extern object __glo_if_91else_127_scheme_cyclone_util;
extern object __glo_if_91_125else_scheme_cyclone_util;
extern object __glo_const_127_scheme_cyclone_util;
extern object __glo_ref_127_scheme_cyclone_util;
extern object __glo_quote_127_scheme_cyclone_util;
extern object __glo_define_91c_127_scheme_cyclone_util;
extern object __glo_set_67_127_scheme_cyclone_util;
extern object __glo_set_67_91_125var_scheme_cyclone_util;
extern object __glo_set_67_91_125exp_scheme_cyclone_util;
extern object __glo_define_127_scheme_cyclone_util;
extern object __glo_define_91_125var_scheme_cyclone_util;
extern object __glo_define_91_125exp_scheme_cyclone_util;
extern object __glo_app_127_scheme_cyclone_util;
extern object __glo_env_117enclosing_91environment_scheme_cyclone_util;
extern object __glo_env_117first_91frame_scheme_cyclone_util;
extern object __glo_env_117the_91empty_91environment_scheme_cyclone_util;
extern object __glo_env_117make_91frame_scheme_cyclone_util;
extern object __glo_env_117frame_91variables_scheme_cyclone_util;
extern object __glo_env_117frame_91values_scheme_cyclone_util;
extern object __glo_env_117add_91binding_91to_91frame_67_scheme_cyclone_util;
extern object __glo_env_117all_91variables_scheme_cyclone_util;
extern object __glo_env_117all_91values_scheme_cyclone_util;
extern object __glo_env_117extend_91environment_scheme_cyclone_util;
extern object __glo_env_117lookup_scheme_cyclone_util;
extern object __glo_env_117lookup_91variable_91value_scheme_cyclone_util;
extern object __glo_env_117_191lookup_91variable_91value_scheme_cyclone_util;
extern object __glo_env_117set_91variable_91value_67_scheme_cyclone_util;
extern object __glo_env_117define_91variable_67_scheme_cyclone_util;
extern object __glo_make_91syntactic_91closure_scheme_cyclone_util;
extern object __glo_strip_91syntactic_91closures_scheme_cyclone_util;
extern object __glo_identifier_91_125symbol_scheme_cyclone_util;
extern object __glo_identifier_127_scheme_cyclone_util;
extern object __glo_identifier_123_127_scheme_cyclone_util;
extern object __glo_Cyc_91er_91rename_scheme_cyclone_util;
extern object __glo_Cyc_91er_91compare_127_scheme_cyclone_util;
extern object __glo_mangle_scheme_cyclone_util;
extern object __glo_mangle_91global_scheme_cyclone_util;
extern object __glo_define_91c_91inline_127_scheme_cyclone_util;
extern object __glo_define_91c_91_125inline_91var_scheme_cyclone_util;
extern object __glo_Cyc_91set_91immutable_67_scheme_cyclone_util;
extern object __glo_string_91join_scheme_cyclone_util;
extern object __glo_string_91split_scheme_cyclone_util;
extern object __glo_gensym_scheme_cyclone_util;
extern object __glo_delete_scheme_cyclone_util;
extern object __glo_delete_91duplicates_scheme_cyclone_util;
extern object __glo_flatten_scheme_cyclone_util;
extern object __glo_length_95obj_scheme_cyclone_util;
extern object __glo_list_91index2_scheme_cyclone_util;
extern object __glo_list_91insert_91at_67_scheme_cyclone_util;
extern object __glo_list_91prefix_127_scheme_cyclone_util;
extern object __glo_string_91replace_91all_scheme_cyclone_util;
extern object __glo_take_scheme_cyclone_util;
extern object __glo_drop_scheme_cyclone_util;
extern object __glo_filter_scheme_cyclone_util;
extern object __glo_current_91expand_91filepath_scheme_cyclone_util;
extern object __glo_make_91hash_91table_srfi_69;
extern object __glo_hash_91table_127_srfi_69;
extern object __glo_alist_91_125hash_91table_srfi_69;
extern object __glo_hash_91table_91equivalence_91function_srfi_69;
extern object __glo_hash_91table_91hash_91function_srfi_69;
extern object __glo_hash_91table_91ref_srfi_69;
extern object __glo_hash_91table_91ref_95default_srfi_69;
extern object __glo_hash_91table_91set_67_srfi_69;
extern object __glo_hash_91table_91delete_67_srfi_69;
extern object __glo_hash_91table_91exists_127_srfi_69;
extern object __glo_hash_91table_91update_67_srfi_69;
extern object __glo_hash_91table_91update_67_95default_srfi_69;
extern object __glo_hash_91table_91size_srfi_69;
extern object __glo_hash_91table_91keys_srfi_69;
extern object __glo_hash_91table_91values_srfi_69;
extern object __glo_hash_91table_91walk_srfi_69;
extern object __glo_hash_91table_91fold_srfi_69;
extern object __glo_hash_91table_91_125alist_srfi_69;
extern object __glo_hash_91table_91copy_srfi_69;
extern object __glo_hash_91table_91merge_67_srfi_69;
extern object __glo_hash_srfi_69;
extern object __glo_string_91hash_srfi_69;
extern object __glo_string_91ci_91hash_srfi_69;
extern object __glo_hash_91by_91identity_srfi_69;
extern object __glo_Cyc_91memoize_srfi_69;
extern object __glo_fast_91string_123_127_191_191inline_191_191_scheme_base;
extern object __glo_fast_91string_121_127_191_191inline_191_191_scheme_base;
extern object __glo_fast_91string_121_123_127_191_191inline_191_191_scheme_base;
extern object __glo_fast_91string_125_127_191_191inline_191_191_scheme_base;
extern object __glo_fast_91string_125_123_127_191_191inline_191_191_scheme_base;
extern object __glo__75write_91bytevector_191_191inline_191_191_scheme_base;
extern object __glo_not_191_191inline_191_191_scheme_base;
extern object __glo_list_127_191_191inline_191_191_scheme_base;
extern object __glo_zero_127_191_191inline_191_191_scheme_base;
extern object __glo_positive_127_191_191inline_191_191_scheme_base;
extern object __glo_negative_127_191_191inline_191_191_scheme_base;
extern object __glo_floor_191_191inline_191_191_scheme_base;
extern object __glo_ceiling_191_191inline_191_191_scheme_base;
extern object __glo_truncate_191_191inline_191_191_scheme_base;
extern object __glo_round_191_191inline_191_191_scheme_base;
extern object __glo_exact_191_191inline_191_191_scheme_base;
extern object __glo_inexact_191_191inline_191_191_scheme_base;
extern object __glo_sqrt_191_191inline_191_191_scheme_base;
extern object __glo_exact_91integer_127_191_191inline_191_191_scheme_base;
extern object __glo_exact_127_191_191inline_191_191_scheme_base;
extern object __glo_complex_127_191_191inline_191_191_scheme_base;
extern object __glo_fixnum_127_191_191inline_191_191_scheme_base;
extern object __glo_quotient_191_191inline_191_191_scheme_base;
extern object __glo_square_191_191inline_191_191_scheme_base;
extern object __glo_eof_91object_191_191inline_191_191_scheme_base;
extern object __glo_make_91record_91marker_191_191inline_191_191_scheme_base;
extern object __glo_variable_127_191_191inline_191_191_scheme_eval;
extern object __glo_assignment_91variable_191_191inline_191_191_scheme_eval;
extern object __glo_assignment_91value_191_191inline_191_191_scheme_eval;
extern object __glo_definition_91variable_191_191inline_191_191_scheme_eval;
extern object __glo_lambda_91parameters_191_191inline_191_191_scheme_eval;
extern object __glo_lambda_91body_191_191inline_191_191_scheme_eval;
extern object __glo_if_91predicate_191_191inline_191_191_scheme_eval;
extern object __glo_if_91consequent_191_191inline_191_191_scheme_eval;
extern object __glo_if_91alternative_191_191inline_191_191_scheme_eval;
extern object __glo_application_127_191_191inline_191_191_scheme_eval;
extern object __glo_operator_191_191inline_191_191_scheme_eval;
extern object __glo_operands_191_191inline_191_191_scheme_eval;
extern object __glo_procedure_91parameters_191_191inline_191_191_scheme_eval;
extern object __glo_procedure_91body_191_191inline_191_191_scheme_eval;
extern object __glo_procedure_91environment_191_191inline_191_191_scheme_eval;
extern object __glo_primitive_91implementation_191_191inline_191_191_scheme_eval;
extern object __glo_macro_117macro_127_191_191inline_191_191_scheme_eval;
extern object __glo_Cyc_91opaque_91eq_127_191_191inline_191_191_scheme_read;
extern object __glo_Cyc_91opaque_91unsafe_91eq_127_191_191inline_191_191_scheme_read;
extern object __glo_Cyc_91opaque_91unsafe_91string_127_191_191inline_191_191_scheme_read;
extern object __glo_Cyc_91opaque_91_125string_191_191inline_191_191_scheme_read;
extern object __glo_lib_117import_91set_91_125import_91set_191_191inline_191_191_scheme_cyclone_libraries;
extern object __glo_lib_117idb_117entry_91_125library_91name_191_191inline_191_191_scheme_cyclone_libraries;
extern object __glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_if_91_125condition_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_if_91_125then_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_if_91_125else_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_app_127_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_ref_127_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_set_67_91_125var_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_set_67_91_125exp_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_define_91_125exp_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_lambda_91_125formals_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_lambda_91_125exp_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_env_117enclosing_91environment_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_env_117first_91frame_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_env_117frame_91variables_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_env_117frame_91values_191_191inline_191_191_scheme_cyclone_util;
extern object __glo_symbol_91hash_191_191inline_191_191_srfi_69;
#include "cyclone/runtime.h"
defsymbol(_85prim_91args_91table_85);
defsymbol(k);
defsymbol(r);
defsymbol(unused);
defsymbol(fast_91string_123_127);
defsymbol(string_123_127);
defsymbol(fast_91string_121_127);
defsymbol(string_121_127);
defsymbol(fast_91string_121_123_127);
defsymbol(string_121_123_127);
defsymbol(fast_91string_125_127);
defsymbol(string_125_127);
defsymbol(fast_91string_125_123_127);
defsymbol(string_125_123_127);
defsymbol(write_91string_912);
defsymbol(write_91string_911);
defsymbol(write_91string);
defsymbol(Cyc_91map_91loop_912);
defsymbol(Cyc_91map_91loop_911);
defsymbol(map);
defsymbol(Cyc_91for_91each_91loop_912);
defsymbol(Cyc_91for_91each_91loop_911);
defsymbol(for_91each);
defsymbol(Cyc_91fast_91list_914);
defsymbol(Cyc_91fast_91list_913);
defsymbol(Cyc_91fast_91list_912);
defsymbol(Cyc_91fast_91list_911);
defsymbol(_list);
defsymbol(Cyc_91fast_91vector_915);
defsymbol(Cyc_91fast_91vector_914);
defsymbol(Cyc_91fast_91vector_913);
defsymbol(Cyc_91fast_91vector_912);
defsymbol(vector);
defsymbol(Cyc_91fast_91assoc);
defsymbol(assoc);
defsymbol(Cyc_91fast_91member);
defsymbol(member);
defsymbol(_85);
defsymbol(_87);
defsymbol(_121_123);
defsymbol(_125_123);
defsymbol(_121);
defsymbol(_125);
defsymbol(_123);
defsymbol(symbol_127);
defsymbol(string_127);
defsymbol(vector_127);
defsymbol(Cyc_91macro_127);
defsymbol(procedure_127);
defsymbol(port_127);
defsymbol(pair_127);
defsymbol(integer_127);
defsymbol(real_127);
defsymbol(number_127);
defsymbol(null_127);
defsymbol(eof_91object_127);
defsymbol(char_127);
defsymbol(boolean_127);
defsymbol(equal_127);
defsymbol(eqv_127);
defsymbol(eq_127);
defsymbol(Cyc_91fast_91char_91lte);
defsymbol(Cyc_91fast_91char_91gte);
defsymbol(Cyc_91fast_91char_91lt);
defsymbol(Cyc_91fast_91char_91gt);
defsymbol(Cyc_91fast_91char_91eq);
defsymbol(Cyc_91fast_91lte);
defsymbol(Cyc_91fast_91gte);
defsymbol(Cyc_91fast_91lt);
defsymbol(Cyc_91fast_91gt);
defsymbol(Cyc_91fast_91eq);
defsymbol(not);
defsymbol(Cyc_91seq);
defsymbol(quote);
defsymbol(wrap_91mutables);
defsymbol(in);
defsymbol(mutable_91variables);
defsymbol(begin);
defsymbol(env_91get);
defsymbol(env_91make);
defsymbol(closure);
defsymbol(Cyc_91display);
defsymbol(Cyc_91write);
defsymbol(Cyc_91write_91char);
defsymbol(Cyc_91read_91line);
defsymbol(peek_91char);
defsymbol(read_91char);
defsymbol(delete_91file);
defsymbol(file_91exists_127);
defsymbol(Cyc_91flush_91output_91port);
defsymbol(close_91output_91port);
defsymbol(close_91input_91port);
defsymbol(close_91port);
defsymbol(open_91output_91file);
defsymbol(open_91input_91file);
defsymbol(Cyc_91stderr);
defsymbol(Cyc_91stdin);
defsymbol(Cyc_91stdout);
defsymbol(make_91vector);
defsymbol(make_91bytevector);
defsymbol(string_91_125symbol);
defsymbol(string_91set_67);
defsymbol(set_91cdr_67);
defsymbol(set_91car_67);
defsymbol(cons);
defsymbol(cell);
defsymbol(set_91cell_67);
defsymbol(set_91global_91unsafe_67);
defsymbol(set_91global_67);
defsymbol(cell_91get);
defsymbol(Cyc_91current_91exception_91handler);
defsymbol(Cyc_91default_91exception_91handler);
defsymbol(Cyc_91compilation_91environment);
defsymbol(Cyc_91installation_91dir);
defsymbol(command_91line_91arguments);
defsymbol(system);
defsymbol(exit);
defsymbol(_75halt);
defsymbol(apply);
defsymbol(Cyc_91end_91thread_67);
defsymbol(Cyc_91spawn_91thread_67);
defsymbol(Cyc_91opaque_127);
defsymbol(Cyc_91cvar_127);
defsymbol(Cyc_91set_91cvar_67);
defsymbol(Cyc_91get_91cvar);
defsymbol(Cyc_91global_91vars);
defsymbol(type);
defsymbol(Unexpected);
defsymbol(varargs);
defsymbol(_for);
defsymbol(args);
defsymbol(many);
defsymbol(Too);
defsymbol(args_117fixed);
defsymbol(args_117fixed_91with_91varargs);
defsymbol(args_117varargs);
defsymbol(letrec);
defsymbol(call_95cc);
defsymbol(let);
defsymbol(set_67);
defsymbol(define);
defsymbol(_if);
defsymbol(lambda);
static void __lambda_776(void *data, object clo, int argc, object *args) ;/*closure _,object k_732832*/
static void __lambda_777(void *data, object clo, int argc, object *args) ;/*object self_733786, object r_732836*/
static void __lambda_778(void *data, object clo, int argc, object *args) ;/*object self_733787, object r_732837*/
static void __lambda_661(void *data, object clo, int argc, object *args) ;/*closure _,object k_732605, object ast_73781_731215*/
static void __lambda_662(void *data, object clo, int argc, object *args) ;/*object self_733667, object cps_731221, object cps_91list_731222, object cps_91seq_731223, object remove_91unused_731224*/
static void __lambda_808(void *data, object clo, int argc, object *args) ;/*object self_733668, object cps_731221*/
static void __lambda_807(void *data, object clo, int argc, object *args) ;/*object self_733669, object cps_91list_731222*/
static void __lambda_806(void *data, object clo, int argc, object *args) ;/*object self_733670, object cps_91seq_731223*/
static void __lambda_805(void *data, object clo, int argc, object *args) ;/*object self_733671, object remove_91unused_731224*/
static void __lambda_696(void *data, object clo, int argc, object *args) ;/*object self_733672, object k_732671, object ast_73782_731229, object cont_91ast_73783_731230*/
static void __lambda_697(void *data, object clo, int argc, object *args) ;/*object self_733673, object r_732672*/
static void __lambda_698(void *data, object clo, int argc, object *args) ;/*object self_733674, object r_732673*/
static void __lambda_699(void *data, object clo, int argc, object *args) ;/*object self_733675, object r_732674*/
static void __lambda_700(void *data, object clo, int argc, object *args) ;/*object self_733676, object r_732675*/
static void __lambda_703(void *data, object clo, int argc, object *args) ;/*object self_733679, object r_732683*/
static void __lambda_714(void *data, object clo, int argc, object *args) ;/*object self_733690, object r_732703*/
static void __lambda_720(void *data, object clo, int argc, object *args) ;/*object self_733696, object r_732715*/
static void __lambda_735(void *data, object clo, int argc, object *args) ;/*object self_733708, object r_732730*/
static void __lambda_751(void *data, object clo, int argc, object *args) ;/*object self_733721, object r_732764*/
static void __lambda_752(void *data, object clo, int argc, object *args) ;/*object self_733722, object r_732779*/
static void __lambda_756(void *data, object clo, int argc, object *args) ;/*object self_733723, object r_732780*/
static void __lambda_757(void *data, object clo, int argc, object *args) ;/*object self_733724, object fn_73864_731249_732994*/
static void __lambda_758(void *data, object clo, int argc, object *args) ;/*object self_733725, object r_732782_732995*/
static void __lambda_775(void *data, object clo, int argc, object *args) ;/*object self_733741, object k_732809_733020, object args_73880_731254_733021*/
static void __lambda_774(void *data, object clo, int argc, object *args) ;/*object self_733742, object r_732808_733019*/
static void __lambda_759(void *data, object clo, int argc, object *args) ;/*object self_733726, object r_732783_732996*/
static void __lambda_760(void *data, object clo, int argc, object *args) ;/*object self_733727, object r_732785_732998_733023*/
static void __lambda_761(void *data, object clo, int argc, object *args) ;/*object self_733728, object lam_91min_91num_91args_73868_731250_732999_733024, object num_91args_73869_731251_733000_733025, object ltype_73870_731252_733001_733026*/
static void __lambda_769(void *data, object clo, int argc, object *args) ;/*object self_733729, object r_732786_733011_733036*/
static void __lambda_771(void *data, object clo, int argc, object *args) ;/*object self_733730, object k_732789_733014_733039_733046, object vals_73878_731253_733015_733040_733047*/
static void __lambda_772(void *data, object clo, int argc, object *args) ;/*object self_733731, object r_732793_733016_733041_733048*/
static void __lambda_773(void *data, object clo, int argc, object *args) ;/*object self_733732, object r_732790_733018_733043_733050*/
static void __lambda_770(void *data, object clo, int argc, object *args) ;/*object self_733733, object r_732788_733013_733038_733045*/
static void __lambda_762(void *data, object clo, int argc, object *args) ;/*object self_733734, object k_732795_733002_733027*/
static void __lambda_766(void *data, object clo, int argc, object *args) ;/*object self_733738, object r_732802_733008_733033*/
static void __lambda_767(void *data, object clo, int argc, object *args) ;/*object self_733739, object r_732803_733009_733034*/
static void __lambda_768(void *data, object clo, int argc, object *args) ;/*object self_733740, object r_732801_733010_733035*/
static void __lambda_763(void *data, object clo, int argc, object *args) ;/*object self_733735, object r_732798_733003_733028*/
static void __lambda_764(void *data, object clo, int argc, object *args) ;/*object self_733736, object r_732799_733004_733029*/
static void __lambda_765(void *data, object clo, int argc, object *args) ;/*object self_733737, object r_732797_733005_733030*/
static void __lambda_753(void *data, object clo, int argc, object *args) ;/*object self_733743, object k_732813*/
static void __lambda_754(void *data, object clo, int argc, object *args) ;/*object self_733744, object r_732815*/
static void __lambda_755(void *data, object clo, int argc, object *args) ;/*object self_733745, object r_732814*/
static void __lambda_748(void *data, object clo, int argc, object *args) ;/*object self_733746, object k_732816*/
static void __lambda_749(void *data, object clo, int argc, object *args) ;/*object self_733747, object r_732818_732988*/
static void __lambda_750(void *data, object clo, int argc, object *args) ;/*object self_733748, object r_732820_732990_732992*/
static void __lambda_736(void *data, object clo, int argc, object *args) ;/*object self_733709, object r_732752_732930*/
static void __lambda_737(void *data, object clo, int argc, object *args) ;/*object self_733710, object r_732754_732933_732950_732966*/
static void __lambda_738(void *data, object clo, int argc, object *args) ;/*object self_733711, object lam_91min_91num_91args_73824_731239_732934_732951_732967, object num_91args_73825_731240_732935_732952_732968, object ltype_73826_731241_732936_732953_732969*/
static void __lambda_743(void *data, object clo, int argc, object *args) ;/*object self_733712, object r_732731_732942_732959_732975*/
static void __lambda_744(void *data, object clo, int argc, object *args) ;/*object self_733713, object formals_91lis_73838_731244_732944_732961_732977_732983*/
static void __lambda_745(void *data, object clo, int argc, object *args) ;/*object self_733714, object req_91args_73844_731246_732945_732962_732978_732984*/
static void __lambda_746(void *data, object clo, int argc, object *args) ;/*object self_733715, object opt_91args_73847_731247_732946_732963_732979_732985*/
static void __lambda_747(void *data, object clo, int argc, object *args) ;/*object self_733716, object r_732740_732947_732964_732980_732986*/
static void __lambda_739(void *data, object clo, int argc, object *args) ;/*object self_733717, object k_732755_732937_732954_732970*/
static void __lambda_740(void *data, object clo, int argc, object *args) ;/*object self_733718, object r_732759_732938_732955_732971*/
static void __lambda_741(void *data, object clo, int argc, object *args) ;/*object self_733719, object r_732760_732939_732956_732972*/
static void __lambda_742(void *data, object clo, int argc, object *args) ;/*object self_733720, object r_732757_732940_732957_732973*/
static void __lambda_732(void *data, object clo, int argc, object *args) ;/*object self_733749, object k_732823*/
static void __lambda_733(void *data, object clo, int argc, object *args) ;/*object self_733750, object r_732825_732924*/
static void __lambda_734(void *data, object clo, int argc, object *args) ;/*object self_733751, object r_732827_732926_732928*/
static void __lambda_721(void *data, object clo, int argc, object *args) ;/*object self_733697, object r_732716*/
static void __lambda_722(void *data, object clo, int argc, object *args) ;/*object self_733698, object r_732717*/
static void __lambda_723(void *data, object clo, int argc, object *args) ;/*object self_733699, object k_73817_731237, object ltype_73818_731238*/
static void __lambda_724(void *data, object clo, int argc, object *args) ;/*object self_733700, object r_732723*/
static void __lambda_727(void *data, object clo, int argc, object *args) ;/*object self_733701, object r_732724*/
static void __lambda_728(void *data, object clo, int argc, object *args) ;/*object self_733702, object r_732719*/
static void __lambda_729(void *data, object clo, int argc, object *args) ;/*object self_733703, object r_732721*/
static void __lambda_730(void *data, object clo, int argc, object *args) ;/*object self_733704, object r_732720*/
static void __lambda_731(void *data, object clo, int argc, object *args) ;/*object self_733705, object r_732718*/
static void __lambda_725(void *data, object clo, int argc, object *args) ;/*object self_733706, object k_732725*/
static void __lambda_726(void *data, object clo, int argc, object *args) ;/*object self_733707, object r_732726*/
static void __lambda_715(void *data, object clo, int argc, object *args) ;/*object self_733691, object r_732712*/
static void __lambda_716(void *data, object clo, int argc, object *args) ;/*object self_733692, object r_732704*/
static void __lambda_717(void *data, object clo, int argc, object *args) ;/*object self_733693, object r_732705*/
static void __lambda_719(void *data, object clo, int argc, object *args) ;/*object self_733694, object k_732707, object args_73810_731236*/
static void __lambda_718(void *data, object clo, int argc, object *args) ;/*object self_733695, object r_732706*/
static void __lambda_709(void *data, object clo, int argc, object *args) ;/*object self_733680, object k_732692, object cont_91ast_73805_731234*/
static void __lambda_711(void *data, object clo, int argc, object *args) ;/*object self_733681, object k_732695, object test_73806_731235*/
static void __lambda_712(void *data, object clo, int argc, object *args) ;/*object self_733682, object r_732698*/
static void __lambda_713(void *data, object clo, int argc, object *args) ;/*object self_733683, object r_732699*/
static void __lambda_710(void *data, object clo, int argc, object *args) ;/*object self_733684, object r_732694*/
static void __lambda_704(void *data, object clo, int argc, object *args) ;/*object self_733685, object xform_73803_731232*/
static void __lambda_705(void *data, object clo, int argc, object *args) ;/*object self_733686, object r_732685*/
static void __lambda_706(void *data, object clo, int argc, object *args) ;/*object self_733687, object k_73804_731233*/
static void __lambda_707(void *data, object clo, int argc, object *args) ;/*object self_733688, object r_732690*/
static void __lambda_708(void *data, object clo, int argc, object *args) ;/*object self_733689, object r_732687*/
static void __lambda_702(void *data, object clo, int argc, object *args) ;/*object self_733677, object k_732678, object val_73796_731231*/
static void __lambda_701(void *data, object clo, int argc, object *args) ;/*object self_733678, object r_732677*/
static void __lambda_663(void *data, object clo, int argc, object *args) ;/*object self_733752, object r_732670*/
static void __lambda_664(void *data, object clo, int argc, object *args) ;/*object self_733753, object r_732606*/
static void __lambda_684(void *data, object clo, int argc, object *args) ;/*object self_733754, object k_732647, object asts_73882_731255, object inner_73883_731256*/
static void __lambda_685(void *data, object clo, int argc, object *args) ;/*object self_733755, object body_731257*/
static void __lambda_804(void *data, object clo, int argc, object *args) ;/*object self_733756, object body_731257*/
static void __lambda_693(void *data, object clo, int argc, object *args) ;/*object self_733757, object k_732665, object x_73884_731258*/
static void __lambda_695(void *data, object clo, int argc, object *args) ;/*object self_733758, object k_732668, object new_91asts_73885_731259*/
static void __lambda_694(void *data, object clo, int argc, object *args) ;/*object self_733759, object r_732667*/
static void __lambda_686(void *data, object clo, int argc, object *args) ;/*object self_733760, object r_732664*/
static void __lambda_687(void *data, object clo, int argc, object *args) ;/*object self_733761, object r_732648*/
static void __lambda_688(void *data, object clo, int argc, object *args) ;/*object self_733762, object tmp_73893_73895_731260*/
static void __lambda_689(void *data, object clo, int argc, object *args) ;/*object self_733763, object r_73897_731261*/
static void __lambda_690(void *data, object clo, int argc, object *args) ;/*object self_733764, object r_732656*/
static void __lambda_691(void *data, object clo, int argc, object *args) ;/*object self_733765, object r_732658*/
static void __lambda_692(void *data, object clo, int argc, object *args) ;/*object self_733766, object r_732655*/
static void __lambda_665(void *data, object clo, int argc, object *args) ;/*object self_733767, object r_732646*/
static void __lambda_666(void *data, object clo, int argc, object *args) ;/*object self_733768, object r_732607*/
static void __lambda_680(void *data, object clo, int argc, object *args) ;/*object self_733769, object k_732633, object asts_73898_731262, object cont_91ast_73899_731263*/
static void __lambda_681(void *data, object clo, int argc, object *args) ;/*object self_733770, object r_73907_731264*/
static void __lambda_682(void *data, object clo, int argc, object *args) ;/*object self_733771, object r_732642*/
static void __lambda_683(void *data, object clo, int argc, object *args) ;/*object self_733772, object r_732639*/
static void __lambda_667(void *data, object clo, int argc, object *args) ;/*object self_733773, object r_732632*/
static void __lambda_668(void *data, object clo, int argc, object *args) ;/*object self_733774, object r_732608*/
static void __lambda_679(void *data, object clo, int argc, object *args) ;/*object self_733775, object k_732628, object ast_73908_731265*/
static void __lambda_669(void *data, object clo, int argc, object *args) ;/*object self_733776, object r_732627*/
static void __lambda_670(void *data, object clo, int argc, object *args) ;/*object self_733777, object r_732609*/
static void __lambda_671(void *data, object clo, int argc, object *args) ;/*object self_733778, object global_91def_127_73911_731266*/
static void __lambda_678(void *data, object clo, int argc, object *args) ;/*object self_733779, object ast_91cps_73914_731267*/
static void __lambda_672(void *data, object clo, int argc, object *args) ;/*object self_733780, object k_732612*/
static void __lambda_677(void *data, object clo, int argc, object *args) ;/*object self_733785, object r_732625*/
static void __lambda_673(void *data, object clo, int argc, object *args) ;/*object self_733781, object r_732616*/
static void __lambda_674(void *data, object clo, int argc, object *args) ;/*object self_733782, object r_732618*/
static void __lambda_675(void *data, object clo, int argc, object *args) ;/*object self_733783, object r_732619*/
static void __lambda_676(void *data, object clo, int argc, object *args) ;/*object self_733784, object r_732617*/
static void __lambda_629(void *data, object clo, int argc, object *args) ;/*closure _,object k_732547, object expr_73717_731205*/
static void __lambda_630(void *data, object clo, int argc, object *args) ;/*object self_733635, object conv_731207*/
static void __lambda_803(void *data, object clo, int argc, object *args) ;/*object self_733636, object conv_731207*/
static void __lambda_633(void *data, object clo, int argc, object *args) ;/*object self_733637, object k_732550, object ast_73718_731209*/
static void __lambda_634(void *data, object clo, int argc, object *args) ;/*object self_733638, object r_732551*/
static void __lambda_635(void *data, object clo, int argc, object *args) ;/*object self_733639, object r_732552*/
static void __lambda_636(void *data, object clo, int argc, object *args) ;/*object self_733640, object r_732553*/
static void __lambda_637(void *data, object clo, int argc, object *args) ;/*object self_733641, object r_732554*/
static void __lambda_639(void *data, object clo, int argc, object *args) ;/*object self_733643, object r_732560*/
static void __lambda_643(void *data, object clo, int argc, object *args) ;/*object self_733647, object r_732566*/
static void __lambda_647(void *data, object clo, int argc, object *args) ;/*object self_733651, object r_732572*/
static void __lambda_651(void *data, object clo, int argc, object *args) ;/*object self_733655, object r_732584*/
static void __lambda_657(void *data, object clo, int argc, object *args) ;/*object self_733661, object r_732592*/
static void __lambda_658(void *data, object clo, int argc, object *args) ;/*object self_733662, object r_732600*/
static void __lambda_659(void *data, object clo, int argc, object *args) ;/*object self_733663, object r_732594*/
static void __lambda_660(void *data, object clo, int argc, object *args) ;/*object self_733664, object r_732595*/
static void __lambda_652(void *data, object clo, int argc, object *args) ;/*object self_733656, object args_73759_731212*/
static void __lambda_653(void *data, object clo, int argc, object *args) ;/*object self_733657, object ltype_73762_731213*/
static void __lambda_654(void *data, object clo, int argc, object *args) ;/*object self_733658, object r_732590*/
static void __lambda_655(void *data, object clo, int argc, object *args) ;/*object self_733659, object r_732591*/
static void __lambda_656(void *data, object clo, int argc, object *args) ;/*object self_733660, object r_732589*/
static void __lambda_648(void *data, object clo, int argc, object *args) ;/*object self_733652, object r_732575*/
static void __lambda_649(void *data, object clo, int argc, object *args) ;/*object self_733653, object r_732577*/
static void __lambda_650(void *data, object clo, int argc, object *args) ;/*object self_733654, object r_732579*/
static void __lambda_646(void *data, object clo, int argc, object *args) ;/*object self_733648, object k_732571, object a_73747_731211*/
static void __lambda_644(void *data, object clo, int argc, object *args) ;/*object self_733649, object r_732569*/
static void __lambda_645(void *data, object clo, int argc, object *args) ;/*object self_733650, object r_732568*/
static void __lambda_642(void *data, object clo, int argc, object *args) ;/*object self_733644, object k_732565, object a_73740_731210*/
static void __lambda_640(void *data, object clo, int argc, object *args) ;/*object self_733645, object r_732563*/
static void __lambda_641(void *data, object clo, int argc, object *args) ;/*object self_733646, object r_732562*/
static void __lambda_638(void *data, object clo, int argc, object *args) ;/*object self_733642, object r_732558*/
static void __lambda_631(void *data, object clo, int argc, object *args) ;/*object self_733665, object r_732549*/
static void __lambda_632(void *data, object clo, int argc, object *args) ;/*object self_733666, object r_732548*/
static void __lambda_368(void *data, object clo, int argc, object *args) ;/*closure _,object k_732068, object ast_73423_731119, object globals_73424_731120, object return_91unbound_73425_731121*/
static void __lambda_369(void *data, object clo, int argc, object *args) ;/*object self_733370, object convert_731127, object find_91defined_91vars_731128, object initialize_91defined_91vars_731129, object initialize_91top_91level_91vars_731130, object make_91a_91lookup_731131*/
static void __lambda_802(void *data, object clo, int argc, object *args) ;/*object self_733371, object convert_731127*/
static void __lambda_801(void *data, object clo, int argc, object *args) ;/*object self_733372, object find_91defined_91vars_731128*/
static void __lambda_800(void *data, object clo, int argc, object *args) ;/*object self_733373, object initialize_91defined_91vars_731129*/
static void __lambda_799(void *data, object clo, int argc, object *args) ;/*object self_733374, object initialize_91top_91level_91vars_731130*/
static void __lambda_798(void *data, object clo, int argc, object *args) ;/*object self_733375, object make_91a_91lookup_731131*/
static void __lambda_622(void *data, object clo, int argc, object *args) ;/*object self_733376, object k_732534, object ast_73426_731137, object fv_73427_731138*/
static void __lambda_623(void *data, object clo, int argc, object *args) ;/*object self_733377, object r_732544*/
static void __lambda_624(void *data, object clo, int argc, object *args) ;/*object self_733378, object r_732541*/
static void __lambda_625(void *data, object clo, int argc, object *args) ;/*object self_733379, object r_732536*/
static void __lambda_628(void *data, object clo, int argc, object *args) ;/*object self_733380, object k_732539, object _191_73431_731139*/
static void __lambda_626(void *data, object clo, int argc, object *args) ;/*object self_733381, object r_732538*/
static void __lambda_627(void *data, object clo, int argc, object *args) ;/*object self_733382, object r_732537*/
static void __lambda_370(void *data, object clo, int argc, object *args) ;/*object self_733383, object r_732533*/
static void __lambda_371(void *data, object clo, int argc, object *args) ;/*object self_733384, object r_732069*/
static void __lambda_615(void *data, object clo, int argc, object *args) ;/*object self_733385, object k_732525, object ast_73432_731140*/
static void __lambda_621(void *data, object clo, int argc, object *args) ;/*object self_733386, object k_732531, object expr_73433_731141*/
static void __lambda_616(void *data, object clo, int argc, object *args) ;/*object self_733387, object r_732526*/
static void __lambda_619(void *data, object clo, int argc, object *args) ;/*object self_733388, object k_732529, object expr_73434_731142*/
static void __lambda_620(void *data, object clo, int argc, object *args) ;/*object self_733389, object r_732530*/
static void __lambda_617(void *data, object clo, int argc, object *args) ;/*object self_733390, object r_732528*/
static void __lambda_618(void *data, object clo, int argc, object *args) ;/*object self_733391, object r_732527*/
static void __lambda_372(void *data, object clo, int argc, object *args) ;/*object self_733392, object r_732524*/
static void __lambda_373(void *data, object clo, int argc, object *args) ;/*object self_733393, object r_732070*/
static void __lambda_611(void *data, object clo, int argc, object *args) ;/*object self_733394, object k_732520, object vars_73435_731143*/
static void __lambda_613(void *data, object clo, int argc, object *args) ;/*object self_733395, object k_732522, object a_73436_731144*/
static void __lambda_614(void *data, object clo, int argc, object *args) ;/*object self_733396, object r_732523*/
static void __lambda_612(void *data, object clo, int argc, object *args) ;/*object self_733397, object r_732521*/
static void __lambda_374(void *data, object clo, int argc, object *args) ;/*object self_733398, object r_732519*/
static void __lambda_375(void *data, object clo, int argc, object *args) ;/*object self_733399, object r_732071*/
static void __lambda_605(void *data, object clo, int argc, object *args) ;/*object self_733400, object k_732508, object ast_73437_731145, object vars_73438_731146*/
static void __lambda_606(void *data, object clo, int argc, object *args) ;/*object self_733401, object r_732518*/
static void __lambda_607(void *data, object clo, int argc, object *args) ;/*object self_733402, object r_732517*/
static void __lambda_610(void *data, object clo, int argc, object *args) ;/*object self_733403, object k_732515, object _191_73442_731147*/
static void __lambda_608(void *data, object clo, int argc, object *args) ;/*object self_733404, object r_732514*/
static void __lambda_609(void *data, object clo, int argc, object *args) ;/*object self_733405, object r_732513*/
static void __lambda_376(void *data, object clo, int argc, object *args) ;/*object self_733406, object r_732507*/
static void __lambda_377(void *data, object clo, int argc, object *args) ;/*object self_733407, object r_732072*/
static void __lambda_425(void *data, object clo, int argc, object *args) ;/*object self_733408, object k_732147, object ast_73443_731148, object renamed_73444_731149*/
static void __lambda_426(void *data, object clo, int argc, object *args) ;/*object self_733409, object r_732148*/
static void __lambda_427(void *data, object clo, int argc, object *args) ;/*object self_733410, object r_732149*/
static void __lambda_428(void *data, object clo, int argc, object *args) ;/*object self_733411, object r_732150*/
static void __lambda_433(void *data, object clo, int argc, object *args) ;/*object self_733413, object r_732152*/
static void __lambda_440(void *data, object clo, int argc, object *args) ;/*object self_733417, object r_732158*/
static void __lambda_447(void *data, object clo, int argc, object *args) ;/*object self_733421, object r_732164*/
static void __lambda_461(void *data, object clo, int argc, object *args) ;/*object self_733432, object r_732203*/
static void __lambda_472(void *data, object clo, int argc, object *args) ;/*object self_733440, object r_732223*/
static void __lambda_496(void *data, object clo, int argc, object *args) ;/*object self_733464, object r_732249*/
static void __lambda_602(void *data, object clo, int argc, object *args) ;/*object self_733465, object k_732484*/
static void __lambda_604(void *data, object clo, int argc, object *args) ;/*object self_733466, object k_732486, object a_73658_731188*/
static void __lambda_603(void *data, object clo, int argc, object *args) ;/*object self_733467, object r_732485*/
static void __lambda_497(void *data, object clo, int argc, object *args) ;/*object self_733468, object regular_91case_73548_731166*/
static void __lambda_498(void *data, object clo, int argc, object *args) ;/*object self_733469, object r_732251*/
static void __lambda_503(void *data, object clo, int argc, object *args) ;/*object self_733473, object r_732258*/
static void __lambda_508(void *data, object clo, int argc, object *args) ;/*object self_733477, object r_732264*/
static void __lambda_513(void *data, object clo, int argc, object *args) ;/*object self_733481, object r_732270*/
static void __lambda_518(void *data, object clo, int argc, object *args) ;/*object self_733485, object r_732276*/
static void __lambda_523(void *data, object clo, int argc, object *args) ;/*object self_733489, object r_732282*/
static void __lambda_528(void *data, object clo, int argc, object *args) ;/*object self_733493, object r_732288*/
static void __lambda_533(void *data, object clo, int argc, object *args) ;/*object self_733497, object r_732294*/
static void __lambda_538(void *data, object clo, int argc, object *args) ;/*object self_733501, object r_732300*/
static void __lambda_543(void *data, object clo, int argc, object *args) ;/*object self_733505, object r_732306*/
static void __lambda_548(void *data, object clo, int argc, object *args) ;/*object self_733509, object r_732312*/
static void __lambda_553(void *data, object clo, int argc, object *args) ;/*object self_733513, object r_732318*/
static void __lambda_558(void *data, object clo, int argc, object *args) ;/*object self_733517, object r_732324*/
static void __lambda_563(void *data, object clo, int argc, object *args) ;/*object self_733521, object r_732330*/
static void __lambda_568(void *data, object clo, int argc, object *args) ;/*object self_733525, object r_732336*/
static void __lambda_573(void *data, object clo, int argc, object *args) ;/*object self_733529, object r_732342*/
static void __lambda_578(void *data, object clo, int argc, object *args) ;/*object self_733533, object r_732348*/
static void __lambda_583(void *data, object clo, int argc, object *args) ;/*object self_733537, object r_732354*/
static void __lambda_588(void *data, object clo, int argc, object *args) ;/*object self_733541, object r_732360*/
static void __lambda_593(void *data, object clo, int argc, object *args) ;/*object self_733545, object r_732366*/
static void __lambda_598(void *data, object clo, int argc, object *args) ;/*object self_733549, object r_732372*/
static void __lambda_601(void *data, object clo, int argc, object *args) ;/*object self_733550, object k_732377, object a_73656_731187*/
static void __lambda_599(void *data, object clo, int argc, object *args) ;/*object self_733551, object r_732375*/
static void __lambda_600(void *data, object clo, int argc, object *args) ;/*object self_733552, object r_732374*/
static void __lambda_597(void *data, object clo, int argc, object *args) ;/*object self_733553, object k_732378*/
static void __lambda_596(void *data, object clo, int argc, object *args) ;/*object self_733546, object k_732371, object a_73651_731186*/
static void __lambda_594(void *data, object clo, int argc, object *args) ;/*object self_733547, object r_732369*/
static void __lambda_595(void *data, object clo, int argc, object *args) ;/*object self_733548, object r_732368*/
static void __lambda_592(void *data, object clo, int argc, object *args) ;/*object self_733554, object k_732383*/
static void __lambda_591(void *data, object clo, int argc, object *args) ;/*object self_733542, object k_732365, object a_73646_731185*/
static void __lambda_589(void *data, object clo, int argc, object *args) ;/*object self_733543, object r_732363*/
static void __lambda_590(void *data, object clo, int argc, object *args) ;/*object self_733544, object r_732362*/
static void __lambda_587(void *data, object clo, int argc, object *args) ;/*object self_733555, object k_732388*/
static void __lambda_586(void *data, object clo, int argc, object *args) ;/*object self_733538, object k_732359, object a_73641_731184*/
static void __lambda_584(void *data, object clo, int argc, object *args) ;/*object self_733539, object r_732357*/
static void __lambda_585(void *data, object clo, int argc, object *args) ;/*object self_733540, object r_732356*/
static void __lambda_582(void *data, object clo, int argc, object *args) ;/*object self_733556, object k_732393*/
static void __lambda_581(void *data, object clo, int argc, object *args) ;/*object self_733534, object k_732353, object a_73636_731183*/
static void __lambda_579(void *data, object clo, int argc, object *args) ;/*object self_733535, object r_732351*/
static void __lambda_580(void *data, object clo, int argc, object *args) ;/*object self_733536, object r_732350*/
static void __lambda_577(void *data, object clo, int argc, object *args) ;/*object self_733557, object k_732398*/
static void __lambda_576(void *data, object clo, int argc, object *args) ;/*object self_733530, object k_732347, object a_73631_731182*/
static void __lambda_574(void *data, object clo, int argc, object *args) ;/*object self_733531, object r_732345*/
static void __lambda_575(void *data, object clo, int argc, object *args) ;/*object self_733532, object r_732344*/
static void __lambda_572(void *data, object clo, int argc, object *args) ;/*object self_733558, object k_732403*/
static void __lambda_571(void *data, object clo, int argc, object *args) ;/*object self_733526, object k_732341, object a_73626_731181*/
static void __lambda_569(void *data, object clo, int argc, object *args) ;/*object self_733527, object r_732339*/
static void __lambda_570(void *data, object clo, int argc, object *args) ;/*object self_733528, object r_732338*/
static void __lambda_567(void *data, object clo, int argc, object *args) ;/*object self_733559, object k_732408*/
static void __lambda_566(void *data, object clo, int argc, object *args) ;/*object self_733522, object k_732335, object a_73621_731180*/
static void __lambda_564(void *data, object clo, int argc, object *args) ;/*object self_733523, object r_732333*/
static void __lambda_565(void *data, object clo, int argc, object *args) ;/*object self_733524, object r_732332*/
static void __lambda_562(void *data, object clo, int argc, object *args) ;/*object self_733560, object k_732413*/
static void __lambda_561(void *data, object clo, int argc, object *args) ;/*object self_733518, object k_732329, object a_73616_731179*/
static void __lambda_559(void *data, object clo, int argc, object *args) ;/*object self_733519, object r_732327*/
static void __lambda_560(void *data, object clo, int argc, object *args) ;/*object self_733520, object r_732326*/
static void __lambda_557(void *data, object clo, int argc, object *args) ;/*object self_733561, object k_732418*/
static void __lambda_556(void *data, object clo, int argc, object *args) ;/*object self_733514, object k_732323, object a_73611_731178*/
static void __lambda_554(void *data, object clo, int argc, object *args) ;/*object self_733515, object r_732321*/
static void __lambda_555(void *data, object clo, int argc, object *args) ;/*object self_733516, object r_732320*/
static void __lambda_552(void *data, object clo, int argc, object *args) ;/*object self_733562, object k_732423*/
static void __lambda_551(void *data, object clo, int argc, object *args) ;/*object self_733510, object k_732317, object a_73606_731177*/
static void __lambda_549(void *data, object clo, int argc, object *args) ;/*object self_733511, object r_732315*/
static void __lambda_550(void *data, object clo, int argc, object *args) ;/*object self_733512, object r_732314*/
static void __lambda_547(void *data, object clo, int argc, object *args) ;/*object self_733563, object k_732428*/
static void __lambda_546(void *data, object clo, int argc, object *args) ;/*object self_733506, object k_732311, object a_73601_731176*/
static void __lambda_544(void *data, object clo, int argc, object *args) ;/*object self_733507, object r_732309*/
static void __lambda_545(void *data, object clo, int argc, object *args) ;/*object self_733508, object r_732308*/
static void __lambda_542(void *data, object clo, int argc, object *args) ;/*object self_733564, object k_732433*/
static void __lambda_541(void *data, object clo, int argc, object *args) ;/*object self_733502, object k_732305, object a_73596_731175*/
static void __lambda_539(void *data, object clo, int argc, object *args) ;/*object self_733503, object r_732303*/
static void __lambda_540(void *data, object clo, int argc, object *args) ;/*object self_733504, object r_732302*/
static void __lambda_537(void *data, object clo, int argc, object *args) ;/*object self_733565, object k_732438*/
static void __lambda_536(void *data, object clo, int argc, object *args) ;/*object self_733498, object k_732299, object a_73591_731174*/
static void __lambda_534(void *data, object clo, int argc, object *args) ;/*object self_733499, object r_732297*/
static void __lambda_535(void *data, object clo, int argc, object *args) ;/*object self_733500, object r_732296*/
static void __lambda_532(void *data, object clo, int argc, object *args) ;/*object self_733566, object k_732443*/
static void __lambda_531(void *data, object clo, int argc, object *args) ;/*object self_733494, object k_732293, object a_73586_731173*/
static void __lambda_529(void *data, object clo, int argc, object *args) ;/*object self_733495, object r_732291*/
static void __lambda_530(void *data, object clo, int argc, object *args) ;/*object self_733496, object r_732290*/
static void __lambda_527(void *data, object clo, int argc, object *args) ;/*object self_733567, object k_732448*/
static void __lambda_526(void *data, object clo, int argc, object *args) ;/*object self_733490, object k_732287, object a_73581_731172*/
static void __lambda_524(void *data, object clo, int argc, object *args) ;/*object self_733491, object r_732285*/
static void __lambda_525(void *data, object clo, int argc, object *args) ;/*object self_733492, object r_732284*/
static void __lambda_522(void *data, object clo, int argc, object *args) ;/*object self_733568, object k_732453*/
static void __lambda_521(void *data, object clo, int argc, object *args) ;/*object self_733486, object k_732281, object a_73576_731171*/
static void __lambda_519(void *data, object clo, int argc, object *args) ;/*object self_733487, object r_732279*/
static void __lambda_520(void *data, object clo, int argc, object *args) ;/*object self_733488, object r_732278*/
static void __lambda_517(void *data, object clo, int argc, object *args) ;/*object self_733569, object k_732458*/
static void __lambda_516(void *data, object clo, int argc, object *args) ;/*object self_733482, object k_732275, object a_73571_731170*/
static void __lambda_514(void *data, object clo, int argc, object *args) ;/*object self_733483, object r_732273*/
static void __lambda_515(void *data, object clo, int argc, object *args) ;/*object self_733484, object r_732272*/
static void __lambda_512(void *data, object clo, int argc, object *args) ;/*object self_733570, object k_732463*/
static void __lambda_511(void *data, object clo, int argc, object *args) ;/*object self_733478, object k_732269, object a_73566_731169*/
static void __lambda_509(void *data, object clo, int argc, object *args) ;/*object self_733479, object r_732267*/
static void __lambda_510(void *data, object clo, int argc, object *args) ;/*object self_733480, object r_732266*/
static void __lambda_507(void *data, object clo, int argc, object *args) ;/*object self_733571, object k_732468*/
static void __lambda_506(void *data, object clo, int argc, object *args) ;/*object self_733474, object k_732263, object a_73561_731168*/
static void __lambda_504(void *data, object clo, int argc, object *args) ;/*object self_733475, object r_732261*/
static void __lambda_505(void *data, object clo, int argc, object *args) ;/*object self_733476, object r_732260*/
static void __lambda_502(void *data, object clo, int argc, object *args) ;/*object self_733572, object k_732473*/
static void __lambda_501(void *data, object clo, int argc, object *args) ;/*object self_733470, object k_732257, object a_73556_731167*/
static void __lambda_499(void *data, object clo, int argc, object *args) ;/*object self_733471, object r_732255*/
static void __lambda_500(void *data, object clo, int argc, object *args) ;/*object self_733472, object r_732254*/
static void __lambda_473(void *data, object clo, int argc, object *args) ;/*object self_733441, object args_73522_731157*/
static void __lambda_474(void *data, object clo, int argc, object *args) ;/*object self_733442, object ltype_73525_731158*/
static void __lambda_494(void *data, object clo, int argc, object *args) ;/*object self_733443, object k_732247, object a_73544_731165*/
static void __lambda_495(void *data, object clo, int argc, object *args) ;/*object self_733444, object r_732248*/
static void __lambda_475(void *data, object clo, int argc, object *args) ;/*object self_733445, object r_732246*/
static void __lambda_476(void *data, object clo, int argc, object *args) ;/*object self_733446, object a_91lookup_73528_731159*/
static void __lambda_477(void *data, object clo, int argc, object *args) ;/*object self_733447, object define_91vars_73534_731161*/
static void __lambda_478(void *data, object clo, int argc, object *args) ;/*object self_733448, object defines_91a_91lookup_73537_731162*/
static void __lambda_482(void *data, object clo, int argc, object *args) ;/*object self_733449, object r_732230*/
static void __lambda_493(void *data, object clo, int argc, object *args) ;/*object self_733450, object k_732242, object p_73542_731163*/
static void __lambda_483(void *data, object clo, int argc, object *args) ;/*object self_733451, object r_732241*/
static void __lambda_484(void *data, object clo, int argc, object *args) ;/*object self_733452, object r_732240*/
static void __lambda_485(void *data, object clo, int argc, object *args) ;/*object self_733453, object r_732233*/
static void __lambda_486(void *data, object clo, int argc, object *args) ;/*object self_733454, object r_732239*/
static void __lambda_487(void *data, object clo, int argc, object *args) ;/*object self_733455, object r_732235*/
static void __lambda_492(void *data, object clo, int argc, object *args) ;/*object self_733456, object k_732238, object p_73543_731164*/
static void __lambda_488(void *data, object clo, int argc, object *args) ;/*object self_733457, object r_732237*/
static void __lambda_489(void *data, object clo, int argc, object *args) ;/*object self_733458, object r_732236*/
static void __lambda_490(void *data, object clo, int argc, object *args) ;/*object self_733459, object r_732234*/
static void __lambda_491(void *data, object clo, int argc, object *args) ;/*object self_733460, object r_732232*/
static void __lambda_479(void *data, object clo, int argc, object *args) ;/*object self_733461, object k_732243*/
static void __lambda_480(void *data, object clo, int argc, object *args) ;/*object self_733462, object r_732245*/
static void __lambda_481(void *data, object clo, int argc, object *args) ;/*object self_733463, object r_732244*/
static void __lambda_469(void *data, object clo, int argc, object *args) ;/*object self_733573, object k_732487*/
static void __lambda_470(void *data, object clo, int argc, object *args) ;/*object self_733574, object r_732488*/
static void __lambda_471(void *data, object clo, int argc, object *args) ;/*object self_733575, object r_732489*/
static void __lambda_468(void *data, object clo, int argc, object *args) ;/*object self_733433, object k_732222, object a_73515_731156*/
static void __lambda_462(void *data, object clo, int argc, object *args) ;/*object self_733434, object r_732220*/
static void __lambda_463(void *data, object clo, int argc, object *args) ;/*object self_733435, object r_732219*/
static void __lambda_464(void *data, object clo, int argc, object *args) ;/*object self_733436, object converted_73502_731155*/
static void __lambda_466(void *data, object clo, int argc, object *args) ;/*object self_733437, object r_732206*/
static void __lambda_467(void *data, object clo, int argc, object *args) ;/*object self_733438, object r_732207*/
static void __lambda_465(void *data, object clo, int argc, object *args) ;/*object self_733439, object k_732208*/
static void __lambda_458(void *data, object clo, int argc, object *args) ;/*object self_733576, object k_732491*/
static void __lambda_459(void *data, object clo, int argc, object *args) ;/*object self_733577, object r_732492*/
static void __lambda_460(void *data, object clo, int argc, object *args) ;/*object self_733578, object r_732493*/
static void __lambda_454(void *data, object clo, int argc, object *args) ;/*object self_733422, object new_91ast_73479_731153*/
static void __lambda_457(void *data, object clo, int argc, object *args) ;/*object self_733424, object r_732176*/
static void __lambda_456(void *data, object clo, int argc, object *args) ;/*object self_733425, object k_732177*/
static void __lambda_455(void *data, object clo, int argc, object *args) ;/*object self_733423, object r_732168_732922*/
static void __lambda_448(void *data, object clo, int argc, object *args) ;/*object self_733426, object k_732193*/
static void __lambda_449(void *data, object clo, int argc, object *args) ;/*object self_733427, object r_732194*/
static void __lambda_453(void *data, object clo, int argc, object *args) ;/*object self_733431, object r_732200_732919*/
static void __lambda_452(void *data, object clo, int argc, object *args) ;/*object self_733428, object k_732199, object a_73497_731154*/
static void __lambda_450(void *data, object clo, int argc, object *args) ;/*object self_733429, object r_732197*/
static void __lambda_451(void *data, object clo, int argc, object *args) ;/*object self_733430, object r_732196*/
static void __lambda_444(void *data, object clo, int argc, object *args) ;/*object self_733579, object k_732495*/
static void __lambda_445(void *data, object clo, int argc, object *args) ;/*object self_733580, object r_732496*/
static void __lambda_446(void *data, object clo, int argc, object *args) ;/*object self_733581, object r_732497*/
static void __lambda_443(void *data, object clo, int argc, object *args) ;/*object self_733418, object k_732163, object a_73474_731152*/
static void __lambda_441(void *data, object clo, int argc, object *args) ;/*object self_733419, object r_732161*/
static void __lambda_442(void *data, object clo, int argc, object *args) ;/*object self_733420, object r_732160*/
static void __lambda_437(void *data, object clo, int argc, object *args) ;/*object self_733582, object k_732499*/
static void __lambda_438(void *data, object clo, int argc, object *args) ;/*object self_733583, object r_732500*/
static void __lambda_439(void *data, object clo, int argc, object *args) ;/*object self_733584, object r_732501*/
static void __lambda_436(void *data, object clo, int argc, object *args) ;/*object self_733414, object k_732157, object a_73466_731151*/
static void __lambda_434(void *data, object clo, int argc, object *args) ;/*object self_733415, object r_732155*/
static void __lambda_435(void *data, object clo, int argc, object *args) ;/*object self_733416, object r_732154*/
static void __lambda_430(void *data, object clo, int argc, object *args) ;/*object self_733585, object k_732503*/
static void __lambda_431(void *data, object clo, int argc, object *args) ;/*object self_733586, object r_732504*/
static void __lambda_432(void *data, object clo, int argc, object *args) ;/*object self_733587, object r_732505*/
static void __lambda_429(void *data, object clo, int argc, object *args) ;/*object self_733412, object renamed_73454_731150*/
static void __lambda_378(void *data, object clo, int argc, object *args) ;/*object self_733588, object r_732146*/
static void __lambda_379(void *data, object clo, int argc, object *args) ;/*object self_733589, object r_732073*/
static void __lambda_380(void *data, object clo, int argc, object *args) ;/*object self_733590, object r_732145*/
static void __lambda_381(void *data, object clo, int argc, object *args) ;/*object self_733591, object fv_73662_731189*/
static void __lambda_382(void *data, object clo, int argc, object *args) ;/*object self_733592, object r_732144*/
static void __lambda_383(void *data, object clo, int argc, object *args) ;/*object self_733593, object bound_91vars_73665_731190*/
static void __lambda_384(void *data, object clo, int argc, object *args) ;/*object self_733594, object unbound_91vars_73668_731191*/
static void __lambda_385(void *data, object clo, int argc, object *args) ;/*object self_733595, object unknown_91vars_73671_731192_732840*/
static void __lambda_386(void *data, object clo, int argc, object *args) ;/*object self_733596, object r_732142_732841*/
static void __lambda_388(void *data, object clo, int argc, object *args) ;/*object self_733598, object r_732086_732845*/
static void __lambda_422(void *data, object clo, int argc, object *args) ;/*object self_733632, object r_732140_732887_732913*/
static void __lambda_423(void *data, object clo, int argc, object *args) ;/*object self_733633, object r_732138_732888_732914*/
static void __lambda_424(void *data, object clo, int argc, object *args) ;/*object self_733634, object r_732139_732889_732915*/
static void __lambda_389(void *data, object clo, int argc, object *args) ;/*object self_733599, object r_732137_732846*/
static void __lambda_390(void *data, object clo, int argc, object *args) ;/*object self_733600, object r_732088_732847*/
static void __lambda_417(void *data, object clo, int argc, object *args) ;/*object self_733627, object r_732130_732879*/
static void __lambda_418(void *data, object clo, int argc, object *args) ;/*object self_733628, object r_732135_732881_732907*/
static void __lambda_419(void *data, object clo, int argc, object *args) ;/*object self_733629, object r_732132_732882_732908*/
static void __lambda_420(void *data, object clo, int argc, object *args) ;/*object self_733630, object r_732133_732883_732909*/
static void __lambda_421(void *data, object clo, int argc, object *args) ;/*object self_733631, object r_732131_732884_732910*/
static void __lambda_391(void *data, object clo, int argc, object *args) ;/*object self_733601, object args_73687_731195_732848*/
static void __lambda_392(void *data, object clo, int argc, object *args) ;/*object self_733602, object ltype_73690_731196_732849*/
static void __lambda_415(void *data, object clo, int argc, object *args) ;/*object self_733603, object k_732126_732876, object a_73711_731204_732877*/
static void __lambda_416(void *data, object clo, int argc, object *args) ;/*object self_733604, object r_732127_732878*/
static void __lambda_393(void *data, object clo, int argc, object *args) ;/*object self_733605, object r_732125_732850*/
static void __lambda_394(void *data, object clo, int argc, object *args) ;/*object self_733606, object a_91lookup_73693_731197_732851*/
static void __lambda_395(void *data, object clo, int argc, object *args) ;/*object self_733607, object define_91vars_73696_731198_732852*/
static void __lambda_396(void *data, object clo, int argc, object *args) ;/*object self_733608, object defines_91a_91lookup_73699_731199_732853*/
static void __lambda_397(void *data, object clo, int argc, object *args) ;/*object self_733609, object r_732096_732854*/
static void __lambda_414(void *data, object clo, int argc, object *args) ;/*object self_733610, object k_732123_732874, object p_73704_731200_732875*/
static void __lambda_398(void *data, object clo, int argc, object *args) ;/*object self_733611, object r_732122_732855*/
static void __lambda_399(void *data, object clo, int argc, object *args) ;/*object self_733612, object r_732121_732856*/
static void __lambda_400(void *data, object clo, int argc, object *args) ;/*object self_733613, object r_732102_732857*/
static void __lambda_401(void *data, object clo, int argc, object *args) ;/*object self_733614, object r_732119_732859_732891*/
static void __lambda_402(void *data, object clo, int argc, object *args) ;/*object self_733615, object r_732106_732860_732892*/
static void __lambda_403(void *data, object clo, int argc, object *args) ;/*object self_733616, object fv_85_73705_731201_732861_732893, object ast_85_73706_731202_732862_732894*/
static void __lambda_410(void *data, object clo, int argc, object *args) ;/*object self_733617, object r_732104_732870_732902*/
static void __lambda_411(void *data, object clo, int argc, object *args) ;/*object self_733618, object r_732105_732871_732903*/
static void __lambda_412(void *data, object clo, int argc, object *args) ;/*object self_733619, object r_732103_732872_732904*/
static void __lambda_413(void *data, object clo, int argc, object *args) ;/*object self_733620, object r_732101_732873_732905*/
static void __lambda_404(void *data, object clo, int argc, object *args) ;/*object self_733621, object k_732108_732863_732895*/
static void __lambda_405(void *data, object clo, int argc, object *args) ;/*object self_733622, object r_732118_732864_732896*/
static void __lambda_406(void *data, object clo, int argc, object *args) ;/*object self_733623, object r_732117_732865_732897*/
static void __lambda_409(void *data, object clo, int argc, object *args) ;/*object self_733624, object k_732115_732868_732900, object _191_73710_731203_732869_732901*/
static void __lambda_407(void *data, object clo, int argc, object *args) ;/*object self_733625, object r_732114_732866_732898*/
static void __lambda_408(void *data, object clo, int argc, object *args) ;/*object self_733626, object r_732113_732867_732899*/
static void __lambda_387(void *data, object clo, int argc, object *args) ;/*object self_733597, object unbound_91to_91return_73676_731193_732842*/
static void __lambda_362(void *data, object clo, int argc, object *args) ;/*closure _,object k_732044, object sexp_73409_731113*/
static void __lambda_363(void *data, object clo, int argc, object *args) ;/*object self_733364, object flat_731115*/
static void __lambda_797(void *data, object clo, int argc, object *args) ;/*object self_733365, object flat_731115*/
static void __lambda_367(void *data, object clo, int argc, object *args) ;/*object self_733366, object k_732049, object sexp_73410_731117, object acc_73411_731118*/
static void __lambda_364(void *data, object clo, int argc, object *args) ;/*object self_733367, object r_732048*/
static void __lambda_365(void *data, object clo, int argc, object *args) ;/*object self_733368, object r_732045*/
static void __lambda_366(void *data, object clo, int argc, object *args) ;/*object self_733369, object r_732046*/
static void __lambda_310(void *data, object clo, int argc, object *args) ;/*closure _,object k_731948, object exp_73350_731102, object globals_73351_731103*/
static void __lambda_796(void *data, object clo, int argc, object *args) ;/*object self_733311, object exp_73350_731102*/
static void __lambda_311(void *data, object clo, int argc, object *args) ;/*object self_733312, object wrap_91mutable_91formals_731105*/
static void __lambda_795(void *data, object clo, int argc, object *args) ;/*object self_733313, object wrap_91mutable_91formals_731105*/
static void __lambda_358(void *data, object clo, int argc, object *args) ;/*object self_733314, object k_732026, object id_73352_731107, object formals_73353_731108, object body_91exp_73354_731109, object has_91cont_73355_731110*/
static void __lambda_359(void *data, object clo, int argc, object *args) ;/*object self_733315, object r_732028*/
static void __lambda_360(void *data, object clo, int argc, object *args) ;/*object self_733316, object r_732037*/
static void __lambda_361(void *data, object clo, int argc, object *args) ;/*object self_733317, object r_732030*/
static void __lambda_312(void *data, object clo, int argc, object *args) ;/*object self_733318, object r_732025*/
static void __lambda_313(void *data, object clo, int argc, object *args) ;/*object self_733319, object r_731949*/
static void __lambda_314(void *data, object clo, int argc, object *args) ;/*object self_733320, object r_731950*/
static void __lambda_325(void *data, object clo, int argc, object *args) ;/*object self_733331, object r_731962*/
static void __lambda_326(void *data, object clo, int argc, object *args) ;/*object self_733332, object r_731963*/
static void __lambda_330(void *data, object clo, int argc, object *args) ;/*object self_733336, object r_731970*/
static void __lambda_331(void *data, object clo, int argc, object *args) ;/*object self_733337, object r_731971*/
static void __lambda_332(void *data, object clo, int argc, object *args) ;/*object self_733338, object r_731972*/
static void __lambda_333(void *data, object clo, int argc, object *args) ;/*object self_733339, object r_731983*/
static void __lambda_343(void *data, object clo, int argc, object *args) ;/*object self_733349, object r_732004*/
static void __lambda_350(void *data, object clo, int argc, object *args) ;/*object self_733356, object r_732016*/
static void __lambda_354(void *data, object clo, int argc, object *args) ;/*object self_733357, object r_732017*/
static void __lambda_357(void *data, object clo, int argc, object *args) ;/*object self_733358, object k_732020, object e_73407_731112*/
static void __lambda_355(void *data, object clo, int argc, object *args) ;/*object self_733359, object r_732019*/
static void __lambda_356(void *data, object clo, int argc, object *args) ;/*object self_733360, object result_73406_731111*/
static void __lambda_351(void *data, object clo, int argc, object *args) ;/*object self_733361, object k_732021*/
static void __lambda_352(void *data, object clo, int argc, object *args) ;/*object self_733362, object r_732022*/
static void __lambda_353(void *data, object clo, int argc, object *args) ;/*object self_733363, object r_732023*/
static void __lambda_344(void *data, object clo, int argc, object *args) ;/*object self_733350, object r_732015*/
static void __lambda_345(void *data, object clo, int argc, object *args) ;/*object self_733351, object r_732007*/
static void __lambda_346(void *data, object clo, int argc, object *args) ;/*object self_733352, object r_732014*/
static void __lambda_347(void *data, object clo, int argc, object *args) ;/*object self_733353, object r_732009*/
static void __lambda_348(void *data, object clo, int argc, object *args) ;/*object self_733354, object r_732013*/
static void __lambda_349(void *data, object clo, int argc, object *args) ;/*object self_733355, object r_732011*/
static void __lambda_334(void *data, object clo, int argc, object *args) ;/*object self_733340, object r_732003*/
static void __lambda_335(void *data, object clo, int argc, object *args) ;/*object self_733341, object r_731984*/
static void __lambda_340(void *data, object clo, int argc, object *args) ;/*object self_733346, object r_731998*/
static void __lambda_341(void *data, object clo, int argc, object *args) ;/*object self_733347, object r_732002*/
static void __lambda_342(void *data, object clo, int argc, object *args) ;/*object self_733348, object r_732000*/
static void __lambda_336(void *data, object clo, int argc, object *args) ;/*object self_733342, object r_731995*/
static void __lambda_337(void *data, object clo, int argc, object *args) ;/*object self_733343, object r_731989*/
static void __lambda_338(void *data, object clo, int argc, object *args) ;/*object self_733344, object r_731993*/
static void __lambda_339(void *data, object clo, int argc, object *args) ;/*object self_733345, object r_731991*/
static void __lambda_329(void *data, object clo, int argc, object *args) ;/*object self_733333, object r_731964*/
static void __lambda_327(void *data, object clo, int argc, object *args) ;/*object self_733334, object k_731968*/
static void __lambda_328(void *data, object clo, int argc, object *args) ;/*object self_733335, object r_731969*/
static void __lambda_315(void *data, object clo, int argc, object *args) ;/*object self_733321, object r_731951*/
static void __lambda_316(void *data, object clo, int argc, object *args) ;/*object self_733322, object r_731952*/
static void __lambda_317(void *data, object clo, int argc, object *args) ;/*object self_733323, object r_731955*/
static void __lambda_318(void *data, object clo, int argc, object *args) ;/*object self_733324, object r_731956*/
static void __lambda_319(void *data, object clo, int argc, object *args) ;/*object self_733325, object r_731961*/
static void __lambda_320(void *data, object clo, int argc, object *args) ;/*object self_733326, object r_731960*/
static void __lambda_321(void *data, object clo, int argc, object *args) ;/*object self_733327, object r_731959*/
static void __lambda_322(void *data, object clo, int argc, object *args) ;/*object self_733328, object r_731958*/
static void __lambda_323(void *data, object clo, int argc, object *args) ;/*object self_733329, object r_731953*/
static void __lambda_324(void *data, object clo, int argc, object *args) ;/*object self_733330, object r_731954*/
static void __lambda_293(void *data, object clo, int argc, object *args) ;/*closure _,object k_731923, object exp_73321_731101*/
static void __lambda_294(void *data, object clo, int argc, object *args) ;/*object self_733295, object r_731924*/
static void __lambda_297(void *data, object clo, int argc, object *args) ;/*object self_733298, object r_731927*/
static void __lambda_298(void *data, object clo, int argc, object *args) ;/*object self_733299, object r_731928*/
static void __lambda_299(void *data, object clo, int argc, object *args) ;/*object self_733300, object r_731929*/
static void __lambda_300(void *data, object clo, int argc, object *args) ;/*object self_733301, object r_731930*/
static void __lambda_301(void *data, object clo, int argc, object *args) ;/*object self_733302, object r_731931*/
static void __lambda_303(void *data, object clo, int argc, object *args) ;/*object self_733304, object r_731934*/
static void __lambda_305(void *data, object clo, int argc, object *args) ;/*object self_733306, object r_731938*/
static void __lambda_308(void *data, object clo, int argc, object *args) ;/*object self_733309, object r_731944*/
static void __lambda_309(void *data, object clo, int argc, object *args) ;/*object self_733310, object r_731945*/
static void __lambda_306(void *data, object clo, int argc, object *args) ;/*object self_733307, object r_731939*/
static void __lambda_307(void *data, object clo, int argc, object *args) ;/*object self_733308, object r_731940*/
static void __lambda_304(void *data, object clo, int argc, object *args) ;/*object self_733305, object r_731935*/
static void __lambda_302(void *data, object clo, int argc, object *args) ;/*object self_733303, object r_731932*/
static void __lambda_295(void *data, object clo, int argc, object *args) ;/*object self_733296, object r_731926*/
static void __lambda_296(void *data, object clo, int argc, object *args) ;/*object self_733297, object r_731925*/
static void __lambda_288(void *data, object clo, int argc, object *args) ;/*closure _,object k_731913, object symbol_73319_731096*/
static void __lambda_289(void *data, object clo, int argc, object *args) ;/*object self_733290, object is_91in_127_731098*/
static void __lambda_794(void *data, object clo, int argc, object *args) ;/*object self_733291, object is_91in_127_731098*/
static void __lambda_292(void *data, object clo, int argc, object *args) ;/*object self_733292, object k_731916, object S_73320_731100*/
static void __lambda_290(void *data, object clo, int argc, object *args) ;/*object self_733293, object r_731915*/
static void __lambda_291(void *data, object clo, int argc, object *args) ;/*object self_733294, object r_731914*/
static void __lambda_286(void *data, object clo, int argc, object *args) ;/*closure _,object k_731909, object symbol_73318_731095*/
static void __lambda_287(void *data, object clo, int argc, object *args) ;/*object self_733289, object r_731910*/
static void __lambda_285(void *data, object clo, int argc, object *args) ;/*closure _,object k_731905*/
static void __lambda_245(void *data, object clo, int argc, object *args) ;/*closure _,object k_731844, object ast_73276_731083, object opts_73277_731084_raw, ...*/
static void __lambda_246(void *data, object clo, int argc, object *args) ;/*object self_733247, object bound_91only_127_731088, object let_91vars_731089, object search_731090*/
static void __lambda_793(void *data, object clo, int argc, object *args) ;/*object self_733248, object bound_91only_127_731088*/
static void __lambda_792(void *data, object clo, int argc, object *args) ;/*object self_733249, object let_91vars_731089*/
static void __lambda_791(void *data, object clo, int argc, object *args) ;/*object self_733250, object search_731090*/
static void __lambda_247(void *data, object clo, int argc, object *args) ;/*object self_733251, object r_731845*/
static void __lambda_248(void *data, object clo, int argc, object *args) ;/*object self_733252, object r_731846*/
static void __lambda_251(void *data, object clo, int argc, object *args) ;/*object self_733253, object k_731849, object exp_73279_731094*/
static void __lambda_252(void *data, object clo, int argc, object *args) ;/*object self_733254, object r_731850*/
static void __lambda_257(void *data, object clo, int argc, object *args) ;/*object self_733259, object r_731856*/
static void __lambda_258(void *data, object clo, int argc, object *args) ;/*object self_733260, object r_731857*/
static void __lambda_259(void *data, object clo, int argc, object *args) ;/*object self_733261, object r_731858*/
static void __lambda_262(void *data, object clo, int argc, object *args) ;/*object self_733264, object r_731861*/
static void __lambda_267(void *data, object clo, int argc, object *args) ;/*object self_733269, object r_731867*/
static void __lambda_272(void *data, object clo, int argc, object *args) ;/*object self_733274, object r_731875*/
static void __lambda_275(void *data, object clo, int argc, object *args) ;/*object self_733277, object r_731880*/
static void __lambda_277(void *data, object clo, int argc, object *args) ;/*object self_733279, object r_731882*/
static void __lambda_279(void *data, object clo, int argc, object *args) ;/*object self_733281, object r_731887*/
static void __lambda_283(void *data, object clo, int argc, object *args) ;/*object self_733285, object r_731893*/
static void __lambda_284(void *data, object clo, int argc, object *args) ;/*object self_733286, object r_731894*/
static void __lambda_280(void *data, object clo, int argc, object *args) ;/*object self_733282, object r_731891*/
static void __lambda_281(void *data, object clo, int argc, object *args) ;/*object self_733283, object r_731890*/
static void __lambda_282(void *data, object clo, int argc, object *args) ;/*object self_733284, object r_731888*/
static void __lambda_278(void *data, object clo, int argc, object *args) ;/*object self_733280, object r_731884*/
static void __lambda_276(void *data, object clo, int argc, object *args) ;/*object self_733278, object r_731881*/
static void __lambda_273(void *data, object clo, int argc, object *args) ;/*object self_733275, object r_731879*/
static void __lambda_274(void *data, object clo, int argc, object *args) ;/*object self_733276, object r_731877*/
static void __lambda_268(void *data, object clo, int argc, object *args) ;/*object self_733270, object r_731868*/
static void __lambda_269(void *data, object clo, int argc, object *args) ;/*object self_733271, object r_731870*/
static void __lambda_270(void *data, object clo, int argc, object *args) ;/*object self_733272, object r_731871*/
static void __lambda_271(void *data, object clo, int argc, object *args) ;/*object self_733273, object r_731869*/
static void __lambda_263(void *data, object clo, int argc, object *args) ;/*object self_733265, object r_731866*/
static void __lambda_264(void *data, object clo, int argc, object *args) ;/*object self_733266, object r_731864*/
static void __lambda_265(void *data, object clo, int argc, object *args) ;/*object self_733267, object r_731862*/
static void __lambda_266(void *data, object clo, int argc, object *args) ;/*object self_733268, object r_731863*/
static void __lambda_260(void *data, object clo, int argc, object *args) ;/*object self_733262, object r_731859*/
static void __lambda_261(void *data, object clo, int argc, object *args) ;/*object self_733263, object r_731860*/
static void __lambda_253(void *data, object clo, int argc, object *args) ;/*object self_733255, object r_731855*/
static void __lambda_254(void *data, object clo, int argc, object *args) ;/*object self_733256, object r_731853*/
static void __lambda_255(void *data, object clo, int argc, object *args) ;/*object self_733257, object r_731851*/
static void __lambda_256(void *data, object clo, int argc, object *args) ;/*object self_733258, object r_731852*/
static void __lambda_249(void *data, object clo, int argc, object *args) ;/*object self_733287, object r_731848*/
static void __lambda_250(void *data, object clo, int argc, object *args) ;/*object self_733288, object r_731847*/
static void __lambda_215(void *data, object clo, int argc, object *args) ;/*closure _,object k_731807, object asts_73252_731062, object lib_91exports_73253_731063*/
static void __lambda_216(void *data, object clo, int argc, object *args) ;/*object self_733216, object do_91filter_731066, object loop_731067*/
static void __lambda_790(void *data, object clo, int argc, object *args) ;/*object self_733217, object do_91filter_731066*/
static void __lambda_789(void *data, object clo, int argc, object *args) ;/*object self_733218, object loop_731067*/
static void __lambda_224(void *data, object clo, int argc, object *args) ;/*object self_733219, object k_731817, object code_73254_731070*/
static void __lambda_244(void *data, object clo, int argc, object *args) ;/*object self_733220, object k_731841, object l_73269_731076, object ls_73270_731077*/
static void __lambda_225(void *data, object clo, int argc, object *args) ;/*object self_733221, object r_731829*/
static void __lambda_238(void *data, object clo, int argc, object *args) ;/*object self_733222, object k_731833, object ast_73271_731078*/
static void __lambda_239(void *data, object clo, int argc, object *args) ;/*object self_733223, object r_731834*/
static void __lambda_240(void *data, object clo, int argc, object *args) ;/*object self_733224, object var_73272_731079*/
static void __lambda_243(void *data, object clo, int argc, object *args) ;/*object self_733225, object k_731839, object v_73273_731080*/
static void __lambda_241(void *data, object clo, int argc, object *args) ;/*object self_733226, object r_731836*/
static void __lambda_242(void *data, object clo, int argc, object *args) ;/*object self_733227, object r_731837*/
static void __lambda_226(void *data, object clo, int argc, object *args) ;/*object self_733228, object r_731832*/
static void __lambda_227(void *data, object clo, int argc, object *args) ;/*object self_733229, object r_731831*/
static void __lambda_228(void *data, object clo, int argc, object *args) ;/*object self_733230, object all_91fv_73255_731071*/
static void __lambda_230(void *data, object clo, int argc, object *args) ;/*object self_733231, object k_731820, object ast_73256_731072*/
static void __lambda_231(void *data, object clo, int argc, object *args) ;/*object self_733232, object r_731828*/
static void __lambda_232(void *data, object clo, int argc, object *args) ;/*object self_733233, object r_731827*/
static void __lambda_233(void *data, object clo, int argc, object *args) ;/*object self_733234, object tmp_73262_73264_731074*/
static void __lambda_234(void *data, object clo, int argc, object *args) ;/*object self_733235, object r_731826*/
static void __lambda_235(void *data, object clo, int argc, object *args) ;/*object self_733236, object tmp_73266_73268_731075*/
static void __lambda_236(void *data, object clo, int argc, object *args) ;/*object self_733237, object r_731824*/
static void __lambda_237(void *data, object clo, int argc, object *args) ;/*object self_733238, object r_731825*/
static void __lambda_229(void *data, object clo, int argc, object *args) ;/*object self_733239, object r_731819*/
static void __lambda_217(void *data, object clo, int argc, object *args) ;/*object self_733240, object r_731816*/
static void __lambda_218(void *data, object clo, int argc, object *args) ;/*object self_733241, object r_731808*/
static void __lambda_221(void *data, object clo, int argc, object *args) ;/*object self_733242, object k_731811, object code_73274_731081*/
static void __lambda_222(void *data, object clo, int argc, object *args) ;/*object self_733243, object new_91code_73275_731082*/
static void __lambda_223(void *data, object clo, int argc, object *args) ;/*object self_733244, object r_731815*/
static void __lambda_219(void *data, object clo, int argc, object *args) ;/*object self_733245, object r_731810*/
static void __lambda_220(void *data, object clo, int argc, object *args) ;/*object self_733246, object r_731809*/
static void __lambda_200(void *data, object clo, int argc, object *args) ;/*closure _,object k_731790, object exp_73245_731058*/
static void __lambda_201(void *data, object clo, int argc, object *args) ;/*object self_733201, object globals_73246_731059*/
static void __lambda_788(void *data, object clo, int argc, object *args) ;/*object self_733202, object globals_73246_731059*/
static void __lambda_204(void *data, object clo, int argc, object *args) ;/*object self_733203, object k_731794, object e_73247_731060*/
static void __lambda_211(void *data, object clo, int argc, object *args) ;/*object self_733204, object r_731795*/
static void __lambda_212(void *data, object clo, int argc, object *args) ;/*object self_733205, object r_731796*/
static void __lambda_213(void *data, object clo, int argc, object *args) ;/*object self_733206, object r_731798*/
static void __lambda_214(void *data, object clo, int argc, object *args) ;/*object self_733207, object r_731797*/
static void __lambda_205(void *data, object clo, int argc, object *args) ;/*object self_733208, object k_731799*/
static void __lambda_206(void *data, object clo, int argc, object *args) ;/*object self_733209, object tmp_73249_73251_731061*/
static void __lambda_208(void *data, object clo, int argc, object *args) ;/*object self_733210, object r_731800*/
static void __lambda_209(void *data, object clo, int argc, object *args) ;/*object self_733211, object r_731802*/
static void __lambda_210(void *data, object clo, int argc, object *args) ;/*object self_733212, object r_731801*/
static void __lambda_207(void *data, object clo, int argc, object *args) ;/*object self_733213, object k_731804*/
static void __lambda_202(void *data, object clo, int argc, object *args) ;/*object self_733214, object r_731793*/
static void __lambda_203(void *data, object clo, int argc, object *args) ;/*object self_733215, object r_731792*/
static void __lambda_190(void *data, object clo, int argc, object *args) ;/*closure _,object k_731778, object exp_73240_731054, object var_73241_731055*/
static void __lambda_192(void *data, object clo, int argc, object *args) ;/*object self_733192, object k_731780, object return_73242_731056*/
static void __lambda_195(void *data, object clo, int argc, object *args) ;/*object self_733193, object k_731783, object e_73243_731057*/
static void __lambda_199(void *data, object clo, int argc, object *args) ;/*object self_733194, object r_731784*/
static void __lambda_196(void *data, object clo, int argc, object *args) ;/*object self_733195, object k_731785*/
static void __lambda_197(void *data, object clo, int argc, object *args) ;/*object self_733196, object r_731786*/
static void __lambda_198(void *data, object clo, int argc, object *args) ;/*object self_733197, object r_731787*/
static void __lambda_193(void *data, object clo, int argc, object *args) ;/*object self_733198, object r_731782*/
static void __lambda_194(void *data, object clo, int argc, object *args) ;/*object self_733199, object r_731781*/
static void __lambda_191(void *data, object clo, int argc, object *args) ;/*object self_733200, object r_731779*/
static void __lambda_165(void *data, object clo, int argc, object *args) ;/*closure _,object k_731679, object exp_73182_731041, object program_127_73183_731042, object lib_91name_73184_731043, object rename_91env_73185_731044*/
static void __lambda_166(void *data, object clo, int argc, object *args) ;/*object self_733167, object top_91lvl_73187_731045, object globals_73188_731046, object exprs_73189_731047*/
static void __lambda_167(void *data, object clo, int argc, object *args) ;/*object self_733168, object loop_73190_731048*/
static void __lambda_787(void *data, object clo, int argc, object *args) ;/*object self_733169, object loop_73190_731048*/
static void __lambda_170(void *data, object clo, int argc, object *args) ;/*object self_733170, object k_731684, object top_91lvl_73191_731049, object globals_73192_731050, object exprs_73193_731051*/
static void __lambda_180(void *data, object clo, int argc, object *args) ;/*object self_733180, object r_731716*/
static void __lambda_189(void *data, object clo, int argc, object *args) ;/*object self_733189, object r_731767*/
static void __lambda_181(void *data, object clo, int argc, object *args) ;/*object self_733181, object r_731765*/
static void __lambda_182(void *data, object clo, int argc, object *args) ;/*object self_733182, object r_731717*/
static void __lambda_186(void *data, object clo, int argc, object *args) ;/*object self_733184, object r_731727*/
static void __lambda_187(void *data, object clo, int argc, object *args) ;/*object self_733185, object r_731741*/
static void __lambda_188(void *data, object clo, int argc, object *args) ;/*object self_733186, object r_731734*/
static void __lambda_184(void *data, object clo, int argc, object *args) ;/*object self_733187, object k_731749*/
static void __lambda_185(void *data, object clo, int argc, object *args) ;/*object self_733188, object r_731752*/
static void __lambda_183(void *data, object clo, int argc, object *args) ;/*object self_733183, object r_731723*/
static void __lambda_171(void *data, object clo, int argc, object *args) ;/*object self_733171, object r_731686*/
static void __lambda_177(void *data, object clo, int argc, object *args) ;/*object self_733172, object r_731688*/
static void __lambda_178(void *data, object clo, int argc, object *args) ;/*object self_733173, object r_731689*/
static void __lambda_179(void *data, object clo, int argc, object *args) ;/*object self_733174, object r_731687*/
static void __lambda_172(void *data, object clo, int argc, object *args) ;/*object self_733175, object k_731690*/
static void __lambda_175(void *data, object clo, int argc, object *args) ;/*object self_733178, object r_731707*/
static void __lambda_176(void *data, object clo, int argc, object *args) ;/*object self_733179, object r_731715*/
static void __lambda_173(void *data, object clo, int argc, object *args) ;/*object self_733176, object r_731696*/
static void __lambda_174(void *data, object clo, int argc, object *args) ;/*object self_733177, object r_731695*/
static void __lambda_168(void *data, object clo, int argc, object *args) ;/*object self_733190, object r_731683*/
static void __lambda_169(void *data, object clo, int argc, object *args) ;/*object self_733191, object r_731682*/
static object __lambda_830(void *data, object ptr,object exp_73181_731040) ;
static void __lambda_164(void *data, object clo, int argc, object *args) ;/*closure _,object k_731676, object exp_73181_731040*/
static void __lambda_163(void *data, object clo, int argc, object *args) ;/*closure _,object k_731672, object exp_73180_731039*/
static object __lambda_829(void *data, object ptr,object exp_73179_731038) ;
static void __lambda_162(void *data, object clo, int argc, object *args) ;/*closure _,object k_731669, object exp_73179_731038*/
static void __lambda_161(void *data, object clo, int argc, object *args) ;/*closure _,object k_731665, object exp_73178_731037*/
static object __lambda_828(void *data, object ptr,object exp_73177_731036) ;
static void __lambda_160(void *data, object clo, int argc, object *args) ;/*closure _,object k_731662, object exp_73177_731036*/
static object __lambda_827(void *data, object ptr,object exp_73176_731035) ;
static void __lambda_159(void *data, object clo, int argc, object *args) ;/*closure _,object k_731659, object exp_73176_731035*/
static void __lambda_158(void *data, object clo, int argc, object *args) ;/*closure _,object k_731655, object exp_73175_731034*/
static object __lambda_826(void *data, object ptr,object exp_73174_731033) ;
static void __lambda_157(void *data, object clo, int argc, object *args) ;/*closure _,object k_731652, object exp_73174_731033*/
static object __lambda_825(void *data, object ptr,object exp_73173_731032) ;
static void __lambda_156(void *data, object clo, int argc, object *args) ;/*closure _,object k_731649, object exp_73173_731032*/
static object __lambda_824(void *data, object ptr,object exp_73172_731031) ;
static void __lambda_155(void *data, object clo, int argc, object *args) ;/*closure _,object k_731646, object exp_73172_731031*/
static void __lambda_154(void *data, object clo, int argc, object *args) ;/*closure _,object k_731642, object exp_73171_731030*/
static void __lambda_153(void *data, object clo, int argc, object *args) ;/*closure _,object k_731638, object exp_73170_731029*/
static void __lambda_152(void *data, object clo, int argc, object *args) ;/*closure _,object k_731634, object exp_73169_731028*/
static object __lambda_823(void *data, object ptr,object exp_73168_731027) ;
static void __lambda_151(void *data, object clo, int argc, object *args) ;/*closure _,object k_731631, object exp_73168_731027*/
static void __lambda_150(void *data, object clo, int argc, object *args) ;/*closure _,object k_731627, object exp_73167_731026*/
static object __lambda_822(void *data, object ptr,object exp_73166_731025) ;
static void __lambda_149(void *data, object clo, int argc, object *args) ;/*closure _,object k_731624, object exp_73166_731025*/
static object __lambda_821(void *data, object ptr,object exp_73165_731024) ;
static void __lambda_148(void *data, object clo, int argc, object *args) ;/*closure _,object k_731621, object exp_73165_731024*/
static object __lambda_820(void *data, object ptr,object exp_73164_731023) ;
static void __lambda_147(void *data, object clo, int argc, object *args) ;/*closure _,object k_731618, object exp_73164_731023*/
static void __lambda_146(void *data, object clo, int argc, object *args) ;/*closure _,object k_731614, object exp_73163_731022*/
static object __lambda_819(void *data, object ptr,object exp_73162_731021) ;
static void __lambda_145(void *data, object clo, int argc, object *args) ;/*closure _,object k_731611, object exp_73162_731021*/
static void __lambda_133(void *data, object clo, int argc, object *args) ;/*closure _,object k_731590, object ast_73151_731017*/
static void __lambda_134(void *data, object clo, int argc, object *args) ;/*object self_733156, object r_731592*/
static void __lambda_135(void *data, object clo, int argc, object *args) ;/*object self_733157, object r_731593*/
static void __lambda_136(void *data, object clo, int argc, object *args) ;/*object self_733158, object r_731594*/
static void __lambda_138(void *data, object clo, int argc, object *args) ;/*object self_733159, object k_731596, object return_73156_731018*/
static void __lambda_141(void *data, object clo, int argc, object *args) ;/*object self_733160, object k_731600, object expr_73157_731019*/
static void __lambda_144(void *data, object clo, int argc, object *args) ;/*object self_733161, object r_731601*/
static void __lambda_142(void *data, object clo, int argc, object *args) ;/*object self_733162, object k_731603*/
static void __lambda_143(void *data, object clo, int argc, object *args) ;/*object self_733163, object r_731604*/
static void __lambda_139(void *data, object clo, int argc, object *args) ;/*object self_733164, object r_731598*/
static void __lambda_140(void *data, object clo, int argc, object *args) ;/*object self_733165, object r_731597*/
static void __lambda_137(void *data, object clo, int argc, object *args) ;/*object self_733166, object r_731595*/
static object __lambda_818(void *data, object ptr,object exp_73150_731016) ;
static void __lambda_132(void *data, object clo, int argc, object *args) ;/*closure _,object k_731587, object exp_73150_731016*/
static object __lambda_817(void *data, object ptr,object exp_73149_731015) ;
static void __lambda_131(void *data, object clo, int argc, object *args) ;/*closure _,object k_731584, object exp_73149_731015*/
static void __lambda_124(void *data, object clo, int argc, object *args) ;/*closure _,object k_731572, object l_73137_731011*/
static void __lambda_125(void *data, object clo, int argc, object *args) ;/*object self_733149, object lst_73139_731012*/
static void __lambda_126(void *data, object clo, int argc, object *args) ;/*object self_733150, object loop_73140_731013*/
static void __lambda_786(void *data, object clo, int argc, object *args) ;/*object self_733151, object loop_73140_731013*/
static void __lambda_129(void *data, object clo, int argc, object *args) ;/*object self_733152, object k_731575, object lst_73141_731014*/
static void __lambda_130(void *data, object clo, int argc, object *args) ;/*object self_733153, object r_731579*/
static void __lambda_127(void *data, object clo, int argc, object *args) ;/*object self_733154, object r_731574*/
static void __lambda_128(void *data, object clo, int argc, object *args) ;/*object self_733155, object r_731573*/
static void __lambda_123(void *data, object clo, int argc, object *args) ;/*closure _,object k_731543, object args_73119_731009, object type_73120_731010*/
static void __lambda_119(void *data, object clo, int argc, object *args) ;/*closure _,object k_731533, object exp_73109_731006*/
static void __lambda_120(void *data, object clo, int argc, object *args) ;/*object self_733146, object r_731534*/
static void __lambda_121(void *data, object clo, int argc, object *args) ;/*object self_733147, object r_731540*/
static void __lambda_122(void *data, object clo, int argc, object *args) ;/*object self_733148, object type_73110_731007, object num_73111_731008*/
static void __lambda_117(void *data, object clo, int argc, object *args) ;/*closure _,object k_731525, object ast_73105_731005*/
static void __lambda_118(void *data, object clo, int argc, object *args) ;/*object self_733145, object r_731528*/
static void __lambda_115(void *data, object clo, int argc, object *args) ;/*closure _,object k_731517, object ast_73101_731004*/
static void __lambda_116(void *data, object clo, int argc, object *args) ;/*object self_733144, object r_731520*/
static void __lambda_114(void *data, object clo, int argc, object *args) ;/*closure _,object k_731513, object exp_73100_731003*/
static void __lambda_113(void *data, object clo, int argc, object *args) ;/*closure _,object k_731509, object exp_7399_731002*/
static object __lambda_816(void *data, object ptr,object exp_7398_731001) ;
static void __lambda_112(void *data, object clo, int argc, object *args) ;/*closure _,object k_731506, object exp_7398_731001*/
static object __lambda_815(void *data, object ptr,object exp_7397_731000) ;
static void __lambda_111(void *data, object clo, int argc, object *args) ;/*closure _,object k_731503, object exp_7397_731000*/
static void __lambda_110(void *data, object clo, int argc, object *args) ;/*closure _,object k_731499, object exp_7396_73999*/
static void __lambda_109(void *data, object clo, int argc, object *args) ;/*closure _,object k_731495, object exp_7395_73998*/
static void __lambda_108(void *data, object clo, int argc, object *args) ;/*closure _,object k_731491, object exp_7394_73997*/
static object __lambda_814(void *data, object ptr,object exp_7393_73996) ;
static void __lambda_107(void *data, object clo, int argc, object *args) ;/*closure _,object k_731488, object exp_7393_73996*/
static object __lambda_813(void *data, object ptr,object exp_7392_73995) ;
static void __lambda_106(void *data, object clo, int argc, object *args) ;/*closure _,object k_731485, object exp_7392_73995*/
static void __lambda_105(void *data, object clo, int argc, object *args) ;/*closure _,object k_731481, object exp_7391_73994*/
static void __lambda_103(void *data, object clo, int argc, object *args) ;/*closure _,object k_731474, object env_7389_73992, object keys_7390_73993*/
static void __lambda_104(void *data, object clo, int argc, object *args) ;/*object self_733143, object r_731476*/
static void __lambda_101(void *data, object clo, int argc, object *args) ;/*closure _,object k_731463, object env_7387_73990, object key_7388_73991*/
static void __lambda_102(void *data, object clo, int argc, object *args) ;/*object self_733142, object r_731468*/
static void __lambda_99(void *data, object clo, int argc, object *args) ;/*closure _,object k_731451, object list1_7384_73988, object list2_7385_73989*/
static void __lambda_100(void *data, object clo, int argc, object *args) ;/*object self_733141, object r_731454*/
static void __lambda_97(void *data, object clo, int argc, object *args) ;/*closure _,object k_731444, object f_7381_73985, object lst_7382_73986, object init_7383_73987*/
static void __lambda_98(void *data, object clo, int argc, object *args) ;/*object self_733140, object r_731447*/
static void __lambda_95(void *data, object clo, int argc, object *args) ;/*closure _,object k_731437, object set1_7379_73983, object set2_7380_73984*/
static void __lambda_96(void *data, object clo, int argc, object *args) ;/*object self_733139, object r_731439*/
static void __lambda_93(void *data, object clo, int argc, object *args) ;/*closure _,object k_731430, object set1_7377_73981, object set2_7378_73982*/
static void __lambda_94(void *data, object clo, int argc, object *args) ;/*object self_733138, object r_731433*/
static void __lambda_91(void *data, object clo, int argc, object *args) ;/*closure _,object k_731421, object sym_7375_73979, object S_7376_73980*/
static void __lambda_92(void *data, object clo, int argc, object *args) ;/*object self_733137, object r_731425*/
static void __lambda_812(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k_7318, object sym_731_7312, object S_732_7313)*/
static object __lambda_811(void *data, object ptr, object sym1, object sym2) ;
static void __lambda_810(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object sym1, object sym2)*/
static object __lambda_809(void *data, object ptr) ;
static void __lambda_90(void *data, object clo, int argc, object *args) ;/*closure _,object k_731418*/
static void __lambda_87(void *data, object clo, int argc, object *args) ;/*closure _,object k_731407, object e_7373_73977, object lst_7374_73978*/
static void __lambda_88(void *data, object clo, int argc, object *args) ;/*object self_733135, object r_731413*/
static void __lambda_89(void *data, object clo, int argc, object *args) ;/*object self_733136, object r_731411*/
static void __lambda_83(void *data, object clo, int argc, object *args) ;/*closure _,object k_731397, object filename_7371_73975*/
static void __lambda_84(void *data, object clo, int argc, object *args) ;/*object self_733132, object r_731404*/
static void __lambda_85(void *data, object clo, int argc, object *args) ;/*object self_733133, object r_731403*/
static void __lambda_86(void *data, object clo, int argc, object *args) ;/*object self_733134, object pos_7372_73976*/
static void __lambda_81(void *data, object clo, int argc, object *args) ;/*closure _,object k_731393, object msg_7370_73974*/
static void __lambda_82(void *data, object clo, int argc, object *args) ;/*object self_733131, object r_731394*/
static void __lambda_80(void *data, object clo, int argc, object *args) ;/*closure _,object k_731390, object msg_7369_73973*/
static void __lambda_79(void *data, object clo, int argc, object *args) ;/*closure _,object k_731387, object msg_7368_73972*/
static void __lambda_78(void *data, object clo, int argc, object *args) ;/*closure _,object k_731384, object msg_7367_73971*/
static void __lambda_77(void *data, object clo, int argc, object *args) ;/*closure _,object k_731381, object msg_7366_73970*/
static void __lambda_71(void *data, object clo, int argc, object *args) ;/*closure _,object k_731372, object level_7362_73966, object msg_7363_73967, object pp_7364_73968, object prefix_7365_73969*/
static void __lambda_72(void *data, object clo, int argc, object *args) ;/*object self_733126, object r_731374*/
static void __lambda_73(void *data, object clo, int argc, object *args) ;/*object self_733127, object r_731375*/
static void __lambda_74(void *data, object clo, int argc, object *args) ;/*object self_733128, object r_731376*/
static void __lambda_75(void *data, object clo, int argc, object *args) ;/*object self_733129, object r_731377*/
static void __lambda_76(void *data, object clo, int argc, object *args) ;/*object self_733130, object r_731378*/
static void __lambda_70(void *data, object clo, int argc, object *args) ;/*closure _,object k_731365*/
static void __lambda_1(void *data, object clo, int argc, object *args) ;/*closure _,object k_731272, object exp_731_73928*/
static void __lambda_2(void *data, object clo, int argc, object *args) ;/*object self_733051, object check_91define_73936, object check_91if_73937, object check_91lambda_73938, object check_91set_73939, object include_91var_127_73940, object search_73941, object update_91vars_73942*/
static void __lambda_785(void *data, object clo, int argc, object *args) ;/*object self_733052, object check_91define_73936*/
static void __lambda_784(void *data, object clo, int argc, object *args) ;/*object self_733053, object check_91if_73937*/
static void __lambda_783(void *data, object clo, int argc, object *args) ;/*object self_733054, object check_91lambda_73938*/
static void __lambda_782(void *data, object clo, int argc, object *args) ;/*object self_733055, object check_91set_73939*/
static void __lambda_781(void *data, object clo, int argc, object *args) ;/*object self_733056, object include_91var_127_73940*/
static void __lambda_780(void *data, object clo, int argc, object *args) ;/*object self_733057, object search_73941*/
static void __lambda_779(void *data, object clo, int argc, object *args) ;/*object self_733058, object update_91vars_73942*/
static void __lambda_69(void *data, object clo, int argc, object *args) ;/*object self_733059, object k_731361, object v_732_73950*/
static void __lambda_3(void *data, object clo, int argc, object *args) ;/*object self_733060, object r_731360*/
static void __lambda_4(void *data, object clo, int argc, object *args) ;/*object self_733061, object r_731273*/
static void __lambda_67(void *data, object clo, int argc, object *args) ;/*object self_733062, object k_731356, object exp_733_73951*/
static void __lambda_68(void *data, object clo, int argc, object *args) ;/*object self_733063, object args_734_73952*/
static void __lambda_5(void *data, object clo, int argc, object *args) ;/*object self_733064, object r_731355*/
static void __lambda_6(void *data, object clo, int argc, object *args) ;/*object self_733065, object r_731274*/
static void __lambda_65(void *data, object clo, int argc, object *args) ;/*object self_733066, object k_731352, object exp_7311_73953*/
static void __lambda_66(void *data, object clo, int argc, object *args) ;/*object self_733067, object args_7312_73954*/
static void __lambda_7(void *data, object clo, int argc, object *args) ;/*object self_733068, object r_731351*/
static void __lambda_8(void *data, object clo, int argc, object *args) ;/*object self_733069, object r_731275*/
static void __lambda_63(void *data, object clo, int argc, object *args) ;/*object self_733070, object k_731348, object exp_7316_73955*/
static void __lambda_64(void *data, object clo, int argc, object *args) ;/*object self_733071, object args_7317_73956*/
static void __lambda_9(void *data, object clo, int argc, object *args) ;/*object self_733072, object r_731347*/
static void __lambda_10(void *data, object clo, int argc, object *args) ;/*object self_733073, object r_731276*/
static void __lambda_59(void *data, object clo, int argc, object *args) ;/*object self_733074, object k_731342, object exp_7321_73957*/
static void __lambda_60(void *data, object clo, int argc, object *args) ;/*object self_733075, object num_91args_7322_73958*/
static void __lambda_62(void *data, object clo, int argc, object *args) ;/*object self_733076, object r_731343*/
static void __lambda_61(void *data, object clo, int argc, object *args) ;/*object self_733077, object k_731345*/
static void __lambda_11(void *data, object clo, int argc, object *args) ;/*object self_733078, object r_731341*/
static void __lambda_12(void *data, object clo, int argc, object *args) ;/*object self_733079, object r_731277*/
static void __lambda_57(void *data, object clo, int argc, object *args) ;/*object self_733080, object k_731339, object syms_7326_73959, object vars_7327_73960*/
static void __lambda_58(void *data, object clo, int argc, object *args) ;/*object self_733081, object r_731340*/
static void __lambda_13(void *data, object clo, int argc, object *args) ;/*object self_733082, object r_731338*/
static void __lambda_14(void *data, object clo, int argc, object *args) ;/*object self_733083, object r_731278*/
static void __lambda_17(void *data, object clo, int argc, object *args) ;/*object self_733084, object k_731282, object exp_7328_73961, object vars_7329_73962*/
static void __lambda_18(void *data, object clo, int argc, object *args) ;/*object self_733085, object r_731284*/
static void __lambda_19(void *data, object clo, int argc, object *args) ;/*object self_733086, object r_731285*/
static void __lambda_20(void *data, object clo, int argc, object *args) ;/*object self_733087, object r_731286*/
static void __lambda_21(void *data, object clo, int argc, object *args) ;/*object self_733088, object r_731287*/
static void __lambda_32(void *data, object clo, int argc, object *args) ;/*object self_733096, object r_731297*/
static void __lambda_37(void *data, object clo, int argc, object *args) ;/*object self_733101, object r_731306*/
static void __lambda_47(void *data, object clo, int argc, object *args) ;/*object self_733111, object r_731319*/
static void __lambda_48(void *data, object clo, int argc, object *args) ;/*object self_733112, object r_731320*/
static void __lambda_54(void *data, object clo, int argc, object *args) ;/*object self_733118, object r_731331*/
static void __lambda_56(void *data, object clo, int argc, object *args) ;/*object self_733119, object k_731333, object e_7360_73965*/
static void __lambda_55(void *data, object clo, int argc, object *args) ;/*object self_733120, object r_731332*/
static void __lambda_51(void *data, object clo, int argc, object *args) ;/*object self_733113, object r_731321*/
static void __lambda_52(void *data, object clo, int argc, object *args) ;/*object self_733114, object r_731322*/
static void __lambda_53(void *data, object clo, int argc, object *args) ;/*object self_733115, object r_731324*/
static void __lambda_49(void *data, object clo, int argc, object *args) ;/*object self_733116, object k_731328*/
static void __lambda_50(void *data, object clo, int argc, object *args) ;/*object self_733117, object r_731329*/
static void __lambda_40(void *data, object clo, int argc, object *args) ;/*object self_733102, object r_731307*/
static void __lambda_41(void *data, object clo, int argc, object *args) ;/*object self_733103, object r_731315*/
static void __lambda_42(void *data, object clo, int argc, object *args) ;/*object self_733104, object r_731308*/
static void __lambda_44(void *data, object clo, int argc, object *args) ;/*object self_733105, object k_731311, object e_7350_73964*/
static void __lambda_45(void *data, object clo, int argc, object *args) ;/*object self_733106, object r_731314*/
static void __lambda_46(void *data, object clo, int argc, object *args) ;/*object self_733107, object r_731312*/
static void __lambda_43(void *data, object clo, int argc, object *args) ;/*object self_733108, object r_731309*/
static void __lambda_38(void *data, object clo, int argc, object *args) ;/*object self_733109, object k_731316*/
static void __lambda_39(void *data, object clo, int argc, object *args) ;/*object self_733110, object r_731317*/
static void __lambda_33(void *data, object clo, int argc, object *args) ;/*object self_733097, object r_731298*/
static void __lambda_34(void *data, object clo, int argc, object *args) ;/*object self_733098, object r_731299*/
static void __lambda_35(void *data, object clo, int argc, object *args) ;/*object self_733099, object r_731304*/
static void __lambda_36(void *data, object clo, int argc, object *args) ;/*object self_733100, object r_731300*/
static void __lambda_29(void *data, object clo, int argc, object *args) ;/*object self_733121, object k_731334*/
static void __lambda_30(void *data, object clo, int argc, object *args) ;/*object self_733122, object r_731335*/
static void __lambda_31(void *data, object clo, int argc, object *args) ;/*object self_733123, object r_731336*/
static void __lambda_24(void *data, object clo, int argc, object *args) ;/*object self_733089, object r_731288*/
static void __lambda_26(void *data, object clo, int argc, object *args) ;/*object self_733090, object k_731291, object e_7342_73963*/
static void __lambda_27(void *data, object clo, int argc, object *args) ;/*object self_733091, object r_731293*/
static void __lambda_28(void *data, object clo, int argc, object *args) ;/*object self_733092, object r_731292*/
static void __lambda_25(void *data, object clo, int argc, object *args) ;/*object self_733093, object r_731289*/
static void __lambda_22(void *data, object clo, int argc, object *args) ;/*object self_733094, object k_731294*/
static void __lambda_23(void *data, object clo, int argc, object *args) ;/*object self_733095, object r_731295*/
static void __lambda_15(void *data, object clo, int argc, object *args) ;/*object self_733124, object r_731281*/
static void __lambda_16(void *data, object clo, int argc, object *args) ;/*object self_733125, object r_731279*/

static void __lambda_776(void *data, object _, int argc, object *args) /* closure _,object k_732832 */
 {
object k_732832 = args[0];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:lib-init:schemecyclonetransforms");

closureN_type c_739850;
object e_739859 [1];
c_739850.hdr.mark = gc_color_red;
 c_739850.hdr.grayed = 0;
c_739850.tag = closureN_tag;
 c_739850.fn = (function_type)__lambda_777;
c_739850.num_args = 1;
c_739850.num_elements = 1;
c_739850.elements = (object *)e_739859;
c_739850.elements[0] = k_732832;


object c_739862 = global_set_cps_id(data,(closure)&c_739850,"__glo_mutable_91variables_scheme_cyclone_transforms", __glo_mutable_91variables_scheme_cyclone_transforms, NULL);
return_closcall1(data,(closure)&c_739850,  c_739862);; 
}

static void __lambda_777(void *data, object self_733786, int argc, object *args) /* object self_733786, object r_732836 */
 {

  
closureN_type c_739852;
object e_739858 [1];
c_739852.hdr.mark = gc_color_red;
 c_739852.hdr.grayed = 0;
c_739852.tag = closureN_tag;
 c_739852.fn = (function_type)__lambda_778;
c_739852.num_args = 1;
c_739852.num_elements = 1;
c_739852.elements = (object *)e_739858;
c_739852.elements[0] = ((closureN)self_733786)->elements[0];

return_direct_with_clo2(data,  __glo_alist_91_125hash_91table_srfi_69, (((closure)  __glo_alist_91_125hash_91table_srfi_69)->fn),  &c_739852, __glo__85primitives_91num_91args_85_scheme_cyclone_primitives);; 
}

static void __lambda_778(void *data, object self_733787, int argc, object *args) /* object self_733787, object r_732837 */
 {
 object r_732837 = args[0];
  
object c_739857 = global_set_cps_id(data,  ((closureN)self_733787)->elements[0],"__glo__85prim_91args_91table_85_scheme_cyclone_transforms", __glo__85prim_91args_91table_85_scheme_cyclone_transforms, r_732837);
return_direct_with_clo1(data,  ((closureN)self_733787)->elements[0], (((closure)  ((closureN)self_733787)->elements[0])->fn),  c_739857);; 
}

static void __lambda_661(void *data, object _, int argc, object *args) /* closure _,object k_732605, object ast_73781_731215 */
 {
object k_732605 = args[0]; object ast_73781_731215 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:cps-convert");

closureN_type c_738877;
object e_739847 [2];
c_738877.hdr.mark = gc_color_red;
 c_738877.hdr.grayed = 0;
c_738877.tag = closureN_tag;
 c_738877.fn = (function_type)__lambda_662;
c_738877.num_args = 4;
c_738877.num_elements = 2;
c_738877.elements = (object *)e_739847;
c_738877.elements[0] = ast_73781_731215;
c_738877.elements[1] = k_732605;

return_direct_with_clo4(data,(closure)&c_738877,__lambda_662,  boolean_f, boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_662(void *data, object self_733667, int argc, object *args) /* object self_733667, object cps_731221, object cps_91list_731222, object cps_91seq_731223, object remove_91unused_731224 */
 {
 object cps_731221 = args[0]; object cps_91list_731222 = args[1]; object cps_91seq_731223 = args[2]; object remove_91unused_731224 = args[3];
  
closureN_type c_738879;
object e_739843 [5];
c_738879.hdr.mark = gc_color_red;
 c_738879.hdr.grayed = 0;
c_738879.tag = closureN_tag;
 c_738879.fn = (function_type)__lambda_808;
c_738879.num_args = 1;
c_738879.num_elements = 5;
c_738879.elements = (object *)e_739843;
c_738879.elements[0] = ((closureN)self_733667)->elements[0];
c_738879.elements[1] = cps_91list_731222;
c_738879.elements[2] = cps_91seq_731223;
c_738879.elements[3] = ((closureN)self_733667)->elements[1];
c_738879.elements[4] = remove_91unused_731224;


pair_type local_739846; 
return_direct_with_clo1(data,(closure)&c_738879,__lambda_808,  set_cell_as_expr(&local_739846, cps_731221));; 
}

static void __lambda_808(void *data, object self_733668, int argc, object *args) /* object self_733668, object cps_731221 */
 {
 object cps_731221 = args[0];
  
closureN_type c_738881;
object e_739838 [5];
c_738881.hdr.mark = gc_color_red;
 c_738881.hdr.grayed = 0;
c_738881.tag = closureN_tag;
 c_738881.fn = (function_type)__lambda_807;
c_738881.num_args = 1;
c_738881.num_elements = 5;
c_738881.elements = (object *)e_739838;
c_738881.elements[0] = ((closureN)self_733668)->elements[0];
c_738881.elements[1] = cps_731221;
c_738881.elements[2] = ((closureN)self_733668)->elements[2];
c_738881.elements[3] = ((closureN)self_733668)->elements[3];
c_738881.elements[4] = ((closureN)self_733668)->elements[4];


pair_type local_739841; 
return_direct_with_clo1(data,(closure)&c_738881,__lambda_807,  set_cell_as_expr(&local_739841, ((closureN)self_733668)->elements[1]));; 
}

static void __lambda_807(void *data, object self_733669, int argc, object *args) /* object self_733669, object cps_91list_731222 */
 {
 object cps_91list_731222 = args[0];
  
closureN_type c_738883;
object e_739833 [5];
c_738883.hdr.mark = gc_color_red;
 c_738883.hdr.grayed = 0;
c_738883.tag = closureN_tag;
 c_738883.fn = (function_type)__lambda_806;
c_738883.num_args = 1;
c_738883.num_elements = 5;
c_738883.elements = (object *)e_739833;
c_738883.elements[0] = ((closureN)self_733669)->elements[0];
c_738883.elements[1] = ((closureN)self_733669)->elements[1];
c_738883.elements[2] = cps_91list_731222;
c_738883.elements[3] = ((closureN)self_733669)->elements[3];
c_738883.elements[4] = ((closureN)self_733669)->elements[4];


pair_type local_739836; 
return_direct_with_clo1(data,(closure)&c_738883,__lambda_806,  set_cell_as_expr(&local_739836, ((closureN)self_733669)->elements[2]));; 
}

static void __lambda_806(void *data, object self_733670, int argc, object *args) /* object self_733670, object cps_91seq_731223 */
 {
 object cps_91seq_731223 = args[0];
  
closureN_type c_738885;
object e_739828 [5];
c_738885.hdr.mark = gc_color_red;
 c_738885.hdr.grayed = 0;
c_738885.tag = closureN_tag;
 c_738885.fn = (function_type)__lambda_805;
c_738885.num_args = 1;
c_738885.num_elements = 5;
c_738885.elements = (object *)e_739828;
c_738885.elements[0] = ((closureN)self_733670)->elements[0];
c_738885.elements[1] = ((closureN)self_733670)->elements[1];
c_738885.elements[2] = ((closureN)self_733670)->elements[2];
c_738885.elements[3] = cps_91seq_731223;
c_738885.elements[4] = ((closureN)self_733670)->elements[3];


pair_type local_739831; 
return_direct_with_clo1(data,(closure)&c_738885,__lambda_805,  set_cell_as_expr(&local_739831, ((closureN)self_733670)->elements[4]));; 
}

static void __lambda_805(void *data, object self_733671, int argc, object *args) /* object self_733671, object remove_91unused_731224 */
 {
 object remove_91unused_731224 = args[0];
  
closureN_type c_738887;
object e_739142 [6];
c_738887.hdr.mark = gc_color_red;
 c_738887.hdr.grayed = 0;
c_738887.tag = closureN_tag;
 c_738887.fn = (function_type)__lambda_663;
c_738887.num_args = 1;
c_738887.num_elements = 6;
c_738887.elements = (object *)e_739142;
c_738887.elements[0] = ((closureN)self_733671)->elements[0];
c_738887.elements[1] = ((closureN)self_733671)->elements[1];
c_738887.elements[2] = ((closureN)self_733671)->elements[2];
c_738887.elements[3] = ((closureN)self_733671)->elements[3];
c_738887.elements[4] = ((closureN)self_733671)->elements[4];
c_738887.elements[5] = remove_91unused_731224;


closureN_type c_739143;
object e_739827 [3];
c_739143.hdr.mark = gc_color_red;
 c_739143.hdr.grayed = 0;
c_739143.tag = closureN_tag;
 c_739143.fn = (function_type)__lambda_696;
c_739143.num_args = 2;
c_739143.num_elements = 3;
c_739143.elements = (object *)e_739827;
c_739143.elements[0] = ((closureN)self_733671)->elements[1];
c_739143.elements[1] = ((closureN)self_733671)->elements[2];
c_739143.elements[2] = ((closureN)self_733671)->elements[3];

return_direct_with_clo1(data,(closure)&c_738887,__lambda_663,  &c_739143);; 
}

static void __lambda_696(void *data, object self_733672, int argc, object *args) /* object self_733672, object k_732671, object ast_73782_731229, object cont_91ast_73783_731230 */
 {
 object k_732671 = args[0]; object ast_73782_731229 = args[1]; object cont_91ast_73783_731230 = args[2];
  
closureN_type c_739145;
object e_739826 [6];
c_739145.hdr.mark = gc_color_red;
 c_739145.hdr.grayed = 0;
c_739145.tag = closureN_tag;
 c_739145.fn = (function_type)__lambda_697;
c_739145.num_args = 1;
c_739145.num_elements = 6;
c_739145.elements = (object *)e_739826;
c_739145.elements[0] = ast_73782_731229;
c_739145.elements[1] = cont_91ast_73783_731230;
c_739145.elements[2] = ((closureN)self_733672)->elements[0];
c_739145.elements[3] = ((closureN)self_733672)->elements[1];
c_739145.elements[4] = ((closureN)self_733672)->elements[2];
c_739145.elements[5] = k_732671;

return_direct_with_clo2(data,  __glo_const_127_scheme_cyclone_util, (((closure)  __glo_const_127_scheme_cyclone_util)->fn),  &c_739145, ast_73782_731229);; 
}

static void __lambda_697(void *data, object self_733673, int argc, object *args) /* object self_733673, object r_732672 */
 {
 object r_732672 = args[0];
  if( (boolean_f != r_732672) ){ 
  
list_2_type local_739150; 
return_direct_with_clo1(data,  ((closureN)self_733673)->elements[5], (((closure)  ((closureN)self_733673)->elements[5])->fn),  Cyc_fast_list_2(&local_739150, ((closureN)self_733673)->elements[1], ((closureN)self_733673)->elements[0]));
} else { 
  
closureN_type c_739154;
object e_739821 [6];
c_739154.hdr.mark = gc_color_red;
 c_739154.hdr.grayed = 0;
c_739154.tag = closureN_tag;
 c_739154.fn = (function_type)__lambda_698;
c_739154.num_args = 1;
c_739154.num_elements = 6;
c_739154.elements = (object *)e_739821;
c_739154.elements[0] = ((closureN)self_733673)->elements[0];
c_739154.elements[1] = ((closureN)self_733673)->elements[1];
c_739154.elements[2] = ((closureN)self_733673)->elements[2];
c_739154.elements[3] = ((closureN)self_733673)->elements[3];
c_739154.elements[4] = ((closureN)self_733673)->elements[4];
c_739154.elements[5] = ((closureN)self_733673)->elements[5];


complex_num_type local_739824; 
return_direct_with_clo1(data,(closure)&c_739154,__lambda_698,  ((inline_function_type)
                   ((closure)__glo_ref_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_739824, ((closureN)self_733673)->elements[0]));}
;; 
}

static void __lambda_698(void *data, object self_733674, int argc, object *args) /* object self_733674, object r_732673 */
 {
 object r_732673 = args[0];
  if( (boolean_f != r_732673) ){ 
  
list_2_type local_739159; 
return_direct_with_clo1(data,  ((closureN)self_733674)->elements[5], (((closure)  ((closureN)self_733674)->elements[5])->fn),  Cyc_fast_list_2(&local_739159, ((closureN)self_733674)->elements[1], ((closureN)self_733674)->elements[0]));
} else { 
  
closureN_type c_739163;
object e_739819 [6];
c_739163.hdr.mark = gc_color_red;
 c_739163.hdr.grayed = 0;
c_739163.tag = closureN_tag;
 c_739163.fn = (function_type)__lambda_699;
c_739163.num_args = 1;
c_739163.num_elements = 6;
c_739163.elements = (object *)e_739819;
c_739163.elements[0] = ((closureN)self_733674)->elements[0];
c_739163.elements[1] = ((closureN)self_733674)->elements[1];
c_739163.elements[2] = ((closureN)self_733674)->elements[2];
c_739163.elements[3] = ((closureN)self_733674)->elements[3];
c_739163.elements[4] = ((closureN)self_733674)->elements[4];
c_739163.elements[5] = ((closureN)self_733674)->elements[5];

return_direct_with_clo2(data,  __glo_quote_127_scheme_cyclone_util, (((closure)  __glo_quote_127_scheme_cyclone_util)->fn),  &c_739163, ((closureN)self_733674)->elements[0]);}
;; 
}

static void __lambda_699(void *data, object self_733675, int argc, object *args) /* object self_733675, object r_732674 */
 {
 object r_732674 = args[0];
  if( (boolean_f != r_732674) ){ 
  
list_2_type local_739168; 
return_direct_with_clo1(data,  ((closureN)self_733675)->elements[5], (((closure)  ((closureN)self_733675)->elements[5])->fn),  Cyc_fast_list_2(&local_739168, ((closureN)self_733675)->elements[1], ((closureN)self_733675)->elements[0]));
} else { 
  
closureN_type c_739172;
object e_739817 [6];
c_739172.hdr.mark = gc_color_red;
 c_739172.hdr.grayed = 0;
c_739172.tag = closureN_tag;
 c_739172.fn = (function_type)__lambda_700;
c_739172.num_args = 1;
c_739172.num_elements = 6;
c_739172.elements = (object *)e_739817;
c_739172.elements[0] = ((closureN)self_733675)->elements[0];
c_739172.elements[1] = ((closureN)self_733675)->elements[1];
c_739172.elements[2] = ((closureN)self_733675)->elements[2];
c_739172.elements[3] = ((closureN)self_733675)->elements[3];
c_739172.elements[4] = ((closureN)self_733675)->elements[4];
c_739172.elements[5] = ((closureN)self_733675)->elements[5];

return_direct_with_clo2(data,  __glo_set_67_127_scheme_cyclone_util, (((closure)  __glo_set_67_127_scheme_cyclone_util)->fn),  &c_739172, ((closureN)self_733675)->elements[0]);}
;; 
}

static void __lambda_700(void *data, object self_733676, int argc, object *args) /* object self_733676, object r_732675 */
 {
 object r_732675 = args[0];
  if( (boolean_f != r_732675) ){ 
  
closureN_type c_739174;
object e_739183 [3];
c_739174.hdr.mark = gc_color_red;
 c_739174.hdr.grayed = 0;
c_739174.tag = closureN_tag;
 c_739174.fn = (function_type)__lambda_701;
c_739174.num_args = 1;
c_739174.num_elements = 3;
c_739174.elements = (object *)e_739183;
c_739174.elements[0] = ((closureN)self_733676)->elements[0];
c_739174.elements[1] = ((closureN)self_733676)->elements[3];
c_739174.elements[2] = ((closureN)self_733676)->elements[5];


closureN_type c_739184;
object e_739199 [2];
c_739184.hdr.mark = gc_color_red;
 c_739184.hdr.grayed = 0;
c_739184.tag = closureN_tag;
 c_739184.fn = (function_type)__lambda_702;
c_739184.num_args = 1;
c_739184.num_elements = 2;
c_739184.elements = (object *)e_739199;
c_739184.elements[0] = ((closureN)self_733676)->elements[0];
c_739184.elements[1] = ((closureN)self_733676)->elements[1];

return_direct_with_clo1(data,(closure)&c_739174,__lambda_701,  &c_739184);
} else { 
  
closureN_type c_739201;
object e_739815 [6];
c_739201.hdr.mark = gc_color_red;
 c_739201.hdr.grayed = 0;
c_739201.tag = closureN_tag;
 c_739201.fn = (function_type)__lambda_703;
c_739201.num_args = 1;
c_739201.num_elements = 6;
c_739201.elements = (object *)e_739815;
c_739201.elements[0] = ((closureN)self_733676)->elements[0];
c_739201.elements[1] = ((closureN)self_733676)->elements[1];
c_739201.elements[2] = ((closureN)self_733676)->elements[2];
c_739201.elements[3] = ((closureN)self_733676)->elements[3];
c_739201.elements[4] = ((closureN)self_733676)->elements[4];
c_739201.elements[5] = ((closureN)self_733676)->elements[5];

return_direct_with_clo2(data,  __glo_if_127_scheme_cyclone_util, (((closure)  __glo_if_127_scheme_cyclone_util)->fn),  &c_739201, ((closureN)self_733676)->elements[0]);}
;; 
}

static void __lambda_703(void *data, object self_733679, int argc, object *args) /* object self_733679, object r_732683 */
 {
 object r_732683 = args[0];
  if( (boolean_f != r_732683) ){ 
  
closureN_type c_739203;
object e_739238 [2];
c_739203.hdr.mark = gc_color_red;
 c_739203.hdr.grayed = 0;
c_739203.tag = closureN_tag;
 c_739203.fn = (function_type)__lambda_704;
c_739203.num_args = 1;
c_739203.num_elements = 2;
c_739203.elements = (object *)e_739238;
c_739203.elements[0] = ((closureN)self_733679)->elements[1];
c_739203.elements[1] = ((closureN)self_733679)->elements[5];


closureN_type c_739239;
object e_739285 [3];
c_739239.hdr.mark = gc_color_red;
 c_739239.hdr.grayed = 0;
c_739239.tag = closureN_tag;
 c_739239.fn = (function_type)__lambda_709;
c_739239.num_args = 1;
c_739239.num_elements = 3;
c_739239.elements = (object *)e_739285;
c_739239.elements[0] = ((closureN)self_733679)->elements[0];
c_739239.elements[1] = ((closureN)self_733679)->elements[2];
c_739239.elements[2] = ((closureN)self_733679)->elements[3];

return_direct_with_clo1(data,(closure)&c_739203,__lambda_704,  &c_739239);
} else { 
  
closureN_type c_739287;
object e_739813 [6];
c_739287.hdr.mark = gc_color_red;
 c_739287.hdr.grayed = 0;
c_739287.tag = closureN_tag;
 c_739287.fn = (function_type)__lambda_714;
c_739287.num_args = 1;
c_739287.num_elements = 6;
c_739287.elements = (object *)e_739813;
c_739287.elements[0] = ((closureN)self_733679)->elements[0];
c_739287.elements[1] = ((closureN)self_733679)->elements[1];
c_739287.elements[2] = ((closureN)self_733679)->elements[2];
c_739287.elements[3] = ((closureN)self_733679)->elements[3];
c_739287.elements[4] = ((closureN)self_733679)->elements[4];
c_739287.elements[5] = ((closureN)self_733679)->elements[5];

return_direct_with_clo2(data,  __glo_prim_91call_127_scheme_cyclone_primitives, (((closure)  __glo_prim_91call_127_scheme_cyclone_primitives)->fn),  &c_739287, ((closureN)self_733679)->elements[0]);}
;; 
}

static void __lambda_714(void *data, object self_733690, int argc, object *args) /* object self_733690, object r_732703 */
 {
 object r_732703 = args[0];
  if( (boolean_f != r_732703) ){ 
  
closureN_type c_739289;
object e_739330 [4];
c_739289.hdr.mark = gc_color_red;
 c_739289.hdr.grayed = 0;
c_739289.tag = closureN_tag;
 c_739289.fn = (function_type)__lambda_715;
c_739289.num_args = 1;
c_739289.num_elements = 4;
c_739289.elements = (object *)e_739330;
c_739289.elements[0] = ((closureN)self_733690)->elements[0];
c_739289.elements[1] = ((closureN)self_733690)->elements[1];
c_739289.elements[2] = ((closureN)self_733690)->elements[3];
c_739289.elements[3] = ((closureN)self_733690)->elements[5];



return_direct_with_clo4(data,  __glo_hash_91table_91ref_95default_srfi_69, (((closure)  __glo_hash_91table_91ref_95default_srfi_69)->fn),  &c_739289, __glo__85prim_91args_91table_85_scheme_cyclone_transforms, Cyc_car(data, ((closureN)self_733690)->elements[0]), boolean_f);
} else { 
  
closureN_type c_739335;
object e_739811 [6];
c_739335.hdr.mark = gc_color_red;
 c_739335.hdr.grayed = 0;
c_739335.tag = closureN_tag;
 c_739335.fn = (function_type)__lambda_720;
c_739335.num_args = 1;
c_739335.num_elements = 6;
c_739335.elements = (object *)e_739811;
c_739335.elements[0] = ((closureN)self_733690)->elements[0];
c_739335.elements[1] = ((closureN)self_733690)->elements[1];
c_739335.elements[2] = ((closureN)self_733690)->elements[2];
c_739335.elements[3] = ((closureN)self_733690)->elements[3];
c_739335.elements[4] = ((closureN)self_733690)->elements[4];
c_739335.elements[5] = ((closureN)self_733690)->elements[5];

return_direct_with_clo2(data,  __glo_lambda_127_scheme_cyclone_util, (((closure)  __glo_lambda_127_scheme_cyclone_util)->fn),  &c_739335, ((closureN)self_733690)->elements[0]);}
;; 
}

static void __lambda_720(void *data, object self_733696, int argc, object *args) /* object self_733696, object r_732715 */
 {
 object r_732715 = args[0];
  if( (boolean_f != r_732715) ){ 
  
closureN_type c_739337;
object e_739401 [4];
c_739337.hdr.mark = gc_color_red;
 c_739337.hdr.grayed = 0;
c_739337.tag = closureN_tag;
 c_739337.fn = (function_type)__lambda_721;
c_739337.num_args = 1;
c_739337.num_elements = 4;
c_739337.elements = (object *)e_739401;
c_739337.elements[0] = ((closureN)self_733696)->elements[0];
c_739337.elements[1] = ((closureN)self_733696)->elements[1];
c_739337.elements[2] = ((closureN)self_733696)->elements[4];
c_739337.elements[3] = ((closureN)self_733696)->elements[5];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_739337, quote_k);
} else { 
  
closureN_type c_739403;
object e_739427 [1];
c_739403.hdr.mark = gc_color_red;
 c_739403.hdr.grayed = 0;
c_739403.tag = closureN_tag;
 c_739403.fn = (function_type)__lambda_732;
c_739403.num_args = 0;
c_739403.num_elements = 1;
c_739403.elements = (object *)e_739427;
c_739403.elements[0] = ((closureN)self_733696)->elements[0];


closureN_type c_739428;
object e_739810 [6];
c_739428.hdr.mark = gc_color_red;
 c_739428.hdr.grayed = 0;
c_739428.tag = closureN_tag;
 c_739428.fn = (function_type)__lambda_735;
c_739428.num_args = 1;
c_739428.num_elements = 6;
c_739428.elements = (object *)e_739810;
c_739428.elements[0] = ((closureN)self_733696)->elements[0];
c_739428.elements[1] = ((closureN)self_733696)->elements[1];
c_739428.elements[2] = ((closureN)self_733696)->elements[2];
c_739428.elements[3] = ((closureN)self_733696)->elements[3];
c_739428.elements[4] = ((closureN)self_733696)->elements[4];
c_739428.elements[5] = ((closureN)self_733696)->elements[5];

return_direct_with_clo1(data,(closure)&c_739403,__lambda_732,  &c_739428);}
;; 
}

static void __lambda_735(void *data, object self_733708, int argc, object *args) /* object self_733708, object r_732730 */
 {
 object r_732730 = args[0];
  if( (boolean_f != r_732730) ){ 
  
closureN_type c_739430;
object e_739548 [4];
c_739430.hdr.mark = gc_color_red;
 c_739430.hdr.grayed = 0;
c_739430.tag = closureN_tag;
 c_739430.fn = (function_type)__lambda_736;
c_739430.num_args = 1;
c_739430.num_elements = 4;
c_739430.elements = (object *)e_739548;
c_739430.elements[0] = ((closureN)self_733708)->elements[0];
c_739430.elements[1] = ((closureN)self_733708)->elements[1];
c_739430.elements[2] = ((closureN)self_733708)->elements[2];
c_739430.elements[3] = ((closureN)self_733708)->elements[5];



return_direct_with_clo2(data,  __glo_lambda_91num_91args_scheme_cyclone_transforms, (((closure)  __glo_lambda_91num_91args_scheme_cyclone_transforms)->fn),  &c_739430, Cyc_car(data, ((closureN)self_733708)->elements[0]));
} else { 
  
closureN_type c_739553;
object e_739577 [1];
c_739553.hdr.mark = gc_color_red;
 c_739553.hdr.grayed = 0;
c_739553.tag = closureN_tag;
 c_739553.fn = (function_type)__lambda_748;
c_739553.num_args = 0;
c_739553.num_elements = 1;
c_739553.elements = (object *)e_739577;
c_739553.elements[0] = ((closureN)self_733708)->elements[0];


closureN_type c_739578;
object e_739809 [6];
c_739578.hdr.mark = gc_color_red;
 c_739578.hdr.grayed = 0;
c_739578.tag = closureN_tag;
 c_739578.fn = (function_type)__lambda_751;
c_739578.num_args = 1;
c_739578.num_elements = 6;
c_739578.elements = (object *)e_739809;
c_739578.elements[0] = ((closureN)self_733708)->elements[0];
c_739578.elements[1] = ((closureN)self_733708)->elements[1];
c_739578.elements[2] = ((closureN)self_733708)->elements[2];
c_739578.elements[3] = ((closureN)self_733708)->elements[3];
c_739578.elements[4] = ((closureN)self_733708)->elements[4];
c_739578.elements[5] = ((closureN)self_733708)->elements[5];

return_direct_with_clo1(data,(closure)&c_739553,__lambda_748,  &c_739578);}
;; 
}

static void __lambda_751(void *data, object self_733721, int argc, object *args) /* object self_733721, object r_732764 */
 {
 object r_732764 = args[0];
  if( (boolean_f != r_732764) ){ 
  


pair_type local_739586; 

pair_type local_739589; 

pair_type local_739592; 

pair_type local_739595; 









pair_type local_739608; 

pair_type local_739611; 


return_closcall3(data,  car(((closureN)self_733721)->elements[2]),  ((closureN)self_733721)->elements[5], set_pair_as_expr(&local_739586, set_pair_as_expr(&local_739589, quote_lambda, set_pair_as_expr(&local_739592, set_pair_as_expr(&local_739595, Cyc_cadr(data, Cyc_car(data, ((closureN)self_733721)->elements[0])), NULL), Cyc_cddr(data, Cyc_car(data, ((closureN)self_733721)->elements[0])))), set_pair_as_expr(&local_739608, set_pair_as_expr(&local_739611, quote__list, Cyc_cdr(data, ((closureN)self_733721)->elements[0])), NULL)), ((closureN)self_733721)->elements[1]);
} else { 
  
closureN_type c_739617;
object e_739804 [5];
c_739617.hdr.mark = gc_color_red;
 c_739617.hdr.grayed = 0;
c_739617.tag = closureN_tag;
 c_739617.fn = (function_type)__lambda_752;
c_739617.num_args = 1;
c_739617.num_elements = 5;
c_739617.elements = (object *)e_739804;
c_739617.elements[0] = ((closureN)self_733721)->elements[0];
c_739617.elements[1] = ((closureN)self_733721)->elements[1];
c_739617.elements[2] = ((closureN)self_733721)->elements[3];
c_739617.elements[3] = ((closureN)self_733721)->elements[4];
c_739617.elements[4] = ((closureN)self_733721)->elements[5];


complex_num_type local_739807; 
return_direct_with_clo1(data,(closure)&c_739617,__lambda_752,  ((inline_function_type)
                   ((closure)__glo_app_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_739807, ((closureN)self_733721)->elements[0]));}
;; 
}

static void __lambda_752(void *data, object self_733722, int argc, object *args) /* object self_733722, object r_732779 */
 {
 object r_732779 = args[0];
  if( (boolean_f != r_732779) ){ 
  
closureN_type c_739619;
object e_739635 [1];
c_739619.hdr.mark = gc_color_red;
 c_739619.hdr.grayed = 0;
c_739619.tag = closureN_tag;
 c_739619.fn = (function_type)__lambda_753;
c_739619.num_args = 0;
c_739619.num_elements = 1;
c_739619.elements = (object *)e_739635;
c_739619.elements[0] = ((closureN)self_733722)->elements[0];


closureN_type c_739636;
object e_739799 [5];
c_739636.hdr.mark = gc_color_red;
 c_739636.hdr.grayed = 0;
c_739636.tag = closureN_tag;
 c_739636.fn = (function_type)__lambda_756;
c_739636.num_args = 1;
c_739636.num_elements = 5;
c_739636.elements = (object *)e_739799;
c_739636.elements[0] = ((closureN)self_733722)->elements[0];
c_739636.elements[1] = ((closureN)self_733722)->elements[1];
c_739636.elements[2] = ((closureN)self_733722)->elements[2];
c_739636.elements[3] = ((closureN)self_733722)->elements[3];
c_739636.elements[4] = ((closureN)self_733722)->elements[4];

return_direct_with_clo1(data,(closure)&c_739619,__lambda_753,  &c_739636);
} else { 
  
make_utf8_string_with_len(c_739802, "unknown ast", 11, 11);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_733722)->elements[4], &c_739802, ((closureN)self_733722)->elements[0]);}
;; 
}

static void __lambda_756(void *data, object self_733723, int argc, object *args) /* object self_733723, object r_732780 */
 {

  
closureN_type c_739638;
object e_739795 [5];
c_739638.hdr.mark = gc_color_red;
 c_739638.hdr.grayed = 0;
c_739638.tag = closureN_tag;
 c_739638.fn = (function_type)__lambda_757;
c_739638.num_args = 1;
c_739638.num_elements = 5;
c_739638.elements = (object *)e_739795;
c_739638.elements[0] = ((closureN)self_733723)->elements[0];
c_739638.elements[1] = ((closureN)self_733723)->elements[1];
c_739638.elements[2] = ((closureN)self_733723)->elements[2];
c_739638.elements[3] = ((closureN)self_733723)->elements[3];
c_739638.elements[4] = ((closureN)self_733723)->elements[4];



return_direct_with_clo1(data,(closure)&c_739638,__lambda_757,  Cyc_car(data, ((closureN)self_733723)->elements[0]));; 
}

static void __lambda_757(void *data, object self_733724, int argc, object *args) /* object self_733724, object fn_73864_731249_732994 */
 {
 object fn_73864_731249_732994 = args[0];
  
closureN_type c_739640;
object e_739794 [6];
c_739640.hdr.mark = gc_color_red;
 c_739640.hdr.grayed = 0;
c_739640.tag = closureN_tag;
 c_739640.fn = (function_type)__lambda_758;
c_739640.num_args = 1;
c_739640.num_elements = 6;
c_739640.elements = (object *)e_739794;
c_739640.elements[0] = ((closureN)self_733724)->elements[0];
c_739640.elements[1] = ((closureN)self_733724)->elements[1];
c_739640.elements[2] = ((closureN)self_733724)->elements[2];
c_739640.elements[3] = ((closureN)self_733724)->elements[3];
c_739640.elements[4] = fn_73864_731249_732994;
c_739640.elements[5] = ((closureN)self_733724)->elements[4];

return_direct_with_clo2(data,  __glo_lambda_127_scheme_cyclone_util, (((closure)  __glo_lambda_127_scheme_cyclone_util)->fn),  &c_739640, fn_73864_731249_732994);; 
}

static void __lambda_758(void *data, object self_733725, int argc, object *args) /* object self_733725, object r_732782_732995 */
 {
 object r_732782_732995 = args[0];
  if( (boolean_f != r_732782_732995) ){ 
  
closureN_type c_739642;
object e_739769 [6];
c_739642.hdr.mark = gc_color_red;
 c_739642.hdr.grayed = 0;
c_739642.tag = closureN_tag;
 c_739642.fn = (function_type)__lambda_759;
c_739642.num_args = 1;
c_739642.num_elements = 6;
c_739642.elements = (object *)e_739769;
c_739642.elements[0] = ((closureN)self_733725)->elements[0];
c_739642.elements[1] = ((closureN)self_733725)->elements[1];
c_739642.elements[2] = ((closureN)self_733725)->elements[2];
c_739642.elements[3] = ((closureN)self_733725)->elements[3];
c_739642.elements[4] = ((closureN)self_733725)->elements[4];
c_739642.elements[5] = ((closureN)self_733725)->elements[5];

return_direct_with_clo2(data,  __glo_lambda_91num_91args_scheme_cyclone_transforms, (((closure)  __glo_lambda_91num_91args_scheme_cyclone_transforms)->fn),  &c_739642, ((closureN)self_733725)->elements[4]);
} else { 
  
closureN_type c_739772;
object e_739779 [3];
c_739772.hdr.mark = gc_color_red;
 c_739772.hdr.grayed = 0;
c_739772.tag = closureN_tag;
 c_739772.fn = (function_type)__lambda_774;
c_739772.num_args = 1;
c_739772.num_elements = 3;
c_739772.elements = (object *)e_739779;
c_739772.elements[0] = ((closureN)self_733725)->elements[0];
c_739772.elements[1] = ((closureN)self_733725)->elements[2];
c_739772.elements[2] = ((closureN)self_733725)->elements[5];


closureN_type c_739780;
object e_739793 [1];
c_739780.hdr.mark = gc_color_red;
 c_739780.hdr.grayed = 0;
c_739780.tag = closureN_tag;
 c_739780.fn = (function_type)__lambda_775;
c_739780.num_args = 1;
c_739780.num_elements = 1;
c_739780.elements = (object *)e_739793;
c_739780.elements[0] = ((closureN)self_733725)->elements[1];

return_direct_with_clo1(data,(closure)&c_739772,__lambda_774,  &c_739780);}
;; 
}

static void __lambda_775(void *data, object self_733741, int argc, object *args) /* object self_733741, object k_732809_733020, object args_73880_731254_733021 */
 {
 object k_732809_733020 = args[0]; object args_73880_731254_733021 = args[1];
  
pair_type local_739784; 



pair_type local_739789; 


return_direct_with_clo1(data,  k_732809_733020, (((closure)  k_732809_733020)->fn),  set_pair_as_expr(&local_739784, Cyc_car(data, args_73880_731254_733021), set_pair_as_expr(&local_739789, ((closureN)self_733741)->elements[0], Cyc_cdr(data, args_73880_731254_733021))));; 
}

static void __lambda_774(void *data, object self_733742, int argc, object *args) /* object self_733742, object r_732808_733019 */
 {
 object r_732808_733019 = args[0];
  

return_closcall3(data,  car(((closureN)self_733742)->elements[1]),  ((closureN)self_733742)->elements[2], ((closureN)self_733742)->elements[0], r_732808_733019);; 
}

static void __lambda_759(void *data, object self_733726, int argc, object *args) /* object self_733726, object r_732783_732996 */
 {
 object r_732783_732996 = args[0];
  
closureN_type c_739644;
object e_739767 [7];
c_739644.hdr.mark = gc_color_red;
 c_739644.hdr.grayed = 0;
c_739644.tag = closureN_tag;
 c_739644.fn = (function_type)__lambda_760;
c_739644.num_args = 1;
c_739644.num_elements = 7;
c_739644.elements = (object *)e_739767;
c_739644.elements[0] = ((closureN)self_733726)->elements[0];
c_739644.elements[1] = ((closureN)self_733726)->elements[1];
c_739644.elements[2] = ((closureN)self_733726)->elements[2];
c_739644.elements[3] = ((closureN)self_733726)->elements[3];
c_739644.elements[4] = ((closureN)self_733726)->elements[4];
c_739644.elements[5] = ((closureN)self_733726)->elements[5];
c_739644.elements[6] = r_732783_732996;

return_direct_with_clo2(data,  __glo_lambda_91formals_91type_scheme_cyclone_util, (((closure)  __glo_lambda_91formals_91type_scheme_cyclone_util)->fn),  &c_739644, ((closureN)self_733726)->elements[4]);; 
}

static void __lambda_760(void *data, object self_733727, int argc, object *args) /* object self_733727, object r_732785_732998_733023 */
 {
 object r_732785_732998_733023 = args[0];
  
closureN_type c_739646;
object e_739760 [6];
c_739646.hdr.mark = gc_color_red;
 c_739646.hdr.grayed = 0;
c_739646.tag = closureN_tag;
 c_739646.fn = (function_type)__lambda_761;
c_739646.num_args = 3;
c_739646.num_elements = 6;
c_739646.elements = (object *)e_739760;
c_739646.elements[0] = ((closureN)self_733727)->elements[0];
c_739646.elements[1] = ((closureN)self_733727)->elements[1];
c_739646.elements[2] = ((closureN)self_733727)->elements[2];
c_739646.elements[3] = ((closureN)self_733727)->elements[3];
c_739646.elements[4] = ((closureN)self_733727)->elements[4];
c_739646.elements[5] = ((closureN)self_733727)->elements[5];





return_direct_with_clo3(data,(closure)&c_739646,__lambda_761,  ((closureN)self_733727)->elements[6], Cyc_length(data, Cyc_cdr(data, ((closureN)self_733727)->elements[0])), r_732785_732998_733023);; 
}

static void __lambda_761(void *data, object self_733728, int argc, object *args) /* object self_733728, object lam_91min_91num_91args_73868_731250_732999_733024, object num_91args_73869_731251_733000_733025, object ltype_73870_731252_733001_733026 */
 {
 object lam_91min_91num_91args_73868_731250_732999_733024 = args[0]; object num_91args_73869_731251_733000_733025 = args[1]; object ltype_73870_731252_733001_733026 = args[2];
  
closureN_type c_739648;
object e_739718 [4];
c_739648.hdr.mark = gc_color_red;
 c_739648.hdr.grayed = 0;
c_739648.tag = closureN_tag;
 c_739648.fn = (function_type)__lambda_762;
c_739648.num_args = 0;
c_739648.num_elements = 4;
c_739648.elements = (object *)e_739718;
c_739648.elements[0] = ((closureN)self_733728)->elements[4];
c_739648.elements[1] = lam_91min_91num_91args_73868_731250_732999_733024;
c_739648.elements[2] = ltype_73870_731252_733001_733026;
c_739648.elements[3] = num_91args_73869_731251_733000_733025;


closureN_type c_739719;
object e_739759 [6];
c_739719.hdr.mark = gc_color_red;
 c_739719.hdr.grayed = 0;
c_739719.tag = closureN_tag;
 c_739719.fn = (function_type)__lambda_769;
c_739719.num_args = 1;
c_739719.num_elements = 6;
c_739719.elements = (object *)e_739759;
c_739719.elements[0] = ((closureN)self_733728)->elements[0];
c_739719.elements[1] = ((closureN)self_733728)->elements[1];
c_739719.elements[2] = ((closureN)self_733728)->elements[2];
c_739719.elements[3] = ((closureN)self_733728)->elements[3];
c_739719.elements[4] = ((closureN)self_733728)->elements[4];
c_739719.elements[5] = ((closureN)self_733728)->elements[5];

return_direct_with_clo1(data,(closure)&c_739648,__lambda_762,  &c_739719);; 
}

static void __lambda_769(void *data, object self_733729, int argc, object *args) /* object self_733729, object r_732786_733011_733036 */
 {

  
closureN_type c_739721;
object e_739730 [3];
c_739721.hdr.mark = gc_color_red;
 c_739721.hdr.grayed = 0;
c_739721.tag = closureN_tag;
 c_739721.fn = (function_type)__lambda_770;
c_739721.num_args = 1;
c_739721.num_elements = 3;
c_739721.elements = (object *)e_739730;
c_739721.elements[0] = ((closureN)self_733729)->elements[0];
c_739721.elements[1] = ((closureN)self_733729)->elements[2];
c_739721.elements[2] = ((closureN)self_733729)->elements[5];


closureN_type c_739731;
object e_739758 [3];
c_739731.hdr.mark = gc_color_red;
 c_739731.hdr.grayed = 0;
c_739731.tag = closureN_tag;
 c_739731.fn = (function_type)__lambda_771;
c_739731.num_args = 1;
c_739731.num_elements = 3;
c_739731.elements = (object *)e_739758;
c_739731.elements[0] = ((closureN)self_733729)->elements[1];
c_739731.elements[1] = ((closureN)self_733729)->elements[3];
c_739731.elements[2] = ((closureN)self_733729)->elements[4];

return_direct_with_clo1(data,(closure)&c_739721,__lambda_770,  &c_739731);; 
}

static void __lambda_771(void *data, object self_733730, int argc, object *args) /* object self_733730, object k_732789_733014_733039_733046, object vals_73878_731253_733015_733040_733047 */
 {
 object k_732789_733014_733039_733046 = args[0]; object vals_73878_731253_733015_733040_733047 = args[1];
  


closureN_type c_739736;
object e_739753 [3];
c_739736.hdr.mark = gc_color_red;
 c_739736.hdr.grayed = 0;
c_739736.tag = closureN_tag;
 c_739736.fn = (function_type)__lambda_772;
c_739736.num_args = 1;
c_739736.num_elements = 3;
c_739736.elements = (object *)e_739753;
c_739736.elements[0] = ((closureN)self_733730)->elements[2];
c_739736.elements[1] = k_732789_733014_733039_733046;
c_739736.elements[2] = vals_73878_731253_733015_733040_733047;



return_closcall3(data,  car(((closureN)self_733730)->elements[1]),  &c_739736, Cyc_cddr(data, ((closureN)self_733730)->elements[2]), ((closureN)self_733730)->elements[0]);; 
}

static void __lambda_772(void *data, object self_733731, int argc, object *args) /* object self_733731, object r_732793_733016_733041_733048 */
 {
 object r_732793_733016_733041_733048 = args[0];
  
closureN_type c_739738;
object e_739745 [2];
c_739738.hdr.mark = gc_color_red;
 c_739738.hdr.grayed = 0;
c_739738.tag = closureN_tag;
 c_739738.fn = (function_type)__lambda_773;
c_739738.num_args = 1;
c_739738.num_elements = 2;
c_739738.elements = (object *)e_739745;
c_739738.elements[0] = ((closureN)self_733731)->elements[1];
c_739738.elements[1] = ((closureN)self_733731)->elements[2];


complex_num_type local_739748; 

pair_type local_739752; 
return_direct_with_clo3(data,  __glo_ast_117make_91lambda_scheme_cyclone_ast, (((closure)  __glo_ast_117make_91lambda_scheme_cyclone_ast)->fn),  &c_739738, ((inline_function_type)
                   ((closure)__glo_lambda_91_125formals_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_739748, ((closureN)self_733731)->elements[0]), set_cell_as_expr(&local_739752, r_732793_733016_733041_733048));; 
}

static void __lambda_773(void *data, object self_733732, int argc, object *args) /* object self_733732, object r_732790_733018_733043_733050 */
 {
 object r_732790_733018_733043_733050 = args[0];
  
pair_type local_739743; 
return_direct_with_clo1(data,  ((closureN)self_733732)->elements[0], (((closure)  ((closureN)self_733732)->elements[0])->fn),  set_pair_as_expr(&local_739743, r_732790_733018_733043_733050, ((closureN)self_733732)->elements[1]));; 
}

static void __lambda_770(void *data, object self_733733, int argc, object *args) /* object self_733733, object r_732788_733013_733038_733045 */
 {
 object r_732788_733013_733038_733045 = args[0];
  



return_closcall3(data,  car(((closureN)self_733733)->elements[1]),  ((closureN)self_733733)->elements[2], Cyc_cdr(data, ((closureN)self_733733)->elements[0]), r_732788_733013_733038_733045);; 
}

static void __lambda_762(void *data, object self_733734, int argc, object *args) /* object self_733734, object k_732795_733002_733027 */
 {
 object k_732795_733002_733027 = args[0];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_733734)->elements[3], ((closureN)self_733734)->elements[1])) ){ 
  
closureN_type c_739654;
object e_739675 [3];
c_739654.hdr.mark = gc_color_red;
 c_739654.hdr.grayed = 0;
c_739654.tag = closureN_tag;
 c_739654.fn = (function_type)__lambda_763;
c_739654.num_args = 1;
c_739654.num_elements = 3;
c_739654.elements = (object *)e_739675;
c_739654.elements[0] = ((closureN)self_733734)->elements[0];
c_739654.elements[1] = k_732795_733002_733027;
c_739654.elements[2] = ((closureN)self_733734)->elements[3];


object c_739678 = Cyc_number2string2(data,(closure)&c_739654,1,((closureN)self_733734)->elements[1]);
return_closcall1(data,(closure)&c_739654,  c_739678);
} else { 
  object r_732800_733007_733032;
    
if( (boolean_f != Cyc_num_fast_gt_op(data, ((closureN)self_733734)->elements[3], ((closureN)self_733734)->elements[1])) ){ 
  
  r_732800_733007_733032 = equalp(quote_args_117fixed, ((closureN)self_733734)->elements[2]);
} else { 
  r_732800_733007_733032 = boolean_f;}
;if( (boolean_f != r_732800_733007_733032) ){ 
  
closureN_type c_739691;
object e_739712 [3];
c_739691.hdr.mark = gc_color_red;
 c_739691.hdr.grayed = 0;
c_739691.tag = closureN_tag;
 c_739691.fn = (function_type)__lambda_766;
c_739691.num_args = 1;
c_739691.num_elements = 3;
c_739691.elements = (object *)e_739712;
c_739691.elements[0] = ((closureN)self_733734)->elements[0];
c_739691.elements[1] = k_732795_733002_733027;
c_739691.elements[2] = ((closureN)self_733734)->elements[3];


object c_739715 = Cyc_number2string2(data,(closure)&c_739691,1,((closureN)self_733734)->elements[1]);
return_closcall1(data,(closure)&c_739691,  c_739715);
} else { 
  return_direct_with_clo1(data,  k_732795_733002_733027, (((closure)  k_732795_733002_733027)->fn),  boolean_f);}
;}
;; 
}

static void __lambda_766(void *data, object self_733738, int argc, object *args) /* object self_733738, object r_732802_733008_733033 */
 {
 object r_732802_733008_733033 = args[0];
  
closureN_type c_739693;
object e_739707 [3];
c_739693.hdr.mark = gc_color_red;
 c_739693.hdr.grayed = 0;
c_739693.tag = closureN_tag;
 c_739693.fn = (function_type)__lambda_767;
c_739693.num_args = 1;
c_739693.num_elements = 3;
c_739693.elements = (object *)e_739707;
c_739693.elements[0] = ((closureN)self_733738)->elements[0];
c_739693.elements[1] = ((closureN)self_733738)->elements[1];
c_739693.elements[2] = r_732802_733008_733033;


object c_739710 = Cyc_number2string2(data,(closure)&c_739693,1,((closureN)self_733738)->elements[2]);
return_closcall1(data,(closure)&c_739693,  c_739710);; 
}

static void __lambda_767(void *data, object self_733739, int argc, object *args) /* object self_733739, object r_732803_733009_733034 */
 {
 object r_732803_733009_733034 = args[0];
  
closureN_type c_739695;
object e_739699 [2];
c_739695.hdr.mark = gc_color_red;
 c_739695.hdr.grayed = 0;
c_739695.tag = closureN_tag;
 c_739695.fn = (function_type)__lambda_768;
c_739695.num_args = 1;
c_739695.num_elements = 2;
c_739695.elements = (object *)e_739699;
c_739695.elements[0] = ((closureN)self_733739)->elements[0];
c_739695.elements[1] = ((closureN)self_733739)->elements[1];


make_utf8_string_with_len(c_739703, "Too many arguments passed to anonymous lambda. ", 47, 47);

make_utf8_string_with_len(c_739704, "Expected ", 9, 9);

make_utf8_string_with_len(c_739706, " but received ", 14, 14);

object c_739702 = Cyc_string_append(data,(closure)&c_739695,5,&c_739703, &c_739704, ((closureN)self_733739)->elements[2], &c_739706, r_732803_733009_733034);
return_closcall1(data,(closure)&c_739695,  c_739702);; 
}

static void __lambda_768(void *data, object self_733740, int argc, object *args) /* object self_733740, object r_732801_733010_733035 */
 {
 object r_732801_733010_733035 = args[0];
  return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_733740)->elements[1], r_732801_733010_733035, ((closureN)self_733740)->elements[0]);; 
}

static void __lambda_763(void *data, object self_733735, int argc, object *args) /* object self_733735, object r_732798_733003_733028 */
 {
 object r_732798_733003_733028 = args[0];
  
closureN_type c_739656;
object e_739670 [3];
c_739656.hdr.mark = gc_color_red;
 c_739656.hdr.grayed = 0;
c_739656.tag = closureN_tag;
 c_739656.fn = (function_type)__lambda_764;
c_739656.num_args = 1;
c_739656.num_elements = 3;
c_739656.elements = (object *)e_739670;
c_739656.elements[0] = ((closureN)self_733735)->elements[0];
c_739656.elements[1] = ((closureN)self_733735)->elements[1];
c_739656.elements[2] = r_732798_733003_733028;


object c_739673 = Cyc_number2string2(data,(closure)&c_739656,1,((closureN)self_733735)->elements[2]);
return_closcall1(data,(closure)&c_739656,  c_739673);; 
}

static void __lambda_764(void *data, object self_733736, int argc, object *args) /* object self_733736, object r_732799_733004_733029 */
 {
 object r_732799_733004_733029 = args[0];
  
closureN_type c_739658;
object e_739662 [2];
c_739658.hdr.mark = gc_color_red;
 c_739658.hdr.grayed = 0;
c_739658.tag = closureN_tag;
 c_739658.fn = (function_type)__lambda_765;
c_739658.num_args = 1;
c_739658.num_elements = 2;
c_739658.elements = (object *)e_739662;
c_739658.elements[0] = ((closureN)self_733736)->elements[0];
c_739658.elements[1] = ((closureN)self_733736)->elements[1];


make_utf8_string_with_len(c_739666, "Not enough arguments passed to anonymous lambda. ", 49, 49);

make_utf8_string_with_len(c_739667, "Expected ", 9, 9);

make_utf8_string_with_len(c_739669, " but received ", 14, 14);

object c_739665 = Cyc_string_append(data,(closure)&c_739658,5,&c_739666, &c_739667, ((closureN)self_733736)->elements[2], &c_739669, r_732799_733004_733029);
return_closcall1(data,(closure)&c_739658,  c_739665);; 
}

static void __lambda_765(void *data, object self_733737, int argc, object *args) /* object self_733737, object r_732797_733005_733030 */
 {
 object r_732797_733005_733030 = args[0];
  return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_733737)->elements[1], r_732797_733005_733030, ((closureN)self_733737)->elements[0]);; 
}

static void __lambda_753(void *data, object self_733743, int argc, object *args) /* object self_733743, object k_732813 */
 {
 object k_732813 = args[0];
  
closureN_type c_739621;
object e_739631 [2];
c_739621.hdr.mark = gc_color_red;
 c_739621.hdr.grayed = 0;
c_739621.tag = closureN_tag;
 c_739621.fn = (function_type)__lambda_754;
c_739621.num_args = 1;
c_739621.num_elements = 2;
c_739621.elements = (object *)e_739631;
c_739621.elements[0] = ((closureN)self_733743)->elements[0];
c_739621.elements[1] = k_732813;



return_direct_with_clo1(data,(closure)&c_739621,__lambda_754,  Cyc_car(data, ((closureN)self_733743)->elements[0]));; 
}

static void __lambda_754(void *data, object self_733744, int argc, object *args) /* object self_733744, object r_732815 */
 {
 object r_732815 = args[0];
  
closureN_type c_739623;
object e_739630 [2];
c_739623.hdr.mark = gc_color_red;
 c_739623.hdr.grayed = 0;
c_739623.tag = closureN_tag;
 c_739623.fn = (function_type)__lambda_755;
c_739623.num_args = 1;
c_739623.num_elements = 2;
c_739623.elements = (object *)e_739630;
c_739623.elements[0] = ((closureN)self_733744)->elements[0];
c_739623.elements[1] = ((closureN)self_733744)->elements[1];

return_direct_with_clo2(data,  __glo_const_127_scheme_cyclone_util, (((closure)  __glo_const_127_scheme_cyclone_util)->fn),  &c_739623, r_732815);; 
}

static void __lambda_755(void *data, object self_733745, int argc, object *args) /* object self_733745, object r_732814 */
 {
 object r_732814 = args[0];
  if( (boolean_f != r_732814) ){ 
  
make_utf8_string_with_len(c_739626, "Call of non-procedure: ", 23, 23);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_733745)->elements[1], &c_739626, ((closureN)self_733745)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733745)->elements[1], (((closure)  ((closureN)self_733745)->elements[1])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_748(void *data, object self_733746, int argc, object *args) /* object self_733746, object k_732816 */
 {
 object k_732816 = args[0];
    complex_num_type local_739556; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_app_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_739556, ((closureN)self_733746)->elements[0])) ){ 
  
closureN_type c_739559;
object e_739572 [2];
c_739559.hdr.mark = gc_color_red;
 c_739559.hdr.grayed = 0;
c_739559.tag = closureN_tag;
 c_739559.fn = (function_type)__lambda_749;
c_739559.num_args = 1;
c_739559.num_elements = 2;
c_739559.elements = (object *)e_739572;
c_739559.elements[0] = ((closureN)self_733746)->elements[0];
c_739559.elements[1] = k_732816;



return_direct_with_clo2(data,  __glo_lambda_127_scheme_cyclone_util, (((closure)  __glo_lambda_127_scheme_cyclone_util)->fn),  &c_739559, Cyc_car(data, ((closureN)self_733746)->elements[0]));
} else { 
  return_direct_with_clo1(data,  k_732816, (((closure)  k_732816)->fn),  boolean_f);}
;; 
}

static void __lambda_749(void *data, object self_733747, int argc, object *args) /* object self_733747, object r_732818_732988 */
 {
 object r_732818_732988 = args[0];
  if( (boolean_f != r_732818_732988) ){ 
  
closureN_type c_739561;
object e_739566 [1];
c_739561.hdr.mark = gc_color_red;
 c_739561.hdr.grayed = 0;
c_739561.tag = closureN_tag;
 c_739561.fn = (function_type)__lambda_750;
c_739561.num_args = 1;
c_739561.num_elements = 1;
c_739561.elements = (object *)e_739566;
c_739561.elements[0] = ((closureN)self_733747)->elements[1];



return_direct_with_clo2(data,  __glo_lambda_91formals_91type_scheme_cyclone_util, (((closure)  __glo_lambda_91formals_91type_scheme_cyclone_util)->fn),  &c_739561, Cyc_car(data, ((closureN)self_733747)->elements[0]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733747)->elements[1], (((closure)  ((closureN)self_733747)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_750(void *data, object self_733748, int argc, object *args) /* object self_733748, object r_732820_732990_732992 */
 {
 object r_732820_732990_732992 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_733748)->elements[0], (((closure)  ((closureN)self_733748)->elements[0])->fn),  equalp(quote_args_117varargs, r_732820_732990_732992));; 
}

static void __lambda_736(void *data, object self_733709, int argc, object *args) /* object self_733709, object r_732752_732930 */
 {
 object r_732752_732930 = args[0];
  
closureN_type c_739432;
object e_739544 [5];
c_739432.hdr.mark = gc_color_red;
 c_739432.hdr.grayed = 0;
c_739432.tag = closureN_tag;
 c_739432.fn = (function_type)__lambda_737;
c_739432.num_args = 1;
c_739432.num_elements = 5;
c_739432.elements = (object *)e_739544;
c_739432.elements[0] = ((closureN)self_733709)->elements[0];
c_739432.elements[1] = ((closureN)self_733709)->elements[1];
c_739432.elements[2] = ((closureN)self_733709)->elements[2];
c_739432.elements[3] = ((closureN)self_733709)->elements[3];
c_739432.elements[4] = r_732752_732930;



return_direct_with_clo2(data,  __glo_lambda_91formals_91type_scheme_cyclone_util, (((closure)  __glo_lambda_91formals_91type_scheme_cyclone_util)->fn),  &c_739432, Cyc_car(data, ((closureN)self_733709)->elements[0]));; 
}

static void __lambda_737(void *data, object self_733710, int argc, object *args) /* object self_733710, object r_732754_732933_732950_732966 */
 {
 object r_732754_732933_732950_732966 = args[0];
  
closureN_type c_739434;
object e_739537 [4];
c_739434.hdr.mark = gc_color_red;
 c_739434.hdr.grayed = 0;
c_739434.tag = closureN_tag;
 c_739434.fn = (function_type)__lambda_738;
c_739434.num_args = 3;
c_739434.num_elements = 4;
c_739434.elements = (object *)e_739537;
c_739434.elements[0] = ((closureN)self_733710)->elements[0];
c_739434.elements[1] = ((closureN)self_733710)->elements[1];
c_739434.elements[2] = ((closureN)self_733710)->elements[2];
c_739434.elements[3] = ((closureN)self_733710)->elements[3];





return_direct_with_clo3(data,(closure)&c_739434,__lambda_738,  ((closureN)self_733710)->elements[4], Cyc_length(data, Cyc_cdr(data, ((closureN)self_733710)->elements[0])), r_732754_732933_732950_732966);; 
}

static void __lambda_738(void *data, object self_733711, int argc, object *args) /* object self_733711, object lam_91min_91num_91args_73824_731239_732934_732951_732967, object num_91args_73825_731240_732935_732952_732968, object ltype_73826_731241_732936_732953_732969 */
 {
 object lam_91min_91num_91args_73824_731239_732934_732951_732967 = args[0]; object num_91args_73825_731240_732935_732952_732968 = args[1];
  
closureN_type c_739436;
object e_739471 [3];
c_739436.hdr.mark = gc_color_red;
 c_739436.hdr.grayed = 0;
c_739436.tag = closureN_tag;
 c_739436.fn = (function_type)__lambda_739;
c_739436.num_args = 0;
c_739436.num_elements = 3;
c_739436.elements = (object *)e_739471;
c_739436.elements[0] = ((closureN)self_733711)->elements[0];
c_739436.elements[1] = lam_91min_91num_91args_73824_731239_732934_732951_732967;
c_739436.elements[2] = num_91args_73825_731240_732935_732952_732968;


closureN_type c_739472;
object e_739536 [4];
c_739472.hdr.mark = gc_color_red;
 c_739472.hdr.grayed = 0;
c_739472.tag = closureN_tag;
 c_739472.fn = (function_type)__lambda_743;
c_739472.num_args = 1;
c_739472.num_elements = 4;
c_739472.elements = (object *)e_739536;
c_739472.elements[0] = ((closureN)self_733711)->elements[0];
c_739472.elements[1] = ((closureN)self_733711)->elements[1];
c_739472.elements[2] = ((closureN)self_733711)->elements[2];
c_739472.elements[3] = ((closureN)self_733711)->elements[3];

return_direct_with_clo1(data,(closure)&c_739436,__lambda_739,  &c_739472);; 
}

static void __lambda_743(void *data, object self_733712, int argc, object *args) /* object self_733712, object r_732731_732942_732959_732975 */
 {

  
closureN_type c_739474;
object e_739529 [4];
c_739474.hdr.mark = gc_color_red;
 c_739474.hdr.grayed = 0;
c_739474.tag = closureN_tag;
 c_739474.fn = (function_type)__lambda_744;
c_739474.num_args = 1;
c_739474.num_elements = 4;
c_739474.elements = (object *)e_739529;
c_739474.elements[0] = ((closureN)self_733712)->elements[0];
c_739474.elements[1] = ((closureN)self_733712)->elements[1];
c_739474.elements[2] = ((closureN)self_733712)->elements[2];
c_739474.elements[3] = ((closureN)self_733712)->elements[3];


complex_num_type local_739532; 


return_direct_with_clo2(data,  __glo_pair_91_125list_scheme_cyclone_util, (((closure)  __glo_pair_91_125list_scheme_cyclone_util)->fn),  &c_739474, ((inline_function_type)
                   ((closure)__glo_lambda_91_125formals_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_739532, Cyc_car(data, ((closureN)self_733712)->elements[0])));; 
}

static void __lambda_744(void *data, object self_733713, int argc, object *args) /* object self_733713, object formals_91lis_73838_731244_732944_732961_732977_732983 */
 {
 object formals_91lis_73838_731244_732944_732961_732977_732983 = args[0];
  
closureN_type c_739476;
object e_739520 [5];
c_739476.hdr.mark = gc_color_red;
 c_739476.hdr.grayed = 0;
c_739476.tag = closureN_tag;
 c_739476.fn = (function_type)__lambda_745;
c_739476.num_args = 1;
c_739476.num_elements = 5;
c_739476.elements = (object *)e_739520;
c_739476.elements[0] = ((closureN)self_733713)->elements[0];
c_739476.elements[1] = ((closureN)self_733713)->elements[1];
c_739476.elements[2] = ((closureN)self_733713)->elements[2];
c_739476.elements[3] = formals_91lis_73838_731244_732944_732961_732977_732983;
c_739476.elements[4] = ((closureN)self_733713)->elements[3];




complex_num_type local_739526; 


return_direct_with_clo3(data,  __glo_take_scheme_cyclone_util, (((closure)  __glo_take_scheme_cyclone_util)->fn),  &c_739476, Cyc_cdr(data, ((closureN)self_733713)->elements[0]), Cyc_fast_sub(data,&local_739526, Cyc_length(data, formals_91lis_73838_731244_732944_732961_732977_732983), obj_int2obj(1)));; 
}

static void __lambda_745(void *data, object self_733714, int argc, object *args) /* object self_733714, object req_91args_73844_731246_732945_732962_732978_732984 */
 {
 object req_91args_73844_731246_732945_732962_732978_732984 = args[0];
  
closureN_type c_739478;
object e_739510 [6];
c_739478.hdr.mark = gc_color_red;
 c_739478.hdr.grayed = 0;
c_739478.tag = closureN_tag;
 c_739478.fn = (function_type)__lambda_746;
c_739478.num_args = 1;
c_739478.num_elements = 6;
c_739478.elements = (object *)e_739510;
c_739478.elements[0] = ((closureN)self_733714)->elements[0];
c_739478.elements[1] = ((closureN)self_733714)->elements[1];
c_739478.elements[2] = ((closureN)self_733714)->elements[2];
c_739478.elements[3] = ((closureN)self_733714)->elements[3];
c_739478.elements[4] = ((closureN)self_733714)->elements[4];
c_739478.elements[5] = req_91args_73844_731246_732945_732962_732978_732984;




complex_num_type local_739516; 


return_direct_with_clo3(data,  __glo_drop_scheme_cyclone_util, (((closure)  __glo_drop_scheme_cyclone_util)->fn),  &c_739478, Cyc_cdr(data, ((closureN)self_733714)->elements[0]), Cyc_fast_sub(data,&local_739516, Cyc_length(data, ((closureN)self_733714)->elements[3]), obj_int2obj(1)));; 
}

static void __lambda_746(void *data, object self_733715, int argc, object *args) /* object self_733715, object opt_91args_73847_731247_732946_732963_732979_732985 */
 {
 object opt_91args_73847_731247_732946_732963_732979_732985 = args[0];
  
closureN_type c_739480;
object e_739502 [5];
c_739480.hdr.mark = gc_color_red;
 c_739480.hdr.grayed = 0;
c_739480.tag = closureN_tag;
 c_739480.fn = (function_type)__lambda_747;
c_739480.num_args = 1;
c_739480.num_elements = 5;
c_739480.elements = (object *)e_739502;
c_739480.elements[0] = ((closureN)self_733715)->elements[0];
c_739480.elements[1] = ((closureN)self_733715)->elements[1];
c_739480.elements[2] = ((closureN)self_733715)->elements[2];
c_739480.elements[3] = ((closureN)self_733715)->elements[3];
c_739480.elements[4] = ((closureN)self_733715)->elements[4];


pair_type local_739506; 

pair_type local_739509; 
return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_739480, ((closureN)self_733715)->elements[5], set_pair_as_expr(&local_739506, set_pair_as_expr(&local_739509, quote__list, opt_91args_73847_731247_732946_732963_732979_732985), NULL));; 
}

static void __lambda_747(void *data, object self_733716, int argc, object *args) /* object self_733716, object r_732740_732947_732964_732980_732986 */
 {
 object r_732740_732947_732964_732980_732986 = args[0];
  


pair_type local_739488; 

pair_type local_739491; 

pair_type local_739494; 




return_closcall3(data,  car(((closureN)self_733716)->elements[2]),  ((closureN)self_733716)->elements[4], set_pair_as_expr(&local_739488, set_pair_as_expr(&local_739491, quote_lambda, set_pair_as_expr(&local_739494, ((closureN)self_733716)->elements[3], Cyc_cddr(data, Cyc_car(data, ((closureN)self_733716)->elements[0])))), r_732740_732947_732964_732980_732986), ((closureN)self_733716)->elements[1]);; 
}

static void __lambda_739(void *data, object self_733717, int argc, object *args) /* object self_733717, object k_732755_732937_732954_732970 */
 {
 object k_732755_732937_732954_732970 = args[0];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_733717)->elements[2], ((closureN)self_733717)->elements[1])) ){ 
  
closureN_type c_739442;
object e_739465 [3];
c_739442.hdr.mark = gc_color_red;
 c_739442.hdr.grayed = 0;
c_739442.tag = closureN_tag;
 c_739442.fn = (function_type)__lambda_740;
c_739442.num_args = 1;
c_739442.num_elements = 3;
c_739442.elements = (object *)e_739465;
c_739442.elements[0] = ((closureN)self_733717)->elements[0];
c_739442.elements[1] = k_732755_732937_732954_732970;
c_739442.elements[2] = ((closureN)self_733717)->elements[2];


object c_739468 = Cyc_number2string2(data,(closure)&c_739442,1,((closureN)self_733717)->elements[1]);
return_closcall1(data,(closure)&c_739442,  c_739468);
} else { 
  return_direct_with_clo1(data,  k_732755_732937_732954_732970, (((closure)  k_732755_732937_732954_732970)->fn),  boolean_f);}
;; 
}

static void __lambda_740(void *data, object self_733718, int argc, object *args) /* object self_733718, object r_732759_732938_732955_732971 */
 {
 object r_732759_732938_732955_732971 = args[0];
  
closureN_type c_739444;
object e_739460 [3];
c_739444.hdr.mark = gc_color_red;
 c_739444.hdr.grayed = 0;
c_739444.tag = closureN_tag;
 c_739444.fn = (function_type)__lambda_741;
c_739444.num_args = 1;
c_739444.num_elements = 3;
c_739444.elements = (object *)e_739460;
c_739444.elements[0] = ((closureN)self_733718)->elements[0];
c_739444.elements[1] = ((closureN)self_733718)->elements[1];
c_739444.elements[2] = r_732759_732938_732955_732971;


object c_739463 = Cyc_number2string2(data,(closure)&c_739444,1,((closureN)self_733718)->elements[2]);
return_closcall1(data,(closure)&c_739444,  c_739463);; 
}

static void __lambda_741(void *data, object self_733719, int argc, object *args) /* object self_733719, object r_732760_732939_732956_732972 */
 {
 object r_732760_732939_732956_732972 = args[0];
  
closureN_type c_739446;
object e_739452 [2];
c_739446.hdr.mark = gc_color_red;
 c_739446.hdr.grayed = 0;
c_739446.tag = closureN_tag;
 c_739446.fn = (function_type)__lambda_742;
c_739446.num_args = 1;
c_739446.num_elements = 2;
c_739446.elements = (object *)e_739452;
c_739446.elements[0] = ((closureN)self_733719)->elements[0];
c_739446.elements[1] = ((closureN)self_733719)->elements[1];


make_utf8_string_with_len(c_739456, "Not enough arguments passed to anonymous lambda. ", 49, 49);

make_utf8_string_with_len(c_739457, "Expected ", 9, 9);

make_utf8_string_with_len(c_739459, " but received ", 14, 14);

object c_739455 = Cyc_string_append(data,(closure)&c_739446,5,&c_739456, &c_739457, ((closureN)self_733719)->elements[2], &c_739459, r_732760_732939_732956_732972);
return_closcall1(data,(closure)&c_739446,  c_739455);; 
}

static void __lambda_742(void *data, object self_733720, int argc, object *args) /* object self_733720, object r_732757_732940_732957_732973 */
 {
 object r_732757_732940_732957_732973 = args[0];
  

return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_733720)->elements[1], r_732757_732940_732957_732973, Cyc_car(data, ((closureN)self_733720)->elements[0]));; 
}

static void __lambda_732(void *data, object self_733749, int argc, object *args) /* object self_733749, object k_732823 */
 {
 object k_732823 = args[0];
    complex_num_type local_739406; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_app_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_739406, ((closureN)self_733749)->elements[0])) ){ 
  
closureN_type c_739409;
object e_739422 [2];
c_739409.hdr.mark = gc_color_red;
 c_739409.hdr.grayed = 0;
c_739409.tag = closureN_tag;
 c_739409.fn = (function_type)__lambda_733;
c_739409.num_args = 1;
c_739409.num_elements = 2;
c_739409.elements = (object *)e_739422;
c_739409.elements[0] = ((closureN)self_733749)->elements[0];
c_739409.elements[1] = k_732823;



return_direct_with_clo2(data,  __glo_lambda_127_scheme_cyclone_util, (((closure)  __glo_lambda_127_scheme_cyclone_util)->fn),  &c_739409, Cyc_car(data, ((closureN)self_733749)->elements[0]));
} else { 
  return_direct_with_clo1(data,  k_732823, (((closure)  k_732823)->fn),  boolean_f);}
;; 
}

static void __lambda_733(void *data, object self_733750, int argc, object *args) /* object self_733750, object r_732825_732924 */
 {
 object r_732825_732924 = args[0];
  if( (boolean_f != r_732825_732924) ){ 
  
closureN_type c_739411;
object e_739416 [1];
c_739411.hdr.mark = gc_color_red;
 c_739411.hdr.grayed = 0;
c_739411.tag = closureN_tag;
 c_739411.fn = (function_type)__lambda_734;
c_739411.num_args = 1;
c_739411.num_elements = 1;
c_739411.elements = (object *)e_739416;
c_739411.elements[0] = ((closureN)self_733750)->elements[1];



return_direct_with_clo2(data,  __glo_lambda_91formals_91type_scheme_cyclone_util, (((closure)  __glo_lambda_91formals_91type_scheme_cyclone_util)->fn),  &c_739411, Cyc_car(data, ((closureN)self_733750)->elements[0]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733750)->elements[1], (((closure)  ((closureN)self_733750)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_734(void *data, object self_733751, int argc, object *args) /* object self_733751, object r_732827_732926_732928 */
 {
 object r_732827_732926_732928 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_733751)->elements[0], (((closure)  ((closureN)self_733751)->elements[0])->fn),  equalp(quote_args_117fixed_91with_91varargs, r_732827_732926_732928));; 
}

static void __lambda_721(void *data, object self_733697, int argc, object *args) /* object self_733697, object r_732716 */
 {
 object r_732716 = args[0];
  
closureN_type c_739339;
object e_739399 [5];
c_739339.hdr.mark = gc_color_red;
 c_739339.hdr.grayed = 0;
c_739339.tag = closureN_tag;
 c_739339.fn = (function_type)__lambda_722;
c_739339.num_args = 1;
c_739339.num_elements = 5;
c_739339.elements = (object *)e_739399;
c_739339.elements[0] = ((closureN)self_733697)->elements[0];
c_739339.elements[1] = ((closureN)self_733697)->elements[1];
c_739339.elements[2] = ((closureN)self_733697)->elements[2];
c_739339.elements[3] = ((closureN)self_733697)->elements[3];
c_739339.elements[4] = r_732716;

return_direct_with_clo2(data,  __glo_lambda_91formals_91type_scheme_cyclone_util, (((closure)  __glo_lambda_91formals_91type_scheme_cyclone_util)->fn),  &c_739339, ((closureN)self_733697)->elements[0]);; 
}

static void __lambda_722(void *data, object self_733698, int argc, object *args) /* object self_733698, object r_732717 */
 {
 object r_732717 = args[0];
  
closureN_type c_739341;
object e_739397 [4];
c_739341.hdr.mark = gc_color_red;
 c_739341.hdr.grayed = 0;
c_739341.tag = closureN_tag;
 c_739341.fn = (function_type)__lambda_723;
c_739341.num_args = 1;
c_739341.num_elements = 4;
c_739341.elements = (object *)e_739397;
c_739341.elements[0] = ((closureN)self_733698)->elements[0];
c_739341.elements[1] = ((closureN)self_733698)->elements[1];
c_739341.elements[2] = ((closureN)self_733698)->elements[2];
c_739341.elements[3] = ((closureN)self_733698)->elements[3];

return_direct_with_clo2(data,(closure)&c_739341,__lambda_723,  ((closureN)self_733698)->elements[4], r_732717);; 
}

static void __lambda_723(void *data, object self_733699, int argc, object *args) /* object self_733699, object k_73817_731237, object ltype_73818_731238 */
 {
 object k_73817_731237 = args[0]; object ltype_73818_731238 = args[1];
  
closureN_type c_739343;
object e_739390 [6];
c_739343.hdr.mark = gc_color_red;
 c_739343.hdr.grayed = 0;
c_739343.tag = closureN_tag;
 c_739343.fn = (function_type)__lambda_724;
c_739343.num_args = 1;
c_739343.num_elements = 6;
c_739343.elements = (object *)e_739390;
c_739343.elements[0] = ((closureN)self_733699)->elements[0];
c_739343.elements[1] = ((closureN)self_733699)->elements[1];
c_739343.elements[2] = ((closureN)self_733699)->elements[2];
c_739343.elements[3] = ((closureN)self_733699)->elements[3];
c_739343.elements[4] = k_73817_731237;
c_739343.elements[5] = ltype_73818_731238;


pair_type local_739393; 


return_direct_with_clo1(data,(closure)&c_739343,__lambda_724,  set_pair_as_expr(&local_739393, k_73817_731237, Cyc_cadr(data, ((closureN)self_733699)->elements[0])));; 
}

static void __lambda_724(void *data, object self_733700, int argc, object *args) /* object self_733700, object r_732723 */
 {
 object r_732723 = args[0];
  
closureN_type c_739345;
object e_739357 [1];
c_739345.hdr.mark = gc_color_red;
 c_739345.hdr.grayed = 0;
c_739345.tag = closureN_tag;
 c_739345.fn = (function_type)__lambda_725;
c_739345.num_args = 0;
c_739345.num_elements = 1;
c_739345.elements = (object *)e_739357;
c_739345.elements[0] = ((closureN)self_733700)->elements[5];


closureN_type c_739358;
object e_739389 [6];
c_739358.hdr.mark = gc_color_red;
 c_739358.hdr.grayed = 0;
c_739358.tag = closureN_tag;
 c_739358.fn = (function_type)__lambda_727;
c_739358.num_args = 1;
c_739358.num_elements = 6;
c_739358.elements = (object *)e_739389;
c_739358.elements[0] = ((closureN)self_733700)->elements[0];
c_739358.elements[1] = ((closureN)self_733700)->elements[1];
c_739358.elements[2] = ((closureN)self_733700)->elements[2];
c_739358.elements[3] = ((closureN)self_733700)->elements[3];
c_739358.elements[4] = ((closureN)self_733700)->elements[4];
c_739358.elements[5] = r_732723;

return_direct_with_clo1(data,(closure)&c_739345,__lambda_725,  &c_739358);; 
}

static void __lambda_727(void *data, object self_733701, int argc, object *args) /* object self_733701, object r_732724 */
 {
 object r_732724 = args[0];
  
closureN_type c_739360;
object e_739387 [5];
c_739360.hdr.mark = gc_color_red;
 c_739360.hdr.grayed = 0;
c_739360.tag = closureN_tag;
 c_739360.fn = (function_type)__lambda_728;
c_739360.num_args = 1;
c_739360.num_elements = 5;
c_739360.elements = (object *)e_739387;
c_739360.elements[0] = ((closureN)self_733701)->elements[0];
c_739360.elements[1] = ((closureN)self_733701)->elements[1];
c_739360.elements[2] = ((closureN)self_733701)->elements[2];
c_739360.elements[3] = ((closureN)self_733701)->elements[3];
c_739360.elements[4] = ((closureN)self_733701)->elements[4];

return_direct_with_clo3(data,  __glo_list_91_125lambda_91formals_scheme_cyclone_transforms, (((closure)  __glo_list_91_125lambda_91formals_scheme_cyclone_transforms)->fn),  &c_739360, ((closureN)self_733701)->elements[5], r_732724);; 
}

static void __lambda_728(void *data, object self_733702, int argc, object *args) /* object self_733702, object r_732719 */
 {
 object r_732719 = args[0];
  


closureN_type c_739365;
object e_739382 [3];
c_739365.hdr.mark = gc_color_red;
 c_739365.hdr.grayed = 0;
c_739365.tag = closureN_tag;
 c_739365.fn = (function_type)__lambda_729;
c_739365.num_args = 1;
c_739365.num_elements = 3;
c_739365.elements = (object *)e_739382;
c_739365.elements[0] = ((closureN)self_733702)->elements[1];
c_739365.elements[1] = ((closureN)self_733702)->elements[3];
c_739365.elements[2] = r_732719;



return_closcall3(data,  car(((closureN)self_733702)->elements[2]),  &c_739365, Cyc_cddr(data, ((closureN)self_733702)->elements[0]), ((closureN)self_733702)->elements[4]);; 
}

static void __lambda_729(void *data, object self_733703, int argc, object *args) /* object self_733703, object r_732721 */
 {
 object r_732721 = args[0];
  
closureN_type c_739367;
object e_739378 [3];
c_739367.hdr.mark = gc_color_red;
 c_739367.hdr.grayed = 0;
c_739367.tag = closureN_tag;
 c_739367.fn = (function_type)__lambda_730;
c_739367.num_args = 1;
c_739367.num_elements = 3;
c_739367.elements = (object *)e_739378;
c_739367.elements[0] = ((closureN)self_733703)->elements[0];
c_739367.elements[1] = ((closureN)self_733703)->elements[1];
c_739367.elements[2] = ((closureN)self_733703)->elements[2];


pair_type local_739381; 
return_direct_with_clo1(data,(closure)&c_739367,__lambda_730,  set_cell_as_expr(&local_739381, r_732721));; 
}

static void __lambda_730(void *data, object self_733704, int argc, object *args) /* object self_733704, object r_732720 */
 {
 object r_732720 = args[0];
  
closureN_type c_739369;
object e_739376 [2];
c_739369.hdr.mark = gc_color_red;
 c_739369.hdr.grayed = 0;
c_739369.tag = closureN_tag;
 c_739369.fn = (function_type)__lambda_731;
c_739369.num_args = 1;
c_739369.num_elements = 2;
c_739369.elements = (object *)e_739376;
c_739369.elements[0] = ((closureN)self_733704)->elements[0];
c_739369.elements[1] = ((closureN)self_733704)->elements[1];

return_direct_with_clo4(data,  __glo_ast_117make_91lambda_scheme_cyclone_ast, (((closure)  __glo_ast_117make_91lambda_scheme_cyclone_ast)->fn),  &c_739369, ((closureN)self_733704)->elements[2], r_732720, boolean_t);; 
}

static void __lambda_731(void *data, object self_733705, int argc, object *args) /* object self_733705, object r_732718 */
 {
 object r_732718 = args[0];
  
list_2_type local_739374; 
return_direct_with_clo1(data,  ((closureN)self_733705)->elements[1], (((closure)  ((closureN)self_733705)->elements[1])->fn),  Cyc_fast_list_2(&local_739374, ((closureN)self_733705)->elements[0], r_732718));; 
}

static void __lambda_725(void *data, object self_733706, int argc, object *args) /* object self_733706, object k_732725 */
 {
 object k_732725 = args[0];
  
closureN_type c_739347;
object e_739353 [2];
c_739347.hdr.mark = gc_color_red;
 c_739347.hdr.grayed = 0;
c_739347.tag = closureN_tag;
 c_739347.fn = (function_type)__lambda_726;
c_739347.num_args = 1;
c_739347.num_elements = 2;
c_739347.elements = (object *)e_739353;
c_739347.elements[0] = k_732725;
c_739347.elements[1] = ((closureN)self_733706)->elements[0];



return_direct_with_clo1(data,(closure)&c_739347,__lambda_726,  equalp(((closureN)self_733706)->elements[0], quote_args_117varargs));; 
}

static void __lambda_726(void *data, object self_733707, int argc, object *args) /* object self_733707, object r_732726 */
 {
 object r_732726 = args[0];
  if( (boolean_f != r_732726) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733707)->elements[0], (((closure)  ((closureN)self_733707)->elements[0])->fn),  quote_args_117fixed_91with_91varargs);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733707)->elements[0], (((closure)  ((closureN)self_733707)->elements[0])->fn),  ((closureN)self_733707)->elements[1]);}
;; 
}

static void __lambda_715(void *data, object self_733691, int argc, object *args) /* object self_733691, object r_732712 */
 {
 object r_732712 = args[0];
  
closureN_type c_739291;
object e_739320 [4];
c_739291.hdr.mark = gc_color_red;
 c_739291.hdr.grayed = 0;
c_739291.tag = closureN_tag;
 c_739291.fn = (function_type)__lambda_716;
c_739291.num_args = 1;
c_739291.num_elements = 4;
c_739291.elements = (object *)e_739320;
c_739291.elements[0] = ((closureN)self_733691)->elements[0];
c_739291.elements[1] = ((closureN)self_733691)->elements[1];
c_739291.elements[2] = ((closureN)self_733691)->elements[2];
c_739291.elements[3] = ((closureN)self_733691)->elements[3];




complex_num_type local_739326; 


return_direct_with_clo4(data,  __glo_prim_117check_91arg_91count_scheme_cyclone_primitives, (((closure)  __glo_prim_117check_91arg_91count_scheme_cyclone_primitives)->fn),  &c_739291, Cyc_car(data, ((closureN)self_733691)->elements[0]), Cyc_fast_sub(data,&local_739326, Cyc_length(data, ((closureN)self_733691)->elements[0]), obj_int2obj(1)), r_732712);; 
}

static void __lambda_716(void *data, object self_733692, int argc, object *args) /* object self_733692, object r_732704 */
 {

  
closureN_type c_739293;
object e_739316 [4];
c_739293.hdr.mark = gc_color_red;
 c_739293.hdr.grayed = 0;
c_739293.tag = closureN_tag;
 c_739293.fn = (function_type)__lambda_717;
c_739293.num_args = 1;
c_739293.num_elements = 4;
c_739293.elements = (object *)e_739316;
c_739293.elements[0] = ((closureN)self_733692)->elements[0];
c_739293.elements[1] = ((closureN)self_733692)->elements[1];
c_739293.elements[2] = ((closureN)self_733692)->elements[2];
c_739293.elements[3] = ((closureN)self_733692)->elements[3];



return_direct_with_clo1(data,(closure)&c_739293,__lambda_717,  Cyc_cdr(data, ((closureN)self_733692)->elements[0]));; 
}

static void __lambda_717(void *data, object self_733693, int argc, object *args) /* object self_733693, object r_732705 */
 {
 object r_732705 = args[0];
  
closureN_type c_739295;
object e_739302 [3];
c_739295.hdr.mark = gc_color_red;
 c_739295.hdr.grayed = 0;
c_739295.tag = closureN_tag;
 c_739295.fn = (function_type)__lambda_718;
c_739295.num_args = 1;
c_739295.num_elements = 3;
c_739295.elements = (object *)e_739302;
c_739295.elements[0] = ((closureN)self_733693)->elements[2];
c_739295.elements[1] = ((closureN)self_733693)->elements[3];
c_739295.elements[2] = r_732705;


closureN_type c_739303;
object e_739315 [2];
c_739303.hdr.mark = gc_color_red;
 c_739303.hdr.grayed = 0;
c_739303.tag = closureN_tag;
 c_739303.fn = (function_type)__lambda_719;
c_739303.num_args = 1;
c_739303.num_elements = 2;
c_739303.elements = (object *)e_739315;
c_739303.elements[0] = ((closureN)self_733693)->elements[0];
c_739303.elements[1] = ((closureN)self_733693)->elements[1];

return_direct_with_clo1(data,(closure)&c_739295,__lambda_718,  &c_739303);; 
}

static void __lambda_719(void *data, object self_733694, int argc, object *args) /* object self_733694, object k_732707, object args_73810_731236 */
 {
 object k_732707 = args[0]; object args_73810_731236 = args[1];
  
list_2_type local_739307; 

pair_type local_739311; 


return_direct_with_clo1(data,  k_732707, (((closure)  k_732707)->fn),  Cyc_fast_list_2(&local_739307, ((closureN)self_733694)->elements[1], set_pair_as_expr(&local_739311, Cyc_car(data, ((closureN)self_733694)->elements[0]), args_73810_731236)));; 
}

static void __lambda_718(void *data, object self_733695, int argc, object *args) /* object self_733695, object r_732706 */
 {
 object r_732706 = args[0];
  

return_closcall3(data,  car(((closureN)self_733695)->elements[0]),  ((closureN)self_733695)->elements[1], ((closureN)self_733695)->elements[2], r_732706);; 
}

static void __lambda_709(void *data, object self_733680, int argc, object *args) /* object self_733680, object k_732692, object cont_91ast_73805_731234 */
 {
 object k_732692 = args[0]; object cont_91ast_73805_731234 = args[1];
  
closureN_type c_739241;
object e_739253 [3];
c_739241.hdr.mark = gc_color_red;
 c_739241.hdr.grayed = 0;
c_739241.tag = closureN_tag;
 c_739241.fn = (function_type)__lambda_710;
c_739241.num_args = 1;
c_739241.num_elements = 3;
c_739241.elements = (object *)e_739253;
c_739241.elements[0] = ((closureN)self_733680)->elements[0];
c_739241.elements[1] = ((closureN)self_733680)->elements[2];
c_739241.elements[2] = k_732692;


closureN_type c_739254;
object e_739284 [3];
c_739254.hdr.mark = gc_color_red;
 c_739254.hdr.grayed = 0;
c_739254.tag = closureN_tag;
 c_739254.fn = (function_type)__lambda_711;
c_739254.num_args = 1;
c_739254.num_elements = 3;
c_739254.elements = (object *)e_739284;
c_739254.elements[0] = ((closureN)self_733680)->elements[0];
c_739254.elements[1] = cont_91ast_73805_731234;
c_739254.elements[2] = ((closureN)self_733680)->elements[1];

return_direct_with_clo1(data,(closure)&c_739241,__lambda_710,  &c_739254);; 
}

static void __lambda_711(void *data, object self_733681, int argc, object *args) /* object self_733681, object k_732695, object test_73806_731235 */
 {
 object k_732695 = args[0]; object test_73806_731235 = args[1];
  


closureN_type c_739259;
object e_739279 [5];
c_739259.hdr.mark = gc_color_red;
 c_739259.hdr.grayed = 0;
c_739259.tag = closureN_tag;
 c_739259.fn = (function_type)__lambda_712;
c_739259.num_args = 1;
c_739259.num_elements = 5;
c_739259.elements = (object *)e_739279;
c_739259.elements[0] = ((closureN)self_733681)->elements[0];
c_739259.elements[1] = ((closureN)self_733681)->elements[1];
c_739259.elements[2] = ((closureN)self_733681)->elements[2];
c_739259.elements[3] = k_732695;
c_739259.elements[4] = test_73806_731235;



return_closcall3(data,  car(((closureN)self_733681)->elements[2]),  &c_739259, Cyc_caddr(data, ((closureN)self_733681)->elements[0]), ((closureN)self_733681)->elements[1]);; 
}

static void __lambda_712(void *data, object self_733682, int argc, object *args) /* object self_733682, object r_732698 */
 {
 object r_732698 = args[0];
  


closureN_type c_739264;
object e_739274 [3];
c_739264.hdr.mark = gc_color_red;
 c_739264.hdr.grayed = 0;
c_739264.tag = closureN_tag;
 c_739264.fn = (function_type)__lambda_713;
c_739264.num_args = 1;
c_739264.num_elements = 3;
c_739264.elements = (object *)e_739274;
c_739264.elements[0] = ((closureN)self_733682)->elements[3];
c_739264.elements[1] = r_732698;
c_739264.elements[2] = ((closureN)self_733682)->elements[4];



return_closcall3(data,  car(((closureN)self_733682)->elements[2]),  &c_739264, Cyc_cadddr(data, ((closureN)self_733682)->elements[0]), ((closureN)self_733682)->elements[1]);; 
}

static void __lambda_713(void *data, object self_733683, int argc, object *args) /* object self_733683, object r_732699 */
 {
 object r_732699 = args[0];
  
list_4_type local_739269; 


return_direct_with_clo1(data,  ((closureN)self_733683)->elements[0], (((closure)  ((closureN)self_733683)->elements[0])->fn),  Cyc_fast_list_4(&local_739269, quote__if, Cyc_car(data, ((closureN)self_733683)->elements[2]), ((closureN)self_733683)->elements[1], r_732699));; 
}

static void __lambda_710(void *data, object self_733684, int argc, object *args) /* object self_733684, object r_732694 */
 {
 object r_732694 = args[0];
  


pair_type local_739249; 


return_closcall3(data,  car(((closureN)self_733684)->elements[1]),  ((closureN)self_733684)->elements[2], set_cell_as_expr(&local_739249, Cyc_cadr(data, ((closureN)self_733684)->elements[0])), r_732694);; 
}

static void __lambda_704(void *data, object self_733685, int argc, object *args) /* object self_733685, object xform_73803_731232 */
 {
 object xform_73803_731232 = args[0];
  
closureN_type c_739205;
object e_739233 [3];
c_739205.hdr.mark = gc_color_red;
 c_739205.hdr.grayed = 0;
c_739205.tag = closureN_tag;
 c_739205.fn = (function_type)__lambda_705;
c_739205.num_args = 1;
c_739205.num_elements = 3;
c_739205.elements = (object *)e_739233;
c_739205.elements[0] = ((closureN)self_733685)->elements[0];
c_739205.elements[1] = ((closureN)self_733685)->elements[1];
c_739205.elements[2] = xform_73803_731232;


complex_num_type local_739236; 
return_direct_with_clo1(data,(closure)&c_739205,__lambda_705,  ((inline_function_type)
                   ((closure)__glo_ref_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_739236, ((closureN)self_733685)->elements[0]));; 
}

static void __lambda_705(void *data, object self_733686, int argc, object *args) /* object self_733686, object r_732685 */
 {
 object r_732685 = args[0];
  if( (boolean_f != r_732685) ){ 
  return_closcall2(data,  ((closureN)self_733686)->elements[2],  ((closureN)self_733686)->elements[1], ((closureN)self_733686)->elements[0]);
} else { 
  
closureN_type c_739211;
object e_739232 [3];
c_739211.hdr.mark = gc_color_red;
 c_739211.hdr.grayed = 0;
c_739211.tag = closureN_tag;
 c_739211.fn = (function_type)__lambda_706;
c_739211.num_args = 0;
c_739211.num_elements = 3;
c_739211.elements = (object *)e_739232;
c_739211.elements[0] = ((closureN)self_733686)->elements[0];
c_739211.elements[1] = ((closureN)self_733686)->elements[1];
c_739211.elements[2] = ((closureN)self_733686)->elements[2];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_739211, quote_k);}
;; 
}

static void __lambda_706(void *data, object self_733687, int argc, object *args) /* object self_733687, object k_73804_731233 */
 {
 object k_73804_731233 = args[0];
  
closureN_type c_739214;
object e_739231 [3];
c_739214.hdr.mark = gc_color_red;
 c_739214.hdr.grayed = 0;
c_739214.tag = closureN_tag;
 c_739214.fn = (function_type)__lambda_707;
c_739214.num_args = 1;
c_739214.num_elements = 3;
c_739214.elements = (object *)e_739231;
c_739214.elements[0] = ((closureN)self_733687)->elements[0];
c_739214.elements[1] = ((closureN)self_733687)->elements[1];
c_739214.elements[2] = k_73804_731233;

return_closcall2(data,  ((closureN)self_733687)->elements[2],  &c_739214, k_73804_731233);; 
}

static void __lambda_707(void *data, object self_733688, int argc, object *args) /* object self_733688, object r_732690 */
 {
 object r_732690 = args[0];
  
closureN_type c_739216;
object e_739223 [2];
c_739216.hdr.mark = gc_color_red;
 c_739216.hdr.grayed = 0;
c_739216.tag = closureN_tag;
 c_739216.fn = (function_type)__lambda_708;
c_739216.num_args = 1;
c_739216.num_elements = 2;
c_739216.elements = (object *)e_739223;
c_739216.elements[0] = ((closureN)self_733688)->elements[0];
c_739216.elements[1] = ((closureN)self_733688)->elements[1];


pair_type local_739226; 

pair_type local_739230; 
return_direct_with_clo4(data,  __glo_ast_117make_91lambda_scheme_cyclone_ast, (((closure)  __glo_ast_117make_91lambda_scheme_cyclone_ast)->fn),  &c_739216, set_cell_as_expr(&local_739226, ((closureN)self_733688)->elements[2]), set_cell_as_expr(&local_739230, r_732690), boolean_t);; 
}

static void __lambda_708(void *data, object self_733689, int argc, object *args) /* object self_733689, object r_732687 */
 {
 object r_732687 = args[0];
  
list_2_type local_739221; 
return_direct_with_clo1(data,  ((closureN)self_733689)->elements[1], (((closure)  ((closureN)self_733689)->elements[1])->fn),  Cyc_fast_list_2(&local_739221, r_732687, ((closureN)self_733689)->elements[0]));; 
}

static void __lambda_702(void *data, object self_733677, int argc, object *args) /* object self_733677, object k_732678, object val_73796_731231 */
 {
 object k_732678 = args[0]; object val_73796_731231 = args[1];
  
list_2_type local_739188; 

pair_type local_739192; 

pair_type local_739195; 


return_direct_with_clo1(data,  k_732678, (((closure)  k_732678)->fn),  Cyc_fast_list_2(&local_739188, ((closureN)self_733677)->elements[1], set_pair_as_expr(&local_739192, quote_set_67, set_pair_as_expr(&local_739195, Cyc_cadr(data, ((closureN)self_733677)->elements[0]), val_73796_731231))));; 
}

static void __lambda_701(void *data, object self_733678, int argc, object *args) /* object self_733678, object r_732677 */
 {
 object r_732677 = args[0];
  



return_closcall3(data,  car(((closureN)self_733678)->elements[1]),  ((closureN)self_733678)->elements[2], Cyc_cddr(data, ((closureN)self_733678)->elements[0]), r_732677);; 
}

static void __lambda_663(void *data, object self_733752, int argc, object *args) /* object self_733752, object r_732670 */
 {
 object r_732670 = args[0];
  
closureN_type c_738889;
object e_739138 [6];
c_738889.hdr.mark = gc_color_red;
 c_738889.hdr.grayed = 0;
c_738889.tag = closureN_tag;
 c_738889.fn = (function_type)__lambda_664;
c_738889.num_args = 1;
c_738889.num_elements = 6;
c_738889.elements = (object *)e_739138;
c_738889.elements[0] = ((closureN)self_733752)->elements[0];
c_738889.elements[1] = ((closureN)self_733752)->elements[1];
c_738889.elements[2] = ((closureN)self_733752)->elements[2];
c_738889.elements[3] = ((closureN)self_733752)->elements[3];
c_738889.elements[4] = ((closureN)self_733752)->elements[4];
c_738889.elements[5] = ((closureN)self_733752)->elements[5];



return_direct_with_clo1(data,(closure)&c_738889,__lambda_664,  Cyc_set_cell(data, ((closureN)self_733752)->elements[1], r_732670));; 
}

static void __lambda_664(void *data, object self_733753, int argc, object *args) /* object self_733753, object r_732606 */
 {

  
closureN_type c_738891;
object e_739036 [6];
c_738891.hdr.mark = gc_color_red;
 c_738891.hdr.grayed = 0;
c_738891.tag = closureN_tag;
 c_738891.fn = (function_type)__lambda_665;
c_738891.num_args = 1;
c_738891.num_elements = 6;
c_738891.elements = (object *)e_739036;
c_738891.elements[0] = ((closureN)self_733753)->elements[0];
c_738891.elements[1] = ((closureN)self_733753)->elements[1];
c_738891.elements[2] = ((closureN)self_733753)->elements[2];
c_738891.elements[3] = ((closureN)self_733753)->elements[3];
c_738891.elements[4] = ((closureN)self_733753)->elements[4];
c_738891.elements[5] = ((closureN)self_733753)->elements[5];


closureN_type c_739037;
object e_739137 [2];
c_739037.hdr.mark = gc_color_red;
 c_739037.hdr.grayed = 0;
c_739037.tag = closureN_tag;
 c_739037.fn = (function_type)__lambda_684;
c_739037.num_args = 2;
c_739037.num_elements = 2;
c_739037.elements = (object *)e_739137;
c_739037.elements[0] = ((closureN)self_733753)->elements[1];
c_739037.elements[1] = ((closureN)self_733753)->elements[2];

return_direct_with_clo1(data,(closure)&c_738891,__lambda_665,  &c_739037);; 
}

static void __lambda_684(void *data, object self_733754, int argc, object *args) /* object self_733754, object k_732647, object asts_73882_731255, object inner_73883_731256 */
 {
 object k_732647 = args[0]; object asts_73882_731255 = args[1]; object inner_73883_731256 = args[2];
  
closureN_type c_739039;
object e_739136 [5];
c_739039.hdr.mark = gc_color_red;
 c_739039.hdr.grayed = 0;
c_739039.tag = closureN_tag;
 c_739039.fn = (function_type)__lambda_685;
c_739039.num_args = 1;
c_739039.num_elements = 5;
c_739039.elements = (object *)e_739136;
c_739039.elements[0] = asts_73882_731255;
c_739039.elements[1] = ((closureN)self_733754)->elements[0];
c_739039.elements[2] = ((closureN)self_733754)->elements[1];
c_739039.elements[3] = inner_73883_731256;
c_739039.elements[4] = k_732647;

return_direct_with_clo1(data,(closure)&c_739039,__lambda_685,  boolean_f);; 
}

static void __lambda_685(void *data, object self_733755, int argc, object *args) /* object self_733755, object body_731257 */
 {
 object body_731257 = args[0];
  
closureN_type c_739041;
object e_739132 [5];
c_739041.hdr.mark = gc_color_red;
 c_739041.hdr.grayed = 0;
c_739041.tag = closureN_tag;
 c_739041.fn = (function_type)__lambda_804;
c_739041.num_args = 1;
c_739041.num_elements = 5;
c_739041.elements = (object *)e_739132;
c_739041.elements[0] = ((closureN)self_733755)->elements[0];
c_739041.elements[1] = ((closureN)self_733755)->elements[1];
c_739041.elements[2] = ((closureN)self_733755)->elements[2];
c_739041.elements[3] = ((closureN)self_733755)->elements[3];
c_739041.elements[4] = ((closureN)self_733755)->elements[4];


pair_type local_739135; 
return_direct_with_clo1(data,(closure)&c_739041,__lambda_804,  set_cell_as_expr(&local_739135, body_731257));; 
}

static void __lambda_804(void *data, object self_733756, int argc, object *args) /* object self_733756, object body_731257 */
 {
 object body_731257 = args[0];
  
closureN_type c_739043;
object e_739110 [5];
c_739043.hdr.mark = gc_color_red;
 c_739043.hdr.grayed = 0;
c_739043.tag = closureN_tag;
 c_739043.fn = (function_type)__lambda_686;
c_739043.num_args = 1;
c_739043.num_elements = 5;
c_739043.elements = (object *)e_739110;
c_739043.elements[0] = ((closureN)self_733756)->elements[0];
c_739043.elements[1] = body_731257;
c_739043.elements[2] = ((closureN)self_733756)->elements[1];
c_739043.elements[3] = ((closureN)self_733756)->elements[3];
c_739043.elements[4] = ((closureN)self_733756)->elements[4];


closureN_type c_739111;
object e_739131 [3];
c_739111.hdr.mark = gc_color_red;
 c_739111.hdr.grayed = 0;
c_739111.tag = closureN_tag;
 c_739111.fn = (function_type)__lambda_693;
c_739111.num_args = 1;
c_739111.num_elements = 3;
c_739111.elements = (object *)e_739131;
c_739111.elements[0] = ((closureN)self_733756)->elements[0];
c_739111.elements[1] = ((closureN)self_733756)->elements[2];
c_739111.elements[2] = ((closureN)self_733756)->elements[3];

return_direct_with_clo1(data,(closure)&c_739043,__lambda_686,  &c_739111);; 
}

static void __lambda_693(void *data, object self_733757, int argc, object *args) /* object self_733757, object k_732665, object x_73884_731258 */
 {
 object k_732665 = args[0]; object x_73884_731258 = args[1];
  
closureN_type c_739113;
object e_739122 [3];
c_739113.hdr.mark = gc_color_red;
 c_739113.hdr.grayed = 0;
c_739113.tag = closureN_tag;
 c_739113.fn = (function_type)__lambda_694;
c_739113.num_args = 1;
c_739113.num_elements = 3;
c_739113.elements = (object *)e_739122;
c_739113.elements[0] = ((closureN)self_733757)->elements[0];
c_739113.elements[1] = ((closureN)self_733757)->elements[1];
c_739113.elements[2] = k_732665;


closureN_type c_739123;
object e_739130 [2];
c_739123.hdr.mark = gc_color_red;
 c_739123.hdr.grayed = 0;
c_739123.tag = closureN_tag;
 c_739123.fn = (function_type)__lambda_695;
c_739123.num_args = 1;
c_739123.num_elements = 2;
c_739123.elements = (object *)e_739130;
c_739123.elements[0] = ((closureN)self_733757)->elements[2];
c_739123.elements[1] = x_73884_731258;

return_direct_with_clo1(data,(closure)&c_739113,__lambda_694,  &c_739123);; 
}

static void __lambda_695(void *data, object self_733758, int argc, object *args) /* object self_733758, object k_732668, object new_91asts_73885_731259 */
 {
 object k_732668 = args[0]; object new_91asts_73885_731259 = args[1];
  
pair_type local_739128; 
return_closcall2(data,  ((closureN)self_733758)->elements[0],  k_732668, set_pair_as_expr(&local_739128, ((closureN)self_733758)->elements[1], new_91asts_73885_731259));; 
}

static void __lambda_694(void *data, object self_733759, int argc, object *args) /* object self_733759, object r_732667 */
 {
 object r_732667 = args[0];
  



return_closcall3(data,  car(((closureN)self_733759)->elements[1]),  ((closureN)self_733759)->elements[2], Cyc_cdr(data, ((closureN)self_733759)->elements[0]), r_732667);; 
}

static void __lambda_686(void *data, object self_733760, int argc, object *args) /* object self_733760, object r_732664 */
 {
 object r_732664 = args[0];
  
closureN_type c_739045;
object e_739106 [5];
c_739045.hdr.mark = gc_color_red;
 c_739045.hdr.grayed = 0;
c_739045.tag = closureN_tag;
 c_739045.fn = (function_type)__lambda_687;
c_739045.num_args = 1;
c_739045.num_elements = 5;
c_739045.elements = (object *)e_739106;
c_739045.elements[0] = ((closureN)self_733760)->elements[0];
c_739045.elements[1] = ((closureN)self_733760)->elements[1];
c_739045.elements[2] = ((closureN)self_733760)->elements[2];
c_739045.elements[3] = ((closureN)self_733760)->elements[3];
c_739045.elements[4] = ((closureN)self_733760)->elements[4];



return_direct_with_clo1(data,(closure)&c_739045,__lambda_687,  Cyc_set_cell(data, ((closureN)self_733760)->elements[1], r_732664));; 
}

static void __lambda_687(void *data, object self_733761, int argc, object *args) /* object self_733761, object r_732648 */
 {

    
if( (boolean_f != Cyc_is_null(((closureN)self_733761)->elements[0])) ){ 
  return_closcall2(data,  ((closureN)self_733761)->elements[3],  ((closureN)self_733761)->elements[4], NULL);
} else { 
  
closureN_type c_739053;
object e_739102 [4];
c_739053.hdr.mark = gc_color_red;
 c_739053.hdr.grayed = 0;
c_739053.tag = closureN_tag;
 c_739053.fn = (function_type)__lambda_688;
c_739053.num_args = 1;
c_739053.num_elements = 4;
c_739053.elements = (object *)e_739102;
c_739053.elements[0] = ((closureN)self_733761)->elements[0];
c_739053.elements[1] = ((closureN)self_733761)->elements[1];
c_739053.elements[2] = ((closureN)self_733761)->elements[2];
c_739053.elements[3] = ((closureN)self_733761)->elements[4];



return_direct_with_clo2(data,  __glo_const_127_scheme_cyclone_util, (((closure)  __glo_const_127_scheme_cyclone_util)->fn),  &c_739053, Cyc_car(data, ((closureN)self_733761)->elements[0]));}
;; 
}

static void __lambda_688(void *data, object self_733762, int argc, object *args) /* object self_733762, object tmp_73893_73895_731260 */
 {
 object tmp_73893_73895_731260 = args[0];
  object r_732651;
  if( (boolean_f != tmp_73893_73895_731260) ){ 
  r_732651 = tmp_73893_73895_731260;
} else { 
  object local_739059 = alloca(sizeof(complex_num_type)); 
  
  r_732651 = ((inline_function_type)
                   ((closure)__glo_ref_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,local_739059, Cyc_car(data, ((closureN)self_733762)->elements[0]));}
;if( (boolean_f != r_732651) ){ 
  



return_closcall2(data,  car(((closureN)self_733762)->elements[1]),  ((closureN)self_733762)->elements[3], Cyc_car(data, ((closureN)self_733762)->elements[0]));
} else { 
  
closureN_type c_739072;
object e_739101 [4];
c_739072.hdr.mark = gc_color_red;
 c_739072.hdr.grayed = 0;
c_739072.tag = closureN_tag;
 c_739072.fn = (function_type)__lambda_689;
c_739072.num_args = 1;
c_739072.num_elements = 4;
c_739072.elements = (object *)e_739101;
c_739072.elements[0] = ((closureN)self_733762)->elements[0];
c_739072.elements[1] = ((closureN)self_733762)->elements[1];
c_739072.elements[2] = ((closureN)self_733762)->elements[2];
c_739072.elements[3] = ((closureN)self_733762)->elements[3];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_739072, quote_r);}
;; 
}

static void __lambda_689(void *data, object self_733763, int argc, object *args) /* object self_733763, object r_73897_731261 */
 {
 object r_73897_731261 = args[0];
  
closureN_type c_739074;
object e_739097 [5];
c_739074.hdr.mark = gc_color_red;
 c_739074.hdr.grayed = 0;
c_739074.tag = closureN_tag;
 c_739074.fn = (function_type)__lambda_690;
c_739074.num_args = 1;
c_739074.num_elements = 5;
c_739074.elements = (object *)e_739097;
c_739074.elements[0] = ((closureN)self_733763)->elements[0];
c_739074.elements[1] = ((closureN)self_733763)->elements[1];
c_739074.elements[2] = ((closureN)self_733763)->elements[2];
c_739074.elements[3] = ((closureN)self_733763)->elements[3];
c_739074.elements[4] = r_73897_731261;


pair_type local_739100; 
return_direct_with_clo1(data,(closure)&c_739074,__lambda_690,  set_cell_as_expr(&local_739100, r_73897_731261));; 
}

static void __lambda_690(void *data, object self_733764, int argc, object *args) /* object self_733764, object r_732656 */
 {
 object r_732656 = args[0];
  


closureN_type c_739079;
object e_739095 [4];
c_739079.hdr.mark = gc_color_red;
 c_739079.hdr.grayed = 0;
c_739079.tag = closureN_tag;
 c_739079.fn = (function_type)__lambda_691;
c_739079.num_args = 1;
c_739079.num_elements = 4;
c_739079.elements = (object *)e_739095;
c_739079.elements[0] = ((closureN)self_733764)->elements[0];
c_739079.elements[1] = ((closureN)self_733764)->elements[2];
c_739079.elements[2] = ((closureN)self_733764)->elements[3];
c_739079.elements[3] = r_732656;

return_closcall2(data,  car(((closureN)self_733764)->elements[1]),  &c_739079, ((closureN)self_733764)->elements[4]);; 
}

static void __lambda_691(void *data, object self_733765, int argc, object *args) /* object self_733765, object r_732658 */
 {
 object r_732658 = args[0];
  
closureN_type c_739081;
object e_739090 [3];
c_739081.hdr.mark = gc_color_red;
 c_739081.hdr.grayed = 0;
c_739081.tag = closureN_tag;
 c_739081.fn = (function_type)__lambda_692;
c_739081.num_args = 1;
c_739081.num_elements = 3;
c_739081.elements = (object *)e_739090;
c_739081.elements[0] = ((closureN)self_733765)->elements[0];
c_739081.elements[1] = ((closureN)self_733765)->elements[1];
c_739081.elements[2] = ((closureN)self_733765)->elements[2];


pair_type local_739094; 
return_direct_with_clo3(data,  __glo_ast_117make_91lambda_scheme_cyclone_ast, (((closure)  __glo_ast_117make_91lambda_scheme_cyclone_ast)->fn),  &c_739081, ((closureN)self_733765)->elements[3], set_cell_as_expr(&local_739094, r_732658));; 
}

static void __lambda_692(void *data, object self_733766, int argc, object *args) /* object self_733766, object r_732655 */
 {
 object r_732655 = args[0];
  



return_closcall3(data,  car(((closureN)self_733766)->elements[1]),  ((closureN)self_733766)->elements[2], Cyc_car(data, ((closureN)self_733766)->elements[0]), r_732655);; 
}

static void __lambda_665(void *data, object self_733767, int argc, object *args) /* object self_733767, object r_732646 */
 {
 object r_732646 = args[0];
  
closureN_type c_738893;
object e_739032 [5];
c_738893.hdr.mark = gc_color_red;
 c_738893.hdr.grayed = 0;
c_738893.tag = closureN_tag;
 c_738893.fn = (function_type)__lambda_666;
c_738893.num_args = 1;
c_738893.num_elements = 5;
c_738893.elements = (object *)e_739032;
c_738893.elements[0] = ((closureN)self_733767)->elements[0];
c_738893.elements[1] = ((closureN)self_733767)->elements[1];
c_738893.elements[2] = ((closureN)self_733767)->elements[3];
c_738893.elements[3] = ((closureN)self_733767)->elements[4];
c_738893.elements[4] = ((closureN)self_733767)->elements[5];



return_direct_with_clo1(data,(closure)&c_738893,__lambda_666,  Cyc_set_cell(data, ((closureN)self_733767)->elements[2], r_732646));; 
}

static void __lambda_666(void *data, object self_733768, int argc, object *args) /* object self_733768, object r_732607 */
 {

  
closureN_type c_738895;
object e_738982 [5];
c_738895.hdr.mark = gc_color_red;
 c_738895.hdr.grayed = 0;
c_738895.tag = closureN_tag;
 c_738895.fn = (function_type)__lambda_667;
c_738895.num_args = 1;
c_738895.num_elements = 5;
c_738895.elements = (object *)e_738982;
c_738895.elements[0] = ((closureN)self_733768)->elements[0];
c_738895.elements[1] = ((closureN)self_733768)->elements[1];
c_738895.elements[2] = ((closureN)self_733768)->elements[2];
c_738895.elements[3] = ((closureN)self_733768)->elements[3];
c_738895.elements[4] = ((closureN)self_733768)->elements[4];


closureN_type c_738983;
object e_739031 [2];
c_738983.hdr.mark = gc_color_red;
 c_738983.hdr.grayed = 0;
c_738983.tag = closureN_tag;
 c_738983.fn = (function_type)__lambda_680;
c_738983.num_args = 2;
c_738983.num_elements = 2;
c_738983.elements = (object *)e_739031;
c_738983.elements[0] = ((closureN)self_733768)->elements[1];
c_738983.elements[1] = ((closureN)self_733768)->elements[2];

return_direct_with_clo1(data,(closure)&c_738895,__lambda_667,  &c_738983);; 
}

static void __lambda_680(void *data, object self_733769, int argc, object *args) /* object self_733769, object k_732633, object asts_73898_731262, object cont_91ast_73899_731263 */
 {
 object k_732633 = args[0]; object asts_73898_731262 = args[1]; object cont_91ast_73899_731263 = args[2];
    
if( (boolean_f != Cyc_is_null(asts_73898_731262)) ){ 
  
list_2_type local_738989; 
return_direct_with_clo1(data,  k_732633, (((closure)  k_732633)->fn),  Cyc_fast_list_2(&local_738989, cont_91ast_73899_731263, boolean_f));
} else { 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, asts_73898_731262))) ){ 
  



return_closcall3(data,  car(((closureN)self_733769)->elements[0]),  k_732633, Cyc_car(data, asts_73898_731262), cont_91ast_73899_731263);
} else { 
  
closureN_type c_739001;
object e_739030 [5];
c_739001.hdr.mark = gc_color_red;
 c_739001.hdr.grayed = 0;
c_739001.tag = closureN_tag;
 c_739001.fn = (function_type)__lambda_681;
c_739001.num_args = 1;
c_739001.num_elements = 5;
c_739001.elements = (object *)e_739030;
c_739001.elements[0] = asts_73898_731262;
c_739001.elements[1] = cont_91ast_73899_731263;
c_739001.elements[2] = ((closureN)self_733769)->elements[0];
c_739001.elements[3] = ((closureN)self_733769)->elements[1];
c_739001.elements[4] = k_732633;

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_739001, quote_r);}
;}
;; 
}

static void __lambda_681(void *data, object self_733770, int argc, object *args) /* object self_733770, object r_73907_731264 */
 {
 object r_73907_731264 = args[0];
  


closureN_type c_739006;
object e_739025 [4];
c_739006.hdr.mark = gc_color_red;
 c_739006.hdr.grayed = 0;
c_739006.tag = closureN_tag;
 c_739006.fn = (function_type)__lambda_682;
c_739006.num_args = 1;
c_739006.num_elements = 4;
c_739006.elements = (object *)e_739025;
c_739006.elements[0] = ((closureN)self_733770)->elements[0];
c_739006.elements[1] = ((closureN)self_733770)->elements[2];
c_739006.elements[2] = ((closureN)self_733770)->elements[4];
c_739006.elements[3] = r_73907_731264;



return_closcall3(data,  car(((closureN)self_733770)->elements[3]),  &c_739006, Cyc_cdr(data, ((closureN)self_733770)->elements[0]), ((closureN)self_733770)->elements[1]);; 
}

static void __lambda_682(void *data, object self_733771, int argc, object *args) /* object self_733771, object r_732642 */
 {
 object r_732642 = args[0];
  
closureN_type c_739008;
object e_739017 [3];
c_739008.hdr.mark = gc_color_red;
 c_739008.hdr.grayed = 0;
c_739008.tag = closureN_tag;
 c_739008.fn = (function_type)__lambda_683;
c_739008.num_args = 1;
c_739008.num_elements = 3;
c_739008.elements = (object *)e_739017;
c_739008.elements[0] = ((closureN)self_733771)->elements[0];
c_739008.elements[1] = ((closureN)self_733771)->elements[1];
c_739008.elements[2] = ((closureN)self_733771)->elements[2];


pair_type local_739020; 

pair_type local_739024; 
return_direct_with_clo3(data,  __glo_ast_117make_91lambda_scheme_cyclone_ast, (((closure)  __glo_ast_117make_91lambda_scheme_cyclone_ast)->fn),  &c_739008, set_cell_as_expr(&local_739020, ((closureN)self_733771)->elements[3]), set_cell_as_expr(&local_739024, r_732642));; 
}

static void __lambda_683(void *data, object self_733772, int argc, object *args) /* object self_733772, object r_732639 */
 {
 object r_732639 = args[0];
  



return_closcall3(data,  car(((closureN)self_733772)->elements[1]),  ((closureN)self_733772)->elements[2], Cyc_car(data, ((closureN)self_733772)->elements[0]), r_732639);; 
}

static void __lambda_667(void *data, object self_733773, int argc, object *args) /* object self_733773, object r_732632 */
 {
 object r_732632 = args[0];
  
closureN_type c_738897;
object e_738978 [4];
c_738897.hdr.mark = gc_color_red;
 c_738897.hdr.grayed = 0;
c_738897.tag = closureN_tag;
 c_738897.fn = (function_type)__lambda_668;
c_738897.num_args = 1;
c_738897.num_elements = 4;
c_738897.elements = (object *)e_738978;
c_738897.elements[0] = ((closureN)self_733773)->elements[0];
c_738897.elements[1] = ((closureN)self_733773)->elements[1];
c_738897.elements[2] = ((closureN)self_733773)->elements[3];
c_738897.elements[3] = ((closureN)self_733773)->elements[4];



return_direct_with_clo1(data,(closure)&c_738897,__lambda_668,  Cyc_set_cell(data, ((closureN)self_733773)->elements[2], r_732632));; 
}

static void __lambda_668(void *data, object self_733774, int argc, object *args) /* object self_733774, object r_732608 */
 {

  
closureN_type c_738899;
object e_738966 [4];
c_738899.hdr.mark = gc_color_red;
 c_738899.hdr.grayed = 0;
c_738899.tag = closureN_tag;
 c_738899.fn = (function_type)__lambda_669;
c_738899.num_args = 1;
c_738899.num_elements = 4;
c_738899.elements = (object *)e_738966;
c_738899.elements[0] = ((closureN)self_733774)->elements[0];
c_738899.elements[1] = ((closureN)self_733774)->elements[1];
c_738899.elements[2] = ((closureN)self_733774)->elements[2];
c_738899.elements[3] = ((closureN)self_733774)->elements[3];


mclosure0(c_738967, (function_type)__lambda_679);c_738967.num_args = 1;
return_direct_with_clo1(data,(closure)&c_738899,__lambda_669,  &c_738967);; 
}

static void __lambda_679(void *data, object self_733775, int argc, object *args) /* object self_733775, object k_732628, object ast_73908_731265 */
 {
 object k_732628 = args[0]; object ast_73908_731265 = args[1];
  
list_3_type local_738971; 






return_direct_with_clo1(data,  k_732628, (((closure)  k_732628)->fn),  Cyc_fast_list_3(&local_738971, Cyc_car(data, ast_73908_731265), Cyc_cadr(data, ast_73908_731265), Cyc_cadddr(data, ast_73908_731265)));; 
}

static void __lambda_669(void *data, object self_733776, int argc, object *args) /* object self_733776, object r_732627 */
 {
 object r_732627 = args[0];
  
closureN_type c_738901;
object e_738962 [4];
c_738901.hdr.mark = gc_color_red;
 c_738901.hdr.grayed = 0;
c_738901.tag = closureN_tag;
 c_738901.fn = (function_type)__lambda_670;
c_738901.num_args = 1;
c_738901.num_elements = 4;
c_738901.elements = (object *)e_738962;
c_738901.elements[0] = ((closureN)self_733776)->elements[0];
c_738901.elements[1] = ((closureN)self_733776)->elements[1];
c_738901.elements[2] = ((closureN)self_733776)->elements[2];
c_738901.elements[3] = ((closureN)self_733776)->elements[3];



return_direct_with_clo1(data,(closure)&c_738901,__lambda_670,  Cyc_set_cell(data, ((closureN)self_733776)->elements[3], r_732627));; 
}

static void __lambda_670(void *data, object self_733777, int argc, object *args) /* object self_733777, object r_732609 */
 {

  
closureN_type c_738903;
object e_738960 [4];
c_738903.hdr.mark = gc_color_red;
 c_738903.hdr.grayed = 0;
c_738903.tag = closureN_tag;
 c_738903.fn = (function_type)__lambda_671;
c_738903.num_args = 1;
c_738903.num_elements = 4;
c_738903.elements = (object *)e_738960;
c_738903.elements[0] = ((closureN)self_733777)->elements[0];
c_738903.elements[1] = ((closureN)self_733777)->elements[1];
c_738903.elements[2] = ((closureN)self_733777)->elements[2];
c_738903.elements[3] = ((closureN)self_733777)->elements[3];

return_direct_with_clo2(data,  __glo_define_127_scheme_cyclone_util, (((closure)  __glo_define_127_scheme_cyclone_util)->fn),  &c_738903, ((closureN)self_733777)->elements[0]);; 
}

static void __lambda_671(void *data, object self_733778, int argc, object *args) /* object self_733778, object global_91def_127_73911_731266 */
 {
 object global_91def_127_73911_731266 = args[0];
  
closureN_type c_738905;
object e_738955 [4];
c_738905.hdr.mark = gc_color_red;
 c_738905.hdr.grayed = 0;
c_738905.tag = closureN_tag;
 c_738905.fn = (function_type)__lambda_672;
c_738905.num_args = 0;
c_738905.num_elements = 4;
c_738905.elements = (object *)e_738955;
c_738905.elements[0] = ((closureN)self_733778)->elements[0];
c_738905.elements[1] = ((closureN)self_733778)->elements[1];
c_738905.elements[2] = global_91def_127_73911_731266;
c_738905.elements[3] = ((closureN)self_733778)->elements[3];


closureN_type c_738956;
object e_738959 [1];
c_738956.hdr.mark = gc_color_red;
 c_738956.hdr.grayed = 0;
c_738956.tag = closureN_tag;
 c_738956.fn = (function_type)__lambda_678;
c_738956.num_args = 1;
c_738956.num_elements = 1;
c_738956.elements = (object *)e_738959;
c_738956.elements[0] = ((closureN)self_733778)->elements[2];

return_direct_with_clo1(data,(closure)&c_738905,__lambda_672,  &c_738956);; 
}

static void __lambda_678(void *data, object self_733779, int argc, object *args) /* object self_733779, object ast_91cps_73914_731267 */
 {
 object ast_91cps_73914_731267 = args[0];
  return_direct_with_clo1(data,  ((closureN)self_733779)->elements[0], (((closure)  ((closureN)self_733779)->elements[0])->fn),  ast_91cps_73914_731267);; 
}

static void __lambda_672(void *data, object self_733780, int argc, object *args) /* object self_733780, object k_732612 */
 {
 object k_732612 = args[0];
  if( (boolean_f != ((closureN)self_733780)->elements[2]) ){ 
  
closureN_type c_738908;
object e_738940 [4];
c_738908.hdr.mark = gc_color_red;
 c_738908.hdr.grayed = 0;
c_738908.tag = closureN_tag;
 c_738908.fn = (function_type)__lambda_673;
c_738908.num_args = 1;
c_738908.num_elements = 4;
c_738908.elements = (object *)e_738940;
c_738908.elements[0] = ((closureN)self_733780)->elements[0];
c_738908.elements[1] = ((closureN)self_733780)->elements[1];
c_738908.elements[2] = k_732612;
c_738908.elements[3] = ((closureN)self_733780)->elements[3];

return_direct_with_clo2(data,  __glo_define_91_125var_scheme_cyclone_util, (((closure)  __glo_define_91_125var_scheme_cyclone_util)->fn),  &c_738908, ((closureN)self_733780)->elements[0]);
} else { 
  
closureN_type c_738943;
object e_738953 [3];
c_738943.hdr.mark = gc_color_red;
 c_738943.hdr.grayed = 0;
c_738943.tag = closureN_tag;
 c_738943.fn = (function_type)__lambda_677;
c_738943.num_args = 1;
c_738943.num_elements = 3;
c_738943.elements = (object *)e_738953;
c_738943.elements[0] = ((closureN)self_733780)->elements[0];
c_738943.elements[1] = ((closureN)self_733780)->elements[1];
c_738943.elements[2] = k_732612;

return_direct_with_clo2(data,  __glo_define_91c_127_scheme_cyclone_util, (((closure)  __glo_define_91c_127_scheme_cyclone_util)->fn),  &c_738943, ((closureN)self_733780)->elements[0]);}
;; 
}

static void __lambda_677(void *data, object self_733785, int argc, object *args) /* object self_733785, object r_732625 */
 {
 object r_732625 = args[0];
  if( (boolean_f != r_732625) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733785)->elements[2], (((closure)  ((closureN)self_733785)->elements[2])->fn),  ((closureN)self_733785)->elements[0]);
} else { 
  

return_closcall3(data,  car(((closureN)self_733785)->elements[1]),  ((closureN)self_733785)->elements[2], ((closureN)self_733785)->elements[0], quote__75halt);}
;; 
}

static void __lambda_673(void *data, object self_733781, int argc, object *args) /* object self_733781, object r_732616 */
 {
 object r_732616 = args[0];
  
closureN_type c_738910;
object e_738939 [5];
c_738910.hdr.mark = gc_color_red;
 c_738910.hdr.grayed = 0;
c_738910.tag = closureN_tag;
 c_738910.fn = (function_type)__lambda_674;
c_738910.num_args = 1;
c_738910.num_elements = 5;
c_738910.elements = (object *)e_738939;
c_738910.elements[0] = ((closureN)self_733781)->elements[0];
c_738910.elements[1] = ((closureN)self_733781)->elements[1];
c_738910.elements[2] = ((closureN)self_733781)->elements[2];
c_738910.elements[3] = r_732616;
c_738910.elements[4] = ((closureN)self_733781)->elements[3];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_738910, quote_k);; 
}

static void __lambda_674(void *data, object self_733782, int argc, object *args) /* object self_733782, object r_732618 */
 {

  
closureN_type c_738912;
object e_738938 [5];
c_738912.hdr.mark = gc_color_red;
 c_738912.hdr.grayed = 0;
c_738912.tag = closureN_tag;
 c_738912.fn = (function_type)__lambda_675;
c_738912.num_args = 1;
c_738912.num_elements = 5;
c_738912.elements = (object *)e_738938;
c_738912.elements[0] = ((closureN)self_733782)->elements[0];
c_738912.elements[1] = ((closureN)self_733782)->elements[1];
c_738912.elements[2] = ((closureN)self_733782)->elements[2];
c_738912.elements[3] = ((closureN)self_733782)->elements[3];
c_738912.elements[4] = ((closureN)self_733782)->elements[4];

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_738912, quote_r);; 
}

static void __lambda_675(void *data, object self_733783, int argc, object *args) /* object self_733783, object r_732619 */
 {

  


closureN_type c_738918;
object e_738931 [3];
c_738918.hdr.mark = gc_color_red;
 c_738918.hdr.grayed = 0;
c_738918.tag = closureN_tag;
 c_738918.fn = (function_type)__lambda_676;
c_738918.num_args = 1;
c_738918.num_elements = 3;
c_738918.elements = (object *)e_738931;
c_738918.elements[0] = ((closureN)self_733783)->elements[2];
c_738918.elements[1] = ((closureN)self_733783)->elements[3];
c_738918.elements[2] = ((closureN)self_733783)->elements[4];




complex_num_type local_738936; 
return_closcall3(data,  car(((closureN)self_733783)->elements[1]),  &c_738918, Cyc_car(data, ((inline_function_type)
                   ((closure)__glo_define_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_738936, ((closureN)self_733783)->elements[0])), quote_unused);;; 
}

static void __lambda_676(void *data, object self_733784, int argc, object *args) /* object self_733784, object r_732617 */
 {
 object r_732617 = args[0];
  


pair_type local_738926; 

pair_type local_738929; 
return_closcall2(data,  car(((closureN)self_733784)->elements[2]),  ((closureN)self_733784)->elements[0], set_pair_as_expr(&local_738926, quote_define, set_pair_as_expr(&local_738929, ((closureN)self_733784)->elements[1], r_732617)));; 
}

static void __lambda_629(void *data, object _, int argc, object *args) /* closure _,object k_732547, object expr_73717_731205 */
 {
object k_732547 = args[0]; object expr_73717_731205 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:prim-convert");

closureN_type c_738614;
object e_738874 [2];
c_738614.hdr.mark = gc_color_red;
 c_738614.hdr.grayed = 0;
c_738614.tag = closureN_tag;
 c_738614.fn = (function_type)__lambda_630;
c_738614.num_args = 1;
c_738614.num_elements = 2;
c_738614.elements = (object *)e_738874;
c_738614.elements[0] = expr_73717_731205;
c_738614.elements[1] = k_732547;

return_direct_with_clo1(data,(closure)&c_738614,__lambda_630,  boolean_f);; 
}

static void __lambda_630(void *data, object self_733635, int argc, object *args) /* object self_733635, object conv_731207 */
 {
 object conv_731207 = args[0];
  
closureN_type c_738616;
object e_738870 [2];
c_738616.hdr.mark = gc_color_red;
 c_738616.hdr.grayed = 0;
c_738616.tag = closureN_tag;
 c_738616.fn = (function_type)__lambda_803;
c_738616.num_args = 1;
c_738616.num_elements = 2;
c_738616.elements = (object *)e_738870;
c_738616.elements[0] = ((closureN)self_733635)->elements[0];
c_738616.elements[1] = ((closureN)self_733635)->elements[1];


pair_type local_738873; 
return_direct_with_clo1(data,(closure)&c_738616,__lambda_803,  set_cell_as_expr(&local_738873, conv_731207));; 
}

static void __lambda_803(void *data, object self_733636, int argc, object *args) /* object self_733636, object conv_731207 */
 {
 object conv_731207 = args[0];
  
closureN_type c_738618;
object e_738631 [3];
c_738618.hdr.mark = gc_color_red;
 c_738618.hdr.grayed = 0;
c_738618.tag = closureN_tag;
 c_738618.fn = (function_type)__lambda_631;
c_738618.num_args = 1;
c_738618.num_elements = 3;
c_738618.elements = (object *)e_738631;
c_738618.elements[0] = conv_731207;
c_738618.elements[1] = ((closureN)self_733636)->elements[0];
c_738618.elements[2] = ((closureN)self_733636)->elements[1];


closureN_type c_738632;
object e_738869 [1];
c_738632.hdr.mark = gc_color_red;
 c_738632.hdr.grayed = 0;
c_738632.tag = closureN_tag;
 c_738632.fn = (function_type)__lambda_633;
c_738632.num_args = 1;
c_738632.num_elements = 1;
c_738632.elements = (object *)e_738869;
c_738632.elements[0] = conv_731207;

return_direct_with_clo1(data,(closure)&c_738618,__lambda_631,  &c_738632);; 
}

static void __lambda_633(void *data, object self_733637, int argc, object *args) /* object self_733637, object k_732550, object ast_73718_731209 */
 {
 object k_732550 = args[0]; object ast_73718_731209 = args[1];
  
closureN_type c_738634;
object e_738868 [3];
c_738634.hdr.mark = gc_color_red;
 c_738634.hdr.grayed = 0;
c_738634.tag = closureN_tag;
 c_738634.fn = (function_type)__lambda_634;
c_738634.num_args = 1;
c_738634.num_elements = 3;
c_738634.elements = (object *)e_738868;
c_738634.elements[0] = ast_73718_731209;
c_738634.elements[1] = ((closureN)self_733637)->elements[0];
c_738634.elements[2] = k_732550;

return_direct_with_clo2(data,  __glo_const_127_scheme_cyclone_util, (((closure)  __glo_const_127_scheme_cyclone_util)->fn),  &c_738634, ast_73718_731209);; 
}

static void __lambda_634(void *data, object self_733638, int argc, object *args) /* object self_733638, object r_732551 */
 {
 object r_732551 = args[0];
  if( (boolean_f != r_732551) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733638)->elements[2], (((closure)  ((closureN)self_733638)->elements[2])->fn),  ((closureN)self_733638)->elements[0]);
} else { 
  
closureN_type c_738639;
object e_738866 [3];
c_738639.hdr.mark = gc_color_red;
 c_738639.hdr.grayed = 0;
c_738639.tag = closureN_tag;
 c_738639.fn = (function_type)__lambda_635;
c_738639.num_args = 1;
c_738639.num_elements = 3;
c_738639.elements = (object *)e_738866;
c_738639.elements[0] = ((closureN)self_733638)->elements[0];
c_738639.elements[1] = ((closureN)self_733638)->elements[1];
c_738639.elements[2] = ((closureN)self_733638)->elements[2];

return_direct_with_clo2(data,  __glo_quote_127_scheme_cyclone_util, (((closure)  __glo_quote_127_scheme_cyclone_util)->fn),  &c_738639, ((closureN)self_733638)->elements[0]);}
;; 
}

static void __lambda_635(void *data, object self_733639, int argc, object *args) /* object self_733639, object r_732552 */
 {
 object r_732552 = args[0];
  if( (boolean_f != r_732552) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733639)->elements[2], (((closure)  ((closureN)self_733639)->elements[2])->fn),  ((closureN)self_733639)->elements[0]);
} else { 
  
closureN_type c_738644;
object e_738861 [3];
c_738644.hdr.mark = gc_color_red;
 c_738644.hdr.grayed = 0;
c_738644.tag = closureN_tag;
 c_738644.fn = (function_type)__lambda_636;
c_738644.num_args = 1;
c_738644.num_elements = 3;
c_738644.elements = (object *)e_738861;
c_738644.elements[0] = ((closureN)self_733639)->elements[0];
c_738644.elements[1] = ((closureN)self_733639)->elements[1];
c_738644.elements[2] = ((closureN)self_733639)->elements[2];


complex_num_type local_738864; 
return_direct_with_clo1(data,(closure)&c_738644,__lambda_636,  ((inline_function_type)
                   ((closure)__glo_ref_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_738864, ((closureN)self_733639)->elements[0]));}
;; 
}

static void __lambda_636(void *data, object self_733640, int argc, object *args) /* object self_733640, object r_732553 */
 {
 object r_732553 = args[0];
  if( (boolean_f != r_732553) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733640)->elements[2], (((closure)  ((closureN)self_733640)->elements[2])->fn),  ((closureN)self_733640)->elements[0]);
} else { 
  
closureN_type c_738649;
object e_738859 [3];
c_738649.hdr.mark = gc_color_red;
 c_738649.hdr.grayed = 0;
c_738649.tag = closureN_tag;
 c_738649.fn = (function_type)__lambda_637;
c_738649.num_args = 1;
c_738649.num_elements = 3;
c_738649.elements = (object *)e_738859;
c_738649.elements[0] = ((closureN)self_733640)->elements[0];
c_738649.elements[1] = ((closureN)self_733640)->elements[1];
c_738649.elements[2] = ((closureN)self_733640)->elements[2];

return_direct_with_clo2(data,  __glo_define_127_scheme_cyclone_util, (((closure)  __glo_define_127_scheme_cyclone_util)->fn),  &c_738649, ((closureN)self_733640)->elements[0]);}
;; 
}

static void __lambda_637(void *data, object self_733641, int argc, object *args) /* object self_733641, object r_732554 */
 {
 object r_732554 = args[0];
  if( (boolean_f != r_732554) ){ 
  
closureN_type c_738651;
object e_738663 [2];
c_738651.hdr.mark = gc_color_red;
 c_738651.hdr.grayed = 0;
c_738651.tag = closureN_tag;
 c_738651.fn = (function_type)__lambda_638;
c_738651.num_args = 1;
c_738651.num_elements = 2;
c_738651.elements = (object *)e_738663;
c_738651.elements[0] = ((closureN)self_733641)->elements[0];
c_738651.elements[1] = ((closureN)self_733641)->elements[2];




complex_num_type local_738669; 
return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_738651, car(((closureN)self_733641)->elements[1]), ((inline_function_type)
                   ((closure)__glo_define_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_738669, ((closureN)self_733641)->elements[0]));
} else { 
  
closureN_type c_738672;
object e_738857 [3];
c_738672.hdr.mark = gc_color_red;
 c_738672.hdr.grayed = 0;
c_738672.tag = closureN_tag;
 c_738672.fn = (function_type)__lambda_639;
c_738672.num_args = 1;
c_738672.num_elements = 3;
c_738672.elements = (object *)e_738857;
c_738672.elements[0] = ((closureN)self_733641)->elements[0];
c_738672.elements[1] = ((closureN)self_733641)->elements[1];
c_738672.elements[2] = ((closureN)self_733641)->elements[2];

return_direct_with_clo2(data,  __glo_set_67_127_scheme_cyclone_util, (((closure)  __glo_set_67_127_scheme_cyclone_util)->fn),  &c_738672, ((closureN)self_733641)->elements[0]);}
;; 
}

static void __lambda_639(void *data, object self_733643, int argc, object *args) /* object self_733643, object r_732560 */
 {
 object r_732560 = args[0];
  if( (boolean_f != r_732560) ){ 
  
closureN_type c_738674;
object e_738686 [2];
c_738674.hdr.mark = gc_color_red;
 c_738674.hdr.grayed = 0;
c_738674.tag = closureN_tag;
 c_738674.fn = (function_type)__lambda_640;
c_738674.num_args = 1;
c_738674.num_elements = 2;
c_738674.elements = (object *)e_738686;
c_738674.elements[0] = ((closureN)self_733643)->elements[0];
c_738674.elements[1] = ((closureN)self_733643)->elements[2];


closureN_type c_738687;
object e_738692 [1];
c_738687.hdr.mark = gc_color_red;
 c_738687.hdr.grayed = 0;
c_738687.tag = closureN_tag;
 c_738687.fn = (function_type)__lambda_642;
c_738687.num_args = 1;
c_738687.num_elements = 1;
c_738687.elements = (object *)e_738692;
c_738687.elements[0] = ((closureN)self_733643)->elements[1];

return_direct_with_clo1(data,(closure)&c_738674,__lambda_640,  &c_738687);
} else { 
  
closureN_type c_738694;
object e_738855 [3];
c_738694.hdr.mark = gc_color_red;
 c_738694.hdr.grayed = 0;
c_738694.tag = closureN_tag;
 c_738694.fn = (function_type)__lambda_643;
c_738694.num_args = 1;
c_738694.num_elements = 3;
c_738694.elements = (object *)e_738855;
c_738694.elements[0] = ((closureN)self_733643)->elements[0];
c_738694.elements[1] = ((closureN)self_733643)->elements[1];
c_738694.elements[2] = ((closureN)self_733643)->elements[2];

return_direct_with_clo2(data,  __glo_set_67_127_scheme_cyclone_util, (((closure)  __glo_set_67_127_scheme_cyclone_util)->fn),  &c_738694, ((closureN)self_733643)->elements[0]);}
;; 
}

static void __lambda_643(void *data, object self_733647, int argc, object *args) /* object self_733647, object r_732566 */
 {
 object r_732566 = args[0];
  if( (boolean_f != r_732566) ){ 
  
closureN_type c_738696;
object e_738708 [2];
c_738696.hdr.mark = gc_color_red;
 c_738696.hdr.grayed = 0;
c_738696.tag = closureN_tag;
 c_738696.fn = (function_type)__lambda_644;
c_738696.num_args = 1;
c_738696.num_elements = 2;
c_738696.elements = (object *)e_738708;
c_738696.elements[0] = ((closureN)self_733647)->elements[0];
c_738696.elements[1] = ((closureN)self_733647)->elements[2];


closureN_type c_738709;
object e_738714 [1];
c_738709.hdr.mark = gc_color_red;
 c_738709.hdr.grayed = 0;
c_738709.tag = closureN_tag;
 c_738709.fn = (function_type)__lambda_646;
c_738709.num_args = 1;
c_738709.num_elements = 1;
c_738709.elements = (object *)e_738714;
c_738709.elements[0] = ((closureN)self_733647)->elements[1];

return_direct_with_clo1(data,(closure)&c_738696,__lambda_644,  &c_738709);
} else { 
  
closureN_type c_738716;
object e_738853 [3];
c_738716.hdr.mark = gc_color_red;
 c_738716.hdr.grayed = 0;
c_738716.tag = closureN_tag;
 c_738716.fn = (function_type)__lambda_647;
c_738716.num_args = 1;
c_738716.num_elements = 3;
c_738716.elements = (object *)e_738853;
c_738716.elements[0] = ((closureN)self_733647)->elements[0];
c_738716.elements[1] = ((closureN)self_733647)->elements[1];
c_738716.elements[2] = ((closureN)self_733647)->elements[2];

return_direct_with_clo2(data,  __glo_if_127_scheme_cyclone_util, (((closure)  __glo_if_127_scheme_cyclone_util)->fn),  &c_738716, ((closureN)self_733647)->elements[0]);}
;; 
}

static void __lambda_647(void *data, object self_733651, int argc, object *args) /* object self_733651, object r_732572 */
 {
 object r_732572 = args[0];
  if( (boolean_f != r_732572) ){ 
  


closureN_type c_738721;
object e_738758 [3];
c_738721.hdr.mark = gc_color_red;
 c_738721.hdr.grayed = 0;
c_738721.tag = closureN_tag;
 c_738721.fn = (function_type)__lambda_648;
c_738721.num_args = 1;
c_738721.num_elements = 3;
c_738721.elements = (object *)e_738758;
c_738721.elements[0] = ((closureN)self_733651)->elements[0];
c_738721.elements[1] = ((closureN)self_733651)->elements[1];
c_738721.elements[2] = ((closureN)self_733651)->elements[2];


complex_num_type local_738761; 
return_closcall2(data,  car(((closureN)self_733651)->elements[1]),  &c_738721, ((inline_function_type)
                   ((closure)__glo_if_91_125condition_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_738761, ((closureN)self_733651)->elements[0]));
} else { 
  
closureN_type c_738764;
object e_738851 [3];
c_738764.hdr.mark = gc_color_red;
 c_738764.hdr.grayed = 0;
c_738764.tag = closureN_tag;
 c_738764.fn = (function_type)__lambda_651;
c_738764.num_args = 1;
c_738764.num_elements = 3;
c_738764.elements = (object *)e_738851;
c_738764.elements[0] = ((closureN)self_733651)->elements[0];
c_738764.elements[1] = ((closureN)self_733651)->elements[1];
c_738764.elements[2] = ((closureN)self_733651)->elements[2];

return_direct_with_clo2(data,  __glo_lambda_127_scheme_cyclone_util, (((closure)  __glo_lambda_127_scheme_cyclone_util)->fn),  &c_738764, ((closureN)self_733651)->elements[0]);}
;; 
}

static void __lambda_651(void *data, object self_733655, int argc, object *args) /* object self_733655, object r_732584 */
 {
 object r_732584 = args[0];
  if( (boolean_f != r_732584) ){ 
  
closureN_type c_738766;
object e_738797 [3];
c_738766.hdr.mark = gc_color_red;
 c_738766.hdr.grayed = 0;
c_738766.tag = closureN_tag;
 c_738766.fn = (function_type)__lambda_652;
c_738766.num_args = 1;
c_738766.num_elements = 3;
c_738766.elements = (object *)e_738797;
c_738766.elements[0] = ((closureN)self_733655)->elements[0];
c_738766.elements[1] = ((closureN)self_733655)->elements[1];
c_738766.elements[2] = ((closureN)self_733655)->elements[2];

return_direct_with_clo2(data,  __glo_lambda_91formals_91_125list_scheme_cyclone_util, (((closure)  __glo_lambda_91formals_91_125list_scheme_cyclone_util)->fn),  &c_738766, ((closureN)self_733655)->elements[0]);
} else { 
  
closureN_type c_738800;
object e_738846 [3];
c_738800.hdr.mark = gc_color_red;
 c_738800.hdr.grayed = 0;
c_738800.tag = closureN_tag;
 c_738800.fn = (function_type)__lambda_657;
c_738800.num_args = 1;
c_738800.num_elements = 3;
c_738800.elements = (object *)e_738846;
c_738800.elements[0] = ((closureN)self_733655)->elements[0];
c_738800.elements[1] = ((closureN)self_733655)->elements[1];
c_738800.elements[2] = ((closureN)self_733655)->elements[2];


complex_num_type local_738849; 
return_direct_with_clo1(data,(closure)&c_738800,__lambda_657,  ((inline_function_type)
                   ((closure)__glo_app_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_738849, ((closureN)self_733655)->elements[0]));}
;; 
}

static void __lambda_657(void *data, object self_733661, int argc, object *args) /* object self_733661, object r_732592 */
 {
 object r_732592 = args[0];
  if( (boolean_f != r_732592) ){ 
  
closureN_type c_738802;
object e_738839 [3];
c_738802.hdr.mark = gc_color_red;
 c_738802.hdr.grayed = 0;
c_738802.tag = closureN_tag;
 c_738802.fn = (function_type)__lambda_658;
c_738802.num_args = 1;
c_738802.num_elements = 3;
c_738802.elements = (object *)e_738839;
c_738802.elements[0] = ((closureN)self_733661)->elements[0];
c_738802.elements[1] = ((closureN)self_733661)->elements[1];
c_738802.elements[2] = ((closureN)self_733661)->elements[2];



return_direct_with_clo1(data,(closure)&c_738802,__lambda_658,  Cyc_car(data, ((closureN)self_733661)->elements[0]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733661)->elements[2], (((closure)  ((closureN)self_733661)->elements[2])->fn),  ((closureN)self_733661)->elements[0]);}
;; 
}

static void __lambda_658(void *data, object self_733662, int argc, object *args) /* object self_733662, object r_732600 */
 {
 object r_732600 = args[0];
    complex_num_type local_738805; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_ref_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_738805, r_732600)) ){ 
  
closureN_type c_738807;
object e_738823 [3];
c_738807.hdr.mark = gc_color_red;
 c_738807.hdr.grayed = 0;
c_738807.tag = closureN_tag;
 c_738807.fn = (function_type)__lambda_659;
c_738807.num_args = 1;
c_738807.num_elements = 3;
c_738807.elements = (object *)e_738823;
c_738807.elements[0] = ((closureN)self_733662)->elements[0];
c_738807.elements[1] = ((closureN)self_733662)->elements[1];
c_738807.elements[2] = ((closureN)self_733662)->elements[2];




complex_num_type local_738829; 


return_direct_with_clo3(data,  __glo_prim_117func_91_125prim_scheme_cyclone_primitives, (((closure)  __glo_prim_117func_91_125prim_scheme_cyclone_primitives)->fn),  &c_738807, Cyc_car(data, ((closureN)self_733662)->elements[0]), Cyc_fast_sub(data,&local_738829, Cyc_length(data, ((closureN)self_733662)->elements[0]), obj_int2obj(1)));
} else { 
  

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  ((closureN)self_733662)->elements[2], car(((closureN)self_733662)->elements[1]), ((closureN)self_733662)->elements[0]);}
;; 
}

static void __lambda_659(void *data, object self_733663, int argc, object *args) /* object self_733663, object r_732594 */
 {
 object r_732594 = args[0];
  
closureN_type c_738809;
object e_738816 [2];
c_738809.hdr.mark = gc_color_red;
 c_738809.hdr.grayed = 0;
c_738809.tag = closureN_tag;
 c_738809.fn = (function_type)__lambda_660;
c_738809.num_args = 1;
c_738809.num_elements = 2;
c_738809.elements = (object *)e_738816;
c_738809.elements[0] = ((closureN)self_733663)->elements[2];
c_738809.elements[1] = r_732594;





return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_738809, car(((closureN)self_733663)->elements[1]), Cyc_cdr(data, ((closureN)self_733663)->elements[0]));; 
}

static void __lambda_660(void *data, object self_733664, int argc, object *args) /* object self_733664, object r_732595 */
 {
 object r_732595 = args[0];
  
pair_type local_738814; 
return_direct_with_clo1(data,  ((closureN)self_733664)->elements[0], (((closure)  ((closureN)self_733664)->elements[0])->fn),  set_pair_as_expr(&local_738814, ((closureN)self_733664)->elements[1], r_732595));; 
}

static void __lambda_652(void *data, object self_733656, int argc, object *args) /* object self_733656, object args_73759_731212 */
 {
 object args_73759_731212 = args[0];
  
closureN_type c_738768;
object e_738795 [4];
c_738768.hdr.mark = gc_color_red;
 c_738768.hdr.grayed = 0;
c_738768.tag = closureN_tag;
 c_738768.fn = (function_type)__lambda_653;
c_738768.num_args = 1;
c_738768.num_elements = 4;
c_738768.elements = (object *)e_738795;
c_738768.elements[0] = args_73759_731212;
c_738768.elements[1] = ((closureN)self_733656)->elements[0];
c_738768.elements[2] = ((closureN)self_733656)->elements[1];
c_738768.elements[3] = ((closureN)self_733656)->elements[2];

return_direct_with_clo2(data,  __glo_lambda_91formals_91type_scheme_cyclone_util, (((closure)  __glo_lambda_91formals_91type_scheme_cyclone_util)->fn),  &c_738768, ((closureN)self_733656)->elements[0]);; 
}

static void __lambda_653(void *data, object self_733657, int argc, object *args) /* object self_733657, object ltype_73762_731213 */
 {
 object ltype_73762_731213 = args[0];
  
closureN_type c_738770;
object e_738793 [3];
c_738770.hdr.mark = gc_color_red;
 c_738770.hdr.grayed = 0;
c_738770.tag = closureN_tag;
 c_738770.fn = (function_type)__lambda_654;
c_738770.num_args = 1;
c_738770.num_elements = 3;
c_738770.elements = (object *)e_738793;
c_738770.elements[0] = ((closureN)self_733657)->elements[1];
c_738770.elements[1] = ((closureN)self_733657)->elements[2];
c_738770.elements[2] = ((closureN)self_733657)->elements[3];

return_direct_with_clo3(data,  __glo_list_91_125lambda_91formals_scheme_cyclone_transforms, (((closure)  __glo_list_91_125lambda_91formals_scheme_cyclone_transforms)->fn),  &c_738770, ((closureN)self_733657)->elements[0], ltype_73762_731213);; 
}

static void __lambda_654(void *data, object self_733658, int argc, object *args) /* object self_733658, object r_732590 */
 {
 object r_732590 = args[0];
  
closureN_type c_738772;
object e_738785 [2];
c_738772.hdr.mark = gc_color_red;
 c_738772.hdr.grayed = 0;
c_738772.tag = closureN_tag;
 c_738772.fn = (function_type)__lambda_655;
c_738772.num_args = 1;
c_738772.num_elements = 2;
c_738772.elements = (object *)e_738785;
c_738772.elements[0] = ((closureN)self_733658)->elements[2];
c_738772.elements[1] = r_732590;




complex_num_type local_738791; 
return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_738772, car(((closureN)self_733658)->elements[1]), ((inline_function_type)
                   ((closure)__glo_lambda_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_738791, ((closureN)self_733658)->elements[0]));; 
}

static void __lambda_655(void *data, object self_733659, int argc, object *args) /* object self_733659, object r_732591 */
 {
 object r_732591 = args[0];
  
closureN_type c_738774;
object e_738780 [1];
c_738774.hdr.mark = gc_color_red;
 c_738774.hdr.grayed = 0;
c_738774.tag = closureN_tag;
 c_738774.fn = (function_type)__lambda_656;
c_738774.num_args = 1;
c_738774.num_elements = 1;
c_738774.elements = (object *)e_738780;
c_738774.elements[0] = ((closureN)self_733659)->elements[0];


pair_type local_738783; 
return_direct_with_clo1(data,(closure)&c_738774,__lambda_656,  set_pair_as_expr(&local_738783, ((closureN)self_733659)->elements[1], r_732591));; 
}

static void __lambda_656(void *data, object self_733660, int argc, object *args) /* object self_733660, object r_732589 */
 {
 object r_732589 = args[0];
  
pair_type local_738779; 
return_direct_with_clo1(data,  ((closureN)self_733660)->elements[0], (((closure)  ((closureN)self_733660)->elements[0])->fn),  set_pair_as_expr(&local_738779, quote_lambda, r_732589));; 
}

static void __lambda_648(void *data, object self_733652, int argc, object *args) /* object self_733652, object r_732575 */
 {
 object r_732575 = args[0];
  


closureN_type c_738726;
object e_738753 [4];
c_738726.hdr.mark = gc_color_red;
 c_738726.hdr.grayed = 0;
c_738726.tag = closureN_tag;
 c_738726.fn = (function_type)__lambda_649;
c_738726.num_args = 1;
c_738726.num_elements = 4;
c_738726.elements = (object *)e_738753;
c_738726.elements[0] = ((closureN)self_733652)->elements[0];
c_738726.elements[1] = ((closureN)self_733652)->elements[1];
c_738726.elements[2] = ((closureN)self_733652)->elements[2];
c_738726.elements[3] = r_732575;


complex_num_type local_738756; 
return_closcall2(data,  car(((closureN)self_733652)->elements[1]),  &c_738726, ((inline_function_type)
                   ((closure)__glo_if_91_125then_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_738756, ((closureN)self_733652)->elements[0]));; 
}

static void __lambda_649(void *data, object self_733653, int argc, object *args) /* object self_733653, object r_732577 */
 {
 object r_732577 = args[0];
  


closureN_type c_738731;
object e_738748 [3];
c_738731.hdr.mark = gc_color_red;
 c_738731.hdr.grayed = 0;
c_738731.tag = closureN_tag;
 c_738731.fn = (function_type)__lambda_650;
c_738731.num_args = 1;
c_738731.num_elements = 3;
c_738731.elements = (object *)e_738748;
c_738731.elements[0] = ((closureN)self_733653)->elements[2];
c_738731.elements[1] = ((closureN)self_733653)->elements[3];
c_738731.elements[2] = r_732577;


complex_num_type local_738751; 
return_closcall2(data,  car(((closureN)self_733653)->elements[1]),  &c_738731, ((inline_function_type)
                   ((closure)__glo_if_91_125else_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_738751, ((closureN)self_733653)->elements[0]));; 
}

static void __lambda_650(void *data, object self_733654, int argc, object *args) /* object self_733654, object r_732579 */
 {
 object r_732579 = args[0];
  
pair_type local_738736; 

pair_type local_738739; 

pair_type local_738743; 

pair_type local_738747; 
return_direct_with_clo1(data,  ((closureN)self_733654)->elements[0], (((closure)  ((closureN)self_733654)->elements[0])->fn),  set_pair_as_expr(&local_738736, quote__if, set_pair_as_expr(&local_738739, ((closureN)self_733654)->elements[1], set_pair_as_expr(&local_738743, ((closureN)self_733654)->elements[2], set_pair_as_expr(&local_738747, r_732579, NULL)))));; 
}

static void __lambda_646(void *data, object self_733648, int argc, object *args) /* object self_733648, object k_732571, object a_73747_731211 */
 {
 object k_732571 = args[0]; object a_73747_731211 = args[1];
  

return_closcall2(data,  car(((closureN)self_733648)->elements[0]),  k_732571, a_73747_731211);; 
}

static void __lambda_644(void *data, object self_733649, int argc, object *args) /* object self_733649, object r_732569 */
 {
 object r_732569 = args[0];
  
closureN_type c_738698;
object e_738704 [1];
c_738698.hdr.mark = gc_color_red;
 c_738698.hdr.grayed = 0;
c_738698.tag = closureN_tag;
 c_738698.fn = (function_type)__lambda_645;
c_738698.num_args = 1;
c_738698.num_elements = 1;
c_738698.elements = (object *)e_738704;
c_738698.elements[0] = ((closureN)self_733649)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_738698, r_732569, Cyc_cdr(data, ((closureN)self_733649)->elements[0]));; 
}

static void __lambda_645(void *data, object self_733650, int argc, object *args) /* object self_733650, object r_732568 */
 {
 object r_732568 = args[0];
  
pair_type local_738703; 
return_direct_with_clo1(data,  ((closureN)self_733650)->elements[0], (((closure)  ((closureN)self_733650)->elements[0])->fn),  set_pair_as_expr(&local_738703, quote_set_67, r_732568));; 
}

static void __lambda_642(void *data, object self_733644, int argc, object *args) /* object self_733644, object k_732565, object a_73740_731210 */
 {
 object k_732565 = args[0]; object a_73740_731210 = args[1];
  

return_closcall2(data,  car(((closureN)self_733644)->elements[0]),  k_732565, a_73740_731210);; 
}

static void __lambda_640(void *data, object self_733645, int argc, object *args) /* object self_733645, object r_732563 */
 {
 object r_732563 = args[0];
  
closureN_type c_738676;
object e_738682 [1];
c_738676.hdr.mark = gc_color_red;
 c_738676.hdr.grayed = 0;
c_738676.tag = closureN_tag;
 c_738676.fn = (function_type)__lambda_641;
c_738676.num_args = 1;
c_738676.num_elements = 1;
c_738676.elements = (object *)e_738682;
c_738676.elements[0] = ((closureN)self_733645)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_738676, r_732563, Cyc_cdr(data, ((closureN)self_733645)->elements[0]));; 
}

static void __lambda_641(void *data, object self_733646, int argc, object *args) /* object self_733646, object r_732562 */
 {
 object r_732562 = args[0];
  
pair_type local_738681; 
return_direct_with_clo1(data,  ((closureN)self_733646)->elements[0], (((closure)  ((closureN)self_733646)->elements[0])->fn),  set_pair_as_expr(&local_738681, quote_set_67, r_732562));; 
}

static void __lambda_638(void *data, object self_733642, int argc, object *args) /* object self_733642, object r_732558 */
 {
 object r_732558 = args[0];
  
pair_type local_738656; 

pair_type local_738659; 


return_direct_with_clo1(data,  ((closureN)self_733642)->elements[1], (((closure)  ((closureN)self_733642)->elements[1])->fn),  set_pair_as_expr(&local_738656, quote_define, set_pair_as_expr(&local_738659, Cyc_cadr(data, ((closureN)self_733642)->elements[0]), r_732558)));; 
}

static void __lambda_631(void *data, object self_733665, int argc, object *args) /* object self_733665, object r_732549 */
 {
 object r_732549 = args[0];
  
closureN_type c_738620;
object e_738627 [3];
c_738620.hdr.mark = gc_color_red;
 c_738620.hdr.grayed = 0;
c_738620.tag = closureN_tag;
 c_738620.fn = (function_type)__lambda_632;
c_738620.num_args = 1;
c_738620.num_elements = 3;
c_738620.elements = (object *)e_738627;
c_738620.elements[0] = ((closureN)self_733665)->elements[0];
c_738620.elements[1] = ((closureN)self_733665)->elements[1];
c_738620.elements[2] = ((closureN)self_733665)->elements[2];



return_direct_with_clo1(data,(closure)&c_738620,__lambda_632,  Cyc_set_cell(data, ((closureN)self_733665)->elements[0], r_732549));; 
}

static void __lambda_632(void *data, object self_733666, int argc, object *args) /* object self_733666, object r_732548 */
 {

  

return_closcall2(data,  car(((closureN)self_733666)->elements[0]),  ((closureN)self_733666)->elements[2], ((closureN)self_733666)->elements[1]);; 
}

static void __lambda_368(void *data, object _, int argc, object *args) /* closure _,object k_732068, object ast_73423_731119, object globals_73424_731120, object return_91unbound_73425_731121 */
 {
object k_732068 = args[0]; object ast_73423_731119 = args[1]; object globals_73424_731120 = args[2]; object return_91unbound_73425_731121 = args[3];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:alpha-convert");

closureN_type c_736724;
object e_738611 [4];
c_736724.hdr.mark = gc_color_red;
 c_736724.hdr.grayed = 0;
c_736724.tag = closureN_tag;
 c_736724.fn = (function_type)__lambda_369;
c_736724.num_args = 5;
c_736724.num_elements = 4;
c_736724.elements = (object *)e_738611;
c_736724.elements[0] = ast_73423_731119;
c_736724.elements[1] = globals_73424_731120;
c_736724.elements[2] = k_732068;
c_736724.elements[3] = return_91unbound_73425_731121;

return_direct_with_clo5(data,(closure)&c_736724,__lambda_369,  boolean_f, boolean_f, boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_369(void *data, object self_733370, int argc, object *args) /* object self_733370, object convert_731127, object find_91defined_91vars_731128, object initialize_91defined_91vars_731129, object initialize_91top_91level_91vars_731130, object make_91a_91lookup_731131 */
 {
 object convert_731127 = args[0]; object find_91defined_91vars_731128 = args[1]; object initialize_91defined_91vars_731129 = args[2]; object initialize_91top_91level_91vars_731130 = args[3]; object make_91a_91lookup_731131 = args[4];
  
closureN_type c_736726;
object e_738607 [8];
c_736726.hdr.mark = gc_color_red;
 c_736726.hdr.grayed = 0;
c_736726.tag = closureN_tag;
 c_736726.fn = (function_type)__lambda_802;
c_736726.num_args = 1;
c_736726.num_elements = 8;
c_736726.elements = (object *)e_738607;
c_736726.elements[0] = ((closureN)self_733370)->elements[0];
c_736726.elements[1] = find_91defined_91vars_731128;
c_736726.elements[2] = ((closureN)self_733370)->elements[1];
c_736726.elements[3] = initialize_91defined_91vars_731129;
c_736726.elements[4] = initialize_91top_91level_91vars_731130;
c_736726.elements[5] = ((closureN)self_733370)->elements[2];
c_736726.elements[6] = make_91a_91lookup_731131;
c_736726.elements[7] = ((closureN)self_733370)->elements[3];


pair_type local_738610; 
return_direct_with_clo1(data,(closure)&c_736726,__lambda_802,  set_cell_as_expr(&local_738610, convert_731127));; 
}

static void __lambda_802(void *data, object self_733371, int argc, object *args) /* object self_733371, object convert_731127 */
 {
 object convert_731127 = args[0];
  
closureN_type c_736728;
object e_738602 [8];
c_736728.hdr.mark = gc_color_red;
 c_736728.hdr.grayed = 0;
c_736728.tag = closureN_tag;
 c_736728.fn = (function_type)__lambda_801;
c_736728.num_args = 1;
c_736728.num_elements = 8;
c_736728.elements = (object *)e_738602;
c_736728.elements[0] = ((closureN)self_733371)->elements[0];
c_736728.elements[1] = convert_731127;
c_736728.elements[2] = ((closureN)self_733371)->elements[2];
c_736728.elements[3] = ((closureN)self_733371)->elements[3];
c_736728.elements[4] = ((closureN)self_733371)->elements[4];
c_736728.elements[5] = ((closureN)self_733371)->elements[5];
c_736728.elements[6] = ((closureN)self_733371)->elements[6];
c_736728.elements[7] = ((closureN)self_733371)->elements[7];


pair_type local_738605; 
return_direct_with_clo1(data,(closure)&c_736728,__lambda_801,  set_cell_as_expr(&local_738605, ((closureN)self_733371)->elements[1]));; 
}

static void __lambda_801(void *data, object self_733372, int argc, object *args) /* object self_733372, object find_91defined_91vars_731128 */
 {
 object find_91defined_91vars_731128 = args[0];
  
closureN_type c_736730;
object e_738597 [8];
c_736730.hdr.mark = gc_color_red;
 c_736730.hdr.grayed = 0;
c_736730.tag = closureN_tag;
 c_736730.fn = (function_type)__lambda_800;
c_736730.num_args = 1;
c_736730.num_elements = 8;
c_736730.elements = (object *)e_738597;
c_736730.elements[0] = ((closureN)self_733372)->elements[0];
c_736730.elements[1] = ((closureN)self_733372)->elements[1];
c_736730.elements[2] = find_91defined_91vars_731128;
c_736730.elements[3] = ((closureN)self_733372)->elements[2];
c_736730.elements[4] = ((closureN)self_733372)->elements[4];
c_736730.elements[5] = ((closureN)self_733372)->elements[5];
c_736730.elements[6] = ((closureN)self_733372)->elements[6];
c_736730.elements[7] = ((closureN)self_733372)->elements[7];


pair_type local_738600; 
return_direct_with_clo1(data,(closure)&c_736730,__lambda_800,  set_cell_as_expr(&local_738600, ((closureN)self_733372)->elements[3]));; 
}

static void __lambda_800(void *data, object self_733373, int argc, object *args) /* object self_733373, object initialize_91defined_91vars_731129 */
 {
 object initialize_91defined_91vars_731129 = args[0];
  
closureN_type c_736732;
object e_738592 [8];
c_736732.hdr.mark = gc_color_red;
 c_736732.hdr.grayed = 0;
c_736732.tag = closureN_tag;
 c_736732.fn = (function_type)__lambda_799;
c_736732.num_args = 1;
c_736732.num_elements = 8;
c_736732.elements = (object *)e_738592;
c_736732.elements[0] = ((closureN)self_733373)->elements[0];
c_736732.elements[1] = ((closureN)self_733373)->elements[1];
c_736732.elements[2] = ((closureN)self_733373)->elements[2];
c_736732.elements[3] = ((closureN)self_733373)->elements[3];
c_736732.elements[4] = initialize_91defined_91vars_731129;
c_736732.elements[5] = ((closureN)self_733373)->elements[5];
c_736732.elements[6] = ((closureN)self_733373)->elements[6];
c_736732.elements[7] = ((closureN)self_733373)->elements[7];


pair_type local_738595; 
return_direct_with_clo1(data,(closure)&c_736732,__lambda_799,  set_cell_as_expr(&local_738595, ((closureN)self_733373)->elements[4]));; 
}

static void __lambda_799(void *data, object self_733374, int argc, object *args) /* object self_733374, object initialize_91top_91level_91vars_731130 */
 {
 object initialize_91top_91level_91vars_731130 = args[0];
  
closureN_type c_736734;
object e_738587 [8];
c_736734.hdr.mark = gc_color_red;
 c_736734.hdr.grayed = 0;
c_736734.tag = closureN_tag;
 c_736734.fn = (function_type)__lambda_798;
c_736734.num_args = 1;
c_736734.num_elements = 8;
c_736734.elements = (object *)e_738587;
c_736734.elements[0] = ((closureN)self_733374)->elements[0];
c_736734.elements[1] = ((closureN)self_733374)->elements[1];
c_736734.elements[2] = ((closureN)self_733374)->elements[2];
c_736734.elements[3] = ((closureN)self_733374)->elements[3];
c_736734.elements[4] = ((closureN)self_733374)->elements[4];
c_736734.elements[5] = initialize_91top_91level_91vars_731130;
c_736734.elements[6] = ((closureN)self_733374)->elements[5];
c_736734.elements[7] = ((closureN)self_733374)->elements[7];


pair_type local_738590; 
return_direct_with_clo1(data,(closure)&c_736734,__lambda_798,  set_cell_as_expr(&local_738590, ((closureN)self_733374)->elements[6]));; 
}

static void __lambda_798(void *data, object self_733375, int argc, object *args) /* object self_733375, object make_91a_91lookup_731131 */
 {
 object make_91a_91lookup_731131 = args[0];
  
closureN_type c_736736;
object e_738543 [9];
c_736736.hdr.mark = gc_color_red;
 c_736736.hdr.grayed = 0;
c_736736.tag = closureN_tag;
 c_736736.fn = (function_type)__lambda_370;
c_736736.num_args = 1;
c_736736.num_elements = 9;
c_736736.elements = (object *)e_738543;
c_736736.elements[0] = ((closureN)self_733375)->elements[0];
c_736736.elements[1] = ((closureN)self_733375)->elements[1];
c_736736.elements[2] = ((closureN)self_733375)->elements[2];
c_736736.elements[3] = ((closureN)self_733375)->elements[3];
c_736736.elements[4] = ((closureN)self_733375)->elements[4];
c_736736.elements[5] = ((closureN)self_733375)->elements[5];
c_736736.elements[6] = ((closureN)self_733375)->elements[6];
c_736736.elements[7] = make_91a_91lookup_731131;
c_736736.elements[8] = ((closureN)self_733375)->elements[7];


mclosure0(c_738544, (function_type)__lambda_622);c_738544.num_args = 2;
return_direct_with_clo1(data,(closure)&c_736736,__lambda_370,  &c_738544);; 
}

static void __lambda_622(void *data, object self_733376, int argc, object *args) /* object self_733376, object k_732534, object ast_73426_731137, object fv_73427_731138 */
 {
 object k_732534 = args[0]; object ast_73426_731137 = args[1]; object fv_73427_731138 = args[2];
  
closureN_type c_738546;
object e_738584 [3];
c_738546.hdr.mark = gc_color_red;
 c_738546.hdr.grayed = 0;
c_738546.tag = closureN_tag;
 c_738546.fn = (function_type)__lambda_623;
c_738546.num_args = 1;
c_738546.num_elements = 3;
c_738546.elements = (object *)e_738584;
c_738546.elements[0] = ast_73426_731137;
c_738546.elements[1] = fv_73427_731138;
c_738546.elements[2] = k_732534;



return_direct_with_clo1(data,(closure)&c_738546,__lambda_623,  Cyc_length(data, fv_73427_731138));; 
}

static void __lambda_623(void *data, object self_733377, int argc, object *args) /* object self_733377, object r_732544 */
 {
 object r_732544 = args[0];
    
if( (boolean_f != Cyc_num_fast_gt_op(data, r_732544, obj_int2obj(0))) ){ 
  
closureN_type c_738550;
object e_738572 [2];
c_738550.hdr.mark = gc_color_red;
 c_738550.hdr.grayed = 0;
c_738550.tag = closureN_tag;
 c_738550.fn = (function_type)__lambda_624;
c_738550.num_args = 1;
c_738550.num_elements = 2;
c_738550.elements = (object *)e_738572;
c_738550.elements[0] = ((closureN)self_733377)->elements[1];
c_738550.elements[1] = ((closureN)self_733377)->elements[2];


pair_type local_738575; 

pair_type local_738579; 
return_direct_with_clo1(data,(closure)&c_738550,__lambda_624,  set_pair_as_expr(&local_738575, ((closureN)self_733377)->elements[1], set_pair_as_expr(&local_738579, ((closureN)self_733377)->elements[0], NULL)));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733377)->elements[2], (((closure)  ((closureN)self_733377)->elements[2])->fn),  ((closureN)self_733377)->elements[0]);}
;; 
}

static void __lambda_624(void *data, object self_733378, int argc, object *args) /* object self_733378, object r_732541 */
 {
 object r_732541 = args[0];
  
closureN_type c_738552;
object e_738568 [2];
c_738552.hdr.mark = gc_color_red;
 c_738552.hdr.grayed = 0;
c_738552.tag = closureN_tag;
 c_738552.fn = (function_type)__lambda_625;
c_738552.num_args = 1;
c_738552.num_elements = 2;
c_738552.elements = (object *)e_738568;
c_738552.elements[0] = ((closureN)self_733378)->elements[0];
c_738552.elements[1] = ((closureN)self_733378)->elements[1];


pair_type local_738571; 
return_direct_with_clo1(data,(closure)&c_738552,__lambda_625,  set_pair_as_expr(&local_738571, quote_lambda, r_732541));; 
}

static void __lambda_625(void *data, object self_733379, int argc, object *args) /* object self_733379, object r_732536 */
 {
 object r_732536 = args[0];
  
closureN_type c_738554;
object e_738565 [3];
c_738554.hdr.mark = gc_color_red;
 c_738554.hdr.grayed = 0;
c_738554.tag = closureN_tag;
 c_738554.fn = (function_type)__lambda_626;
c_738554.num_args = 1;
c_738554.num_elements = 3;
c_738554.elements = (object *)e_738565;
c_738554.elements[0] = ((closureN)self_733379)->elements[0];
c_738554.elements[1] = ((closureN)self_733379)->elements[1];
c_738554.elements[2] = r_732536;


mclosure0(c_738566, (function_type)__lambda_628);c_738566.num_args = 1;
return_direct_with_clo1(data,(closure)&c_738554,__lambda_626,  &c_738566);; 
}

static void __lambda_628(void *data, object self_733380, int argc, object *args) /* object self_733380, object k_732539, object _191_73431_731139 */
 {
 object k_732539 = args[0];
  return_direct_with_clo1(data,  k_732539, (((closure)  k_732539)->fn),  boolean_f);; 
}

static void __lambda_626(void *data, object self_733381, int argc, object *args) /* object self_733381, object r_732538 */
 {
 object r_732538 = args[0];
  
closureN_type c_738556;
object e_738563 [2];
c_738556.hdr.mark = gc_color_red;
 c_738556.hdr.grayed = 0;
c_738556.tag = closureN_tag;
 c_738556.fn = (function_type)__lambda_627;
c_738556.num_args = 1;
c_738556.num_elements = 2;
c_738556.elements = (object *)e_738563;
c_738556.elements[0] = ((closureN)self_733381)->elements[1];
c_738556.elements[1] = ((closureN)self_733381)->elements[2];

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_738556, r_732538, ((closureN)self_733381)->elements[0]);; 
}

static void __lambda_627(void *data, object self_733382, int argc, object *args) /* object self_733382, object r_732537 */
 {
 object r_732537 = args[0];
  
pair_type local_738561; 
return_direct_with_clo1(data,  ((closureN)self_733382)->elements[0], (((closure)  ((closureN)self_733382)->elements[0])->fn),  set_pair_as_expr(&local_738561, ((closureN)self_733382)->elements[1], r_732537));; 
}

static void __lambda_370(void *data, object self_733383, int argc, object *args) /* object self_733383, object r_732533 */
 {
 object r_732533 = args[0];
  
closureN_type c_736738;
object e_738539 [9];
c_736738.hdr.mark = gc_color_red;
 c_736738.hdr.grayed = 0;
c_736738.tag = closureN_tag;
 c_736738.fn = (function_type)__lambda_371;
c_736738.num_args = 1;
c_736738.num_elements = 9;
c_736738.elements = (object *)e_738539;
c_736738.elements[0] = ((closureN)self_733383)->elements[0];
c_736738.elements[1] = ((closureN)self_733383)->elements[1];
c_736738.elements[2] = ((closureN)self_733383)->elements[2];
c_736738.elements[3] = ((closureN)self_733383)->elements[3];
c_736738.elements[4] = ((closureN)self_733383)->elements[4];
c_736738.elements[5] = ((closureN)self_733383)->elements[5];
c_736738.elements[6] = ((closureN)self_733383)->elements[6];
c_736738.elements[7] = ((closureN)self_733383)->elements[7];
c_736738.elements[8] = ((closureN)self_733383)->elements[8];



return_direct_with_clo1(data,(closure)&c_736738,__lambda_371,  Cyc_set_cell(data, ((closureN)self_733383)->elements[5], r_732533));; 
}

static void __lambda_371(void *data, object self_733384, int argc, object *args) /* object self_733384, object r_732069 */
 {

  
closureN_type c_736740;
object e_738508 [9];
c_736740.hdr.mark = gc_color_red;
 c_736740.hdr.grayed = 0;
c_736740.tag = closureN_tag;
 c_736740.fn = (function_type)__lambda_372;
c_736740.num_args = 1;
c_736740.num_elements = 9;
c_736740.elements = (object *)e_738508;
c_736740.elements[0] = ((closureN)self_733384)->elements[0];
c_736740.elements[1] = ((closureN)self_733384)->elements[1];
c_736740.elements[2] = ((closureN)self_733384)->elements[2];
c_736740.elements[3] = ((closureN)self_733384)->elements[3];
c_736740.elements[4] = ((closureN)self_733384)->elements[4];
c_736740.elements[5] = ((closureN)self_733384)->elements[5];
c_736740.elements[6] = ((closureN)self_733384)->elements[6];
c_736740.elements[7] = ((closureN)self_733384)->elements[7];
c_736740.elements[8] = ((closureN)self_733384)->elements[8];


mclosure0(c_738509, (function_type)__lambda_615);c_738509.num_args = 1;
return_direct_with_clo1(data,(closure)&c_736740,__lambda_372,  &c_738509);; 
}

static void __lambda_615(void *data, object self_733385, int argc, object *args) /* object self_733385, object k_732525, object ast_73432_731140 */
 {
 object k_732525 = args[0]; object ast_73432_731140 = args[1];
  
closureN_type c_738511;
object e_738531 [2];
c_738511.hdr.mark = gc_color_red;
 c_738511.hdr.grayed = 0;
c_738511.tag = closureN_tag;
 c_738511.fn = (function_type)__lambda_616;
c_738511.num_args = 1;
c_738511.num_elements = 2;
c_738511.elements = (object *)e_738531;
c_738511.elements[0] = ast_73432_731140;
c_738511.elements[1] = k_732525;


mclosure0(c_738532, (function_type)__lambda_621);c_738532.num_args = 1;
return_direct_with_clo1(data,(closure)&c_738511,__lambda_616,  &c_738532);; 
}

static void __lambda_621(void *data, object self_733386, int argc, object *args) /* object self_733386, object k_732531, object expr_73433_731141 */
 {
 object k_732531 = args[0]; object expr_73433_731141 = args[1];
  
complex_num_type local_738536; 


return_direct_with_clo1(data,  k_732531, (((closure)  k_732531)->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_738536, Cyc_is_null(expr_73433_731141)));; 
}

static void __lambda_616(void *data, object self_733387, int argc, object *args) /* object self_733387, object r_732526 */
 {
 object r_732526 = args[0];
  
closureN_type c_738513;
object e_738521 [3];
c_738513.hdr.mark = gc_color_red;
 c_738513.hdr.grayed = 0;
c_738513.tag = closureN_tag;
 c_738513.fn = (function_type)__lambda_617;
c_738513.num_args = 1;
c_738513.num_elements = 3;
c_738513.elements = (object *)e_738521;
c_738513.elements[0] = ((closureN)self_733387)->elements[0];
c_738513.elements[1] = ((closureN)self_733387)->elements[1];
c_738513.elements[2] = r_732526;


mclosure0(c_738522, (function_type)__lambda_619);c_738522.num_args = 1;
return_direct_with_clo1(data,(closure)&c_738513,__lambda_617,  &c_738522);; 
}

static void __lambda_619(void *data, object self_733388, int argc, object *args) /* object self_733388, object k_732529, object expr_73434_731142 */
 {
 object k_732529 = args[0]; object expr_73434_731142 = args[1];
  
closureN_type c_738524;
object e_738530 [2];
c_738524.hdr.mark = gc_color_red;
 c_738524.hdr.grayed = 0;
c_738524.tag = closureN_tag;
 c_738524.fn = (function_type)__lambda_620;
c_738524.num_args = 1;
c_738524.num_elements = 2;
c_738524.elements = (object *)e_738530;
c_738524.elements[0] = expr_73434_731142;
c_738524.elements[1] = k_732529;

return_direct_with_clo2(data,  __glo_define_127_scheme_cyclone_util, (((closure)  __glo_define_127_scheme_cyclone_util)->fn),  &c_738524, expr_73434_731142);; 
}

static void __lambda_620(void *data, object self_733389, int argc, object *args) /* object self_733389, object r_732530 */
 {
 object r_732530 = args[0];
  if( (boolean_f != r_732530) ){ 
  return_direct_with_clo2(data,  __glo_define_91_125var_scheme_cyclone_util, (((closure)  __glo_define_91_125var_scheme_cyclone_util)->fn),  ((closureN)self_733389)->elements[1], ((closureN)self_733389)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733389)->elements[1], (((closure)  ((closureN)self_733389)->elements[1])->fn),  NULL);}
;; 
}

static void __lambda_617(void *data, object self_733390, int argc, object *args) /* object self_733390, object r_732528 */
 {
 object r_732528 = args[0];
  
closureN_type c_738515;
object e_738519 [2];
c_738515.hdr.mark = gc_color_red;
 c_738515.hdr.grayed = 0;
c_738515.tag = closureN_tag;
 c_738515.fn = (function_type)__lambda_618;
c_738515.num_args = 1;
c_738515.num_elements = 2;
c_738515.elements = (object *)e_738519;
c_738515.elements[0] = ((closureN)self_733390)->elements[1];
c_738515.elements[1] = ((closureN)self_733390)->elements[2];

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_738515, r_732528, ((closureN)self_733390)->elements[0]);; 
}

static void __lambda_618(void *data, object self_733391, int argc, object *args) /* object self_733391, object r_732527 */
 {
 object r_732527 = args[0];
  return_direct_with_clo3(data,  __glo_filter_scheme_cyclone_util, (((closure)  __glo_filter_scheme_cyclone_util)->fn),  ((closureN)self_733391)->elements[0], ((closureN)self_733391)->elements[1], r_732527);; 
}

static void __lambda_372(void *data, object self_733392, int argc, object *args) /* object self_733392, object r_732524 */
 {
 object r_732524 = args[0];
  
closureN_type c_736742;
object e_738504 [9];
c_736742.hdr.mark = gc_color_red;
 c_736742.hdr.grayed = 0;
c_736742.tag = closureN_tag;
 c_736742.fn = (function_type)__lambda_373;
c_736742.num_args = 1;
c_736742.num_elements = 9;
c_736742.elements = (object *)e_738504;
c_736742.elements[0] = ((closureN)self_733392)->elements[0];
c_736742.elements[1] = ((closureN)self_733392)->elements[1];
c_736742.elements[2] = ((closureN)self_733392)->elements[2];
c_736742.elements[3] = ((closureN)self_733392)->elements[3];
c_736742.elements[4] = ((closureN)self_733392)->elements[4];
c_736742.elements[5] = ((closureN)self_733392)->elements[5];
c_736742.elements[6] = ((closureN)self_733392)->elements[6];
c_736742.elements[7] = ((closureN)self_733392)->elements[7];
c_736742.elements[8] = ((closureN)self_733392)->elements[8];



return_direct_with_clo1(data,(closure)&c_736742,__lambda_373,  Cyc_set_cell(data, ((closureN)self_733392)->elements[2], r_732524));; 
}

static void __lambda_373(void *data, object self_733393, int argc, object *args) /* object self_733393, object r_732070 */
 {

  
closureN_type c_736744;
object e_738486 [9];
c_736744.hdr.mark = gc_color_red;
 c_736744.hdr.grayed = 0;
c_736744.tag = closureN_tag;
 c_736744.fn = (function_type)__lambda_374;
c_736744.num_args = 1;
c_736744.num_elements = 9;
c_736744.elements = (object *)e_738486;
c_736744.elements[0] = ((closureN)self_733393)->elements[0];
c_736744.elements[1] = ((closureN)self_733393)->elements[1];
c_736744.elements[2] = ((closureN)self_733393)->elements[2];
c_736744.elements[3] = ((closureN)self_733393)->elements[3];
c_736744.elements[4] = ((closureN)self_733393)->elements[4];
c_736744.elements[5] = ((closureN)self_733393)->elements[5];
c_736744.elements[6] = ((closureN)self_733393)->elements[6];
c_736744.elements[7] = ((closureN)self_733393)->elements[7];
c_736744.elements[8] = ((closureN)self_733393)->elements[8];


mclosure0(c_738487, (function_type)__lambda_611);c_738487.num_args = 1;
return_direct_with_clo1(data,(closure)&c_736744,__lambda_374,  &c_738487);; 
}

static void __lambda_611(void *data, object self_733394, int argc, object *args) /* object self_733394, object k_732520, object vars_73435_731143 */
 {
 object k_732520 = args[0]; object vars_73435_731143 = args[1];
  
closureN_type c_738489;
object e_738493 [2];
c_738489.hdr.mark = gc_color_red;
 c_738489.hdr.grayed = 0;
c_738489.tag = closureN_tag;
 c_738489.fn = (function_type)__lambda_612;
c_738489.num_args = 1;
c_738489.num_elements = 2;
c_738489.elements = (object *)e_738493;
c_738489.elements[0] = k_732520;
c_738489.elements[1] = vars_73435_731143;


mclosure0(c_738494, (function_type)__lambda_613);c_738494.num_args = 1;
return_direct_with_clo1(data,(closure)&c_738489,__lambda_612,  &c_738494);; 
}

static void __lambda_613(void *data, object self_733395, int argc, object *args) /* object self_733395, object k_732522, object a_73436_731144 */
 {
 object k_732522 = args[0]; object a_73436_731144 = args[1];
  
closureN_type c_738496;
object e_738503 [2];
c_738496.hdr.mark = gc_color_red;
 c_738496.hdr.grayed = 0;
c_738496.tag = closureN_tag;
 c_738496.fn = (function_type)__lambda_614;
c_738496.num_args = 1;
c_738496.num_elements = 2;
c_738496.elements = (object *)e_738503;
c_738496.elements[0] = a_73436_731144;
c_738496.elements[1] = k_732522;

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_738496, a_73436_731144);; 
}

static void __lambda_614(void *data, object self_733396, int argc, object *args) /* object self_733396, object r_732523 */
 {
 object r_732523 = args[0];
  
pair_type local_738501; 
return_direct_with_clo1(data,  ((closureN)self_733396)->elements[1], (((closure)  ((closureN)self_733396)->elements[1])->fn),  set_pair_as_expr(&local_738501, ((closureN)self_733396)->elements[0], r_732523));; 
}

static void __lambda_612(void *data, object self_733397, int argc, object *args) /* object self_733397, object r_732521 */
 {
 object r_732521 = args[0];
  return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  ((closureN)self_733397)->elements[0], r_732521, ((closureN)self_733397)->elements[1]);; 
}

static void __lambda_374(void *data, object self_733398, int argc, object *args) /* object self_733398, object r_732519 */
 {
 object r_732519 = args[0];
  
closureN_type c_736746;
object e_738482 [9];
c_736746.hdr.mark = gc_color_red;
 c_736746.hdr.grayed = 0;
c_736746.tag = closureN_tag;
 c_736746.fn = (function_type)__lambda_375;
c_736746.num_args = 1;
c_736746.num_elements = 9;
c_736746.elements = (object *)e_738482;
c_736746.elements[0] = ((closureN)self_733398)->elements[0];
c_736746.elements[1] = ((closureN)self_733398)->elements[1];
c_736746.elements[2] = ((closureN)self_733398)->elements[2];
c_736746.elements[3] = ((closureN)self_733398)->elements[3];
c_736746.elements[4] = ((closureN)self_733398)->elements[4];
c_736746.elements[5] = ((closureN)self_733398)->elements[5];
c_736746.elements[6] = ((closureN)self_733398)->elements[6];
c_736746.elements[7] = ((closureN)self_733398)->elements[7];
c_736746.elements[8] = ((closureN)self_733398)->elements[8];



return_direct_with_clo1(data,(closure)&c_736746,__lambda_375,  Cyc_set_cell(data, ((closureN)self_733398)->elements[7], r_732519));; 
}

static void __lambda_375(void *data, object self_733399, int argc, object *args) /* object self_733399, object r_732071 */
 {

  
closureN_type c_736748;
object e_738441 [9];
c_736748.hdr.mark = gc_color_red;
 c_736748.hdr.grayed = 0;
c_736748.tag = closureN_tag;
 c_736748.fn = (function_type)__lambda_376;
c_736748.num_args = 1;
c_736748.num_elements = 9;
c_736748.elements = (object *)e_738441;
c_736748.elements[0] = ((closureN)self_733399)->elements[0];
c_736748.elements[1] = ((closureN)self_733399)->elements[1];
c_736748.elements[2] = ((closureN)self_733399)->elements[2];
c_736748.elements[3] = ((closureN)self_733399)->elements[3];
c_736748.elements[4] = ((closureN)self_733399)->elements[4];
c_736748.elements[5] = ((closureN)self_733399)->elements[5];
c_736748.elements[6] = ((closureN)self_733399)->elements[6];
c_736748.elements[7] = ((closureN)self_733399)->elements[7];
c_736748.elements[8] = ((closureN)self_733399)->elements[8];


mclosure0(c_738442, (function_type)__lambda_605);c_738442.num_args = 2;
return_direct_with_clo1(data,(closure)&c_736748,__lambda_376,  &c_738442);; 
}

static void __lambda_605(void *data, object self_733400, int argc, object *args) /* object self_733400, object k_732508, object ast_73437_731145, object vars_73438_731146 */
 {
 object k_732508 = args[0]; object ast_73437_731145 = args[1]; object vars_73438_731146 = args[2];
  
closureN_type c_738444;
object e_738479 [3];
c_738444.hdr.mark = gc_color_red;
 c_738444.hdr.grayed = 0;
c_738444.tag = closureN_tag;
 c_738444.fn = (function_type)__lambda_606;
c_738444.num_args = 1;
c_738444.num_elements = 3;
c_738444.elements = (object *)e_738479;
c_738444.elements[0] = ast_73437_731145;
c_738444.elements[1] = k_732508;
c_738444.elements[2] = vars_73438_731146;



return_direct_with_clo1(data,(closure)&c_738444,__lambda_606,  Cyc_length(data, vars_73438_731146));; 
}

static void __lambda_606(void *data, object self_733401, int argc, object *args) /* object self_733401, object r_732518 */
 {
 object r_732518 = args[0];
    
if( (boolean_f != Cyc_num_fast_gt_op(data, r_732518, obj_int2obj(0))) ){ 
  
closureN_type c_738448;
object e_738470 [2];
c_738448.hdr.mark = gc_color_red;
 c_738448.hdr.grayed = 0;
c_738448.tag = closureN_tag;
 c_738448.fn = (function_type)__lambda_607;
c_738448.num_args = 1;
c_738448.num_elements = 2;
c_738448.elements = (object *)e_738470;
c_738448.elements[0] = ((closureN)self_733401)->elements[1];
c_738448.elements[1] = ((closureN)self_733401)->elements[2];


pair_type local_738473; 
return_direct_with_clo1(data,(closure)&c_738448,__lambda_607,  set_pair_as_expr(&local_738473, ((closureN)self_733401)->elements[2], ((closureN)self_733401)->elements[0]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733401)->elements[1], (((closure)  ((closureN)self_733401)->elements[1])->fn),  ((closureN)self_733401)->elements[0]);}
;; 
}

static void __lambda_607(void *data, object self_733402, int argc, object *args) /* object self_733402, object r_732517 */
 {
 object r_732517 = args[0];
  
closureN_type c_738450;
object e_738467 [3];
c_738450.hdr.mark = gc_color_red;
 c_738450.hdr.grayed = 0;
c_738450.tag = closureN_tag;
 c_738450.fn = (function_type)__lambda_608;
c_738450.num_args = 1;
c_738450.num_elements = 3;
c_738450.elements = (object *)e_738467;
c_738450.elements[0] = ((closureN)self_733402)->elements[0];
c_738450.elements[1] = r_732517;
c_738450.elements[2] = ((closureN)self_733402)->elements[1];


mclosure0(c_738468, (function_type)__lambda_610);c_738468.num_args = 1;
return_direct_with_clo1(data,(closure)&c_738450,__lambda_608,  &c_738468);; 
}

static void __lambda_610(void *data, object self_733403, int argc, object *args) /* object self_733403, object k_732515, object _191_73442_731147 */
 {
 object k_732515 = args[0];
  return_direct_with_clo1(data,  k_732515, (((closure)  k_732515)->fn),  boolean_f);; 
}

static void __lambda_608(void *data, object self_733404, int argc, object *args) /* object self_733404, object r_732514 */
 {
 object r_732514 = args[0];
  
closureN_type c_738452;
object e_738465 [2];
c_738452.hdr.mark = gc_color_red;
 c_738452.hdr.grayed = 0;
c_738452.tag = closureN_tag;
 c_738452.fn = (function_type)__lambda_609;
c_738452.num_args = 1;
c_738452.num_elements = 2;
c_738452.elements = (object *)e_738465;
c_738452.elements[0] = ((closureN)self_733404)->elements[0];
c_738452.elements[1] = ((closureN)self_733404)->elements[1];

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_738452, r_732514, ((closureN)self_733404)->elements[2]);; 
}

static void __lambda_609(void *data, object self_733405, int argc, object *args) /* object self_733405, object r_732513 */
 {
 object r_732513 = args[0];
  
pair_type local_738457; 

pair_type local_738460; 

pair_type local_738463; 
return_direct_with_clo1(data,  ((closureN)self_733405)->elements[0], (((closure)  ((closureN)self_733405)->elements[0])->fn),  set_pair_as_expr(&local_738457, set_pair_as_expr(&local_738460, set_pair_as_expr(&local_738463, quote_lambda, ((closureN)self_733405)->elements[1]), r_732513), NULL));; 
}

static void __lambda_376(void *data, object self_733406, int argc, object *args) /* object self_733406, object r_732507 */
 {
 object r_732507 = args[0];
  
closureN_type c_736750;
object e_738437 [9];
c_736750.hdr.mark = gc_color_red;
 c_736750.hdr.grayed = 0;
c_736750.tag = closureN_tag;
 c_736750.fn = (function_type)__lambda_377;
c_736750.num_args = 1;
c_736750.num_elements = 9;
c_736750.elements = (object *)e_738437;
c_736750.elements[0] = ((closureN)self_733406)->elements[0];
c_736750.elements[1] = ((closureN)self_733406)->elements[1];
c_736750.elements[2] = ((closureN)self_733406)->elements[2];
c_736750.elements[3] = ((closureN)self_733406)->elements[3];
c_736750.elements[4] = ((closureN)self_733406)->elements[4];
c_736750.elements[5] = ((closureN)self_733406)->elements[5];
c_736750.elements[6] = ((closureN)self_733406)->elements[6];
c_736750.elements[7] = ((closureN)self_733406)->elements[7];
c_736750.elements[8] = ((closureN)self_733406)->elements[8];



return_direct_with_clo1(data,(closure)&c_736750,__lambda_377,  Cyc_set_cell(data, ((closureN)self_733406)->elements[4], r_732507));; 
}

static void __lambda_377(void *data, object self_733407, int argc, object *args) /* object self_733407, object r_732072 */
 {

  
closureN_type c_736752;
object e_737056 [8];
c_736752.hdr.mark = gc_color_red;
 c_736752.hdr.grayed = 0;
c_736752.tag = closureN_tag;
 c_736752.fn = (function_type)__lambda_378;
c_736752.num_args = 1;
c_736752.num_elements = 8;
c_736752.elements = (object *)e_737056;
c_736752.elements[0] = ((closureN)self_733407)->elements[0];
c_736752.elements[1] = ((closureN)self_733407)->elements[1];
c_736752.elements[2] = ((closureN)self_733407)->elements[2];
c_736752.elements[3] = ((closureN)self_733407)->elements[3];
c_736752.elements[4] = ((closureN)self_733407)->elements[5];
c_736752.elements[5] = ((closureN)self_733407)->elements[6];
c_736752.elements[6] = ((closureN)self_733407)->elements[7];
c_736752.elements[7] = ((closureN)self_733407)->elements[8];


closureN_type c_737057;
object e_738436 [4];
c_737057.hdr.mark = gc_color_red;
 c_737057.hdr.grayed = 0;
c_737057.tag = closureN_tag;
 c_737057.fn = (function_type)__lambda_425;
c_737057.num_args = 2;
c_737057.num_elements = 4;
c_737057.elements = (object *)e_738436;
c_737057.elements[0] = ((closureN)self_733407)->elements[1];
c_737057.elements[1] = ((closureN)self_733407)->elements[2];
c_737057.elements[2] = ((closureN)self_733407)->elements[4];
c_737057.elements[3] = ((closureN)self_733407)->elements[7];

return_direct_with_clo1(data,(closure)&c_736752,__lambda_378,  &c_737057);; 
}

static void __lambda_425(void *data, object self_733408, int argc, object *args) /* object self_733408, object k_732147, object ast_73443_731148, object renamed_73444_731149 */
 {
 object k_732147 = args[0]; object ast_73443_731148 = args[1]; object renamed_73444_731149 = args[2];
  
closureN_type c_737059;
object e_738435 [7];
c_737059.hdr.mark = gc_color_red;
 c_737059.hdr.grayed = 0;
c_737059.tag = closureN_tag;
 c_737059.fn = (function_type)__lambda_426;
c_737059.num_args = 1;
c_737059.num_elements = 7;
c_737059.elements = (object *)e_738435;
c_737059.elements[0] = ast_73443_731148;
c_737059.elements[1] = ((closureN)self_733408)->elements[0];
c_737059.elements[2] = ((closureN)self_733408)->elements[1];
c_737059.elements[3] = ((closureN)self_733408)->elements[2];
c_737059.elements[4] = k_732147;
c_737059.elements[5] = ((closureN)self_733408)->elements[3];
c_737059.elements[6] = renamed_73444_731149;

return_direct_with_clo2(data,  __glo_const_127_scheme_cyclone_util, (((closure)  __glo_const_127_scheme_cyclone_util)->fn),  &c_737059, ast_73443_731148);; 
}

static void __lambda_426(void *data, object self_733409, int argc, object *args) /* object self_733409, object r_732148 */
 {
 object r_732148 = args[0];
  if( (boolean_f != r_732148) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733409)->elements[4], (((closure)  ((closureN)self_733409)->elements[4])->fn),  ((closureN)self_733409)->elements[0]);
} else { 
  
closureN_type c_737064;
object e_738433 [7];
c_737064.hdr.mark = gc_color_red;
 c_737064.hdr.grayed = 0;
c_737064.tag = closureN_tag;
 c_737064.fn = (function_type)__lambda_427;
c_737064.num_args = 1;
c_737064.num_elements = 7;
c_737064.elements = (object *)e_738433;
c_737064.elements[0] = ((closureN)self_733409)->elements[0];
c_737064.elements[1] = ((closureN)self_733409)->elements[1];
c_737064.elements[2] = ((closureN)self_733409)->elements[2];
c_737064.elements[3] = ((closureN)self_733409)->elements[3];
c_737064.elements[4] = ((closureN)self_733409)->elements[4];
c_737064.elements[5] = ((closureN)self_733409)->elements[5];
c_737064.elements[6] = ((closureN)self_733409)->elements[6];

return_direct_with_clo2(data,  __glo_quote_127_scheme_cyclone_util, (((closure)  __glo_quote_127_scheme_cyclone_util)->fn),  &c_737064, ((closureN)self_733409)->elements[0]);}
;; 
}

static void __lambda_427(void *data, object self_733410, int argc, object *args) /* object self_733410, object r_732149 */
 {
 object r_732149 = args[0];
  if( (boolean_f != r_732149) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733410)->elements[4], (((closure)  ((closureN)self_733410)->elements[4])->fn),  ((closureN)self_733410)->elements[0]);
} else { 
  
closureN_type c_737069;
object e_738428 [7];
c_737069.hdr.mark = gc_color_red;
 c_737069.hdr.grayed = 0;
c_737069.tag = closureN_tag;
 c_737069.fn = (function_type)__lambda_428;
c_737069.num_args = 1;
c_737069.num_elements = 7;
c_737069.elements = (object *)e_738428;
c_737069.elements[0] = ((closureN)self_733410)->elements[0];
c_737069.elements[1] = ((closureN)self_733410)->elements[1];
c_737069.elements[2] = ((closureN)self_733410)->elements[2];
c_737069.elements[3] = ((closureN)self_733410)->elements[3];
c_737069.elements[4] = ((closureN)self_733410)->elements[4];
c_737069.elements[5] = ((closureN)self_733410)->elements[5];
c_737069.elements[6] = ((closureN)self_733410)->elements[6];


complex_num_type local_738431; 
return_direct_with_clo1(data,(closure)&c_737069,__lambda_428,  ((inline_function_type)
                   ((closure)__glo_ref_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_738431, ((closureN)self_733410)->elements[0]));}
;; 
}

static void __lambda_428(void *data, object self_733411, int argc, object *args) /* object self_733411, object r_732150 */
 {
 object r_732150 = args[0];
  if( (boolean_f != r_732150) ){ 
  
closureN_type c_737071;
object e_737079 [2];
c_737071.hdr.mark = gc_color_red;
 c_737071.hdr.grayed = 0;
c_737071.tag = closureN_tag;
 c_737071.fn = (function_type)__lambda_429;
c_737071.num_args = 1;
c_737071.num_elements = 2;
c_737071.elements = (object *)e_737079;
c_737071.elements[0] = ((closureN)self_733411)->elements[0];
c_737071.elements[1] = ((closureN)self_733411)->elements[4];



return_direct_with_clo1(data,(closure)&c_737071,__lambda_429,  assoc(data, ((closureN)self_733411)->elements[0], ((closureN)self_733411)->elements[6]));
} else { 
  
closureN_type c_737085;
object e_737103 [2];
c_737085.hdr.mark = gc_color_red;
 c_737085.hdr.grayed = 0;
c_737085.tag = closureN_tag;
 c_737085.fn = (function_type)__lambda_430;
c_737085.num_args = 0;
c_737085.num_elements = 2;
c_737085.elements = (object *)e_737103;
c_737085.elements[0] = ((closureN)self_733411)->elements[0];
c_737085.elements[1] = ((closureN)self_733411)->elements[6];


closureN_type c_737104;
object e_738427 [7];
c_737104.hdr.mark = gc_color_red;
 c_737104.hdr.grayed = 0;
c_737104.tag = closureN_tag;
 c_737104.fn = (function_type)__lambda_433;
c_737104.num_args = 1;
c_737104.num_elements = 7;
c_737104.elements = (object *)e_738427;
c_737104.elements[0] = ((closureN)self_733411)->elements[0];
c_737104.elements[1] = ((closureN)self_733411)->elements[1];
c_737104.elements[2] = ((closureN)self_733411)->elements[2];
c_737104.elements[3] = ((closureN)self_733411)->elements[3];
c_737104.elements[4] = ((closureN)self_733411)->elements[4];
c_737104.elements[5] = ((closureN)self_733411)->elements[5];
c_737104.elements[6] = ((closureN)self_733411)->elements[6];

return_direct_with_clo1(data,(closure)&c_737085,__lambda_430,  &c_737104);}
;; 
}

static void __lambda_433(void *data, object self_733413, int argc, object *args) /* object self_733413, object r_732152 */
 {
 object r_732152 = args[0];
  if( (boolean_f != r_732152) ){ 
  
closureN_type c_737106;
object e_737118 [2];
c_737106.hdr.mark = gc_color_red;
 c_737106.hdr.grayed = 0;
c_737106.tag = closureN_tag;
 c_737106.fn = (function_type)__lambda_434;
c_737106.num_args = 1;
c_737106.num_elements = 2;
c_737106.elements = (object *)e_737118;
c_737106.elements[0] = ((closureN)self_733413)->elements[0];
c_737106.elements[1] = ((closureN)self_733413)->elements[4];


closureN_type c_737119;
object e_737125 [2];
c_737119.hdr.mark = gc_color_red;
 c_737119.hdr.grayed = 0;
c_737119.tag = closureN_tag;
 c_737119.fn = (function_type)__lambda_436;
c_737119.num_args = 1;
c_737119.num_elements = 2;
c_737119.elements = (object *)e_737125;
c_737119.elements[0] = ((closureN)self_733413)->elements[1];
c_737119.elements[1] = ((closureN)self_733413)->elements[6];

return_direct_with_clo1(data,(closure)&c_737106,__lambda_434,  &c_737119);
} else { 
  
closureN_type c_737127;
object e_737145 [2];
c_737127.hdr.mark = gc_color_red;
 c_737127.hdr.grayed = 0;
c_737127.tag = closureN_tag;
 c_737127.fn = (function_type)__lambda_437;
c_737127.num_args = 0;
c_737127.num_elements = 2;
c_737127.elements = (object *)e_737145;
c_737127.elements[0] = ((closureN)self_733413)->elements[0];
c_737127.elements[1] = ((closureN)self_733413)->elements[6];


closureN_type c_737146;
object e_738426 [7];
c_737146.hdr.mark = gc_color_red;
 c_737146.hdr.grayed = 0;
c_737146.tag = closureN_tag;
 c_737146.fn = (function_type)__lambda_440;
c_737146.num_args = 1;
c_737146.num_elements = 7;
c_737146.elements = (object *)e_738426;
c_737146.elements[0] = ((closureN)self_733413)->elements[0];
c_737146.elements[1] = ((closureN)self_733413)->elements[1];
c_737146.elements[2] = ((closureN)self_733413)->elements[2];
c_737146.elements[3] = ((closureN)self_733413)->elements[3];
c_737146.elements[4] = ((closureN)self_733413)->elements[4];
c_737146.elements[5] = ((closureN)self_733413)->elements[5];
c_737146.elements[6] = ((closureN)self_733413)->elements[6];

return_direct_with_clo1(data,(closure)&c_737127,__lambda_437,  &c_737146);}
;; 
}

static void __lambda_440(void *data, object self_733417, int argc, object *args) /* object self_733417, object r_732158 */
 {
 object r_732158 = args[0];
  if( (boolean_f != r_732158) ){ 
  
closureN_type c_737148;
object e_737160 [2];
c_737148.hdr.mark = gc_color_red;
 c_737148.hdr.grayed = 0;
c_737148.tag = closureN_tag;
 c_737148.fn = (function_type)__lambda_441;
c_737148.num_args = 1;
c_737148.num_elements = 2;
c_737148.elements = (object *)e_737160;
c_737148.elements[0] = ((closureN)self_733417)->elements[0];
c_737148.elements[1] = ((closureN)self_733417)->elements[4];


closureN_type c_737161;
object e_737167 [2];
c_737161.hdr.mark = gc_color_red;
 c_737161.hdr.grayed = 0;
c_737161.tag = closureN_tag;
 c_737161.fn = (function_type)__lambda_443;
c_737161.num_args = 1;
c_737161.num_elements = 2;
c_737161.elements = (object *)e_737167;
c_737161.elements[0] = ((closureN)self_733417)->elements[1];
c_737161.elements[1] = ((closureN)self_733417)->elements[6];

return_direct_with_clo1(data,(closure)&c_737148,__lambda_441,  &c_737161);
} else { 
  
closureN_type c_737169;
object e_737187 [2];
c_737169.hdr.mark = gc_color_red;
 c_737169.hdr.grayed = 0;
c_737169.tag = closureN_tag;
 c_737169.fn = (function_type)__lambda_444;
c_737169.num_args = 0;
c_737169.num_elements = 2;
c_737169.elements = (object *)e_737187;
c_737169.elements[0] = ((closureN)self_733417)->elements[0];
c_737169.elements[1] = ((closureN)self_733417)->elements[6];


closureN_type c_737188;
object e_738425 [7];
c_737188.hdr.mark = gc_color_red;
 c_737188.hdr.grayed = 0;
c_737188.tag = closureN_tag;
 c_737188.fn = (function_type)__lambda_447;
c_737188.num_args = 1;
c_737188.num_elements = 7;
c_737188.elements = (object *)e_738425;
c_737188.elements[0] = ((closureN)self_733417)->elements[0];
c_737188.elements[1] = ((closureN)self_733417)->elements[1];
c_737188.elements[2] = ((closureN)self_733417)->elements[2];
c_737188.elements[3] = ((closureN)self_733417)->elements[3];
c_737188.elements[4] = ((closureN)self_733417)->elements[4];
c_737188.elements[5] = ((closureN)self_733417)->elements[5];
c_737188.elements[6] = ((closureN)self_733417)->elements[6];

return_direct_with_clo1(data,(closure)&c_737169,__lambda_444,  &c_737188);}
;; 
}

static void __lambda_447(void *data, object self_733421, int argc, object *args) /* object self_733421, object r_732164 */
 {
 object r_732164 = args[0];
  if( (boolean_f != r_732164) ){ 
  
closureN_type c_737190;
object e_737229 [3];
c_737190.hdr.mark = gc_color_red;
 c_737190.hdr.grayed = 0;
c_737190.tag = closureN_tag;
 c_737190.fn = (function_type)__lambda_448;
c_737190.num_args = 0;
c_737190.num_elements = 3;
c_737190.elements = (object *)e_737229;
c_737190.elements[0] = ((closureN)self_733421)->elements[0];
c_737190.elements[1] = ((closureN)self_733421)->elements[1];
c_737190.elements[2] = ((closureN)self_733421)->elements[6];


closureN_type c_737230;
object e_737349 [1];
c_737230.hdr.mark = gc_color_red;
 c_737230.hdr.grayed = 0;
c_737230.tag = closureN_tag;
 c_737230.fn = (function_type)__lambda_454;
c_737230.num_args = 1;
c_737230.num_elements = 1;
c_737230.elements = (object *)e_737349;
c_737230.elements[0] = ((closureN)self_733421)->elements[4];

return_direct_with_clo1(data,(closure)&c_737190,__lambda_448,  &c_737230);
} else { 
  
closureN_type c_737351;
object e_737372 [2];
c_737351.hdr.mark = gc_color_red;
 c_737351.hdr.grayed = 0;
c_737351.tag = closureN_tag;
 c_737351.fn = (function_type)__lambda_458;
c_737351.num_args = 0;
c_737351.num_elements = 2;
c_737351.elements = (object *)e_737372;
c_737351.elements[0] = ((closureN)self_733421)->elements[0];
c_737351.elements[1] = ((closureN)self_733421)->elements[6];


closureN_type c_737373;
object e_738424 [7];
c_737373.hdr.mark = gc_color_red;
 c_737373.hdr.grayed = 0;
c_737373.tag = closureN_tag;
 c_737373.fn = (function_type)__lambda_461;
c_737373.num_args = 1;
c_737373.num_elements = 7;
c_737373.elements = (object *)e_738424;
c_737373.elements[0] = ((closureN)self_733421)->elements[0];
c_737373.elements[1] = ((closureN)self_733421)->elements[1];
c_737373.elements[2] = ((closureN)self_733421)->elements[2];
c_737373.elements[3] = ((closureN)self_733421)->elements[3];
c_737373.elements[4] = ((closureN)self_733421)->elements[4];
c_737373.elements[5] = ((closureN)self_733421)->elements[5];
c_737373.elements[6] = ((closureN)self_733421)->elements[6];

return_direct_with_clo1(data,(closure)&c_737351,__lambda_458,  &c_737373);}
;; 
}

static void __lambda_461(void *data, object self_733432, int argc, object *args) /* object self_733432, object r_732203 */
 {
 object r_732203 = args[0];
  if( (boolean_f != r_732203) ){ 
  
closureN_type c_737375;
object e_737433 [2];
c_737375.hdr.mark = gc_color_red;
 c_737375.hdr.grayed = 0;
c_737375.tag = closureN_tag;
 c_737375.fn = (function_type)__lambda_462;
c_737375.num_args = 1;
c_737375.num_elements = 2;
c_737375.elements = (object *)e_737433;
c_737375.elements[0] = ((closureN)self_733432)->elements[0];
c_737375.elements[1] = ((closureN)self_733432)->elements[4];


closureN_type c_737434;
object e_737440 [2];
c_737434.hdr.mark = gc_color_red;
 c_737434.hdr.grayed = 0;
c_737434.tag = closureN_tag;
 c_737434.fn = (function_type)__lambda_468;
c_737434.num_args = 1;
c_737434.num_elements = 2;
c_737434.elements = (object *)e_737440;
c_737434.elements[0] = ((closureN)self_733432)->elements[1];
c_737434.elements[1] = ((closureN)self_733432)->elements[6];

return_direct_with_clo1(data,(closure)&c_737375,__lambda_462,  &c_737434);
} else { 
  
closureN_type c_737442;
object e_737460 [2];
c_737442.hdr.mark = gc_color_red;
 c_737442.hdr.grayed = 0;
c_737442.tag = closureN_tag;
 c_737442.fn = (function_type)__lambda_469;
c_737442.num_args = 0;
c_737442.num_elements = 2;
c_737442.elements = (object *)e_737460;
c_737442.elements[0] = ((closureN)self_733432)->elements[0];
c_737442.elements[1] = ((closureN)self_733432)->elements[6];


closureN_type c_737461;
object e_738423 [7];
c_737461.hdr.mark = gc_color_red;
 c_737461.hdr.grayed = 0;
c_737461.tag = closureN_tag;
 c_737461.fn = (function_type)__lambda_472;
c_737461.num_args = 1;
c_737461.num_elements = 7;
c_737461.elements = (object *)e_738423;
c_737461.elements[0] = ((closureN)self_733432)->elements[0];
c_737461.elements[1] = ((closureN)self_733432)->elements[1];
c_737461.elements[2] = ((closureN)self_733432)->elements[2];
c_737461.elements[3] = ((closureN)self_733432)->elements[3];
c_737461.elements[4] = ((closureN)self_733432)->elements[4];
c_737461.elements[5] = ((closureN)self_733432)->elements[5];
c_737461.elements[6] = ((closureN)self_733432)->elements[6];

return_direct_with_clo1(data,(closure)&c_737442,__lambda_469,  &c_737461);}
;; 
}

static void __lambda_472(void *data, object self_733440, int argc, object *args) /* object self_733440, object r_732223 */
 {
 object r_732223 = args[0];
  if( (boolean_f != r_732223) ){ 
  
closureN_type c_737463;
object e_737583 [7];
c_737463.hdr.mark = gc_color_red;
 c_737463.hdr.grayed = 0;
c_737463.tag = closureN_tag;
 c_737463.fn = (function_type)__lambda_473;
c_737463.num_args = 1;
c_737463.num_elements = 7;
c_737463.elements = (object *)e_737583;
c_737463.elements[0] = ((closureN)self_733440)->elements[0];
c_737463.elements[1] = ((closureN)self_733440)->elements[1];
c_737463.elements[2] = ((closureN)self_733440)->elements[2];
c_737463.elements[3] = ((closureN)self_733440)->elements[3];
c_737463.elements[4] = ((closureN)self_733440)->elements[4];
c_737463.elements[5] = ((closureN)self_733440)->elements[5];
c_737463.elements[6] = ((closureN)self_733440)->elements[6];

return_direct_with_clo2(data,  __glo_lambda_91formals_91_125list_scheme_cyclone_util, (((closure)  __glo_lambda_91formals_91_125list_scheme_cyclone_util)->fn),  &c_737463, ((closureN)self_733440)->elements[0]);
} else { 
  
closureN_type c_737586;
object e_738418 [4];
c_737586.hdr.mark = gc_color_red;
 c_737586.hdr.grayed = 0;
c_737586.tag = closureN_tag;
 c_737586.fn = (function_type)__lambda_496;
c_737586.num_args = 1;
c_737586.num_elements = 4;
c_737586.elements = (object *)e_738418;
c_737586.elements[0] = ((closureN)self_733440)->elements[0];
c_737586.elements[1] = ((closureN)self_733440)->elements[1];
c_737586.elements[2] = ((closureN)self_733440)->elements[4];
c_737586.elements[3] = ((closureN)self_733440)->elements[6];


complex_num_type local_738421; 
return_direct_with_clo1(data,(closure)&c_737586,__lambda_496,  ((inline_function_type)
                   ((closure)__glo_app_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_738421, ((closureN)self_733440)->elements[0]));}
;; 
}

static void __lambda_496(void *data, object self_733464, int argc, object *args) /* object self_733464, object r_732249 */
 {
 object r_732249 = args[0];
  if( (boolean_f != r_732249) ){ 
  
closureN_type c_737588;
object e_738398 [4];
c_737588.hdr.mark = gc_color_red;
 c_737588.hdr.grayed = 0;
c_737588.tag = closureN_tag;
 c_737588.fn = (function_type)__lambda_497;
c_737588.num_args = 1;
c_737588.num_elements = 4;
c_737588.elements = (object *)e_738398;
c_737588.elements[0] = ((closureN)self_733464)->elements[0];
c_737588.elements[1] = ((closureN)self_733464)->elements[1];
c_737588.elements[2] = ((closureN)self_733464)->elements[2];
c_737588.elements[3] = ((closureN)self_733464)->elements[3];


closureN_type c_738399;
object e_738413 [3];
c_738399.hdr.mark = gc_color_red;
 c_738399.hdr.grayed = 0;
c_738399.tag = closureN_tag;
 c_738399.fn = (function_type)__lambda_602;
c_738399.num_args = 0;
c_738399.num_elements = 3;
c_738399.elements = (object *)e_738413;
c_738399.elements[0] = ((closureN)self_733464)->elements[0];
c_738399.elements[1] = ((closureN)self_733464)->elements[1];
c_738399.elements[2] = ((closureN)self_733464)->elements[3];

return_direct_with_clo1(data,(closure)&c_737588,__lambda_497,  &c_738399);
} else { 
  
make_utf8_string_with_len(c_738416, "unhandled expression: ", 22, 22);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_733464)->elements[2], &c_738416, ((closureN)self_733464)->elements[0]);}
;; 
}

static void __lambda_602(void *data, object self_733465, int argc, object *args) /* object self_733465, object k_732484 */
 {
 object k_732484 = args[0];
  
closureN_type c_738401;
object e_738405 [2];
c_738401.hdr.mark = gc_color_red;
 c_738401.hdr.grayed = 0;
c_738401.tag = closureN_tag;
 c_738401.fn = (function_type)__lambda_603;
c_738401.num_args = 1;
c_738401.num_elements = 2;
c_738401.elements = (object *)e_738405;
c_738401.elements[0] = ((closureN)self_733465)->elements[0];
c_738401.elements[1] = k_732484;


closureN_type c_738406;
object e_738412 [2];
c_738406.hdr.mark = gc_color_red;
 c_738406.hdr.grayed = 0;
c_738406.tag = closureN_tag;
 c_738406.fn = (function_type)__lambda_604;
c_738406.num_args = 1;
c_738406.num_elements = 2;
c_738406.elements = (object *)e_738412;
c_738406.elements[0] = ((closureN)self_733465)->elements[1];
c_738406.elements[1] = ((closureN)self_733465)->elements[2];

return_direct_with_clo1(data,(closure)&c_738401,__lambda_603,  &c_738406);; 
}

static void __lambda_604(void *data, object self_733466, int argc, object *args) /* object self_733466, object k_732486, object a_73658_731188 */
 {
 object k_732486 = args[0]; object a_73658_731188 = args[1];
  

return_closcall3(data,  car(((closureN)self_733466)->elements[0]),  k_732486, a_73658_731188, ((closureN)self_733466)->elements[1]);; 
}

static void __lambda_603(void *data, object self_733467, int argc, object *args) /* object self_733467, object r_732485 */
 {
 object r_732485 = args[0];
  return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  ((closureN)self_733467)->elements[1], r_732485, ((closureN)self_733467)->elements[0]);; 
}

static void __lambda_497(void *data, object self_733468, int argc, object *args) /* object self_733468, object regular_91case_73548_731166 */
 {
 object regular_91case_73548_731166 = args[0];
  
closureN_type c_737590;
object e_738391 [5];
c_737590.hdr.mark = gc_color_red;
 c_737590.hdr.grayed = 0;
c_737590.tag = closureN_tag;
 c_737590.fn = (function_type)__lambda_498;
c_737590.num_args = 1;
c_737590.num_elements = 5;
c_737590.elements = (object *)e_738391;
c_737590.elements[0] = ((closureN)self_733468)->elements[0];
c_737590.elements[1] = ((closureN)self_733468)->elements[1];
c_737590.elements[2] = ((closureN)self_733468)->elements[2];
c_737590.elements[3] = regular_91case_73548_731166;
c_737590.elements[4] = ((closureN)self_733468)->elements[3];





return_direct_with_clo1(data,(closure)&c_737590,__lambda_498,  assoc(data, Cyc_car(data, ((closureN)self_733468)->elements[0]), ((closureN)self_733468)->elements[3]));; 
}

static void __lambda_498(void *data, object self_733469, int argc, object *args) /* object self_733469, object r_732251 */
 {
 object r_732251 = args[0];
  if( (boolean_f != r_732251) ){ 
  return_closcall1(data,  ((closureN)self_733469)->elements[3],  ((closureN)self_733469)->elements[2]);
} else { 
  object r_732252;
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, ((closureN)self_733469)->elements[0]), quote_member)) ){ 
  
  
  r_732252 = Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733469)->elements[0]), obj_int2obj(3));
} else { 
  r_732252 = boolean_f;}
;if( (boolean_f != r_732252) ){ 
  
closureN_type c_737608;
object e_737620 [2];
c_737608.hdr.mark = gc_color_red;
 c_737608.hdr.grayed = 0;
c_737608.tag = closureN_tag;
 c_737608.fn = (function_type)__lambda_499;
c_737608.num_args = 1;
c_737608.num_elements = 2;
c_737608.elements = (object *)e_737620;
c_737608.elements[0] = ((closureN)self_733469)->elements[0];
c_737608.elements[1] = ((closureN)self_733469)->elements[2];


closureN_type c_737621;
object e_737627 [2];
c_737621.hdr.mark = gc_color_red;
 c_737621.hdr.grayed = 0;
c_737621.tag = closureN_tag;
 c_737621.fn = (function_type)__lambda_501;
c_737621.num_args = 1;
c_737621.num_elements = 2;
c_737621.elements = (object *)e_737627;
c_737621.elements[0] = ((closureN)self_733469)->elements[1];
c_737621.elements[1] = ((closureN)self_733469)->elements[4];

return_direct_with_clo1(data,(closure)&c_737608,__lambda_499,  &c_737621);
} else { 
  
closureN_type c_737629;
object e_737642 [1];
c_737629.hdr.mark = gc_color_red;
 c_737629.hdr.grayed = 0;
c_737629.tag = closureN_tag;
 c_737629.fn = (function_type)__lambda_502;
c_737629.num_args = 0;
c_737629.num_elements = 1;
c_737629.elements = (object *)e_737642;
c_737629.elements[0] = ((closureN)self_733469)->elements[0];


closureN_type c_737643;
object e_738390 [5];
c_737643.hdr.mark = gc_color_red;
 c_737643.hdr.grayed = 0;
c_737643.tag = closureN_tag;
 c_737643.fn = (function_type)__lambda_503;
c_737643.num_args = 1;
c_737643.num_elements = 5;
c_737643.elements = (object *)e_738390;
c_737643.elements[0] = ((closureN)self_733469)->elements[0];
c_737643.elements[1] = ((closureN)self_733469)->elements[1];
c_737643.elements[2] = ((closureN)self_733469)->elements[2];
c_737643.elements[3] = ((closureN)self_733469)->elements[3];
c_737643.elements[4] = ((closureN)self_733469)->elements[4];

return_direct_with_clo1(data,(closure)&c_737629,__lambda_502,  &c_737643);}
;}
;; 
}

static void __lambda_503(void *data, object self_733473, int argc, object *args) /* object self_733473, object r_732258 */
 {
 object r_732258 = args[0];
  if( (boolean_f != r_732258) ){ 
  
closureN_type c_737645;
object e_737657 [2];
c_737645.hdr.mark = gc_color_red;
 c_737645.hdr.grayed = 0;
c_737645.tag = closureN_tag;
 c_737645.fn = (function_type)__lambda_504;
c_737645.num_args = 1;
c_737645.num_elements = 2;
c_737645.elements = (object *)e_737657;
c_737645.elements[0] = ((closureN)self_733473)->elements[0];
c_737645.elements[1] = ((closureN)self_733473)->elements[2];


closureN_type c_737658;
object e_737664 [2];
c_737658.hdr.mark = gc_color_red;
 c_737658.hdr.grayed = 0;
c_737658.tag = closureN_tag;
 c_737658.fn = (function_type)__lambda_506;
c_737658.num_args = 1;
c_737658.num_elements = 2;
c_737658.elements = (object *)e_737664;
c_737658.elements[0] = ((closureN)self_733473)->elements[1];
c_737658.elements[1] = ((closureN)self_733473)->elements[4];

return_direct_with_clo1(data,(closure)&c_737645,__lambda_504,  &c_737658);
} else { 
  
closureN_type c_737666;
object e_737679 [1];
c_737666.hdr.mark = gc_color_red;
 c_737666.hdr.grayed = 0;
c_737666.tag = closureN_tag;
 c_737666.fn = (function_type)__lambda_507;
c_737666.num_args = 0;
c_737666.num_elements = 1;
c_737666.elements = (object *)e_737679;
c_737666.elements[0] = ((closureN)self_733473)->elements[0];


closureN_type c_737680;
object e_738389 [5];
c_737680.hdr.mark = gc_color_red;
 c_737680.hdr.grayed = 0;
c_737680.tag = closureN_tag;
 c_737680.fn = (function_type)__lambda_508;
c_737680.num_args = 1;
c_737680.num_elements = 5;
c_737680.elements = (object *)e_738389;
c_737680.elements[0] = ((closureN)self_733473)->elements[0];
c_737680.elements[1] = ((closureN)self_733473)->elements[1];
c_737680.elements[2] = ((closureN)self_733473)->elements[2];
c_737680.elements[3] = ((closureN)self_733473)->elements[3];
c_737680.elements[4] = ((closureN)self_733473)->elements[4];

return_direct_with_clo1(data,(closure)&c_737666,__lambda_507,  &c_737680);}
;; 
}

static void __lambda_508(void *data, object self_733477, int argc, object *args) /* object self_733477, object r_732264 */
 {
 object r_732264 = args[0];
  if( (boolean_f != r_732264) ){ 
  
closureN_type c_737682;
object e_737694 [2];
c_737682.hdr.mark = gc_color_red;
 c_737682.hdr.grayed = 0;
c_737682.tag = closureN_tag;
 c_737682.fn = (function_type)__lambda_509;
c_737682.num_args = 1;
c_737682.num_elements = 2;
c_737682.elements = (object *)e_737694;
c_737682.elements[0] = ((closureN)self_733477)->elements[0];
c_737682.elements[1] = ((closureN)self_733477)->elements[2];


closureN_type c_737695;
object e_737701 [2];
c_737695.hdr.mark = gc_color_red;
 c_737695.hdr.grayed = 0;
c_737695.tag = closureN_tag;
 c_737695.fn = (function_type)__lambda_511;
c_737695.num_args = 1;
c_737695.num_elements = 2;
c_737695.elements = (object *)e_737701;
c_737695.elements[0] = ((closureN)self_733477)->elements[1];
c_737695.elements[1] = ((closureN)self_733477)->elements[4];

return_direct_with_clo1(data,(closure)&c_737682,__lambda_509,  &c_737695);
} else { 
  
closureN_type c_737703;
object e_737716 [1];
c_737703.hdr.mark = gc_color_red;
 c_737703.hdr.grayed = 0;
c_737703.tag = closureN_tag;
 c_737703.fn = (function_type)__lambda_512;
c_737703.num_args = 0;
c_737703.num_elements = 1;
c_737703.elements = (object *)e_737716;
c_737703.elements[0] = ((closureN)self_733477)->elements[0];


closureN_type c_737717;
object e_738388 [5];
c_737717.hdr.mark = gc_color_red;
 c_737717.hdr.grayed = 0;
c_737717.tag = closureN_tag;
 c_737717.fn = (function_type)__lambda_513;
c_737717.num_args = 1;
c_737717.num_elements = 5;
c_737717.elements = (object *)e_738388;
c_737717.elements[0] = ((closureN)self_733477)->elements[0];
c_737717.elements[1] = ((closureN)self_733477)->elements[1];
c_737717.elements[2] = ((closureN)self_733477)->elements[2];
c_737717.elements[3] = ((closureN)self_733477)->elements[3];
c_737717.elements[4] = ((closureN)self_733477)->elements[4];

return_direct_with_clo1(data,(closure)&c_737703,__lambda_512,  &c_737717);}
;; 
}

static void __lambda_513(void *data, object self_733481, int argc, object *args) /* object self_733481, object r_732270 */
 {
 object r_732270 = args[0];
  if( (boolean_f != r_732270) ){ 
  
closureN_type c_737719;
object e_737731 [2];
c_737719.hdr.mark = gc_color_red;
 c_737719.hdr.grayed = 0;
c_737719.tag = closureN_tag;
 c_737719.fn = (function_type)__lambda_514;
c_737719.num_args = 1;
c_737719.num_elements = 2;
c_737719.elements = (object *)e_737731;
c_737719.elements[0] = ((closureN)self_733481)->elements[0];
c_737719.elements[1] = ((closureN)self_733481)->elements[2];


closureN_type c_737732;
object e_737738 [2];
c_737732.hdr.mark = gc_color_red;
 c_737732.hdr.grayed = 0;
c_737732.tag = closureN_tag;
 c_737732.fn = (function_type)__lambda_516;
c_737732.num_args = 1;
c_737732.num_elements = 2;
c_737732.elements = (object *)e_737738;
c_737732.elements[0] = ((closureN)self_733481)->elements[1];
c_737732.elements[1] = ((closureN)self_733481)->elements[4];

return_direct_with_clo1(data,(closure)&c_737719,__lambda_514,  &c_737732);
} else { 
  
closureN_type c_737740;
object e_737753 [1];
c_737740.hdr.mark = gc_color_red;
 c_737740.hdr.grayed = 0;
c_737740.tag = closureN_tag;
 c_737740.fn = (function_type)__lambda_517;
c_737740.num_args = 0;
c_737740.num_elements = 1;
c_737740.elements = (object *)e_737753;
c_737740.elements[0] = ((closureN)self_733481)->elements[0];


closureN_type c_737754;
object e_738387 [5];
c_737754.hdr.mark = gc_color_red;
 c_737754.hdr.grayed = 0;
c_737754.tag = closureN_tag;
 c_737754.fn = (function_type)__lambda_518;
c_737754.num_args = 1;
c_737754.num_elements = 5;
c_737754.elements = (object *)e_738387;
c_737754.elements[0] = ((closureN)self_733481)->elements[0];
c_737754.elements[1] = ((closureN)self_733481)->elements[1];
c_737754.elements[2] = ((closureN)self_733481)->elements[2];
c_737754.elements[3] = ((closureN)self_733481)->elements[3];
c_737754.elements[4] = ((closureN)self_733481)->elements[4];

return_direct_with_clo1(data,(closure)&c_737740,__lambda_517,  &c_737754);}
;; 
}

static void __lambda_518(void *data, object self_733485, int argc, object *args) /* object self_733485, object r_732276 */
 {
 object r_732276 = args[0];
  if( (boolean_f != r_732276) ){ 
  
closureN_type c_737756;
object e_737768 [2];
c_737756.hdr.mark = gc_color_red;
 c_737756.hdr.grayed = 0;
c_737756.tag = closureN_tag;
 c_737756.fn = (function_type)__lambda_519;
c_737756.num_args = 1;
c_737756.num_elements = 2;
c_737756.elements = (object *)e_737768;
c_737756.elements[0] = ((closureN)self_733485)->elements[0];
c_737756.elements[1] = ((closureN)self_733485)->elements[2];


closureN_type c_737769;
object e_737775 [2];
c_737769.hdr.mark = gc_color_red;
 c_737769.hdr.grayed = 0;
c_737769.tag = closureN_tag;
 c_737769.fn = (function_type)__lambda_521;
c_737769.num_args = 1;
c_737769.num_elements = 2;
c_737769.elements = (object *)e_737775;
c_737769.elements[0] = ((closureN)self_733485)->elements[1];
c_737769.elements[1] = ((closureN)self_733485)->elements[4];

return_direct_with_clo1(data,(closure)&c_737756,__lambda_519,  &c_737769);
} else { 
  
closureN_type c_737777;
object e_737790 [1];
c_737777.hdr.mark = gc_color_red;
 c_737777.hdr.grayed = 0;
c_737777.tag = closureN_tag;
 c_737777.fn = (function_type)__lambda_522;
c_737777.num_args = 0;
c_737777.num_elements = 1;
c_737777.elements = (object *)e_737790;
c_737777.elements[0] = ((closureN)self_733485)->elements[0];


closureN_type c_737791;
object e_738386 [5];
c_737791.hdr.mark = gc_color_red;
 c_737791.hdr.grayed = 0;
c_737791.tag = closureN_tag;
 c_737791.fn = (function_type)__lambda_523;
c_737791.num_args = 1;
c_737791.num_elements = 5;
c_737791.elements = (object *)e_738386;
c_737791.elements[0] = ((closureN)self_733485)->elements[0];
c_737791.elements[1] = ((closureN)self_733485)->elements[1];
c_737791.elements[2] = ((closureN)self_733485)->elements[2];
c_737791.elements[3] = ((closureN)self_733485)->elements[3];
c_737791.elements[4] = ((closureN)self_733485)->elements[4];

return_direct_with_clo1(data,(closure)&c_737777,__lambda_522,  &c_737791);}
;; 
}

static void __lambda_523(void *data, object self_733489, int argc, object *args) /* object self_733489, object r_732282 */
 {
 object r_732282 = args[0];
  if( (boolean_f != r_732282) ){ 
  
closureN_type c_737793;
object e_737805 [2];
c_737793.hdr.mark = gc_color_red;
 c_737793.hdr.grayed = 0;
c_737793.tag = closureN_tag;
 c_737793.fn = (function_type)__lambda_524;
c_737793.num_args = 1;
c_737793.num_elements = 2;
c_737793.elements = (object *)e_737805;
c_737793.elements[0] = ((closureN)self_733489)->elements[0];
c_737793.elements[1] = ((closureN)self_733489)->elements[2];


closureN_type c_737806;
object e_737812 [2];
c_737806.hdr.mark = gc_color_red;
 c_737806.hdr.grayed = 0;
c_737806.tag = closureN_tag;
 c_737806.fn = (function_type)__lambda_526;
c_737806.num_args = 1;
c_737806.num_elements = 2;
c_737806.elements = (object *)e_737812;
c_737806.elements[0] = ((closureN)self_733489)->elements[1];
c_737806.elements[1] = ((closureN)self_733489)->elements[4];

return_direct_with_clo1(data,(closure)&c_737793,__lambda_524,  &c_737806);
} else { 
  
closureN_type c_737814;
object e_737827 [1];
c_737814.hdr.mark = gc_color_red;
 c_737814.hdr.grayed = 0;
c_737814.tag = closureN_tag;
 c_737814.fn = (function_type)__lambda_527;
c_737814.num_args = 0;
c_737814.num_elements = 1;
c_737814.elements = (object *)e_737827;
c_737814.elements[0] = ((closureN)self_733489)->elements[0];


closureN_type c_737828;
object e_738385 [5];
c_737828.hdr.mark = gc_color_red;
 c_737828.hdr.grayed = 0;
c_737828.tag = closureN_tag;
 c_737828.fn = (function_type)__lambda_528;
c_737828.num_args = 1;
c_737828.num_elements = 5;
c_737828.elements = (object *)e_738385;
c_737828.elements[0] = ((closureN)self_733489)->elements[0];
c_737828.elements[1] = ((closureN)self_733489)->elements[1];
c_737828.elements[2] = ((closureN)self_733489)->elements[2];
c_737828.elements[3] = ((closureN)self_733489)->elements[3];
c_737828.elements[4] = ((closureN)self_733489)->elements[4];

return_direct_with_clo1(data,(closure)&c_737814,__lambda_527,  &c_737828);}
;; 
}

static void __lambda_528(void *data, object self_733493, int argc, object *args) /* object self_733493, object r_732288 */
 {
 object r_732288 = args[0];
  if( (boolean_f != r_732288) ){ 
  
closureN_type c_737830;
object e_737842 [2];
c_737830.hdr.mark = gc_color_red;
 c_737830.hdr.grayed = 0;
c_737830.tag = closureN_tag;
 c_737830.fn = (function_type)__lambda_529;
c_737830.num_args = 1;
c_737830.num_elements = 2;
c_737830.elements = (object *)e_737842;
c_737830.elements[0] = ((closureN)self_733493)->elements[0];
c_737830.elements[1] = ((closureN)self_733493)->elements[2];


closureN_type c_737843;
object e_737849 [2];
c_737843.hdr.mark = gc_color_red;
 c_737843.hdr.grayed = 0;
c_737843.tag = closureN_tag;
 c_737843.fn = (function_type)__lambda_531;
c_737843.num_args = 1;
c_737843.num_elements = 2;
c_737843.elements = (object *)e_737849;
c_737843.elements[0] = ((closureN)self_733493)->elements[1];
c_737843.elements[1] = ((closureN)self_733493)->elements[4];

return_direct_with_clo1(data,(closure)&c_737830,__lambda_529,  &c_737843);
} else { 
  
closureN_type c_737851;
object e_737864 [1];
c_737851.hdr.mark = gc_color_red;
 c_737851.hdr.grayed = 0;
c_737851.tag = closureN_tag;
 c_737851.fn = (function_type)__lambda_532;
c_737851.num_args = 0;
c_737851.num_elements = 1;
c_737851.elements = (object *)e_737864;
c_737851.elements[0] = ((closureN)self_733493)->elements[0];


closureN_type c_737865;
object e_738384 [5];
c_737865.hdr.mark = gc_color_red;
 c_737865.hdr.grayed = 0;
c_737865.tag = closureN_tag;
 c_737865.fn = (function_type)__lambda_533;
c_737865.num_args = 1;
c_737865.num_elements = 5;
c_737865.elements = (object *)e_738384;
c_737865.elements[0] = ((closureN)self_733493)->elements[0];
c_737865.elements[1] = ((closureN)self_733493)->elements[1];
c_737865.elements[2] = ((closureN)self_733493)->elements[2];
c_737865.elements[3] = ((closureN)self_733493)->elements[3];
c_737865.elements[4] = ((closureN)self_733493)->elements[4];

return_direct_with_clo1(data,(closure)&c_737851,__lambda_532,  &c_737865);}
;; 
}

static void __lambda_533(void *data, object self_733497, int argc, object *args) /* object self_733497, object r_732294 */
 {
 object r_732294 = args[0];
  if( (boolean_f != r_732294) ){ 
  
closureN_type c_737867;
object e_737879 [2];
c_737867.hdr.mark = gc_color_red;
 c_737867.hdr.grayed = 0;
c_737867.tag = closureN_tag;
 c_737867.fn = (function_type)__lambda_534;
c_737867.num_args = 1;
c_737867.num_elements = 2;
c_737867.elements = (object *)e_737879;
c_737867.elements[0] = ((closureN)self_733497)->elements[0];
c_737867.elements[1] = ((closureN)self_733497)->elements[2];


closureN_type c_737880;
object e_737886 [2];
c_737880.hdr.mark = gc_color_red;
 c_737880.hdr.grayed = 0;
c_737880.tag = closureN_tag;
 c_737880.fn = (function_type)__lambda_536;
c_737880.num_args = 1;
c_737880.num_elements = 2;
c_737880.elements = (object *)e_737886;
c_737880.elements[0] = ((closureN)self_733497)->elements[1];
c_737880.elements[1] = ((closureN)self_733497)->elements[4];

return_direct_with_clo1(data,(closure)&c_737867,__lambda_534,  &c_737880);
} else { 
  
closureN_type c_737888;
object e_737901 [1];
c_737888.hdr.mark = gc_color_red;
 c_737888.hdr.grayed = 0;
c_737888.tag = closureN_tag;
 c_737888.fn = (function_type)__lambda_537;
c_737888.num_args = 0;
c_737888.num_elements = 1;
c_737888.elements = (object *)e_737901;
c_737888.elements[0] = ((closureN)self_733497)->elements[0];


closureN_type c_737902;
object e_738383 [5];
c_737902.hdr.mark = gc_color_red;
 c_737902.hdr.grayed = 0;
c_737902.tag = closureN_tag;
 c_737902.fn = (function_type)__lambda_538;
c_737902.num_args = 1;
c_737902.num_elements = 5;
c_737902.elements = (object *)e_738383;
c_737902.elements[0] = ((closureN)self_733497)->elements[0];
c_737902.elements[1] = ((closureN)self_733497)->elements[1];
c_737902.elements[2] = ((closureN)self_733497)->elements[2];
c_737902.elements[3] = ((closureN)self_733497)->elements[3];
c_737902.elements[4] = ((closureN)self_733497)->elements[4];

return_direct_with_clo1(data,(closure)&c_737888,__lambda_537,  &c_737902);}
;; 
}

static void __lambda_538(void *data, object self_733501, int argc, object *args) /* object self_733501, object r_732300 */
 {
 object r_732300 = args[0];
  if( (boolean_f != r_732300) ){ 
  
closureN_type c_737904;
object e_737916 [2];
c_737904.hdr.mark = gc_color_red;
 c_737904.hdr.grayed = 0;
c_737904.tag = closureN_tag;
 c_737904.fn = (function_type)__lambda_539;
c_737904.num_args = 1;
c_737904.num_elements = 2;
c_737904.elements = (object *)e_737916;
c_737904.elements[0] = ((closureN)self_733501)->elements[0];
c_737904.elements[1] = ((closureN)self_733501)->elements[2];


closureN_type c_737917;
object e_737923 [2];
c_737917.hdr.mark = gc_color_red;
 c_737917.hdr.grayed = 0;
c_737917.tag = closureN_tag;
 c_737917.fn = (function_type)__lambda_541;
c_737917.num_args = 1;
c_737917.num_elements = 2;
c_737917.elements = (object *)e_737923;
c_737917.elements[0] = ((closureN)self_733501)->elements[1];
c_737917.elements[1] = ((closureN)self_733501)->elements[4];

return_direct_with_clo1(data,(closure)&c_737904,__lambda_539,  &c_737917);
} else { 
  
closureN_type c_737925;
object e_737938 [1];
c_737925.hdr.mark = gc_color_red;
 c_737925.hdr.grayed = 0;
c_737925.tag = closureN_tag;
 c_737925.fn = (function_type)__lambda_542;
c_737925.num_args = 0;
c_737925.num_elements = 1;
c_737925.elements = (object *)e_737938;
c_737925.elements[0] = ((closureN)self_733501)->elements[0];


closureN_type c_737939;
object e_738382 [5];
c_737939.hdr.mark = gc_color_red;
 c_737939.hdr.grayed = 0;
c_737939.tag = closureN_tag;
 c_737939.fn = (function_type)__lambda_543;
c_737939.num_args = 1;
c_737939.num_elements = 5;
c_737939.elements = (object *)e_738382;
c_737939.elements[0] = ((closureN)self_733501)->elements[0];
c_737939.elements[1] = ((closureN)self_733501)->elements[1];
c_737939.elements[2] = ((closureN)self_733501)->elements[2];
c_737939.elements[3] = ((closureN)self_733501)->elements[3];
c_737939.elements[4] = ((closureN)self_733501)->elements[4];

return_direct_with_clo1(data,(closure)&c_737925,__lambda_542,  &c_737939);}
;; 
}

static void __lambda_543(void *data, object self_733505, int argc, object *args) /* object self_733505, object r_732306 */
 {
 object r_732306 = args[0];
  if( (boolean_f != r_732306) ){ 
  
closureN_type c_737941;
object e_737953 [2];
c_737941.hdr.mark = gc_color_red;
 c_737941.hdr.grayed = 0;
c_737941.tag = closureN_tag;
 c_737941.fn = (function_type)__lambda_544;
c_737941.num_args = 1;
c_737941.num_elements = 2;
c_737941.elements = (object *)e_737953;
c_737941.elements[0] = ((closureN)self_733505)->elements[0];
c_737941.elements[1] = ((closureN)self_733505)->elements[2];


closureN_type c_737954;
object e_737960 [2];
c_737954.hdr.mark = gc_color_red;
 c_737954.hdr.grayed = 0;
c_737954.tag = closureN_tag;
 c_737954.fn = (function_type)__lambda_546;
c_737954.num_args = 1;
c_737954.num_elements = 2;
c_737954.elements = (object *)e_737960;
c_737954.elements[0] = ((closureN)self_733505)->elements[1];
c_737954.elements[1] = ((closureN)self_733505)->elements[4];

return_direct_with_clo1(data,(closure)&c_737941,__lambda_544,  &c_737954);
} else { 
  
closureN_type c_737962;
object e_737975 [1];
c_737962.hdr.mark = gc_color_red;
 c_737962.hdr.grayed = 0;
c_737962.tag = closureN_tag;
 c_737962.fn = (function_type)__lambda_547;
c_737962.num_args = 0;
c_737962.num_elements = 1;
c_737962.elements = (object *)e_737975;
c_737962.elements[0] = ((closureN)self_733505)->elements[0];


closureN_type c_737976;
object e_738381 [5];
c_737976.hdr.mark = gc_color_red;
 c_737976.hdr.grayed = 0;
c_737976.tag = closureN_tag;
 c_737976.fn = (function_type)__lambda_548;
c_737976.num_args = 1;
c_737976.num_elements = 5;
c_737976.elements = (object *)e_738381;
c_737976.elements[0] = ((closureN)self_733505)->elements[0];
c_737976.elements[1] = ((closureN)self_733505)->elements[1];
c_737976.elements[2] = ((closureN)self_733505)->elements[2];
c_737976.elements[3] = ((closureN)self_733505)->elements[3];
c_737976.elements[4] = ((closureN)self_733505)->elements[4];

return_direct_with_clo1(data,(closure)&c_737962,__lambda_547,  &c_737976);}
;; 
}

static void __lambda_548(void *data, object self_733509, int argc, object *args) /* object self_733509, object r_732312 */
 {
 object r_732312 = args[0];
  if( (boolean_f != r_732312) ){ 
  
closureN_type c_737978;
object e_737990 [2];
c_737978.hdr.mark = gc_color_red;
 c_737978.hdr.grayed = 0;
c_737978.tag = closureN_tag;
 c_737978.fn = (function_type)__lambda_549;
c_737978.num_args = 1;
c_737978.num_elements = 2;
c_737978.elements = (object *)e_737990;
c_737978.elements[0] = ((closureN)self_733509)->elements[0];
c_737978.elements[1] = ((closureN)self_733509)->elements[2];


closureN_type c_737991;
object e_737997 [2];
c_737991.hdr.mark = gc_color_red;
 c_737991.hdr.grayed = 0;
c_737991.tag = closureN_tag;
 c_737991.fn = (function_type)__lambda_551;
c_737991.num_args = 1;
c_737991.num_elements = 2;
c_737991.elements = (object *)e_737997;
c_737991.elements[0] = ((closureN)self_733509)->elements[1];
c_737991.elements[1] = ((closureN)self_733509)->elements[4];

return_direct_with_clo1(data,(closure)&c_737978,__lambda_549,  &c_737991);
} else { 
  
closureN_type c_737999;
object e_738012 [1];
c_737999.hdr.mark = gc_color_red;
 c_737999.hdr.grayed = 0;
c_737999.tag = closureN_tag;
 c_737999.fn = (function_type)__lambda_552;
c_737999.num_args = 0;
c_737999.num_elements = 1;
c_737999.elements = (object *)e_738012;
c_737999.elements[0] = ((closureN)self_733509)->elements[0];


closureN_type c_738013;
object e_738380 [5];
c_738013.hdr.mark = gc_color_red;
 c_738013.hdr.grayed = 0;
c_738013.tag = closureN_tag;
 c_738013.fn = (function_type)__lambda_553;
c_738013.num_args = 1;
c_738013.num_elements = 5;
c_738013.elements = (object *)e_738380;
c_738013.elements[0] = ((closureN)self_733509)->elements[0];
c_738013.elements[1] = ((closureN)self_733509)->elements[1];
c_738013.elements[2] = ((closureN)self_733509)->elements[2];
c_738013.elements[3] = ((closureN)self_733509)->elements[3];
c_738013.elements[4] = ((closureN)self_733509)->elements[4];

return_direct_with_clo1(data,(closure)&c_737999,__lambda_552,  &c_738013);}
;; 
}

static void __lambda_553(void *data, object self_733513, int argc, object *args) /* object self_733513, object r_732318 */
 {
 object r_732318 = args[0];
  if( (boolean_f != r_732318) ){ 
  
closureN_type c_738015;
object e_738027 [2];
c_738015.hdr.mark = gc_color_red;
 c_738015.hdr.grayed = 0;
c_738015.tag = closureN_tag;
 c_738015.fn = (function_type)__lambda_554;
c_738015.num_args = 1;
c_738015.num_elements = 2;
c_738015.elements = (object *)e_738027;
c_738015.elements[0] = ((closureN)self_733513)->elements[0];
c_738015.elements[1] = ((closureN)self_733513)->elements[2];


closureN_type c_738028;
object e_738034 [2];
c_738028.hdr.mark = gc_color_red;
 c_738028.hdr.grayed = 0;
c_738028.tag = closureN_tag;
 c_738028.fn = (function_type)__lambda_556;
c_738028.num_args = 1;
c_738028.num_elements = 2;
c_738028.elements = (object *)e_738034;
c_738028.elements[0] = ((closureN)self_733513)->elements[1];
c_738028.elements[1] = ((closureN)self_733513)->elements[4];

return_direct_with_clo1(data,(closure)&c_738015,__lambda_554,  &c_738028);
} else { 
  
closureN_type c_738036;
object e_738049 [1];
c_738036.hdr.mark = gc_color_red;
 c_738036.hdr.grayed = 0;
c_738036.tag = closureN_tag;
 c_738036.fn = (function_type)__lambda_557;
c_738036.num_args = 0;
c_738036.num_elements = 1;
c_738036.elements = (object *)e_738049;
c_738036.elements[0] = ((closureN)self_733513)->elements[0];


closureN_type c_738050;
object e_738379 [5];
c_738050.hdr.mark = gc_color_red;
 c_738050.hdr.grayed = 0;
c_738050.tag = closureN_tag;
 c_738050.fn = (function_type)__lambda_558;
c_738050.num_args = 1;
c_738050.num_elements = 5;
c_738050.elements = (object *)e_738379;
c_738050.elements[0] = ((closureN)self_733513)->elements[0];
c_738050.elements[1] = ((closureN)self_733513)->elements[1];
c_738050.elements[2] = ((closureN)self_733513)->elements[2];
c_738050.elements[3] = ((closureN)self_733513)->elements[3];
c_738050.elements[4] = ((closureN)self_733513)->elements[4];

return_direct_with_clo1(data,(closure)&c_738036,__lambda_557,  &c_738050);}
;; 
}

static void __lambda_558(void *data, object self_733517, int argc, object *args) /* object self_733517, object r_732324 */
 {
 object r_732324 = args[0];
  if( (boolean_f != r_732324) ){ 
  
closureN_type c_738052;
object e_738064 [2];
c_738052.hdr.mark = gc_color_red;
 c_738052.hdr.grayed = 0;
c_738052.tag = closureN_tag;
 c_738052.fn = (function_type)__lambda_559;
c_738052.num_args = 1;
c_738052.num_elements = 2;
c_738052.elements = (object *)e_738064;
c_738052.elements[0] = ((closureN)self_733517)->elements[0];
c_738052.elements[1] = ((closureN)self_733517)->elements[2];


closureN_type c_738065;
object e_738071 [2];
c_738065.hdr.mark = gc_color_red;
 c_738065.hdr.grayed = 0;
c_738065.tag = closureN_tag;
 c_738065.fn = (function_type)__lambda_561;
c_738065.num_args = 1;
c_738065.num_elements = 2;
c_738065.elements = (object *)e_738071;
c_738065.elements[0] = ((closureN)self_733517)->elements[1];
c_738065.elements[1] = ((closureN)self_733517)->elements[4];

return_direct_with_clo1(data,(closure)&c_738052,__lambda_559,  &c_738065);
} else { 
  
closureN_type c_738073;
object e_738086 [1];
c_738073.hdr.mark = gc_color_red;
 c_738073.hdr.grayed = 0;
c_738073.tag = closureN_tag;
 c_738073.fn = (function_type)__lambda_562;
c_738073.num_args = 0;
c_738073.num_elements = 1;
c_738073.elements = (object *)e_738086;
c_738073.elements[0] = ((closureN)self_733517)->elements[0];


closureN_type c_738087;
object e_738378 [5];
c_738087.hdr.mark = gc_color_red;
 c_738087.hdr.grayed = 0;
c_738087.tag = closureN_tag;
 c_738087.fn = (function_type)__lambda_563;
c_738087.num_args = 1;
c_738087.num_elements = 5;
c_738087.elements = (object *)e_738378;
c_738087.elements[0] = ((closureN)self_733517)->elements[0];
c_738087.elements[1] = ((closureN)self_733517)->elements[1];
c_738087.elements[2] = ((closureN)self_733517)->elements[2];
c_738087.elements[3] = ((closureN)self_733517)->elements[3];
c_738087.elements[4] = ((closureN)self_733517)->elements[4];

return_direct_with_clo1(data,(closure)&c_738073,__lambda_562,  &c_738087);}
;; 
}

static void __lambda_563(void *data, object self_733521, int argc, object *args) /* object self_733521, object r_732330 */
 {
 object r_732330 = args[0];
  if( (boolean_f != r_732330) ){ 
  
closureN_type c_738089;
object e_738101 [2];
c_738089.hdr.mark = gc_color_red;
 c_738089.hdr.grayed = 0;
c_738089.tag = closureN_tag;
 c_738089.fn = (function_type)__lambda_564;
c_738089.num_args = 1;
c_738089.num_elements = 2;
c_738089.elements = (object *)e_738101;
c_738089.elements[0] = ((closureN)self_733521)->elements[0];
c_738089.elements[1] = ((closureN)self_733521)->elements[2];


closureN_type c_738102;
object e_738108 [2];
c_738102.hdr.mark = gc_color_red;
 c_738102.hdr.grayed = 0;
c_738102.tag = closureN_tag;
 c_738102.fn = (function_type)__lambda_566;
c_738102.num_args = 1;
c_738102.num_elements = 2;
c_738102.elements = (object *)e_738108;
c_738102.elements[0] = ((closureN)self_733521)->elements[1];
c_738102.elements[1] = ((closureN)self_733521)->elements[4];

return_direct_with_clo1(data,(closure)&c_738089,__lambda_564,  &c_738102);
} else { 
  
closureN_type c_738110;
object e_738123 [1];
c_738110.hdr.mark = gc_color_red;
 c_738110.hdr.grayed = 0;
c_738110.tag = closureN_tag;
 c_738110.fn = (function_type)__lambda_567;
c_738110.num_args = 0;
c_738110.num_elements = 1;
c_738110.elements = (object *)e_738123;
c_738110.elements[0] = ((closureN)self_733521)->elements[0];


closureN_type c_738124;
object e_738377 [5];
c_738124.hdr.mark = gc_color_red;
 c_738124.hdr.grayed = 0;
c_738124.tag = closureN_tag;
 c_738124.fn = (function_type)__lambda_568;
c_738124.num_args = 1;
c_738124.num_elements = 5;
c_738124.elements = (object *)e_738377;
c_738124.elements[0] = ((closureN)self_733521)->elements[0];
c_738124.elements[1] = ((closureN)self_733521)->elements[1];
c_738124.elements[2] = ((closureN)self_733521)->elements[2];
c_738124.elements[3] = ((closureN)self_733521)->elements[3];
c_738124.elements[4] = ((closureN)self_733521)->elements[4];

return_direct_with_clo1(data,(closure)&c_738110,__lambda_567,  &c_738124);}
;; 
}

static void __lambda_568(void *data, object self_733525, int argc, object *args) /* object self_733525, object r_732336 */
 {
 object r_732336 = args[0];
  if( (boolean_f != r_732336) ){ 
  
closureN_type c_738126;
object e_738138 [2];
c_738126.hdr.mark = gc_color_red;
 c_738126.hdr.grayed = 0;
c_738126.tag = closureN_tag;
 c_738126.fn = (function_type)__lambda_569;
c_738126.num_args = 1;
c_738126.num_elements = 2;
c_738126.elements = (object *)e_738138;
c_738126.elements[0] = ((closureN)self_733525)->elements[0];
c_738126.elements[1] = ((closureN)self_733525)->elements[2];


closureN_type c_738139;
object e_738145 [2];
c_738139.hdr.mark = gc_color_red;
 c_738139.hdr.grayed = 0;
c_738139.tag = closureN_tag;
 c_738139.fn = (function_type)__lambda_571;
c_738139.num_args = 1;
c_738139.num_elements = 2;
c_738139.elements = (object *)e_738145;
c_738139.elements[0] = ((closureN)self_733525)->elements[1];
c_738139.elements[1] = ((closureN)self_733525)->elements[4];

return_direct_with_clo1(data,(closure)&c_738126,__lambda_569,  &c_738139);
} else { 
  
closureN_type c_738147;
object e_738160 [1];
c_738147.hdr.mark = gc_color_red;
 c_738147.hdr.grayed = 0;
c_738147.tag = closureN_tag;
 c_738147.fn = (function_type)__lambda_572;
c_738147.num_args = 0;
c_738147.num_elements = 1;
c_738147.elements = (object *)e_738160;
c_738147.elements[0] = ((closureN)self_733525)->elements[0];


closureN_type c_738161;
object e_738376 [5];
c_738161.hdr.mark = gc_color_red;
 c_738161.hdr.grayed = 0;
c_738161.tag = closureN_tag;
 c_738161.fn = (function_type)__lambda_573;
c_738161.num_args = 1;
c_738161.num_elements = 5;
c_738161.elements = (object *)e_738376;
c_738161.elements[0] = ((closureN)self_733525)->elements[0];
c_738161.elements[1] = ((closureN)self_733525)->elements[1];
c_738161.elements[2] = ((closureN)self_733525)->elements[2];
c_738161.elements[3] = ((closureN)self_733525)->elements[3];
c_738161.elements[4] = ((closureN)self_733525)->elements[4];

return_direct_with_clo1(data,(closure)&c_738147,__lambda_572,  &c_738161);}
;; 
}

static void __lambda_573(void *data, object self_733529, int argc, object *args) /* object self_733529, object r_732342 */
 {
 object r_732342 = args[0];
  if( (boolean_f != r_732342) ){ 
  
closureN_type c_738163;
object e_738175 [2];
c_738163.hdr.mark = gc_color_red;
 c_738163.hdr.grayed = 0;
c_738163.tag = closureN_tag;
 c_738163.fn = (function_type)__lambda_574;
c_738163.num_args = 1;
c_738163.num_elements = 2;
c_738163.elements = (object *)e_738175;
c_738163.elements[0] = ((closureN)self_733529)->elements[0];
c_738163.elements[1] = ((closureN)self_733529)->elements[2];


closureN_type c_738176;
object e_738182 [2];
c_738176.hdr.mark = gc_color_red;
 c_738176.hdr.grayed = 0;
c_738176.tag = closureN_tag;
 c_738176.fn = (function_type)__lambda_576;
c_738176.num_args = 1;
c_738176.num_elements = 2;
c_738176.elements = (object *)e_738182;
c_738176.elements[0] = ((closureN)self_733529)->elements[1];
c_738176.elements[1] = ((closureN)self_733529)->elements[4];

return_direct_with_clo1(data,(closure)&c_738163,__lambda_574,  &c_738176);
} else { 
  
closureN_type c_738184;
object e_738197 [1];
c_738184.hdr.mark = gc_color_red;
 c_738184.hdr.grayed = 0;
c_738184.tag = closureN_tag;
 c_738184.fn = (function_type)__lambda_577;
c_738184.num_args = 0;
c_738184.num_elements = 1;
c_738184.elements = (object *)e_738197;
c_738184.elements[0] = ((closureN)self_733529)->elements[0];


closureN_type c_738198;
object e_738375 [5];
c_738198.hdr.mark = gc_color_red;
 c_738198.hdr.grayed = 0;
c_738198.tag = closureN_tag;
 c_738198.fn = (function_type)__lambda_578;
c_738198.num_args = 1;
c_738198.num_elements = 5;
c_738198.elements = (object *)e_738375;
c_738198.elements[0] = ((closureN)self_733529)->elements[0];
c_738198.elements[1] = ((closureN)self_733529)->elements[1];
c_738198.elements[2] = ((closureN)self_733529)->elements[2];
c_738198.elements[3] = ((closureN)self_733529)->elements[3];
c_738198.elements[4] = ((closureN)self_733529)->elements[4];

return_direct_with_clo1(data,(closure)&c_738184,__lambda_577,  &c_738198);}
;; 
}

static void __lambda_578(void *data, object self_733533, int argc, object *args) /* object self_733533, object r_732348 */
 {
 object r_732348 = args[0];
  if( (boolean_f != r_732348) ){ 
  
closureN_type c_738200;
object e_738212 [2];
c_738200.hdr.mark = gc_color_red;
 c_738200.hdr.grayed = 0;
c_738200.tag = closureN_tag;
 c_738200.fn = (function_type)__lambda_579;
c_738200.num_args = 1;
c_738200.num_elements = 2;
c_738200.elements = (object *)e_738212;
c_738200.elements[0] = ((closureN)self_733533)->elements[0];
c_738200.elements[1] = ((closureN)self_733533)->elements[2];


closureN_type c_738213;
object e_738219 [2];
c_738213.hdr.mark = gc_color_red;
 c_738213.hdr.grayed = 0;
c_738213.tag = closureN_tag;
 c_738213.fn = (function_type)__lambda_581;
c_738213.num_args = 1;
c_738213.num_elements = 2;
c_738213.elements = (object *)e_738219;
c_738213.elements[0] = ((closureN)self_733533)->elements[1];
c_738213.elements[1] = ((closureN)self_733533)->elements[4];

return_direct_with_clo1(data,(closure)&c_738200,__lambda_579,  &c_738213);
} else { 
  
closureN_type c_738221;
object e_738234 [1];
c_738221.hdr.mark = gc_color_red;
 c_738221.hdr.grayed = 0;
c_738221.tag = closureN_tag;
 c_738221.fn = (function_type)__lambda_582;
c_738221.num_args = 0;
c_738221.num_elements = 1;
c_738221.elements = (object *)e_738234;
c_738221.elements[0] = ((closureN)self_733533)->elements[0];


closureN_type c_738235;
object e_738374 [5];
c_738235.hdr.mark = gc_color_red;
 c_738235.hdr.grayed = 0;
c_738235.tag = closureN_tag;
 c_738235.fn = (function_type)__lambda_583;
c_738235.num_args = 1;
c_738235.num_elements = 5;
c_738235.elements = (object *)e_738374;
c_738235.elements[0] = ((closureN)self_733533)->elements[0];
c_738235.elements[1] = ((closureN)self_733533)->elements[1];
c_738235.elements[2] = ((closureN)self_733533)->elements[2];
c_738235.elements[3] = ((closureN)self_733533)->elements[3];
c_738235.elements[4] = ((closureN)self_733533)->elements[4];

return_direct_with_clo1(data,(closure)&c_738221,__lambda_582,  &c_738235);}
;; 
}

static void __lambda_583(void *data, object self_733537, int argc, object *args) /* object self_733537, object r_732354 */
 {
 object r_732354 = args[0];
  if( (boolean_f != r_732354) ){ 
  
closureN_type c_738237;
object e_738249 [2];
c_738237.hdr.mark = gc_color_red;
 c_738237.hdr.grayed = 0;
c_738237.tag = closureN_tag;
 c_738237.fn = (function_type)__lambda_584;
c_738237.num_args = 1;
c_738237.num_elements = 2;
c_738237.elements = (object *)e_738249;
c_738237.elements[0] = ((closureN)self_733537)->elements[0];
c_738237.elements[1] = ((closureN)self_733537)->elements[2];


closureN_type c_738250;
object e_738256 [2];
c_738250.hdr.mark = gc_color_red;
 c_738250.hdr.grayed = 0;
c_738250.tag = closureN_tag;
 c_738250.fn = (function_type)__lambda_586;
c_738250.num_args = 1;
c_738250.num_elements = 2;
c_738250.elements = (object *)e_738256;
c_738250.elements[0] = ((closureN)self_733537)->elements[1];
c_738250.elements[1] = ((closureN)self_733537)->elements[4];

return_direct_with_clo1(data,(closure)&c_738237,__lambda_584,  &c_738250);
} else { 
  
closureN_type c_738258;
object e_738271 [1];
c_738258.hdr.mark = gc_color_red;
 c_738258.hdr.grayed = 0;
c_738258.tag = closureN_tag;
 c_738258.fn = (function_type)__lambda_587;
c_738258.num_args = 0;
c_738258.num_elements = 1;
c_738258.elements = (object *)e_738271;
c_738258.elements[0] = ((closureN)self_733537)->elements[0];


closureN_type c_738272;
object e_738373 [5];
c_738272.hdr.mark = gc_color_red;
 c_738272.hdr.grayed = 0;
c_738272.tag = closureN_tag;
 c_738272.fn = (function_type)__lambda_588;
c_738272.num_args = 1;
c_738272.num_elements = 5;
c_738272.elements = (object *)e_738373;
c_738272.elements[0] = ((closureN)self_733537)->elements[0];
c_738272.elements[1] = ((closureN)self_733537)->elements[1];
c_738272.elements[2] = ((closureN)self_733537)->elements[2];
c_738272.elements[3] = ((closureN)self_733537)->elements[3];
c_738272.elements[4] = ((closureN)self_733537)->elements[4];

return_direct_with_clo1(data,(closure)&c_738258,__lambda_587,  &c_738272);}
;; 
}

static void __lambda_588(void *data, object self_733541, int argc, object *args) /* object self_733541, object r_732360 */
 {
 object r_732360 = args[0];
  if( (boolean_f != r_732360) ){ 
  
closureN_type c_738274;
object e_738286 [2];
c_738274.hdr.mark = gc_color_red;
 c_738274.hdr.grayed = 0;
c_738274.tag = closureN_tag;
 c_738274.fn = (function_type)__lambda_589;
c_738274.num_args = 1;
c_738274.num_elements = 2;
c_738274.elements = (object *)e_738286;
c_738274.elements[0] = ((closureN)self_733541)->elements[0];
c_738274.elements[1] = ((closureN)self_733541)->elements[2];


closureN_type c_738287;
object e_738293 [2];
c_738287.hdr.mark = gc_color_red;
 c_738287.hdr.grayed = 0;
c_738287.tag = closureN_tag;
 c_738287.fn = (function_type)__lambda_591;
c_738287.num_args = 1;
c_738287.num_elements = 2;
c_738287.elements = (object *)e_738293;
c_738287.elements[0] = ((closureN)self_733541)->elements[1];
c_738287.elements[1] = ((closureN)self_733541)->elements[4];

return_direct_with_clo1(data,(closure)&c_738274,__lambda_589,  &c_738287);
} else { 
  
closureN_type c_738295;
object e_738308 [1];
c_738295.hdr.mark = gc_color_red;
 c_738295.hdr.grayed = 0;
c_738295.tag = closureN_tag;
 c_738295.fn = (function_type)__lambda_592;
c_738295.num_args = 0;
c_738295.num_elements = 1;
c_738295.elements = (object *)e_738308;
c_738295.elements[0] = ((closureN)self_733541)->elements[0];


closureN_type c_738309;
object e_738372 [5];
c_738309.hdr.mark = gc_color_red;
 c_738309.hdr.grayed = 0;
c_738309.tag = closureN_tag;
 c_738309.fn = (function_type)__lambda_593;
c_738309.num_args = 1;
c_738309.num_elements = 5;
c_738309.elements = (object *)e_738372;
c_738309.elements[0] = ((closureN)self_733541)->elements[0];
c_738309.elements[1] = ((closureN)self_733541)->elements[1];
c_738309.elements[2] = ((closureN)self_733541)->elements[2];
c_738309.elements[3] = ((closureN)self_733541)->elements[3];
c_738309.elements[4] = ((closureN)self_733541)->elements[4];

return_direct_with_clo1(data,(closure)&c_738295,__lambda_592,  &c_738309);}
;; 
}

static void __lambda_593(void *data, object self_733545, int argc, object *args) /* object self_733545, object r_732366 */
 {
 object r_732366 = args[0];
  if( (boolean_f != r_732366) ){ 
  
closureN_type c_738311;
object e_738323 [2];
c_738311.hdr.mark = gc_color_red;
 c_738311.hdr.grayed = 0;
c_738311.tag = closureN_tag;
 c_738311.fn = (function_type)__lambda_594;
c_738311.num_args = 1;
c_738311.num_elements = 2;
c_738311.elements = (object *)e_738323;
c_738311.elements[0] = ((closureN)self_733545)->elements[0];
c_738311.elements[1] = ((closureN)self_733545)->elements[2];


closureN_type c_738324;
object e_738330 [2];
c_738324.hdr.mark = gc_color_red;
 c_738324.hdr.grayed = 0;
c_738324.tag = closureN_tag;
 c_738324.fn = (function_type)__lambda_596;
c_738324.num_args = 1;
c_738324.num_elements = 2;
c_738324.elements = (object *)e_738330;
c_738324.elements[0] = ((closureN)self_733545)->elements[1];
c_738324.elements[1] = ((closureN)self_733545)->elements[4];

return_direct_with_clo1(data,(closure)&c_738311,__lambda_594,  &c_738324);
} else { 
  
closureN_type c_738332;
object e_738345 [1];
c_738332.hdr.mark = gc_color_red;
 c_738332.hdr.grayed = 0;
c_738332.tag = closureN_tag;
 c_738332.fn = (function_type)__lambda_597;
c_738332.num_args = 0;
c_738332.num_elements = 1;
c_738332.elements = (object *)e_738345;
c_738332.elements[0] = ((closureN)self_733545)->elements[0];


closureN_type c_738346;
object e_738371 [5];
c_738346.hdr.mark = gc_color_red;
 c_738346.hdr.grayed = 0;
c_738346.tag = closureN_tag;
 c_738346.fn = (function_type)__lambda_598;
c_738346.num_args = 1;
c_738346.num_elements = 5;
c_738346.elements = (object *)e_738371;
c_738346.elements[0] = ((closureN)self_733545)->elements[0];
c_738346.elements[1] = ((closureN)self_733545)->elements[1];
c_738346.elements[2] = ((closureN)self_733545)->elements[2];
c_738346.elements[3] = ((closureN)self_733545)->elements[3];
c_738346.elements[4] = ((closureN)self_733545)->elements[4];

return_direct_with_clo1(data,(closure)&c_738332,__lambda_597,  &c_738346);}
;; 
}

static void __lambda_598(void *data, object self_733549, int argc, object *args) /* object self_733549, object r_732372 */
 {
 object r_732372 = args[0];
  if( (boolean_f != r_732372) ){ 
  
closureN_type c_738348;
object e_738360 [2];
c_738348.hdr.mark = gc_color_red;
 c_738348.hdr.grayed = 0;
c_738348.tag = closureN_tag;
 c_738348.fn = (function_type)__lambda_599;
c_738348.num_args = 1;
c_738348.num_elements = 2;
c_738348.elements = (object *)e_738360;
c_738348.elements[0] = ((closureN)self_733549)->elements[0];
c_738348.elements[1] = ((closureN)self_733549)->elements[2];


closureN_type c_738361;
object e_738367 [2];
c_738361.hdr.mark = gc_color_red;
 c_738361.hdr.grayed = 0;
c_738361.tag = closureN_tag;
 c_738361.fn = (function_type)__lambda_601;
c_738361.num_args = 1;
c_738361.num_elements = 2;
c_738361.elements = (object *)e_738367;
c_738361.elements[0] = ((closureN)self_733549)->elements[1];
c_738361.elements[1] = ((closureN)self_733549)->elements[4];

return_direct_with_clo1(data,(closure)&c_738348,__lambda_599,  &c_738361);
} else { 
  return_closcall1(data,  ((closureN)self_733549)->elements[3],  ((closureN)self_733549)->elements[2]);}
;; 
}

static void __lambda_601(void *data, object self_733550, int argc, object *args) /* object self_733550, object k_732377, object a_73656_731187 */
 {
 object k_732377 = args[0]; object a_73656_731187 = args[1];
  

return_closcall3(data,  car(((closureN)self_733550)->elements[0]),  k_732377, a_73656_731187, ((closureN)self_733550)->elements[1]);; 
}

static void __lambda_599(void *data, object self_733551, int argc, object *args) /* object self_733551, object r_732375 */
 {
 object r_732375 = args[0];
  
closureN_type c_738350;
object e_738356 [1];
c_738350.hdr.mark = gc_color_red;
 c_738350.hdr.grayed = 0;
c_738350.tag = closureN_tag;
 c_738350.fn = (function_type)__lambda_600;
c_738350.num_args = 1;
c_738350.num_elements = 1;
c_738350.elements = (object *)e_738356;
c_738350.elements[0] = ((closureN)self_733551)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_738350, r_732375, Cyc_cdr(data, ((closureN)self_733551)->elements[0]));; 
}

static void __lambda_600(void *data, object self_733552, int argc, object *args) /* object self_733552, object r_732374 */
 {
 object r_732374 = args[0];
  
pair_type local_738355; 
return_direct_with_clo1(data,  ((closureN)self_733552)->elements[0], (((closure)  ((closureN)self_733552)->elements[0])->fn),  set_pair_as_expr(&local_738355, quote_fast_91string_123_127, r_732374));; 
}

static void __lambda_597(void *data, object self_733553, int argc, object *args) /* object self_733553, object k_732378 */
 {
 object k_732378 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, ((closureN)self_733553)->elements[0]), quote_string_123_127)) ){ 
  



return_direct_with_clo1(data,  k_732378,__lambda_598,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733553)->elements[0]), obj_int2obj(3)));
} else { 
  return_direct_with_clo1(data,  k_732378,__lambda_598,  boolean_f);}
;; 
}

static void __lambda_596(void *data, object self_733546, int argc, object *args) /* object self_733546, object k_732371, object a_73651_731186 */
 {
 object k_732371 = args[0]; object a_73651_731186 = args[1];
  

return_closcall3(data,  car(((closureN)self_733546)->elements[0]),  k_732371, a_73651_731186, ((closureN)self_733546)->elements[1]);; 
}

static void __lambda_594(void *data, object self_733547, int argc, object *args) /* object self_733547, object r_732369 */
 {
 object r_732369 = args[0];
  
closureN_type c_738313;
object e_738319 [1];
c_738313.hdr.mark = gc_color_red;
 c_738313.hdr.grayed = 0;
c_738313.tag = closureN_tag;
 c_738313.fn = (function_type)__lambda_595;
c_738313.num_args = 1;
c_738313.num_elements = 1;
c_738313.elements = (object *)e_738319;
c_738313.elements[0] = ((closureN)self_733547)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_738313, r_732369, Cyc_cdr(data, ((closureN)self_733547)->elements[0]));; 
}

static void __lambda_595(void *data, object self_733548, int argc, object *args) /* object self_733548, object r_732368 */
 {
 object r_732368 = args[0];
  
pair_type local_738318; 
return_direct_with_clo1(data,  ((closureN)self_733548)->elements[0], (((closure)  ((closureN)self_733548)->elements[0])->fn),  set_pair_as_expr(&local_738318, quote_fast_91string_121_127, r_732368));; 
}

static void __lambda_592(void *data, object self_733554, int argc, object *args) /* object self_733554, object k_732383 */
 {
 object k_732383 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, ((closureN)self_733554)->elements[0]), quote_string_121_127)) ){ 
  



return_direct_with_clo1(data,  k_732383,__lambda_593,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733554)->elements[0]), obj_int2obj(3)));
} else { 
  return_direct_with_clo1(data,  k_732383,__lambda_593,  boolean_f);}
;; 
}

static void __lambda_591(void *data, object self_733542, int argc, object *args) /* object self_733542, object k_732365, object a_73646_731185 */
 {
 object k_732365 = args[0]; object a_73646_731185 = args[1];
  

return_closcall3(data,  car(((closureN)self_733542)->elements[0]),  k_732365, a_73646_731185, ((closureN)self_733542)->elements[1]);; 
}

static void __lambda_589(void *data, object self_733543, int argc, object *args) /* object self_733543, object r_732363 */
 {
 object r_732363 = args[0];
  
closureN_type c_738276;
object e_738282 [1];
c_738276.hdr.mark = gc_color_red;
 c_738276.hdr.grayed = 0;
c_738276.tag = closureN_tag;
 c_738276.fn = (function_type)__lambda_590;
c_738276.num_args = 1;
c_738276.num_elements = 1;
c_738276.elements = (object *)e_738282;
c_738276.elements[0] = ((closureN)self_733543)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_738276, r_732363, Cyc_cdr(data, ((closureN)self_733543)->elements[0]));; 
}

static void __lambda_590(void *data, object self_733544, int argc, object *args) /* object self_733544, object r_732362 */
 {
 object r_732362 = args[0];
  
pair_type local_738281; 
return_direct_with_clo1(data,  ((closureN)self_733544)->elements[0], (((closure)  ((closureN)self_733544)->elements[0])->fn),  set_pair_as_expr(&local_738281, quote_fast_91string_121_123_127, r_732362));; 
}

static void __lambda_587(void *data, object self_733555, int argc, object *args) /* object self_733555, object k_732388 */
 {
 object k_732388 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, ((closureN)self_733555)->elements[0]), quote_string_121_123_127)) ){ 
  



return_direct_with_clo1(data,  k_732388,__lambda_588,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733555)->elements[0]), obj_int2obj(3)));
} else { 
  return_direct_with_clo1(data,  k_732388,__lambda_588,  boolean_f);}
;; 
}

static void __lambda_586(void *data, object self_733538, int argc, object *args) /* object self_733538, object k_732359, object a_73641_731184 */
 {
 object k_732359 = args[0]; object a_73641_731184 = args[1];
  

return_closcall3(data,  car(((closureN)self_733538)->elements[0]),  k_732359, a_73641_731184, ((closureN)self_733538)->elements[1]);; 
}

static void __lambda_584(void *data, object self_733539, int argc, object *args) /* object self_733539, object r_732357 */
 {
 object r_732357 = args[0];
  
closureN_type c_738239;
object e_738245 [1];
c_738239.hdr.mark = gc_color_red;
 c_738239.hdr.grayed = 0;
c_738239.tag = closureN_tag;
 c_738239.fn = (function_type)__lambda_585;
c_738239.num_args = 1;
c_738239.num_elements = 1;
c_738239.elements = (object *)e_738245;
c_738239.elements[0] = ((closureN)self_733539)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_738239, r_732357, Cyc_cdr(data, ((closureN)self_733539)->elements[0]));; 
}

static void __lambda_585(void *data, object self_733540, int argc, object *args) /* object self_733540, object r_732356 */
 {
 object r_732356 = args[0];
  
pair_type local_738244; 
return_direct_with_clo1(data,  ((closureN)self_733540)->elements[0], (((closure)  ((closureN)self_733540)->elements[0])->fn),  set_pair_as_expr(&local_738244, quote_fast_91string_125_127, r_732356));; 
}

static void __lambda_582(void *data, object self_733556, int argc, object *args) /* object self_733556, object k_732393 */
 {
 object k_732393 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, ((closureN)self_733556)->elements[0]), quote_string_125_127)) ){ 
  



return_direct_with_clo1(data,  k_732393,__lambda_583,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733556)->elements[0]), obj_int2obj(3)));
} else { 
  return_direct_with_clo1(data,  k_732393,__lambda_583,  boolean_f);}
;; 
}

static void __lambda_581(void *data, object self_733534, int argc, object *args) /* object self_733534, object k_732353, object a_73636_731183 */
 {
 object k_732353 = args[0]; object a_73636_731183 = args[1];
  

return_closcall3(data,  car(((closureN)self_733534)->elements[0]),  k_732353, a_73636_731183, ((closureN)self_733534)->elements[1]);; 
}

static void __lambda_579(void *data, object self_733535, int argc, object *args) /* object self_733535, object r_732351 */
 {
 object r_732351 = args[0];
  
closureN_type c_738202;
object e_738208 [1];
c_738202.hdr.mark = gc_color_red;
 c_738202.hdr.grayed = 0;
c_738202.tag = closureN_tag;
 c_738202.fn = (function_type)__lambda_580;
c_738202.num_args = 1;
c_738202.num_elements = 1;
c_738202.elements = (object *)e_738208;
c_738202.elements[0] = ((closureN)self_733535)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_738202, r_732351, Cyc_cdr(data, ((closureN)self_733535)->elements[0]));; 
}

static void __lambda_580(void *data, object self_733536, int argc, object *args) /* object self_733536, object r_732350 */
 {
 object r_732350 = args[0];
  
pair_type local_738207; 
return_direct_with_clo1(data,  ((closureN)self_733536)->elements[0], (((closure)  ((closureN)self_733536)->elements[0])->fn),  set_pair_as_expr(&local_738207, quote_fast_91string_125_123_127, r_732350));; 
}

static void __lambda_577(void *data, object self_733557, int argc, object *args) /* object self_733557, object k_732398 */
 {
 object k_732398 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, ((closureN)self_733557)->elements[0]), quote_string_125_123_127)) ){ 
  



return_direct_with_clo1(data,  k_732398,__lambda_578,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733557)->elements[0]), obj_int2obj(3)));
} else { 
  return_direct_with_clo1(data,  k_732398,__lambda_578,  boolean_f);}
;; 
}

static void __lambda_576(void *data, object self_733530, int argc, object *args) /* object self_733530, object k_732347, object a_73631_731182 */
 {
 object k_732347 = args[0]; object a_73631_731182 = args[1];
  

return_closcall3(data,  car(((closureN)self_733530)->elements[0]),  k_732347, a_73631_731182, ((closureN)self_733530)->elements[1]);; 
}

static void __lambda_574(void *data, object self_733531, int argc, object *args) /* object self_733531, object r_732345 */
 {
 object r_732345 = args[0];
  
closureN_type c_738165;
object e_738171 [1];
c_738165.hdr.mark = gc_color_red;
 c_738165.hdr.grayed = 0;
c_738165.tag = closureN_tag;
 c_738165.fn = (function_type)__lambda_575;
c_738165.num_args = 1;
c_738165.num_elements = 1;
c_738165.elements = (object *)e_738171;
c_738165.elements[0] = ((closureN)self_733531)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_738165, r_732345, Cyc_cdr(data, ((closureN)self_733531)->elements[0]));; 
}

static void __lambda_575(void *data, object self_733532, int argc, object *args) /* object self_733532, object r_732344 */
 {
 object r_732344 = args[0];
  
pair_type local_738170; 
return_direct_with_clo1(data,  ((closureN)self_733532)->elements[0], (((closure)  ((closureN)self_733532)->elements[0])->fn),  set_pair_as_expr(&local_738170, quote_write_91string_912, r_732344));; 
}

static void __lambda_572(void *data, object self_733558, int argc, object *args) /* object self_733558, object k_732403 */
 {
 object k_732403 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, ((closureN)self_733558)->elements[0]), quote_write_91string)) ){ 
  



return_direct_with_clo1(data,  k_732403,__lambda_573,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733558)->elements[0]), obj_int2obj(3)));
} else { 
  return_direct_with_clo1(data,  k_732403,__lambda_573,  boolean_f);}
;; 
}

static void __lambda_571(void *data, object self_733526, int argc, object *args) /* object self_733526, object k_732341, object a_73626_731181 */
 {
 object k_732341 = args[0]; object a_73626_731181 = args[1];
  

return_closcall3(data,  car(((closureN)self_733526)->elements[0]),  k_732341, a_73626_731181, ((closureN)self_733526)->elements[1]);; 
}

static void __lambda_569(void *data, object self_733527, int argc, object *args) /* object self_733527, object r_732339 */
 {
 object r_732339 = args[0];
  
closureN_type c_738128;
object e_738134 [1];
c_738128.hdr.mark = gc_color_red;
 c_738128.hdr.grayed = 0;
c_738128.tag = closureN_tag;
 c_738128.fn = (function_type)__lambda_570;
c_738128.num_args = 1;
c_738128.num_elements = 1;
c_738128.elements = (object *)e_738134;
c_738128.elements[0] = ((closureN)self_733527)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_738128, r_732339, Cyc_cdr(data, ((closureN)self_733527)->elements[0]));; 
}

static void __lambda_570(void *data, object self_733528, int argc, object *args) /* object self_733528, object r_732338 */
 {
 object r_732338 = args[0];
  
pair_type local_738133; 
return_direct_with_clo1(data,  ((closureN)self_733528)->elements[0], (((closure)  ((closureN)self_733528)->elements[0])->fn),  set_pair_as_expr(&local_738133, quote_write_91string_911, r_732338));; 
}

static void __lambda_567(void *data, object self_733559, int argc, object *args) /* object self_733559, object k_732408 */
 {
 object k_732408 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, ((closureN)self_733559)->elements[0]), quote_write_91string)) ){ 
  



return_direct_with_clo1(data,  k_732408,__lambda_568,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733559)->elements[0]), obj_int2obj(2)));
} else { 
  return_direct_with_clo1(data,  k_732408,__lambda_568,  boolean_f);}
;; 
}

static void __lambda_566(void *data, object self_733522, int argc, object *args) /* object self_733522, object k_732335, object a_73621_731180 */
 {
 object k_732335 = args[0]; object a_73621_731180 = args[1];
  

return_closcall3(data,  car(((closureN)self_733522)->elements[0]),  k_732335, a_73621_731180, ((closureN)self_733522)->elements[1]);; 
}

static void __lambda_564(void *data, object self_733523, int argc, object *args) /* object self_733523, object r_732333 */
 {
 object r_732333 = args[0];
  
closureN_type c_738091;
object e_738097 [1];
c_738091.hdr.mark = gc_color_red;
 c_738091.hdr.grayed = 0;
c_738091.tag = closureN_tag;
 c_738091.fn = (function_type)__lambda_565;
c_738091.num_args = 1;
c_738091.num_elements = 1;
c_738091.elements = (object *)e_738097;
c_738091.elements[0] = ((closureN)self_733523)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_738091, r_732333, Cyc_cdr(data, ((closureN)self_733523)->elements[0]));; 
}

static void __lambda_565(void *data, object self_733524, int argc, object *args) /* object self_733524, object r_732332 */
 {
 object r_732332 = args[0];
  
pair_type local_738096; 
return_direct_with_clo1(data,  ((closureN)self_733524)->elements[0], (((closure)  ((closureN)self_733524)->elements[0])->fn),  set_pair_as_expr(&local_738096, quote_Cyc_91map_91loop_912, r_732332));; 
}

static void __lambda_562(void *data, object self_733560, int argc, object *args) /* object self_733560, object k_732413 */
 {
 object k_732413 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, ((closureN)self_733560)->elements[0]), quote_map)) ){ 
  



return_direct_with_clo1(data,  k_732413,__lambda_563,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733560)->elements[0]), obj_int2obj(4)));
} else { 
  return_direct_with_clo1(data,  k_732413,__lambda_563,  boolean_f);}
;; 
}

static void __lambda_561(void *data, object self_733518, int argc, object *args) /* object self_733518, object k_732329, object a_73616_731179 */
 {
 object k_732329 = args[0]; object a_73616_731179 = args[1];
  

return_closcall3(data,  car(((closureN)self_733518)->elements[0]),  k_732329, a_73616_731179, ((closureN)self_733518)->elements[1]);; 
}

static void __lambda_559(void *data, object self_733519, int argc, object *args) /* object self_733519, object r_732327 */
 {
 object r_732327 = args[0];
  
closureN_type c_738054;
object e_738060 [1];
c_738054.hdr.mark = gc_color_red;
 c_738054.hdr.grayed = 0;
c_738054.tag = closureN_tag;
 c_738054.fn = (function_type)__lambda_560;
c_738054.num_args = 1;
c_738054.num_elements = 1;
c_738054.elements = (object *)e_738060;
c_738054.elements[0] = ((closureN)self_733519)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_738054, r_732327, Cyc_cdr(data, ((closureN)self_733519)->elements[0]));; 
}

static void __lambda_560(void *data, object self_733520, int argc, object *args) /* object self_733520, object r_732326 */
 {
 object r_732326 = args[0];
  
pair_type local_738059; 
return_direct_with_clo1(data,  ((closureN)self_733520)->elements[0], (((closure)  ((closureN)self_733520)->elements[0])->fn),  set_pair_as_expr(&local_738059, quote_Cyc_91map_91loop_911, r_732326));; 
}

static void __lambda_557(void *data, object self_733561, int argc, object *args) /* object self_733561, object k_732418 */
 {
 object k_732418 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, ((closureN)self_733561)->elements[0]), quote_map)) ){ 
  



return_direct_with_clo1(data,  k_732418,__lambda_558,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733561)->elements[0]), obj_int2obj(3)));
} else { 
  return_direct_with_clo1(data,  k_732418,__lambda_558,  boolean_f);}
;; 
}

static void __lambda_556(void *data, object self_733514, int argc, object *args) /* object self_733514, object k_732323, object a_73611_731178 */
 {
 object k_732323 = args[0]; object a_73611_731178 = args[1];
  

return_closcall3(data,  car(((closureN)self_733514)->elements[0]),  k_732323, a_73611_731178, ((closureN)self_733514)->elements[1]);; 
}

static void __lambda_554(void *data, object self_733515, int argc, object *args) /* object self_733515, object r_732321 */
 {
 object r_732321 = args[0];
  
closureN_type c_738017;
object e_738023 [1];
c_738017.hdr.mark = gc_color_red;
 c_738017.hdr.grayed = 0;
c_738017.tag = closureN_tag;
 c_738017.fn = (function_type)__lambda_555;
c_738017.num_args = 1;
c_738017.num_elements = 1;
c_738017.elements = (object *)e_738023;
c_738017.elements[0] = ((closureN)self_733515)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_738017, r_732321, Cyc_cdr(data, ((closureN)self_733515)->elements[0]));; 
}

static void __lambda_555(void *data, object self_733516, int argc, object *args) /* object self_733516, object r_732320 */
 {
 object r_732320 = args[0];
  
pair_type local_738022; 
return_direct_with_clo1(data,  ((closureN)self_733516)->elements[0], (((closure)  ((closureN)self_733516)->elements[0])->fn),  set_pair_as_expr(&local_738022, quote_Cyc_91for_91each_91loop_912, r_732320));; 
}

static void __lambda_552(void *data, object self_733562, int argc, object *args) /* object self_733562, object k_732423 */
 {
 object k_732423 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, ((closureN)self_733562)->elements[0]), quote_for_91each)) ){ 
  



return_direct_with_clo1(data,  k_732423,__lambda_553,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733562)->elements[0]), obj_int2obj(4)));
} else { 
  return_direct_with_clo1(data,  k_732423,__lambda_553,  boolean_f);}
;; 
}

static void __lambda_551(void *data, object self_733510, int argc, object *args) /* object self_733510, object k_732317, object a_73606_731177 */
 {
 object k_732317 = args[0]; object a_73606_731177 = args[1];
  

return_closcall3(data,  car(((closureN)self_733510)->elements[0]),  k_732317, a_73606_731177, ((closureN)self_733510)->elements[1]);; 
}

static void __lambda_549(void *data, object self_733511, int argc, object *args) /* object self_733511, object r_732315 */
 {
 object r_732315 = args[0];
  
closureN_type c_737980;
object e_737986 [1];
c_737980.hdr.mark = gc_color_red;
 c_737980.hdr.grayed = 0;
c_737980.tag = closureN_tag;
 c_737980.fn = (function_type)__lambda_550;
c_737980.num_args = 1;
c_737980.num_elements = 1;
c_737980.elements = (object *)e_737986;
c_737980.elements[0] = ((closureN)self_733511)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_737980, r_732315, Cyc_cdr(data, ((closureN)self_733511)->elements[0]));; 
}

static void __lambda_550(void *data, object self_733512, int argc, object *args) /* object self_733512, object r_732314 */
 {
 object r_732314 = args[0];
  
pair_type local_737985; 
return_direct_with_clo1(data,  ((closureN)self_733512)->elements[0], (((closure)  ((closureN)self_733512)->elements[0])->fn),  set_pair_as_expr(&local_737985, quote_Cyc_91for_91each_91loop_911, r_732314));; 
}

static void __lambda_547(void *data, object self_733563, int argc, object *args) /* object self_733563, object k_732428 */
 {
 object k_732428 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, ((closureN)self_733563)->elements[0]), quote_for_91each)) ){ 
  



return_direct_with_clo1(data,  k_732428,__lambda_548,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733563)->elements[0]), obj_int2obj(3)));
} else { 
  return_direct_with_clo1(data,  k_732428,__lambda_548,  boolean_f);}
;; 
}

static void __lambda_546(void *data, object self_733506, int argc, object *args) /* object self_733506, object k_732311, object a_73601_731176 */
 {
 object k_732311 = args[0]; object a_73601_731176 = args[1];
  

return_closcall3(data,  car(((closureN)self_733506)->elements[0]),  k_732311, a_73601_731176, ((closureN)self_733506)->elements[1]);; 
}

static void __lambda_544(void *data, object self_733507, int argc, object *args) /* object self_733507, object r_732309 */
 {
 object r_732309 = args[0];
  
closureN_type c_737943;
object e_737949 [1];
c_737943.hdr.mark = gc_color_red;
 c_737943.hdr.grayed = 0;
c_737943.tag = closureN_tag;
 c_737943.fn = (function_type)__lambda_545;
c_737943.num_args = 1;
c_737943.num_elements = 1;
c_737943.elements = (object *)e_737949;
c_737943.elements[0] = ((closureN)self_733507)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_737943, r_732309, Cyc_cdr(data, ((closureN)self_733507)->elements[0]));; 
}

static void __lambda_545(void *data, object self_733508, int argc, object *args) /* object self_733508, object r_732308 */
 {
 object r_732308 = args[0];
  
pair_type local_737948; 
return_direct_with_clo1(data,  ((closureN)self_733508)->elements[0], (((closure)  ((closureN)self_733508)->elements[0])->fn),  set_pair_as_expr(&local_737948, quote_Cyc_91fast_91list_914, r_732308));; 
}

static void __lambda_542(void *data, object self_733564, int argc, object *args) /* object self_733564, object k_732433 */
 {
 object k_732433 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, ((closureN)self_733564)->elements[0]), quote__list)) ){ 
  



return_direct_with_clo1(data,  k_732433,__lambda_543,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733564)->elements[0]), obj_int2obj(5)));
} else { 
  return_direct_with_clo1(data,  k_732433,__lambda_543,  boolean_f);}
;; 
}

static void __lambda_541(void *data, object self_733502, int argc, object *args) /* object self_733502, object k_732305, object a_73596_731175 */
 {
 object k_732305 = args[0]; object a_73596_731175 = args[1];
  

return_closcall3(data,  car(((closureN)self_733502)->elements[0]),  k_732305, a_73596_731175, ((closureN)self_733502)->elements[1]);; 
}

static void __lambda_539(void *data, object self_733503, int argc, object *args) /* object self_733503, object r_732303 */
 {
 object r_732303 = args[0];
  
closureN_type c_737906;
object e_737912 [1];
c_737906.hdr.mark = gc_color_red;
 c_737906.hdr.grayed = 0;
c_737906.tag = closureN_tag;
 c_737906.fn = (function_type)__lambda_540;
c_737906.num_args = 1;
c_737906.num_elements = 1;
c_737906.elements = (object *)e_737912;
c_737906.elements[0] = ((closureN)self_733503)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_737906, r_732303, Cyc_cdr(data, ((closureN)self_733503)->elements[0]));; 
}

static void __lambda_540(void *data, object self_733504, int argc, object *args) /* object self_733504, object r_732302 */
 {
 object r_732302 = args[0];
  
pair_type local_737911; 
return_direct_with_clo1(data,  ((closureN)self_733504)->elements[0], (((closure)  ((closureN)self_733504)->elements[0])->fn),  set_pair_as_expr(&local_737911, quote_Cyc_91fast_91list_913, r_732302));; 
}

static void __lambda_537(void *data, object self_733565, int argc, object *args) /* object self_733565, object k_732438 */
 {
 object k_732438 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, ((closureN)self_733565)->elements[0]), quote__list)) ){ 
  



return_direct_with_clo1(data,  k_732438,__lambda_538,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733565)->elements[0]), obj_int2obj(4)));
} else { 
  return_direct_with_clo1(data,  k_732438,__lambda_538,  boolean_f);}
;; 
}

static void __lambda_536(void *data, object self_733498, int argc, object *args) /* object self_733498, object k_732299, object a_73591_731174 */
 {
 object k_732299 = args[0]; object a_73591_731174 = args[1];
  

return_closcall3(data,  car(((closureN)self_733498)->elements[0]),  k_732299, a_73591_731174, ((closureN)self_733498)->elements[1]);; 
}

static void __lambda_534(void *data, object self_733499, int argc, object *args) /* object self_733499, object r_732297 */
 {
 object r_732297 = args[0];
  
closureN_type c_737869;
object e_737875 [1];
c_737869.hdr.mark = gc_color_red;
 c_737869.hdr.grayed = 0;
c_737869.tag = closureN_tag;
 c_737869.fn = (function_type)__lambda_535;
c_737869.num_args = 1;
c_737869.num_elements = 1;
c_737869.elements = (object *)e_737875;
c_737869.elements[0] = ((closureN)self_733499)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_737869, r_732297, Cyc_cdr(data, ((closureN)self_733499)->elements[0]));; 
}

static void __lambda_535(void *data, object self_733500, int argc, object *args) /* object self_733500, object r_732296 */
 {
 object r_732296 = args[0];
  
pair_type local_737874; 
return_direct_with_clo1(data,  ((closureN)self_733500)->elements[0], (((closure)  ((closureN)self_733500)->elements[0])->fn),  set_pair_as_expr(&local_737874, quote_Cyc_91fast_91list_912, r_732296));; 
}

static void __lambda_532(void *data, object self_733566, int argc, object *args) /* object self_733566, object k_732443 */
 {
 object k_732443 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, ((closureN)self_733566)->elements[0]), quote__list)) ){ 
  



return_direct_with_clo1(data,  k_732443,__lambda_533,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733566)->elements[0]), obj_int2obj(3)));
} else { 
  return_direct_with_clo1(data,  k_732443,__lambda_533,  boolean_f);}
;; 
}

static void __lambda_531(void *data, object self_733494, int argc, object *args) /* object self_733494, object k_732293, object a_73586_731173 */
 {
 object k_732293 = args[0]; object a_73586_731173 = args[1];
  

return_closcall3(data,  car(((closureN)self_733494)->elements[0]),  k_732293, a_73586_731173, ((closureN)self_733494)->elements[1]);; 
}

static void __lambda_529(void *data, object self_733495, int argc, object *args) /* object self_733495, object r_732291 */
 {
 object r_732291 = args[0];
  
closureN_type c_737832;
object e_737838 [1];
c_737832.hdr.mark = gc_color_red;
 c_737832.hdr.grayed = 0;
c_737832.tag = closureN_tag;
 c_737832.fn = (function_type)__lambda_530;
c_737832.num_args = 1;
c_737832.num_elements = 1;
c_737832.elements = (object *)e_737838;
c_737832.elements[0] = ((closureN)self_733495)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_737832, r_732291, Cyc_cdr(data, ((closureN)self_733495)->elements[0]));; 
}

static void __lambda_530(void *data, object self_733496, int argc, object *args) /* object self_733496, object r_732290 */
 {
 object r_732290 = args[0];
  
pair_type local_737837; 
return_direct_with_clo1(data,  ((closureN)self_733496)->elements[0], (((closure)  ((closureN)self_733496)->elements[0])->fn),  set_pair_as_expr(&local_737837, quote_Cyc_91fast_91list_911, r_732290));; 
}

static void __lambda_527(void *data, object self_733567, int argc, object *args) /* object self_733567, object k_732448 */
 {
 object k_732448 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, ((closureN)self_733567)->elements[0]), quote__list)) ){ 
  



return_direct_with_clo1(data,  k_732448,__lambda_528,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733567)->elements[0]), obj_int2obj(2)));
} else { 
  return_direct_with_clo1(data,  k_732448,__lambda_528,  boolean_f);}
;; 
}

static void __lambda_526(void *data, object self_733490, int argc, object *args) /* object self_733490, object k_732287, object a_73581_731172 */
 {
 object k_732287 = args[0]; object a_73581_731172 = args[1];
  

return_closcall3(data,  car(((closureN)self_733490)->elements[0]),  k_732287, a_73581_731172, ((closureN)self_733490)->elements[1]);; 
}

static void __lambda_524(void *data, object self_733491, int argc, object *args) /* object self_733491, object r_732285 */
 {
 object r_732285 = args[0];
  
closureN_type c_737795;
object e_737801 [1];
c_737795.hdr.mark = gc_color_red;
 c_737795.hdr.grayed = 0;
c_737795.tag = closureN_tag;
 c_737795.fn = (function_type)__lambda_525;
c_737795.num_args = 1;
c_737795.num_elements = 1;
c_737795.elements = (object *)e_737801;
c_737795.elements[0] = ((closureN)self_733491)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_737795, r_732285, Cyc_cdr(data, ((closureN)self_733491)->elements[0]));; 
}

static void __lambda_525(void *data, object self_733492, int argc, object *args) /* object self_733492, object r_732284 */
 {
 object r_732284 = args[0];
  
pair_type local_737800; 
return_direct_with_clo1(data,  ((closureN)self_733492)->elements[0], (((closure)  ((closureN)self_733492)->elements[0])->fn),  set_pair_as_expr(&local_737800, quote_Cyc_91fast_91vector_915, r_732284));; 
}

static void __lambda_522(void *data, object self_733568, int argc, object *args) /* object self_733568, object k_732453 */
 {
 object k_732453 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, ((closureN)self_733568)->elements[0]), quote_vector)) ){ 
  



return_direct_with_clo1(data,  k_732453,__lambda_523,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733568)->elements[0]), obj_int2obj(6)));
} else { 
  return_direct_with_clo1(data,  k_732453,__lambda_523,  boolean_f);}
;; 
}

static void __lambda_521(void *data, object self_733486, int argc, object *args) /* object self_733486, object k_732281, object a_73576_731171 */
 {
 object k_732281 = args[0]; object a_73576_731171 = args[1];
  

return_closcall3(data,  car(((closureN)self_733486)->elements[0]),  k_732281, a_73576_731171, ((closureN)self_733486)->elements[1]);; 
}

static void __lambda_519(void *data, object self_733487, int argc, object *args) /* object self_733487, object r_732279 */
 {
 object r_732279 = args[0];
  
closureN_type c_737758;
object e_737764 [1];
c_737758.hdr.mark = gc_color_red;
 c_737758.hdr.grayed = 0;
c_737758.tag = closureN_tag;
 c_737758.fn = (function_type)__lambda_520;
c_737758.num_args = 1;
c_737758.num_elements = 1;
c_737758.elements = (object *)e_737764;
c_737758.elements[0] = ((closureN)self_733487)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_737758, r_732279, Cyc_cdr(data, ((closureN)self_733487)->elements[0]));; 
}

static void __lambda_520(void *data, object self_733488, int argc, object *args) /* object self_733488, object r_732278 */
 {
 object r_732278 = args[0];
  
pair_type local_737763; 
return_direct_with_clo1(data,  ((closureN)self_733488)->elements[0], (((closure)  ((closureN)self_733488)->elements[0])->fn),  set_pair_as_expr(&local_737763, quote_Cyc_91fast_91vector_914, r_732278));; 
}

static void __lambda_517(void *data, object self_733569, int argc, object *args) /* object self_733569, object k_732458 */
 {
 object k_732458 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, ((closureN)self_733569)->elements[0]), quote_vector)) ){ 
  



return_direct_with_clo1(data,  k_732458,__lambda_518,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733569)->elements[0]), obj_int2obj(5)));
} else { 
  return_direct_with_clo1(data,  k_732458,__lambda_518,  boolean_f);}
;; 
}

static void __lambda_516(void *data, object self_733482, int argc, object *args) /* object self_733482, object k_732275, object a_73571_731170 */
 {
 object k_732275 = args[0]; object a_73571_731170 = args[1];
  

return_closcall3(data,  car(((closureN)self_733482)->elements[0]),  k_732275, a_73571_731170, ((closureN)self_733482)->elements[1]);; 
}

static void __lambda_514(void *data, object self_733483, int argc, object *args) /* object self_733483, object r_732273 */
 {
 object r_732273 = args[0];
  
closureN_type c_737721;
object e_737727 [1];
c_737721.hdr.mark = gc_color_red;
 c_737721.hdr.grayed = 0;
c_737721.tag = closureN_tag;
 c_737721.fn = (function_type)__lambda_515;
c_737721.num_args = 1;
c_737721.num_elements = 1;
c_737721.elements = (object *)e_737727;
c_737721.elements[0] = ((closureN)self_733483)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_737721, r_732273, Cyc_cdr(data, ((closureN)self_733483)->elements[0]));; 
}

static void __lambda_515(void *data, object self_733484, int argc, object *args) /* object self_733484, object r_732272 */
 {
 object r_732272 = args[0];
  
pair_type local_737726; 
return_direct_with_clo1(data,  ((closureN)self_733484)->elements[0], (((closure)  ((closureN)self_733484)->elements[0])->fn),  set_pair_as_expr(&local_737726, quote_Cyc_91fast_91vector_913, r_732272));; 
}

static void __lambda_512(void *data, object self_733570, int argc, object *args) /* object self_733570, object k_732463 */
 {
 object k_732463 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, ((closureN)self_733570)->elements[0]), quote_vector)) ){ 
  



return_direct_with_clo1(data,  k_732463,__lambda_513,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733570)->elements[0]), obj_int2obj(4)));
} else { 
  return_direct_with_clo1(data,  k_732463,__lambda_513,  boolean_f);}
;; 
}

static void __lambda_511(void *data, object self_733478, int argc, object *args) /* object self_733478, object k_732269, object a_73566_731169 */
 {
 object k_732269 = args[0]; object a_73566_731169 = args[1];
  

return_closcall3(data,  car(((closureN)self_733478)->elements[0]),  k_732269, a_73566_731169, ((closureN)self_733478)->elements[1]);; 
}

static void __lambda_509(void *data, object self_733479, int argc, object *args) /* object self_733479, object r_732267 */
 {
 object r_732267 = args[0];
  
closureN_type c_737684;
object e_737690 [1];
c_737684.hdr.mark = gc_color_red;
 c_737684.hdr.grayed = 0;
c_737684.tag = closureN_tag;
 c_737684.fn = (function_type)__lambda_510;
c_737684.num_args = 1;
c_737684.num_elements = 1;
c_737684.elements = (object *)e_737690;
c_737684.elements[0] = ((closureN)self_733479)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_737684, r_732267, Cyc_cdr(data, ((closureN)self_733479)->elements[0]));; 
}

static void __lambda_510(void *data, object self_733480, int argc, object *args) /* object self_733480, object r_732266 */
 {
 object r_732266 = args[0];
  
pair_type local_737689; 
return_direct_with_clo1(data,  ((closureN)self_733480)->elements[0], (((closure)  ((closureN)self_733480)->elements[0])->fn),  set_pair_as_expr(&local_737689, quote_Cyc_91fast_91vector_912, r_732266));; 
}

static void __lambda_507(void *data, object self_733571, int argc, object *args) /* object self_733571, object k_732468 */
 {
 object k_732468 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, ((closureN)self_733571)->elements[0]), quote_vector)) ){ 
  



return_direct_with_clo1(data,  k_732468,__lambda_508,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733571)->elements[0]), obj_int2obj(3)));
} else { 
  return_direct_with_clo1(data,  k_732468,__lambda_508,  boolean_f);}
;; 
}

static void __lambda_506(void *data, object self_733474, int argc, object *args) /* object self_733474, object k_732263, object a_73561_731168 */
 {
 object k_732263 = args[0]; object a_73561_731168 = args[1];
  

return_closcall3(data,  car(((closureN)self_733474)->elements[0]),  k_732263, a_73561_731168, ((closureN)self_733474)->elements[1]);; 
}

static void __lambda_504(void *data, object self_733475, int argc, object *args) /* object self_733475, object r_732261 */
 {
 object r_732261 = args[0];
  
closureN_type c_737647;
object e_737653 [1];
c_737647.hdr.mark = gc_color_red;
 c_737647.hdr.grayed = 0;
c_737647.tag = closureN_tag;
 c_737647.fn = (function_type)__lambda_505;
c_737647.num_args = 1;
c_737647.num_elements = 1;
c_737647.elements = (object *)e_737653;
c_737647.elements[0] = ((closureN)self_733475)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_737647, r_732261, Cyc_cdr(data, ((closureN)self_733475)->elements[0]));; 
}

static void __lambda_505(void *data, object self_733476, int argc, object *args) /* object self_733476, object r_732260 */
 {
 object r_732260 = args[0];
  
pair_type local_737652; 
return_direct_with_clo1(data,  ((closureN)self_733476)->elements[0], (((closure)  ((closureN)self_733476)->elements[0])->fn),  set_pair_as_expr(&local_737652, quote_Cyc_91fast_91assoc, r_732260));; 
}

static void __lambda_502(void *data, object self_733572, int argc, object *args) /* object self_733572, object k_732473 */
 {
 object k_732473 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, ((closureN)self_733572)->elements[0]), quote_assoc)) ){ 
  



return_direct_with_clo1(data,  k_732473,__lambda_503,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733572)->elements[0]), obj_int2obj(3)));
} else { 
  return_direct_with_clo1(data,  k_732473,__lambda_503,  boolean_f);}
;; 
}

static void __lambda_501(void *data, object self_733470, int argc, object *args) /* object self_733470, object k_732257, object a_73556_731167 */
 {
 object k_732257 = args[0]; object a_73556_731167 = args[1];
  

return_closcall3(data,  car(((closureN)self_733470)->elements[0]),  k_732257, a_73556_731167, ((closureN)self_733470)->elements[1]);; 
}

static void __lambda_499(void *data, object self_733471, int argc, object *args) /* object self_733471, object r_732255 */
 {
 object r_732255 = args[0];
  
closureN_type c_737610;
object e_737616 [1];
c_737610.hdr.mark = gc_color_red;
 c_737610.hdr.grayed = 0;
c_737610.tag = closureN_tag;
 c_737610.fn = (function_type)__lambda_500;
c_737610.num_args = 1;
c_737610.num_elements = 1;
c_737610.elements = (object *)e_737616;
c_737610.elements[0] = ((closureN)self_733471)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_737610, r_732255, Cyc_cdr(data, ((closureN)self_733471)->elements[0]));; 
}

static void __lambda_500(void *data, object self_733472, int argc, object *args) /* object self_733472, object r_732254 */
 {
 object r_732254 = args[0];
  
pair_type local_737615; 
return_direct_with_clo1(data,  ((closureN)self_733472)->elements[0], (((closure)  ((closureN)self_733472)->elements[0])->fn),  set_pair_as_expr(&local_737615, quote_Cyc_91fast_91member, r_732254));; 
}

static void __lambda_473(void *data, object self_733441, int argc, object *args) /* object self_733441, object args_73522_731157 */
 {
 object args_73522_731157 = args[0];
  
closureN_type c_737465;
object e_737581 [8];
c_737465.hdr.mark = gc_color_red;
 c_737465.hdr.grayed = 0;
c_737465.tag = closureN_tag;
 c_737465.fn = (function_type)__lambda_474;
c_737465.num_args = 1;
c_737465.num_elements = 8;
c_737465.elements = (object *)e_737581;
c_737465.elements[0] = args_73522_731157;
c_737465.elements[1] = ((closureN)self_733441)->elements[0];
c_737465.elements[2] = ((closureN)self_733441)->elements[1];
c_737465.elements[3] = ((closureN)self_733441)->elements[2];
c_737465.elements[4] = ((closureN)self_733441)->elements[3];
c_737465.elements[5] = ((closureN)self_733441)->elements[4];
c_737465.elements[6] = ((closureN)self_733441)->elements[5];
c_737465.elements[7] = ((closureN)self_733441)->elements[6];

return_direct_with_clo2(data,  __glo_lambda_91formals_91type_scheme_cyclone_util, (((closure)  __glo_lambda_91formals_91type_scheme_cyclone_util)->fn),  &c_737465, ((closureN)self_733441)->elements[0]);; 
}

static void __lambda_474(void *data, object self_733442, int argc, object *args) /* object self_733442, object ltype_73525_731158 */
 {
 object ltype_73525_731158 = args[0];
  
closureN_type c_737467;
object e_737570 [9];
c_737467.hdr.mark = gc_color_red;
 c_737467.hdr.grayed = 0;
c_737467.tag = closureN_tag;
 c_737467.fn = (function_type)__lambda_475;
c_737467.num_args = 1;
c_737467.num_elements = 9;
c_737467.elements = (object *)e_737570;
c_737467.elements[0] = ((closureN)self_733442)->elements[0];
c_737467.elements[1] = ((closureN)self_733442)->elements[1];
c_737467.elements[2] = ((closureN)self_733442)->elements[2];
c_737467.elements[3] = ((closureN)self_733442)->elements[3];
c_737467.elements[4] = ((closureN)self_733442)->elements[4];
c_737467.elements[5] = ((closureN)self_733442)->elements[5];
c_737467.elements[6] = ltype_73525_731158;
c_737467.elements[7] = ((closureN)self_733442)->elements[6];
c_737467.elements[8] = ((closureN)self_733442)->elements[7];


mclosure0(c_737571, (function_type)__lambda_494);c_737571.num_args = 1;
return_direct_with_clo1(data,(closure)&c_737467,__lambda_475,  &c_737571);; 
}

static void __lambda_494(void *data, object self_733443, int argc, object *args) /* object self_733443, object k_732247, object a_73544_731165 */
 {
 object k_732247 = args[0]; object a_73544_731165 = args[1];
  
closureN_type c_737573;
object e_737580 [2];
c_737573.hdr.mark = gc_color_red;
 c_737573.hdr.grayed = 0;
c_737573.tag = closureN_tag;
 c_737573.fn = (function_type)__lambda_495;
c_737573.num_args = 1;
c_737573.num_elements = 2;
c_737573.elements = (object *)e_737580;
c_737573.elements[0] = a_73544_731165;
c_737573.elements[1] = k_732247;

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_737573, a_73544_731165);; 
}

static void __lambda_495(void *data, object self_733444, int argc, object *args) /* object self_733444, object r_732248 */
 {
 object r_732248 = args[0];
  
pair_type local_737578; 
return_direct_with_clo1(data,  ((closureN)self_733444)->elements[1], (((closure)  ((closureN)self_733444)->elements[1])->fn),  set_pair_as_expr(&local_737578, ((closureN)self_733444)->elements[0], r_732248));; 
}

static void __lambda_475(void *data, object self_733445, int argc, object *args) /* object self_733445, object r_732246 */
 {
 object r_732246 = args[0];
  
closureN_type c_737469;
object e_737568 [9];
c_737469.hdr.mark = gc_color_red;
 c_737469.hdr.grayed = 0;
c_737469.tag = closureN_tag;
 c_737469.fn = (function_type)__lambda_476;
c_737469.num_args = 1;
c_737469.num_elements = 9;
c_737469.elements = (object *)e_737568;
c_737469.elements[0] = ((closureN)self_733445)->elements[0];
c_737469.elements[1] = ((closureN)self_733445)->elements[1];
c_737469.elements[2] = ((closureN)self_733445)->elements[2];
c_737469.elements[3] = ((closureN)self_733445)->elements[3];
c_737469.elements[4] = ((closureN)self_733445)->elements[4];
c_737469.elements[5] = ((closureN)self_733445)->elements[5];
c_737469.elements[6] = ((closureN)self_733445)->elements[6];
c_737469.elements[7] = ((closureN)self_733445)->elements[7];
c_737469.elements[8] = ((closureN)self_733445)->elements[8];

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_737469, r_732246, ((closureN)self_733445)->elements[0]);; 
}

static void __lambda_476(void *data, object self_733446, int argc, object *args) /* object self_733446, object a_91lookup_73528_731159 */
 {
 object a_91lookup_73528_731159 = args[0];
  


closureN_type c_737474;
object e_737563 [9];
c_737474.hdr.mark = gc_color_red;
 c_737474.hdr.grayed = 0;
c_737474.tag = closureN_tag;
 c_737474.fn = (function_type)__lambda_477;
c_737474.num_args = 1;
c_737474.num_elements = 9;
c_737474.elements = (object *)e_737563;
c_737474.elements[0] = a_91lookup_73528_731159;
c_737474.elements[1] = ((closureN)self_733446)->elements[0];
c_737474.elements[2] = ((closureN)self_733446)->elements[1];
c_737474.elements[3] = ((closureN)self_733446)->elements[2];
c_737474.elements[4] = ((closureN)self_733446)->elements[4];
c_737474.elements[5] = ((closureN)self_733446)->elements[5];
c_737474.elements[6] = ((closureN)self_733446)->elements[6];
c_737474.elements[7] = ((closureN)self_733446)->elements[7];
c_737474.elements[8] = ((closureN)self_733446)->elements[8];


complex_num_type local_737566; 
return_closcall2(data,  car(((closureN)self_733446)->elements[3]),  &c_737474, ((inline_function_type)
                   ((closure)__glo_lambda_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_737566, ((closureN)self_733446)->elements[1]));; 
}

static void __lambda_477(void *data, object self_733447, int argc, object *args) /* object self_733447, object define_91vars_73534_731161 */
 {
 object define_91vars_73534_731161 = args[0];
  


closureN_type c_737479;
object e_737562 [8];
c_737479.hdr.mark = gc_color_red;
 c_737479.hdr.grayed = 0;
c_737479.tag = closureN_tag;
 c_737479.fn = (function_type)__lambda_478;
c_737479.num_args = 1;
c_737479.num_elements = 8;
c_737479.elements = (object *)e_737562;
c_737479.elements[0] = ((closureN)self_733447)->elements[0];
c_737479.elements[1] = ((closureN)self_733447)->elements[1];
c_737479.elements[2] = ((closureN)self_733447)->elements[2];
c_737479.elements[3] = ((closureN)self_733447)->elements[3];
c_737479.elements[4] = ((closureN)self_733447)->elements[4];
c_737479.elements[5] = ((closureN)self_733447)->elements[5];
c_737479.elements[6] = ((closureN)self_733447)->elements[6];
c_737479.elements[7] = ((closureN)self_733447)->elements[8];

return_closcall2(data,  car(((closureN)self_733447)->elements[7]),  &c_737479, define_91vars_73534_731161);; 
}

static void __lambda_478(void *data, object self_733448, int argc, object *args) /* object self_733448, object defines_91a_91lookup_73537_731162 */
 {
 object defines_91a_91lookup_73537_731162 = args[0];
  
closureN_type c_737481;
object e_737498 [1];
c_737481.hdr.mark = gc_color_red;
 c_737481.hdr.grayed = 0;
c_737481.tag = closureN_tag;
 c_737481.fn = (function_type)__lambda_479;
c_737481.num_args = 0;
c_737481.num_elements = 1;
c_737481.elements = (object *)e_737498;
c_737481.elements[0] = ((closureN)self_733448)->elements[1];


closureN_type c_737499;
object e_737561 [8];
c_737499.hdr.mark = gc_color_red;
 c_737499.hdr.grayed = 0;
c_737499.tag = closureN_tag;
 c_737499.fn = (function_type)__lambda_482;
c_737499.num_args = 1;
c_737499.num_elements = 8;
c_737499.elements = (object *)e_737561;
c_737499.elements[0] = ((closureN)self_733448)->elements[0];
c_737499.elements[1] = ((closureN)self_733448)->elements[2];
c_737499.elements[2] = ((closureN)self_733448)->elements[3];
c_737499.elements[3] = defines_91a_91lookup_73537_731162;
c_737499.elements[4] = ((closureN)self_733448)->elements[4];
c_737499.elements[5] = ((closureN)self_733448)->elements[5];
c_737499.elements[6] = ((closureN)self_733448)->elements[6];
c_737499.elements[7] = ((closureN)self_733448)->elements[7];

return_direct_with_clo1(data,(closure)&c_737481,__lambda_479,  &c_737499);; 
}

static void __lambda_482(void *data, object self_733449, int argc, object *args) /* object self_733449, object r_732230 */
 {

  
closureN_type c_737501;
object e_737556 [8];
c_737501.hdr.mark = gc_color_red;
 c_737501.hdr.grayed = 0;
c_737501.tag = closureN_tag;
 c_737501.fn = (function_type)__lambda_483;
c_737501.num_args = 1;
c_737501.num_elements = 8;
c_737501.elements = (object *)e_737556;
c_737501.elements[0] = ((closureN)self_733449)->elements[0];
c_737501.elements[1] = ((closureN)self_733449)->elements[1];
c_737501.elements[2] = ((closureN)self_733449)->elements[2];
c_737501.elements[3] = ((closureN)self_733449)->elements[3];
c_737501.elements[4] = ((closureN)self_733449)->elements[4];
c_737501.elements[5] = ((closureN)self_733449)->elements[5];
c_737501.elements[6] = ((closureN)self_733449)->elements[6];
c_737501.elements[7] = ((closureN)self_733449)->elements[7];


mclosure0(c_737557, (function_type)__lambda_493);c_737557.num_args = 1;
return_direct_with_clo1(data,(closure)&c_737501,__lambda_483,  &c_737557);; 
}

static void __lambda_493(void *data, object self_733450, int argc, object *args) /* object self_733450, object k_732242, object p_73542_731163 */
 {
 object k_732242 = args[0]; object p_73542_731163 = args[1];
  

return_direct_with_clo1(data,  k_732242, (((closure)  k_732242)->fn),  Cyc_cdr(data, p_73542_731163));; 
}

static void __lambda_483(void *data, object self_733451, int argc, object *args) /* object self_733451, object r_732241 */
 {
 object r_732241 = args[0];
  
closureN_type c_737503;
object e_737554 [8];
c_737503.hdr.mark = gc_color_red;
 c_737503.hdr.grayed = 0;
c_737503.tag = closureN_tag;
 c_737503.fn = (function_type)__lambda_484;
c_737503.num_args = 1;
c_737503.num_elements = 8;
c_737503.elements = (object *)e_737554;
c_737503.elements[0] = ((closureN)self_733451)->elements[0];
c_737503.elements[1] = ((closureN)self_733451)->elements[1];
c_737503.elements[2] = ((closureN)self_733451)->elements[2];
c_737503.elements[3] = ((closureN)self_733451)->elements[3];
c_737503.elements[4] = ((closureN)self_733451)->elements[4];
c_737503.elements[5] = ((closureN)self_733451)->elements[5];
c_737503.elements[6] = ((closureN)self_733451)->elements[6];
c_737503.elements[7] = ((closureN)self_733451)->elements[7];

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_737503, r_732241, ((closureN)self_733451)->elements[0]);; 
}

static void __lambda_484(void *data, object self_733452, int argc, object *args) /* object self_733452, object r_732240 */
 {
 object r_732240 = args[0];
  
closureN_type c_737505;
object e_737552 [7];
c_737505.hdr.mark = gc_color_red;
 c_737505.hdr.grayed = 0;
c_737505.tag = closureN_tag;
 c_737505.fn = (function_type)__lambda_485;
c_737505.num_args = 1;
c_737505.num_elements = 7;
c_737505.elements = (object *)e_737552;
c_737505.elements[0] = ((closureN)self_733452)->elements[0];
c_737505.elements[1] = ((closureN)self_733452)->elements[1];
c_737505.elements[2] = ((closureN)self_733452)->elements[2];
c_737505.elements[3] = ((closureN)self_733452)->elements[3];
c_737505.elements[4] = ((closureN)self_733452)->elements[4];
c_737505.elements[5] = ((closureN)self_733452)->elements[5];
c_737505.elements[6] = ((closureN)self_733452)->elements[7];

return_direct_with_clo3(data,  __glo_list_91_125lambda_91formals_scheme_cyclone_transforms, (((closure)  __glo_list_91_125lambda_91formals_scheme_cyclone_transforms)->fn),  &c_737505, r_732240, ((closureN)self_733452)->elements[6]);; 
}

static void __lambda_485(void *data, object self_733453, int argc, object *args) /* object self_733453, object r_732233 */
 {
 object r_732233 = args[0];
  
closureN_type c_737507;
object e_737548 [6];
c_737507.hdr.mark = gc_color_red;
 c_737507.hdr.grayed = 0;
c_737507.tag = closureN_tag;
 c_737507.fn = (function_type)__lambda_486;
c_737507.num_args = 1;
c_737507.num_elements = 6;
c_737507.elements = (object *)e_737548;
c_737507.elements[0] = ((closureN)self_733453)->elements[1];
c_737507.elements[1] = ((closureN)self_733453)->elements[2];
c_737507.elements[2] = ((closureN)self_733453)->elements[3];
c_737507.elements[3] = ((closureN)self_733453)->elements[4];
c_737507.elements[4] = ((closureN)self_733453)->elements[5];
c_737507.elements[5] = r_732233;

return_direct_with_clo4(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_737507, ((closureN)self_733453)->elements[0], ((closureN)self_733453)->elements[3], ((closureN)self_733453)->elements[6]);; 
}

static void __lambda_486(void *data, object self_733454, int argc, object *args) /* object self_733454, object r_732239 */
 {
 object r_732239 = args[0];
  


closureN_type c_737512;
object e_737543 [4];
c_737512.hdr.mark = gc_color_red;
 c_737512.hdr.grayed = 0;
c_737512.tag = closureN_tag;
 c_737512.fn = (function_type)__lambda_487;
c_737512.num_args = 1;
c_737512.num_elements = 4;
c_737512.elements = (object *)e_737543;
c_737512.elements[0] = ((closureN)self_733454)->elements[2];
c_737512.elements[1] = ((closureN)self_733454)->elements[3];
c_737512.elements[2] = ((closureN)self_733454)->elements[4];
c_737512.elements[3] = ((closureN)self_733454)->elements[5];


complex_num_type local_737546; 
return_closcall3(data,  car(((closureN)self_733454)->elements[1]),  &c_737512, ((inline_function_type)
                   ((closure)__glo_lambda_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_737546, ((closureN)self_733454)->elements[0]), r_732239);; 
}

static void __lambda_487(void *data, object self_733455, int argc, object *args) /* object self_733455, object r_732235 */
 {
 object r_732235 = args[0];
  
closureN_type c_737514;
object e_737538 [5];
c_737514.hdr.mark = gc_color_red;
 c_737514.hdr.grayed = 0;
c_737514.tag = closureN_tag;
 c_737514.fn = (function_type)__lambda_488;
c_737514.num_args = 1;
c_737514.num_elements = 5;
c_737514.elements = (object *)e_737538;
c_737514.elements[0] = ((closureN)self_733455)->elements[0];
c_737514.elements[1] = ((closureN)self_733455)->elements[1];
c_737514.elements[2] = ((closureN)self_733455)->elements[2];
c_737514.elements[3] = ((closureN)self_733455)->elements[3];
c_737514.elements[4] = r_732235;


mclosure0(c_737539, (function_type)__lambda_492);c_737539.num_args = 1;
return_direct_with_clo1(data,(closure)&c_737514,__lambda_488,  &c_737539);; 
}

static void __lambda_492(void *data, object self_733456, int argc, object *args) /* object self_733456, object k_732238, object p_73543_731164 */
 {
 object k_732238 = args[0]; object p_73543_731164 = args[1];
  

return_direct_with_clo1(data,  k_732238, (((closure)  k_732238)->fn),  Cyc_cdr(data, p_73543_731164));; 
}

static void __lambda_488(void *data, object self_733457, int argc, object *args) /* object self_733457, object r_732237 */
 {
 object r_732237 = args[0];
  
closureN_type c_737516;
object e_737536 [4];
c_737516.hdr.mark = gc_color_red;
 c_737516.hdr.grayed = 0;
c_737516.tag = closureN_tag;
 c_737516.fn = (function_type)__lambda_489;
c_737516.num_args = 1;
c_737516.num_elements = 4;
c_737516.elements = (object *)e_737536;
c_737516.elements[0] = ((closureN)self_733457)->elements[1];
c_737516.elements[1] = ((closureN)self_733457)->elements[2];
c_737516.elements[2] = ((closureN)self_733457)->elements[3];
c_737516.elements[3] = ((closureN)self_733457)->elements[4];

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_737516, r_732237, ((closureN)self_733457)->elements[0]);; 
}

static void __lambda_489(void *data, object self_733458, int argc, object *args) /* object self_733458, object r_732236 */
 {
 object r_732236 = args[0];
  


closureN_type c_737521;
object e_737534 [2];
c_737521.hdr.mark = gc_color_red;
 c_737521.hdr.grayed = 0;
c_737521.tag = closureN_tag;
 c_737521.fn = (function_type)__lambda_490;
c_737521.num_args = 1;
c_737521.num_elements = 2;
c_737521.elements = (object *)e_737534;
c_737521.elements[0] = ((closureN)self_733458)->elements[1];
c_737521.elements[1] = ((closureN)self_733458)->elements[2];

return_closcall3(data,  car(((closureN)self_733458)->elements[0]),  &c_737521, ((closureN)self_733458)->elements[3], r_732236);; 
}

static void __lambda_490(void *data, object self_733459, int argc, object *args) /* object self_733459, object r_732234 */
 {
 object r_732234 = args[0];
  
closureN_type c_737523;
object e_737529 [1];
c_737523.hdr.mark = gc_color_red;
 c_737523.hdr.grayed = 0;
c_737523.tag = closureN_tag;
 c_737523.fn = (function_type)__lambda_491;
c_737523.num_args = 1;
c_737523.num_elements = 1;
c_737523.elements = (object *)e_737529;
c_737523.elements[0] = ((closureN)self_733459)->elements[0];


pair_type local_737532; 
return_direct_with_clo1(data,(closure)&c_737523,__lambda_491,  set_pair_as_expr(&local_737532, ((closureN)self_733459)->elements[1], r_732234));; 
}

static void __lambda_491(void *data, object self_733460, int argc, object *args) /* object self_733460, object r_732232 */
 {
 object r_732232 = args[0];
  
pair_type local_737528; 
return_direct_with_clo1(data,  ((closureN)self_733460)->elements[0], (((closure)  ((closureN)self_733460)->elements[0])->fn),  set_pair_as_expr(&local_737528, quote_lambda, r_732232));; 
}

static void __lambda_479(void *data, object self_733461, int argc, object *args) /* object self_733461, object k_732243 */
 {
 object k_732243 = args[0];
  
closureN_type c_737483;
object e_737496 [2];
c_737483.hdr.mark = gc_color_red;
 c_737483.hdr.grayed = 0;
c_737483.tag = closureN_tag;
 c_737483.fn = (function_type)__lambda_480;
c_737483.num_args = 1;
c_737483.num_elements = 2;
c_737483.elements = (object *)e_737496;
c_737483.elements[0] = ((closureN)self_733461)->elements[0];
c_737483.elements[1] = k_732243;

return_direct_with_clo2(data,  __glo_delete_91duplicates_scheme_cyclone_util, (((closure)  __glo_delete_91duplicates_scheme_cyclone_util)->fn),  &c_737483, ((closureN)self_733461)->elements[0]);; 
}

static void __lambda_480(void *data, object self_733462, int argc, object *args) /* object self_733462, object r_732245 */
 {
 object r_732245 = args[0];
  
closureN_type c_737485;
object e_737492 [2];
c_737485.hdr.mark = gc_color_red;
 c_737485.hdr.grayed = 0;
c_737485.tag = closureN_tag;
 c_737485.fn = (function_type)__lambda_481;
c_737485.num_args = 1;
c_737485.num_elements = 2;
c_737485.elements = (object *)e_737492;
c_737485.elements[0] = ((closureN)self_733462)->elements[0];
c_737485.elements[1] = ((closureN)self_733462)->elements[1];



return_direct_with_clo1(data,(closure)&c_737485,__lambda_481,  equalp(r_732245, ((closureN)self_733462)->elements[0]));; 
}

static void __lambda_481(void *data, object self_733463, int argc, object *args) /* object self_733463, object r_732244 */
 {
 object r_732244 = args[0];
  if( (boolean_f != r_732244) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733463)->elements[1], (((closure)  ((closureN)self_733463)->elements[1])->fn),  Cyc_VOID);
} else { 
  
make_utf8_string_with_len(c_737490, "duplicate lambda parameter(s)", 29, 29);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_733463)->elements[1], &c_737490, ((closureN)self_733463)->elements[0]);}
;; 
}

static void __lambda_469(void *data, object self_733573, int argc, object *args) /* object self_733573, object k_732487 */
 {
 object k_732487 = args[0];
  
closureN_type c_737444;
object e_737458 [2];
c_737444.hdr.mark = gc_color_red;
 c_737444.hdr.grayed = 0;
c_737444.tag = closureN_tag;
 c_737444.fn = (function_type)__lambda_470;
c_737444.num_args = 1;
c_737444.num_elements = 2;
c_737444.elements = (object *)e_737458;
c_737444.elements[0] = k_732487;
c_737444.elements[1] = ((closureN)self_733573)->elements[1];

return_direct_with_clo2(data,  __glo_lambda_127_scheme_cyclone_util, (((closure)  __glo_lambda_127_scheme_cyclone_util)->fn),  &c_737444, ((closureN)self_733573)->elements[0]);; 
}

static void __lambda_470(void *data, object self_733574, int argc, object *args) /* object self_733574, object r_732488 */
 {
 object r_732488 = args[0];
  if( (boolean_f != r_732488) ){ 
  
closureN_type c_737446;
object e_737452 [1];
c_737446.hdr.mark = gc_color_red;
 c_737446.hdr.grayed = 0;
c_737446.tag = closureN_tag;
 c_737446.fn = (function_type)__lambda_471;
c_737446.num_args = 1;
c_737446.num_elements = 1;
c_737446.elements = (object *)e_737452;
c_737446.elements[0] = ((closureN)self_733574)->elements[0];



return_direct_with_clo1(data,(closure)&c_737446,__lambda_471,  assoc(data, quote_lambda, ((closureN)self_733574)->elements[1]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733574)->elements[0], (((closure)  ((closureN)self_733574)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_471(void *data, object self_733575, int argc, object *args) /* object self_733575, object r_732489 */
 {
 object r_732489 = args[0];
  
complex_num_type local_737451; 
return_direct_with_clo1(data,  ((closureN)self_733575)->elements[0], (((closure)  ((closureN)self_733575)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_737451, r_732489));; 
}

static void __lambda_468(void *data, object self_733433, int argc, object *args) /* object self_733433, object k_732222, object a_73515_731156 */
 {
 object k_732222 = args[0]; object a_73515_731156 = args[1];
  

return_closcall3(data,  car(((closureN)self_733433)->elements[0]),  k_732222, a_73515_731156, ((closureN)self_733433)->elements[1]);; 
}

static void __lambda_462(void *data, object self_733434, int argc, object *args) /* object self_733434, object r_732220 */
 {
 object r_732220 = args[0];
  
closureN_type c_737377;
object e_737429 [2];
c_737377.hdr.mark = gc_color_red;
 c_737377.hdr.grayed = 0;
c_737377.tag = closureN_tag;
 c_737377.fn = (function_type)__lambda_463;
c_737377.num_args = 1;
c_737377.num_elements = 2;
c_737377.elements = (object *)e_737429;
c_737377.elements[0] = ((closureN)self_733434)->elements[0];
c_737377.elements[1] = ((closureN)self_733434)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_737377, r_732220, Cyc_cdr(data, ((closureN)self_733434)->elements[0]));; 
}

static void __lambda_463(void *data, object self_733435, int argc, object *args) /* object self_733435, object r_732219 */
 {
 object r_732219 = args[0];
  
closureN_type c_737379;
object e_737422 [1];
c_737379.hdr.mark = gc_color_red;
 c_737379.hdr.grayed = 0;
c_737379.tag = closureN_tag;
 c_737379.fn = (function_type)__lambda_464;
c_737379.num_args = 1;
c_737379.num_elements = 1;
c_737379.elements = (object *)e_737422;
c_737379.elements[0] = ((closureN)self_733435)->elements[1];


pair_type local_737425; 


return_direct_with_clo1(data,(closure)&c_737379,__lambda_464,  set_pair_as_expr(&local_737425, Cyc_car(data, ((closureN)self_733435)->elements[0]), r_732219));; 
}

static void __lambda_464(void *data, object self_733436, int argc, object *args) /* object self_733436, object converted_73502_731155 */
 {
 object converted_73502_731155 = args[0];
  object r_732205;
    
  
if( (boolean_f != equalp(Cyc_car(data, converted_73502_731155), quote__87)) ){ 
  
  
  r_732205 = Cyc_num_fast_eq_op(data, Cyc_length(data, converted_73502_731155), obj_int2obj(1));
} else { 
  r_732205 = boolean_f;}
;if( (boolean_f != r_732205) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733436)->elements[0], (((closure)  ((closureN)self_733436)->elements[0])->fn),  obj_int2obj(0));
} else { 
  
closureN_type c_737394;
object e_737407 [1];
c_737394.hdr.mark = gc_color_red;
 c_737394.hdr.grayed = 0;
c_737394.tag = closureN_tag;
 c_737394.fn = (function_type)__lambda_465;
c_737394.num_args = 0;
c_737394.num_elements = 1;
c_737394.elements = (object *)e_737407;
c_737394.elements[0] = converted_73502_731155;


closureN_type c_737408;
object e_737421 [2];
c_737408.hdr.mark = gc_color_red;
 c_737408.hdr.grayed = 0;
c_737408.tag = closureN_tag;
 c_737408.fn = (function_type)__lambda_466;
c_737408.num_args = 1;
c_737408.num_elements = 2;
c_737408.elements = (object *)e_737421;
c_737408.elements[0] = converted_73502_731155;
c_737408.elements[1] = ((closureN)self_733436)->elements[0];

return_direct_with_clo1(data,(closure)&c_737394,__lambda_465,  &c_737408);}
;; 
}

static void __lambda_466(void *data, object self_733437, int argc, object *args) /* object self_733437, object r_732206 */
 {
 object r_732206 = args[0];
  if( (boolean_f != r_732206) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733437)->elements[1], (((closure)  ((closureN)self_733437)->elements[1])->fn),  obj_int2obj(1));
} else { 
  
closureN_type c_737412;
object e_737419 [2];
c_737412.hdr.mark = gc_color_red;
 c_737412.hdr.grayed = 0;
c_737412.tag = closureN_tag;
 c_737412.fn = (function_type)__lambda_467;
c_737412.num_args = 1;
c_737412.num_elements = 2;
c_737412.elements = (object *)e_737419;
c_737412.elements[0] = ((closureN)self_733437)->elements[0];
c_737412.elements[1] = ((closureN)self_733437)->elements[1];

return_direct_with_clo2(data,  __glo_precompute_91prim_91app_127_scheme_cyclone_transforms, (((closure)  __glo_precompute_91prim_91app_127_scheme_cyclone_transforms)->fn),  &c_737412, ((closureN)self_733437)->elements[0]);}
;; 
}

static void __lambda_467(void *data, object self_733438, int argc, object *args) /* object self_733438, object r_732207 */
 {
 object r_732207 = args[0];
  if( (boolean_f != r_732207) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733438)->elements[1], (((closure)  ((closureN)self_733438)->elements[1])->fn),  ((closureN)self_733438)->elements[0]);
} else { 
  return_direct_with_clo2(data,  __glo_prim_117inline_91convert_91prim_91call_scheme_cyclone_primitives, (((closure)  __glo_prim_117inline_91convert_91prim_91call_scheme_cyclone_primitives)->fn),  ((closureN)self_733438)->elements[1], ((closureN)self_733438)->elements[0]);}
;; 
}

static void __lambda_465(void *data, object self_733439, int argc, object *args) /* object self_733439, object k_732208 */
 {
 object k_732208 = args[0];
    
  
if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_733439)->elements[0]), quote__85)) ){ 
  



return_direct_with_clo1(data,  k_732208,__lambda_466,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733439)->elements[0]), obj_int2obj(1)));
} else { 
  return_direct_with_clo1(data,  k_732208,__lambda_466,  boolean_f);}
;; 
}

static void __lambda_458(void *data, object self_733576, int argc, object *args) /* object self_733576, object k_732491 */
 {
 object k_732491 = args[0];
  
closureN_type c_737353;
object e_737370 [3];
c_737353.hdr.mark = gc_color_red;
 c_737353.hdr.grayed = 0;
c_737353.tag = closureN_tag;
 c_737353.fn = (function_type)__lambda_459;
c_737353.num_args = 1;
c_737353.num_elements = 3;
c_737353.elements = (object *)e_737370;
c_737353.elements[0] = ((closureN)self_733576)->elements[0];
c_737353.elements[1] = k_732491;
c_737353.elements[2] = ((closureN)self_733576)->elements[1];

return_direct_with_clo2(data,  __glo_prim_91call_127_scheme_cyclone_primitives, (((closure)  __glo_prim_91call_127_scheme_cyclone_primitives)->fn),  &c_737353, ((closureN)self_733576)->elements[0]);; 
}

static void __lambda_459(void *data, object self_733577, int argc, object *args) /* object self_733577, object r_732492 */
 {
 object r_732492 = args[0];
  if( (boolean_f != r_732492) ){ 
  
closureN_type c_737355;
object e_737361 [1];
c_737355.hdr.mark = gc_color_red;
 c_737355.hdr.grayed = 0;
c_737355.tag = closureN_tag;
 c_737355.fn = (function_type)__lambda_460;
c_737355.num_args = 1;
c_737355.num_elements = 1;
c_737355.elements = (object *)e_737361;
c_737355.elements[0] = ((closureN)self_733577)->elements[1];





return_direct_with_clo1(data,(closure)&c_737355,__lambda_460,  assoc(data, Cyc_car(data, ((closureN)self_733577)->elements[0]), ((closureN)self_733577)->elements[2]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733577)->elements[1], (((closure)  ((closureN)self_733577)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_460(void *data, object self_733578, int argc, object *args) /* object self_733578, object r_732493 */
 {
 object r_732493 = args[0];
  
complex_num_type local_737360; 
return_direct_with_clo1(data,  ((closureN)self_733578)->elements[0], (((closure)  ((closureN)self_733578)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_737360, r_732493));; 
}

static void __lambda_454(void *data, object self_733422, int argc, object *args) /* object self_733422, object new_91ast_73479_731153 */
 {
 object new_91ast_73479_731153 = args[0];
  object r_732166;
    object local_737234 = alloca(sizeof(complex_num_type)); 
  object local_737237 = alloca(sizeof(complex_num_type)); 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_app_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,local_737234, ((inline_function_type)
                   ((closure)__glo_if_91_125condition_191_191inline_191_191_scheme_cyclone_util)->fn)(data,local_737237, new_91ast_73479_731153))) ){ 
  
  
  object local_737245 = alloca(sizeof(complex_num_type)); 
  r_732166 = equalp(quote_not, Cyc_car(data, ((inline_function_type)
                   ((closure)__glo_if_91_125condition_191_191inline_191_191_scheme_cyclone_util)->fn)(data,local_737245, new_91ast_73479_731153)));
} else { 
  r_732166 = boolean_f;}
;if( (boolean_f != r_732166) ){ 
  
closureN_type c_737248;
object e_737254 [1];
c_737248.hdr.mark = gc_color_red;
 c_737248.hdr.grayed = 0;
c_737248.tag = closureN_tag;
 c_737248.fn = (function_type)__lambda_455;
c_737248.num_args = 1;
c_737248.num_elements = 1;
c_737248.elements = (object *)e_737254;
c_737248.elements[0] = ((closureN)self_733422)->elements[0];




complex_num_type local_737259; 

pair_type local_737262; 

complex_num_type local_737265; 

pair_type local_737268; 

complex_num_type local_737271; 
return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_737248, Cyc_cdr(data, ((inline_function_type)
                   ((closure)__glo_if_91_125condition_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_737259, new_91ast_73479_731153)), set_pair_as_expr(&local_737262, ((inline_function_type)
                   ((closure)__glo_if_91_125else_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_737265, new_91ast_73479_731153), set_pair_as_expr(&local_737268, ((inline_function_type)
                   ((closure)__glo_if_91_125then_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_737271, new_91ast_73479_731153), NULL)));
} else { 
  
closureN_type c_737273;
object e_737337 [1];
c_737273.hdr.mark = gc_color_red;
 c_737273.hdr.grayed = 0;
c_737273.tag = closureN_tag;
 c_737273.fn = (function_type)__lambda_456;
c_737273.num_args = 0;
c_737273.num_elements = 1;
c_737273.elements = (object *)e_737337;
c_737273.elements[0] = new_91ast_73479_731153;


closureN_type c_737338;
object e_737348 [2];
c_737338.hdr.mark = gc_color_red;
 c_737338.hdr.grayed = 0;
c_737338.tag = closureN_tag;
 c_737338.fn = (function_type)__lambda_457;
c_737338.num_args = 1;
c_737338.num_elements = 2;
c_737338.elements = (object *)e_737348;
c_737338.elements[0] = ((closureN)self_733422)->elements[0];
c_737338.elements[1] = new_91ast_73479_731153;

return_direct_with_clo1(data,(closure)&c_737273,__lambda_456,  &c_737338);}
;; 
}

static void __lambda_457(void *data, object self_733424, int argc, object *args) /* object self_733424, object r_732176 */
 {
 object r_732176 = args[0];
  if( (boolean_f != r_732176) ){ 
  
complex_num_type local_737343; 
return_direct_with_clo1(data,  ((closureN)self_733424)->elements[0], (((closure)  ((closureN)self_733424)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_if_91_125condition_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_737343, ((closureN)self_733424)->elements[1]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733424)->elements[0], (((closure)  ((closureN)self_733424)->elements[0])->fn),  ((closureN)self_733424)->elements[1]);}
;; 
}

static void __lambda_456(void *data, object self_733425, int argc, object *args) /* object self_733425, object k_732177 */
 {
 object k_732177 = args[0];
    
  complex_num_type local_737278; 
if( (boolean_f != Cyc_eq(boolean_t, ((inline_function_type)
                   ((closure)__glo_if_91_125then_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_737278, ((closureN)self_733425)->elements[0]))) ){ 
    
  complex_num_type local_737284; 
if( (boolean_f != Cyc_eq(boolean_f, ((inline_function_type)
                   ((closure)__glo_if_91_125else_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_737284, ((closureN)self_733425)->elements[0]))) ){ 
    complex_num_type local_737288; 
  complex_num_type local_737291; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_app_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_737288, ((inline_function_type)
                   ((closure)__glo_if_91_125condition_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_737291, ((closureN)self_733425)->elements[0]))) ){ 
  




complex_num_type local_737300; 

make_pair(c_737333,quote__121_123,NULL);c_737333.hdr.immutable = 1;

make_pair(c_737332,quote__125_123,&c_737333);c_737332.hdr.immutable = 1;

make_pair(c_737331,quote__121,&c_737332);c_737331.hdr.immutable = 1;

make_pair(c_737330,quote__125,&c_737331);c_737330.hdr.immutable = 1;

make_pair(c_737329,quote__123,&c_737330);c_737329.hdr.immutable = 1;

make_pair(c_737328,quote_symbol_127,&c_737329);c_737328.hdr.immutable = 1;

make_pair(c_737327,quote_string_127,&c_737328);c_737327.hdr.immutable = 1;

make_pair(c_737326,quote_vector_127,&c_737327);c_737326.hdr.immutable = 1;

make_pair(c_737325,quote_Cyc_91macro_127,&c_737326);c_737325.hdr.immutable = 1;

make_pair(c_737324,quote_procedure_127,&c_737325);c_737324.hdr.immutable = 1;

make_pair(c_737323,quote_port_127,&c_737324);c_737323.hdr.immutable = 1;

make_pair(c_737322,quote_pair_127,&c_737323);c_737322.hdr.immutable = 1;

make_pair(c_737321,quote_integer_127,&c_737322);c_737321.hdr.immutable = 1;

make_pair(c_737320,quote_real_127,&c_737321);c_737320.hdr.immutable = 1;

make_pair(c_737319,quote_number_127,&c_737320);c_737319.hdr.immutable = 1;

make_pair(c_737318,quote_null_127,&c_737319);c_737318.hdr.immutable = 1;

make_pair(c_737317,quote_eof_91object_127,&c_737318);c_737317.hdr.immutable = 1;

make_pair(c_737316,quote_char_127,&c_737317);c_737316.hdr.immutable = 1;

make_pair(c_737315,quote_boolean_127,&c_737316);c_737315.hdr.immutable = 1;

make_pair(c_737314,quote_equal_127,&c_737315);c_737314.hdr.immutable = 1;

make_pair(c_737313,quote_eqv_127,&c_737314);c_737313.hdr.immutable = 1;

make_pair(c_737312,quote_eq_127,&c_737313);c_737312.hdr.immutable = 1;

make_pair(c_737311,quote_Cyc_91fast_91char_91lte,&c_737312);c_737311.hdr.immutable = 1;

make_pair(c_737310,quote_Cyc_91fast_91char_91gte,&c_737311);c_737310.hdr.immutable = 1;

make_pair(c_737309,quote_Cyc_91fast_91char_91lt,&c_737310);c_737309.hdr.immutable = 1;

make_pair(c_737308,quote_Cyc_91fast_91char_91gt,&c_737309);c_737308.hdr.immutable = 1;

make_pair(c_737307,quote_Cyc_91fast_91char_91eq,&c_737308);c_737307.hdr.immutable = 1;

make_pair(c_737306,quote_Cyc_91fast_91lte,&c_737307);c_737306.hdr.immutable = 1;

make_pair(c_737305,quote_Cyc_91fast_91gte,&c_737306);c_737305.hdr.immutable = 1;

make_pair(c_737304,quote_Cyc_91fast_91lt,&c_737305);c_737304.hdr.immutable = 1;

make_pair(c_737303,quote_Cyc_91fast_91gt,&c_737304);c_737303.hdr.immutable = 1;

make_pair(c_737302,quote_Cyc_91fast_91eq,&c_737303);c_737302.hdr.immutable = 1;
return_direct_with_clo1(data,  k_732177,__lambda_457,  memberp(data, Cyc_car(data, ((inline_function_type)
                   ((closure)__glo_if_91_125condition_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_737300, ((closureN)self_733425)->elements[0])), &c_737302));
} else { 
  return_direct_with_clo1(data,  k_732177,__lambda_457,  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_732177,__lambda_457,  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_732177,__lambda_457,  boolean_f);}
;; 
}

static void __lambda_455(void *data, object self_733423, int argc, object *args) /* object self_733423, object r_732168_732922 */
 {
 object r_732168_732922 = args[0];
  
pair_type local_737253; 
return_direct_with_clo1(data,  ((closureN)self_733423)->elements[0], (((closure)  ((closureN)self_733423)->elements[0])->fn),  set_pair_as_expr(&local_737253, quote__if, r_732168_732922));; 
}

static void __lambda_448(void *data, object self_733426, int argc, object *args) /* object self_733426, object k_732193 */
 {
 object k_732193 = args[0];
  
closureN_type c_737192;
object e_737227 [4];
c_737192.hdr.mark = gc_color_red;
 c_737192.hdr.grayed = 0;
c_737192.tag = closureN_tag;
 c_737192.fn = (function_type)__lambda_449;
c_737192.num_args = 1;
c_737192.num_elements = 4;
c_737192.elements = (object *)e_737227;
c_737192.elements[0] = ((closureN)self_733426)->elements[0];
c_737192.elements[1] = ((closureN)self_733426)->elements[1];
c_737192.elements[2] = k_732193;
c_737192.elements[3] = ((closureN)self_733426)->elements[2];

return_direct_with_clo2(data,  __glo_if_91else_127_scheme_cyclone_util, (((closure)  __glo_if_91else_127_scheme_cyclone_util)->fn),  &c_737192, ((closureN)self_733426)->elements[0]);; 
}

static void __lambda_449(void *data, object self_733427, int argc, object *args) /* object self_733427, object r_732194 */
 {
 object r_732194 = args[0];
  if( (boolean_f != r_732194) ){ 
  
closureN_type c_737194;
object e_737206 [2];
c_737194.hdr.mark = gc_color_red;
 c_737194.hdr.grayed = 0;
c_737194.tag = closureN_tag;
 c_737194.fn = (function_type)__lambda_450;
c_737194.num_args = 1;
c_737194.num_elements = 2;
c_737194.elements = (object *)e_737206;
c_737194.elements[0] = ((closureN)self_733427)->elements[0];
c_737194.elements[1] = ((closureN)self_733427)->elements[2];


closureN_type c_737207;
object e_737213 [2];
c_737207.hdr.mark = gc_color_red;
 c_737207.hdr.grayed = 0;
c_737207.tag = closureN_tag;
 c_737207.fn = (function_type)__lambda_452;
c_737207.num_args = 1;
c_737207.num_elements = 2;
c_737207.elements = (object *)e_737213;
c_737207.elements[0] = ((closureN)self_733427)->elements[1];
c_737207.elements[1] = ((closureN)self_733427)->elements[3];

return_direct_with_clo1(data,(closure)&c_737194,__lambda_450,  &c_737207);
} else { 
  
closureN_type c_737215;
object e_737222 [3];
c_737215.hdr.mark = gc_color_red;
 c_737215.hdr.grayed = 0;
c_737215.tag = closureN_tag;
 c_737215.fn = (function_type)__lambda_453;
c_737215.num_args = 1;
c_737215.num_elements = 3;
c_737215.elements = (object *)e_737222;
c_737215.elements[0] = ((closureN)self_733427)->elements[1];
c_737215.elements[1] = ((closureN)self_733427)->elements[2];
c_737215.elements[2] = ((closureN)self_733427)->elements[3];


pair_type local_737226; 
return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_737215, ((closureN)self_733427)->elements[0], set_cell_as_expr(&local_737226, Cyc_VOID));}
;; 
}

static void __lambda_453(void *data, object self_733431, int argc, object *args) /* object self_733431, object r_732200_732919 */
 {
 object r_732200_732919 = args[0];
  

return_closcall3(data,  car(((closureN)self_733431)->elements[0]),  ((closureN)self_733431)->elements[1], r_732200_732919, ((closureN)self_733431)->elements[2]);; 
}

static void __lambda_452(void *data, object self_733428, int argc, object *args) /* object self_733428, object k_732199, object a_73497_731154 */
 {
 object k_732199 = args[0]; object a_73497_731154 = args[1];
  

return_closcall3(data,  car(((closureN)self_733428)->elements[0]),  k_732199, a_73497_731154, ((closureN)self_733428)->elements[1]);; 
}

static void __lambda_450(void *data, object self_733429, int argc, object *args) /* object self_733429, object r_732197 */
 {
 object r_732197 = args[0];
  
closureN_type c_737196;
object e_737202 [1];
c_737196.hdr.mark = gc_color_red;
 c_737196.hdr.grayed = 0;
c_737196.tag = closureN_tag;
 c_737196.fn = (function_type)__lambda_451;
c_737196.num_args = 1;
c_737196.num_elements = 1;
c_737196.elements = (object *)e_737202;
c_737196.elements[0] = ((closureN)self_733429)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_737196, r_732197, Cyc_cdr(data, ((closureN)self_733429)->elements[0]));; 
}

static void __lambda_451(void *data, object self_733430, int argc, object *args) /* object self_733430, object r_732196 */
 {
 object r_732196 = args[0];
  
pair_type local_737201; 
return_direct_with_clo1(data,  ((closureN)self_733430)->elements[0], (((closure)  ((closureN)self_733430)->elements[0])->fn),  set_pair_as_expr(&local_737201, quote__if, r_732196));; 
}

static void __lambda_444(void *data, object self_733579, int argc, object *args) /* object self_733579, object k_732495 */
 {
 object k_732495 = args[0];
  
closureN_type c_737171;
object e_737185 [2];
c_737171.hdr.mark = gc_color_red;
 c_737171.hdr.grayed = 0;
c_737171.tag = closureN_tag;
 c_737171.fn = (function_type)__lambda_445;
c_737171.num_args = 1;
c_737171.num_elements = 2;
c_737171.elements = (object *)e_737185;
c_737171.elements[0] = k_732495;
c_737171.elements[1] = ((closureN)self_733579)->elements[1];

return_direct_with_clo2(data,  __glo_if_127_scheme_cyclone_util, (((closure)  __glo_if_127_scheme_cyclone_util)->fn),  &c_737171, ((closureN)self_733579)->elements[0]);; 
}

static void __lambda_445(void *data, object self_733580, int argc, object *args) /* object self_733580, object r_732496 */
 {
 object r_732496 = args[0];
  if( (boolean_f != r_732496) ){ 
  
closureN_type c_737173;
object e_737179 [1];
c_737173.hdr.mark = gc_color_red;
 c_737173.hdr.grayed = 0;
c_737173.tag = closureN_tag;
 c_737173.fn = (function_type)__lambda_446;
c_737173.num_args = 1;
c_737173.num_elements = 1;
c_737173.elements = (object *)e_737179;
c_737173.elements[0] = ((closureN)self_733580)->elements[0];



return_direct_with_clo1(data,(closure)&c_737173,__lambda_446,  assoc(data, quote__if, ((closureN)self_733580)->elements[1]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733580)->elements[0], (((closure)  ((closureN)self_733580)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_446(void *data, object self_733581, int argc, object *args) /* object self_733581, object r_732497 */
 {
 object r_732497 = args[0];
  
complex_num_type local_737178; 
return_direct_with_clo1(data,  ((closureN)self_733581)->elements[0], (((closure)  ((closureN)self_733581)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_737178, r_732497));; 
}

static void __lambda_443(void *data, object self_733418, int argc, object *args) /* object self_733418, object k_732163, object a_73474_731152 */
 {
 object k_732163 = args[0]; object a_73474_731152 = args[1];
  

return_closcall3(data,  car(((closureN)self_733418)->elements[0]),  k_732163, a_73474_731152, ((closureN)self_733418)->elements[1]);; 
}

static void __lambda_441(void *data, object self_733419, int argc, object *args) /* object self_733419, object r_732161 */
 {
 object r_732161 = args[0];
  
closureN_type c_737150;
object e_737156 [1];
c_737150.hdr.mark = gc_color_red;
 c_737150.hdr.grayed = 0;
c_737150.tag = closureN_tag;
 c_737150.fn = (function_type)__lambda_442;
c_737150.num_args = 1;
c_737150.num_elements = 1;
c_737150.elements = (object *)e_737156;
c_737150.elements[0] = ((closureN)self_733419)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_737150, r_732161, Cyc_cdr(data, ((closureN)self_733419)->elements[0]));; 
}

static void __lambda_442(void *data, object self_733420, int argc, object *args) /* object self_733420, object r_732160 */
 {
 object r_732160 = args[0];
  
pair_type local_737155; 
return_direct_with_clo1(data,  ((closureN)self_733420)->elements[0], (((closure)  ((closureN)self_733420)->elements[0])->fn),  set_pair_as_expr(&local_737155, quote_set_67, r_732160));; 
}

static void __lambda_437(void *data, object self_733582, int argc, object *args) /* object self_733582, object k_732499 */
 {
 object k_732499 = args[0];
  
closureN_type c_737129;
object e_737143 [2];
c_737129.hdr.mark = gc_color_red;
 c_737129.hdr.grayed = 0;
c_737129.tag = closureN_tag;
 c_737129.fn = (function_type)__lambda_438;
c_737129.num_args = 1;
c_737129.num_elements = 2;
c_737129.elements = (object *)e_737143;
c_737129.elements[0] = k_732499;
c_737129.elements[1] = ((closureN)self_733582)->elements[1];

return_direct_with_clo2(data,  __glo_set_67_127_scheme_cyclone_util, (((closure)  __glo_set_67_127_scheme_cyclone_util)->fn),  &c_737129, ((closureN)self_733582)->elements[0]);; 
}

static void __lambda_438(void *data, object self_733583, int argc, object *args) /* object self_733583, object r_732500 */
 {
 object r_732500 = args[0];
  if( (boolean_f != r_732500) ){ 
  
closureN_type c_737131;
object e_737137 [1];
c_737131.hdr.mark = gc_color_red;
 c_737131.hdr.grayed = 0;
c_737131.tag = closureN_tag;
 c_737131.fn = (function_type)__lambda_439;
c_737131.num_args = 1;
c_737131.num_elements = 1;
c_737131.elements = (object *)e_737137;
c_737131.elements[0] = ((closureN)self_733583)->elements[0];



return_direct_with_clo1(data,(closure)&c_737131,__lambda_439,  assoc(data, quote_set_67, ((closureN)self_733583)->elements[1]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733583)->elements[0], (((closure)  ((closureN)self_733583)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_439(void *data, object self_733584, int argc, object *args) /* object self_733584, object r_732501 */
 {
 object r_732501 = args[0];
  
complex_num_type local_737136; 
return_direct_with_clo1(data,  ((closureN)self_733584)->elements[0], (((closure)  ((closureN)self_733584)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_737136, r_732501));; 
}

static void __lambda_436(void *data, object self_733414, int argc, object *args) /* object self_733414, object k_732157, object a_73466_731151 */
 {
 object k_732157 = args[0]; object a_73466_731151 = args[1];
  

return_closcall3(data,  car(((closureN)self_733414)->elements[0]),  k_732157, a_73466_731151, ((closureN)self_733414)->elements[1]);; 
}

static void __lambda_434(void *data, object self_733415, int argc, object *args) /* object self_733415, object r_732155 */
 {
 object r_732155 = args[0];
  
closureN_type c_737108;
object e_737114 [1];
c_737108.hdr.mark = gc_color_red;
 c_737108.hdr.grayed = 0;
c_737108.tag = closureN_tag;
 c_737108.fn = (function_type)__lambda_435;
c_737108.num_args = 1;
c_737108.num_elements = 1;
c_737108.elements = (object *)e_737114;
c_737108.elements[0] = ((closureN)self_733415)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_737108, r_732155, Cyc_cdr(data, ((closureN)self_733415)->elements[0]));; 
}

static void __lambda_435(void *data, object self_733416, int argc, object *args) /* object self_733416, object r_732154 */
 {
 object r_732154 = args[0];
  
pair_type local_737113; 
return_direct_with_clo1(data,  ((closureN)self_733416)->elements[0], (((closure)  ((closureN)self_733416)->elements[0])->fn),  set_pair_as_expr(&local_737113, quote_set_67, r_732154));; 
}

static void __lambda_430(void *data, object self_733585, int argc, object *args) /* object self_733585, object k_732503 */
 {
 object k_732503 = args[0];
  
closureN_type c_737087;
object e_737101 [2];
c_737087.hdr.mark = gc_color_red;
 c_737087.hdr.grayed = 0;
c_737087.tag = closureN_tag;
 c_737087.fn = (function_type)__lambda_431;
c_737087.num_args = 1;
c_737087.num_elements = 2;
c_737087.elements = (object *)e_737101;
c_737087.elements[0] = k_732503;
c_737087.elements[1] = ((closureN)self_733585)->elements[1];

return_direct_with_clo2(data,  __glo_define_127_scheme_cyclone_util, (((closure)  __glo_define_127_scheme_cyclone_util)->fn),  &c_737087, ((closureN)self_733585)->elements[0]);; 
}

static void __lambda_431(void *data, object self_733586, int argc, object *args) /* object self_733586, object r_732504 */
 {
 object r_732504 = args[0];
  if( (boolean_f != r_732504) ){ 
  
closureN_type c_737089;
object e_737095 [1];
c_737089.hdr.mark = gc_color_red;
 c_737089.hdr.grayed = 0;
c_737089.tag = closureN_tag;
 c_737089.fn = (function_type)__lambda_432;
c_737089.num_args = 1;
c_737089.num_elements = 1;
c_737089.elements = (object *)e_737095;
c_737089.elements[0] = ((closureN)self_733586)->elements[0];



return_direct_with_clo1(data,(closure)&c_737089,__lambda_432,  assoc(data, quote_define, ((closureN)self_733586)->elements[1]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733586)->elements[0], (((closure)  ((closureN)self_733586)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_432(void *data, object self_733587, int argc, object *args) /* object self_733587, object r_732505 */
 {
 object r_732505 = args[0];
  
complex_num_type local_737094; 
return_direct_with_clo1(data,  ((closureN)self_733587)->elements[0], (((closure)  ((closureN)self_733587)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_737094, r_732505));; 
}

static void __lambda_429(void *data, object self_733412, int argc, object *args) /* object self_733412, object renamed_73454_731150 */
 {
 object renamed_73454_731150 = args[0];
  if( (boolean_f != renamed_73454_731150) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_733412)->elements[1], (((closure)  ((closureN)self_733412)->elements[1])->fn),  Cyc_cdr(data, renamed_73454_731150));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733412)->elements[1], (((closure)  ((closureN)self_733412)->elements[1])->fn),  ((closureN)self_733412)->elements[0]);}
;; 
}

static void __lambda_378(void *data, object self_733588, int argc, object *args) /* object self_733588, object r_732146 */
 {
 object r_732146 = args[0];
  
closureN_type c_736754;
object e_737052 [8];
c_736754.hdr.mark = gc_color_red;
 c_736754.hdr.grayed = 0;
c_736754.tag = closureN_tag;
 c_736754.fn = (function_type)__lambda_379;
c_736754.num_args = 1;
c_736754.num_elements = 8;
c_736754.elements = (object *)e_737052;
c_736754.elements[0] = ((closureN)self_733588)->elements[0];
c_736754.elements[1] = ((closureN)self_733588)->elements[1];
c_736754.elements[2] = ((closureN)self_733588)->elements[2];
c_736754.elements[3] = ((closureN)self_733588)->elements[3];
c_736754.elements[4] = ((closureN)self_733588)->elements[4];
c_736754.elements[5] = ((closureN)self_733588)->elements[5];
c_736754.elements[6] = ((closureN)self_733588)->elements[6];
c_736754.elements[7] = ((closureN)self_733588)->elements[7];



return_direct_with_clo1(data,(closure)&c_736754,__lambda_379,  Cyc_set_cell(data, ((closureN)self_733588)->elements[1], r_732146));; 
}

static void __lambda_379(void *data, object self_733589, int argc, object *args) /* object self_733589, object r_732073 */
 {

  
closureN_type c_736756;
object e_737050 [8];
c_736756.hdr.mark = gc_color_red;
 c_736756.hdr.grayed = 0;
c_736756.tag = closureN_tag;
 c_736756.fn = (function_type)__lambda_380;
c_736756.num_args = 1;
c_736756.num_elements = 8;
c_736756.elements = (object *)e_737050;
c_736756.elements[0] = ((closureN)self_733589)->elements[0];
c_736756.elements[1] = ((closureN)self_733589)->elements[1];
c_736756.elements[2] = ((closureN)self_733589)->elements[2];
c_736756.elements[3] = ((closureN)self_733589)->elements[3];
c_736756.elements[4] = ((closureN)self_733589)->elements[4];
c_736756.elements[5] = ((closureN)self_733589)->elements[5];
c_736756.elements[6] = ((closureN)self_733589)->elements[6];
c_736756.elements[7] = ((closureN)self_733589)->elements[7];

return_direct_with_clo2(data,  __glo_free_91vars_scheme_cyclone_transforms, (((closure)  __glo_free_91vars_scheme_cyclone_transforms)->fn),  &c_736756, ((closureN)self_733589)->elements[0]);; 
}

static void __lambda_380(void *data, object self_733590, int argc, object *args) /* object self_733590, object r_732145 */
 {
 object r_732145 = args[0];
  
closureN_type c_736758;
object e_737048 [8];
c_736758.hdr.mark = gc_color_red;
 c_736758.hdr.grayed = 0;
c_736758.tag = closureN_tag;
 c_736758.fn = (function_type)__lambda_381;
c_736758.num_args = 1;
c_736758.num_elements = 8;
c_736758.elements = (object *)e_737048;
c_736758.elements[0] = ((closureN)self_733590)->elements[0];
c_736758.elements[1] = ((closureN)self_733590)->elements[1];
c_736758.elements[2] = ((closureN)self_733590)->elements[2];
c_736758.elements[3] = ((closureN)self_733590)->elements[3];
c_736758.elements[4] = ((closureN)self_733590)->elements[4];
c_736758.elements[5] = ((closureN)self_733590)->elements[5];
c_736758.elements[6] = ((closureN)self_733590)->elements[6];
c_736758.elements[7] = ((closureN)self_733590)->elements[7];

return_direct_with_clo3(data,  __glo_difference_scheme_cyclone_transforms, (((closure)  __glo_difference_scheme_cyclone_transforms)->fn),  &c_736758, r_732145, ((closureN)self_733590)->elements[3]);; 
}

static void __lambda_381(void *data, object self_733591, int argc, object *args) /* object self_733591, object fv_73662_731189 */
 {
 object fv_73662_731189 = args[0];
  
closureN_type c_736760;
object e_737046 [9];
c_736760.hdr.mark = gc_color_red;
 c_736760.hdr.grayed = 0;
c_736760.tag = closureN_tag;
 c_736760.fn = (function_type)__lambda_382;
c_736760.num_args = 1;
c_736760.num_elements = 9;
c_736760.elements = (object *)e_737046;
c_736760.elements[0] = ((closureN)self_733591)->elements[0];
c_736760.elements[1] = ((closureN)self_733591)->elements[1];
c_736760.elements[2] = ((closureN)self_733591)->elements[2];
c_736760.elements[3] = fv_73662_731189;
c_736760.elements[4] = ((closureN)self_733591)->elements[3];
c_736760.elements[5] = ((closureN)self_733591)->elements[4];
c_736760.elements[6] = ((closureN)self_733591)->elements[5];
c_736760.elements[7] = ((closureN)self_733591)->elements[6];
c_736760.elements[8] = ((closureN)self_733591)->elements[7];

return_direct_with_clo3(data,  __glo_free_91vars_scheme_cyclone_transforms, (((closure)  __glo_free_91vars_scheme_cyclone_transforms)->fn),  &c_736760, ((closureN)self_733591)->elements[0], boolean_t);; 
}

static void __lambda_382(void *data, object self_733592, int argc, object *args) /* object self_733592, object r_732144 */
 {
 object r_732144 = args[0];
  
closureN_type c_736762;
object e_737044 [8];
c_736762.hdr.mark = gc_color_red;
 c_736762.hdr.grayed = 0;
c_736762.tag = closureN_tag;
 c_736762.fn = (function_type)__lambda_383;
c_736762.num_args = 1;
c_736762.num_elements = 8;
c_736762.elements = (object *)e_737044;
c_736762.elements[0] = ((closureN)self_733592)->elements[0];
c_736762.elements[1] = ((closureN)self_733592)->elements[1];
c_736762.elements[2] = ((closureN)self_733592)->elements[2];
c_736762.elements[3] = ((closureN)self_733592)->elements[3];
c_736762.elements[4] = ((closureN)self_733592)->elements[5];
c_736762.elements[5] = ((closureN)self_733592)->elements[6];
c_736762.elements[6] = ((closureN)self_733592)->elements[7];
c_736762.elements[7] = ((closureN)self_733592)->elements[8];

return_direct_with_clo3(data,  __glo__union_scheme_cyclone_transforms, (((closure)  __glo__union_scheme_cyclone_transforms)->fn),  &c_736762, r_732144, ((closureN)self_733592)->elements[4]);; 
}

static void __lambda_383(void *data, object self_733593, int argc, object *args) /* object self_733593, object bound_91vars_73665_731190 */
 {
 object bound_91vars_73665_731190 = args[0];
  
closureN_type c_736764;
object e_737042 [8];
c_736764.hdr.mark = gc_color_red;
 c_736764.hdr.grayed = 0;
c_736764.tag = closureN_tag;
 c_736764.fn = (function_type)__lambda_384;
c_736764.num_args = 1;
c_736764.num_elements = 8;
c_736764.elements = (object *)e_737042;
c_736764.elements[0] = ((closureN)self_733593)->elements[0];
c_736764.elements[1] = ((closureN)self_733593)->elements[1];
c_736764.elements[2] = ((closureN)self_733593)->elements[2];
c_736764.elements[3] = ((closureN)self_733593)->elements[3];
c_736764.elements[4] = ((closureN)self_733593)->elements[4];
c_736764.elements[5] = ((closureN)self_733593)->elements[5];
c_736764.elements[6] = ((closureN)self_733593)->elements[6];
c_736764.elements[7] = ((closureN)self_733593)->elements[7];

return_direct_with_clo3(data,  __glo_difference_scheme_cyclone_transforms, (((closure)  __glo_difference_scheme_cyclone_transforms)->fn),  &c_736764, ((closureN)self_733593)->elements[3], bound_91vars_73665_731190);; 
}

static void __lambda_384(void *data, object self_733594, int argc, object *args) /* object self_733594, object unbound_91vars_73668_731191 */
 {
 object unbound_91vars_73668_731191 = args[0];
  
closureN_type c_736766;
object e_737039 [8];
c_736766.hdr.mark = gc_color_red;
 c_736766.hdr.grayed = 0;
c_736766.tag = closureN_tag;
 c_736766.fn = (function_type)__lambda_385;
c_736766.num_args = 1;
c_736766.num_elements = 8;
c_736766.elements = (object *)e_737039;
c_736766.elements[0] = ((closureN)self_733594)->elements[0];
c_736766.elements[1] = ((closureN)self_733594)->elements[1];
c_736766.elements[2] = ((closureN)self_733594)->elements[2];
c_736766.elements[3] = ((closureN)self_733594)->elements[3];
c_736766.elements[4] = ((closureN)self_733594)->elements[4];
c_736766.elements[5] = ((closureN)self_733594)->elements[5];
c_736766.elements[6] = ((closureN)self_733594)->elements[6];
c_736766.elements[7] = ((closureN)self_733594)->elements[7];


make_pair(c_737041,quote_define,NULL);c_737041.hdr.immutable = 1;

make_pair(c_737040,quote_call_95cc,&c_737041);c_737040.hdr.immutable = 1;
return_direct_with_clo3(data,  __glo_difference_scheme_cyclone_transforms, (((closure)  __glo_difference_scheme_cyclone_transforms)->fn),  &c_736766, unbound_91vars_73668_731191, &c_737040);; 
}

static void __lambda_385(void *data, object self_733595, int argc, object *args) /* object self_733595, object unknown_91vars_73671_731192_732840 */
 {
 object unknown_91vars_73671_731192_732840 = args[0];
  
closureN_type c_736768;
object e_737036 [9];
c_736768.hdr.mark = gc_color_red;
 c_736768.hdr.grayed = 0;
c_736768.tag = closureN_tag;
 c_736768.fn = (function_type)__lambda_386;
c_736768.num_args = 1;
c_736768.num_elements = 9;
c_736768.elements = (object *)e_737036;
c_736768.elements[0] = ((closureN)self_733595)->elements[0];
c_736768.elements[1] = ((closureN)self_733595)->elements[1];
c_736768.elements[2] = ((closureN)self_733595)->elements[2];
c_736768.elements[3] = ((closureN)self_733595)->elements[3];
c_736768.elements[4] = ((closureN)self_733595)->elements[4];
c_736768.elements[5] = ((closureN)self_733595)->elements[5];
c_736768.elements[6] = ((closureN)self_733595)->elements[6];
c_736768.elements[7] = ((closureN)self_733595)->elements[7];
c_736768.elements[8] = unknown_91vars_73671_731192_732840;



return_direct_with_clo1(data,(closure)&c_736768,__lambda_386,  Cyc_length(data, unknown_91vars_73671_731192_732840));; 
}

static void __lambda_386(void *data, object self_733596, int argc, object *args) /* object self_733596, object r_732142_732841 */
 {
 object r_732142_732841 = args[0];
    
if( (boolean_f != Cyc_num_fast_gt_op(data, r_732142_732841, obj_int2obj(0))) ){ 
  
closureN_type c_736772;
object e_736794 [3];
c_736772.hdr.mark = gc_color_red;
 c_736772.hdr.grayed = 0;
c_736772.tag = closureN_tag;
 c_736772.fn = (function_type)__lambda_387;
c_736772.num_args = 1;
c_736772.num_elements = 3;
c_736772.elements = (object *)e_736794;
c_736772.elements[0] = ((closureN)self_733596)->elements[5];
c_736772.elements[1] = ((closureN)self_733596)->elements[7];
c_736772.elements[2] = ((closureN)self_733596)->elements[8];

return_direct_with_clo1(data,  __glo__list_scheme_base, (((closure)  __glo__list_scheme_base)->fn),  &c_736772);
} else { 
  
closureN_type c_736796;
object e_737034 [7];
c_736796.hdr.mark = gc_color_red;
 c_736796.hdr.grayed = 0;
c_736796.tag = closureN_tag;
 c_736796.fn = (function_type)__lambda_388;
c_736796.num_args = 1;
c_736796.num_elements = 7;
c_736796.elements = (object *)e_737034;
c_736796.elements[0] = ((closureN)self_733596)->elements[0];
c_736796.elements[1] = ((closureN)self_733596)->elements[1];
c_736796.elements[2] = ((closureN)self_733596)->elements[2];
c_736796.elements[3] = ((closureN)self_733596)->elements[3];
c_736796.elements[4] = ((closureN)self_733596)->elements[4];
c_736796.elements[5] = ((closureN)self_733596)->elements[5];
c_736796.elements[6] = ((closureN)self_733596)->elements[6];

return_direct_with_clo2(data,  __glo_define_127_scheme_cyclone_util, (((closure)  __glo_define_127_scheme_cyclone_util)->fn),  &c_736796, ((closureN)self_733596)->elements[0]);}
;; 
}

static void __lambda_388(void *data, object self_733598, int argc, object *args) /* object self_733598, object r_732086_732845 */
 {
 object r_732086_732845 = args[0];
  if( (boolean_f != r_732086_732845) ){ 
  
closureN_type c_736798;
object e_737007 [7];
c_736798.hdr.mark = gc_color_red;
 c_736798.hdr.grayed = 0;
c_736798.tag = closureN_tag;
 c_736798.fn = (function_type)__lambda_389;
c_736798.num_args = 1;
c_736798.num_elements = 7;
c_736798.elements = (object *)e_737007;
c_736798.elements[0] = ((closureN)self_733598)->elements[0];
c_736798.elements[1] = ((closureN)self_733598)->elements[1];
c_736798.elements[2] = ((closureN)self_733598)->elements[2];
c_736798.elements[3] = ((closureN)self_733598)->elements[3];
c_736798.elements[4] = ((closureN)self_733598)->elements[4];
c_736798.elements[5] = ((closureN)self_733598)->elements[5];
c_736798.elements[6] = ((closureN)self_733598)->elements[6];


complex_num_type local_737010; 
return_direct_with_clo1(data,(closure)&c_736798,__lambda_389,  ((inline_function_type)
                   ((closure)__glo_define_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_737010, ((closureN)self_733598)->elements[0]));
} else { 
  
closureN_type c_737013;
object e_737030 [4];
c_737013.hdr.mark = gc_color_red;
 c_737013.hdr.grayed = 0;
c_737013.tag = closureN_tag;
 c_737013.fn = (function_type)__lambda_422;
c_737013.num_args = 1;
c_737013.num_elements = 4;
c_737013.elements = (object *)e_737030;
c_737013.elements[0] = ((closureN)self_733598)->elements[0];
c_737013.elements[1] = ((closureN)self_733598)->elements[1];
c_737013.elements[2] = ((closureN)self_733598)->elements[4];
c_737013.elements[3] = ((closureN)self_733598)->elements[5];


make_pair(c_737033,quote_define,NULL);c_737033.hdr.immutable = 1;

make_pair(c_737032,quote_call_95cc,&c_737033);c_737032.hdr.immutable = 1;
return_direct_with_clo3(data,  __glo_difference_scheme_cyclone_transforms, (((closure)  __glo_difference_scheme_cyclone_transforms)->fn),  &c_737013, ((closureN)self_733598)->elements[3], &c_737032);}
;; 
}

static void __lambda_422(void *data, object self_733632, int argc, object *args) /* object self_733632, object r_732140_732887_732913 */
 {
 object r_732140_732887_732913 = args[0];
  


closureN_type c_737018;
object e_737028 [2];
c_737018.hdr.mark = gc_color_red;
 c_737018.hdr.grayed = 0;
c_737018.tag = closureN_tag;
 c_737018.fn = (function_type)__lambda_423;
c_737018.num_args = 1;
c_737018.num_elements = 2;
c_737018.elements = (object *)e_737028;
c_737018.elements[0] = ((closureN)self_733632)->elements[1];
c_737018.elements[1] = ((closureN)self_733632)->elements[3];

return_closcall3(data,  car(((closureN)self_733632)->elements[2]),  &c_737018, ((closureN)self_733632)->elements[0], r_732140_732887_732913);; 
}

static void __lambda_423(void *data, object self_733633, int argc, object *args) /* object self_733633, object r_732138_732888_732914 */
 {
 object r_732138_732888_732914 = args[0];
  
closureN_type c_737020;
object e_737027 [3];
c_737020.hdr.mark = gc_color_red;
 c_737020.hdr.grayed = 0;
c_737020.tag = closureN_tag;
 c_737020.fn = (function_type)__lambda_424;
c_737020.num_args = 1;
c_737020.num_elements = 3;
c_737020.elements = (object *)e_737027;
c_737020.elements[0] = ((closureN)self_733633)->elements[0];
c_737020.elements[1] = ((closureN)self_733633)->elements[1];
c_737020.elements[2] = r_732138_732888_732914;

return_direct_with_clo1(data,  __glo__list_scheme_base, (((closure)  __glo__list_scheme_base)->fn),  &c_737020);; 
}

static void __lambda_424(void *data, object self_733634, int argc, object *args) /* object self_733634, object r_732139_732889_732915 */
 {
 object r_732139_732889_732915 = args[0];
  

return_closcall3(data,  car(((closureN)self_733634)->elements[0]),  ((closureN)self_733634)->elements[1], ((closureN)self_733634)->elements[2], r_732139_732889_732915);; 
}

static void __lambda_389(void *data, object self_733599, int argc, object *args) /* object self_733599, object r_732137_732846 */
 {
 object r_732137_732846 = args[0];
  
closureN_type c_736800;
object e_737004 [8];
c_736800.hdr.mark = gc_color_red;
 c_736800.hdr.grayed = 0;
c_736800.tag = closureN_tag;
 c_736800.fn = (function_type)__lambda_390;
c_736800.num_args = 1;
c_736800.num_elements = 8;
c_736800.elements = (object *)e_737004;
c_736800.elements[0] = ((closureN)self_733599)->elements[0];
c_736800.elements[1] = ((closureN)self_733599)->elements[1];
c_736800.elements[2] = ((closureN)self_733599)->elements[2];
c_736800.elements[3] = ((closureN)self_733599)->elements[3];
c_736800.elements[4] = ((closureN)self_733599)->elements[4];
c_736800.elements[5] = ((closureN)self_733599)->elements[5];
c_736800.elements[6] = ((closureN)self_733599)->elements[6];
c_736800.elements[7] = r_732137_732846;



return_direct_with_clo2(data,  __glo_lambda_127_scheme_cyclone_util, (((closure)  __glo_lambda_127_scheme_cyclone_util)->fn),  &c_736800, Cyc_car(data, r_732137_732846));; 
}

static void __lambda_390(void *data, object self_733600, int argc, object *args) /* object self_733600, object r_732088_732847 */
 {
 object r_732088_732847 = args[0];
  if( (boolean_f != r_732088_732847) ){ 
  
closureN_type c_736802;
object e_736961 [7];
c_736802.hdr.mark = gc_color_red;
 c_736802.hdr.grayed = 0;
c_736802.tag = closureN_tag;
 c_736802.fn = (function_type)__lambda_391;
c_736802.num_args = 1;
c_736802.num_elements = 7;
c_736802.elements = (object *)e_736961;
c_736802.elements[0] = ((closureN)self_733600)->elements[0];
c_736802.elements[1] = ((closureN)self_733600)->elements[1];
c_736802.elements[2] = ((closureN)self_733600)->elements[2];
c_736802.elements[3] = ((closureN)self_733600)->elements[3];
c_736802.elements[4] = ((closureN)self_733600)->elements[5];
c_736802.elements[5] = ((closureN)self_733600)->elements[6];
c_736802.elements[6] = ((closureN)self_733600)->elements[7];



return_direct_with_clo2(data,  __glo_lambda_91formals_91_125list_scheme_cyclone_util, (((closure)  __glo_lambda_91formals_91_125list_scheme_cyclone_util)->fn),  &c_736802, Cyc_car(data, ((closureN)self_733600)->elements[7]));
} else { 
  
closureN_type c_736966;
object e_737002 [5];
c_736966.hdr.mark = gc_color_red;
 c_736966.hdr.grayed = 0;
c_736966.tag = closureN_tag;
 c_736966.fn = (function_type)__lambda_417;
c_736966.num_args = 1;
c_736966.num_elements = 5;
c_736966.elements = (object *)e_737002;
c_736966.elements[0] = ((closureN)self_733600)->elements[0];
c_736966.elements[1] = ((closureN)self_733600)->elements[1];
c_736966.elements[2] = ((closureN)self_733600)->elements[3];
c_736966.elements[3] = ((closureN)self_733600)->elements[4];
c_736966.elements[4] = ((closureN)self_733600)->elements[5];

return_direct_with_clo2(data,  __glo_define_91_125var_scheme_cyclone_util, (((closure)  __glo_define_91_125var_scheme_cyclone_util)->fn),  &c_736966, ((closureN)self_733600)->elements[0]);}
;; 
}

static void __lambda_417(void *data, object self_733627, int argc, object *args) /* object self_733627, object r_732130_732879 */
 {
 object r_732130_732879 = args[0];
  
closureN_type c_736968;
object e_736998 [5];
c_736968.hdr.mark = gc_color_red;
 c_736968.hdr.grayed = 0;
c_736968.tag = closureN_tag;
 c_736968.fn = (function_type)__lambda_418;
c_736968.num_args = 1;
c_736968.num_elements = 5;
c_736968.elements = (object *)e_736998;
c_736968.elements[0] = ((closureN)self_733627)->elements[0];
c_736968.elements[1] = ((closureN)self_733627)->elements[1];
c_736968.elements[2] = ((closureN)self_733627)->elements[3];
c_736968.elements[3] = ((closureN)self_733627)->elements[4];
c_736968.elements[4] = r_732130_732879;


make_pair(c_737001,quote_define,NULL);c_737001.hdr.immutable = 1;

make_pair(c_737000,quote_call_95cc,&c_737001);c_737000.hdr.immutable = 1;
return_direct_with_clo3(data,  __glo_difference_scheme_cyclone_transforms, (((closure)  __glo_difference_scheme_cyclone_transforms)->fn),  &c_736968, ((closureN)self_733627)->elements[2], &c_737000);; 
}

static void __lambda_418(void *data, object self_733628, int argc, object *args) /* object self_733628, object r_732135_732881_732907 */
 {
 object r_732135_732881_732907 = args[0];
  


closureN_type c_736973;
object e_736993 [3];
c_736973.hdr.mark = gc_color_red;
 c_736973.hdr.grayed = 0;
c_736973.tag = closureN_tag;
 c_736973.fn = (function_type)__lambda_419;
c_736973.num_args = 1;
c_736973.num_elements = 3;
c_736973.elements = (object *)e_736993;
c_736973.elements[0] = ((closureN)self_733628)->elements[1];
c_736973.elements[1] = ((closureN)self_733628)->elements[3];
c_736973.elements[2] = ((closureN)self_733628)->elements[4];


complex_num_type local_736996; 
return_closcall3(data,  car(((closureN)self_733628)->elements[2]),  &c_736973, ((inline_function_type)
                   ((closure)__glo_define_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736996, ((closureN)self_733628)->elements[0]), r_732135_732881_732907);; 
}

static void __lambda_419(void *data, object self_733629, int argc, object *args) /* object self_733629, object r_732132_732882_732908 */
 {
 object r_732132_732882_732908 = args[0];
  
closureN_type c_736975;
object e_736992 [4];
c_736975.hdr.mark = gc_color_red;
 c_736975.hdr.grayed = 0;
c_736975.tag = closureN_tag;
 c_736975.fn = (function_type)__lambda_420;
c_736975.num_args = 1;
c_736975.num_elements = 4;
c_736975.elements = (object *)e_736992;
c_736975.elements[0] = ((closureN)self_733629)->elements[0];
c_736975.elements[1] = ((closureN)self_733629)->elements[1];
c_736975.elements[2] = ((closureN)self_733629)->elements[2];
c_736975.elements[3] = r_732132_732882_732908;

return_direct_with_clo1(data,  __glo__list_scheme_base, (((closure)  __glo__list_scheme_base)->fn),  &c_736975);; 
}

static void __lambda_420(void *data, object self_733630, int argc, object *args) /* object self_733630, object r_732133_732883_732909 */
 {
 object r_732133_732883_732909 = args[0];
  


closureN_type c_736980;
object e_736990 [2];
c_736980.hdr.mark = gc_color_red;
 c_736980.hdr.grayed = 0;
c_736980.tag = closureN_tag;
 c_736980.fn = (function_type)__lambda_421;
c_736980.num_args = 1;
c_736980.num_elements = 2;
c_736980.elements = (object *)e_736990;
c_736980.elements[0] = ((closureN)self_733630)->elements[1];
c_736980.elements[1] = ((closureN)self_733630)->elements[2];

return_closcall3(data,  car(((closureN)self_733630)->elements[0]),  &c_736980, ((closureN)self_733630)->elements[3], r_732133_732883_732909);; 
}

static void __lambda_421(void *data, object self_733631, int argc, object *args) /* object self_733631, object r_732131_732884_732910 */
 {
 object r_732131_732884_732910 = args[0];
  
pair_type local_736985; 

pair_type local_736988; 
return_direct_with_clo1(data,  ((closureN)self_733631)->elements[0], (((closure)  ((closureN)self_733631)->elements[0])->fn),  set_pair_as_expr(&local_736985, quote_define, set_pair_as_expr(&local_736988, ((closureN)self_733631)->elements[1], r_732131_732884_732910)));; 
}

static void __lambda_391(void *data, object self_733601, int argc, object *args) /* object self_733601, object args_73687_731195_732848 */
 {
 object args_73687_731195_732848 = args[0];
  
closureN_type c_736804;
object e_736957 [8];
c_736804.hdr.mark = gc_color_red;
 c_736804.hdr.grayed = 0;
c_736804.tag = closureN_tag;
 c_736804.fn = (function_type)__lambda_392;
c_736804.num_args = 1;
c_736804.num_elements = 8;
c_736804.elements = (object *)e_736957;
c_736804.elements[0] = args_73687_731195_732848;
c_736804.elements[1] = ((closureN)self_733601)->elements[0];
c_736804.elements[2] = ((closureN)self_733601)->elements[1];
c_736804.elements[3] = ((closureN)self_733601)->elements[2];
c_736804.elements[4] = ((closureN)self_733601)->elements[3];
c_736804.elements[5] = ((closureN)self_733601)->elements[4];
c_736804.elements[6] = ((closureN)self_733601)->elements[5];
c_736804.elements[7] = ((closureN)self_733601)->elements[6];



return_direct_with_clo2(data,  __glo_lambda_91formals_91type_scheme_cyclone_util, (((closure)  __glo_lambda_91formals_91type_scheme_cyclone_util)->fn),  &c_736804, Cyc_car(data, ((closureN)self_733601)->elements[6]));; 
}

static void __lambda_392(void *data, object self_733602, int argc, object *args) /* object self_733602, object ltype_73690_731196_732849 */
 {
 object ltype_73690_731196_732849 = args[0];
  
closureN_type c_736806;
object e_736946 [9];
c_736806.hdr.mark = gc_color_red;
 c_736806.hdr.grayed = 0;
c_736806.tag = closureN_tag;
 c_736806.fn = (function_type)__lambda_393;
c_736806.num_args = 1;
c_736806.num_elements = 9;
c_736806.elements = (object *)e_736946;
c_736806.elements[0] = ((closureN)self_733602)->elements[0];
c_736806.elements[1] = ((closureN)self_733602)->elements[1];
c_736806.elements[2] = ((closureN)self_733602)->elements[2];
c_736806.elements[3] = ((closureN)self_733602)->elements[3];
c_736806.elements[4] = ((closureN)self_733602)->elements[4];
c_736806.elements[5] = ((closureN)self_733602)->elements[5];
c_736806.elements[6] = ltype_73690_731196_732849;
c_736806.elements[7] = ((closureN)self_733602)->elements[6];
c_736806.elements[8] = ((closureN)self_733602)->elements[7];


mclosure0(c_736947, (function_type)__lambda_415);c_736947.num_args = 1;
return_direct_with_clo1(data,(closure)&c_736806,__lambda_393,  &c_736947);; 
}

static void __lambda_415(void *data, object self_733603, int argc, object *args) /* object self_733603, object k_732126_732876, object a_73711_731204_732877 */
 {
 object k_732126_732876 = args[0]; object a_73711_731204_732877 = args[1];
  
closureN_type c_736949;
object e_736956 [2];
c_736949.hdr.mark = gc_color_red;
 c_736949.hdr.grayed = 0;
c_736949.tag = closureN_tag;
 c_736949.fn = (function_type)__lambda_416;
c_736949.num_args = 1;
c_736949.num_elements = 2;
c_736949.elements = (object *)e_736956;
c_736949.elements[0] = a_73711_731204_732877;
c_736949.elements[1] = k_732126_732876;

return_direct_with_clo2(data,  __glo_gensym_scheme_cyclone_util, (((closure)  __glo_gensym_scheme_cyclone_util)->fn),  &c_736949, a_73711_731204_732877);; 
}

static void __lambda_416(void *data, object self_733604, int argc, object *args) /* object self_733604, object r_732127_732878 */
 {
 object r_732127_732878 = args[0];
  
pair_type local_736954; 
return_direct_with_clo1(data,  ((closureN)self_733604)->elements[1], (((closure)  ((closureN)self_733604)->elements[1])->fn),  set_pair_as_expr(&local_736954, ((closureN)self_733604)->elements[0], r_732127_732878));; 
}

static void __lambda_393(void *data, object self_733605, int argc, object *args) /* object self_733605, object r_732125_732850 */
 {
 object r_732125_732850 = args[0];
  
closureN_type c_736808;
object e_736944 [8];
c_736808.hdr.mark = gc_color_red;
 c_736808.hdr.grayed = 0;
c_736808.tag = closureN_tag;
 c_736808.fn = (function_type)__lambda_394;
c_736808.num_args = 1;
c_736808.num_elements = 8;
c_736808.elements = (object *)e_736944;
c_736808.elements[0] = ((closureN)self_733605)->elements[1];
c_736808.elements[1] = ((closureN)self_733605)->elements[2];
c_736808.elements[2] = ((closureN)self_733605)->elements[3];
c_736808.elements[3] = ((closureN)self_733605)->elements[4];
c_736808.elements[4] = ((closureN)self_733605)->elements[5];
c_736808.elements[5] = ((closureN)self_733605)->elements[6];
c_736808.elements[6] = ((closureN)self_733605)->elements[7];
c_736808.elements[7] = ((closureN)self_733605)->elements[8];

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_736808, r_732125_732850, ((closureN)self_733605)->elements[0]);; 
}

static void __lambda_394(void *data, object self_733606, int argc, object *args) /* object self_733606, object a_91lookup_73693_731197_732851 */
 {
 object a_91lookup_73693_731197_732851 = args[0];
  


closureN_type c_736813;
object e_736937 [8];
c_736813.hdr.mark = gc_color_red;
 c_736813.hdr.grayed = 0;
c_736813.tag = closureN_tag;
 c_736813.fn = (function_type)__lambda_395;
c_736813.num_args = 1;
c_736813.num_elements = 8;
c_736813.elements = (object *)e_736937;
c_736813.elements[0] = a_91lookup_73693_731197_732851;
c_736813.elements[1] = ((closureN)self_733606)->elements[0];
c_736813.elements[2] = ((closureN)self_733606)->elements[1];
c_736813.elements[3] = ((closureN)self_733606)->elements[3];
c_736813.elements[4] = ((closureN)self_733606)->elements[4];
c_736813.elements[5] = ((closureN)self_733606)->elements[5];
c_736813.elements[6] = ((closureN)self_733606)->elements[6];
c_736813.elements[7] = ((closureN)self_733606)->elements[7];


complex_num_type local_736940; 


return_closcall2(data,  car(((closureN)self_733606)->elements[2]),  &c_736813, ((inline_function_type)
                   ((closure)__glo_lambda_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736940, Cyc_car(data, ((closureN)self_733606)->elements[7])));; 
}

static void __lambda_395(void *data, object self_733607, int argc, object *args) /* object self_733607, object define_91vars_73696_731198_732852 */
 {
 object define_91vars_73696_731198_732852 = args[0];
  


closureN_type c_736818;
object e_736936 [8];
c_736818.hdr.mark = gc_color_red;
 c_736818.hdr.grayed = 0;
c_736818.tag = closureN_tag;
 c_736818.fn = (function_type)__lambda_396;
c_736818.num_args = 1;
c_736818.num_elements = 8;
c_736818.elements = (object *)e_736936;
c_736818.elements[0] = ((closureN)self_733607)->elements[0];
c_736818.elements[1] = ((closureN)self_733607)->elements[1];
c_736818.elements[2] = ((closureN)self_733607)->elements[2];
c_736818.elements[3] = define_91vars_73696_731198_732852;
c_736818.elements[4] = ((closureN)self_733607)->elements[3];
c_736818.elements[5] = ((closureN)self_733607)->elements[4];
c_736818.elements[6] = ((closureN)self_733607)->elements[5];
c_736818.elements[7] = ((closureN)self_733607)->elements[7];

return_closcall2(data,  car(((closureN)self_733607)->elements[6]),  &c_736818, define_91vars_73696_731198_732852);; 
}

static void __lambda_396(void *data, object self_733608, int argc, object *args) /* object self_733608, object defines_91a_91lookup_73699_731199_732853 */
 {
 object defines_91a_91lookup_73699_731199_732853 = args[0];
  
closureN_type c_736820;
object e_736934 [8];
c_736820.hdr.mark = gc_color_red;
 c_736820.hdr.grayed = 0;
c_736820.tag = closureN_tag;
 c_736820.fn = (function_type)__lambda_397;
c_736820.num_args = 1;
c_736820.num_elements = 8;
c_736820.elements = (object *)e_736934;
c_736820.elements[0] = ((closureN)self_733608)->elements[0];
c_736820.elements[1] = ((closureN)self_733608)->elements[2];
c_736820.elements[2] = ((closureN)self_733608)->elements[3];
c_736820.elements[3] = defines_91a_91lookup_73699_731199_732853;
c_736820.elements[4] = ((closureN)self_733608)->elements[4];
c_736820.elements[5] = ((closureN)self_733608)->elements[5];
c_736820.elements[6] = ((closureN)self_733608)->elements[6];
c_736820.elements[7] = ((closureN)self_733608)->elements[7];

return_direct_with_clo2(data,  __glo_define_91_125var_scheme_cyclone_util, (((closure)  __glo_define_91_125var_scheme_cyclone_util)->fn),  &c_736820, ((closureN)self_733608)->elements[1]);; 
}

static void __lambda_397(void *data, object self_733609, int argc, object *args) /* object self_733609, object r_732096_732854 */
 {
 object r_732096_732854 = args[0];
  
closureN_type c_736822;
object e_736929 [9];
c_736822.hdr.mark = gc_color_red;
 c_736822.hdr.grayed = 0;
c_736822.tag = closureN_tag;
 c_736822.fn = (function_type)__lambda_398;
c_736822.num_args = 1;
c_736822.num_elements = 9;
c_736822.elements = (object *)e_736929;
c_736822.elements[0] = ((closureN)self_733609)->elements[0];
c_736822.elements[1] = ((closureN)self_733609)->elements[1];
c_736822.elements[2] = ((closureN)self_733609)->elements[2];
c_736822.elements[3] = ((closureN)self_733609)->elements[3];
c_736822.elements[4] = ((closureN)self_733609)->elements[4];
c_736822.elements[5] = ((closureN)self_733609)->elements[5];
c_736822.elements[6] = ((closureN)self_733609)->elements[6];
c_736822.elements[7] = r_732096_732854;
c_736822.elements[8] = ((closureN)self_733609)->elements[7];


mclosure0(c_736930, (function_type)__lambda_414);c_736930.num_args = 1;
return_direct_with_clo1(data,(closure)&c_736822,__lambda_398,  &c_736930);; 
}

static void __lambda_414(void *data, object self_733610, int argc, object *args) /* object self_733610, object k_732123_732874, object p_73704_731200_732875 */
 {
 object k_732123_732874 = args[0]; object p_73704_731200_732875 = args[1];
  

return_direct_with_clo1(data,  k_732123_732874, (((closure)  k_732123_732874)->fn),  Cyc_cdr(data, p_73704_731200_732875));; 
}

static void __lambda_398(void *data, object self_733611, int argc, object *args) /* object self_733611, object r_732122_732855 */
 {
 object r_732122_732855 = args[0];
  
closureN_type c_736824;
object e_736927 [9];
c_736824.hdr.mark = gc_color_red;
 c_736824.hdr.grayed = 0;
c_736824.tag = closureN_tag;
 c_736824.fn = (function_type)__lambda_399;
c_736824.num_args = 1;
c_736824.num_elements = 9;
c_736824.elements = (object *)e_736927;
c_736824.elements[0] = ((closureN)self_733611)->elements[0];
c_736824.elements[1] = ((closureN)self_733611)->elements[1];
c_736824.elements[2] = ((closureN)self_733611)->elements[2];
c_736824.elements[3] = ((closureN)self_733611)->elements[3];
c_736824.elements[4] = ((closureN)self_733611)->elements[4];
c_736824.elements[5] = ((closureN)self_733611)->elements[5];
c_736824.elements[6] = ((closureN)self_733611)->elements[6];
c_736824.elements[7] = ((closureN)self_733611)->elements[7];
c_736824.elements[8] = ((closureN)self_733611)->elements[8];

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_736824, r_732122_732855, ((closureN)self_733611)->elements[0]);; 
}

static void __lambda_399(void *data, object self_733612, int argc, object *args) /* object self_733612, object r_732121_732856 */
 {
 object r_732121_732856 = args[0];
  
closureN_type c_736826;
object e_736925 [8];
c_736826.hdr.mark = gc_color_red;
 c_736826.hdr.grayed = 0;
c_736826.tag = closureN_tag;
 c_736826.fn = (function_type)__lambda_400;
c_736826.num_args = 1;
c_736826.num_elements = 8;
c_736826.elements = (object *)e_736925;
c_736826.elements[0] = ((closureN)self_733612)->elements[0];
c_736826.elements[1] = ((closureN)self_733612)->elements[1];
c_736826.elements[2] = ((closureN)self_733612)->elements[2];
c_736826.elements[3] = ((closureN)self_733612)->elements[3];
c_736826.elements[4] = ((closureN)self_733612)->elements[4];
c_736826.elements[5] = ((closureN)self_733612)->elements[5];
c_736826.elements[6] = ((closureN)self_733612)->elements[7];
c_736826.elements[7] = ((closureN)self_733612)->elements[8];

return_direct_with_clo3(data,  __glo_list_91_125lambda_91formals_scheme_cyclone_transforms, (((closure)  __glo_list_91_125lambda_91formals_scheme_cyclone_transforms)->fn),  &c_736826, r_732121_732856, ((closureN)self_733612)->elements[6]);; 
}

static void __lambda_400(void *data, object self_733613, int argc, object *args) /* object self_733613, object r_732102_732857 */
 {
 object r_732102_732857 = args[0];
  
closureN_type c_736828;
object e_736921 [8];
c_736828.hdr.mark = gc_color_red;
 c_736828.hdr.grayed = 0;
c_736828.tag = closureN_tag;
 c_736828.fn = (function_type)__lambda_401;
c_736828.num_args = 1;
c_736828.num_elements = 8;
c_736828.elements = (object *)e_736921;
c_736828.elements[0] = ((closureN)self_733613)->elements[0];
c_736828.elements[1] = ((closureN)self_733613)->elements[1];
c_736828.elements[2] = ((closureN)self_733613)->elements[2];
c_736828.elements[3] = ((closureN)self_733613)->elements[3];
c_736828.elements[4] = ((closureN)self_733613)->elements[5];
c_736828.elements[5] = ((closureN)self_733613)->elements[6];
c_736828.elements[6] = r_732102_732857;
c_736828.elements[7] = ((closureN)self_733613)->elements[7];


make_pair(c_736924,quote_define,NULL);c_736924.hdr.immutable = 1;

make_pair(c_736923,quote_call_95cc,&c_736924);c_736923.hdr.immutable = 1;
return_direct_with_clo3(data,  __glo_difference_scheme_cyclone_transforms, (((closure)  __glo_difference_scheme_cyclone_transforms)->fn),  &c_736828, ((closureN)self_733613)->elements[4], &c_736923);; 
}

static void __lambda_401(void *data, object self_733614, int argc, object *args) /* object self_733614, object r_732119_732859_732891 */
 {
 object r_732119_732859_732891 = args[0];
  
closureN_type c_736830;
object e_736919 [7];
c_736830.hdr.mark = gc_color_red;
 c_736830.hdr.grayed = 0;
c_736830.tag = closureN_tag;
 c_736830.fn = (function_type)__lambda_402;
c_736830.num_args = 1;
c_736830.num_elements = 7;
c_736830.elements = (object *)e_736919;
c_736830.elements[0] = ((closureN)self_733614)->elements[0];
c_736830.elements[1] = ((closureN)self_733614)->elements[1];
c_736830.elements[2] = ((closureN)self_733614)->elements[3];
c_736830.elements[3] = ((closureN)self_733614)->elements[4];
c_736830.elements[4] = ((closureN)self_733614)->elements[5];
c_736830.elements[5] = ((closureN)self_733614)->elements[6];
c_736830.elements[6] = ((closureN)self_733614)->elements[7];

return_direct_with_clo3(data,  __glo__union_scheme_cyclone_transforms, (((closure)  __glo__union_scheme_cyclone_transforms)->fn),  &c_736830, ((closureN)self_733614)->elements[2], r_732119_732859_732891);; 
}

static void __lambda_402(void *data, object self_733615, int argc, object *args) /* object self_733615, object r_732106_732860_732892 */
 {
 object r_732106_732860_732892 = args[0];
  
closureN_type c_736832;
object e_736912 [6];
c_736832.hdr.mark = gc_color_red;
 c_736832.hdr.grayed = 0;
c_736832.tag = closureN_tag;
 c_736832.fn = (function_type)__lambda_403;
c_736832.num_args = 2;
c_736832.num_elements = 6;
c_736832.elements = (object *)e_736912;
c_736832.elements[0] = ((closureN)self_733615)->elements[0];
c_736832.elements[1] = ((closureN)self_733615)->elements[1];
c_736832.elements[2] = ((closureN)self_733615)->elements[2];
c_736832.elements[3] = ((closureN)self_733615)->elements[3];
c_736832.elements[4] = ((closureN)self_733615)->elements[4];
c_736832.elements[5] = ((closureN)self_733615)->elements[5];


complex_num_type local_736915; 


return_direct_with_clo2(data,(closure)&c_736832,__lambda_403,  r_732106_732860_732892, ((inline_function_type)
                   ((closure)__glo_lambda_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736915, Cyc_car(data, ((closureN)self_733615)->elements[6])));; 
}

static void __lambda_403(void *data, object self_733616, int argc, object *args) /* object self_733616, object fv_85_73705_731201_732861_732893, object ast_85_73706_731202_732862_732894 */
 {
 object fv_85_73705_731201_732861_732893 = args[0]; object ast_85_73706_731202_732862_732894 = args[1];
  
closureN_type c_736834;
object e_736875 [2];
c_736834.hdr.mark = gc_color_red;
 c_736834.hdr.grayed = 0;
c_736834.tag = closureN_tag;
 c_736834.fn = (function_type)__lambda_404;
c_736834.num_args = 0;
c_736834.num_elements = 2;
c_736834.elements = (object *)e_736875;
c_736834.elements[0] = ast_85_73706_731202_732862_732894;
c_736834.elements[1] = fv_85_73705_731201_732861_732893;


closureN_type c_736876;
object e_736911 [6];
c_736876.hdr.mark = gc_color_red;
 c_736876.hdr.grayed = 0;
c_736876.tag = closureN_tag;
 c_736876.fn = (function_type)__lambda_410;
c_736876.num_args = 1;
c_736876.num_elements = 6;
c_736876.elements = (object *)e_736911;
c_736876.elements[0] = ((closureN)self_733616)->elements[0];
c_736876.elements[1] = ((closureN)self_733616)->elements[1];
c_736876.elements[2] = ((closureN)self_733616)->elements[2];
c_736876.elements[3] = ((closureN)self_733616)->elements[3];
c_736876.elements[4] = ((closureN)self_733616)->elements[4];
c_736876.elements[5] = ((closureN)self_733616)->elements[5];

return_direct_with_clo1(data,(closure)&c_736834,__lambda_404,  &c_736876);; 
}

static void __lambda_410(void *data, object self_733617, int argc, object *args) /* object self_733617, object r_732104_732870_732902 */
 {
 object r_732104_732870_732902 = args[0];
  
closureN_type c_736878;
object e_736908 [5];
c_736878.hdr.mark = gc_color_red;
 c_736878.hdr.grayed = 0;
c_736878.tag = closureN_tag;
 c_736878.fn = (function_type)__lambda_411;
c_736878.num_args = 1;
c_736878.num_elements = 5;
c_736878.elements = (object *)e_736908;
c_736878.elements[0] = ((closureN)self_733617)->elements[1];
c_736878.elements[1] = ((closureN)self_733617)->elements[3];
c_736878.elements[2] = ((closureN)self_733617)->elements[4];
c_736878.elements[3] = ((closureN)self_733617)->elements[5];
c_736878.elements[4] = r_732104_732870_732902;

return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_736878, ((closureN)self_733617)->elements[0], ((closureN)self_733617)->elements[2]);; 
}

static void __lambda_411(void *data, object self_733618, int argc, object *args) /* object self_733618, object r_732105_732871_732903 */
 {
 object r_732105_732871_732903 = args[0];
  


closureN_type c_736883;
object e_736906 [3];
c_736883.hdr.mark = gc_color_red;
 c_736883.hdr.grayed = 0;
c_736883.tag = closureN_tag;
 c_736883.fn = (function_type)__lambda_412;
c_736883.num_args = 1;
c_736883.num_elements = 3;
c_736883.elements = (object *)e_736906;
c_736883.elements[0] = ((closureN)self_733618)->elements[1];
c_736883.elements[1] = ((closureN)self_733618)->elements[2];
c_736883.elements[2] = ((closureN)self_733618)->elements[3];

return_closcall3(data,  car(((closureN)self_733618)->elements[0]),  &c_736883, ((closureN)self_733618)->elements[4], r_732105_732871_732903);; 
}

static void __lambda_412(void *data, object self_733619, int argc, object *args) /* object self_733619, object r_732103_732872_732904 */
 {
 object r_732103_732872_732904 = args[0];
  
closureN_type c_736885;
object e_736901 [2];
c_736885.hdr.mark = gc_color_red;
 c_736885.hdr.grayed = 0;
c_736885.tag = closureN_tag;
 c_736885.fn = (function_type)__lambda_413;
c_736885.num_args = 1;
c_736885.num_elements = 2;
c_736885.elements = (object *)e_736901;
c_736885.elements[0] = ((closureN)self_733619)->elements[0];
c_736885.elements[1] = ((closureN)self_733619)->elements[1];


pair_type local_736904; 
return_direct_with_clo1(data,(closure)&c_736885,__lambda_413,  set_pair_as_expr(&local_736904, ((closureN)self_733619)->elements[2], r_732103_732872_732904));; 
}

static void __lambda_413(void *data, object self_733620, int argc, object *args) /* object self_733620, object r_732101_732873_732905 */
 {
 object r_732101_732873_732905 = args[0];
  
pair_type local_736890; 

pair_type local_736893; 

pair_type local_736897; 

pair_type local_736900; 
return_direct_with_clo1(data,  ((closureN)self_733620)->elements[0], (((closure)  ((closureN)self_733620)->elements[0])->fn),  set_pair_as_expr(&local_736890, quote_define, set_pair_as_expr(&local_736893, ((closureN)self_733620)->elements[1], set_pair_as_expr(&local_736897, set_pair_as_expr(&local_736900, quote_lambda, r_732101_732873_732905), NULL))));; 
}

static void __lambda_404(void *data, object self_733621, int argc, object *args) /* object self_733621, object k_732108_732863_732895 */
 {
 object k_732108_732863_732895 = args[0];
  
closureN_type c_736836;
object e_736871 [3];
c_736836.hdr.mark = gc_color_red;
 c_736836.hdr.grayed = 0;
c_736836.tag = closureN_tag;
 c_736836.fn = (function_type)__lambda_405;
c_736836.num_args = 1;
c_736836.num_elements = 3;
c_736836.elements = (object *)e_736871;
c_736836.elements[0] = ((closureN)self_733621)->elements[0];
c_736836.elements[1] = ((closureN)self_733621)->elements[1];
c_736836.elements[2] = k_732108_732863_732895;



return_direct_with_clo1(data,(closure)&c_736836,__lambda_405,  Cyc_length(data, ((closureN)self_733621)->elements[1]));; 
}

static void __lambda_405(void *data, object self_733622, int argc, object *args) /* object self_733622, object r_732118_732864_732896 */
 {
 object r_732118_732864_732896 = args[0];
    
if( (boolean_f != Cyc_num_fast_gt_op(data, r_732118_732864_732896, obj_int2obj(0))) ){ 
  
closureN_type c_736840;
object e_736862 [2];
c_736840.hdr.mark = gc_color_red;
 c_736840.hdr.grayed = 0;
c_736840.tag = closureN_tag;
 c_736840.fn = (function_type)__lambda_406;
c_736840.num_args = 1;
c_736840.num_elements = 2;
c_736840.elements = (object *)e_736862;
c_736840.elements[0] = ((closureN)self_733622)->elements[1];
c_736840.elements[1] = ((closureN)self_733622)->elements[2];


pair_type local_736865; 
return_direct_with_clo1(data,(closure)&c_736840,__lambda_406,  set_pair_as_expr(&local_736865, ((closureN)self_733622)->elements[1], ((closureN)self_733622)->elements[0]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733622)->elements[2], (((closure)  ((closureN)self_733622)->elements[2])->fn),  ((closureN)self_733622)->elements[0]);}
;; 
}

static void __lambda_406(void *data, object self_733623, int argc, object *args) /* object self_733623, object r_732117_732865_732897 */
 {
 object r_732117_732865_732897 = args[0];
  
closureN_type c_736842;
object e_736859 [3];
c_736842.hdr.mark = gc_color_red;
 c_736842.hdr.grayed = 0;
c_736842.tag = closureN_tag;
 c_736842.fn = (function_type)__lambda_407;
c_736842.num_args = 1;
c_736842.num_elements = 3;
c_736842.elements = (object *)e_736859;
c_736842.elements[0] = ((closureN)self_733623)->elements[0];
c_736842.elements[1] = ((closureN)self_733623)->elements[1];
c_736842.elements[2] = r_732117_732865_732897;


mclosure0(c_736860, (function_type)__lambda_409);c_736860.num_args = 1;
return_direct_with_clo1(data,(closure)&c_736842,__lambda_407,  &c_736860);; 
}

static void __lambda_409(void *data, object self_733624, int argc, object *args) /* object self_733624, object k_732115_732868_732900, object _191_73710_731203_732869_732901 */
 {
 object k_732115_732868_732900 = args[0];
  return_direct_with_clo1(data,  k_732115_732868_732900, (((closure)  k_732115_732868_732900)->fn),  boolean_f);; 
}

static void __lambda_407(void *data, object self_733625, int argc, object *args) /* object self_733625, object r_732114_732866_732898 */
 {
 object r_732114_732866_732898 = args[0];
  
closureN_type c_736844;
object e_736857 [2];
c_736844.hdr.mark = gc_color_red;
 c_736844.hdr.grayed = 0;
c_736844.tag = closureN_tag;
 c_736844.fn = (function_type)__lambda_408;
c_736844.num_args = 1;
c_736844.num_elements = 2;
c_736844.elements = (object *)e_736857;
c_736844.elements[0] = ((closureN)self_733625)->elements[1];
c_736844.elements[1] = ((closureN)self_733625)->elements[2];

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_736844, r_732114_732866_732898, ((closureN)self_733625)->elements[0]);; 
}

static void __lambda_408(void *data, object self_733626, int argc, object *args) /* object self_733626, object r_732113_732867_732899 */
 {
 object r_732113_732867_732899 = args[0];
  
pair_type local_736849; 

pair_type local_736852; 

pair_type local_736855; 
return_direct_with_clo1(data,  ((closureN)self_733626)->elements[0], (((closure)  ((closureN)self_733626)->elements[0])->fn),  set_pair_as_expr(&local_736849, set_pair_as_expr(&local_736852, set_pair_as_expr(&local_736855, quote_lambda, ((closureN)self_733626)->elements[1]), r_732113_732867_732899), NULL));; 
}

static void __lambda_387(void *data, object self_733597, int argc, object *args) /* object self_733597, object unbound_91to_91return_73676_731193_732842 */
 {
 object unbound_91to_91return_73676_731193_732842 = args[0];
  object r_732080_732844;
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, unbound_91to_91return_73676_731193_732842), obj_int2obj(0))) ){ 
  
  
  
  r_732080_732844 = Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_733597)->elements[2]), Cyc_length(data, unbound_91to_91return_73676_731193_732842));
} else { 
  r_732080_732844 = boolean_f;}
;if( (boolean_f != r_732080_732844) ){ 
  return_closcall2(data,  ((closureN)self_733597)->elements[1],  ((closureN)self_733597)->elements[0], unbound_91to_91return_73676_731193_732842);
} else { 
  
make_utf8_string_with_len(c_736792, "Unbound variable(s)", 19, 19);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_733597)->elements[0], &c_736792, ((closureN)self_733597)->elements[2]);}
;; 
}

static void __lambda_362(void *data, object _, int argc, object *args) /* closure _,object k_732044, object sexp_73409_731113 */
 {
object k_732044 = args[0]; object sexp_73409_731113 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:flatten-sequence");

closureN_type c_736648;
object e_736721 [2];
c_736648.hdr.mark = gc_color_red;
 c_736648.hdr.grayed = 0;
c_736648.tag = closureN_tag;
 c_736648.fn = (function_type)__lambda_363;
c_736648.num_args = 1;
c_736648.num_elements = 2;
c_736648.elements = (object *)e_736721;
c_736648.elements[0] = k_732044;
c_736648.elements[1] = sexp_73409_731113;

return_direct_with_clo1(data,(closure)&c_736648,__lambda_363,  boolean_f);; 
}

static void __lambda_363(void *data, object self_733364, int argc, object *args) /* object self_733364, object flat_731115 */
 {
 object flat_731115 = args[0];
  
closureN_type c_736650;
object e_736717 [2];
c_736650.hdr.mark = gc_color_red;
 c_736650.hdr.grayed = 0;
c_736650.tag = closureN_tag;
 c_736650.fn = (function_type)__lambda_797;
c_736650.num_args = 1;
c_736650.num_elements = 2;
c_736650.elements = (object *)e_736717;
c_736650.elements[0] = ((closureN)self_733364)->elements[0];
c_736650.elements[1] = ((closureN)self_733364)->elements[1];


pair_type local_736720; 
return_direct_with_clo1(data,(closure)&c_736650,__lambda_797,  set_cell_as_expr(&local_736720, flat_731115));; 
}

static void __lambda_797(void *data, object self_733365, int argc, object *args) /* object self_733365, object flat_731115 */
 {
 object flat_731115 = args[0];
  
closureN_type c_736652;
object e_736668 [3];
c_736652.hdr.mark = gc_color_red;
 c_736652.hdr.grayed = 0;
c_736652.tag = closureN_tag;
 c_736652.fn = (function_type)__lambda_364;
c_736652.num_args = 1;
c_736652.num_elements = 3;
c_736652.elements = (object *)e_736668;
c_736652.elements[0] = flat_731115;
c_736652.elements[1] = ((closureN)self_733365)->elements[0];
c_736652.elements[2] = ((closureN)self_733365)->elements[1];


closureN_type c_736669;
object e_736716 [1];
c_736669.hdr.mark = gc_color_red;
 c_736669.hdr.grayed = 0;
c_736669.tag = closureN_tag;
 c_736669.fn = (function_type)__lambda_367;
c_736669.num_args = 2;
c_736669.num_elements = 1;
c_736669.elements = (object *)e_736716;
c_736669.elements[0] = flat_731115;

return_direct_with_clo1(data,(closure)&c_736652,__lambda_364,  &c_736669);; 
}

static void __lambda_367(void *data, object self_733366, int argc, object *args) /* object self_733366, object k_732049, object sexp_73410_731117, object acc_73411_731118 */
 {
 object k_732049 = args[0]; object sexp_73410_731117 = args[1]; object acc_73411_731118 = args[2];
    
if( (boolean_f != Cyc_is_pair(sexp_73410_731117)) ){ 
    complex_num_type local_736674; 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736674, quote_Cyc_91seq, Cyc_car(data, sexp_73410_731117))) ){ 
  



return_closcall3(data,  car(((closureN)self_733366)->elements[0]),  k_732049, Cyc_cdar(data, sexp_73410_731117), acc_73411_731118);
} else { 
  object r_732053;
    object local_736686 = alloca(sizeof(complex_num_type)); 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_ref_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,local_736686, Cyc_car(data, sexp_73410_731117))) ){ 
  object local_736692 = alloca(sizeof(complex_num_type)); 
  
  
  r_732053 = ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,local_736692, equalp(quote_Cyc_91seq, Cyc_car(data, sexp_73410_731117)));
} else { 
  r_732053 = boolean_f;}
;if( (boolean_f != r_732053) ){ 
  



return_closcall3(data,  car(((closureN)self_733366)->elements[0]),  k_732049, Cyc_cdr(data, sexp_73410_731117), acc_73411_731118);
} else { 
  




pair_type local_736712; 


return_closcall3(data,  car(((closureN)self_733366)->elements[0]),  k_732049, Cyc_cdr(data, sexp_73410_731117), set_pair_as_expr(&local_736712, Cyc_car(data, sexp_73410_731117), acc_73411_731118));}
;}
;
} else { 
  return_direct_with_clo1(data,  k_732049, (((closure)  k_732049)->fn),  acc_73411_731118);}
;; 
}

static void __lambda_364(void *data, object self_733367, int argc, object *args) /* object self_733367, object r_732048 */
 {
 object r_732048 = args[0];
  
closureN_type c_736654;
object e_736664 [3];
c_736654.hdr.mark = gc_color_red;
 c_736654.hdr.grayed = 0;
c_736654.tag = closureN_tag;
 c_736654.fn = (function_type)__lambda_365;
c_736654.num_args = 1;
c_736654.num_elements = 3;
c_736654.elements = (object *)e_736664;
c_736654.elements[0] = ((closureN)self_733367)->elements[0];
c_736654.elements[1] = ((closureN)self_733367)->elements[1];
c_736654.elements[2] = ((closureN)self_733367)->elements[2];



return_direct_with_clo1(data,(closure)&c_736654,__lambda_365,  Cyc_set_cell(data, ((closureN)self_733367)->elements[0], r_732048));; 
}

static void __lambda_365(void *data, object self_733368, int argc, object *args) /* object self_733368, object r_732045 */
 {

  


closureN_type c_736659;
object e_736662 [1];
c_736659.hdr.mark = gc_color_red;
 c_736659.hdr.grayed = 0;
c_736659.tag = closureN_tag;
 c_736659.fn = (function_type)__lambda_366;
c_736659.num_args = 1;
c_736659.num_elements = 1;
c_736659.elements = (object *)e_736662;
c_736659.elements[0] = ((closureN)self_733368)->elements[1];

return_closcall3(data,  car(((closureN)self_733368)->elements[0]),  &c_736659, ((closureN)self_733368)->elements[2], NULL);; 
}

static void __lambda_366(void *data, object self_733369, int argc, object *args) /* object self_733369, object r_732046 */
 {
 object r_732046 = args[0];
  return_direct_with_clo2(data,  __glo_reverse_scheme_base, (((closure)  __glo_reverse_scheme_base)->fn),  ((closureN)self_733369)->elements[0], r_732046);; 
}

static void __lambda_310(void *data, object _, int argc, object *args) /* closure _,object k_731948, object exp_73350_731102, object globals_73351_731103 */
 {
object k_731948 = args[0]; object exp_73350_731102 = args[1]; object globals_73351_731103 = args[2];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:wrap-mutables");

closureN_type c_736161;
object e_736642 [2];
c_736161.hdr.mark = gc_color_red;
 c_736161.hdr.grayed = 0;
c_736161.tag = closureN_tag;
 c_736161.fn = (function_type)__lambda_796;
c_736161.num_args = 1;
c_736161.num_elements = 2;
c_736161.elements = (object *)e_736642;
c_736161.elements[0] = globals_73351_731103;
c_736161.elements[1] = k_731948;


pair_type local_736645; 
return_direct_with_clo1(data,(closure)&c_736161,__lambda_796,  set_cell_as_expr(&local_736645, exp_73350_731102));; 
}

static void __lambda_796(void *data, object self_733311, int argc, object *args) /* object self_733311, object exp_73350_731102 */
 {
 object exp_73350_731102 = args[0];
  
closureN_type c_736163;
object e_736641 [3];
c_736163.hdr.mark = gc_color_red;
 c_736163.hdr.grayed = 0;
c_736163.tag = closureN_tag;
 c_736163.fn = (function_type)__lambda_311;
c_736163.num_args = 1;
c_736163.num_elements = 3;
c_736163.elements = (object *)e_736641;
c_736163.elements[0] = exp_73350_731102;
c_736163.elements[1] = ((closureN)self_733311)->elements[0];
c_736163.elements[2] = ((closureN)self_733311)->elements[1];

return_direct_with_clo1(data,(closure)&c_736163,__lambda_311,  boolean_f);; 
}

static void __lambda_311(void *data, object self_733312, int argc, object *args) /* object self_733312, object wrap_91mutable_91formals_731105 */
 {
 object wrap_91mutable_91formals_731105 = args[0];
  
closureN_type c_736165;
object e_736637 [3];
c_736165.hdr.mark = gc_color_red;
 c_736165.hdr.grayed = 0;
c_736165.tag = closureN_tag;
 c_736165.fn = (function_type)__lambda_795;
c_736165.num_args = 1;
c_736165.num_elements = 3;
c_736165.elements = (object *)e_736637;
c_736165.elements[0] = ((closureN)self_733312)->elements[0];
c_736165.elements[1] = ((closureN)self_733312)->elements[1];
c_736165.elements[2] = ((closureN)self_733312)->elements[2];


pair_type local_736640; 
return_direct_with_clo1(data,(closure)&c_736165,__lambda_795,  set_cell_as_expr(&local_736640, wrap_91mutable_91formals_731105));; 
}

static void __lambda_795(void *data, object self_733313, int argc, object *args) /* object self_733313, object wrap_91mutable_91formals_731105 */
 {
 object wrap_91mutable_91formals_731105 = args[0];
  
closureN_type c_736167;
object e_736576 [4];
c_736167.hdr.mark = gc_color_red;
 c_736167.hdr.grayed = 0;
c_736167.tag = closureN_tag;
 c_736167.fn = (function_type)__lambda_312;
c_736167.num_args = 1;
c_736167.num_elements = 4;
c_736167.elements = (object *)e_736576;
c_736167.elements[0] = ((closureN)self_733313)->elements[0];
c_736167.elements[1] = ((closureN)self_733313)->elements[1];
c_736167.elements[2] = ((closureN)self_733313)->elements[2];
c_736167.elements[3] = wrap_91mutable_91formals_731105;


closureN_type c_736577;
object e_736636 [1];
c_736577.hdr.mark = gc_color_red;
 c_736577.hdr.grayed = 0;
c_736577.tag = closureN_tag;
 c_736577.fn = (function_type)__lambda_358;
c_736577.num_args = 4;
c_736577.num_elements = 1;
c_736577.elements = (object *)e_736636;
c_736577.elements[0] = wrap_91mutable_91formals_731105;

return_direct_with_clo1(data,(closure)&c_736167,__lambda_312,  &c_736577);; 
}

static void __lambda_358(void *data, object self_733314, int argc, object *args) /* object self_733314, object k_732026, object id_73352_731107, object formals_73353_731108, object body_91exp_73354_731109, object has_91cont_73355_731110 */
 {
 object k_732026 = args[0]; object id_73352_731107 = args[1]; object formals_73353_731108 = args[2]; object body_91exp_73354_731109 = args[3]; object has_91cont_73355_731110 = args[4];
    
if( (boolean_f != Cyc_is_pair(formals_73353_731108)) ){ 
  
closureN_type c_736581;
object e_736632 [6];
c_736581.hdr.mark = gc_color_red;
 c_736581.hdr.grayed = 0;
c_736581.tag = closureN_tag;
 c_736581.fn = (function_type)__lambda_359;
c_736581.num_args = 1;
c_736581.num_elements = 6;
c_736581.elements = (object *)e_736632;
c_736581.elements[0] = body_91exp_73354_731109;
c_736581.elements[1] = formals_73353_731108;
c_736581.elements[2] = has_91cont_73355_731110;
c_736581.elements[3] = id_73352_731107;
c_736581.elements[4] = k_732026;
c_736581.elements[5] = ((closureN)self_733314)->elements[0];



return_direct_with_clo2(data,  __glo_is_91mutable_127_scheme_cyclone_transforms, (((closure)  __glo_is_91mutable_127_scheme_cyclone_transforms)->fn),  &c_736581, Cyc_car(data, formals_73353_731108));
} else { 
  return_direct_with_clo1(data,  k_732026, (((closure)  k_732026)->fn),  body_91exp_73354_731109);}
;; 
}

static void __lambda_359(void *data, object self_733315, int argc, object *args) /* object self_733315, object r_732028 */
 {
 object r_732028 = args[0];
  if( (boolean_f != r_732028) ){ 
  


closureN_type c_736586;
object e_736614 [3];
c_736586.hdr.mark = gc_color_red;
 c_736586.hdr.grayed = 0;
c_736586.tag = closureN_tag;
 c_736586.fn = (function_type)__lambda_360;
c_736586.num_args = 1;
c_736586.num_elements = 3;
c_736586.elements = (object *)e_736614;
c_736586.elements[0] = ((closureN)self_733315)->elements[1];
c_736586.elements[1] = ((closureN)self_733315)->elements[2];
c_736586.elements[2] = ((closureN)self_733315)->elements[4];



return_closcall5(data,  car(((closureN)self_733315)->elements[5]),  &c_736586, ((closureN)self_733315)->elements[3], Cyc_cdr(data, ((closureN)self_733315)->elements[1]), ((closureN)self_733315)->elements[0], ((closureN)self_733315)->elements[2]);
} else { 
  



return_closcall5(data,  car(((closureN)self_733315)->elements[5]),  ((closureN)self_733315)->elements[4], ((closureN)self_733315)->elements[3], Cyc_cdr(data, ((closureN)self_733315)->elements[1]), ((closureN)self_733315)->elements[0], ((closureN)self_733315)->elements[2]);}
;; 
}

static void __lambda_360(void *data, object self_733316, int argc, object *args) /* object self_733316, object r_732037 */
 {
 object r_732037 = args[0];
  
closureN_type c_736588;
object e_736606 [2];
c_736588.hdr.mark = gc_color_red;
 c_736588.hdr.grayed = 0;
c_736588.tag = closureN_tag;
 c_736588.fn = (function_type)__lambda_361;
c_736588.num_args = 1;
c_736588.num_elements = 2;
c_736588.elements = (object *)e_736606;
c_736588.elements[0] = ((closureN)self_733316)->elements[0];
c_736588.elements[1] = ((closureN)self_733316)->elements[2];


pair_type local_736609; 


return_direct_with_clo4(data,  __glo_ast_117make_91lambda_scheme_cyclone_ast, (((closure)  __glo_ast_117make_91lambda_scheme_cyclone_ast)->fn),  &c_736588, set_cell_as_expr(&local_736609, Cyc_car(data, ((closureN)self_733316)->elements[0])), r_732037, ((closureN)self_733316)->elements[1]);; 
}

static void __lambda_361(void *data, object self_733317, int argc, object *args) /* object self_733317, object r_732030 */
 {
 object r_732030 = args[0];
  
pair_type local_736593; 

list_2_type local_736596; 

pair_type local_736599; 

pair_type local_736602; 


return_direct_with_clo1(data,  ((closureN)self_733317)->elements[1], (((closure)  ((closureN)self_733317)->elements[1])->fn),  set_cell_as_expr(&local_736593, Cyc_fast_list_2(&local_736596, r_732030, set_pair_as_expr(&local_736599, quote_cell, set_pair_as_expr(&local_736602, Cyc_car(data, ((closureN)self_733317)->elements[0]), NULL)))));; 
}

static void __lambda_312(void *data, object self_733318, int argc, object *args) /* object self_733318, object r_732025 */
 {
 object r_732025 = args[0];
  
closureN_type c_736169;
object e_736572 [4];
c_736169.hdr.mark = gc_color_red;
 c_736169.hdr.grayed = 0;
c_736169.tag = closureN_tag;
 c_736169.fn = (function_type)__lambda_313;
c_736169.num_args = 1;
c_736169.num_elements = 4;
c_736169.elements = (object *)e_736572;
c_736169.elements[0] = ((closureN)self_733318)->elements[0];
c_736169.elements[1] = ((closureN)self_733318)->elements[1];
c_736169.elements[2] = ((closureN)self_733318)->elements[2];
c_736169.elements[3] = ((closureN)self_733318)->elements[3];



return_direct_with_clo1(data,(closure)&c_736169,__lambda_313,  Cyc_set_cell(data, ((closureN)self_733318)->elements[3], r_732025));; 
}

static void __lambda_313(void *data, object self_733319, int argc, object *args) /* object self_733319, object r_731949 */
 {

  
closureN_type c_736171;
object e_736568 [4];
c_736171.hdr.mark = gc_color_red;
 c_736171.hdr.grayed = 0;
c_736171.tag = closureN_tag;
 c_736171.fn = (function_type)__lambda_314;
c_736171.num_args = 1;
c_736171.num_elements = 4;
c_736171.elements = (object *)e_736568;
c_736171.elements[0] = ((closureN)self_733319)->elements[0];
c_736171.elements[1] = ((closureN)self_733319)->elements[1];
c_736171.elements[2] = ((closureN)self_733319)->elements[2];
c_736171.elements[3] = ((closureN)self_733319)->elements[3];



return_direct_with_clo2(data,  __glo_ast_117lambda_127_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_127_scheme_cyclone_ast)->fn),  &c_736171, car(((closureN)self_733319)->elements[0]));; 
}

static void __lambda_314(void *data, object self_733320, int argc, object *args) /* object self_733320, object r_731950 */
 {
 object r_731950 = args[0];
  if( (boolean_f != r_731950) ){ 
  
closureN_type c_736173;
object e_736236 [4];
c_736173.hdr.mark = gc_color_red;
 c_736173.hdr.grayed = 0;
c_736173.tag = closureN_tag;
 c_736173.fn = (function_type)__lambda_315;
c_736173.num_args = 1;
c_736173.num_elements = 4;
c_736173.elements = (object *)e_736236;
c_736173.elements[0] = ((closureN)self_733320)->elements[0];
c_736173.elements[1] = ((closureN)self_733320)->elements[1];
c_736173.elements[2] = ((closureN)self_733320)->elements[2];
c_736173.elements[3] = ((closureN)self_733320)->elements[3];



return_direct_with_clo2(data,  __glo_ast_117lambda_91id_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91id_scheme_cyclone_ast)->fn),  &c_736173, car(((closureN)self_733320)->elements[0]));
} else { 
  
closureN_type c_736241;
object e_736564 [3];
c_736241.hdr.mark = gc_color_red;
 c_736241.hdr.grayed = 0;
c_736241.tag = closureN_tag;
 c_736241.fn = (function_type)__lambda_325;
c_736241.num_args = 1;
c_736241.num_elements = 3;
c_736241.elements = (object *)e_736564;
c_736241.elements[0] = ((closureN)self_733320)->elements[0];
c_736241.elements[1] = ((closureN)self_733320)->elements[1];
c_736241.elements[2] = ((closureN)self_733320)->elements[2];



return_direct_with_clo2(data,  __glo_const_127_scheme_cyclone_util, (((closure)  __glo_const_127_scheme_cyclone_util)->fn),  &c_736241, car(((closureN)self_733320)->elements[0]));}
;; 
}

static void __lambda_325(void *data, object self_733331, int argc, object *args) /* object self_733331, object r_731962 */
 {
 object r_731962 = args[0];
  if( (boolean_f != r_731962) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_733331)->elements[2], (((closure)  ((closureN)self_733331)->elements[2])->fn),  car(((closureN)self_733331)->elements[0]));
} else { 
  
closureN_type c_736248;
object e_736557 [3];
c_736248.hdr.mark = gc_color_red;
 c_736248.hdr.grayed = 0;
c_736248.tag = closureN_tag;
 c_736248.fn = (function_type)__lambda_326;
c_736248.num_args = 1;
c_736248.num_elements = 3;
c_736248.elements = (object *)e_736557;
c_736248.elements[0] = ((closureN)self_733331)->elements[0];
c_736248.elements[1] = ((closureN)self_733331)->elements[1];
c_736248.elements[2] = ((closureN)self_733331)->elements[2];


complex_num_type local_736560; 


return_direct_with_clo1(data,(closure)&c_736248,__lambda_326,  ((inline_function_type)
                   ((closure)__glo_ref_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736560, car(((closureN)self_733331)->elements[0])));}
;; 
}

static void __lambda_326(void *data, object self_733332, int argc, object *args) /* object self_733332, object r_731963 */
 {
 object r_731963 = args[0];
  if( (boolean_f != r_731963) ){ 
  
closureN_type c_736250;
object e_736267 [2];
c_736250.hdr.mark = gc_color_red;
 c_736250.hdr.grayed = 0;
c_736250.tag = closureN_tag;
 c_736250.fn = (function_type)__lambda_327;
c_736250.num_args = 0;
c_736250.num_elements = 2;
c_736250.elements = (object *)e_736267;
c_736250.elements[0] = ((closureN)self_733332)->elements[0];
c_736250.elements[1] = ((closureN)self_733332)->elements[1];


closureN_type c_736268;
object e_736285 [2];
c_736268.hdr.mark = gc_color_red;
 c_736268.hdr.grayed = 0;
c_736268.tag = closureN_tag;
 c_736268.fn = (function_type)__lambda_329;
c_736268.num_args = 1;
c_736268.num_elements = 2;
c_736268.elements = (object *)e_736285;
c_736268.elements[0] = ((closureN)self_733332)->elements[0];
c_736268.elements[1] = ((closureN)self_733332)->elements[2];

return_direct_with_clo1(data,(closure)&c_736250,__lambda_327,  &c_736268);
} else { 
  
closureN_type c_736287;
object e_736553 [3];
c_736287.hdr.mark = gc_color_red;
 c_736287.hdr.grayed = 0;
c_736287.tag = closureN_tag;
 c_736287.fn = (function_type)__lambda_330;
c_736287.num_args = 1;
c_736287.num_elements = 3;
c_736287.elements = (object *)e_736553;
c_736287.elements[0] = ((closureN)self_733332)->elements[0];
c_736287.elements[1] = ((closureN)self_733332)->elements[1];
c_736287.elements[2] = ((closureN)self_733332)->elements[2];



return_direct_with_clo2(data,  __glo_prim_127_scheme_cyclone_primitives, (((closure)  __glo_prim_127_scheme_cyclone_primitives)->fn),  &c_736287, car(((closureN)self_733332)->elements[0]));}
;; 
}

static void __lambda_330(void *data, object self_733336, int argc, object *args) /* object self_733336, object r_731970 */
 {
 object r_731970 = args[0];
  if( (boolean_f != r_731970) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_733336)->elements[2], (((closure)  ((closureN)self_733336)->elements[2])->fn),  car(((closureN)self_733336)->elements[0]));
} else { 
  
closureN_type c_736294;
object e_736549 [3];
c_736294.hdr.mark = gc_color_red;
 c_736294.hdr.grayed = 0;
c_736294.tag = closureN_tag;
 c_736294.fn = (function_type)__lambda_331;
c_736294.num_args = 1;
c_736294.num_elements = 3;
c_736294.elements = (object *)e_736549;
c_736294.elements[0] = ((closureN)self_733336)->elements[0];
c_736294.elements[1] = ((closureN)self_733336)->elements[1];
c_736294.elements[2] = ((closureN)self_733336)->elements[2];



return_direct_with_clo2(data,  __glo_quote_127_scheme_cyclone_util, (((closure)  __glo_quote_127_scheme_cyclone_util)->fn),  &c_736294, car(((closureN)self_733336)->elements[0]));}
;; 
}

static void __lambda_331(void *data, object self_733337, int argc, object *args) /* object self_733337, object r_731971 */
 {
 object r_731971 = args[0];
  if( (boolean_f != r_731971) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_733337)->elements[2], (((closure)  ((closureN)self_733337)->elements[2])->fn),  car(((closureN)self_733337)->elements[0]));
} else { 
  
closureN_type c_736301;
object e_736545 [3];
c_736301.hdr.mark = gc_color_red;
 c_736301.hdr.grayed = 0;
c_736301.tag = closureN_tag;
 c_736301.fn = (function_type)__lambda_332;
c_736301.num_args = 1;
c_736301.num_elements = 3;
c_736301.elements = (object *)e_736545;
c_736301.elements[0] = ((closureN)self_733337)->elements[0];
c_736301.elements[1] = ((closureN)self_733337)->elements[1];
c_736301.elements[2] = ((closureN)self_733337)->elements[2];



return_direct_with_clo2(data,  __glo_lambda_127_scheme_cyclone_util, (((closure)  __glo_lambda_127_scheme_cyclone_util)->fn),  &c_736301, car(((closureN)self_733337)->elements[0]));}
;; 
}

static void __lambda_332(void *data, object self_733338, int argc, object *args) /* object self_733338, object r_731972 */
 {
 object r_731972 = args[0];
  if( (boolean_f != r_731972) ){ 
  
pair_type local_736306; 

pair_type local_736309; 

pair_type local_736312; 

pair_type local_736315; 

pair_type local_736318; 


return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_733338)->elements[2], set_pair_as_expr(&local_736306, quote_Unexpected, set_pair_as_expr(&local_736309, quote_lambda, set_pair_as_expr(&local_736312, quote_in, set_pair_as_expr(&local_736315, quote_wrap_91mutables, set_pair_as_expr(&local_736318, car(((closureN)self_733338)->elements[0]), NULL))))));
} else { 
  
closureN_type c_736323;
object e_736541 [3];
c_736323.hdr.mark = gc_color_red;
 c_736323.hdr.grayed = 0;
c_736323.tag = closureN_tag;
 c_736323.fn = (function_type)__lambda_333;
c_736323.num_args = 1;
c_736323.num_elements = 3;
c_736323.elements = (object *)e_736541;
c_736323.elements[0] = ((closureN)self_733338)->elements[0];
c_736323.elements[1] = ((closureN)self_733338)->elements[1];
c_736323.elements[2] = ((closureN)self_733338)->elements[2];



return_direct_with_clo2(data,  __glo_set_67_127_scheme_cyclone_util, (((closure)  __glo_set_67_127_scheme_cyclone_util)->fn),  &c_736323, car(((closureN)self_733338)->elements[0]));}
;; 
}

static void __lambda_333(void *data, object self_733339, int argc, object *args) /* object self_733339, object r_731983 */
 {
 object r_731983 = args[0];
  if( (boolean_f != r_731983) ){ 
  
closureN_type c_736325;
object e_736416 [3];
c_736325.hdr.mark = gc_color_red;
 c_736325.hdr.grayed = 0;
c_736325.tag = closureN_tag;
 c_736325.fn = (function_type)__lambda_334;
c_736325.num_args = 1;
c_736325.num_elements = 3;
c_736325.elements = (object *)e_736416;
c_736325.elements[0] = ((closureN)self_733339)->elements[0];
c_736325.elements[1] = ((closureN)self_733339)->elements[1];
c_736325.elements[2] = ((closureN)self_733339)->elements[2];


complex_num_type local_736419; 


return_direct_with_clo1(data,(closure)&c_736325,__lambda_334,  ((inline_function_type)
                   ((closure)__glo_set_67_91_125var_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736419, car(((closureN)self_733339)->elements[0])));
} else { 
  
closureN_type c_736424;
object e_736537 [3];
c_736424.hdr.mark = gc_color_red;
 c_736424.hdr.grayed = 0;
c_736424.tag = closureN_tag;
 c_736424.fn = (function_type)__lambda_343;
c_736424.num_args = 1;
c_736424.num_elements = 3;
c_736424.elements = (object *)e_736537;
c_736424.elements[0] = ((closureN)self_733339)->elements[0];
c_736424.elements[1] = ((closureN)self_733339)->elements[1];
c_736424.elements[2] = ((closureN)self_733339)->elements[2];



return_direct_with_clo2(data,  __glo_if_127_scheme_cyclone_util, (((closure)  __glo_if_127_scheme_cyclone_util)->fn),  &c_736424, car(((closureN)self_733339)->elements[0]));}
;; 
}

static void __lambda_343(void *data, object self_733349, int argc, object *args) /* object self_733349, object r_732004 */
 {
 object r_732004 = args[0];
  if( (boolean_f != r_732004) ){ 
  
closureN_type c_736426;
object e_736473 [3];
c_736426.hdr.mark = gc_color_red;
 c_736426.hdr.grayed = 0;
c_736426.tag = closureN_tag;
 c_736426.fn = (function_type)__lambda_344;
c_736426.num_args = 1;
c_736426.num_elements = 3;
c_736426.elements = (object *)e_736473;
c_736426.elements[0] = ((closureN)self_733349)->elements[0];
c_736426.elements[1] = ((closureN)self_733349)->elements[1];
c_736426.elements[2] = ((closureN)self_733349)->elements[2];


complex_num_type local_736476; 


return_direct_with_clo1(data,(closure)&c_736426,__lambda_344,  ((inline_function_type)
                   ((closure)__glo_if_91_125condition_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736476, car(((closureN)self_733349)->elements[0])));
} else { 
  
closureN_type c_736481;
object e_736530 [3];
c_736481.hdr.mark = gc_color_red;
 c_736481.hdr.grayed = 0;
c_736481.tag = closureN_tag;
 c_736481.fn = (function_type)__lambda_350;
c_736481.num_args = 1;
c_736481.num_elements = 3;
c_736481.elements = (object *)e_736530;
c_736481.elements[0] = ((closureN)self_733349)->elements[0];
c_736481.elements[1] = ((closureN)self_733349)->elements[1];
c_736481.elements[2] = ((closureN)self_733349)->elements[2];


complex_num_type local_736533; 


return_direct_with_clo1(data,(closure)&c_736481,__lambda_350,  ((inline_function_type)
                   ((closure)__glo_app_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736533, car(((closureN)self_733349)->elements[0])));}
;; 
}

static void __lambda_350(void *data, object self_733356, int argc, object *args) /* object self_733356, object r_732016 */
 {
 object r_732016 = args[0];
  if( (boolean_f != r_732016) ){ 
  
closureN_type c_736483;
object e_736506 [1];
c_736483.hdr.mark = gc_color_red;
 c_736483.hdr.grayed = 0;
c_736483.tag = closureN_tag;
 c_736483.fn = (function_type)__lambda_351;
c_736483.num_args = 0;
c_736483.num_elements = 1;
c_736483.elements = (object *)e_736506;
c_736483.elements[0] = ((closureN)self_733356)->elements[0];


closureN_type c_736507;
object e_736523 [3];
c_736507.hdr.mark = gc_color_red;
 c_736507.hdr.grayed = 0;
c_736507.tag = closureN_tag;
 c_736507.fn = (function_type)__lambda_354;
c_736507.num_args = 1;
c_736507.num_elements = 3;
c_736507.elements = (object *)e_736523;
c_736507.elements[0] = ((closureN)self_733356)->elements[0];
c_736507.elements[1] = ((closureN)self_733356)->elements[1];
c_736507.elements[2] = ((closureN)self_733356)->elements[2];

return_direct_with_clo1(data,(closure)&c_736483,__lambda_351,  &c_736507);
} else { 
  
make_utf8_string_with_len(c_736526, "unknown expression type: ", 25, 25);


return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_733356)->elements[2], &c_736526, car(((closureN)self_733356)->elements[0]));}
;; 
}

static void __lambda_354(void *data, object self_733357, int argc, object *args) /* object self_733357, object r_732017 */
 {

  
closureN_type c_736509;
object e_736518 [2];
c_736509.hdr.mark = gc_color_red;
 c_736509.hdr.grayed = 0;
c_736509.tag = closureN_tag;
 c_736509.fn = (function_type)__lambda_355;
c_736509.num_args = 1;
c_736509.num_elements = 2;
c_736509.elements = (object *)e_736518;
c_736509.elements[0] = ((closureN)self_733357)->elements[0];
c_736509.elements[1] = ((closureN)self_733357)->elements[2];


closureN_type c_736519;
object e_736522 [1];
c_736519.hdr.mark = gc_color_red;
 c_736519.hdr.grayed = 0;
c_736519.tag = closureN_tag;
 c_736519.fn = (function_type)__lambda_357;
c_736519.num_args = 1;
c_736519.num_elements = 1;
c_736519.elements = (object *)e_736522;
c_736519.elements[0] = ((closureN)self_733357)->elements[1];

return_direct_with_clo1(data,(closure)&c_736509,__lambda_355,  &c_736519);; 
}

static void __lambda_357(void *data, object self_733358, int argc, object *args) /* object self_733358, object k_732020, object e_73407_731112 */
 {
 object k_732020 = args[0]; object e_73407_731112 = args[1];
  return_direct_with_clo3(data,  __glo_wrap_91mutables_scheme_cyclone_transforms, (((closure)  __glo_wrap_91mutables_scheme_cyclone_transforms)->fn),  k_732020, e_73407_731112, ((closureN)self_733358)->elements[0]);; 
}

static void __lambda_355(void *data, object self_733359, int argc, object *args) /* object self_733359, object r_732019 */
 {
 object r_732019 = args[0];
  
closureN_type c_736511;
object e_736514 [1];
c_736511.hdr.mark = gc_color_red;
 c_736511.hdr.grayed = 0;
c_736511.tag = closureN_tag;
 c_736511.fn = (function_type)__lambda_356;
c_736511.num_args = 1;
c_736511.num_elements = 1;
c_736511.elements = (object *)e_736514;
c_736511.elements[0] = ((closureN)self_733359)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_736511, r_732019, car(((closureN)self_733359)->elements[0]));; 
}

static void __lambda_356(void *data, object self_733360, int argc, object *args) /* object self_733360, object result_73406_731111 */
 {
 object result_73406_731111 = args[0];
  return_direct_with_clo1(data,  ((closureN)self_733360)->elements[0], (((closure)  ((closureN)self_733360)->elements[0])->fn),  result_73406_731111);; 
}

static void __lambda_351(void *data, object self_733361, int argc, object *args) /* object self_733361, object k_732021 */
 {
 object k_732021 = args[0];
  
closureN_type c_736485;
object e_736499 [2];
c_736485.hdr.mark = gc_color_red;
 c_736485.hdr.grayed = 0;
c_736485.tag = closureN_tag;
 c_736485.fn = (function_type)__lambda_352;
c_736485.num_args = 1;
c_736485.num_elements = 2;
c_736485.elements = (object *)e_736499;
c_736485.elements[0] = ((closureN)self_733361)->elements[0];
c_736485.elements[1] = k_732021;


complex_num_type local_736502; 


return_direct_with_clo1(data,(closure)&c_736485,__lambda_352,  ((inline_function_type)
                   ((closure)__glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736502, quote_Cyc_91seq, car(((closureN)self_733361)->elements[0])));; 
}

static void __lambda_352(void *data, object self_733362, int argc, object *args) /* object self_733362, object r_732022 */
 {
 object r_732022 = args[0];
  if( (boolean_f != r_732022) ){ 
  
closureN_type c_736487;
object e_736493 [2];
c_736487.hdr.mark = gc_color_red;
 c_736487.hdr.grayed = 0;
c_736487.tag = closureN_tag;
 c_736487.fn = (function_type)__lambda_353;
c_736487.num_args = 1;
c_736487.num_elements = 2;
c_736487.elements = (object *)e_736493;
c_736487.elements[0] = ((closureN)self_733362)->elements[0];
c_736487.elements[1] = ((closureN)self_733362)->elements[1];



return_direct_with_clo2(data,  __glo_flatten_91sequence_scheme_cyclone_transforms, (((closure)  __glo_flatten_91sequence_scheme_cyclone_transforms)->fn),  &c_736487, car(((closureN)self_733362)->elements[0]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733362)->elements[1], (((closure)  ((closureN)self_733362)->elements[1])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_353(void *data, object self_733363, int argc, object *args) /* object self_733363, object r_732023 */
 {
 object r_732023 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_733363)->elements[1], (((closure)  ((closureN)self_733363)->elements[1])->fn),  Cyc_set_cell(data, ((closureN)self_733363)->elements[0], r_732023));; 
}

static void __lambda_344(void *data, object self_733350, int argc, object *args) /* object self_733350, object r_732015 */
 {
 object r_732015 = args[0];
  
closureN_type c_736428;
object e_736471 [3];
c_736428.hdr.mark = gc_color_red;
 c_736428.hdr.grayed = 0;
c_736428.tag = closureN_tag;
 c_736428.fn = (function_type)__lambda_345;
c_736428.num_args = 1;
c_736428.num_elements = 3;
c_736428.elements = (object *)e_736471;
c_736428.elements[0] = ((closureN)self_733350)->elements[0];
c_736428.elements[1] = ((closureN)self_733350)->elements[1];
c_736428.elements[2] = ((closureN)self_733350)->elements[2];

return_direct_with_clo3(data,  __glo_wrap_91mutables_scheme_cyclone_transforms, (((closure)  __glo_wrap_91mutables_scheme_cyclone_transforms)->fn),  &c_736428, r_732015, ((closureN)self_733350)->elements[1]);; 
}

static void __lambda_345(void *data, object self_733351, int argc, object *args) /* object self_733351, object r_732007 */
 {
 object r_732007 = args[0];
  
closureN_type c_736430;
object e_736464 [4];
c_736430.hdr.mark = gc_color_red;
 c_736430.hdr.grayed = 0;
c_736430.tag = closureN_tag;
 c_736430.fn = (function_type)__lambda_346;
c_736430.num_args = 1;
c_736430.num_elements = 4;
c_736430.elements = (object *)e_736464;
c_736430.elements[0] = ((closureN)self_733351)->elements[0];
c_736430.elements[1] = ((closureN)self_733351)->elements[1];
c_736430.elements[2] = ((closureN)self_733351)->elements[2];
c_736430.elements[3] = r_732007;


complex_num_type local_736467; 


return_direct_with_clo1(data,(closure)&c_736430,__lambda_346,  ((inline_function_type)
                   ((closure)__glo_if_91_125then_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736467, car(((closureN)self_733351)->elements[0])));; 
}

static void __lambda_346(void *data, object self_733352, int argc, object *args) /* object self_733352, object r_732014 */
 {
 object r_732014 = args[0];
  
closureN_type c_736432;
object e_736462 [4];
c_736432.hdr.mark = gc_color_red;
 c_736432.hdr.grayed = 0;
c_736432.tag = closureN_tag;
 c_736432.fn = (function_type)__lambda_347;
c_736432.num_args = 1;
c_736432.num_elements = 4;
c_736432.elements = (object *)e_736462;
c_736432.elements[0] = ((closureN)self_733352)->elements[0];
c_736432.elements[1] = ((closureN)self_733352)->elements[1];
c_736432.elements[2] = ((closureN)self_733352)->elements[2];
c_736432.elements[3] = ((closureN)self_733352)->elements[3];

return_direct_with_clo3(data,  __glo_wrap_91mutables_scheme_cyclone_transforms, (((closure)  __glo_wrap_91mutables_scheme_cyclone_transforms)->fn),  &c_736432, r_732014, ((closureN)self_733352)->elements[1]);; 
}

static void __lambda_347(void *data, object self_733353, int argc, object *args) /* object self_733353, object r_732009 */
 {
 object r_732009 = args[0];
  
closureN_type c_736434;
object e_736455 [4];
c_736434.hdr.mark = gc_color_red;
 c_736434.hdr.grayed = 0;
c_736434.tag = closureN_tag;
 c_736434.fn = (function_type)__lambda_348;
c_736434.num_args = 1;
c_736434.num_elements = 4;
c_736434.elements = (object *)e_736455;
c_736434.elements[0] = ((closureN)self_733353)->elements[1];
c_736434.elements[1] = ((closureN)self_733353)->elements[2];
c_736434.elements[2] = ((closureN)self_733353)->elements[3];
c_736434.elements[3] = r_732009;


complex_num_type local_736458; 


return_direct_with_clo1(data,(closure)&c_736434,__lambda_348,  ((inline_function_type)
                   ((closure)__glo_if_91_125else_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736458, car(((closureN)self_733353)->elements[0])));; 
}

static void __lambda_348(void *data, object self_733354, int argc, object *args) /* object self_733354, object r_732013 */
 {
 object r_732013 = args[0];
  
closureN_type c_736436;
object e_736453 [3];
c_736436.hdr.mark = gc_color_red;
 c_736436.hdr.grayed = 0;
c_736436.tag = closureN_tag;
 c_736436.fn = (function_type)__lambda_349;
c_736436.num_args = 1;
c_736436.num_elements = 3;
c_736436.elements = (object *)e_736453;
c_736436.elements[0] = ((closureN)self_733354)->elements[1];
c_736436.elements[1] = ((closureN)self_733354)->elements[2];
c_736436.elements[2] = ((closureN)self_733354)->elements[3];

return_direct_with_clo3(data,  __glo_wrap_91mutables_scheme_cyclone_transforms, (((closure)  __glo_wrap_91mutables_scheme_cyclone_transforms)->fn),  &c_736436, r_732013, ((closureN)self_733354)->elements[0]);; 
}

static void __lambda_349(void *data, object self_733355, int argc, object *args) /* object self_733355, object r_732011 */
 {
 object r_732011 = args[0];
  
pair_type local_736441; 

pair_type local_736444; 

pair_type local_736448; 

pair_type local_736452; 
return_direct_with_clo1(data,  ((closureN)self_733355)->elements[0], (((closure)  ((closureN)self_733355)->elements[0])->fn),  set_pair_as_expr(&local_736441, quote__if, set_pair_as_expr(&local_736444, ((closureN)self_733355)->elements[1], set_pair_as_expr(&local_736448, ((closureN)self_733355)->elements[2], set_pair_as_expr(&local_736452, r_732011, NULL)))));; 
}

static void __lambda_334(void *data, object self_733340, int argc, object *args) /* object self_733340, object r_732003 */
 {
 object r_732003 = args[0];
  
closureN_type c_736327;
object e_736412 [3];
c_736327.hdr.mark = gc_color_red;
 c_736327.hdr.grayed = 0;
c_736327.tag = closureN_tag;
 c_736327.fn = (function_type)__lambda_335;
c_736327.num_args = 1;
c_736327.num_elements = 3;
c_736327.elements = (object *)e_736412;
c_736327.elements[0] = ((closureN)self_733340)->elements[0];
c_736327.elements[1] = ((closureN)self_733340)->elements[1];
c_736327.elements[2] = ((closureN)self_733340)->elements[2];



return_direct_with_clo1(data,(closure)&c_736327,__lambda_335,  memberp(data, r_732003, ((closureN)self_733340)->elements[1]));; 
}

static void __lambda_335(void *data, object self_733341, int argc, object *args) /* object self_733341, object r_731984 */
 {
 object r_731984 = args[0];
  if( (boolean_f != r_731984) ){ 
  
closureN_type c_736329;
object e_736371 [3];
c_736329.hdr.mark = gc_color_red;
 c_736329.hdr.grayed = 0;
c_736329.tag = closureN_tag;
 c_736329.fn = (function_type)__lambda_336;
c_736329.num_args = 1;
c_736329.num_elements = 3;
c_736329.elements = (object *)e_736371;
c_736329.elements[0] = ((closureN)self_733341)->elements[0];
c_736329.elements[1] = ((closureN)self_733341)->elements[1];
c_736329.elements[2] = ((closureN)self_733341)->elements[2];


complex_num_type local_736374; 


return_direct_with_clo1(data,(closure)&c_736329,__lambda_336,  ((inline_function_type)
                   ((closure)__glo_set_67_91_125var_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736374, car(((closureN)self_733341)->elements[0])));
} else { 
  
closureN_type c_736379;
object e_736405 [3];
c_736379.hdr.mark = gc_color_red;
 c_736379.hdr.grayed = 0;
c_736379.tag = closureN_tag;
 c_736379.fn = (function_type)__lambda_340;
c_736379.num_args = 1;
c_736379.num_elements = 3;
c_736379.elements = (object *)e_736405;
c_736379.elements[0] = ((closureN)self_733341)->elements[0];
c_736379.elements[1] = ((closureN)self_733341)->elements[1];
c_736379.elements[2] = ((closureN)self_733341)->elements[2];


complex_num_type local_736408; 


return_direct_with_clo1(data,(closure)&c_736379,__lambda_340,  ((inline_function_type)
                   ((closure)__glo_set_67_91_125var_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736408, car(((closureN)self_733341)->elements[0])));}
;; 
}

static void __lambda_340(void *data, object self_733346, int argc, object *args) /* object self_733346, object r_731998 */
 {
 object r_731998 = args[0];
  
closureN_type c_736381;
object e_736398 [3];
c_736381.hdr.mark = gc_color_red;
 c_736381.hdr.grayed = 0;
c_736381.tag = closureN_tag;
 c_736381.fn = (function_type)__lambda_341;
c_736381.num_args = 1;
c_736381.num_elements = 3;
c_736381.elements = (object *)e_736398;
c_736381.elements[0] = ((closureN)self_733346)->elements[1];
c_736381.elements[1] = ((closureN)self_733346)->elements[2];
c_736381.elements[2] = r_731998;


complex_num_type local_736401; 


return_direct_with_clo1(data,(closure)&c_736381,__lambda_341,  ((inline_function_type)
                   ((closure)__glo_set_67_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736401, car(((closureN)self_733346)->elements[0])));; 
}

static void __lambda_341(void *data, object self_733347, int argc, object *args) /* object self_733347, object r_732002 */
 {
 object r_732002 = args[0];
  
closureN_type c_736383;
object e_736396 [2];
c_736383.hdr.mark = gc_color_red;
 c_736383.hdr.grayed = 0;
c_736383.tag = closureN_tag;
 c_736383.fn = (function_type)__lambda_342;
c_736383.num_args = 1;
c_736383.num_elements = 2;
c_736383.elements = (object *)e_736396;
c_736383.elements[0] = ((closureN)self_733347)->elements[1];
c_736383.elements[1] = ((closureN)self_733347)->elements[2];

return_direct_with_clo3(data,  __glo_wrap_91mutables_scheme_cyclone_transforms, (((closure)  __glo_wrap_91mutables_scheme_cyclone_transforms)->fn),  &c_736383, r_732002, ((closureN)self_733347)->elements[0]);; 
}

static void __lambda_342(void *data, object self_733348, int argc, object *args) /* object self_733348, object r_732000 */
 {
 object r_732000 = args[0];
  
pair_type local_736388; 

pair_type local_736391; 

pair_type local_736395; 
return_direct_with_clo1(data,  ((closureN)self_733348)->elements[0], (((closure)  ((closureN)self_733348)->elements[0])->fn),  set_pair_as_expr(&local_736388, quote_set_91cell_67, set_pair_as_expr(&local_736391, ((closureN)self_733348)->elements[1], set_pair_as_expr(&local_736395, r_732000, NULL))));; 
}

static void __lambda_336(void *data, object self_733342, int argc, object *args) /* object self_733342, object r_731995 */
 {
 object r_731995 = args[0];
  
closureN_type c_736331;
object e_736364 [4];
c_736331.hdr.mark = gc_color_red;
 c_736331.hdr.grayed = 0;
c_736331.tag = closureN_tag;
 c_736331.fn = (function_type)__lambda_337;
c_736331.num_args = 1;
c_736331.num_elements = 4;
c_736331.elements = (object *)e_736364;
c_736331.elements[0] = ((closureN)self_733342)->elements[0];
c_736331.elements[1] = ((closureN)self_733342)->elements[1];
c_736331.elements[2] = ((closureN)self_733342)->elements[2];
c_736331.elements[3] = r_731995;


complex_num_type local_736367; 


return_direct_with_clo1(data,(closure)&c_736331,__lambda_337,  ((inline_function_type)
                   ((closure)__glo_set_67_91_125var_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736367, car(((closureN)self_733342)->elements[0])));; 
}

static void __lambda_337(void *data, object self_733343, int argc, object *args) /* object self_733343, object r_731989 */
 {
 object r_731989 = args[0];
  
closureN_type c_736333;
object e_736357 [4];
c_736333.hdr.mark = gc_color_red;
 c_736333.hdr.grayed = 0;
c_736333.tag = closureN_tag;
 c_736333.fn = (function_type)__lambda_338;
c_736333.num_args = 1;
c_736333.num_elements = 4;
c_736333.elements = (object *)e_736357;
c_736333.elements[0] = ((closureN)self_733343)->elements[1];
c_736333.elements[1] = ((closureN)self_733343)->elements[2];
c_736333.elements[2] = r_731989;
c_736333.elements[3] = ((closureN)self_733343)->elements[3];


complex_num_type local_736360; 


return_direct_with_clo1(data,(closure)&c_736333,__lambda_338,  ((inline_function_type)
                   ((closure)__glo_set_67_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736360, car(((closureN)self_733343)->elements[0])));; 
}

static void __lambda_338(void *data, object self_733344, int argc, object *args) /* object self_733344, object r_731993 */
 {
 object r_731993 = args[0];
  
closureN_type c_736335;
object e_736355 [3];
c_736335.hdr.mark = gc_color_red;
 c_736335.hdr.grayed = 0;
c_736335.tag = closureN_tag;
 c_736335.fn = (function_type)__lambda_339;
c_736335.num_args = 1;
c_736335.num_elements = 3;
c_736335.elements = (object *)e_736355;
c_736335.elements[0] = ((closureN)self_733344)->elements[1];
c_736335.elements[1] = ((closureN)self_733344)->elements[2];
c_736335.elements[2] = ((closureN)self_733344)->elements[3];

return_direct_with_clo3(data,  __glo_wrap_91mutables_scheme_cyclone_transforms, (((closure)  __glo_wrap_91mutables_scheme_cyclone_transforms)->fn),  &c_736335, r_731993, ((closureN)self_733344)->elements[0]);; 
}

static void __lambda_339(void *data, object self_733345, int argc, object *args) /* object self_733345, object r_731991 */
 {
 object r_731991 = args[0];
  
pair_type local_736340; 

pair_type local_736343; 

list_2_type local_736346; 

pair_type local_736350; 

pair_type local_736354; 
return_direct_with_clo1(data,  ((closureN)self_733345)->elements[0], (((closure)  ((closureN)self_733345)->elements[0])->fn),  set_pair_as_expr(&local_736340, quote_set_91global_67, set_pair_as_expr(&local_736343, Cyc_fast_list_2(&local_736346, quote_quote, ((closureN)self_733345)->elements[2]), set_pair_as_expr(&local_736350, ((closureN)self_733345)->elements[1], set_pair_as_expr(&local_736354, r_731991, NULL)))));; 
}

static void __lambda_329(void *data, object self_733333, int argc, object *args) /* object self_733333, object r_731964 */
 {
 object r_731964 = args[0];
  if( (boolean_f != r_731964) ){ 
  
pair_type local_736273; 

pair_type local_736276; 


return_direct_with_clo1(data,  ((closureN)self_733333)->elements[1], (((closure)  ((closureN)self_733333)->elements[1])->fn),  set_pair_as_expr(&local_736273, quote_cell_91get, set_pair_as_expr(&local_736276, car(((closureN)self_733333)->elements[0]), NULL)));
} else { 
  

return_direct_with_clo1(data,  ((closureN)self_733333)->elements[1], (((closure)  ((closureN)self_733333)->elements[1])->fn),  car(((closureN)self_733333)->elements[0]));}
;; 
}

static void __lambda_327(void *data, object self_733334, int argc, object *args) /* object self_733334, object k_731968 */
 {
 object k_731968 = args[0];
  
closureN_type c_736252;
object e_736260 [2];
c_736252.hdr.mark = gc_color_red;
 c_736252.hdr.grayed = 0;
c_736252.tag = closureN_tag;
 c_736252.fn = (function_type)__lambda_328;
c_736252.num_args = 1;
c_736252.num_elements = 2;
c_736252.elements = (object *)e_736260;
c_736252.elements[0] = ((closureN)self_733334)->elements[0];
c_736252.elements[1] = k_731968;





return_direct_with_clo1(data,(closure)&c_736252,__lambda_328,  memberp(data, car(((closureN)self_733334)->elements[0]), ((closureN)self_733334)->elements[1]));; 
}

static void __lambda_328(void *data, object self_733335, int argc, object *args) /* object self_733335, object r_731969 */
 {
 object r_731969 = args[0];
  if( (boolean_f != r_731969) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733335)->elements[1], (((closure)  ((closureN)self_733335)->elements[1])->fn),  boolean_f);
} else { 
  

return_direct_with_clo2(data,  __glo_is_91mutable_127_scheme_cyclone_transforms, (((closure)  __glo_is_91mutable_127_scheme_cyclone_transforms)->fn),  ((closureN)self_733335)->elements[1], car(((closureN)self_733335)->elements[0]));}
;; 
}

static void __lambda_315(void *data, object self_733321, int argc, object *args) /* object self_733321, object r_731951 */
 {
 object r_731951 = args[0];
  
closureN_type c_736175;
object e_736232 [5];
c_736175.hdr.mark = gc_color_red;
 c_736175.hdr.grayed = 0;
c_736175.tag = closureN_tag;
 c_736175.fn = (function_type)__lambda_316;
c_736175.num_args = 1;
c_736175.num_elements = 5;
c_736175.elements = (object *)e_736232;
c_736175.elements[0] = ((closureN)self_733321)->elements[0];
c_736175.elements[1] = ((closureN)self_733321)->elements[1];
c_736175.elements[2] = ((closureN)self_733321)->elements[2];
c_736175.elements[3] = r_731951;
c_736175.elements[4] = ((closureN)self_733321)->elements[3];



return_direct_with_clo2(data,  __glo_ast_117lambda_91args_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91args_scheme_cyclone_ast)->fn),  &c_736175, car(((closureN)self_733321)->elements[0]));; 
}

static void __lambda_316(void *data, object self_733322, int argc, object *args) /* object self_733322, object r_731952 */
 {
 object r_731952 = args[0];
  
closureN_type c_736177;
object e_736228 [6];
c_736177.hdr.mark = gc_color_red;
 c_736177.hdr.grayed = 0;
c_736177.tag = closureN_tag;
 c_736177.fn = (function_type)__lambda_317;
c_736177.num_args = 1;
c_736177.num_elements = 6;
c_736177.elements = (object *)e_736228;
c_736177.elements[0] = ((closureN)self_733322)->elements[0];
c_736177.elements[1] = ((closureN)self_733322)->elements[1];
c_736177.elements[2] = ((closureN)self_733322)->elements[2];
c_736177.elements[3] = ((closureN)self_733322)->elements[3];
c_736177.elements[4] = r_731952;
c_736177.elements[5] = ((closureN)self_733322)->elements[4];



return_direct_with_clo2(data,  __glo_ast_117lambda_91id_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91id_scheme_cyclone_ast)->fn),  &c_736177, car(((closureN)self_733322)->elements[0]));; 
}

static void __lambda_317(void *data, object self_733323, int argc, object *args) /* object self_733323, object r_731955 */
 {
 object r_731955 = args[0];
  
closureN_type c_736179;
object e_736224 [7];
c_736179.hdr.mark = gc_color_red;
 c_736179.hdr.grayed = 0;
c_736179.tag = closureN_tag;
 c_736179.fn = (function_type)__lambda_318;
c_736179.num_args = 1;
c_736179.num_elements = 7;
c_736179.elements = (object *)e_736224;
c_736179.elements[0] = ((closureN)self_733323)->elements[0];
c_736179.elements[1] = ((closureN)self_733323)->elements[1];
c_736179.elements[2] = ((closureN)self_733323)->elements[2];
c_736179.elements[3] = ((closureN)self_733323)->elements[3];
c_736179.elements[4] = ((closureN)self_733323)->elements[4];
c_736179.elements[5] = r_731955;
c_736179.elements[6] = ((closureN)self_733323)->elements[5];



return_direct_with_clo2(data,  __glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms, (((closure)  __glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms)->fn),  &c_736179, car(((closureN)self_733323)->elements[0]));; 
}

static void __lambda_318(void *data, object self_733324, int argc, object *args) /* object self_733324, object r_731956 */
 {
 object r_731956 = args[0];
  
closureN_type c_736181;
object e_736220 [8];
c_736181.hdr.mark = gc_color_red;
 c_736181.hdr.grayed = 0;
c_736181.tag = closureN_tag;
 c_736181.fn = (function_type)__lambda_319;
c_736181.num_args = 1;
c_736181.num_elements = 8;
c_736181.elements = (object *)e_736220;
c_736181.elements[0] = ((closureN)self_733324)->elements[0];
c_736181.elements[1] = ((closureN)self_733324)->elements[1];
c_736181.elements[2] = ((closureN)self_733324)->elements[2];
c_736181.elements[3] = ((closureN)self_733324)->elements[3];
c_736181.elements[4] = ((closureN)self_733324)->elements[4];
c_736181.elements[5] = ((closureN)self_733324)->elements[5];
c_736181.elements[6] = r_731956;
c_736181.elements[7] = ((closureN)self_733324)->elements[6];



return_direct_with_clo2(data,  __glo_ast_117lambda_91body_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91body_scheme_cyclone_ast)->fn),  &c_736181, car(((closureN)self_733324)->elements[0]));; 
}

static void __lambda_319(void *data, object self_733325, int argc, object *args) /* object self_733325, object r_731961 */
 {
 object r_731961 = args[0];
  
closureN_type c_736183;
object e_736217 [8];
c_736183.hdr.mark = gc_color_red;
 c_736183.hdr.grayed = 0;
c_736183.tag = closureN_tag;
 c_736183.fn = (function_type)__lambda_320;
c_736183.num_args = 1;
c_736183.num_elements = 8;
c_736183.elements = (object *)e_736217;
c_736183.elements[0] = ((closureN)self_733325)->elements[0];
c_736183.elements[1] = ((closureN)self_733325)->elements[1];
c_736183.elements[2] = ((closureN)self_733325)->elements[2];
c_736183.elements[3] = ((closureN)self_733325)->elements[3];
c_736183.elements[4] = ((closureN)self_733325)->elements[4];
c_736183.elements[5] = ((closureN)self_733325)->elements[5];
c_736183.elements[6] = ((closureN)self_733325)->elements[6];
c_736183.elements[7] = ((closureN)self_733325)->elements[7];



return_direct_with_clo1(data,(closure)&c_736183,__lambda_320,  Cyc_car(data, r_731961));; 
}

static void __lambda_320(void *data, object self_733326, int argc, object *args) /* object self_733326, object r_731960 */
 {
 object r_731960 = args[0];
  
closureN_type c_736185;
object e_736215 [7];
c_736185.hdr.mark = gc_color_red;
 c_736185.hdr.grayed = 0;
c_736185.tag = closureN_tag;
 c_736185.fn = (function_type)__lambda_321;
c_736185.num_args = 1;
c_736185.num_elements = 7;
c_736185.elements = (object *)e_736215;
c_736185.elements[0] = ((closureN)self_733326)->elements[0];
c_736185.elements[1] = ((closureN)self_733326)->elements[2];
c_736185.elements[2] = ((closureN)self_733326)->elements[3];
c_736185.elements[3] = ((closureN)self_733326)->elements[4];
c_736185.elements[4] = ((closureN)self_733326)->elements[5];
c_736185.elements[5] = ((closureN)self_733326)->elements[6];
c_736185.elements[6] = ((closureN)self_733326)->elements[7];

return_direct_with_clo3(data,  __glo_wrap_91mutables_scheme_cyclone_transforms, (((closure)  __glo_wrap_91mutables_scheme_cyclone_transforms)->fn),  &c_736185, r_731960, ((closureN)self_733326)->elements[1]);; 
}

static void __lambda_321(void *data, object self_733327, int argc, object *args) /* object self_733327, object r_731959 */
 {
 object r_731959 = args[0];
  
closureN_type c_736187;
object e_736211 [8];
c_736187.hdr.mark = gc_color_red;
 c_736187.hdr.grayed = 0;
c_736187.tag = closureN_tag;
 c_736187.fn = (function_type)__lambda_322;
c_736187.num_args = 1;
c_736187.num_elements = 8;
c_736187.elements = (object *)e_736211;
c_736187.elements[0] = ((closureN)self_733327)->elements[0];
c_736187.elements[1] = ((closureN)self_733327)->elements[1];
c_736187.elements[2] = ((closureN)self_733327)->elements[2];
c_736187.elements[3] = ((closureN)self_733327)->elements[3];
c_736187.elements[4] = ((closureN)self_733327)->elements[4];
c_736187.elements[5] = ((closureN)self_733327)->elements[5];
c_736187.elements[6] = r_731959;
c_736187.elements[7] = ((closureN)self_733327)->elements[6];



return_direct_with_clo2(data,  __glo_ast_117lambda_91has_91cont_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91has_91cont_scheme_cyclone_ast)->fn),  &c_736187, car(((closureN)self_733327)->elements[0]));; 
}

static void __lambda_322(void *data, object self_733328, int argc, object *args) /* object self_733328, object r_731958 */
 {
 object r_731958 = args[0];
  


closureN_type c_736192;
object e_736204 [4];
c_736192.hdr.mark = gc_color_red;
 c_736192.hdr.grayed = 0;
c_736192.tag = closureN_tag;
 c_736192.fn = (function_type)__lambda_323;
c_736192.num_args = 1;
c_736192.num_elements = 4;
c_736192.elements = (object *)e_736204;
c_736192.elements[0] = ((closureN)self_733328)->elements[0];
c_736192.elements[1] = ((closureN)self_733328)->elements[1];
c_736192.elements[2] = ((closureN)self_733328)->elements[2];
c_736192.elements[3] = ((closureN)self_733328)->elements[3];


pair_type local_736209; 
return_closcall5(data,  car(((closureN)self_733328)->elements[7]),  &c_736192, ((closureN)self_733328)->elements[4], ((closureN)self_733328)->elements[5], set_cell_as_expr(&local_736209, ((closureN)self_733328)->elements[6]), r_731958);; 
}

static void __lambda_323(void *data, object self_733329, int argc, object *args) /* object self_733329, object r_731953 */
 {
 object r_731953 = args[0];
  
closureN_type c_736194;
object e_736200 [4];
c_736194.hdr.mark = gc_color_red;
 c_736194.hdr.grayed = 0;
c_736194.tag = closureN_tag;
 c_736194.fn = (function_type)__lambda_324;
c_736194.num_args = 1;
c_736194.num_elements = 4;
c_736194.elements = (object *)e_736200;
c_736194.elements[0] = ((closureN)self_733329)->elements[1];
c_736194.elements[1] = ((closureN)self_733329)->elements[2];
c_736194.elements[2] = ((closureN)self_733329)->elements[3];
c_736194.elements[3] = r_731953;



return_direct_with_clo2(data,  __glo_ast_117lambda_91has_91cont_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91has_91cont_scheme_cyclone_ast)->fn),  &c_736194, car(((closureN)self_733329)->elements[0]));; 
}

static void __lambda_324(void *data, object self_733330, int argc, object *args) /* object self_733330, object r_731954 */
 {
 object r_731954 = args[0];
  return_direct_with_clo5(data,  __glo_ast_117_75make_91lambda_scheme_cyclone_ast, (((closure)  __glo_ast_117_75make_91lambda_scheme_cyclone_ast)->fn),  ((closureN)self_733330)->elements[0], ((closureN)self_733330)->elements[1], ((closureN)self_733330)->elements[2], ((closureN)self_733330)->elements[3], r_731954);; 
}

static void __lambda_293(void *data, object _, int argc, object *args) /* closure _,object k_731923, object exp_73321_731101 */
 {
object k_731923 = args[0]; object exp_73321_731101 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:analyze-mutable-variables");

closureN_type c_736050;
object e_736158 [2];
c_736050.hdr.mark = gc_color_red;
 c_736050.hdr.grayed = 0;
c_736050.tag = closureN_tag;
 c_736050.fn = (function_type)__lambda_294;
c_736050.num_args = 1;
c_736050.num_elements = 2;
c_736050.elements = (object *)e_736158;
c_736050.elements[0] = exp_73321_731101;
c_736050.elements[1] = k_731923;

return_direct_with_clo2(data,  __glo_ast_117lambda_127_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_127_scheme_cyclone_ast)->fn),  &c_736050, exp_73321_731101);; 
}

static void __lambda_294(void *data, object self_733295, int argc, object *args) /* object self_733295, object r_731924 */
 {
 object r_731924 = args[0];
  if( (boolean_f != r_731924) ){ 
  
closureN_type c_736052;
object e_736058 [1];
c_736052.hdr.mark = gc_color_red;
 c_736052.hdr.grayed = 0;
c_736052.tag = closureN_tag;
 c_736052.fn = (function_type)__lambda_295;
c_736052.num_args = 1;
c_736052.num_elements = 1;
c_736052.elements = (object *)e_736058;
c_736052.elements[0] = ((closureN)self_733295)->elements[1];

return_direct_with_clo2(data,  __glo_ast_117lambda_91body_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91body_scheme_cyclone_ast)->fn),  &c_736052, ((closureN)self_733295)->elements[0]);
} else { 
  
closureN_type c_736061;
object e_736156 [2];
c_736061.hdr.mark = gc_color_red;
 c_736061.hdr.grayed = 0;
c_736061.tag = closureN_tag;
 c_736061.fn = (function_type)__lambda_297;
c_736061.num_args = 1;
c_736061.num_elements = 2;
c_736061.elements = (object *)e_736156;
c_736061.elements[0] = ((closureN)self_733295)->elements[0];
c_736061.elements[1] = ((closureN)self_733295)->elements[1];

return_direct_with_clo2(data,  __glo_const_127_scheme_cyclone_util, (((closure)  __glo_const_127_scheme_cyclone_util)->fn),  &c_736061, ((closureN)self_733295)->elements[0]);}
;; 
}

static void __lambda_297(void *data, object self_733298, int argc, object *args) /* object self_733298, object r_731927 */
 {
 object r_731927 = args[0];
  if( (boolean_f != r_731927) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733298)->elements[1], (((closure)  ((closureN)self_733298)->elements[1])->fn),  Cyc_VOID);
} else { 
  
closureN_type c_736065;
object e_736154 [2];
c_736065.hdr.mark = gc_color_red;
 c_736065.hdr.grayed = 0;
c_736065.tag = closureN_tag;
 c_736065.fn = (function_type)__lambda_298;
c_736065.num_args = 1;
c_736065.num_elements = 2;
c_736065.elements = (object *)e_736154;
c_736065.elements[0] = ((closureN)self_733298)->elements[0];
c_736065.elements[1] = ((closureN)self_733298)->elements[1];

return_direct_with_clo2(data,  __glo_prim_127_scheme_cyclone_primitives, (((closure)  __glo_prim_127_scheme_cyclone_primitives)->fn),  &c_736065, ((closureN)self_733298)->elements[0]);}
;; 
}

static void __lambda_298(void *data, object self_733299, int argc, object *args) /* object self_733299, object r_731928 */
 {
 object r_731928 = args[0];
  if( (boolean_f != r_731928) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733299)->elements[1], (((closure)  ((closureN)self_733299)->elements[1])->fn),  Cyc_VOID);
} else { 
  
closureN_type c_736069;
object e_736149 [2];
c_736069.hdr.mark = gc_color_red;
 c_736069.hdr.grayed = 0;
c_736069.tag = closureN_tag;
 c_736069.fn = (function_type)__lambda_299;
c_736069.num_args = 1;
c_736069.num_elements = 2;
c_736069.elements = (object *)e_736149;
c_736069.elements[0] = ((closureN)self_733299)->elements[0];
c_736069.elements[1] = ((closureN)self_733299)->elements[1];


complex_num_type local_736152; 
return_direct_with_clo1(data,(closure)&c_736069,__lambda_299,  ((inline_function_type)
                   ((closure)__glo_ref_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736152, ((closureN)self_733299)->elements[0]));}
;; 
}

static void __lambda_299(void *data, object self_733300, int argc, object *args) /* object self_733300, object r_731929 */
 {
 object r_731929 = args[0];
  if( (boolean_f != r_731929) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733300)->elements[1], (((closure)  ((closureN)self_733300)->elements[1])->fn),  Cyc_VOID);
} else { 
  
closureN_type c_736073;
object e_736147 [2];
c_736073.hdr.mark = gc_color_red;
 c_736073.hdr.grayed = 0;
c_736073.tag = closureN_tag;
 c_736073.fn = (function_type)__lambda_300;
c_736073.num_args = 1;
c_736073.num_elements = 2;
c_736073.elements = (object *)e_736147;
c_736073.elements[0] = ((closureN)self_733300)->elements[0];
c_736073.elements[1] = ((closureN)self_733300)->elements[1];

return_direct_with_clo2(data,  __glo_quote_127_scheme_cyclone_util, (((closure)  __glo_quote_127_scheme_cyclone_util)->fn),  &c_736073, ((closureN)self_733300)->elements[0]);}
;; 
}

static void __lambda_300(void *data, object self_733301, int argc, object *args) /* object self_733301, object r_731930 */
 {
 object r_731930 = args[0];
  if( (boolean_f != r_731930) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733301)->elements[1], (((closure)  ((closureN)self_733301)->elements[1])->fn),  Cyc_VOID);
} else { 
  
closureN_type c_736077;
object e_736145 [2];
c_736077.hdr.mark = gc_color_red;
 c_736077.hdr.grayed = 0;
c_736077.tag = closureN_tag;
 c_736077.fn = (function_type)__lambda_301;
c_736077.num_args = 1;
c_736077.num_elements = 2;
c_736077.elements = (object *)e_736145;
c_736077.elements[0] = ((closureN)self_733301)->elements[0];
c_736077.elements[1] = ((closureN)self_733301)->elements[1];

return_direct_with_clo2(data,  __glo_lambda_127_scheme_cyclone_util, (((closure)  __glo_lambda_127_scheme_cyclone_util)->fn),  &c_736077, ((closureN)self_733301)->elements[0]);}
;; 
}

static void __lambda_301(void *data, object self_733302, int argc, object *args) /* object self_733302, object r_731931 */
 {
 object r_731931 = args[0];
  if( (boolean_f != r_731931) ){ 
  
closureN_type c_736079;
object e_736082 [1];
c_736079.hdr.mark = gc_color_red;
 c_736079.hdr.grayed = 0;
c_736079.tag = closureN_tag;
 c_736079.fn = (function_type)__lambda_302;
c_736079.num_args = 1;
c_736079.num_elements = 1;
c_736079.elements = (object *)e_736082;
c_736079.elements[0] = ((closureN)self_733302)->elements[1];


complex_num_type local_736085; 
return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_736079, __glo_analyze_91mutable_91variables_scheme_cyclone_transforms, ((inline_function_type)
                   ((closure)__glo_lambda_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736085, ((closureN)self_733302)->elements[0]));
} else { 
  
closureN_type c_736088;
object e_736143 [2];
c_736088.hdr.mark = gc_color_red;
 c_736088.hdr.grayed = 0;
c_736088.tag = closureN_tag;
 c_736088.fn = (function_type)__lambda_303;
c_736088.num_args = 1;
c_736088.num_elements = 2;
c_736088.elements = (object *)e_736143;
c_736088.elements[0] = ((closureN)self_733302)->elements[0];
c_736088.elements[1] = ((closureN)self_733302)->elements[1];

return_direct_with_clo2(data,  __glo_set_67_127_scheme_cyclone_util, (((closure)  __glo_set_67_127_scheme_cyclone_util)->fn),  &c_736088, ((closureN)self_733302)->elements[0]);}
;; 
}

static void __lambda_303(void *data, object self_733304, int argc, object *args) /* object self_733304, object r_731934 */
 {
 object r_731934 = args[0];
  if( (boolean_f != r_731934) ){ 
  
closureN_type c_736090;
object e_736097 [2];
c_736090.hdr.mark = gc_color_red;
 c_736090.hdr.grayed = 0;
c_736090.tag = closureN_tag;
 c_736090.fn = (function_type)__lambda_304;
c_736090.num_args = 1;
c_736090.num_elements = 2;
c_736090.elements = (object *)e_736097;
c_736090.elements[0] = ((closureN)self_733304)->elements[0];
c_736090.elements[1] = ((closureN)self_733304)->elements[1];


complex_num_type local_736100; 
return_direct_with_clo2(data,  __glo_mark_91mutable_scheme_cyclone_transforms, (((closure)  __glo_mark_91mutable_scheme_cyclone_transforms)->fn),  &c_736090, ((inline_function_type)
                   ((closure)__glo_set_67_91_125var_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736100, ((closureN)self_733304)->elements[0]));
} else { 
  
closureN_type c_736103;
object e_736141 [2];
c_736103.hdr.mark = gc_color_red;
 c_736103.hdr.grayed = 0;
c_736103.tag = closureN_tag;
 c_736103.fn = (function_type)__lambda_305;
c_736103.num_args = 1;
c_736103.num_elements = 2;
c_736103.elements = (object *)e_736141;
c_736103.elements[0] = ((closureN)self_733304)->elements[0];
c_736103.elements[1] = ((closureN)self_733304)->elements[1];

return_direct_with_clo2(data,  __glo_if_127_scheme_cyclone_util, (((closure)  __glo_if_127_scheme_cyclone_util)->fn),  &c_736103, ((closureN)self_733304)->elements[0]);}
;; 
}

static void __lambda_305(void *data, object self_733306, int argc, object *args) /* object self_733306, object r_731938 */
 {
 object r_731938 = args[0];
  if( (boolean_f != r_731938) ){ 
  
closureN_type c_736105;
object e_736119 [2];
c_736105.hdr.mark = gc_color_red;
 c_736105.hdr.grayed = 0;
c_736105.tag = closureN_tag;
 c_736105.fn = (function_type)__lambda_306;
c_736105.num_args = 1;
c_736105.num_elements = 2;
c_736105.elements = (object *)e_736119;
c_736105.elements[0] = ((closureN)self_733306)->elements[0];
c_736105.elements[1] = ((closureN)self_733306)->elements[1];


complex_num_type local_736122; 
return_direct_with_clo2(data,  __glo_analyze_91mutable_91variables_scheme_cyclone_transforms, (((closure)  __glo_analyze_91mutable_91variables_scheme_cyclone_transforms)->fn),  &c_736105, ((inline_function_type)
                   ((closure)__glo_if_91_125condition_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736122, ((closureN)self_733306)->elements[0]));
} else { 
  
closureN_type c_736125;
object e_736136 [2];
c_736125.hdr.mark = gc_color_red;
 c_736125.hdr.grayed = 0;
c_736125.tag = closureN_tag;
 c_736125.fn = (function_type)__lambda_308;
c_736125.num_args = 1;
c_736125.num_elements = 2;
c_736125.elements = (object *)e_736136;
c_736125.elements[0] = ((closureN)self_733306)->elements[0];
c_736125.elements[1] = ((closureN)self_733306)->elements[1];


complex_num_type local_736139; 
return_direct_with_clo1(data,(closure)&c_736125,__lambda_308,  ((inline_function_type)
                   ((closure)__glo_app_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736139, ((closureN)self_733306)->elements[0]));}
;; 
}

static void __lambda_308(void *data, object self_733309, int argc, object *args) /* object self_733309, object r_731944 */
 {
 object r_731944 = args[0];
  if( (boolean_f != r_731944) ){ 
  
closureN_type c_736127;
object e_736130 [1];
c_736127.hdr.mark = gc_color_red;
 c_736127.hdr.grayed = 0;
c_736127.tag = closureN_tag;
 c_736127.fn = (function_type)__lambda_309;
c_736127.num_args = 1;
c_736127.num_elements = 1;
c_736127.elements = (object *)e_736130;
c_736127.elements[0] = ((closureN)self_733309)->elements[1];

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_736127, __glo_analyze_91mutable_91variables_scheme_cyclone_transforms, ((closureN)self_733309)->elements[0]);
} else { 
  
make_utf8_string_with_len(c_736134, "unknown expression type: ", 25, 25);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_733309)->elements[1], &c_736134, ((closureN)self_733309)->elements[0]);}
;; 
}

static void __lambda_309(void *data, object self_733310, int argc, object *args) /* object self_733310, object r_731945 */
 {

  return_direct_with_clo1(data,  ((closureN)self_733310)->elements[0], (((closure)  ((closureN)self_733310)->elements[0])->fn),  Cyc_VOID);; 
}

static void __lambda_306(void *data, object self_733307, int argc, object *args) /* object self_733307, object r_731939 */
 {

  
closureN_type c_736107;
object e_736114 [2];
c_736107.hdr.mark = gc_color_red;
 c_736107.hdr.grayed = 0;
c_736107.tag = closureN_tag;
 c_736107.fn = (function_type)__lambda_307;
c_736107.num_args = 1;
c_736107.num_elements = 2;
c_736107.elements = (object *)e_736114;
c_736107.elements[0] = ((closureN)self_733307)->elements[0];
c_736107.elements[1] = ((closureN)self_733307)->elements[1];


complex_num_type local_736117; 
return_direct_with_clo2(data,  __glo_analyze_91mutable_91variables_scheme_cyclone_transforms, (((closure)  __glo_analyze_91mutable_91variables_scheme_cyclone_transforms)->fn),  &c_736107, ((inline_function_type)
                   ((closure)__glo_if_91_125then_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736117, ((closureN)self_733307)->elements[0]));; 
}

static void __lambda_307(void *data, object self_733308, int argc, object *args) /* object self_733308, object r_731940 */
 {

  
complex_num_type local_736112; 
return_direct_with_clo2(data,  __glo_analyze_91mutable_91variables_scheme_cyclone_transforms, (((closure)  __glo_analyze_91mutable_91variables_scheme_cyclone_transforms)->fn),  ((closureN)self_733308)->elements[1], ((inline_function_type)
                   ((closure)__glo_if_91_125else_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736112, ((closureN)self_733308)->elements[0]));; 
}

static void __lambda_304(void *data, object self_733305, int argc, object *args) /* object self_733305, object r_731935 */
 {

  
complex_num_type local_736095; 
return_direct_with_clo2(data,  __glo_analyze_91mutable_91variables_scheme_cyclone_transforms, (((closure)  __glo_analyze_91mutable_91variables_scheme_cyclone_transforms)->fn),  ((closureN)self_733305)->elements[1], ((inline_function_type)
                   ((closure)__glo_set_67_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_736095, ((closureN)self_733305)->elements[0]));; 
}

static void __lambda_302(void *data, object self_733303, int argc, object *args) /* object self_733303, object r_731932 */
 {

  return_direct_with_clo1(data,  ((closureN)self_733303)->elements[0], (((closure)  ((closureN)self_733303)->elements[0])->fn),  Cyc_VOID);; 
}

static void __lambda_295(void *data, object self_733296, int argc, object *args) /* object self_733296, object r_731926 */
 {
 object r_731926 = args[0];
  
closureN_type c_736054;
object e_736057 [1];
c_736054.hdr.mark = gc_color_red;
 c_736054.hdr.grayed = 0;
c_736054.tag = closureN_tag;
 c_736054.fn = (function_type)__lambda_296;
c_736054.num_args = 1;
c_736054.num_elements = 1;
c_736054.elements = (object *)e_736057;
c_736054.elements[0] = ((closureN)self_733296)->elements[0];

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_736054, __glo_analyze_91mutable_91variables_scheme_cyclone_transforms, r_731926);; 
}

static void __lambda_296(void *data, object self_733297, int argc, object *args) /* object self_733297, object r_731925 */
 {

  return_direct_with_clo1(data,  ((closureN)self_733297)->elements[0], (((closure)  ((closureN)self_733297)->elements[0])->fn),  Cyc_VOID);; 
}

static void __lambda_288(void *data, object _, int argc, object *args) /* closure _,object k_731913, object symbol_73319_731096 */
 {
object k_731913 = args[0]; object symbol_73319_731096 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:is-mutable?");

closureN_type c_736009;
object e_736047 [2];
c_736009.hdr.mark = gc_color_red;
 c_736009.hdr.grayed = 0;
c_736009.tag = closureN_tag;
 c_736009.fn = (function_type)__lambda_289;
c_736009.num_args = 1;
c_736009.num_elements = 2;
c_736009.elements = (object *)e_736047;
c_736009.elements[0] = k_731913;
c_736009.elements[1] = symbol_73319_731096;

return_direct_with_clo1(data,(closure)&c_736009,__lambda_289,  boolean_f);; 
}

static void __lambda_289(void *data, object self_733290, int argc, object *args) /* object self_733290, object is_91in_127_731098 */
 {
 object is_91in_127_731098 = args[0];
  
closureN_type c_736011;
object e_736043 [2];
c_736011.hdr.mark = gc_color_red;
 c_736011.hdr.grayed = 0;
c_736011.tag = closureN_tag;
 c_736011.fn = (function_type)__lambda_794;
c_736011.num_args = 1;
c_736011.num_elements = 2;
c_736011.elements = (object *)e_736043;
c_736011.elements[0] = ((closureN)self_733290)->elements[0];
c_736011.elements[1] = ((closureN)self_733290)->elements[1];


pair_type local_736046; 
return_direct_with_clo1(data,(closure)&c_736011,__lambda_794,  set_cell_as_expr(&local_736046, is_91in_127_731098));; 
}

static void __lambda_794(void *data, object self_733291, int argc, object *args) /* object self_733291, object is_91in_127_731098 */
 {
 object is_91in_127_731098 = args[0];
  
closureN_type c_736013;
object e_736025 [2];
c_736013.hdr.mark = gc_color_red;
 c_736013.hdr.grayed = 0;
c_736013.tag = closureN_tag;
 c_736013.fn = (function_type)__lambda_290;
c_736013.num_args = 1;
c_736013.num_elements = 2;
c_736013.elements = (object *)e_736025;
c_736013.elements[0] = is_91in_127_731098;
c_736013.elements[1] = ((closureN)self_733291)->elements[0];


closureN_type c_736026;
object e_736042 [2];
c_736026.hdr.mark = gc_color_red;
 c_736026.hdr.grayed = 0;
c_736026.tag = closureN_tag;
 c_736026.fn = (function_type)__lambda_292;
c_736026.num_args = 1;
c_736026.num_elements = 2;
c_736026.elements = (object *)e_736042;
c_736026.elements[0] = is_91in_127_731098;
c_736026.elements[1] = ((closureN)self_733291)->elements[1];

return_direct_with_clo1(data,(closure)&c_736013,__lambda_290,  &c_736026);; 
}

static void __lambda_292(void *data, object self_733292, int argc, object *args) /* object self_733292, object k_731916, object S_73320_731100 */
 {
 object k_731916 = args[0]; object S_73320_731100 = args[1];
    
if( (boolean_f != Cyc_is_pair(S_73320_731100)) ){ 
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, S_73320_731100), ((closureN)self_733292)->elements[1])) ){ 
  return_direct_with_clo1(data,  k_731916, (((closure)  k_731916)->fn),  boolean_t);
} else { 
  



return_closcall2(data,  car(((closureN)self_733292)->elements[0]),  k_731916, Cyc_cdr(data, S_73320_731100));}
;
} else { 
  return_direct_with_clo1(data,  k_731916, (((closure)  k_731916)->fn),  boolean_f);}
;; 
}

static void __lambda_290(void *data, object self_733293, int argc, object *args) /* object self_733293, object r_731915 */
 {
 object r_731915 = args[0];
  
closureN_type c_736015;
object e_736021 [2];
c_736015.hdr.mark = gc_color_red;
 c_736015.hdr.grayed = 0;
c_736015.tag = closureN_tag;
 c_736015.fn = (function_type)__lambda_291;
c_736015.num_args = 1;
c_736015.num_elements = 2;
c_736015.elements = (object *)e_736021;
c_736015.elements[0] = ((closureN)self_733293)->elements[0];
c_736015.elements[1] = ((closureN)self_733293)->elements[1];



return_direct_with_clo1(data,(closure)&c_736015,__lambda_291,  Cyc_set_cell(data, ((closureN)self_733293)->elements[0], r_731915));; 
}

static void __lambda_291(void *data, object self_733294, int argc, object *args) /* object self_733294, object r_731914 */
 {

  

return_closcall2(data,  car(((closureN)self_733294)->elements[0]),  ((closureN)self_733294)->elements[1], __glo_mutable_91variables_scheme_cyclone_transforms);; 
}

static void __lambda_286(void *data, object _, int argc, object *args) /* closure _,object k_731909, object symbol_73318_731095 */
 {
object k_731909 = args[0]; object symbol_73318_731095 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:mark-mutable");

closureN_type c_735997;
object e_736003 [1];
c_735997.hdr.mark = gc_color_red;
 c_735997.hdr.grayed = 0;
c_735997.tag = closureN_tag;
 c_735997.fn = (function_type)__lambda_287;
c_735997.num_args = 1;
c_735997.num_elements = 1;
c_735997.elements = (object *)e_736003;
c_735997.elements[0] = k_731909;


pair_type local_736006; 
return_direct_with_clo1(data,(closure)&c_735997,__lambda_287,  set_pair_as_expr(&local_736006, symbol_73318_731095, __glo_mutable_91variables_scheme_cyclone_transforms));; 
}

static void __lambda_287(void *data, object self_733289, int argc, object *args) /* object self_733289, object r_731910 */
 {
 object r_731910 = args[0];
  
object c_736002 = global_set_cps_id(data,  ((closureN)self_733289)->elements[0],"__glo_mutable_91variables_scheme_cyclone_transforms", __glo_mutable_91variables_scheme_cyclone_transforms, r_731910);
return_direct_with_clo1(data,  ((closureN)self_733289)->elements[0], (((closure)  ((closureN)self_733289)->elements[0])->fn),  c_736002);; 
}

static void __lambda_285(void *data, object _, int argc, object *args) /* closure _,object k_731905 */
 {
object k_731905 = args[0];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:clear-mutables");

object c_735994 = global_set_cps_id(data,  k_731905,"__glo_mutable_91variables_scheme_cyclone_transforms", __glo_mutable_91variables_scheme_cyclone_transforms, NULL);
return_direct_with_clo1(data,  k_731905, (((closure)  k_731905)->fn),  c_735994);; 
}

static void __lambda_245(void *data, object _, int argc, object *args) /* closure _,object k_731844, object ast_73276_731083, object opts_73277_731084_raw, ... */
 {
object k_731844 = args[0]; object ast_73276_731083 = args[1];
load_varargs(opts_73277_731084, args, 2, argc - 2);
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:free-vars");

closureN_type c_735679;
object e_735989 [3];
c_735679.hdr.mark = gc_color_red;
 c_735679.hdr.grayed = 0;
c_735679.tag = closureN_tag;
 c_735679.fn = (function_type)__lambda_246;
c_735679.num_args = 3;
c_735679.num_elements = 3;
c_735679.elements = (object *)e_735989;
c_735679.elements[0] = ast_73276_731083;
c_735679.elements[1] = k_731844;
c_735679.elements[2] = opts_73277_731084;

return_direct_with_clo3(data,(closure)&c_735679,__lambda_246,  boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_246(void *data, object self_733247, int argc, object *args) /* object self_733247, object bound_91only_127_731088, object let_91vars_731089, object search_731090 */
 {
 object bound_91only_127_731088 = args[0]; object let_91vars_731089 = args[1]; object search_731090 = args[2];
  
closureN_type c_735681;
object e_735985 [5];
c_735681.hdr.mark = gc_color_red;
 c_735681.hdr.grayed = 0;
c_735681.tag = closureN_tag;
 c_735681.fn = (function_type)__lambda_793;
c_735681.num_args = 1;
c_735681.num_elements = 5;
c_735681.elements = (object *)e_735985;
c_735681.elements[0] = ((closureN)self_733247)->elements[0];
c_735681.elements[1] = ((closureN)self_733247)->elements[1];
c_735681.elements[2] = let_91vars_731089;
c_735681.elements[3] = ((closureN)self_733247)->elements[2];
c_735681.elements[4] = search_731090;


pair_type local_735988; 
return_direct_with_clo1(data,(closure)&c_735681,__lambda_793,  set_cell_as_expr(&local_735988, bound_91only_127_731088));; 
}

static void __lambda_793(void *data, object self_733248, int argc, object *args) /* object self_733248, object bound_91only_127_731088 */
 {
 object bound_91only_127_731088 = args[0];
  
closureN_type c_735683;
object e_735980 [5];
c_735683.hdr.mark = gc_color_red;
 c_735683.hdr.grayed = 0;
c_735683.tag = closureN_tag;
 c_735683.fn = (function_type)__lambda_792;
c_735683.num_args = 1;
c_735683.num_elements = 5;
c_735683.elements = (object *)e_735980;
c_735683.elements[0] = ((closureN)self_733248)->elements[0];
c_735683.elements[1] = bound_91only_127_731088;
c_735683.elements[2] = ((closureN)self_733248)->elements[1];
c_735683.elements[3] = ((closureN)self_733248)->elements[3];
c_735683.elements[4] = ((closureN)self_733248)->elements[4];


pair_type local_735983; 
return_direct_with_clo1(data,(closure)&c_735683,__lambda_792,  set_cell_as_expr(&local_735983, ((closureN)self_733248)->elements[2]));; 
}

static void __lambda_792(void *data, object self_733249, int argc, object *args) /* object self_733249, object let_91vars_731089 */
 {
 object let_91vars_731089 = args[0];
  
closureN_type c_735685;
object e_735975 [5];
c_735685.hdr.mark = gc_color_red;
 c_735685.hdr.grayed = 0;
c_735685.tag = closureN_tag;
 c_735685.fn = (function_type)__lambda_791;
c_735685.num_args = 1;
c_735685.num_elements = 5;
c_735685.elements = (object *)e_735975;
c_735685.elements[0] = ((closureN)self_733249)->elements[0];
c_735685.elements[1] = ((closureN)self_733249)->elements[1];
c_735685.elements[2] = ((closureN)self_733249)->elements[2];
c_735685.elements[3] = let_91vars_731089;
c_735685.elements[4] = ((closureN)self_733249)->elements[3];


pair_type local_735978; 
return_direct_with_clo1(data,(closure)&c_735685,__lambda_791,  set_cell_as_expr(&local_735978, ((closureN)self_733249)->elements[4]));; 
}

static void __lambda_791(void *data, object self_733250, int argc, object *args) /* object self_733250, object search_731090 */
 {
 object search_731090 = args[0];
  
closureN_type c_735687;
object e_735971 [6];
c_735687.hdr.mark = gc_color_red;
 c_735687.hdr.grayed = 0;
c_735687.tag = closureN_tag;
 c_735687.fn = (function_type)__lambda_247;
c_735687.num_args = 1;
c_735687.num_elements = 6;
c_735687.elements = (object *)e_735971;
c_735687.elements[0] = ((closureN)self_733250)->elements[0];
c_735687.elements[1] = ((closureN)self_733250)->elements[1];
c_735687.elements[2] = ((closureN)self_733250)->elements[2];
c_735687.elements[3] = ((closureN)self_733250)->elements[3];
c_735687.elements[4] = ((closureN)self_733250)->elements[4];
c_735687.elements[5] = search_731090;



return_direct_with_clo1(data,(closure)&c_735687,__lambda_247,  Cyc_set_cell(data, ((closureN)self_733250)->elements[3], NULL));; 
}

static void __lambda_247(void *data, object self_733251, int argc, object *args) /* object self_733251, object r_731845 */
 {

  object r_731897;
    
if( (boolean_f != Cyc_is_null(((closureN)self_733251)->elements[4])) ){ 
  r_731897 = boolean_f;
} else { 
  
  r_731897 = Cyc_car(data, ((closureN)self_733251)->elements[4]);}
;
closureN_type c_735698;
object e_735967 [5];
c_735698.hdr.mark = gc_color_red;
 c_735698.hdr.grayed = 0;
c_735698.tag = closureN_tag;
 c_735698.fn = (function_type)__lambda_248;
c_735698.num_args = 1;
c_735698.num_elements = 5;
c_735698.elements = (object *)e_735967;
c_735698.elements[0] = ((closureN)self_733251)->elements[0];
c_735698.elements[1] = ((closureN)self_733251)->elements[1];
c_735698.elements[2] = ((closureN)self_733251)->elements[2];
c_735698.elements[3] = ((closureN)self_733251)->elements[3];
c_735698.elements[4] = ((closureN)self_733251)->elements[5];



return_direct_with_clo1(data,(closure)&c_735698,__lambda_248,  Cyc_set_cell(data, ((closureN)self_733251)->elements[1], r_731897));; 
}

static void __lambda_248(void *data, object self_733252, int argc, object *args) /* object self_733252, object r_731846 */
 {

  
closureN_type c_735700;
object e_735713 [3];
c_735700.hdr.mark = gc_color_red;
 c_735700.hdr.grayed = 0;
c_735700.tag = closureN_tag;
 c_735700.fn = (function_type)__lambda_249;
c_735700.num_args = 1;
c_735700.num_elements = 3;
c_735700.elements = (object *)e_735713;
c_735700.elements[0] = ((closureN)self_733252)->elements[0];
c_735700.elements[1] = ((closureN)self_733252)->elements[2];
c_735700.elements[2] = ((closureN)self_733252)->elements[4];


closureN_type c_735714;
object e_735966 [3];
c_735714.hdr.mark = gc_color_red;
 c_735714.hdr.grayed = 0;
c_735714.tag = closureN_tag;
 c_735714.fn = (function_type)__lambda_251;
c_735714.num_args = 1;
c_735714.num_elements = 3;
c_735714.elements = (object *)e_735966;
c_735714.elements[0] = ((closureN)self_733252)->elements[1];
c_735714.elements[1] = ((closureN)self_733252)->elements[3];
c_735714.elements[2] = ((closureN)self_733252)->elements[4];

return_direct_with_clo1(data,(closure)&c_735700,__lambda_249,  &c_735714);; 
}

static void __lambda_251(void *data, object self_733253, int argc, object *args) /* object self_733253, object k_731849, object exp_73279_731094 */
 {
 object k_731849 = args[0]; object exp_73279_731094 = args[1];
  
closureN_type c_735716;
object e_735965 [5];
c_735716.hdr.mark = gc_color_red;
 c_735716.hdr.grayed = 0;
c_735716.tag = closureN_tag;
 c_735716.fn = (function_type)__lambda_252;
c_735716.num_args = 1;
c_735716.num_elements = 5;
c_735716.elements = (object *)e_735965;
c_735716.elements[0] = ((closureN)self_733253)->elements[0];
c_735716.elements[1] = exp_73279_731094;
c_735716.elements[2] = k_731849;
c_735716.elements[3] = ((closureN)self_733253)->elements[1];
c_735716.elements[4] = ((closureN)self_733253)->elements[2];

return_direct_with_clo2(data,  __glo_ast_117lambda_127_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_127_scheme_cyclone_ast)->fn),  &c_735716, exp_73279_731094);; 
}

static void __lambda_252(void *data, object self_733254, int argc, object *args) /* object self_733254, object r_731850 */
 {
 object r_731850 = args[0];
  if( (boolean_f != r_731850) ){ 
  
closureN_type c_735718;
object e_735735 [3];
c_735718.hdr.mark = gc_color_red;
 c_735718.hdr.grayed = 0;
c_735718.tag = closureN_tag;
 c_735718.fn = (function_type)__lambda_253;
c_735718.num_args = 1;
c_735718.num_elements = 3;
c_735718.elements = (object *)e_735735;
c_735718.elements[0] = ((closureN)self_733254)->elements[1];
c_735718.elements[1] = ((closureN)self_733254)->elements[2];
c_735718.elements[2] = ((closureN)self_733254)->elements[4];

return_direct_with_clo2(data,  __glo_ast_117lambda_91body_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91body_scheme_cyclone_ast)->fn),  &c_735718, ((closureN)self_733254)->elements[1]);
} else { 
  
closureN_type c_735738;
object e_735963 [5];
c_735738.hdr.mark = gc_color_red;
 c_735738.hdr.grayed = 0;
c_735738.tag = closureN_tag;
 c_735738.fn = (function_type)__lambda_257;
c_735738.num_args = 1;
c_735738.num_elements = 5;
c_735738.elements = (object *)e_735963;
c_735738.elements[0] = ((closureN)self_733254)->elements[0];
c_735738.elements[1] = ((closureN)self_733254)->elements[1];
c_735738.elements[2] = ((closureN)self_733254)->elements[2];
c_735738.elements[3] = ((closureN)self_733254)->elements[3];
c_735738.elements[4] = ((closureN)self_733254)->elements[4];

return_direct_with_clo2(data,  __glo_const_127_scheme_cyclone_util, (((closure)  __glo_const_127_scheme_cyclone_util)->fn),  &c_735738, ((closureN)self_733254)->elements[1]);}
;; 
}

static void __lambda_257(void *data, object self_733259, int argc, object *args) /* object self_733259, object r_731856 */
 {
 object r_731856 = args[0];
  if( (boolean_f != r_731856) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733259)->elements[2], (((closure)  ((closureN)self_733259)->elements[2])->fn),  NULL);
} else { 
  
closureN_type c_735742;
object e_735961 [5];
c_735742.hdr.mark = gc_color_red;
 c_735742.hdr.grayed = 0;
c_735742.tag = closureN_tag;
 c_735742.fn = (function_type)__lambda_258;
c_735742.num_args = 1;
c_735742.num_elements = 5;
c_735742.elements = (object *)e_735961;
c_735742.elements[0] = ((closureN)self_733259)->elements[0];
c_735742.elements[1] = ((closureN)self_733259)->elements[1];
c_735742.elements[2] = ((closureN)self_733259)->elements[2];
c_735742.elements[3] = ((closureN)self_733259)->elements[3];
c_735742.elements[4] = ((closureN)self_733259)->elements[4];

return_direct_with_clo2(data,  __glo_quote_127_scheme_cyclone_util, (((closure)  __glo_quote_127_scheme_cyclone_util)->fn),  &c_735742, ((closureN)self_733259)->elements[1]);}
;; 
}

static void __lambda_258(void *data, object self_733260, int argc, object *args) /* object self_733260, object r_731857 */
 {
 object r_731857 = args[0];
  if( (boolean_f != r_731857) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733260)->elements[2], (((closure)  ((closureN)self_733260)->elements[2])->fn),  NULL);
} else { 
  
closureN_type c_735746;
object e_735956 [5];
c_735746.hdr.mark = gc_color_red;
 c_735746.hdr.grayed = 0;
c_735746.tag = closureN_tag;
 c_735746.fn = (function_type)__lambda_259;
c_735746.num_args = 1;
c_735746.num_elements = 5;
c_735746.elements = (object *)e_735956;
c_735746.elements[0] = ((closureN)self_733260)->elements[0];
c_735746.elements[1] = ((closureN)self_733260)->elements[1];
c_735746.elements[2] = ((closureN)self_733260)->elements[2];
c_735746.elements[3] = ((closureN)self_733260)->elements[3];
c_735746.elements[4] = ((closureN)self_733260)->elements[4];


complex_num_type local_735959; 
return_direct_with_clo1(data,(closure)&c_735746,__lambda_259,  ((inline_function_type)
                   ((closure)__glo_ref_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_735959, ((closureN)self_733260)->elements[1]));}
;; 
}

static void __lambda_259(void *data, object self_733261, int argc, object *args) /* object self_733261, object r_731858 */
 {
 object r_731858 = args[0];
  if( (boolean_f != r_731858) ){ 
  
closureN_type c_735748;
object e_735773 [4];
c_735748.hdr.mark = gc_color_red;
 c_735748.hdr.grayed = 0;
c_735748.tag = closureN_tag;
 c_735748.fn = (function_type)__lambda_260;
c_735748.num_args = 1;
c_735748.num_elements = 4;
c_735748.elements = (object *)e_735773;
c_735748.elements[0] = ((closureN)self_733261)->elements[0];
c_735748.elements[1] = ((closureN)self_733261)->elements[1];
c_735748.elements[2] = ((closureN)self_733261)->elements[2];
c_735748.elements[3] = ((closureN)self_733261)->elements[3];

return_direct_with_clo2(data,  __glo_prim_127_scheme_cyclone_primitives, (((closure)  __glo_prim_127_scheme_cyclone_primitives)->fn),  &c_735748, ((closureN)self_733261)->elements[1]);
} else { 
  
closureN_type c_735776;
object e_735954 [4];
c_735776.hdr.mark = gc_color_red;
 c_735776.hdr.grayed = 0;
c_735776.tag = closureN_tag;
 c_735776.fn = (function_type)__lambda_262;
c_735776.num_args = 1;
c_735776.num_elements = 4;
c_735776.elements = (object *)e_735954;
c_735776.elements[0] = ((closureN)self_733261)->elements[1];
c_735776.elements[1] = ((closureN)self_733261)->elements[2];
c_735776.elements[2] = ((closureN)self_733261)->elements[3];
c_735776.elements[3] = ((closureN)self_733261)->elements[4];

return_direct_with_clo2(data,  __glo_lambda_127_scheme_cyclone_util, (((closure)  __glo_lambda_127_scheme_cyclone_util)->fn),  &c_735776, ((closureN)self_733261)->elements[1]);}
;; 
}

static void __lambda_262(void *data, object self_733264, int argc, object *args) /* object self_733264, object r_731861 */
 {
 object r_731861 = args[0];
  if( (boolean_f != r_731861) ){ 
  
closureN_type c_735778;
object e_735795 [3];
c_735778.hdr.mark = gc_color_red;
 c_735778.hdr.grayed = 0;
c_735778.tag = closureN_tag;
 c_735778.fn = (function_type)__lambda_263;
c_735778.num_args = 1;
c_735778.num_elements = 3;
c_735778.elements = (object *)e_735795;
c_735778.elements[0] = ((closureN)self_733264)->elements[0];
c_735778.elements[1] = ((closureN)self_733264)->elements[1];
c_735778.elements[2] = ((closureN)self_733264)->elements[3];


complex_num_type local_735798; 
return_direct_with_clo1(data,(closure)&c_735778,__lambda_263,  ((inline_function_type)
                   ((closure)__glo_lambda_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_735798, ((closureN)self_733264)->elements[0]));
} else { 
  
closureN_type c_735801;
object e_735952 [4];
c_735801.hdr.mark = gc_color_red;
 c_735801.hdr.grayed = 0;
c_735801.tag = closureN_tag;
 c_735801.fn = (function_type)__lambda_267;
c_735801.num_args = 1;
c_735801.num_elements = 4;
c_735801.elements = (object *)e_735952;
c_735801.elements[0] = ((closureN)self_733264)->elements[0];
c_735801.elements[1] = ((closureN)self_733264)->elements[1];
c_735801.elements[2] = ((closureN)self_733264)->elements[2];
c_735801.elements[3] = ((closureN)self_733264)->elements[3];

return_direct_with_clo2(data,  __glo_if_91syntax_127_scheme_cyclone_util, (((closure)  __glo_if_91syntax_127_scheme_cyclone_util)->fn),  &c_735801, ((closureN)self_733264)->elements[0]);}
;; 
}

static void __lambda_267(void *data, object self_733269, int argc, object *args) /* object self_733269, object r_731867 */
 {
 object r_731867 = args[0];
  if( (boolean_f != r_731867) ){ 
  


closureN_type c_735806;
object e_735834 [3];
c_735806.hdr.mark = gc_color_red;
 c_735806.hdr.grayed = 0;
c_735806.tag = closureN_tag;
 c_735806.fn = (function_type)__lambda_268;
c_735806.num_args = 1;
c_735806.num_elements = 3;
c_735806.elements = (object *)e_735834;
c_735806.elements[0] = ((closureN)self_733269)->elements[0];
c_735806.elements[1] = ((closureN)self_733269)->elements[1];
c_735806.elements[2] = ((closureN)self_733269)->elements[3];


complex_num_type local_735837; 
return_closcall2(data,  car(((closureN)self_733269)->elements[3]),  &c_735806, ((inline_function_type)
                   ((closure)__glo_if_91_125condition_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_735837, ((closureN)self_733269)->elements[0]));
} else { 
  
closureN_type c_735840;
object e_735950 [4];
c_735840.hdr.mark = gc_color_red;
 c_735840.hdr.grayed = 0;
c_735840.tag = closureN_tag;
 c_735840.fn = (function_type)__lambda_272;
c_735840.num_args = 1;
c_735840.num_elements = 4;
c_735840.elements = (object *)e_735950;
c_735840.elements[0] = ((closureN)self_733269)->elements[0];
c_735840.elements[1] = ((closureN)self_733269)->elements[1];
c_735840.elements[2] = ((closureN)self_733269)->elements[2];
c_735840.elements[3] = ((closureN)self_733269)->elements[3];

return_direct_with_clo2(data,  __glo_define_127_scheme_cyclone_util, (((closure)  __glo_define_127_scheme_cyclone_util)->fn),  &c_735840, ((closureN)self_733269)->elements[0]);}
;; 
}

static void __lambda_272(void *data, object self_733274, int argc, object *args) /* object self_733274, object r_731875 */
 {
 object r_731875 = args[0];
  if( (boolean_f != r_731875) ){ 
  
closureN_type c_735842;
object e_735859 [3];
c_735842.hdr.mark = gc_color_red;
 c_735842.hdr.grayed = 0;
c_735842.tag = closureN_tag;
 c_735842.fn = (function_type)__lambda_273;
c_735842.num_args = 1;
c_735842.num_elements = 3;
c_735842.elements = (object *)e_735859;
c_735842.elements[0] = ((closureN)self_733274)->elements[0];
c_735842.elements[1] = ((closureN)self_733274)->elements[1];
c_735842.elements[2] = ((closureN)self_733274)->elements[3];

return_direct_with_clo2(data,  __glo_define_91_125var_scheme_cyclone_util, (((closure)  __glo_define_91_125var_scheme_cyclone_util)->fn),  &c_735842, ((closureN)self_733274)->elements[0]);
} else { 
  
closureN_type c_735862;
object e_735948 [4];
c_735862.hdr.mark = gc_color_red;
 c_735862.hdr.grayed = 0;
c_735862.tag = closureN_tag;
 c_735862.fn = (function_type)__lambda_275;
c_735862.num_args = 1;
c_735862.num_elements = 4;
c_735862.elements = (object *)e_735948;
c_735862.elements[0] = ((closureN)self_733274)->elements[0];
c_735862.elements[1] = ((closureN)self_733274)->elements[1];
c_735862.elements[2] = ((closureN)self_733274)->elements[2];
c_735862.elements[3] = ((closureN)self_733274)->elements[3];

return_direct_with_clo2(data,  __glo_define_91c_127_scheme_cyclone_util, (((closure)  __glo_define_91c_127_scheme_cyclone_util)->fn),  &c_735862, ((closureN)self_733274)->elements[0]);}
;; 
}

static void __lambda_275(void *data, object self_733277, int argc, object *args) /* object self_733277, object r_731880 */
 {
 object r_731880 = args[0];
  if( (boolean_f != r_731880) ){ 
  
closureN_type c_735864;
object e_735870 [1];
c_735864.hdr.mark = gc_color_red;
 c_735864.hdr.grayed = 0;
c_735864.tag = closureN_tag;
 c_735864.fn = (function_type)__lambda_276;
c_735864.num_args = 1;
c_735864.num_elements = 1;
c_735864.elements = (object *)e_735870;
c_735864.elements[0] = ((closureN)self_733277)->elements[1];

return_direct_with_clo2(data,  __glo_define_91_125var_scheme_cyclone_util, (((closure)  __glo_define_91_125var_scheme_cyclone_util)->fn),  &c_735864, ((closureN)self_733277)->elements[0]);
} else { 
  
closureN_type c_735873;
object e_735946 [4];
c_735873.hdr.mark = gc_color_red;
 c_735873.hdr.grayed = 0;
c_735873.tag = closureN_tag;
 c_735873.fn = (function_type)__lambda_277;
c_735873.num_args = 1;
c_735873.num_elements = 4;
c_735873.elements = (object *)e_735946;
c_735873.elements[0] = ((closureN)self_733277)->elements[0];
c_735873.elements[1] = ((closureN)self_733277)->elements[1];
c_735873.elements[2] = ((closureN)self_733277)->elements[2];
c_735873.elements[3] = ((closureN)self_733277)->elements[3];

return_direct_with_clo2(data,  __glo_set_67_127_scheme_cyclone_util, (((closure)  __glo_set_67_127_scheme_cyclone_util)->fn),  &c_735873, ((closureN)self_733277)->elements[0]);}
;; 
}

static void __lambda_277(void *data, object self_733279, int argc, object *args) /* object self_733279, object r_731882 */
 {
 object r_731882 = args[0];
  if( (boolean_f != r_731882) ){ 
  


closureN_type c_735878;
object e_735888 [2];
c_735878.hdr.mark = gc_color_red;
 c_735878.hdr.grayed = 0;
c_735878.tag = closureN_tag;
 c_735878.fn = (function_type)__lambda_278;
c_735878.num_args = 1;
c_735878.num_elements = 2;
c_735878.elements = (object *)e_735888;
c_735878.elements[0] = ((closureN)self_733279)->elements[0];
c_735878.elements[1] = ((closureN)self_733279)->elements[1];


complex_num_type local_735891; 
return_closcall2(data,  car(((closureN)self_733279)->elements[3]),  &c_735878, ((inline_function_type)
                   ((closure)__glo_set_67_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_735891, ((closureN)self_733279)->elements[0]));
} else { 
  
closureN_type c_735894;
object e_735941 [4];
c_735894.hdr.mark = gc_color_red;
 c_735894.hdr.grayed = 0;
c_735894.tag = closureN_tag;
 c_735894.fn = (function_type)__lambda_279;
c_735894.num_args = 1;
c_735894.num_elements = 4;
c_735894.elements = (object *)e_735941;
c_735894.elements[0] = ((closureN)self_733279)->elements[0];
c_735894.elements[1] = ((closureN)self_733279)->elements[1];
c_735894.elements[2] = ((closureN)self_733279)->elements[2];
c_735894.elements[3] = ((closureN)self_733279)->elements[3];


complex_num_type local_735944; 
return_direct_with_clo1(data,(closure)&c_735894,__lambda_279,  ((inline_function_type)
                   ((closure)__glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_735944, quote_let, ((closureN)self_733279)->elements[0]));}
;; 
}

static void __lambda_279(void *data, object self_733281, int argc, object *args) /* object self_733281, object r_731887 */
 {
 object r_731887 = args[0];
  if( (boolean_f != r_731887) ){ 
  
closureN_type c_735896;
object e_735917 [4];
c_735896.hdr.mark = gc_color_red;
 c_735896.hdr.grayed = 0;
c_735896.tag = closureN_tag;
 c_735896.fn = (function_type)__lambda_280;
c_735896.num_args = 1;
c_735896.num_elements = 4;
c_735896.elements = (object *)e_735917;
c_735896.elements[0] = ((closureN)self_733281)->elements[0];
c_735896.elements[1] = ((closureN)self_733281)->elements[1];
c_735896.elements[2] = ((closureN)self_733281)->elements[2];
c_735896.elements[3] = ((closureN)self_733281)->elements[3];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_735896, primitive_car, Cyc_cadr(data, ((closureN)self_733281)->elements[0]));
} else { 
  
closureN_type c_735922;
object e_735936 [3];
c_735922.hdr.mark = gc_color_red;
 c_735922.hdr.grayed = 0;
c_735922.tag = closureN_tag;
 c_735922.fn = (function_type)__lambda_283;
c_735922.num_args = 1;
c_735922.num_elements = 3;
c_735922.elements = (object *)e_735936;
c_735922.elements[0] = ((closureN)self_733281)->elements[0];
c_735922.elements[1] = ((closureN)self_733281)->elements[1];
c_735922.elements[2] = ((closureN)self_733281)->elements[3];


complex_num_type local_735939; 
return_direct_with_clo1(data,(closure)&c_735922,__lambda_283,  ((inline_function_type)
                   ((closure)__glo_app_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_735939, ((closureN)self_733281)->elements[0]));}
;; 
}

static void __lambda_283(void *data, object self_733285, int argc, object *args) /* object self_733285, object r_731893 */
 {
 object r_731893 = args[0];
  if( (boolean_f != r_731893) ){ 
  
closureN_type c_735924;
object e_735927 [1];
c_735924.hdr.mark = gc_color_red;
 c_735924.hdr.grayed = 0;
c_735924.tag = closureN_tag;
 c_735924.fn = (function_type)__lambda_284;
c_735924.num_args = 1;
c_735924.num_elements = 1;
c_735924.elements = (object *)e_735927;
c_735924.elements[0] = ((closureN)self_733285)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_735924, car(((closureN)self_733285)->elements[2]), ((closureN)self_733285)->elements[0]);
} else { 
  
make_utf8_string_with_len(c_735934, "unknown expression: ", 20, 20);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_733285)->elements[1], &c_735934, ((closureN)self_733285)->elements[0]);}
;; 
}

static void __lambda_284(void *data, object self_733286, int argc, object *args) /* object self_733286, object r_731894 */
 {
 object r_731894 = args[0];
  return_direct_with_clo4(data,  __glo_reduce_scheme_cyclone_transforms, (((closure)  __glo_reduce_scheme_cyclone_transforms)->fn),  ((closureN)self_733286)->elements[0], __glo__union_scheme_cyclone_transforms, r_731894, NULL);; 
}

static void __lambda_280(void *data, object self_733282, int argc, object *args) /* object self_733282, object r_731891 */
 {
 object r_731891 = args[0];
  
closureN_type c_735898;
object e_735913 [4];
c_735898.hdr.mark = gc_color_red;
 c_735898.hdr.grayed = 0;
c_735898.tag = closureN_tag;
 c_735898.fn = (function_type)__lambda_281;
c_735898.num_args = 1;
c_735898.num_elements = 4;
c_735898.elements = (object *)e_735913;
c_735898.elements[0] = ((closureN)self_733282)->elements[0];
c_735898.elements[1] = ((closureN)self_733282)->elements[1];
c_735898.elements[2] = ((closureN)self_733282)->elements[2];
c_735898.elements[3] = ((closureN)self_733282)->elements[3];



return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_735898, r_731891, car(((closureN)self_733282)->elements[2]));; 
}

static void __lambda_281(void *data, object self_733283, int argc, object *args) /* object self_733283, object r_731890 */
 {
 object r_731890 = args[0];
  
closureN_type c_735900;
object e_735909 [3];
c_735900.hdr.mark = gc_color_red;
 c_735900.hdr.grayed = 0;
c_735900.tag = closureN_tag;
 c_735900.fn = (function_type)__lambda_282;
c_735900.num_args = 1;
c_735900.num_elements = 3;
c_735900.elements = (object *)e_735909;
c_735900.elements[0] = ((closureN)self_733283)->elements[0];
c_735900.elements[1] = ((closureN)self_733283)->elements[1];
c_735900.elements[2] = ((closureN)self_733283)->elements[3];



return_direct_with_clo1(data,(closure)&c_735900,__lambda_282,  Cyc_set_cell(data, ((closureN)self_733283)->elements[2], r_731890));; 
}

static void __lambda_282(void *data, object self_733284, int argc, object *args) /* object self_733284, object r_731888 */
 {

  



return_closcall2(data,  car(((closureN)self_733284)->elements[2]),  ((closureN)self_733284)->elements[1], Cyc_cdr(data, ((closureN)self_733284)->elements[0]));; 
}

static void __lambda_278(void *data, object self_733280, int argc, object *args) /* object self_733280, object r_731884 */
 {
 object r_731884 = args[0];
  
pair_type local_735883; 

complex_num_type local_735886; 
return_direct_with_clo3(data,  __glo__union_scheme_cyclone_transforms, (((closure)  __glo__union_scheme_cyclone_transforms)->fn),  ((closureN)self_733280)->elements[1], set_cell_as_expr(&local_735883, ((inline_function_type)
                   ((closure)__glo_set_67_91_125var_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_735886, ((closureN)self_733280)->elements[0])), r_731884);; 
}

static void __lambda_276(void *data, object self_733278, int argc, object *args) /* object self_733278, object r_731881 */
 {
 object r_731881 = args[0];
  
pair_type local_735869; 
return_direct_with_clo1(data,  ((closureN)self_733278)->elements[0], (((closure)  ((closureN)self_733278)->elements[0])->fn),  set_cell_as_expr(&local_735869, r_731881));; 
}

static void __lambda_273(void *data, object self_733275, int argc, object *args) /* object self_733275, object r_731879 */
 {
 object r_731879 = args[0];
  


closureN_type c_735847;
object e_735854 [2];
c_735847.hdr.mark = gc_color_red;
 c_735847.hdr.grayed = 0;
c_735847.tag = closureN_tag;
 c_735847.fn = (function_type)__lambda_274;
c_735847.num_args = 1;
c_735847.num_elements = 2;
c_735847.elements = (object *)e_735854;
c_735847.elements[0] = ((closureN)self_733275)->elements[1];
c_735847.elements[1] = r_731879;


complex_num_type local_735857; 
return_closcall2(data,  car(((closureN)self_733275)->elements[2]),  &c_735847, ((inline_function_type)
                   ((closure)__glo_define_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_735857, ((closureN)self_733275)->elements[0]));; 
}

static void __lambda_274(void *data, object self_733276, int argc, object *args) /* object self_733276, object r_731877 */
 {
 object r_731877 = args[0];
  
pair_type local_735852; 
return_direct_with_clo3(data,  __glo__union_scheme_cyclone_transforms, (((closure)  __glo__union_scheme_cyclone_transforms)->fn),  ((closureN)self_733276)->elements[0], set_cell_as_expr(&local_735852, ((closureN)self_733276)->elements[1]), r_731877);; 
}

static void __lambda_268(void *data, object self_733270, int argc, object *args) /* object self_733270, object r_731868 */
 {
 object r_731868 = args[0];
  


closureN_type c_735811;
object e_735829 [4];
c_735811.hdr.mark = gc_color_red;
 c_735811.hdr.grayed = 0;
c_735811.tag = closureN_tag;
 c_735811.fn = (function_type)__lambda_269;
c_735811.num_args = 1;
c_735811.num_elements = 4;
c_735811.elements = (object *)e_735829;
c_735811.elements[0] = ((closureN)self_733270)->elements[0];
c_735811.elements[1] = ((closureN)self_733270)->elements[1];
c_735811.elements[2] = r_731868;
c_735811.elements[3] = ((closureN)self_733270)->elements[2];


complex_num_type local_735832; 
return_closcall2(data,  car(((closureN)self_733270)->elements[2]),  &c_735811, ((inline_function_type)
                   ((closure)__glo_if_91_125then_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_735832, ((closureN)self_733270)->elements[0]));; 
}

static void __lambda_269(void *data, object self_733271, int argc, object *args) /* object self_733271, object r_731870 */
 {
 object r_731870 = args[0];
  


closureN_type c_735816;
object e_735824 [3];
c_735816.hdr.mark = gc_color_red;
 c_735816.hdr.grayed = 0;
c_735816.tag = closureN_tag;
 c_735816.fn = (function_type)__lambda_270;
c_735816.num_args = 1;
c_735816.num_elements = 3;
c_735816.elements = (object *)e_735824;
c_735816.elements[0] = ((closureN)self_733271)->elements[1];
c_735816.elements[1] = ((closureN)self_733271)->elements[2];
c_735816.elements[2] = r_731870;


complex_num_type local_735827; 
return_closcall2(data,  car(((closureN)self_733271)->elements[3]),  &c_735816, ((inline_function_type)
                   ((closure)__glo_if_91_125else_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_735827, ((closureN)self_733271)->elements[0]));; 
}

static void __lambda_270(void *data, object self_733272, int argc, object *args) /* object self_733272, object r_731871 */
 {
 object r_731871 = args[0];
  
closureN_type c_735818;
object e_735822 [2];
c_735818.hdr.mark = gc_color_red;
 c_735818.hdr.grayed = 0;
c_735818.tag = closureN_tag;
 c_735818.fn = (function_type)__lambda_271;
c_735818.num_args = 1;
c_735818.num_elements = 2;
c_735818.elements = (object *)e_735822;
c_735818.elements[0] = ((closureN)self_733272)->elements[0];
c_735818.elements[1] = ((closureN)self_733272)->elements[1];

return_direct_with_clo3(data,  __glo__union_scheme_cyclone_transforms, (((closure)  __glo__union_scheme_cyclone_transforms)->fn),  &c_735818, ((closureN)self_733272)->elements[2], r_731871);; 
}

static void __lambda_271(void *data, object self_733273, int argc, object *args) /* object self_733273, object r_731869 */
 {
 object r_731869 = args[0];
  return_direct_with_clo3(data,  __glo__union_scheme_cyclone_transforms, (((closure)  __glo__union_scheme_cyclone_transforms)->fn),  ((closureN)self_733273)->elements[0], ((closureN)self_733273)->elements[1], r_731869);; 
}

static void __lambda_263(void *data, object self_733265, int argc, object *args) /* object self_733265, object r_731866 */
 {
 object r_731866 = args[0];
  
closureN_type c_735780;
object e_735791 [2];
c_735780.hdr.mark = gc_color_red;
 c_735780.hdr.grayed = 0;
c_735780.tag = closureN_tag;
 c_735780.fn = (function_type)__lambda_264;
c_735780.num_args = 1;
c_735780.num_elements = 2;
c_735780.elements = (object *)e_735791;
c_735780.elements[0] = ((closureN)self_733265)->elements[0];
c_735780.elements[1] = ((closureN)self_733265)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_735780, car(((closureN)self_733265)->elements[2]), r_731866);; 
}

static void __lambda_264(void *data, object self_733266, int argc, object *args) /* object self_733266, object r_731864 */
 {
 object r_731864 = args[0];
  
closureN_type c_735782;
object e_735790 [2];
c_735782.hdr.mark = gc_color_red;
 c_735782.hdr.grayed = 0;
c_735782.tag = closureN_tag;
 c_735782.fn = (function_type)__lambda_265;
c_735782.num_args = 1;
c_735782.num_elements = 2;
c_735782.elements = (object *)e_735790;
c_735782.elements[0] = ((closureN)self_733266)->elements[0];
c_735782.elements[1] = ((closureN)self_733266)->elements[1];

return_direct_with_clo4(data,  __glo_reduce_scheme_cyclone_transforms, (((closure)  __glo_reduce_scheme_cyclone_transforms)->fn),  &c_735782, __glo__union_scheme_cyclone_transforms, r_731864, NULL);; 
}

static void __lambda_265(void *data, object self_733267, int argc, object *args) /* object self_733267, object r_731862 */
 {
 object r_731862 = args[0];
  
closureN_type c_735784;
object e_735788 [2];
c_735784.hdr.mark = gc_color_red;
 c_735784.hdr.grayed = 0;
c_735784.tag = closureN_tag;
 c_735784.fn = (function_type)__lambda_266;
c_735784.num_args = 1;
c_735784.num_elements = 2;
c_735784.elements = (object *)e_735788;
c_735784.elements[0] = ((closureN)self_733267)->elements[1];
c_735784.elements[1] = r_731862;

return_direct_with_clo2(data,  __glo_lambda_91formals_91_125list_scheme_cyclone_util, (((closure)  __glo_lambda_91formals_91_125list_scheme_cyclone_util)->fn),  &c_735784, ((closureN)self_733267)->elements[0]);; 
}

static void __lambda_266(void *data, object self_733268, int argc, object *args) /* object self_733268, object r_731863 */
 {
 object r_731863 = args[0];
  return_direct_with_clo3(data,  __glo_difference_scheme_cyclone_transforms, (((closure)  __glo_difference_scheme_cyclone_transforms)->fn),  ((closureN)self_733268)->elements[0], ((closureN)self_733268)->elements[1], r_731863);; 
}

static void __lambda_260(void *data, object self_733262, int argc, object *args) /* object self_733262, object r_731859 */
 {
 object r_731859 = args[0];
  if( (boolean_f != r_731859) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733262)->elements[2], (((closure)  ((closureN)self_733262)->elements[2])->fn),  NULL);
} else { 
  
closureN_type c_735752;
object e_735766 [3];
c_735752.hdr.mark = gc_color_red;
 c_735752.hdr.grayed = 0;
c_735752.tag = closureN_tag;
 c_735752.fn = (function_type)__lambda_261;
c_735752.num_args = 1;
c_735752.num_elements = 3;
c_735752.elements = (object *)e_735766;
c_735752.elements[0] = ((closureN)self_733262)->elements[0];
c_735752.elements[1] = ((closureN)self_733262)->elements[1];
c_735752.elements[2] = ((closureN)self_733262)->elements[2];





return_direct_with_clo1(data,(closure)&c_735752,__lambda_261,  memberp(data, ((closureN)self_733262)->elements[1], car(((closureN)self_733262)->elements[3])));}
;; 
}

static void __lambda_261(void *data, object self_733263, int argc, object *args) /* object self_733263, object r_731860 */
 {
 object r_731860 = args[0];
  if( (boolean_f != r_731860) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733263)->elements[2], (((closure)  ((closureN)self_733263)->elements[2])->fn),  NULL);
} else { 
    
if( (boolean_f != car(((closureN)self_733263)->elements[0])) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733263)->elements[2], (((closure)  ((closureN)self_733263)->elements[2])->fn),  NULL);
} else { 
  
pair_type local_735764; 
return_direct_with_clo1(data,  ((closureN)self_733263)->elements[2], (((closure)  ((closureN)self_733263)->elements[2])->fn),  set_cell_as_expr(&local_735764, ((closureN)self_733263)->elements[1]));}
;}
;; 
}

static void __lambda_253(void *data, object self_733255, int argc, object *args) /* object self_733255, object r_731855 */
 {
 object r_731855 = args[0];
  
closureN_type c_735720;
object e_735731 [2];
c_735720.hdr.mark = gc_color_red;
 c_735720.hdr.grayed = 0;
c_735720.tag = closureN_tag;
 c_735720.fn = (function_type)__lambda_254;
c_735720.num_args = 1;
c_735720.num_elements = 2;
c_735720.elements = (object *)e_735731;
c_735720.elements[0] = ((closureN)self_733255)->elements[0];
c_735720.elements[1] = ((closureN)self_733255)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_735720, car(((closureN)self_733255)->elements[2]), r_731855);; 
}

static void __lambda_254(void *data, object self_733256, int argc, object *args) /* object self_733256, object r_731853 */
 {
 object r_731853 = args[0];
  
closureN_type c_735722;
object e_735730 [2];
c_735722.hdr.mark = gc_color_red;
 c_735722.hdr.grayed = 0;
c_735722.tag = closureN_tag;
 c_735722.fn = (function_type)__lambda_255;
c_735722.num_args = 1;
c_735722.num_elements = 2;
c_735722.elements = (object *)e_735730;
c_735722.elements[0] = ((closureN)self_733256)->elements[0];
c_735722.elements[1] = ((closureN)self_733256)->elements[1];

return_direct_with_clo4(data,  __glo_reduce_scheme_cyclone_transforms, (((closure)  __glo_reduce_scheme_cyclone_transforms)->fn),  &c_735722, __glo__union_scheme_cyclone_transforms, r_731853, NULL);; 
}

static void __lambda_255(void *data, object self_733257, int argc, object *args) /* object self_733257, object r_731851 */
 {
 object r_731851 = args[0];
  
closureN_type c_735724;
object e_735728 [2];
c_735724.hdr.mark = gc_color_red;
 c_735724.hdr.grayed = 0;
c_735724.tag = closureN_tag;
 c_735724.fn = (function_type)__lambda_256;
c_735724.num_args = 1;
c_735724.num_elements = 2;
c_735724.elements = (object *)e_735728;
c_735724.elements[0] = ((closureN)self_733257)->elements[1];
c_735724.elements[1] = r_731851;

return_direct_with_clo2(data,  __glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms, (((closure)  __glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms)->fn),  &c_735724, ((closureN)self_733257)->elements[0]);; 
}

static void __lambda_256(void *data, object self_733258, int argc, object *args) /* object self_733258, object r_731852 */
 {
 object r_731852 = args[0];
  return_direct_with_clo3(data,  __glo_difference_scheme_cyclone_transforms, (((closure)  __glo_difference_scheme_cyclone_transforms)->fn),  ((closureN)self_733258)->elements[0], ((closureN)self_733258)->elements[1], r_731852);; 
}

static void __lambda_249(void *data, object self_733287, int argc, object *args) /* object self_733287, object r_731848 */
 {
 object r_731848 = args[0];
  
closureN_type c_735702;
object e_735709 [3];
c_735702.hdr.mark = gc_color_red;
 c_735702.hdr.grayed = 0;
c_735702.tag = closureN_tag;
 c_735702.fn = (function_type)__lambda_250;
c_735702.num_args = 1;
c_735702.num_elements = 3;
c_735702.elements = (object *)e_735709;
c_735702.elements[0] = ((closureN)self_733287)->elements[0];
c_735702.elements[1] = ((closureN)self_733287)->elements[1];
c_735702.elements[2] = ((closureN)self_733287)->elements[2];



return_direct_with_clo1(data,(closure)&c_735702,__lambda_250,  Cyc_set_cell(data, ((closureN)self_733287)->elements[2], r_731848));; 
}

static void __lambda_250(void *data, object self_733288, int argc, object *args) /* object self_733288, object r_731847 */
 {

  

return_closcall2(data,  car(((closureN)self_733288)->elements[2]),  ((closureN)self_733288)->elements[1], ((closureN)self_733288)->elements[0]);; 
}

static void __lambda_215(void *data, object _, int argc, object *args) /* closure _,object k_731807, object asts_73252_731062, object lib_91exports_73253_731063 */
 {
object k_731807 = args[0]; object asts_73252_731062 = args[1]; object lib_91exports_73253_731063 = args[2];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:filter-unused-variables");

closureN_type c_735505;
object e_735676 [3];
c_735505.hdr.mark = gc_color_red;
 c_735505.hdr.grayed = 0;
c_735505.tag = closureN_tag;
 c_735505.fn = (function_type)__lambda_216;
c_735505.num_args = 2;
c_735505.num_elements = 3;
c_735505.elements = (object *)e_735676;
c_735505.elements[0] = asts_73252_731062;
c_735505.elements[1] = k_731807;
c_735505.elements[2] = lib_91exports_73253_731063;

return_direct_with_clo2(data,(closure)&c_735505,__lambda_216,  boolean_f, boolean_f);; 
}

static void __lambda_216(void *data, object self_733216, int argc, object *args) /* object self_733216, object do_91filter_731066, object loop_731067 */
 {
 object do_91filter_731066 = args[0]; object loop_731067 = args[1];
  
closureN_type c_735507;
object e_735672 [4];
c_735507.hdr.mark = gc_color_red;
 c_735507.hdr.grayed = 0;
c_735507.tag = closureN_tag;
 c_735507.fn = (function_type)__lambda_790;
c_735507.num_args = 1;
c_735507.num_elements = 4;
c_735507.elements = (object *)e_735672;
c_735507.elements[0] = ((closureN)self_733216)->elements[0];
c_735507.elements[1] = ((closureN)self_733216)->elements[1];
c_735507.elements[2] = ((closureN)self_733216)->elements[2];
c_735507.elements[3] = loop_731067;


pair_type local_735675; 
return_direct_with_clo1(data,(closure)&c_735507,__lambda_790,  set_cell_as_expr(&local_735675, do_91filter_731066));; 
}

static void __lambda_790(void *data, object self_733217, int argc, object *args) /* object self_733217, object do_91filter_731066 */
 {
 object do_91filter_731066 = args[0];
  
closureN_type c_735509;
object e_735667 [4];
c_735509.hdr.mark = gc_color_red;
 c_735509.hdr.grayed = 0;
c_735509.tag = closureN_tag;
 c_735509.fn = (function_type)__lambda_789;
c_735509.num_args = 1;
c_735509.num_elements = 4;
c_735509.elements = (object *)e_735667;
c_735509.elements[0] = ((closureN)self_733217)->elements[0];
c_735509.elements[1] = do_91filter_731066;
c_735509.elements[2] = ((closureN)self_733217)->elements[1];
c_735509.elements[3] = ((closureN)self_733217)->elements[2];


pair_type local_735670; 
return_direct_with_clo1(data,(closure)&c_735509,__lambda_789,  set_cell_as_expr(&local_735670, ((closureN)self_733217)->elements[3]));; 
}

static void __lambda_789(void *data, object self_733218, int argc, object *args) /* object self_733218, object loop_731067 */
 {
 object loop_731067 = args[0];
  
closureN_type c_735511;
object e_735560 [4];
c_735511.hdr.mark = gc_color_red;
 c_735511.hdr.grayed = 0;
c_735511.tag = closureN_tag;
 c_735511.fn = (function_type)__lambda_217;
c_735511.num_args = 1;
c_735511.num_elements = 4;
c_735511.elements = (object *)e_735560;
c_735511.elements[0] = ((closureN)self_733218)->elements[0];
c_735511.elements[1] = ((closureN)self_733218)->elements[1];
c_735511.elements[2] = ((closureN)self_733218)->elements[2];
c_735511.elements[3] = loop_731067;


closureN_type c_735561;
object e_735666 [1];
c_735561.hdr.mark = gc_color_red;
 c_735561.hdr.grayed = 0;
c_735561.tag = closureN_tag;
 c_735561.fn = (function_type)__lambda_224;
c_735561.num_args = 1;
c_735561.num_elements = 1;
c_735561.elements = (object *)e_735666;
c_735561.elements[0] = ((closureN)self_733218)->elements[3];

return_direct_with_clo1(data,(closure)&c_735511,__lambda_217,  &c_735561);; 
}

static void __lambda_224(void *data, object self_733219, int argc, object *args) /* object self_733219, object k_731817, object code_73254_731070 */
 {
 object k_731817 = args[0]; object code_73254_731070 = args[1];
  
closureN_type c_735563;
object e_735663 [3];
c_735563.hdr.mark = gc_color_red;
 c_735563.hdr.grayed = 0;
c_735563.tag = closureN_tag;
 c_735563.fn = (function_type)__lambda_225;
c_735563.num_args = 1;
c_735563.num_elements = 3;
c_735563.elements = (object *)e_735663;
c_735563.elements[0] = code_73254_731070;
c_735563.elements[1] = k_731817;
c_735563.elements[2] = ((closureN)self_733219)->elements[0];


mclosure0(c_735664, (function_type)__lambda_244);c_735664.num_args = 2;
return_direct_with_clo1(data,(closure)&c_735563,__lambda_225,  &c_735664);; 
}

static void __lambda_244(void *data, object self_733220, int argc, object *args) /* object self_733220, object k_731841, object l_73269_731076, object ls_73270_731077 */
 {
 object k_731841 = args[0]; object l_73269_731076 = args[1]; object ls_73270_731077 = args[2];
  return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  k_731841, ls_73270_731077, l_73269_731076);; 
}

static void __lambda_225(void *data, object self_733221, int argc, object *args) /* object self_733221, object r_731829 */
 {
 object r_731829 = args[0];
  
closureN_type c_735565;
object e_735629 [4];
c_735565.hdr.mark = gc_color_red;
 c_735565.hdr.grayed = 0;
c_735565.tag = closureN_tag;
 c_735565.fn = (function_type)__lambda_226;
c_735565.num_args = 1;
c_735565.num_elements = 4;
c_735565.elements = (object *)e_735629;
c_735565.elements[0] = ((closureN)self_733221)->elements[0];
c_735565.elements[1] = ((closureN)self_733221)->elements[1];
c_735565.elements[2] = ((closureN)self_733221)->elements[2];
c_735565.elements[3] = r_731829;


mclosure0(c_735630, (function_type)__lambda_238);c_735630.num_args = 1;
return_direct_with_clo1(data,(closure)&c_735565,__lambda_226,  &c_735630);; 
}

static void __lambda_238(void *data, object self_733222, int argc, object *args) /* object self_733222, object k_731833, object ast_73271_731078 */
 {
 object k_731833 = args[0]; object ast_73271_731078 = args[1];
  
closureN_type c_735632;
object e_735662 [2];
c_735632.hdr.mark = gc_color_red;
 c_735632.hdr.grayed = 0;
c_735632.tag = closureN_tag;
 c_735632.fn = (function_type)__lambda_239;
c_735632.num_args = 1;
c_735632.num_elements = 2;
c_735632.elements = (object *)e_735662;
c_735632.elements[0] = ast_73271_731078;
c_735632.elements[1] = k_731833;

return_direct_with_clo2(data,  __glo_define_127_scheme_cyclone_util, (((closure)  __glo_define_127_scheme_cyclone_util)->fn),  &c_735632, ast_73271_731078);; 
}

static void __lambda_239(void *data, object self_733223, int argc, object *args) /* object self_733223, object r_731834 */
 {
 object r_731834 = args[0];
  if( (boolean_f != r_731834) ){ 
  
closureN_type c_735634;
object e_735657 [2];
c_735634.hdr.mark = gc_color_red;
 c_735634.hdr.grayed = 0;
c_735634.tag = closureN_tag;
 c_735634.fn = (function_type)__lambda_240;
c_735634.num_args = 1;
c_735634.num_elements = 2;
c_735634.elements = (object *)e_735657;
c_735634.elements[0] = ((closureN)self_733223)->elements[0];
c_735634.elements[1] = ((closureN)self_733223)->elements[1];

return_direct_with_clo2(data,  __glo_define_91_125var_scheme_cyclone_util, (((closure)  __glo_define_91_125var_scheme_cyclone_util)->fn),  &c_735634, ((closureN)self_733223)->elements[0]);
} else { 
  return_direct_with_clo2(data,  __glo_free_91vars_scheme_cyclone_transforms, (((closure)  __glo_free_91vars_scheme_cyclone_transforms)->fn),  ((closureN)self_733223)->elements[1], ((closureN)self_733223)->elements[0]);}
;; 
}

static void __lambda_240(void *data, object self_733224, int argc, object *args) /* object self_733224, object var_73272_731079 */
 {
 object var_73272_731079 = args[0];
  
closureN_type c_735636;
object e_735647 [2];
c_735636.hdr.mark = gc_color_red;
 c_735636.hdr.grayed = 0;
c_735636.tag = closureN_tag;
 c_735636.fn = (function_type)__lambda_241;
c_735636.num_args = 1;
c_735636.num_elements = 2;
c_735636.elements = (object *)e_735647;
c_735636.elements[0] = ((closureN)self_733224)->elements[0];
c_735636.elements[1] = ((closureN)self_733224)->elements[1];


closureN_type c_735648;
object e_735656 [1];
c_735648.hdr.mark = gc_color_red;
 c_735648.hdr.grayed = 0;
c_735648.tag = closureN_tag;
 c_735648.fn = (function_type)__lambda_243;
c_735648.num_args = 1;
c_735648.num_elements = 1;
c_735648.elements = (object *)e_735656;
c_735648.elements[0] = var_73272_731079;

return_direct_with_clo1(data,(closure)&c_735636,__lambda_241,  &c_735648);; 
}

static void __lambda_243(void *data, object self_733225, int argc, object *args) /* object self_733225, object k_731839, object v_73273_731080 */
 {
 object k_731839 = args[0]; object v_73273_731080 = args[1];
  
complex_num_type local_735652; 


return_direct_with_clo1(data,  k_731839, (((closure)  k_731839)->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_735652, equalp(v_73273_731080, ((closureN)self_733225)->elements[0])));; 
}

static void __lambda_241(void *data, object self_733226, int argc, object *args) /* object self_733226, object r_731836 */
 {
 object r_731836 = args[0];
  
closureN_type c_735638;
object e_735642 [2];
c_735638.hdr.mark = gc_color_red;
 c_735638.hdr.grayed = 0;
c_735638.tag = closureN_tag;
 c_735638.fn = (function_type)__lambda_242;
c_735638.num_args = 1;
c_735638.num_elements = 2;
c_735638.elements = (object *)e_735642;
c_735638.elements[0] = ((closureN)self_733226)->elements[1];
c_735638.elements[1] = r_731836;


complex_num_type local_735645; 
return_direct_with_clo2(data,  __glo_free_91vars_scheme_cyclone_transforms, (((closure)  __glo_free_91vars_scheme_cyclone_transforms)->fn),  &c_735638, ((inline_function_type)
                   ((closure)__glo_define_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_735645, ((closureN)self_733226)->elements[0]));; 
}

static void __lambda_242(void *data, object self_733227, int argc, object *args) /* object self_733227, object r_731837 */
 {
 object r_731837 = args[0];
  return_direct_with_clo3(data,  __glo_filter_scheme_cyclone_util, (((closure)  __glo_filter_scheme_cyclone_util)->fn),  ((closureN)self_733227)->elements[0], ((closureN)self_733227)->elements[1], r_731837);; 
}

static void __lambda_226(void *data, object self_733228, int argc, object *args) /* object self_733228, object r_731832 */
 {
 object r_731832 = args[0];
  
closureN_type c_735567;
object e_735627 [4];
c_735567.hdr.mark = gc_color_red;
 c_735567.hdr.grayed = 0;
c_735567.tag = closureN_tag;
 c_735567.fn = (function_type)__lambda_227;
c_735567.num_args = 1;
c_735567.num_elements = 4;
c_735567.elements = (object *)e_735627;
c_735567.elements[0] = ((closureN)self_733228)->elements[0];
c_735567.elements[1] = ((closureN)self_733228)->elements[1];
c_735567.elements[2] = ((closureN)self_733228)->elements[2];
c_735567.elements[3] = ((closureN)self_733228)->elements[3];

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_735567, r_731832, ((closureN)self_733228)->elements[0]);; 
}

static void __lambda_227(void *data, object self_733229, int argc, object *args) /* object self_733229, object r_731831 */
 {
 object r_731831 = args[0];
  
closureN_type c_735569;
object e_735625 [3];
c_735569.hdr.mark = gc_color_red;
 c_735569.hdr.grayed = 0;
c_735569.tag = closureN_tag;
 c_735569.fn = (function_type)__lambda_228;
c_735569.num_args = 1;
c_735569.num_elements = 3;
c_735569.elements = (object *)e_735625;
c_735569.elements[0] = ((closureN)self_733229)->elements[0];
c_735569.elements[1] = ((closureN)self_733229)->elements[1];
c_735569.elements[2] = ((closureN)self_733229)->elements[2];

return_direct_with_clo4(data,  __glo_foldr_scheme_base, (((closure)  __glo_foldr_scheme_base)->fn),  &c_735569, ((closureN)self_733229)->elements[3], NULL, r_731831);; 
}

static void __lambda_228(void *data, object self_733230, int argc, object *args) /* object self_733230, object all_91fv_73255_731071 */
 {
 object all_91fv_73255_731071 = args[0];
  
closureN_type c_735571;
object e_735575 [2];
c_735571.hdr.mark = gc_color_red;
 c_735571.hdr.grayed = 0;
c_735571.tag = closureN_tag;
 c_735571.fn = (function_type)__lambda_229;
c_735571.num_args = 1;
c_735571.num_elements = 2;
c_735571.elements = (object *)e_735575;
c_735571.elements[0] = ((closureN)self_733230)->elements[0];
c_735571.elements[1] = ((closureN)self_733230)->elements[1];


closureN_type c_735576;
object e_735624 [2];
c_735576.hdr.mark = gc_color_red;
 c_735576.hdr.grayed = 0;
c_735576.tag = closureN_tag;
 c_735576.fn = (function_type)__lambda_230;
c_735576.num_args = 1;
c_735576.num_elements = 2;
c_735576.elements = (object *)e_735624;
c_735576.elements[0] = all_91fv_73255_731071;
c_735576.elements[1] = ((closureN)self_733230)->elements[2];

return_direct_with_clo1(data,(closure)&c_735571,__lambda_229,  &c_735576);; 
}

static void __lambda_230(void *data, object self_733231, int argc, object *args) /* object self_733231, object k_731820, object ast_73256_731072 */
 {
 object k_731820 = args[0]; object ast_73256_731072 = args[1];
  
closureN_type c_735578;
object e_735623 [4];
c_735578.hdr.mark = gc_color_red;
 c_735578.hdr.grayed = 0;
c_735578.tag = closureN_tag;
 c_735578.fn = (function_type)__lambda_231;
c_735578.num_args = 1;
c_735578.num_elements = 4;
c_735578.elements = (object *)e_735623;
c_735578.elements[0] = ((closureN)self_733231)->elements[0];
c_735578.elements[1] = ast_73256_731072;
c_735578.elements[2] = k_731820;
c_735578.elements[3] = ((closureN)self_733231)->elements[1];

return_direct_with_clo2(data,  __glo_define_127_scheme_cyclone_util, (((closure)  __glo_define_127_scheme_cyclone_util)->fn),  &c_735578, ast_73256_731072);; 
}

static void __lambda_231(void *data, object self_733232, int argc, object *args) /* object self_733232, object r_731828 */
 {
 object r_731828 = args[0];
    complex_num_type local_735581; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_735581, r_731828)) ){ 
  
complex_num_type local_735586; 
return_direct_with_clo1(data,  ((closureN)self_733232)->elements[2], (((closure)  ((closureN)self_733232)->elements[2])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_735586, r_731828));
} else { 
  
closureN_type c_735588;
object e_735621 [4];
c_735588.hdr.mark = gc_color_red;
 c_735588.hdr.grayed = 0;
c_735588.tag = closureN_tag;
 c_735588.fn = (function_type)__lambda_232;
c_735588.num_args = 1;
c_735588.num_elements = 4;
c_735588.elements = (object *)e_735621;
c_735588.elements[0] = ((closureN)self_733232)->elements[0];
c_735588.elements[1] = ((closureN)self_733232)->elements[1];
c_735588.elements[2] = ((closureN)self_733232)->elements[2];
c_735588.elements[3] = ((closureN)self_733232)->elements[3];

return_direct_with_clo2(data,  __glo_define_91_125var_scheme_cyclone_util, (((closure)  __glo_define_91_125var_scheme_cyclone_util)->fn),  &c_735588, ((closureN)self_733232)->elements[1]);}
;; 
}

static void __lambda_232(void *data, object self_733233, int argc, object *args) /* object self_733233, object r_731827 */
 {
 object r_731827 = args[0];
  
closureN_type c_735590;
object e_735617 [3];
c_735590.hdr.mark = gc_color_red;
 c_735590.hdr.grayed = 0;
c_735590.tag = closureN_tag;
 c_735590.fn = (function_type)__lambda_233;
c_735590.num_args = 1;
c_735590.num_elements = 3;
c_735590.elements = (object *)e_735617;
c_735590.elements[0] = ((closureN)self_733233)->elements[1];
c_735590.elements[1] = ((closureN)self_733233)->elements[2];
c_735590.elements[2] = ((closureN)self_733233)->elements[3];



return_direct_with_clo1(data,(closure)&c_735590,__lambda_233,  memberp(data, r_731827, ((closureN)self_733233)->elements[0]));; 
}

static void __lambda_233(void *data, object self_733234, int argc, object *args) /* object self_733234, object tmp_73262_73264_731074 */
 {
 object tmp_73262_73264_731074 = args[0];
  if( (boolean_f != tmp_73262_73264_731074) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733234)->elements[1], (((closure)  ((closureN)self_733234)->elements[1])->fn),  tmp_73262_73264_731074);
} else { 
  
closureN_type c_735594;
object e_735615 [3];
c_735594.hdr.mark = gc_color_red;
 c_735594.hdr.grayed = 0;
c_735594.tag = closureN_tag;
 c_735594.fn = (function_type)__lambda_234;
c_735594.num_args = 1;
c_735594.num_elements = 3;
c_735594.elements = (object *)e_735615;
c_735594.elements[0] = ((closureN)self_733234)->elements[0];
c_735594.elements[1] = ((closureN)self_733234)->elements[1];
c_735594.elements[2] = ((closureN)self_733234)->elements[2];

return_direct_with_clo2(data,  __glo_define_91_125var_scheme_cyclone_util, (((closure)  __glo_define_91_125var_scheme_cyclone_util)->fn),  &c_735594, ((closureN)self_733234)->elements[0]);}
;; 
}

static void __lambda_234(void *data, object self_733235, int argc, object *args) /* object self_733235, object r_731826 */
 {
 object r_731826 = args[0];
  
closureN_type c_735596;
object e_735611 [2];
c_735596.hdr.mark = gc_color_red;
 c_735596.hdr.grayed = 0;
c_735596.tag = closureN_tag;
 c_735596.fn = (function_type)__lambda_235;
c_735596.num_args = 1;
c_735596.num_elements = 2;
c_735596.elements = (object *)e_735611;
c_735596.elements[0] = ((closureN)self_733235)->elements[0];
c_735596.elements[1] = ((closureN)self_733235)->elements[1];



return_direct_with_clo1(data,(closure)&c_735596,__lambda_235,  memberp(data, r_731826, ((closureN)self_733235)->elements[2]));; 
}

static void __lambda_235(void *data, object self_733236, int argc, object *args) /* object self_733236, object tmp_73266_73268_731075 */
 {
 object tmp_73266_73268_731075 = args[0];
  if( (boolean_f != tmp_73266_73268_731075) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733236)->elements[1], (((closure)  ((closureN)self_733236)->elements[1])->fn),  tmp_73266_73268_731075);
} else { 
  
closureN_type c_735600;
object e_735609 [1];
c_735600.hdr.mark = gc_color_red;
 c_735600.hdr.grayed = 0;
c_735600.tag = closureN_tag;
 c_735600.fn = (function_type)__lambda_236;
c_735600.num_args = 1;
c_735600.num_elements = 1;
c_735600.elements = (object *)e_735609;
c_735600.elements[0] = ((closureN)self_733236)->elements[1];

return_direct_with_clo2(data,  __glo_define_91_125var_scheme_cyclone_util, (((closure)  __glo_define_91_125var_scheme_cyclone_util)->fn),  &c_735600, ((closureN)self_733236)->elements[0]);}
;; 
}

static void __lambda_236(void *data, object self_733237, int argc, object *args) /* object self_733237, object r_731824 */
 {
 object r_731824 = args[0];
  
closureN_type c_735602;
object e_735608 [2];
c_735602.hdr.mark = gc_color_red;
 c_735602.hdr.grayed = 0;
c_735602.tag = closureN_tag;
 c_735602.fn = (function_type)__lambda_237;
c_735602.num_args = 1;
c_735602.num_elements = 2;
c_735602.elements = (object *)e_735608;
c_735602.elements[0] = ((closureN)self_733237)->elements[0];
c_735602.elements[1] = r_731824;

return_direct_with_clo1(data,  __glo_get_91macros_scheme_eval, (((closure)  __glo_get_91macros_scheme_eval)->fn),  &c_735602);; 
}

static void __lambda_237(void *data, object self_733238, int argc, object *args) /* object self_733238, object r_731825 */
 {
 object r_731825 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_733238)->elements[0], (((closure)  ((closureN)self_733238)->elements[0])->fn),  assoc(data, ((closureN)self_733238)->elements[1], r_731825));; 
}

static void __lambda_229(void *data, object self_733239, int argc, object *args) /* object self_733239, object r_731819 */
 {
 object r_731819 = args[0];
  return_direct_with_clo3(data,  __glo_filter_scheme_cyclone_util, (((closure)  __glo_filter_scheme_cyclone_util)->fn),  ((closureN)self_733239)->elements[1], r_731819, ((closureN)self_733239)->elements[0]);; 
}

static void __lambda_217(void *data, object self_733240, int argc, object *args) /* object self_733240, object r_731816 */
 {
 object r_731816 = args[0];
  
closureN_type c_735513;
object e_735556 [4];
c_735513.hdr.mark = gc_color_red;
 c_735513.hdr.grayed = 0;
c_735513.tag = closureN_tag;
 c_735513.fn = (function_type)__lambda_218;
c_735513.num_args = 1;
c_735513.num_elements = 4;
c_735513.elements = (object *)e_735556;
c_735513.elements[0] = ((closureN)self_733240)->elements[0];
c_735513.elements[1] = ((closureN)self_733240)->elements[1];
c_735513.elements[2] = ((closureN)self_733240)->elements[2];
c_735513.elements[3] = ((closureN)self_733240)->elements[3];



return_direct_with_clo1(data,(closure)&c_735513,__lambda_218,  Cyc_set_cell(data, ((closureN)self_733240)->elements[1], r_731816));; 
}

static void __lambda_218(void *data, object self_733241, int argc, object *args) /* object self_733241, object r_731808 */
 {

  
closureN_type c_735515;
object e_735528 [3];
c_735515.hdr.mark = gc_color_red;
 c_735515.hdr.grayed = 0;
c_735515.tag = closureN_tag;
 c_735515.fn = (function_type)__lambda_219;
c_735515.num_args = 1;
c_735515.num_elements = 3;
c_735515.elements = (object *)e_735528;
c_735515.elements[0] = ((closureN)self_733241)->elements[0];
c_735515.elements[1] = ((closureN)self_733241)->elements[2];
c_735515.elements[2] = ((closureN)self_733241)->elements[3];


closureN_type c_735529;
object e_735555 [2];
c_735529.hdr.mark = gc_color_red;
 c_735529.hdr.grayed = 0;
c_735529.tag = closureN_tag;
 c_735529.fn = (function_type)__lambda_221;
c_735529.num_args = 1;
c_735529.num_elements = 2;
c_735529.elements = (object *)e_735555;
c_735529.elements[0] = ((closureN)self_733241)->elements[1];
c_735529.elements[1] = ((closureN)self_733241)->elements[3];

return_direct_with_clo1(data,(closure)&c_735515,__lambda_219,  &c_735529);; 
}

static void __lambda_221(void *data, object self_733242, int argc, object *args) /* object self_733242, object k_731811, object code_73274_731081 */
 {
 object k_731811 = args[0]; object code_73274_731081 = args[1];
  


closureN_type c_735534;
object e_735554 [3];
c_735534.hdr.mark = gc_color_red;
 c_735534.hdr.grayed = 0;
c_735534.tag = closureN_tag;
 c_735534.fn = (function_type)__lambda_222;
c_735534.num_args = 1;
c_735534.num_elements = 3;
c_735534.elements = (object *)e_735554;
c_735534.elements[0] = code_73274_731081;
c_735534.elements[1] = k_731811;
c_735534.elements[2] = ((closureN)self_733242)->elements[1];

return_closcall2(data,  car(((closureN)self_733242)->elements[0]),  &c_735534, code_73274_731081);; 
}

static void __lambda_222(void *data, object self_733243, int argc, object *args) /* object self_733243, object new_91code_73275_731082 */
 {
 object new_91code_73275_731082 = args[0];
  
closureN_type c_735536;
object e_735551 [4];
c_735536.hdr.mark = gc_color_red;
 c_735536.hdr.grayed = 0;
c_735536.tag = closureN_tag;
 c_735536.fn = (function_type)__lambda_223;
c_735536.num_args = 1;
c_735536.num_elements = 4;
c_735536.elements = (object *)e_735551;
c_735536.elements[0] = ((closureN)self_733243)->elements[0];
c_735536.elements[1] = ((closureN)self_733243)->elements[1];
c_735536.elements[2] = ((closureN)self_733243)->elements[2];
c_735536.elements[3] = new_91code_73275_731082;



return_direct_with_clo1(data,(closure)&c_735536,__lambda_223,  Cyc_length(data, new_91code_73275_731082));; 
}

static void __lambda_223(void *data, object self_733244, int argc, object *args) /* object self_733244, object r_731815 */
 {
 object r_731815 = args[0];
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_733244)->elements[0]), r_731815)) ){ 
  

return_closcall2(data,  car(((closureN)self_733244)->elements[2]),  ((closureN)self_733244)->elements[1], ((closureN)self_733244)->elements[3]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733244)->elements[1], (((closure)  ((closureN)self_733244)->elements[1])->fn),  ((closureN)self_733244)->elements[3]);}
;; 
}

static void __lambda_219(void *data, object self_733245, int argc, object *args) /* object self_733245, object r_731810 */
 {
 object r_731810 = args[0];
  
closureN_type c_735517;
object e_735524 [3];
c_735517.hdr.mark = gc_color_red;
 c_735517.hdr.grayed = 0;
c_735517.tag = closureN_tag;
 c_735517.fn = (function_type)__lambda_220;
c_735517.num_args = 1;
c_735517.num_elements = 3;
c_735517.elements = (object *)e_735524;
c_735517.elements[0] = ((closureN)self_733245)->elements[0];
c_735517.elements[1] = ((closureN)self_733245)->elements[1];
c_735517.elements[2] = ((closureN)self_733245)->elements[2];



return_direct_with_clo1(data,(closure)&c_735517,__lambda_220,  Cyc_set_cell(data, ((closureN)self_733245)->elements[2], r_731810));; 
}

static void __lambda_220(void *data, object self_733246, int argc, object *args) /* object self_733246, object r_731809 */
 {

  

return_closcall2(data,  car(((closureN)self_733246)->elements[2]),  ((closureN)self_733246)->elements[1], ((closureN)self_733246)->elements[0]);; 
}

static void __lambda_200(void *data, object _, int argc, object *args) /* closure _,object k_731790, object exp_73245_731058 */
 {
object k_731790 = args[0]; object exp_73245_731058 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:global-vars");

closureN_type c_735418;
object e_735502 [2];
c_735418.hdr.mark = gc_color_red;
 c_735418.hdr.grayed = 0;
c_735418.tag = closureN_tag;
 c_735418.fn = (function_type)__lambda_201;
c_735418.num_args = 1;
c_735418.num_elements = 2;
c_735418.elements = (object *)e_735502;
c_735418.elements[0] = exp_73245_731058;
c_735418.elements[1] = k_731790;

return_direct_with_clo1(data,(closure)&c_735418,__lambda_201,  NULL);; 
}

static void __lambda_201(void *data, object self_733201, int argc, object *args) /* object self_733201, object globals_73246_731059 */
 {
 object globals_73246_731059 = args[0];
  
closureN_type c_735420;
object e_735498 [2];
c_735420.hdr.mark = gc_color_red;
 c_735420.hdr.grayed = 0;
c_735420.tag = closureN_tag;
 c_735420.fn = (function_type)__lambda_788;
c_735420.num_args = 1;
c_735420.num_elements = 2;
c_735420.elements = (object *)e_735498;
c_735420.elements[0] = ((closureN)self_733201)->elements[0];
c_735420.elements[1] = ((closureN)self_733201)->elements[1];


pair_type local_735501; 
return_direct_with_clo1(data,(closure)&c_735420,__lambda_788,  set_cell_as_expr(&local_735501, globals_73246_731059));; 
}

static void __lambda_788(void *data, object self_733202, int argc, object *args) /* object self_733202, object globals_73246_731059 */
 {
 object globals_73246_731059 = args[0];
  
closureN_type c_735422;
object e_735432 [3];
c_735422.hdr.mark = gc_color_red;
 c_735422.hdr.grayed = 0;
c_735422.tag = closureN_tag;
 c_735422.fn = (function_type)__lambda_202;
c_735422.num_args = 1;
c_735422.num_elements = 3;
c_735422.elements = (object *)e_735432;
c_735422.elements[0] = ((closureN)self_733202)->elements[0];
c_735422.elements[1] = globals_73246_731059;
c_735422.elements[2] = ((closureN)self_733202)->elements[1];


closureN_type c_735433;
object e_735497 [1];
c_735433.hdr.mark = gc_color_red;
 c_735433.hdr.grayed = 0;
c_735433.tag = closureN_tag;
 c_735433.fn = (function_type)__lambda_204;
c_735433.num_args = 1;
c_735433.num_elements = 1;
c_735433.elements = (object *)e_735497;
c_735433.elements[0] = globals_73246_731059;

return_direct_with_clo1(data,(closure)&c_735422,__lambda_202,  &c_735433);; 
}

static void __lambda_204(void *data, object self_733203, int argc, object *args) /* object self_733203, object k_731794, object e_73247_731060 */
 {
 object k_731794 = args[0]; object e_73247_731060 = args[1];
  
closureN_type c_735435;
object e_735470 [2];
c_735435.hdr.mark = gc_color_red;
 c_735435.hdr.grayed = 0;
c_735435.tag = closureN_tag;
 c_735435.fn = (function_type)__lambda_205;
c_735435.num_args = 0;
c_735435.num_elements = 2;
c_735435.elements = (object *)e_735470;
c_735435.elements[0] = e_73247_731060;
c_735435.elements[1] = ((closureN)self_733203)->elements[0];


closureN_type c_735471;
object e_735496 [3];
c_735471.hdr.mark = gc_color_red;
 c_735471.hdr.grayed = 0;
c_735471.tag = closureN_tag;
 c_735471.fn = (function_type)__lambda_211;
c_735471.num_args = 1;
c_735471.num_elements = 3;
c_735471.elements = (object *)e_735496;
c_735471.elements[0] = e_73247_731060;
c_735471.elements[1] = ((closureN)self_733203)->elements[0];
c_735471.elements[2] = k_731794;

return_direct_with_clo1(data,(closure)&c_735435,__lambda_205,  &c_735471);; 
}

static void __lambda_211(void *data, object self_733204, int argc, object *args) /* object self_733204, object r_731795 */
 {

  
closureN_type c_735473;
object e_735494 [3];
c_735473.hdr.mark = gc_color_red;
 c_735473.hdr.grayed = 0;
c_735473.tag = closureN_tag;
 c_735473.fn = (function_type)__lambda_212;
c_735473.num_args = 1;
c_735473.num_elements = 3;
c_735473.elements = (object *)e_735494;
c_735473.elements[0] = ((closureN)self_733204)->elements[0];
c_735473.elements[1] = ((closureN)self_733204)->elements[1];
c_735473.elements[2] = ((closureN)self_733204)->elements[2];

return_direct_with_clo2(data,  __glo_define_91c_91inline_127_scheme_cyclone_util, (((closure)  __glo_define_91c_91inline_127_scheme_cyclone_util)->fn),  &c_735473, ((closureN)self_733204)->elements[0]);; 
}

static void __lambda_212(void *data, object self_733205, int argc, object *args) /* object self_733205, object r_731796 */
 {
 object r_731796 = args[0];
  if( (boolean_f != r_731796) ){ 
  
closureN_type c_735475;
object e_735490 [2];
c_735475.hdr.mark = gc_color_red;
 c_735475.hdr.grayed = 0;
c_735475.tag = closureN_tag;
 c_735475.fn = (function_type)__lambda_213;
c_735475.num_args = 1;
c_735475.num_elements = 2;
c_735475.elements = (object *)e_735490;
c_735475.elements[0] = ((closureN)self_733205)->elements[1];
c_735475.elements[1] = ((closureN)self_733205)->elements[2];

return_direct_with_clo2(data,  __glo_define_91c_91_125inline_91var_scheme_cyclone_util, (((closure)  __glo_define_91c_91_125inline_91var_scheme_cyclone_util)->fn),  &c_735475, ((closureN)self_733205)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733205)->elements[2], (((closure)  ((closureN)self_733205)->elements[2])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_213(void *data, object self_733206, int argc, object *args) /* object self_733206, object r_731798 */
 {
 object r_731798 = args[0];
  
closureN_type c_735477;
object e_735483 [2];
c_735477.hdr.mark = gc_color_red;
 c_735477.hdr.grayed = 0;
c_735477.tag = closureN_tag;
 c_735477.fn = (function_type)__lambda_214;
c_735477.num_args = 1;
c_735477.num_elements = 2;
c_735477.elements = (object *)e_735483;
c_735477.elements[0] = ((closureN)self_733206)->elements[0];
c_735477.elements[1] = ((closureN)self_733206)->elements[1];


pair_type local_735486; 


return_direct_with_clo1(data,(closure)&c_735477,__lambda_214,  set_pair_as_expr(&local_735486, r_731798, car(((closureN)self_733206)->elements[0])));; 
}

static void __lambda_214(void *data, object self_733207, int argc, object *args) /* object self_733207, object r_731797 */
 {
 object r_731797 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_733207)->elements[1], (((closure)  ((closureN)self_733207)->elements[1])->fn),  Cyc_set_cell(data, ((closureN)self_733207)->elements[0], r_731797));; 
}

static void __lambda_205(void *data, object self_733208, int argc, object *args) /* object self_733208, object k_731799 */
 {
 object k_731799 = args[0];
  
closureN_type c_735437;
object e_735468 [3];
c_735437.hdr.mark = gc_color_red;
 c_735437.hdr.grayed = 0;
c_735437.tag = closureN_tag;
 c_735437.fn = (function_type)__lambda_206;
c_735437.num_args = 1;
c_735437.num_elements = 3;
c_735437.elements = (object *)e_735468;
c_735437.elements[0] = ((closureN)self_733208)->elements[0];
c_735437.elements[1] = ((closureN)self_733208)->elements[1];
c_735437.elements[2] = k_731799;

return_direct_with_clo2(data,  __glo_define_127_scheme_cyclone_util, (((closure)  __glo_define_127_scheme_cyclone_util)->fn),  &c_735437, ((closureN)self_733208)->elements[0]);; 
}

static void __lambda_206(void *data, object self_733209, int argc, object *args) /* object self_733209, object tmp_73249_73251_731061 */
 {
 object tmp_73249_73251_731061 = args[0];
  
closureN_type c_735439;
object e_735445 [2];
c_735439.hdr.mark = gc_color_red;
 c_735439.hdr.grayed = 0;
c_735439.tag = closureN_tag;
 c_735439.fn = (function_type)__lambda_207;
c_735439.num_args = 0;
c_735439.num_elements = 2;
c_735439.elements = (object *)e_735445;
c_735439.elements[0] = ((closureN)self_733209)->elements[0];
c_735439.elements[1] = tmp_73249_73251_731061;


closureN_type c_735446;
object e_735467 [3];
c_735446.hdr.mark = gc_color_red;
 c_735446.hdr.grayed = 0;
c_735446.tag = closureN_tag;
 c_735446.fn = (function_type)__lambda_208;
c_735446.num_args = 1;
c_735446.num_elements = 3;
c_735446.elements = (object *)e_735467;
c_735446.elements[0] = ((closureN)self_733209)->elements[0];
c_735446.elements[1] = ((closureN)self_733209)->elements[1];
c_735446.elements[2] = ((closureN)self_733209)->elements[2];

return_direct_with_clo1(data,(closure)&c_735439,__lambda_207,  &c_735446);; 
}

static void __lambda_208(void *data, object self_733210, int argc, object *args) /* object self_733210, object r_731800 */
 {
 object r_731800 = args[0];
  if( (boolean_f != r_731800) ){ 
  
closureN_type c_735448;
object e_735463 [2];
c_735448.hdr.mark = gc_color_red;
 c_735448.hdr.grayed = 0;
c_735448.tag = closureN_tag;
 c_735448.fn = (function_type)__lambda_209;
c_735448.num_args = 1;
c_735448.num_elements = 2;
c_735448.elements = (object *)e_735463;
c_735448.elements[0] = ((closureN)self_733210)->elements[1];
c_735448.elements[1] = ((closureN)self_733210)->elements[2];

return_direct_with_clo2(data,  __glo_define_91_125var_scheme_cyclone_util, (((closure)  __glo_define_91_125var_scheme_cyclone_util)->fn),  &c_735448, ((closureN)self_733210)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733210)->elements[2], (((closure)  ((closureN)self_733210)->elements[2])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_209(void *data, object self_733211, int argc, object *args) /* object self_733211, object r_731802 */
 {
 object r_731802 = args[0];
  
closureN_type c_735450;
object e_735456 [2];
c_735450.hdr.mark = gc_color_red;
 c_735450.hdr.grayed = 0;
c_735450.tag = closureN_tag;
 c_735450.fn = (function_type)__lambda_210;
c_735450.num_args = 1;
c_735450.num_elements = 2;
c_735450.elements = (object *)e_735456;
c_735450.elements[0] = ((closureN)self_733211)->elements[0];
c_735450.elements[1] = ((closureN)self_733211)->elements[1];


pair_type local_735459; 


return_direct_with_clo1(data,(closure)&c_735450,__lambda_210,  set_pair_as_expr(&local_735459, r_731802, car(((closureN)self_733211)->elements[0])));; 
}

static void __lambda_210(void *data, object self_733212, int argc, object *args) /* object self_733212, object r_731801 */
 {
 object r_731801 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_733212)->elements[1], (((closure)  ((closureN)self_733212)->elements[1])->fn),  Cyc_set_cell(data, ((closureN)self_733212)->elements[0], r_731801));; 
}

static void __lambda_207(void *data, object self_733213, int argc, object *args) /* object self_733213, object k_731804 */
 {
 object k_731804 = args[0];
  if( (boolean_f != ((closureN)self_733213)->elements[1]) ){ 
  return_direct_with_clo1(data,  k_731804, (((closure)  k_731804)->fn),  ((closureN)self_733213)->elements[1]);
} else { 
  return_direct_with_clo2(data,  __glo_define_91c_127_scheme_cyclone_util, (((closure)  __glo_define_91c_127_scheme_cyclone_util)->fn),  k_731804, ((closureN)self_733213)->elements[0]);}
;; 
}

static void __lambda_202(void *data, object self_733214, int argc, object *args) /* object self_733214, object r_731793 */
 {
 object r_731793 = args[0];
  
closureN_type c_735424;
object e_735430 [2];
c_735424.hdr.mark = gc_color_red;
 c_735424.hdr.grayed = 0;
c_735424.tag = closureN_tag;
 c_735424.fn = (function_type)__lambda_203;
c_735424.num_args = 1;
c_735424.num_elements = 2;
c_735424.elements = (object *)e_735430;
c_735424.elements[0] = ((closureN)self_733214)->elements[1];
c_735424.elements[1] = ((closureN)self_733214)->elements[2];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_735424, r_731793, ((closureN)self_733214)->elements[0]);; 
}

static void __lambda_203(void *data, object self_733215, int argc, object *args) /* object self_733215, object r_731792 */
 {

  

return_direct_with_clo1(data,  ((closureN)self_733215)->elements[1], (((closure)  ((closureN)self_733215)->elements[1])->fn),  car(((closureN)self_733215)->elements[0]));; 
}

static void __lambda_190(void *data, object _, int argc, object *args) /* closure _,object k_731778, object exp_73240_731054, object var_73241_731055 */
 {
object k_731778 = args[0]; object exp_73240_731054 = args[1]; object var_73241_731055 = args[2];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:has-global?");

closureN_type c_735374;
object e_735377 [1];
c_735374.hdr.mark = gc_color_red;
 c_735374.hdr.grayed = 0;
c_735374.tag = closureN_tag;
 c_735374.fn = (function_type)__lambda_191;
c_735374.num_args = 1;
c_735374.num_elements = 1;
c_735374.elements = (object *)e_735377;
c_735374.elements[0] = k_731778;


closureN_type c_735378;
object e_735415 [2];
c_735378.hdr.mark = gc_color_red;
 c_735378.hdr.grayed = 0;
c_735378.tag = closureN_tag;
 c_735378.fn = (function_type)__lambda_192;
c_735378.num_args = 1;
c_735378.num_elements = 2;
c_735378.elements = (object *)e_735415;
c_735378.elements[0] = exp_73240_731054;
c_735378.elements[1] = var_73241_731055;

return_direct_with_clo1(data,(closure)&c_735374,__lambda_191,  &c_735378);; 
}

static void __lambda_192(void *data, object self_733192, int argc, object *args) /* object self_733192, object k_731780, object return_73242_731056 */
 {
 object k_731780 = args[0]; object return_73242_731056 = args[1];
  
closureN_type c_735380;
object e_735387 [2];
c_735380.hdr.mark = gc_color_red;
 c_735380.hdr.grayed = 0;
c_735380.tag = closureN_tag;
 c_735380.fn = (function_type)__lambda_193;
c_735380.num_args = 1;
c_735380.num_elements = 2;
c_735380.elements = (object *)e_735387;
c_735380.elements[0] = ((closureN)self_733192)->elements[0];
c_735380.elements[1] = k_731780;


closureN_type c_735388;
object e_735414 [2];
c_735388.hdr.mark = gc_color_red;
 c_735388.hdr.grayed = 0;
c_735388.tag = closureN_tag;
 c_735388.fn = (function_type)__lambda_195;
c_735388.num_args = 1;
c_735388.num_elements = 2;
c_735388.elements = (object *)e_735414;
c_735388.elements[0] = return_73242_731056;
c_735388.elements[1] = ((closureN)self_733192)->elements[1];

return_direct_with_clo1(data,(closure)&c_735380,__lambda_193,  &c_735388);; 
}

static void __lambda_195(void *data, object self_733193, int argc, object *args) /* object self_733193, object k_731783, object e_73243_731057 */
 {
 object k_731783 = args[0]; object e_73243_731057 = args[1];
  
closureN_type c_735390;
object e_735406 [2];
c_735390.hdr.mark = gc_color_red;
 c_735390.hdr.grayed = 0;
c_735390.tag = closureN_tag;
 c_735390.fn = (function_type)__lambda_196;
c_735390.num_args = 0;
c_735390.num_elements = 2;
c_735390.elements = (object *)e_735406;
c_735390.elements[0] = e_73243_731057;
c_735390.elements[1] = ((closureN)self_733193)->elements[1];


closureN_type c_735407;
object e_735413 [2];
c_735407.hdr.mark = gc_color_red;
 c_735407.hdr.grayed = 0;
c_735407.tag = closureN_tag;
 c_735407.fn = (function_type)__lambda_199;
c_735407.num_args = 1;
c_735407.num_elements = 2;
c_735407.elements = (object *)e_735413;
c_735407.elements[0] = k_731783;
c_735407.elements[1] = ((closureN)self_733193)->elements[0];

return_direct_with_clo1(data,(closure)&c_735390,__lambda_196,  &c_735407);; 
}

static void __lambda_199(void *data, object self_733194, int argc, object *args) /* object self_733194, object r_731784 */
 {
 object r_731784 = args[0];
  if( (boolean_f != r_731784) ){ 
  return_closcall2(data,  ((closureN)self_733194)->elements[1],  ((closureN)self_733194)->elements[0], boolean_t);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733194)->elements[0], (((closure)  ((closureN)self_733194)->elements[0])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_196(void *data, object self_733195, int argc, object *args) /* object self_733195, object k_731785 */
 {
 object k_731785 = args[0];
  
closureN_type c_735392;
object e_735404 [3];
c_735392.hdr.mark = gc_color_red;
 c_735392.hdr.grayed = 0;
c_735392.tag = closureN_tag;
 c_735392.fn = (function_type)__lambda_197;
c_735392.num_args = 1;
c_735392.num_elements = 3;
c_735392.elements = (object *)e_735404;
c_735392.elements[0] = ((closureN)self_733195)->elements[0];
c_735392.elements[1] = k_731785;
c_735392.elements[2] = ((closureN)self_733195)->elements[1];

return_direct_with_clo2(data,  __glo_define_127_scheme_cyclone_util, (((closure)  __glo_define_127_scheme_cyclone_util)->fn),  &c_735392, ((closureN)self_733195)->elements[0]);; 
}

static void __lambda_197(void *data, object self_733196, int argc, object *args) /* object self_733196, object r_731786 */
 {
 object r_731786 = args[0];
  if( (boolean_f != r_731786) ){ 
  
closureN_type c_735394;
object e_735400 [2];
c_735394.hdr.mark = gc_color_red;
 c_735394.hdr.grayed = 0;
c_735394.tag = closureN_tag;
 c_735394.fn = (function_type)__lambda_198;
c_735394.num_args = 1;
c_735394.num_elements = 2;
c_735394.elements = (object *)e_735400;
c_735394.elements[0] = ((closureN)self_733196)->elements[1];
c_735394.elements[1] = ((closureN)self_733196)->elements[2];

return_direct_with_clo2(data,  __glo_define_91_125var_scheme_cyclone_util, (((closure)  __glo_define_91_125var_scheme_cyclone_util)->fn),  &c_735394, ((closureN)self_733196)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733196)->elements[1], (((closure)  ((closureN)self_733196)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_198(void *data, object self_733197, int argc, object *args) /* object self_733197, object r_731787 */
 {
 object r_731787 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_733197)->elements[0], (((closure)  ((closureN)self_733197)->elements[0])->fn),  equalp(r_731787, ((closureN)self_733197)->elements[1]));; 
}

static void __lambda_193(void *data, object self_733198, int argc, object *args) /* object self_733198, object r_731782 */
 {
 object r_731782 = args[0];
  
closureN_type c_735382;
object e_735385 [1];
c_735382.hdr.mark = gc_color_red;
 c_735382.hdr.grayed = 0;
c_735382.tag = closureN_tag;
 c_735382.fn = (function_type)__lambda_194;
c_735382.num_args = 1;
c_735382.num_elements = 1;
c_735382.elements = (object *)e_735385;
c_735382.elements[0] = ((closureN)self_733198)->elements[1];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_735382, r_731782, ((closureN)self_733198)->elements[0]);; 
}

static void __lambda_194(void *data, object self_733199, int argc, object *args) /* object self_733199, object r_731781 */
 {

  return_direct_with_clo1(data,  ((closureN)self_733199)->elements[0], (((closure)  ((closureN)self_733199)->elements[0])->fn),  boolean_f);; 
}

static void __lambda_191(void *data, object self_733200, int argc, object *args) /* object self_733200, object r_731779 */
 {
 object r_731779 = args[0];
  return_direct_with_clo2(data,  __glo_call_95cc_scheme_base, (((closure)  __glo_call_95cc_scheme_base)->fn),  ((closureN)self_733200)->elements[0], r_731779);; 
}

static void __lambda_165(void *data, object _, int argc, object *args) /* closure _,object k_731679, object exp_73182_731041, object program_127_73183_731042, object lib_91name_73184_731043, object rename_91env_73185_731044 */
 {
object k_731679 = args[0]; object exp_73182_731041 = args[1]; object program_127_73183_731042 = args[2]; object lib_91name_73184_731043 = args[3]; object rename_91env_73185_731044 = args[4];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:isolate-globals");

closureN_type c_735036;
object e_735371 [4];
c_735036.hdr.mark = gc_color_red;
 c_735036.hdr.grayed = 0;
c_735036.tag = closureN_tag;
 c_735036.fn = (function_type)__lambda_166;
c_735036.num_args = 3;
c_735036.num_elements = 4;
c_735036.elements = (object *)e_735371;
c_735036.elements[0] = k_731679;
c_735036.elements[1] = lib_91name_73184_731043;
c_735036.elements[2] = program_127_73183_731042;
c_735036.elements[3] = rename_91env_73185_731044;

return_direct_with_clo3(data,(closure)&c_735036,__lambda_166,  exp_73182_731041, NULL, NULL);; 
}

static void __lambda_166(void *data, object self_733167, int argc, object *args) /* object self_733167, object top_91lvl_73187_731045, object globals_73188_731046, object exprs_73189_731047 */
 {
 object top_91lvl_73187_731045 = args[0]; object globals_73188_731046 = args[1]; object exprs_73189_731047 = args[2];
  
closureN_type c_735038;
object e_735370 [7];
c_735038.hdr.mark = gc_color_red;
 c_735038.hdr.grayed = 0;
c_735038.tag = closureN_tag;
 c_735038.fn = (function_type)__lambda_167;
c_735038.num_args = 1;
c_735038.num_elements = 7;
c_735038.elements = (object *)e_735370;
c_735038.elements[0] = exprs_73189_731047;
c_735038.elements[1] = globals_73188_731046;
c_735038.elements[2] = ((closureN)self_733167)->elements[0];
c_735038.elements[3] = ((closureN)self_733167)->elements[1];
c_735038.elements[4] = ((closureN)self_733167)->elements[2];
c_735038.elements[5] = ((closureN)self_733167)->elements[3];
c_735038.elements[6] = top_91lvl_73187_731045;

return_direct_with_clo1(data,(closure)&c_735038,__lambda_167,  boolean_f);; 
}

static void __lambda_167(void *data, object self_733168, int argc, object *args) /* object self_733168, object loop_73190_731048 */
 {
 object loop_73190_731048 = args[0];
  
closureN_type c_735040;
object e_735366 [7];
c_735040.hdr.mark = gc_color_red;
 c_735040.hdr.grayed = 0;
c_735040.tag = closureN_tag;
 c_735040.fn = (function_type)__lambda_787;
c_735040.num_args = 1;
c_735040.num_elements = 7;
c_735040.elements = (object *)e_735366;
c_735040.elements[0] = ((closureN)self_733168)->elements[0];
c_735040.elements[1] = ((closureN)self_733168)->elements[1];
c_735040.elements[2] = ((closureN)self_733168)->elements[2];
c_735040.elements[3] = ((closureN)self_733168)->elements[3];
c_735040.elements[4] = ((closureN)self_733168)->elements[4];
c_735040.elements[5] = ((closureN)self_733168)->elements[5];
c_735040.elements[6] = ((closureN)self_733168)->elements[6];


pair_type local_735369; 
return_direct_with_clo1(data,(closure)&c_735040,__lambda_787,  set_cell_as_expr(&local_735369, loop_73190_731048));; 
}

static void __lambda_787(void *data, object self_733169, int argc, object *args) /* object self_733169, object loop_73190_731048 */
 {
 object loop_73190_731048 = args[0];
  
closureN_type c_735042;
object e_735057 [5];
c_735042.hdr.mark = gc_color_red;
 c_735042.hdr.grayed = 0;
c_735042.tag = closureN_tag;
 c_735042.fn = (function_type)__lambda_168;
c_735042.num_args = 1;
c_735042.num_elements = 5;
c_735042.elements = (object *)e_735057;
c_735042.elements[0] = ((closureN)self_733169)->elements[0];
c_735042.elements[1] = ((closureN)self_733169)->elements[1];
c_735042.elements[2] = ((closureN)self_733169)->elements[2];
c_735042.elements[3] = loop_73190_731048;
c_735042.elements[4] = ((closureN)self_733169)->elements[6];


closureN_type c_735058;
object e_735365 [4];
c_735058.hdr.mark = gc_color_red;
 c_735058.hdr.grayed = 0;
c_735058.tag = closureN_tag;
 c_735058.fn = (function_type)__lambda_170;
c_735058.num_args = 3;
c_735058.num_elements = 4;
c_735058.elements = (object *)e_735365;
c_735058.elements[0] = ((closureN)self_733169)->elements[3];
c_735058.elements[1] = loop_73190_731048;
c_735058.elements[2] = ((closureN)self_733169)->elements[4];
c_735058.elements[3] = ((closureN)self_733169)->elements[5];

return_direct_with_clo1(data,(closure)&c_735042,__lambda_168,  &c_735058);; 
}

static void __lambda_170(void *data, object self_733170, int argc, object *args) /* object self_733170, object k_731684, object top_91lvl_73191_731049, object globals_73192_731050, object exprs_73193_731051 */
 {
 object k_731684 = args[0]; object top_91lvl_73191_731049 = args[1]; object globals_73192_731050 = args[2]; object exprs_73193_731051 = args[3];
    
if( (boolean_f != Cyc_is_null(top_91lvl_73191_731049)) ){ 
  
closureN_type c_735062;
object e_735139 [5];
c_735062.hdr.mark = gc_color_red;
 c_735062.hdr.grayed = 0;
c_735062.tag = closureN_tag;
 c_735062.fn = (function_type)__lambda_171;
c_735062.num_args = 1;
c_735062.num_elements = 5;
c_735062.elements = (object *)e_735139;
c_735062.elements[0] = exprs_73193_731051;
c_735062.elements[1] = k_731684;
c_735062.elements[2] = ((closureN)self_733170)->elements[0];
c_735062.elements[3] = ((closureN)self_733170)->elements[2];
c_735062.elements[4] = ((closureN)self_733170)->elements[3];

return_direct_with_clo2(data,  __glo_reverse_scheme_base, (((closure)  __glo_reverse_scheme_base)->fn),  &c_735062, globals_73192_731050);
} else { 
  
closureN_type c_735141;
object e_735362 [5];
c_735141.hdr.mark = gc_color_red;
 c_735141.hdr.grayed = 0;
c_735141.tag = closureN_tag;
 c_735141.fn = (function_type)__lambda_180;
c_735141.num_args = 1;
c_735141.num_elements = 5;
c_735141.elements = (object *)e_735362;
c_735141.elements[0] = exprs_73193_731051;
c_735141.elements[1] = globals_73192_731050;
c_735141.elements[2] = k_731684;
c_735141.elements[3] = ((closureN)self_733170)->elements[1];
c_735141.elements[4] = top_91lvl_73191_731049;



return_direct_with_clo2(data,  __glo_define_127_scheme_cyclone_util, (((closure)  __glo_define_127_scheme_cyclone_util)->fn),  &c_735141, Cyc_car(data, top_91lvl_73191_731049));}
;; 
}

static void __lambda_180(void *data, object self_733180, int argc, object *args) /* object self_733180, object r_731716 */
 {
 object r_731716 = args[0];
  if( (boolean_f != r_731716) ){ 
  
closureN_type c_735143;
object e_735320 [5];
c_735143.hdr.mark = gc_color_red;
 c_735143.hdr.grayed = 0;
c_735143.tag = closureN_tag;
 c_735143.fn = (function_type)__lambda_181;
c_735143.num_args = 1;
c_735143.num_elements = 5;
c_735143.elements = (object *)e_735320;
c_735143.elements[0] = ((closureN)self_733180)->elements[0];
c_735143.elements[1] = ((closureN)self_733180)->elements[1];
c_735143.elements[2] = ((closureN)self_733180)->elements[2];
c_735143.elements[3] = ((closureN)self_733180)->elements[3];
c_735143.elements[4] = ((closureN)self_733180)->elements[4];



return_direct_with_clo2(data,  __glo_define_91_125var_scheme_cyclone_util, (((closure)  __glo_define_91_125var_scheme_cyclone_util)->fn),  &c_735143, Cyc_car(data, ((closureN)self_733180)->elements[4]));
} else { 
  
closureN_type c_735325;
object e_735358 [5];
c_735325.hdr.mark = gc_color_red;
 c_735325.hdr.grayed = 0;
c_735325.tag = closureN_tag;
 c_735325.fn = (function_type)__lambda_189;
c_735325.num_args = 1;
c_735325.num_elements = 5;
c_735325.elements = (object *)e_735358;
c_735325.elements[0] = ((closureN)self_733180)->elements[0];
c_735325.elements[1] = ((closureN)self_733180)->elements[1];
c_735325.elements[2] = ((closureN)self_733180)->elements[2];
c_735325.elements[3] = ((closureN)self_733180)->elements[3];
c_735325.elements[4] = ((closureN)self_733180)->elements[4];



return_direct_with_clo2(data,  __glo_define_91c_127_scheme_cyclone_util, (((closure)  __glo_define_91c_127_scheme_cyclone_util)->fn),  &c_735325, Cyc_car(data, ((closureN)self_733180)->elements[4]));}
;; 
}

static void __lambda_189(void *data, object self_733189, int argc, object *args) /* object self_733189, object r_731767 */
 {
 object r_731767 = args[0];
  if( (boolean_f != r_731767) ){ 
  




pair_type local_735336; 


return_closcall4(data,  car(((closureN)self_733189)->elements[3]),  ((closureN)self_733189)->elements[2], Cyc_cdr(data, ((closureN)self_733189)->elements[4]), set_pair_as_expr(&local_735336, Cyc_car(data, ((closureN)self_733189)->elements[4]), ((closureN)self_733189)->elements[1]), ((closureN)self_733189)->elements[0]);
} else { 
  




pair_type local_735353; 


return_closcall4(data,  car(((closureN)self_733189)->elements[3]),  ((closureN)self_733189)->elements[2], Cyc_cdr(data, ((closureN)self_733189)->elements[4]), ((closureN)self_733189)->elements[1], set_pair_as_expr(&local_735353, Cyc_car(data, ((closureN)self_733189)->elements[4]), ((closureN)self_733189)->elements[0]));}
;; 
}

static void __lambda_181(void *data, object self_733181, int argc, object *args) /* object self_733181, object r_731765 */
 {
 object r_731765 = args[0];
  
closureN_type c_735145;
object e_735318 [5];
c_735145.hdr.mark = gc_color_red;
 c_735145.hdr.grayed = 0;
c_735145.tag = closureN_tag;
 c_735145.fn = (function_type)__lambda_182;
c_735145.num_args = 1;
c_735145.num_elements = 5;
c_735145.elements = (object *)e_735318;
c_735145.elements[0] = ((closureN)self_733181)->elements[0];
c_735145.elements[1] = ((closureN)self_733181)->elements[1];
c_735145.elements[2] = ((closureN)self_733181)->elements[2];
c_735145.elements[3] = ((closureN)self_733181)->elements[3];
c_735145.elements[4] = ((closureN)self_733181)->elements[4];

return_direct_with_clo3(data,  __glo_has_91global_127_scheme_cyclone_transforms, (((closure)  __glo_has_91global_127_scheme_cyclone_transforms)->fn),  &c_735145, ((closureN)self_733181)->elements[1], r_731765);; 
}

static void __lambda_182(void *data, object self_733182, int argc, object *args) /* object self_733182, object r_731717 */
 {
 object r_731717 = args[0];
  if( (boolean_f != r_731717) ){ 
  
closureN_type c_735147;
object e_735173 [5];
c_735147.hdr.mark = gc_color_red;
 c_735147.hdr.grayed = 0;
c_735147.tag = closureN_tag;
 c_735147.fn = (function_type)__lambda_183;
c_735147.num_args = 1;
c_735147.num_elements = 5;
c_735147.elements = (object *)e_735173;
c_735147.elements[0] = ((closureN)self_733182)->elements[0];
c_735147.elements[1] = ((closureN)self_733182)->elements[1];
c_735147.elements[2] = ((closureN)self_733182)->elements[2];
c_735147.elements[3] = ((closureN)self_733182)->elements[3];
c_735147.elements[4] = ((closureN)self_733182)->elements[4];



return_direct_with_clo2(data,  __glo_define_91_125var_scheme_cyclone_util, (((closure)  __glo_define_91_125var_scheme_cyclone_util)->fn),  &c_735147, Cyc_car(data, ((closureN)self_733182)->elements[4]));
} else { 
  
closureN_type c_735178;
object e_735249 [1];
c_735178.hdr.mark = gc_color_red;
 c_735178.hdr.grayed = 0;
c_735178.tag = closureN_tag;
 c_735178.fn = (function_type)__lambda_184;
c_735178.num_args = 0;
c_735178.num_elements = 1;
c_735178.elements = (object *)e_735249;
c_735178.elements[0] = ((closureN)self_733182)->elements[4];


closureN_type c_735250;
object e_735317 [5];
c_735250.hdr.mark = gc_color_red;
 c_735250.hdr.grayed = 0;
c_735250.tag = closureN_tag;
 c_735250.fn = (function_type)__lambda_186;
c_735250.num_args = 1;
c_735250.num_elements = 5;
c_735250.elements = (object *)e_735317;
c_735250.elements[0] = ((closureN)self_733182)->elements[0];
c_735250.elements[1] = ((closureN)self_733182)->elements[1];
c_735250.elements[2] = ((closureN)self_733182)->elements[2];
c_735250.elements[3] = ((closureN)self_733182)->elements[3];
c_735250.elements[4] = ((closureN)self_733182)->elements[4];

return_direct_with_clo1(data,(closure)&c_735178,__lambda_184,  &c_735250);}
;; 
}

static void __lambda_186(void *data, object self_733184, int argc, object *args) /* object self_733184, object r_731727 */
 {
 object r_731727 = args[0];
  if( (boolean_f != r_731727) ){ 
  
closureN_type c_735252;
object e_735297 [5];
c_735252.hdr.mark = gc_color_red;
 c_735252.hdr.grayed = 0;
c_735252.tag = closureN_tag;
 c_735252.fn = (function_type)__lambda_187;
c_735252.num_args = 1;
c_735252.num_elements = 5;
c_735252.elements = (object *)e_735297;
c_735252.elements[0] = ((closureN)self_733184)->elements[0];
c_735252.elements[1] = ((closureN)self_733184)->elements[1];
c_735252.elements[2] = ((closureN)self_733184)->elements[2];
c_735252.elements[3] = ((closureN)self_733184)->elements[3];
c_735252.elements[4] = ((closureN)self_733184)->elements[4];



return_direct_with_clo2(data,  __glo_define_91_125var_scheme_cyclone_util, (((closure)  __glo_define_91_125var_scheme_cyclone_util)->fn),  &c_735252, Cyc_car(data, ((closureN)self_733184)->elements[4]));
} else { 
  




pair_type local_735311; 


return_closcall4(data,  car(((closureN)self_733184)->elements[3]),  ((closureN)self_733184)->elements[2], Cyc_cdr(data, ((closureN)self_733184)->elements[4]), set_pair_as_expr(&local_735311, Cyc_car(data, ((closureN)self_733184)->elements[4]), ((closureN)self_733184)->elements[1]), ((closureN)self_733184)->elements[0]);}
;; 
}

static void __lambda_187(void *data, object self_733185, int argc, object *args) /* object self_733185, object r_731741 */
 {
 object r_731741 = args[0];
  
closureN_type c_735254;
object e_735293 [6];
c_735254.hdr.mark = gc_color_red;
 c_735254.hdr.grayed = 0;
c_735254.tag = closureN_tag;
 c_735254.fn = (function_type)__lambda_188;
c_735254.num_args = 1;
c_735254.num_elements = 6;
c_735254.elements = (object *)e_735293;
c_735254.elements[0] = ((closureN)self_733185)->elements[0];
c_735254.elements[1] = ((closureN)self_733185)->elements[1];
c_735254.elements[2] = ((closureN)self_733185)->elements[2];
c_735254.elements[3] = ((closureN)self_733185)->elements[3];
c_735254.elements[4] = r_731741;
c_735254.elements[5] = ((closureN)self_733185)->elements[4];



return_direct_with_clo2(data,  __glo_define_91_125var_scheme_cyclone_util, (((closure)  __glo_define_91_125var_scheme_cyclone_util)->fn),  &c_735254, Cyc_car(data, ((closureN)self_733185)->elements[4]));; 
}

static void __lambda_188(void *data, object self_733186, int argc, object *args) /* object self_733186, object r_731734 */
 {
 object r_731734 = args[0];
  




pair_type local_735265; 

pair_type local_735268; 

pair_type local_735271; 

pair_type local_735275; 

pair_type local_735279; 

pair_type local_735282; 

pair_type local_735285; 

complex_num_type local_735288; 


return_closcall4(data,  car(((closureN)self_733186)->elements[3]),  ((closureN)self_733186)->elements[2], Cyc_cdr(data, ((closureN)self_733186)->elements[5]), set_pair_as_expr(&local_735265, set_pair_as_expr(&local_735268, quote_define, set_pair_as_expr(&local_735271, ((closureN)self_733186)->elements[4], set_pair_as_expr(&local_735275, boolean_f, NULL))), ((closureN)self_733186)->elements[1]), set_pair_as_expr(&local_735279, set_pair_as_expr(&local_735282, quote_set_67, set_pair_as_expr(&local_735285, r_731734, ((inline_function_type)
                   ((closure)__glo_define_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_735288, Cyc_car(data, ((closureN)self_733186)->elements[5])))), ((closureN)self_733186)->elements[0]));; 
}

static void __lambda_184(void *data, object self_733187, int argc, object *args) /* object self_733187, object k_731749 */
 {
 object k_731749 = args[0];
    
  
  complex_num_type local_735185; 
  
if( (boolean_f != Cyc_is_symbol(Cyc_car(data, ((inline_function_type)
                   ((closure)__glo_define_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_735185, Cyc_car(data, ((closureN)self_733187)->elements[0]))))) ){ 
  




complex_num_type local_735196; 


return_direct_with_clo1(data,  k_731749, (((closure)  k_731749)->fn),  Cyc_is_symbol(Cyc_car(data, ((inline_function_type)
                   ((closure)__glo_define_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_735196, Cyc_car(data, ((closureN)self_733187)->elements[0])))));
} else { 
    
  
  complex_num_type local_735206; 
  
if( (boolean_f != Cyc_is_vector_not_record_type(Cyc_car(data, ((inline_function_type)
                   ((closure)__glo_define_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_735206, Cyc_car(data, ((closureN)self_733187)->elements[0]))))) ){ 
  




complex_num_type local_735217; 


return_direct_with_clo1(data,  k_731749, (((closure)  k_731749)->fn),  Cyc_is_vector_not_record_type(Cyc_car(data, ((inline_function_type)
                   ((closure)__glo_define_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_735217, Cyc_car(data, ((closureN)self_733187)->elements[0])))));
} else { 
    complex_num_type local_735223; 
  
  complex_num_type local_735228; 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_735223, Cyc_car(data, ((inline_function_type)
                   ((closure)__glo_define_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_735228, Cyc_car(data, ((closureN)self_733187)->elements[0]))))) ){ 
  
closureN_type c_735233;
object e_735239 [1];
c_735233.hdr.mark = gc_color_red;
 c_735233.hdr.grayed = 0;
c_735233.tag = closureN_tag;
 c_735233.fn = (function_type)__lambda_185;
c_735233.num_args = 1;
c_735233.num_elements = 1;
c_735233.elements = (object *)e_735239;
c_735233.elements[0] = k_731749;




complex_num_type local_735244; 


return_direct_with_clo2(data,  __glo_lambda_127_scheme_cyclone_util, (((closure)  __glo_lambda_127_scheme_cyclone_util)->fn),  &c_735233, Cyc_car(data, ((inline_function_type)
                   ((closure)__glo_define_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_735244, Cyc_car(data, ((closureN)self_733187)->elements[0]))));
} else { 
  return_direct_with_clo1(data,  k_731749, (((closure)  k_731749)->fn),  boolean_f);}
;}
;}
;; 
}

static void __lambda_185(void *data, object self_733188, int argc, object *args) /* object self_733188, object r_731752 */
 {
 object r_731752 = args[0];
  
complex_num_type local_735238; 
return_direct_with_clo1(data,  ((closureN)self_733188)->elements[0], (((closure)  ((closureN)self_733188)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_735238, r_731752));; 
}

static void __lambda_183(void *data, object self_733183, int argc, object *args) /* object self_733183, object r_731723 */
 {
 object r_731723 = args[0];
  




pair_type local_735159; 

pair_type local_735162; 

pair_type local_735165; 

complex_num_type local_735168; 


return_closcall4(data,  car(((closureN)self_733183)->elements[3]),  ((closureN)self_733183)->elements[2], Cyc_cdr(data, ((closureN)self_733183)->elements[4]), ((closureN)self_733183)->elements[1], set_pair_as_expr(&local_735159, set_pair_as_expr(&local_735162, quote_set_67, set_pair_as_expr(&local_735165, r_731723, ((inline_function_type)
                   ((closure)__glo_define_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_735168, Cyc_car(data, ((closureN)self_733183)->elements[4])))), ((closureN)self_733183)->elements[0]));; 
}

static void __lambda_171(void *data, object self_733171, int argc, object *args) /* object self_733171, object r_731686 */
 {
 object r_731686 = args[0];
  
closureN_type c_735064;
object e_735125 [3];
c_735064.hdr.mark = gc_color_red;
 c_735064.hdr.grayed = 0;
c_735064.tag = closureN_tag;
 c_735064.fn = (function_type)__lambda_172;
c_735064.num_args = 0;
c_735064.num_elements = 3;
c_735064.elements = (object *)e_735125;
c_735064.elements[0] = ((closureN)self_733171)->elements[0];
c_735064.elements[1] = ((closureN)self_733171)->elements[2];
c_735064.elements[2] = ((closureN)self_733171)->elements[3];


closureN_type c_735126;
object e_735138 [3];
c_735126.hdr.mark = gc_color_red;
 c_735126.hdr.grayed = 0;
c_735126.tag = closureN_tag;
 c_735126.fn = (function_type)__lambda_177;
c_735126.num_args = 1;
c_735126.num_elements = 3;
c_735126.elements = (object *)e_735138;
c_735126.elements[0] = ((closureN)self_733171)->elements[1];
c_735126.elements[1] = r_731686;
c_735126.elements[2] = ((closureN)self_733171)->elements[4];

return_direct_with_clo1(data,(closure)&c_735064,__lambda_172,  &c_735126);; 
}

static void __lambda_177(void *data, object self_733172, int argc, object *args) /* object self_733172, object r_731688 */
 {
 object r_731688 = args[0];
  
closureN_type c_735128;
object e_735137 [4];
c_735128.hdr.mark = gc_color_red;
 c_735128.hdr.grayed = 0;
c_735128.tag = closureN_tag;
 c_735128.fn = (function_type)__lambda_178;
c_735128.num_args = 1;
c_735128.num_elements = 4;
c_735128.elements = (object *)e_735137;
c_735128.elements[0] = ((closureN)self_733172)->elements[0];
c_735128.elements[1] = ((closureN)self_733172)->elements[1];
c_735128.elements[2] = r_731688;
c_735128.elements[3] = ((closureN)self_733172)->elements[2];

return_direct_with_clo1(data,  __glo_macro_117get_91env_scheme_eval, (((closure)  __glo_macro_117get_91env_scheme_eval)->fn),  &c_735128);; 
}

static void __lambda_178(void *data, object self_733173, int argc, object *args) /* object self_733173, object r_731689 */
 {
 object r_731689 = args[0];
  
closureN_type c_735130;
object e_735134 [2];
c_735130.hdr.mark = gc_color_red;
 c_735130.hdr.grayed = 0;
c_735130.tag = closureN_tag;
 c_735130.fn = (function_type)__lambda_179;
c_735130.num_args = 1;
c_735130.num_elements = 2;
c_735130.elements = (object *)e_735134;
c_735130.elements[0] = ((closureN)self_733173)->elements[0];
c_735130.elements[1] = ((closureN)self_733173)->elements[1];

return_direct_with_clo4(data,  __glo_expand_scheme_eval, (((closure)  __glo_expand_scheme_eval)->fn),  &c_735130, ((closureN)self_733173)->elements[2], r_731689, ((closureN)self_733173)->elements[3]);; 
}

static void __lambda_179(void *data, object self_733174, int argc, object *args) /* object self_733174, object r_731687 */
 {
 object r_731687 = args[0];
  return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  ((closureN)self_733174)->elements[0], ((closureN)self_733174)->elements[1], r_731687);; 
}

static void __lambda_172(void *data, object self_733175, int argc, object *args) /* object self_733175, object k_731690 */
 {
 object k_731690 = args[0];
  if( (boolean_f != ((closureN)self_733175)->elements[2]) ){ 
  
closureN_type c_735067;
object e_735091 [1];
c_735067.hdr.mark = gc_color_red;
 c_735067.hdr.grayed = 0;
c_735067.tag = closureN_tag;
 c_735067.fn = (function_type)__lambda_173;
c_735067.num_args = 1;
c_735067.num_elements = 1;
c_735067.elements = (object *)e_735091;
c_735067.elements[0] = k_731690;

return_direct_with_clo2(data,  __glo_reverse_scheme_base, (((closure)  __glo_reverse_scheme_base)->fn),  &c_735067, ((closureN)self_733175)->elements[0]);
} else { 
  
closureN_type c_735094;
object e_735123 [2];
c_735094.hdr.mark = gc_color_red;
 c_735094.hdr.grayed = 0;
c_735094.tag = closureN_tag;
 c_735094.fn = (function_type)__lambda_175;
c_735094.num_args = 1;
c_735094.num_elements = 2;
c_735094.elements = (object *)e_735123;
c_735094.elements[0] = ((closureN)self_733175)->elements[0];
c_735094.elements[1] = k_731690;

return_direct_with_clo2(data,  __glo_lib_117name_91_125symbol_scheme_cyclone_libraries, (((closure)  __glo_lib_117name_91_125symbol_scheme_cyclone_libraries)->fn),  &c_735094, ((closureN)self_733175)->elements[1]);}
;; 
}

static void __lambda_175(void *data, object self_733178, int argc, object *args) /* object self_733178, object r_731707 */
 {
 object r_731707 = args[0];
  
closureN_type c_735096;
object e_735121 [2];
c_735096.hdr.mark = gc_color_red;
 c_735096.hdr.grayed = 0;
c_735096.tag = closureN_tag;
 c_735096.fn = (function_type)__lambda_176;
c_735096.num_args = 1;
c_735096.num_elements = 2;
c_735096.elements = (object *)e_735121;
c_735096.elements[0] = ((closureN)self_733178)->elements[1];
c_735096.elements[1] = r_731707;

return_direct_with_clo2(data,  __glo_reverse_scheme_base, (((closure)  __glo_reverse_scheme_base)->fn),  &c_735096, ((closureN)self_733178)->elements[0]);; 
}

static void __lambda_176(void *data, object self_733179, int argc, object *args) /* object self_733179, object r_731715 */
 {
 object r_731715 = args[0];
  
pair_type local_735101; 

pair_type local_735104; 

pair_type local_735107; 

pair_type local_735111; 

pair_type local_735114; 

pair_type local_735117; 

pair_type local_735120; 
return_direct_with_clo1(data,  ((closureN)self_733179)->elements[0], (((closure)  ((closureN)self_733179)->elements[0])->fn),  set_pair_as_expr(&local_735101, set_pair_as_expr(&local_735104, quote_define, set_pair_as_expr(&local_735107, ((closureN)self_733179)->elements[1], set_pair_as_expr(&local_735111, set_pair_as_expr(&local_735114, quote_lambda, set_pair_as_expr(&local_735117, NULL, set_pair_as_expr(&local_735120, obj_int2obj(0), r_731715))), NULL))), NULL));; 
}

static void __lambda_173(void *data, object self_733176, int argc, object *args) /* object self_733176, object r_731696 */
 {
 object r_731696 = args[0];
  
closureN_type c_735069;
object e_735081 [1];
c_735069.hdr.mark = gc_color_red;
 c_735069.hdr.grayed = 0;
c_735069.tag = closureN_tag;
 c_735069.fn = (function_type)__lambda_174;
c_735069.num_args = 1;
c_735069.num_elements = 1;
c_735069.elements = (object *)e_735081;
c_735069.elements[0] = ((closureN)self_733176)->elements[0];


pair_type local_735084; 

pair_type local_735087; 

pair_type local_735090; 
return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_735069, r_731696, set_pair_as_expr(&local_735084, set_pair_as_expr(&local_735087, quote__75halt, set_pair_as_expr(&local_735090, obj_int2obj(0), NULL)), NULL));; 
}

static void __lambda_174(void *data, object self_733177, int argc, object *args) /* object self_733177, object r_731695 */
 {
 object r_731695 = args[0];
  
pair_type local_735074; 

pair_type local_735077; 

pair_type local_735080; 
return_direct_with_clo1(data,  ((closureN)self_733177)->elements[0], (((closure)  ((closureN)self_733177)->elements[0])->fn),  set_pair_as_expr(&local_735074, set_pair_as_expr(&local_735077, quote_begin, set_pair_as_expr(&local_735080, obj_int2obj(0), r_731695)), NULL));; 
}

static void __lambda_168(void *data, object self_733190, int argc, object *args) /* object self_733190, object r_731683 */
 {
 object r_731683 = args[0];
  
closureN_type c_735044;
object e_735053 [5];
c_735044.hdr.mark = gc_color_red;
 c_735044.hdr.grayed = 0;
c_735044.tag = closureN_tag;
 c_735044.fn = (function_type)__lambda_169;
c_735044.num_args = 1;
c_735044.num_elements = 5;
c_735044.elements = (object *)e_735053;
c_735044.elements[0] = ((closureN)self_733190)->elements[0];
c_735044.elements[1] = ((closureN)self_733190)->elements[1];
c_735044.elements[2] = ((closureN)self_733190)->elements[2];
c_735044.elements[3] = ((closureN)self_733190)->elements[3];
c_735044.elements[4] = ((closureN)self_733190)->elements[4];



return_direct_with_clo1(data,(closure)&c_735044,__lambda_169,  Cyc_set_cell(data, ((closureN)self_733190)->elements[3], r_731683));; 
}

static void __lambda_169(void *data, object self_733191, int argc, object *args) /* object self_733191, object r_731682 */
 {

  

return_closcall4(data,  car(((closureN)self_733191)->elements[3]),  ((closureN)self_733191)->elements[2], ((closureN)self_733191)->elements[4], ((closureN)self_733191)->elements[1], ((closureN)self_733191)->elements[0]);; 
}

static object __lambda_830(void *data, object ptr,object exp_73181_731040) {

  Cyc_st_add(data, "scheme/cyclone/transforms.sld:cell-get->cell");


return_copy(ptr,  Cyc_cadr(data, exp_73181_731040));; 
}

static void __lambda_164(void *data, object _, int argc, object *args) /* closure _,object k_731676, object exp_73181_731040 */
 {
object k_731676 = args[0]; object exp_73181_731040 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:cell-get->cell");


return_direct_with_clo1(data,  k_731676, (((closure)  k_731676)->fn),  Cyc_cadr(data, exp_73181_731040));; 
}

static void __lambda_163(void *data, object _, int argc, object *args) /* closure _,object k_731672, object exp_73180_731039 */
 {
object k_731672 = args[0]; object exp_73180_731039 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:cell-get?");

complex_num_type local_735025; 
return_direct_with_clo1(data,  k_731672, (((closure)  k_731672)->fn),  ((inline_function_type)
                   ((closure)__glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_735025, quote_cell_91get, exp_73180_731039));; 
}

static object __lambda_829(void *data, object ptr,object exp_73179_731038) {

  Cyc_st_add(data, "scheme/cyclone/transforms.sld:cell->value");


return_copy(ptr,  Cyc_cadr(data, exp_73179_731038));; 
}

static void __lambda_162(void *data, object _, int argc, object *args) /* closure _,object k_731669, object exp_73179_731038 */
 {
object k_731669 = args[0]; object exp_73179_731038 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:cell->value");


return_direct_with_clo1(data,  k_731669, (((closure)  k_731669)->fn),  Cyc_cadr(data, exp_73179_731038));; 
}

static void __lambda_161(void *data, object _, int argc, object *args) /* closure _,object k_731665, object exp_73178_731037 */
 {
object k_731665 = args[0]; object exp_73178_731037 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:cell?");

complex_num_type local_735012; 
return_direct_with_clo1(data,  k_731665, (((closure)  k_731665)->fn),  ((inline_function_type)
                   ((closure)__glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_735012, quote_cell, exp_73178_731037));; 
}

static object __lambda_828(void *data, object ptr,object exp_73177_731036) {

  Cyc_st_add(data, "scheme/cyclone/transforms.sld:set-cell!->value");


return_copy(ptr,  Cyc_caddr(data, exp_73177_731036));; 
}

static void __lambda_160(void *data, object _, int argc, object *args) /* closure _,object k_731662, object exp_73177_731036 */
 {
object k_731662 = args[0]; object exp_73177_731036 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:set-cell!->value");


return_direct_with_clo1(data,  k_731662, (((closure)  k_731662)->fn),  Cyc_caddr(data, exp_73177_731036));; 
}

static object __lambda_827(void *data, object ptr,object exp_73176_731035) {

  Cyc_st_add(data, "scheme/cyclone/transforms.sld:set-cell!->cell");


return_copy(ptr,  Cyc_cadr(data, exp_73176_731035));; 
}

static void __lambda_159(void *data, object _, int argc, object *args) /* closure _,object k_731659, object exp_73176_731035 */
 {
object k_731659 = args[0]; object exp_73176_731035 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:set-cell!->cell");


return_direct_with_clo1(data,  k_731659, (((closure)  k_731659)->fn),  Cyc_cadr(data, exp_73176_731035));; 
}

static void __lambda_158(void *data, object _, int argc, object *args) /* closure _,object k_731655, object exp_73175_731034 */
 {
object k_731655 = args[0]; object exp_73175_731034 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:set-cell!?");

complex_num_type local_734991; 
return_direct_with_clo1(data,  k_731655, (((closure)  k_731655)->fn),  ((inline_function_type)
                   ((closure)__glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_734991, quote_set_91cell_67, exp_73175_731034));; 
}

static object __lambda_826(void *data, object ptr,object exp_73174_731033) {

  Cyc_st_add(data, "scheme/cyclone/transforms.sld:env-get->env");


return_copy(ptr,  Cyc_cadddr(data, exp_73174_731033));; 
}

static void __lambda_157(void *data, object _, int argc, object *args) /* closure _,object k_731652, object exp_73174_731033 */
 {
object k_731652 = args[0]; object exp_73174_731033 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:env-get->env");


return_direct_with_clo1(data,  k_731652, (((closure)  k_731652)->fn),  Cyc_cadddr(data, exp_73174_731033));; 
}

static object __lambda_825(void *data, object ptr,object exp_73173_731032) {

  Cyc_st_add(data, "scheme/cyclone/transforms.sld:env-get->field");


return_copy(ptr,  Cyc_caddr(data, exp_73173_731032));; 
}

static void __lambda_156(void *data, object _, int argc, object *args) /* closure _,object k_731649, object exp_73173_731032 */
 {
object k_731649 = args[0]; object exp_73173_731032 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:env-get->field");


return_direct_with_clo1(data,  k_731649, (((closure)  k_731649)->fn),  Cyc_caddr(data, exp_73173_731032));; 
}

static object __lambda_824(void *data, object ptr,object exp_73172_731031) {

  Cyc_st_add(data, "scheme/cyclone/transforms.sld:env-get->id");


return_copy(ptr,  Cyc_cadr(data, exp_73172_731031));; 
}

static void __lambda_155(void *data, object _, int argc, object *args) /* closure _,object k_731646, object exp_73172_731031 */
 {
object k_731646 = args[0]; object exp_73172_731031 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:env-get->id");


return_direct_with_clo1(data,  k_731646, (((closure)  k_731646)->fn),  Cyc_cadr(data, exp_73172_731031));; 
}

static void __lambda_154(void *data, object _, int argc, object *args) /* closure _,object k_731642, object exp_73171_731030 */
 {
object k_731642 = args[0]; object exp_73171_731030 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:env-get?");

complex_num_type local_734962; 
return_direct_with_clo1(data,  k_731642, (((closure)  k_731642)->fn),  ((inline_function_type)
                   ((closure)__glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_734962, quote_env_91get, exp_73171_731030));; 
}

static void __lambda_153(void *data, object _, int argc, object *args) /* closure _,object k_731638, object exp_73170_731029 */
 {
object k_731638 = args[0]; object exp_73170_731029 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:env-make->values");


return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  k_731638, primitive_cadr, Cyc_cddr(data, exp_73170_731029));; 
}

static void __lambda_152(void *data, object _, int argc, object *args) /* closure _,object k_731634, object exp_73169_731028 */
 {
object k_731634 = args[0]; object exp_73169_731028 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:env-make->fields");


return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  k_731634, primitive_car, Cyc_cddr(data, exp_73169_731028));; 
}

static object __lambda_823(void *data, object ptr,object exp_73168_731027) {

  Cyc_st_add(data, "scheme/cyclone/transforms.sld:env-make->id");


return_copy(ptr,  Cyc_cadr(data, exp_73168_731027));; 
}

static void __lambda_151(void *data, object _, int argc, object *args) /* closure _,object k_731631, object exp_73168_731027 */
 {
object k_731631 = args[0]; object exp_73168_731027 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:env-make->id");


return_direct_with_clo1(data,  k_731631, (((closure)  k_731631)->fn),  Cyc_cadr(data, exp_73168_731027));; 
}

static void __lambda_150(void *data, object _, int argc, object *args) /* closure _,object k_731627, object exp_73167_731026 */
 {
object k_731627 = args[0]; object exp_73167_731026 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:env-make?");

complex_num_type local_734941; 
return_direct_with_clo1(data,  k_731627, (((closure)  k_731627)->fn),  ((inline_function_type)
                   ((closure)__glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_734941, quote_env_91make, exp_73167_731026));; 
}

static object __lambda_822(void *data, object ptr,object exp_73166_731025) {

  Cyc_st_add(data, "scheme/cyclone/transforms.sld:closure->fv");


return_copy(ptr,  Cyc_cddr(data, exp_73166_731025));; 
}

static void __lambda_149(void *data, object _, int argc, object *args) /* closure _,object k_731624, object exp_73166_731025 */
 {
object k_731624 = args[0]; object exp_73166_731025 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:closure->fv");


return_direct_with_clo1(data,  k_731624, (((closure)  k_731624)->fn),  Cyc_cddr(data, exp_73166_731025));; 
}

static object __lambda_821(void *data, object ptr,object exp_73165_731024) {

  Cyc_st_add(data, "scheme/cyclone/transforms.sld:closure->env");


return_copy(ptr,  Cyc_caddr(data, exp_73165_731024));; 
}

static void __lambda_148(void *data, object _, int argc, object *args) /* closure _,object k_731621, object exp_73165_731024 */
 {
object k_731621 = args[0]; object exp_73165_731024 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:closure->env");


return_direct_with_clo1(data,  k_731621, (((closure)  k_731621)->fn),  Cyc_caddr(data, exp_73165_731024));; 
}

static object __lambda_820(void *data, object ptr,object exp_73164_731023) {

  Cyc_st_add(data, "scheme/cyclone/transforms.sld:closure->lam");


return_copy(ptr,  Cyc_cadr(data, exp_73164_731023));; 
}

static void __lambda_147(void *data, object _, int argc, object *args) /* closure _,object k_731618, object exp_73164_731023 */
 {
object k_731618 = args[0]; object exp_73164_731023 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:closure->lam");


return_direct_with_clo1(data,  k_731618, (((closure)  k_731618)->fn),  Cyc_cadr(data, exp_73164_731023));; 
}

static void __lambda_146(void *data, object _, int argc, object *args) /* closure _,object k_731614, object exp_73163_731022 */
 {
object k_731614 = args[0]; object exp_73163_731022 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:closure?");

complex_num_type local_734912; 
return_direct_with_clo1(data,  k_731614, (((closure)  k_731614)->fn),  ((inline_function_type)
                   ((closure)__glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_734912, quote_closure, exp_73163_731022));; 
}

static object __lambda_819(void *data, object ptr,object exp_73162_731021) {

  Cyc_st_add(data, "scheme/cyclone/transforms.sld:begin->exps");


return_copy(ptr,  Cyc_cdr(data, exp_73162_731021));; 
}

static void __lambda_145(void *data, object _, int argc, object *args) /* closure _,object k_731611, object exp_73162_731021 */
 {
object k_731611 = args[0]; object exp_73162_731021 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:begin->exps");


return_direct_with_clo1(data,  k_731611, (((closure)  k_731611)->fn),  Cyc_cdr(data, exp_73162_731021));; 
}

static void __lambda_133(void *data, object _, int argc, object *args) /* closure _,object k_731590, object ast_73151_731017 */
 {
object k_731590 = args[0]; object ast_73151_731017 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:precompute-prim-app?");
  
if( (boolean_f != Cyc_is_pair(ast_73151_731017)) ){ 
  
closureN_type c_734784;
object e_734896 [2];
c_734784.hdr.mark = gc_color_red;
 c_734784.hdr.grayed = 0;
c_734784.tag = closureN_tag;
 c_734784.fn = (function_type)__lambda_134;
c_734784.num_args = 1;
c_734784.num_elements = 2;
c_734784.elements = (object *)e_734896;
c_734784.elements[0] = ast_73151_731017;
c_734784.elements[1] = k_731590;



return_direct_with_clo2(data,  __glo_prim_127_scheme_cyclone_primitives, (((closure)  __glo_prim_127_scheme_cyclone_primitives)->fn),  &c_734784, Cyc_car(data, ast_73151_731017));
} else { 
  return_direct_with_clo1(data,  k_731590, (((closure)  k_731590)->fn),  boolean_f);}
;; 
}

static void __lambda_134(void *data, object self_733156, int argc, object *args) /* object self_733156, object r_731592 */
 {
 object r_731592 = args[0];
  if( (boolean_f != r_731592) ){ 
  
closureN_type c_734786;
object e_734890 [2];
c_734786.hdr.mark = gc_color_red;
 c_734786.hdr.grayed = 0;
c_734786.tag = closureN_tag;
 c_734786.fn = (function_type)__lambda_135;
c_734786.num_args = 1;
c_734786.num_elements = 2;
c_734786.elements = (object *)e_734890;
c_734786.elements[0] = ((closureN)self_733156)->elements[0];
c_734786.elements[1] = ((closureN)self_733156)->elements[1];



return_direct_with_clo2(data,  __glo_prim_117udf_127_scheme_cyclone_primitives, (((closure)  __glo_prim_117udf_127_scheme_cyclone_primitives)->fn),  &c_734786, Cyc_car(data, ((closureN)self_733156)->elements[0]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733156)->elements[1], (((closure)  ((closureN)self_733156)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_135(void *data, object self_733157, int argc, object *args) /* object self_733157, object r_731593 */
 {
 object r_731593 = args[0];
  if( (boolean_f != r_731593) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733157)->elements[1], (((closure)  ((closureN)self_733157)->elements[1])->fn),  boolean_f);
} else { 
  
closureN_type c_734790;
object e_734839 [2];
c_734790.hdr.mark = gc_color_red;
 c_734790.hdr.grayed = 0;
c_734790.tag = closureN_tag;
 c_734790.fn = (function_type)__lambda_136;
c_734790.num_args = 1;
c_734790.num_elements = 2;
c_734790.elements = (object *)e_734839;
c_734790.elements[0] = ((closureN)self_733157)->elements[0];
c_734790.elements[1] = ((closureN)self_733157)->elements[1];






make_pair(c_734889,quote_Cyc_91display,NULL);c_734889.hdr.immutable = 1;

make_pair(c_734888,quote_Cyc_91write,&c_734889);c_734888.hdr.immutable = 1;

make_pair(c_734887,quote_Cyc_91write_91char,&c_734888);c_734887.hdr.immutable = 1;

make_pair(c_734886,quote_Cyc_91read_91line,&c_734887);c_734886.hdr.immutable = 1;

make_pair(c_734885,quote_peek_91char,&c_734886);c_734885.hdr.immutable = 1;

make_pair(c_734884,quote_read_91char,&c_734885);c_734884.hdr.immutable = 1;

make_pair(c_734883,quote_delete_91file,&c_734884);c_734883.hdr.immutable = 1;

make_pair(c_734882,quote_file_91exists_127,&c_734883);c_734882.hdr.immutable = 1;

make_pair(c_734881,quote_Cyc_91flush_91output_91port,&c_734882);c_734881.hdr.immutable = 1;

make_pair(c_734880,quote_close_91output_91port,&c_734881);c_734880.hdr.immutable = 1;

make_pair(c_734879,quote_close_91input_91port,&c_734880);c_734879.hdr.immutable = 1;

make_pair(c_734878,quote_close_91port,&c_734879);c_734878.hdr.immutable = 1;

make_pair(c_734877,quote_open_91output_91file,&c_734878);c_734877.hdr.immutable = 1;

make_pair(c_734876,quote_open_91input_91file,&c_734877);c_734876.hdr.immutable = 1;

make_pair(c_734875,quote_Cyc_91stderr,&c_734876);c_734875.hdr.immutable = 1;

make_pair(c_734874,quote_Cyc_91stdin,&c_734875);c_734874.hdr.immutable = 1;

make_pair(c_734873,quote_Cyc_91stdout,&c_734874);c_734873.hdr.immutable = 1;

make_pair(c_734872,quote_make_91vector,&c_734873);c_734872.hdr.immutable = 1;

make_pair(c_734871,quote_make_91bytevector,&c_734872);c_734871.hdr.immutable = 1;

make_pair(c_734870,quote_string_91_125symbol,&c_734871);c_734870.hdr.immutable = 1;

make_pair(c_734869,quote_string_91set_67,&c_734870);c_734869.hdr.immutable = 1;

make_pair(c_734868,quote_set_91cdr_67,&c_734869);c_734868.hdr.immutable = 1;

make_pair(c_734867,quote_set_91car_67,&c_734868);c_734867.hdr.immutable = 1;

make_pair(c_734866,quote_cons,&c_734867);c_734866.hdr.immutable = 1;

make_pair(c_734865,quote_cell,&c_734866);c_734865.hdr.immutable = 1;

make_pair(c_734864,quote_set_91cell_67,&c_734865);c_734864.hdr.immutable = 1;

make_pair(c_734863,quote_set_91global_91unsafe_67,&c_734864);c_734863.hdr.immutable = 1;

make_pair(c_734862,quote_set_91global_67,&c_734863);c_734862.hdr.immutable = 1;

make_pair(c_734861,quote_cell_91get,&c_734862);c_734861.hdr.immutable = 1;

make_pair(c_734860,quote_Cyc_91current_91exception_91handler,&c_734861);c_734860.hdr.immutable = 1;

make_pair(c_734859,quote_Cyc_91default_91exception_91handler,&c_734860);c_734859.hdr.immutable = 1;

make_pair(c_734858,quote_Cyc_91compilation_91environment,&c_734859);c_734858.hdr.immutable = 1;

make_pair(c_734857,quote_Cyc_91installation_91dir,&c_734858);c_734857.hdr.immutable = 1;

make_pair(c_734856,quote_command_91line_91arguments,&c_734857);c_734856.hdr.immutable = 1;

make_pair(c_734855,quote_system,&c_734856);c_734855.hdr.immutable = 1;

make_pair(c_734854,quote_exit,&c_734855);c_734854.hdr.immutable = 1;

make_pair(c_734853,quote__75halt,&c_734854);c_734853.hdr.immutable = 1;

make_pair(c_734852,quote_apply,&c_734853);c_734852.hdr.immutable = 1;

make_pair(c_734851,quote_Cyc_91end_91thread_67,&c_734852);c_734851.hdr.immutable = 1;

make_pair(c_734850,quote_Cyc_91spawn_91thread_67,&c_734851);c_734850.hdr.immutable = 1;

make_pair(c_734849,quote_Cyc_91opaque_127,&c_734850);c_734849.hdr.immutable = 1;

make_pair(c_734848,quote_Cyc_91cvar_127,&c_734849);c_734848.hdr.immutable = 1;

make_pair(c_734847,quote_Cyc_91set_91cvar_67,&c_734848);c_734847.hdr.immutable = 1;

make_pair(c_734846,quote_Cyc_91get_91cvar,&c_734847);c_734846.hdr.immutable = 1;

make_pair(c_734845,quote_Cyc_91global_91vars,&c_734846);c_734845.hdr.immutable = 1;
return_direct_with_clo1(data,(closure)&c_734790,__lambda_136,  memberp(data, Cyc_car(data, ((closureN)self_733157)->elements[0]), &c_734845));}
;; 
}

static void __lambda_136(void *data, object self_733158, int argc, object *args) /* object self_733158, object r_731594 */
 {
 object r_731594 = args[0];
  if( (boolean_f != r_731594) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733158)->elements[1], (((closure)  ((closureN)self_733158)->elements[1])->fn),  boolean_f);
} else { 
  
closureN_type c_734794;
object e_734797 [1];
c_734794.hdr.mark = gc_color_red;
 c_734794.hdr.grayed = 0;
c_734794.tag = closureN_tag;
 c_734794.fn = (function_type)__lambda_137;
c_734794.num_args = 1;
c_734794.num_elements = 1;
c_734794.elements = (object *)e_734797;
c_734794.elements[0] = ((closureN)self_733158)->elements[1];


closureN_type c_734798;
object e_734838 [1];
c_734798.hdr.mark = gc_color_red;
 c_734798.hdr.grayed = 0;
c_734798.tag = closureN_tag;
 c_734798.fn = (function_type)__lambda_138;
c_734798.num_args = 1;
c_734798.num_elements = 1;
c_734798.elements = (object *)e_734838;
c_734798.elements[0] = ((closureN)self_733158)->elements[0];

return_direct_with_clo1(data,(closure)&c_734794,__lambda_137,  &c_734798);}
;; 
}

static void __lambda_138(void *data, object self_733159, int argc, object *args) /* object self_733159, object k_731596, object return_73156_731018 */
 {
 object k_731596 = args[0]; object return_73156_731018 = args[1];
  
closureN_type c_734800;
object e_734809 [2];
c_734800.hdr.mark = gc_color_red;
 c_734800.hdr.grayed = 0;
c_734800.tag = closureN_tag;
 c_734800.fn = (function_type)__lambda_139;
c_734800.num_args = 1;
c_734800.num_elements = 2;
c_734800.elements = (object *)e_734809;
c_734800.elements[0] = ((closureN)self_733159)->elements[0];
c_734800.elements[1] = k_731596;


closureN_type c_734810;
object e_734837 [1];
c_734810.hdr.mark = gc_color_red;
 c_734810.hdr.grayed = 0;
c_734810.tag = closureN_tag;
 c_734810.fn = (function_type)__lambda_141;
c_734810.num_args = 1;
c_734810.num_elements = 1;
c_734810.elements = (object *)e_734837;
c_734810.elements[0] = return_73156_731018;

return_direct_with_clo1(data,(closure)&c_734800,__lambda_139,  &c_734810);; 
}

static void __lambda_141(void *data, object self_733160, int argc, object *args) /* object self_733160, object k_731600, object expr_73157_731019 */
 {
 object k_731600 = args[0]; object expr_73157_731019 = args[1];
  
closureN_type c_734812;
object e_734829 [1];
c_734812.hdr.mark = gc_color_red;
 c_734812.hdr.grayed = 0;
c_734812.tag = closureN_tag;
 c_734812.fn = (function_type)__lambda_142;
c_734812.num_args = 0;
c_734812.num_elements = 1;
c_734812.elements = (object *)e_734829;
c_734812.elements[0] = expr_73157_731019;


closureN_type c_734830;
object e_734836 [2];
c_734830.hdr.mark = gc_color_red;
 c_734830.hdr.grayed = 0;
c_734830.tag = closureN_tag;
 c_734830.fn = (function_type)__lambda_144;
c_734830.num_args = 1;
c_734830.num_elements = 2;
c_734830.elements = (object *)e_734836;
c_734830.elements[0] = k_731600;
c_734830.elements[1] = ((closureN)self_733160)->elements[0];

return_direct_with_clo1(data,(closure)&c_734812,__lambda_142,  &c_734830);; 
}

static void __lambda_144(void *data, object self_733161, int argc, object *args) /* object self_733161, object r_731601 */
 {
 object r_731601 = args[0];
  if( (boolean_f != r_731601) ){ 
  return_closcall2(data,  ((closureN)self_733161)->elements[1],  ((closureN)self_733161)->elements[0], boolean_f);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733161)->elements[0], (((closure)  ((closureN)self_733161)->elements[0])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_142(void *data, object self_733162, int argc, object *args) /* object self_733162, object k_731603 */
 {
 object k_731603 = args[0];
    
if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_733162)->elements[0])) ){ 
  

return_direct_with_clo1(data,  k_731603, (((closure)  k_731603)->fn),  Cyc_is_vector_not_record_type(((closureN)self_733162)->elements[0]));
} else { 
  
closureN_type c_734821;
object e_734827 [1];
c_734821.hdr.mark = gc_color_red;
 c_734821.hdr.grayed = 0;
c_734821.tag = closureN_tag;
 c_734821.fn = (function_type)__lambda_143;
c_734821.num_args = 1;
c_734821.num_elements = 1;
c_734821.elements = (object *)e_734827;
c_734821.elements[0] = k_731603;

return_direct_with_clo2(data,  __glo_const_127_scheme_cyclone_util, (((closure)  __glo_const_127_scheme_cyclone_util)->fn),  &c_734821, ((closureN)self_733162)->elements[0]);}
;; 
}

static void __lambda_143(void *data, object self_733163, int argc, object *args) /* object self_733163, object r_731604 */
 {
 object r_731604 = args[0];
  
complex_num_type local_734826; 
return_direct_with_clo1(data,  ((closureN)self_733163)->elements[0], (((closure)  ((closureN)self_733163)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_734826, r_731604));; 
}

static void __lambda_139(void *data, object self_733164, int argc, object *args) /* object self_733164, object r_731598 */
 {
 object r_731598 = args[0];
  
closureN_type c_734802;
object e_734805 [1];
c_734802.hdr.mark = gc_color_red;
 c_734802.hdr.grayed = 0;
c_734802.tag = closureN_tag;
 c_734802.fn = (function_type)__lambda_140;
c_734802.num_args = 1;
c_734802.num_elements = 1;
c_734802.elements = (object *)e_734805;
c_734802.elements[0] = ((closureN)self_733164)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_734802, r_731598, Cyc_cdr(data, ((closureN)self_733164)->elements[0]));; 
}

static void __lambda_140(void *data, object self_733165, int argc, object *args) /* object self_733165, object r_731597 */
 {

  return_direct_with_clo1(data,  ((closureN)self_733165)->elements[0], (((closure)  ((closureN)self_733165)->elements[0])->fn),  boolean_t);; 
}

static void __lambda_137(void *data, object self_733166, int argc, object *args) /* object self_733166, object r_731595 */
 {
 object r_731595 = args[0];
  return_direct_with_clo2(data,  __glo_call_95cc_scheme_base, (((closure)  __glo_call_95cc_scheme_base)->fn),  ((closureN)self_733166)->elements[0], r_731595);; 
}

static object __lambda_818(void *data, object ptr,object exp_73150_731016) {

  Cyc_st_add(data, "scheme/cyclone/transforms.sld:app->args");


return_copy(ptr,  Cyc_cdr(data, exp_73150_731016));; 
}

static void __lambda_132(void *data, object _, int argc, object *args) /* closure _,object k_731587, object exp_73150_731016 */
 {
object k_731587 = args[0]; object exp_73150_731016 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:app->args");


return_direct_with_clo1(data,  k_731587, (((closure)  k_731587)->fn),  Cyc_cdr(data, exp_73150_731016));; 
}

static object __lambda_817(void *data, object ptr,object exp_73149_731015) {

  Cyc_st_add(data, "scheme/cyclone/transforms.sld:app->fun");


return_copy(ptr,  Cyc_car(data, exp_73149_731015));; 
}

static void __lambda_131(void *data, object _, int argc, object *args) /* closure _,object k_731584, object exp_73149_731015 */
 {
object k_731584 = args[0]; object exp_73149_731015 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:app->fun");


return_direct_with_clo1(data,  k_731584, (((closure)  k_731584)->fn),  Cyc_car(data, exp_73149_731015));; 
}

static void __lambda_124(void *data, object _, int argc, object *args) /* closure _,object k_731572, object l_73137_731011 */
 {
object k_731572 = args[0]; object l_73137_731011 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:list->pair");

closureN_type c_734710;
object e_734763 [1];
c_734710.hdr.mark = gc_color_red;
 c_734710.hdr.grayed = 0;
c_734710.tag = closureN_tag;
 c_734710.fn = (function_type)__lambda_125;
c_734710.num_args = 1;
c_734710.num_elements = 1;
c_734710.elements = (object *)e_734763;
c_734710.elements[0] = k_731572;

return_direct_with_clo1(data,(closure)&c_734710,__lambda_125,  l_73137_731011);; 
}

static void __lambda_125(void *data, object self_733149, int argc, object *args) /* object self_733149, object lst_73139_731012 */
 {
 object lst_73139_731012 = args[0];
  
closureN_type c_734712;
object e_734762 [2];
c_734712.hdr.mark = gc_color_red;
 c_734712.hdr.grayed = 0;
c_734712.tag = closureN_tag;
 c_734712.fn = (function_type)__lambda_126;
c_734712.num_args = 1;
c_734712.num_elements = 2;
c_734712.elements = (object *)e_734762;
c_734712.elements[0] = ((closureN)self_733149)->elements[0];
c_734712.elements[1] = lst_73139_731012;

return_direct_with_clo1(data,(closure)&c_734712,__lambda_126,  boolean_f);; 
}

static void __lambda_126(void *data, object self_733150, int argc, object *args) /* object self_733150, object loop_73140_731013 */
 {
 object loop_73140_731013 = args[0];
  
closureN_type c_734714;
object e_734758 [2];
c_734714.hdr.mark = gc_color_red;
 c_734714.hdr.grayed = 0;
c_734714.tag = closureN_tag;
 c_734714.fn = (function_type)__lambda_786;
c_734714.num_args = 1;
c_734714.num_elements = 2;
c_734714.elements = (object *)e_734758;
c_734714.elements[0] = ((closureN)self_733150)->elements[0];
c_734714.elements[1] = ((closureN)self_733150)->elements[1];


pair_type local_734761; 
return_direct_with_clo1(data,(closure)&c_734714,__lambda_786,  set_cell_as_expr(&local_734761, loop_73140_731013));; 
}

static void __lambda_786(void *data, object self_733151, int argc, object *args) /* object self_733151, object loop_73140_731013 */
 {
 object loop_73140_731013 = args[0];
  
closureN_type c_734716;
object e_734729 [3];
c_734716.hdr.mark = gc_color_red;
 c_734716.hdr.grayed = 0;
c_734716.tag = closureN_tag;
 c_734716.fn = (function_type)__lambda_127;
c_734716.num_args = 1;
c_734716.num_elements = 3;
c_734716.elements = (object *)e_734729;
c_734716.elements[0] = ((closureN)self_733151)->elements[0];
c_734716.elements[1] = loop_73140_731013;
c_734716.elements[2] = ((closureN)self_733151)->elements[1];


closureN_type c_734730;
object e_734757 [1];
c_734730.hdr.mark = gc_color_red;
 c_734730.hdr.grayed = 0;
c_734730.tag = closureN_tag;
 c_734730.fn = (function_type)__lambda_129;
c_734730.num_args = 1;
c_734730.num_elements = 1;
c_734730.elements = (object *)e_734757;
c_734730.elements[0] = loop_73140_731013;

return_direct_with_clo1(data,(closure)&c_734716,__lambda_127,  &c_734730);; 
}

static void __lambda_129(void *data, object self_733152, int argc, object *args) /* object self_733152, object k_731575, object lst_73141_731014 */
 {
 object k_731575 = args[0]; object lst_73141_731014 = args[1];
    
if( (boolean_f != Cyc_is_pair(lst_73141_731014)) ){ 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, lst_73141_731014))) ){ 
  

return_direct_with_clo1(data,  k_731575, (((closure)  k_731575)->fn),  Cyc_car(data, lst_73141_731014));
} else { 
  


closureN_type c_734744;
object e_734753 [2];
c_734744.hdr.mark = gc_color_red;
 c_734744.hdr.grayed = 0;
c_734744.tag = closureN_tag;
 c_734744.fn = (function_type)__lambda_130;
c_734744.num_args = 1;
c_734744.num_elements = 2;
c_734744.elements = (object *)e_734753;
c_734744.elements[0] = k_731575;
c_734744.elements[1] = lst_73141_731014;



return_closcall2(data,  car(((closureN)self_733152)->elements[0]),  &c_734744, Cyc_cdr(data, lst_73141_731014));}
;
} else { 
  return_direct_with_clo1(data,  k_731575, (((closure)  k_731575)->fn),  lst_73141_731014);}
;; 
}

static void __lambda_130(void *data, object self_733153, int argc, object *args) /* object self_733153, object r_731579 */
 {
 object r_731579 = args[0];
  
pair_type local_734749; 


return_direct_with_clo1(data,  ((closureN)self_733153)->elements[0], (((closure)  ((closureN)self_733153)->elements[0])->fn),  set_pair_as_expr(&local_734749, Cyc_car(data, ((closureN)self_733153)->elements[1]), r_731579));; 
}

static void __lambda_127(void *data, object self_733154, int argc, object *args) /* object self_733154, object r_731574 */
 {
 object r_731574 = args[0];
  
closureN_type c_734718;
object e_734725 [3];
c_734718.hdr.mark = gc_color_red;
 c_734718.hdr.grayed = 0;
c_734718.tag = closureN_tag;
 c_734718.fn = (function_type)__lambda_128;
c_734718.num_args = 1;
c_734718.num_elements = 3;
c_734718.elements = (object *)e_734725;
c_734718.elements[0] = ((closureN)self_733154)->elements[0];
c_734718.elements[1] = ((closureN)self_733154)->elements[1];
c_734718.elements[2] = ((closureN)self_733154)->elements[2];



return_direct_with_clo1(data,(closure)&c_734718,__lambda_128,  Cyc_set_cell(data, ((closureN)self_733154)->elements[1], r_731574));; 
}

static void __lambda_128(void *data, object self_733155, int argc, object *args) /* object self_733155, object r_731573 */
 {

  

return_closcall2(data,  car(((closureN)self_733155)->elements[1]),  ((closureN)self_733155)->elements[0], ((closureN)self_733155)->elements[2]);; 
}

static void __lambda_123(void *data, object _, int argc, object *args) /* closure _,object k_731543, object args_73119_731009, object type_73120_731010 */
 {
object k_731543 = args[0]; object args_73119_731009 = args[1]; object type_73120_731010 = args[2];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:list->lambda-formals");
  
if( (boolean_f != Cyc_eq(type_73120_731010, quote_args_117fixed)) ){ 
  return_direct_with_clo1(data,  k_731543, (((closure)  k_731543)->fn),  args_73119_731009);
} else { 
    
if( (boolean_f != Cyc_eq(type_73120_731010, quote_args_117fixed_91with_91varargs)) ){ 
  return_direct_with_clo2(data,  __glo_list_91_125pair_scheme_cyclone_transforms, (((closure)  __glo_list_91_125pair_scheme_cyclone_transforms)->fn),  k_731543, args_73119_731009);
} else { 
    
if( (boolean_f != Cyc_eq(type_73120_731010, quote_args_117varargs)) ){ 
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, args_73119_731009), obj_int2obj(1))) ){ 
  
pair_type local_734679; 

pair_type local_734682; 

pair_type local_734685; 

pair_type local_734688; 

pair_type local_734691; 

pair_type local_734694; 
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_731543, set_pair_as_expr(&local_734679, quote_Too, set_pair_as_expr(&local_734682, quote_many, set_pair_as_expr(&local_734685, quote_args, set_pair_as_expr(&local_734688, quote__for, set_pair_as_expr(&local_734691, quote_varargs, set_pair_as_expr(&local_734694, args_73119_731009, NULL)))))));
} else { 
  

return_direct_with_clo1(data,  k_731543, (((closure)  k_731543)->fn),  Cyc_car(data, args_73119_731009));}
;
} else { 
  
pair_type local_734701; 

pair_type local_734704; 

pair_type local_734707; 
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_731543, set_pair_as_expr(&local_734701, quote_Unexpected, set_pair_as_expr(&local_734704, quote_type, set_pair_as_expr(&local_734707, type_73120_731010, NULL))));}
;}
;}
;; 
}

static void __lambda_119(void *data, object _, int argc, object *args) /* closure _,object k_731533, object exp_73109_731006 */
 {
object k_731533 = args[0]; object exp_73109_731006 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:lambda-num-args");

closureN_type c_734638;
object e_734662 [2];
c_734638.hdr.mark = gc_color_red;
 c_734638.hdr.grayed = 0;
c_734638.tag = closureN_tag;
 c_734638.fn = (function_type)__lambda_120;
c_734638.num_args = 1;
c_734638.num_elements = 2;
c_734638.elements = (object *)e_734662;
c_734638.elements[0] = exp_73109_731006;
c_734638.elements[1] = k_731533;

return_direct_with_clo2(data,  __glo_lambda_91formals_91type_scheme_cyclone_util, (((closure)  __glo_lambda_91formals_91type_scheme_cyclone_util)->fn),  &c_734638, exp_73109_731006);; 
}

static void __lambda_120(void *data, object self_733146, int argc, object *args) /* object self_733146, object r_731534 */
 {
 object r_731534 = args[0];
  
closureN_type c_734640;
object e_734660 [2];
c_734640.hdr.mark = gc_color_red;
 c_734640.hdr.grayed = 0;
c_734640.tag = closureN_tag;
 c_734640.fn = (function_type)__lambda_121;
c_734640.num_args = 1;
c_734640.num_elements = 2;
c_734640.elements = (object *)e_734660;
c_734640.elements[0] = ((closureN)self_733146)->elements[1];
c_734640.elements[1] = r_731534;

return_direct_with_clo2(data,  __glo_lambda_91formals_91_125list_scheme_cyclone_util, (((closure)  __glo_lambda_91formals_91_125list_scheme_cyclone_util)->fn),  &c_734640, ((closureN)self_733146)->elements[0]);; 
}

static void __lambda_121(void *data, object self_733147, int argc, object *args) /* object self_733147, object r_731540 */
 {
 object r_731540 = args[0];
  
closureN_type c_734642;
object e_734656 [1];
c_734642.hdr.mark = gc_color_red;
 c_734642.hdr.grayed = 0;
c_734642.tag = closureN_tag;
 c_734642.fn = (function_type)__lambda_122;
c_734642.num_args = 2;
c_734642.num_elements = 1;
c_734642.elements = (object *)e_734656;
c_734642.elements[0] = ((closureN)self_733147)->elements[0];



return_direct_with_clo2(data,(closure)&c_734642,__lambda_122,  ((closureN)self_733147)->elements[1], Cyc_length(data, r_731540));; 
}

static void __lambda_122(void *data, object self_733148, int argc, object *args) /* object self_733148, object type_73110_731007, object num_73111_731008 */
 {
 object type_73110_731007 = args[0]; object num_73111_731008 = args[1];
    
if( (boolean_f != equalp(type_73110_731007, quote_args_117varargs)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733148)->elements[0], (((closure)  ((closureN)self_733148)->elements[0])->fn),  obj_int2obj(-1));
} else { 
    
if( (boolean_f != equalp(type_73110_731007, quote_args_117fixed_91with_91varargs)) ){ 
  
complex_num_type local_734653; 
return_direct_with_clo1(data,  ((closureN)self_733148)->elements[0], (((closure)  ((closureN)self_733148)->elements[0])->fn),  Cyc_fast_sub(data,&local_734653, num_73111_731008, obj_int2obj(1)));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733148)->elements[0], (((closure)  ((closureN)self_733148)->elements[0])->fn),  num_73111_731008);}
;}
;; 
}

static void __lambda_117(void *data, object _, int argc, object *args) /* closure _,object k_731525, object ast_73105_731005 */
 {
object k_731525 = args[0]; object ast_73105_731005 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:ast:lambda-formals->list");

closureN_type c_734623;
object e_734635 [1];
c_734623.hdr.mark = gc_color_red;
 c_734623.hdr.grayed = 0;
c_734623.tag = closureN_tag;
 c_734623.fn = (function_type)__lambda_118;
c_734623.num_args = 1;
c_734623.num_elements = 1;
c_734623.elements = (object *)e_734635;
c_734623.elements[0] = k_731525;

return_direct_with_clo2(data,  __glo_ast_117lambda_91args_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91args_scheme_cyclone_ast)->fn),  &c_734623, ast_73105_731005);; 
}

static void __lambda_118(void *data, object self_733145, int argc, object *args) /* object self_733145, object r_731528 */
 {
 object r_731528 = args[0];
  
pair_type local_734628; 

pair_type local_734631; 

pair_type local_734634; 
return_direct_with_clo2(data,  __glo_lambda_91formals_91_125list_scheme_cyclone_util, (((closure)  __glo_lambda_91formals_91_125list_scheme_cyclone_util)->fn),  ((closureN)self_733145)->elements[0], set_pair_as_expr(&local_734628, boolean_f, set_pair_as_expr(&local_734631, r_731528, set_pair_as_expr(&local_734634, boolean_f, NULL))));; 
}

static void __lambda_115(void *data, object _, int argc, object *args) /* closure _,object k_731517, object ast_73101_731004 */
 {
object k_731517 = args[0]; object ast_73101_731004 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:ast:lambda-formals-type");

closureN_type c_734608;
object e_734620 [1];
c_734608.hdr.mark = gc_color_red;
 c_734608.hdr.grayed = 0;
c_734608.tag = closureN_tag;
 c_734608.fn = (function_type)__lambda_116;
c_734608.num_args = 1;
c_734608.num_elements = 1;
c_734608.elements = (object *)e_734620;
c_734608.elements[0] = k_731517;

return_direct_with_clo2(data,  __glo_ast_117lambda_91args_scheme_cyclone_ast, (((closure)  __glo_ast_117lambda_91args_scheme_cyclone_ast)->fn),  &c_734608, ast_73101_731004);; 
}

static void __lambda_116(void *data, object self_733144, int argc, object *args) /* object self_733144, object r_731520 */
 {
 object r_731520 = args[0];
  
pair_type local_734613; 

pair_type local_734616; 

pair_type local_734619; 
return_direct_with_clo2(data,  __glo_lambda_91formals_91type_scheme_cyclone_util, (((closure)  __glo_lambda_91formals_91type_scheme_cyclone_util)->fn),  ((closureN)self_733144)->elements[0], set_pair_as_expr(&local_734613, boolean_f, set_pair_as_expr(&local_734616, r_731520, set_pair_as_expr(&local_734619, boolean_f, NULL))));; 
}

static void __lambda_114(void *data, object _, int argc, object *args) /* closure _,object k_731513, object exp_73100_731003 */
 {
object k_731513 = args[0]; object exp_73100_731003 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:letrec->args");


return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  k_731513, primitive_cadr, Cyc_cadr(data, exp_73100_731003));; 
}

static void __lambda_113(void *data, object _, int argc, object *args) /* closure _,object k_731509, object exp_7399_731002 */
 {
object k_731509 = args[0]; object exp_7399_731002 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:letrec->bound-vars");


return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  k_731509, primitive_car, Cyc_cadr(data, exp_7399_731002));; 
}

static object __lambda_816(void *data, object ptr,object exp_7398_731001) {

  Cyc_st_add(data, "scheme/cyclone/transforms.sld:letrec->exp");


return_copy(ptr,  Cyc_cddr(data, exp_7398_731001));; 
}

static void __lambda_112(void *data, object _, int argc, object *args) /* closure _,object k_731506, object exp_7398_731001 */
 {
object k_731506 = args[0]; object exp_7398_731001 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:letrec->exp");


return_direct_with_clo1(data,  k_731506, (((closure)  k_731506)->fn),  Cyc_cddr(data, exp_7398_731001));; 
}

static object __lambda_815(void *data, object ptr,object exp_7397_731000) {

  Cyc_st_add(data, "scheme/cyclone/transforms.sld:letrec->bindings");


return_copy(ptr,  Cyc_cadr(data, exp_7397_731000));; 
}

static void __lambda_111(void *data, object _, int argc, object *args) /* closure _,object k_731503, object exp_7397_731000 */
 {
object k_731503 = args[0]; object exp_7397_731000 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:letrec->bindings");


return_direct_with_clo1(data,  k_731503, (((closure)  k_731503)->fn),  Cyc_cadr(data, exp_7397_731000));; 
}

static void __lambda_110(void *data, object _, int argc, object *args) /* closure _,object k_731499, object exp_7396_73999 */
 {
object k_731499 = args[0]; object exp_7396_73999 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:letrec?");

complex_num_type local_734581; 
return_direct_with_clo1(data,  k_731499, (((closure)  k_731499)->fn),  ((inline_function_type)
                   ((closure)__glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_734581, quote_letrec, exp_7396_73999));; 
}

static void __lambda_109(void *data, object _, int argc, object *args) /* closure _,object k_731495, object exp_7395_73998 */
 {
object k_731495 = args[0]; object exp_7395_73998 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:let->args");


return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  k_731495, primitive_cadr, Cyc_cadr(data, exp_7395_73998));; 
}

static void __lambda_108(void *data, object _, int argc, object *args) /* closure _,object k_731491, object exp_7394_73997 */
 {
object k_731491 = args[0]; object exp_7394_73997 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:let->bound-vars");


return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  k_731491, primitive_car, Cyc_cadr(data, exp_7394_73997));; 
}

static object __lambda_814(void *data, object ptr,object exp_7393_73996) {

  Cyc_st_add(data, "scheme/cyclone/transforms.sld:let->exp");


return_copy(ptr,  Cyc_cddr(data, exp_7393_73996));; 
}

static void __lambda_107(void *data, object _, int argc, object *args) /* closure _,object k_731488, object exp_7393_73996 */
 {
object k_731488 = args[0]; object exp_7393_73996 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:let->exp");


return_direct_with_clo1(data,  k_731488, (((closure)  k_731488)->fn),  Cyc_cddr(data, exp_7393_73996));; 
}

static object __lambda_813(void *data, object ptr,object exp_7392_73995) {

  Cyc_st_add(data, "scheme/cyclone/transforms.sld:let->bindings");


return_copy(ptr,  Cyc_cadr(data, exp_7392_73995));; 
}

static void __lambda_106(void *data, object _, int argc, object *args) /* closure _,object k_731485, object exp_7392_73995 */
 {
object k_731485 = args[0]; object exp_7392_73995 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:let->bindings");


return_direct_with_clo1(data,  k_731485, (((closure)  k_731485)->fn),  Cyc_cadr(data, exp_7392_73995));; 
}

static void __lambda_105(void *data, object _, int argc, object *args) /* closure _,object k_731481, object exp_7391_73994 */
 {
object k_731481 = args[0]; object exp_7391_73994 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:let?");

complex_num_type local_734552; 
return_direct_with_clo1(data,  k_731481, (((closure)  k_731481)->fn),  ((inline_function_type)
                   ((closure)__glo_tagged_91list_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_734552, quote_let, exp_7391_73994));; 
}

static void __lambda_103(void *data, object _, int argc, object *args) /* closure _,object k_731474, object env_7389_73992, object keys_7390_73993 */
 {
object k_731474 = args[0]; object env_7389_73992 = args[1]; object keys_7390_73993 = args[2];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:assq-remove-keys");
  
if( (boolean_f != Cyc_is_pair(keys_7390_73993)) ){ 
  
closureN_type c_734538;
object e_734544 [2];
c_734538.hdr.mark = gc_color_red;
 c_734538.hdr.grayed = 0;
c_734538.tag = closureN_tag;
 c_734538.fn = (function_type)__lambda_104;
c_734538.num_args = 1;
c_734538.num_elements = 2;
c_734538.elements = (object *)e_734544;
c_734538.elements[0] = k_731474;
c_734538.elements[1] = keys_7390_73993;



return_direct_with_clo3(data,  __glo_assq_91remove_91key_scheme_cyclone_transforms, (((closure)  __glo_assq_91remove_91key_scheme_cyclone_transforms)->fn),  &c_734538, env_7389_73992, Cyc_car(data, keys_7390_73993));
} else { 
  return_direct_with_clo1(data,  k_731474, (((closure)  k_731474)->fn),  env_7389_73992);}
;; 
}

static void __lambda_104(void *data, object self_733143, int argc, object *args) /* object self_733143, object r_731476 */
 {
 object r_731476 = args[0];
  

return_direct_with_clo3(data,  __glo_assq_91remove_91keys_scheme_cyclone_transforms, (((closure)  __glo_assq_91remove_91keys_scheme_cyclone_transforms)->fn),  ((closureN)self_733143)->elements[0], r_731476, Cyc_cdr(data, ((closureN)self_733143)->elements[1]));; 
}

static void __lambda_101(void *data, object _, int argc, object *args) /* closure _,object k_731463, object env_7387_73990, object key_7388_73991 */
 {
object k_731463 = args[0]; object env_7387_73990 = args[1]; object key_7388_73991 = args[2];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:assq-remove-key");

 while(1) {
  
if( (boolean_f != Cyc_is_pair(env_7387_73990)) ){ 
    
  
  
if( (boolean_f != Cyc_eq(Cyc_car(data, Cyc_car(data, env_7387_73990)), key_7388_73991)) ){ 
  

env_7387_73990 = Cyc_cdr(data, env_7387_73990);
k_731463 = k_731463;continue;
} else { 
  
closureN_type * c_734521 = alloca(sizeof(closureN_type));
object *e_734530 = (object *)alloca(sizeof(object) * 2);c_734521->hdr.mark = gc_color_red;
 c_734521->hdr.grayed = 0;
c_734521->tag = closureN_tag;
 c_734521->fn = (function_type)__lambda_102;
c_734521->num_args = 1;
c_734521->num_elements = 2;
c_734521->elements = (object *)e_734530;
c_734521->elements[0] = env_7387_73990;
c_734521->elements[1] = k_731463;



return_direct_with_clo3(data,  __glo_assq_91remove_91key_scheme_cyclone_transforms, (((closure)  __glo_assq_91remove_91key_scheme_cyclone_transforms)->fn),  c_734521, Cyc_cdr(data, env_7387_73990), key_7388_73991);}
;
} else { 
  return_direct_with_clo1(data,  k_731463, (((closure)  k_731463)->fn),  NULL);}
;; 
}
}

static void __lambda_102(void *data, object self_733142, int argc, object *args) /* object self_733142, object r_731468 */
 {
 object r_731468 = args[0];
  
pair_type local_734526; 


return_direct_with_clo1(data,  ((closureN)self_733142)->elements[1], (((closure)  ((closureN)self_733142)->elements[1])->fn),  set_pair_as_expr(&local_734526, Cyc_car(data, ((closureN)self_733142)->elements[0]), r_731468));; 
}

static void __lambda_99(void *data, object _, int argc, object *args) /* closure _,object k_731451, object list1_7384_73988, object list2_7385_73989 */
 {
object k_731451 = args[0]; object list1_7384_73988 = args[1]; object list2_7385_73989 = args[2];
  object r_731452;
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:azip");
  
if( (boolean_f != Cyc_is_pair(list1_7384_73988)) ){ 
  
  r_731452 = Cyc_is_pair(list2_7385_73989);
} else { 
  r_731452 = boolean_f;}
;if( (boolean_f != r_731452) ){ 
  
closureN_type c_734487;
object e_734502 [3];
c_734487.hdr.mark = gc_color_red;
 c_734487.hdr.grayed = 0;
c_734487.tag = closureN_tag;
 c_734487.fn = (function_type)__lambda_100;
c_734487.num_args = 1;
c_734487.num_elements = 3;
c_734487.elements = (object *)e_734502;
c_734487.elements[0] = k_731451;
c_734487.elements[1] = list1_7384_73988;
c_734487.elements[2] = list2_7385_73989;





return_direct_with_clo3(data,  __glo_azip_scheme_cyclone_transforms, (((closure)  __glo_azip_scheme_cyclone_transforms)->fn),  &c_734487, Cyc_cdr(data, list1_7384_73988), Cyc_cdr(data, list2_7385_73989));
} else { 
  return_direct_with_clo1(data,  k_731451, (((closure)  k_731451)->fn),  NULL);}
;; 
}

static void __lambda_100(void *data, object self_733141, int argc, object *args) /* object self_733141, object r_731454 */
 {
 object r_731454 = args[0];
  
pair_type local_734492; 

list_2_type local_734495; 




return_direct_with_clo1(data,  ((closureN)self_733141)->elements[0], (((closure)  ((closureN)self_733141)->elements[0])->fn),  set_pair_as_expr(&local_734492, Cyc_fast_list_2(&local_734495, Cyc_car(data, ((closureN)self_733141)->elements[1]), Cyc_car(data, ((closureN)self_733141)->elements[2])), r_731454));; 
}

static void __lambda_97(void *data, object _, int argc, object *args) /* closure _,object k_731444, object f_7381_73985, object lst_7382_73986, object init_7383_73987 */
 {
object k_731444 = args[0]; object f_7381_73985 = args[1]; object lst_7382_73986 = args[2]; object init_7383_73987 = args[3];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:reduce");
  
if( (boolean_f != Cyc_is_pair(lst_7382_73986)) ){ 
  
closureN_type c_734467;
object e_734474 [3];
c_734467.hdr.mark = gc_color_red;
 c_734467.hdr.grayed = 0;
c_734467.tag = closureN_tag;
 c_734467.fn = (function_type)__lambda_98;
c_734467.num_args = 1;
c_734467.num_elements = 3;
c_734467.elements = (object *)e_734474;
c_734467.elements[0] = f_7381_73985;
c_734467.elements[1] = k_731444;
c_734467.elements[2] = lst_7382_73986;



return_closcall3(data,  f_7381_73985,  &c_734467, Cyc_car(data, lst_7382_73986), init_7383_73987);
} else { 
  return_direct_with_clo1(data,  k_731444, (((closure)  k_731444)->fn),  init_7383_73987);}
;; 
}

static void __lambda_98(void *data, object self_733140, int argc, object *args) /* object self_733140, object r_731447 */
 {
 object r_731447 = args[0];
  

return_direct_with_clo4(data,  __glo_reduce_scheme_cyclone_transforms, (((closure)  __glo_reduce_scheme_cyclone_transforms)->fn),  ((closureN)self_733140)->elements[1], ((closureN)self_733140)->elements[0], Cyc_cdr(data, ((closureN)self_733140)->elements[2]), r_731447);; 
}

static void __lambda_95(void *data, object _, int argc, object *args) /* closure _,object k_731437, object set1_7379_73983, object set2_7380_73984 */
 {
object k_731437 = args[0]; object set1_7379_73983 = args[1]; object set2_7380_73984 = args[2];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:difference");
  
if( (boolean_f != Cyc_is_pair(set2_7380_73984)) ){ 
  
closureN_type c_734453;
object e_734459 [2];
c_734453.hdr.mark = gc_color_red;
 c_734453.hdr.grayed = 0;
c_734453.tag = closureN_tag;
 c_734453.fn = (function_type)__lambda_96;
c_734453.num_args = 1;
c_734453.num_elements = 2;
c_734453.elements = (object *)e_734459;
c_734453.elements[0] = k_731437;
c_734453.elements[1] = set2_7380_73984;



return_direct_with_clo3(data,  __glo_remove_scheme_cyclone_transforms, (((closure)  __glo_remove_scheme_cyclone_transforms)->fn),  &c_734453, Cyc_car(data, set2_7380_73984), set1_7379_73983);
} else { 
  return_direct_with_clo1(data,  k_731437, (((closure)  k_731437)->fn),  set1_7379_73983);}
;; 
}

static void __lambda_96(void *data, object self_733139, int argc, object *args) /* object self_733139, object r_731439 */
 {
 object r_731439 = args[0];
  

return_direct_with_clo3(data,  __glo_difference_scheme_cyclone_transforms, (((closure)  __glo_difference_scheme_cyclone_transforms)->fn),  ((closureN)self_733139)->elements[0], r_731439, Cyc_cdr(data, ((closureN)self_733139)->elements[1]));; 
}

static void __lambda_93(void *data, object _, int argc, object *args) /* closure _,object k_731430, object set1_7377_73981, object set2_7378_73982 */
 {
object k_731430 = args[0]; object set1_7377_73981 = args[1]; object set2_7378_73982 = args[2];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:union");
  
if( (boolean_f != Cyc_is_pair(set1_7377_73981)) ){ 
  
closureN_type c_734439;
object e_734445 [2];
c_734439.hdr.mark = gc_color_red;
 c_734439.hdr.grayed = 0;
c_734439.tag = closureN_tag;
 c_734439.fn = (function_type)__lambda_94;
c_734439.num_args = 1;
c_734439.num_elements = 2;
c_734439.elements = (object *)e_734445;
c_734439.elements[0] = k_731430;
c_734439.elements[1] = set1_7377_73981;



return_direct_with_clo3(data,  __glo__union_scheme_cyclone_transforms, (((closure)  __glo__union_scheme_cyclone_transforms)->fn),  &c_734439, Cyc_cdr(data, set1_7377_73981), set2_7378_73982);
} else { 
  return_direct_with_clo1(data,  k_731430, (((closure)  k_731430)->fn),  set2_7378_73982);}
;; 
}

static void __lambda_94(void *data, object self_733138, int argc, object *args) /* object self_733138, object r_731433 */
 {
 object r_731433 = args[0];
  

return_direct_with_clo3(data,  __glo_insert_scheme_cyclone_transforms, (((closure)  __glo_insert_scheme_cyclone_transforms)->fn),  ((closureN)self_733138)->elements[0], Cyc_car(data, ((closureN)self_733138)->elements[1]), r_731433);; 
}

static void __lambda_91(void *data, object _, int argc, object *args) /* closure _,object k_731421, object sym_7375_73979, object S_7376_73980 */
 {
object k_731421 = args[0]; object sym_7375_73979 = args[1]; object S_7376_73980 = args[2];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:remove");
  
if( (boolean_f != Cyc_is_pair(S_7376_73980)) ){ 
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, S_7376_73980), sym_7375_73979)) ){ 
  

return_direct_with_clo1(data,  k_731421, (((closure)  k_731421)->fn),  Cyc_cdr(data, S_7376_73980));
} else { 
  
closureN_type c_734422;
object e_734431 [2];
c_734422.hdr.mark = gc_color_red;
 c_734422.hdr.grayed = 0;
c_734422.tag = closureN_tag;
 c_734422.fn = (function_type)__lambda_92;
c_734422.num_args = 1;
c_734422.num_elements = 2;
c_734422.elements = (object *)e_734431;
c_734422.elements[0] = S_7376_73980;
c_734422.elements[1] = k_731421;



return_direct_with_clo3(data,  __glo_remove_scheme_cyclone_transforms, (((closure)  __glo_remove_scheme_cyclone_transforms)->fn),  &c_734422, sym_7375_73979, Cyc_cdr(data, S_7376_73980));}
;
} else { 
  return_direct_with_clo1(data,  k_731421, (((closure)  k_731421)->fn),  NULL);}
;; 
}

static void __lambda_92(void *data, object self_733137, int argc, object *args) /* object self_733137, object r_731425 */
 {
 object r_731425 = args[0];
  
pair_type local_734427; 


return_direct_with_clo1(data,  ((closureN)self_733137)->elements[1], (((closure)  ((closureN)self_733137)->elements[1])->fn),  set_pair_as_expr(&local_734427, Cyc_car(data, ((closureN)self_733137)->elements[0]), r_731425));; 
}

static void __lambda_812(void *data, object _, int argc, object *args) {object k_7318 = args[0];object sym_731_7312 = args[1];object S_732_7313 = args[2];
 pair_type *acc = NULL, *acc_tail = NULL;
 object result;
 while(1) {
  if( (boolean_f != Cyc_is_pair(S_732_7313)) ){
    if( (boolean_f != Cyc_eq(sym_731_7312, Cyc_car(data, S_732_7313))) ){
      //return_closcall1(data,  k_7318,  S_732_7313);
      result = S_732_7313;
      break;
    } else {
      if (strcmp(symbol_desc(sym_731_7312),
                 symbol_desc(Cyc_car(data, S_732_7313))) < 0) {
        //pair_type local_7356;
        //return_closcall1(data,  k_7318,  set_pair_as_expr(&local_7356, sym_731_7312, S_732_7313));
        pair_type* local_7356 = alloca(sizeof(pair_type));
        set_pair(local_7356, sym_731_7312, S_732_7313);
        result = local_7356;
        break;
      } else {
        pair_type *p = alloca(sizeof(pair_type));
        set_pair(p, Cyc_car(data, S_732_7313), NULL);
        if (acc == NULL) {
          acc = p;
          acc_tail = acc;
        } else {
          cdr(acc_tail) = p;
          acc_tail = p;
        }
        S_732_7313 = Cyc_cdr(data, S_732_7313);
        continue;
      }
    }
  } else {
    //pair_type local_7363;
    //return_closcall1(data,  k_7318,  set_cell_as_expr(&local_7363, sym_731_7312));
    pair_type *local_7363 = alloca(sizeof(pair_type));
    set_pair(local_7363, sym_731_7312, NULL);
    result = local_7363;
    break;
  }
}

if (acc) {
  cdr(acc_tail) = result;
  return_closcall1(data, k_7318, (object)acc);
} else {
  return_closcall1(data, k_7318, result);
}
 }
static object __lambda_811(void *data, object ptr, object sym1, object sym2) { 
     Cyc_check_sym(data, sym1);
     Cyc_check_sym(data, sym2);
     object result = (strcmp(symbol_desc(sym1), symbol_desc(sym2)) < 0) 
                     ? boolean_t : boolean_f;
     return result;
   }
static void __lambda_810(void *data, object _, int argc, object *args) {object k = args[0];object sym1 = args[1];object sym2 = args[2];
     Cyc_check_sym(data, sym1);
     Cyc_check_sym(data, sym2);
     object result = (strcmp(symbol_desc(sym1), symbol_desc(sym2)) < 0) 
                     ? boolean_t : boolean_f;
     return_closcall1(data, k, result);
   }
static object __lambda_809(void *data, object ptr) {

  Cyc_st_add(data, "scheme/cyclone/transforms.sld:void");
return_copy(ptr,  Cyc_VOID);; 
}

static void __lambda_90(void *data, object _, int argc, object *args) /* closure _,object k_731418 */
 {
object k_731418 = args[0];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:void");
return_direct_with_clo1(data,  k_731418, (((closure)  k_731418)->fn),  Cyc_VOID);; 
}

static void __lambda_87(void *data, object _, int argc, object *args) /* closure _,object k_731407, object e_7373_73977, object lst_7374_73978 */
 {
object k_731407 = args[0]; object e_7373_73977 = args[1]; object lst_7374_73978 = args[2];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:list-index");
  
if( (boolean_f != Cyc_is_null(lst_7374_73978)) ){ 
  return_direct_with_clo1(data,  k_731407, (((closure)  k_731407)->fn),  obj_int2obj(-1));
} else { 
    
  
if( (boolean_f != Cyc_eq(Cyc_car(data, lst_7374_73978), e_7373_73977)) ){ 
  return_direct_with_clo1(data,  k_731407, (((closure)  k_731407)->fn),  obj_int2obj(0));
} else { 
  
closureN_type c_734384;
object e_734401 [3];
c_734384.hdr.mark = gc_color_red;
 c_734384.hdr.grayed = 0;
c_734384.tag = closureN_tag;
 c_734384.fn = (function_type)__lambda_88;
c_734384.num_args = 1;
c_734384.num_elements = 3;
c_734384.elements = (object *)e_734401;
c_734384.elements[0] = e_7373_73977;
c_734384.elements[1] = k_731407;
c_734384.elements[2] = lst_7374_73978;



return_direct_with_clo3(data,  __glo_list_91index_scheme_cyclone_transforms, (((closure)  __glo_list_91index_scheme_cyclone_transforms)->fn),  &c_734384, e_7373_73977, Cyc_cdr(data, lst_7374_73978));}
;}
;; 
}

static void __lambda_88(void *data, object self_733135, int argc, object *args) /* object self_733135, object r_731413 */
 {
 object r_731413 = args[0];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, r_731413, obj_int2obj(-1))) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733135)->elements[1], (((closure)  ((closureN)self_733135)->elements[1])->fn),  obj_int2obj(-1));
} else { 
  
closureN_type c_734390;
object e_734396 [1];
c_734390.hdr.mark = gc_color_red;
 c_734390.hdr.grayed = 0;
c_734390.tag = closureN_tag;
 c_734390.fn = (function_type)__lambda_89;
c_734390.num_args = 1;
c_734390.num_elements = 1;
c_734390.elements = (object *)e_734396;
c_734390.elements[0] = ((closureN)self_733135)->elements[1];



return_direct_with_clo3(data,  __glo_list_91index_scheme_cyclone_transforms, (((closure)  __glo_list_91index_scheme_cyclone_transforms)->fn),  &c_734390, ((closureN)self_733135)->elements[0], Cyc_cdr(data, ((closureN)self_733135)->elements[2]));}
;; 
}

static void __lambda_89(void *data, object self_733136, int argc, object *args) /* object self_733136, object r_731411 */
 {
 object r_731411 = args[0];
  
complex_num_type local_734395; 
return_direct_with_clo1(data,  ((closureN)self_733136)->elements[0], (((closure)  ((closureN)self_733136)->elements[0])->fn),  Cyc_fast_sum(data,&local_734395, obj_int2obj(1), r_731411));; 
}

static void __lambda_83(void *data, object _, int argc, object *args) /* closure _,object k_731397, object filename_7371_73975 */
 {
object k_731397 = args[0]; object filename_7371_73975 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:basename");

closureN_type c_734346;
object e_734373 [2];
c_734346.hdr.mark = gc_color_red;
 c_734346.hdr.grayed = 0;
c_734346.tag = closureN_tag;
 c_734346.fn = (function_type)__lambda_84;
c_734346.num_args = 1;
c_734346.num_elements = 2;
c_734346.elements = (object *)e_734373;
c_734346.elements[0] = filename_7371_73975;
c_734346.elements[1] = k_731397;

return_direct_with_clo2(data,  __glo_string_91_125list_scheme_base, (((closure)  __glo_string_91_125list_scheme_base)->fn),  &c_734346, filename_7371_73975);; 
}

static void __lambda_84(void *data, object self_733132, int argc, object *args) /* object self_733132, object r_731404 */
 {
 object r_731404 = args[0];
  
closureN_type c_734348;
object e_734372 [2];
c_734348.hdr.mark = gc_color_red;
 c_734348.hdr.grayed = 0;
c_734348.tag = closureN_tag;
 c_734348.fn = (function_type)__lambda_85;
c_734348.num_args = 1;
c_734348.num_elements = 2;
c_734348.elements = (object *)e_734372;
c_734348.elements[0] = ((closureN)self_733132)->elements[0];
c_734348.elements[1] = ((closureN)self_733132)->elements[1];

return_direct_with_clo2(data,  __glo_reverse_scheme_base, (((closure)  __glo_reverse_scheme_base)->fn),  &c_734348, r_731404);; 
}

static void __lambda_85(void *data, object self_733133, int argc, object *args) /* object self_733133, object r_731403 */
 {
 object r_731403 = args[0];
  
closureN_type c_734350;
object e_734371 [2];
c_734350.hdr.mark = gc_color_red;
 c_734350.hdr.grayed = 0;
c_734350.tag = closureN_tag;
 c_734350.fn = (function_type)__lambda_86;
c_734350.num_args = 1;
c_734350.num_elements = 2;
c_734350.elements = (object *)e_734371;
c_734350.elements[0] = ((closureN)self_733133)->elements[0];
c_734350.elements[1] = ((closureN)self_733133)->elements[1];

return_direct_with_clo3(data,  __glo_list_91index_scheme_cyclone_transforms, (((closure)  __glo_list_91index_scheme_cyclone_transforms)->fn),  &c_734350, obj_char2obj(46), r_731403);; 
}

static void __lambda_86(void *data, object self_733134, int argc, object *args) /* object self_733134, object pos_7372_73976 */
 {
 object pos_7372_73976 = args[0];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, pos_7372_73976, obj_int2obj(-1))) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733134)->elements[1], (((closure)  ((closureN)self_733134)->elements[1])->fn),  ((closureN)self_733134)->elements[0]);
} else { 
  
complex_num_type local_734364; 

complex_num_type local_734367; 



object c_734360 = Cyc_substring(data,  ((closureN)self_733134)->elements[1],((closureN)self_733134)->elements[0], obj_int2obj(0), Cyc_fast_sub(data,&local_734364, Cyc_fast_sub(data,&local_734367, Cyc_string_length(data, ((closureN)self_733134)->elements[0]), pos_7372_73976), obj_int2obj(1)));
return_direct_with_clo1(data,  ((closureN)self_733134)->elements[1], (((closure)  ((closureN)self_733134)->elements[1])->fn),  c_734360);}
;; 
}

static void __lambda_81(void *data, object _, int argc, object *args) /* closure _,object k_731393, object msg_7370_73974 */
 {
object k_731393 = args[0]; object msg_7370_73974 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:cyc:error");

closureN_type c_734338;
object e_734343 [1];
c_734338.hdr.mark = gc_color_red;
 c_734338.hdr.grayed = 0;
c_734338.tag = closureN_tag;
 c_734338.fn = (function_type)__lambda_82;
c_734338.num_args = 1;
c_734338.num_elements = 1;
c_734338.elements = (object *)e_734343;
c_734338.elements[0] = k_731393;

return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  &c_734338, msg_7370_73974);; 
}

static void __lambda_82(void *data, object self_733131, int argc, object *args) /* object self_733131, object r_731394 */
 {

  

return_direct_with_clo1(data,  ((closureN)self_733131)->elements[0], (((closure)  ((closureN)self_733131)->elements[0])->fn),  __halt(obj_int2obj(1)));; 
}

static void __lambda_80(void *data, object _, int argc, object *args) /* closure _,object k_731390, object msg_7369_73973 */
 {
object k_731390 = args[0]; object msg_7369_73973 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:trace:debug");

make_utf8_string_with_len(c_734335, "DEBUG: ", 7, 7);
return_direct_with_clo5(data,  __glo_trace_scheme_cyclone_transforms, (((closure)  __glo_trace_scheme_cyclone_transforms)->fn),  k_731390, obj_int2obj(4), msg_7369_73973, __glo_write_scheme_write, &c_734335);; 
}

static void __lambda_79(void *data, object _, int argc, object *args) /* closure _,object k_731387, object msg_7368_73972 */
 {
object k_731387 = args[0]; object msg_7368_73972 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:trace:info");

make_utf8_string_with_len(c_734332, "", 0, 0);
return_direct_with_clo5(data,  __glo_trace_scheme_cyclone_transforms, (((closure)  __glo_trace_scheme_cyclone_transforms)->fn),  k_731387, obj_int2obj(3), msg_7368_73972, __glo_pretty_91print_scheme_cyclone_pretty_91print, &c_734332);; 
}

static void __lambda_78(void *data, object _, int argc, object *args) /* closure _,object k_731384, object msg_7367_73971 */
 {
object k_731384 = args[0]; object msg_7367_73971 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:trace:warn");

make_utf8_string_with_len(c_734329, "", 0, 0);
return_direct_with_clo5(data,  __glo_trace_scheme_cyclone_transforms, (((closure)  __glo_trace_scheme_cyclone_transforms)->fn),  k_731384, obj_int2obj(2), msg_7367_73971, __glo_pretty_91print_scheme_cyclone_pretty_91print, &c_734329);; 
}

static void __lambda_77(void *data, object _, int argc, object *args) /* closure _,object k_731381, object msg_7366_73970 */
 {
object k_731381 = args[0]; object msg_7366_73970 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:trace:error");

make_utf8_string_with_len(c_734326, "", 0, 0);
return_direct_with_clo5(data,  __glo_trace_scheme_cyclone_transforms, (((closure)  __glo_trace_scheme_cyclone_transforms)->fn),  k_731381, obj_int2obj(1), msg_7366_73970, __glo_pretty_91print_scheme_cyclone_pretty_91print, &c_734326);; 
}

static void __lambda_71(void *data, object _, int argc, object *args) /* closure _,object k_731372, object level_7362_73966, object msg_7363_73967, object pp_7364_73968, object prefix_7365_73969 */
 {
object k_731372 = args[0]; object level_7362_73966 = args[1]; object msg_7363_73967 = args[2]; object pp_7364_73968 = args[3]; object prefix_7365_73969 = args[4];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:trace");
  
if( (boolean_f != Cyc_num_fast_gte_op(data, __glo__85trace_91level_85_scheme_cyclone_transforms, level_7362_73966)) ){ 
  
closureN_type c_734302;
object e_734321 [4];
c_734302.hdr.mark = gc_color_red;
 c_734302.hdr.grayed = 0;
c_734302.tag = closureN_tag;
 c_734302.fn = (function_type)__lambda_72;
c_734302.num_args = 1;
c_734302.num_elements = 4;
c_734302.elements = (object *)e_734321;
c_734302.elements[0] = k_731372;
c_734302.elements[1] = msg_7363_73967;
c_734302.elements[2] = pp_7364_73968;
c_734302.elements[3] = prefix_7365_73969;


make_utf8_string_with_len(c_734322, "/* ", 3, 3);
return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  &c_734302, &c_734322);
} else { 
  return_direct_with_clo1(data,  k_731372, (((closure)  k_731372)->fn),  Cyc_VOID);}
;; 
}

static void __lambda_72(void *data, object self_733126, int argc, object *args) /* object self_733126, object r_731374 */
 {

  
closureN_type c_734304;
object e_734320 [4];
c_734304.hdr.mark = gc_color_red;
 c_734304.hdr.grayed = 0;
c_734304.tag = closureN_tag;
 c_734304.fn = (function_type)__lambda_73;
c_734304.num_args = 1;
c_734304.num_elements = 4;
c_734304.elements = (object *)e_734320;
c_734304.elements[0] = ((closureN)self_733126)->elements[0];
c_734304.elements[1] = ((closureN)self_733126)->elements[1];
c_734304.elements[2] = ((closureN)self_733126)->elements[2];
c_734304.elements[3] = ((closureN)self_733126)->elements[3];

return_direct_with_clo1(data,  __glo_newline_scheme_base, (((closure)  __glo_newline_scheme_base)->fn),  &c_734304);; 
}

static void __lambda_73(void *data, object self_733127, int argc, object *args) /* object self_733127, object r_731375 */
 {

  
closureN_type c_734306;
object e_734318 [3];
c_734306.hdr.mark = gc_color_red;
 c_734306.hdr.grayed = 0;
c_734306.tag = closureN_tag;
 c_734306.fn = (function_type)__lambda_74;
c_734306.num_args = 1;
c_734306.num_elements = 3;
c_734306.elements = (object *)e_734318;
c_734306.elements[0] = ((closureN)self_733127)->elements[0];
c_734306.elements[1] = ((closureN)self_733127)->elements[1];
c_734306.elements[2] = ((closureN)self_733127)->elements[2];

return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  &c_734306, ((closureN)self_733127)->elements[3]);; 
}

static void __lambda_74(void *data, object self_733128, int argc, object *args) /* object self_733128, object r_731376 */
 {

  
closureN_type c_734309;
object e_734316 [1];
c_734309.hdr.mark = gc_color_red;
 c_734309.hdr.grayed = 0;
c_734309.tag = closureN_tag;
 c_734309.fn = (function_type)__lambda_75;
c_734309.num_args = 1;
c_734309.num_elements = 1;
c_734309.elements = (object *)e_734316;
c_734309.elements[0] = ((closureN)self_733128)->elements[0];

return_closcall2(data,  ((closureN)self_733128)->elements[2],  &c_734309, ((closureN)self_733128)->elements[1]);; 
}

static void __lambda_75(void *data, object self_733129, int argc, object *args) /* object self_733129, object r_731377 */
 {

  
closureN_type c_734311;
object e_734314 [1];
c_734311.hdr.mark = gc_color_red;
 c_734311.hdr.grayed = 0;
c_734311.tag = closureN_tag;
 c_734311.fn = (function_type)__lambda_76;
c_734311.num_args = 1;
c_734311.num_elements = 1;
c_734311.elements = (object *)e_734314;
c_734311.elements[0] = ((closureN)self_733129)->elements[0];


make_utf8_string_with_len(c_734315, " */", 3, 3);
return_direct_with_clo2(data,  __glo_display_scheme_write, (((closure)  __glo_display_scheme_write)->fn),  &c_734311, &c_734315);; 
}

static void __lambda_76(void *data, object self_733130, int argc, object *args) /* object self_733130, object r_731378 */
 {

  return_direct_with_clo1(data,  __glo_newline_scheme_base, (((closure)  __glo_newline_scheme_base)->fn),  ((closureN)self_733130)->elements[0]);; 
}

static void __lambda_70(void *data, object _, int argc, object *args) /* closure _,object k_731365 */
 {
object k_731365 = args[0];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:built-in-syms");

make_pair(c_734297,quote_define,NULL);c_734297.hdr.immutable = 1;

make_pair(c_734296,quote_call_95cc,&c_734297);c_734296.hdr.immutable = 1;
return_direct_with_clo1(data,  k_731365, (((closure)  k_731365)->fn),  &c_734296);; 
}

static void __lambda_1(void *data, object _, int argc, object *args) /* closure _,object k_731272, object exp_731_73928 */
 {
object k_731272 = args[0]; object exp_731_73928 = args[1];
  Cyc_st_add(data, "scheme/cyclone/transforms.sld:validate-keyword-syntax");

closureN_type c_733790;
object e_734293 [2];
c_733790.hdr.mark = gc_color_red;
 c_733790.hdr.grayed = 0;
c_733790.tag = closureN_tag;
 c_733790.fn = (function_type)__lambda_2;
c_733790.num_args = 7;
c_733790.num_elements = 2;
c_733790.elements = (object *)e_734293;
c_733790.elements[0] = exp_731_73928;
c_733790.elements[1] = k_731272;

return_direct_with_clo7(data,(closure)&c_733790,__lambda_2,  boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_2(void *data, object self_733051, int argc, object *args) /* object self_733051, object check_91define_73936, object check_91if_73937, object check_91lambda_73938, object check_91set_73939, object include_91var_127_73940, object search_73941, object update_91vars_73942 */
 {
 object check_91define_73936 = args[0]; object check_91if_73937 = args[1]; object check_91lambda_73938 = args[2]; object check_91set_73939 = args[3]; object include_91var_127_73940 = args[4]; object search_73941 = args[5]; object update_91vars_73942 = args[6];
  
closureN_type c_733792;
object e_734289 [8];
c_733792.hdr.mark = gc_color_red;
 c_733792.hdr.grayed = 0;
c_733792.tag = closureN_tag;
 c_733792.fn = (function_type)__lambda_785;
c_733792.num_args = 1;
c_733792.num_elements = 8;
c_733792.elements = (object *)e_734289;
c_733792.elements[0] = check_91if_73937;
c_733792.elements[1] = check_91lambda_73938;
c_733792.elements[2] = check_91set_73939;
c_733792.elements[3] = ((closureN)self_733051)->elements[0];
c_733792.elements[4] = include_91var_127_73940;
c_733792.elements[5] = ((closureN)self_733051)->elements[1];
c_733792.elements[6] = search_73941;
c_733792.elements[7] = update_91vars_73942;


pair_type local_734292; 
return_direct_with_clo1(data,(closure)&c_733792,__lambda_785,  set_cell_as_expr(&local_734292, check_91define_73936));; 
}

static void __lambda_785(void *data, object self_733052, int argc, object *args) /* object self_733052, object check_91define_73936 */
 {
 object check_91define_73936 = args[0];
  
closureN_type c_733794;
object e_734284 [8];
c_733794.hdr.mark = gc_color_red;
 c_733794.hdr.grayed = 0;
c_733794.tag = closureN_tag;
 c_733794.fn = (function_type)__lambda_784;
c_733794.num_args = 1;
c_733794.num_elements = 8;
c_733794.elements = (object *)e_734284;
c_733794.elements[0] = check_91define_73936;
c_733794.elements[1] = ((closureN)self_733052)->elements[1];
c_733794.elements[2] = ((closureN)self_733052)->elements[2];
c_733794.elements[3] = ((closureN)self_733052)->elements[3];
c_733794.elements[4] = ((closureN)self_733052)->elements[4];
c_733794.elements[5] = ((closureN)self_733052)->elements[5];
c_733794.elements[6] = ((closureN)self_733052)->elements[6];
c_733794.elements[7] = ((closureN)self_733052)->elements[7];


pair_type local_734287; 
return_direct_with_clo1(data,(closure)&c_733794,__lambda_784,  set_cell_as_expr(&local_734287, ((closureN)self_733052)->elements[0]));; 
}

static void __lambda_784(void *data, object self_733053, int argc, object *args) /* object self_733053, object check_91if_73937 */
 {
 object check_91if_73937 = args[0];
  
closureN_type c_733796;
object e_734279 [8];
c_733796.hdr.mark = gc_color_red;
 c_733796.hdr.grayed = 0;
c_733796.tag = closureN_tag;
 c_733796.fn = (function_type)__lambda_783;
c_733796.num_args = 1;
c_733796.num_elements = 8;
c_733796.elements = (object *)e_734279;
c_733796.elements[0] = ((closureN)self_733053)->elements[0];
c_733796.elements[1] = check_91if_73937;
c_733796.elements[2] = ((closureN)self_733053)->elements[2];
c_733796.elements[3] = ((closureN)self_733053)->elements[3];
c_733796.elements[4] = ((closureN)self_733053)->elements[4];
c_733796.elements[5] = ((closureN)self_733053)->elements[5];
c_733796.elements[6] = ((closureN)self_733053)->elements[6];
c_733796.elements[7] = ((closureN)self_733053)->elements[7];


pair_type local_734282; 
return_direct_with_clo1(data,(closure)&c_733796,__lambda_783,  set_cell_as_expr(&local_734282, ((closureN)self_733053)->elements[1]));; 
}

static void __lambda_783(void *data, object self_733054, int argc, object *args) /* object self_733054, object check_91lambda_73938 */
 {
 object check_91lambda_73938 = args[0];
  
closureN_type c_733798;
object e_734274 [8];
c_733798.hdr.mark = gc_color_red;
 c_733798.hdr.grayed = 0;
c_733798.tag = closureN_tag;
 c_733798.fn = (function_type)__lambda_782;
c_733798.num_args = 1;
c_733798.num_elements = 8;
c_733798.elements = (object *)e_734274;
c_733798.elements[0] = ((closureN)self_733054)->elements[0];
c_733798.elements[1] = ((closureN)self_733054)->elements[1];
c_733798.elements[2] = check_91lambda_73938;
c_733798.elements[3] = ((closureN)self_733054)->elements[3];
c_733798.elements[4] = ((closureN)self_733054)->elements[4];
c_733798.elements[5] = ((closureN)self_733054)->elements[5];
c_733798.elements[6] = ((closureN)self_733054)->elements[6];
c_733798.elements[7] = ((closureN)self_733054)->elements[7];


pair_type local_734277; 
return_direct_with_clo1(data,(closure)&c_733798,__lambda_782,  set_cell_as_expr(&local_734277, ((closureN)self_733054)->elements[2]));; 
}

static void __lambda_782(void *data, object self_733055, int argc, object *args) /* object self_733055, object check_91set_73939 */
 {
 object check_91set_73939 = args[0];
  
closureN_type c_733800;
object e_734269 [8];
c_733800.hdr.mark = gc_color_red;
 c_733800.hdr.grayed = 0;
c_733800.tag = closureN_tag;
 c_733800.fn = (function_type)__lambda_781;
c_733800.num_args = 1;
c_733800.num_elements = 8;
c_733800.elements = (object *)e_734269;
c_733800.elements[0] = ((closureN)self_733055)->elements[0];
c_733800.elements[1] = ((closureN)self_733055)->elements[1];
c_733800.elements[2] = ((closureN)self_733055)->elements[2];
c_733800.elements[3] = check_91set_73939;
c_733800.elements[4] = ((closureN)self_733055)->elements[3];
c_733800.elements[5] = ((closureN)self_733055)->elements[5];
c_733800.elements[6] = ((closureN)self_733055)->elements[6];
c_733800.elements[7] = ((closureN)self_733055)->elements[7];


pair_type local_734272; 
return_direct_with_clo1(data,(closure)&c_733800,__lambda_781,  set_cell_as_expr(&local_734272, ((closureN)self_733055)->elements[4]));; 
}

static void __lambda_781(void *data, object self_733056, int argc, object *args) /* object self_733056, object include_91var_127_73940 */
 {
 object include_91var_127_73940 = args[0];
  
closureN_type c_733802;
object e_734264 [8];
c_733802.hdr.mark = gc_color_red;
 c_733802.hdr.grayed = 0;
c_733802.tag = closureN_tag;
 c_733802.fn = (function_type)__lambda_780;
c_733802.num_args = 1;
c_733802.num_elements = 8;
c_733802.elements = (object *)e_734264;
c_733802.elements[0] = ((closureN)self_733056)->elements[0];
c_733802.elements[1] = ((closureN)self_733056)->elements[1];
c_733802.elements[2] = ((closureN)self_733056)->elements[2];
c_733802.elements[3] = ((closureN)self_733056)->elements[3];
c_733802.elements[4] = ((closureN)self_733056)->elements[4];
c_733802.elements[5] = include_91var_127_73940;
c_733802.elements[6] = ((closureN)self_733056)->elements[5];
c_733802.elements[7] = ((closureN)self_733056)->elements[7];


pair_type local_734267; 
return_direct_with_clo1(data,(closure)&c_733802,__lambda_780,  set_cell_as_expr(&local_734267, ((closureN)self_733056)->elements[6]));; 
}

static void __lambda_780(void *data, object self_733057, int argc, object *args) /* object self_733057, object search_73941 */
 {
 object search_73941 = args[0];
  
closureN_type c_733804;
object e_734259 [8];
c_733804.hdr.mark = gc_color_red;
 c_733804.hdr.grayed = 0;
c_733804.tag = closureN_tag;
 c_733804.fn = (function_type)__lambda_779;
c_733804.num_args = 1;
c_733804.num_elements = 8;
c_733804.elements = (object *)e_734259;
c_733804.elements[0] = ((closureN)self_733057)->elements[0];
c_733804.elements[1] = ((closureN)self_733057)->elements[1];
c_733804.elements[2] = ((closureN)self_733057)->elements[2];
c_733804.elements[3] = ((closureN)self_733057)->elements[3];
c_733804.elements[4] = ((closureN)self_733057)->elements[4];
c_733804.elements[5] = ((closureN)self_733057)->elements[5];
c_733804.elements[6] = ((closureN)self_733057)->elements[6];
c_733804.elements[7] = search_73941;


pair_type local_734262; 
return_direct_with_clo1(data,(closure)&c_733804,__lambda_779,  set_cell_as_expr(&local_734262, ((closureN)self_733057)->elements[7]));; 
}

static void __lambda_779(void *data, object self_733058, int argc, object *args) /* object self_733058, object update_91vars_73942 */
 {
 object update_91vars_73942 = args[0];
  
closureN_type c_733806;
object e_734249 [9];
c_733806.hdr.mark = gc_color_red;
 c_733806.hdr.grayed = 0;
c_733806.tag = closureN_tag;
 c_733806.fn = (function_type)__lambda_3;
c_733806.num_args = 1;
c_733806.num_elements = 9;
c_733806.elements = (object *)e_734249;
c_733806.elements[0] = ((closureN)self_733058)->elements[0];
c_733806.elements[1] = ((closureN)self_733058)->elements[1];
c_733806.elements[2] = ((closureN)self_733058)->elements[2];
c_733806.elements[3] = ((closureN)self_733058)->elements[3];
c_733806.elements[4] = ((closureN)self_733058)->elements[4];
c_733806.elements[5] = ((closureN)self_733058)->elements[5];
c_733806.elements[6] = ((closureN)self_733058)->elements[6];
c_733806.elements[7] = ((closureN)self_733058)->elements[7];
c_733806.elements[8] = update_91vars_73942;


mclosure0(c_734250, (function_type)__lambda_69);c_734250.num_args = 1;
return_direct_with_clo1(data,(closure)&c_733806,__lambda_3,  &c_734250);; 
}

static void __lambda_69(void *data, object self_733059, int argc, object *args) /* object self_733059, object k_731361, object v_732_73950 */
 {
 object k_731361 = args[0]; object v_732_73950 = args[1];
  


make_pair(c_734258,quote_let,NULL);c_734258.hdr.immutable = 1;

make_pair(c_734257,quote_lambda,&c_734258);c_734257.hdr.immutable = 1;

make_pair(c_734256,quote__if,&c_734257);c_734256.hdr.immutable = 1;

make_pair(c_734255,quote_set_67,&c_734256);c_734255.hdr.immutable = 1;

make_pair(c_734254,quote_define,&c_734255);c_734254.hdr.immutable = 1;
return_direct_with_clo1(data,  k_731361, (((closure)  k_731361)->fn),  memberp(data, v_732_73950, &c_734254));; 
}

static void __lambda_3(void *data, object self_733060, int argc, object *args) /* object self_733060, object r_731360 */
 {
 object r_731360 = args[0];
  
closureN_type c_733808;
object e_734245 [9];
c_733808.hdr.mark = gc_color_red;
 c_733808.hdr.grayed = 0;
c_733808.tag = closureN_tag;
 c_733808.fn = (function_type)__lambda_4;
c_733808.num_args = 1;
c_733808.num_elements = 9;
c_733808.elements = (object *)e_734245;
c_733808.elements[0] = ((closureN)self_733060)->elements[0];
c_733808.elements[1] = ((closureN)self_733060)->elements[1];
c_733808.elements[2] = ((closureN)self_733060)->elements[2];
c_733808.elements[3] = ((closureN)self_733060)->elements[3];
c_733808.elements[4] = ((closureN)self_733060)->elements[4];
c_733808.elements[5] = ((closureN)self_733060)->elements[5];
c_733808.elements[6] = ((closureN)self_733060)->elements[6];
c_733808.elements[7] = ((closureN)self_733060)->elements[7];
c_733808.elements[8] = ((closureN)self_733060)->elements[8];



return_direct_with_clo1(data,(closure)&c_733808,__lambda_4,  Cyc_set_cell(data, ((closureN)self_733060)->elements[5], r_731360));; 
}

static void __lambda_4(void *data, object self_733061, int argc, object *args) /* object self_733061, object r_731273 */
 {

  
closureN_type c_733810;
object e_734224 [9];
c_733810.hdr.mark = gc_color_red;
 c_733810.hdr.grayed = 0;
c_733810.tag = closureN_tag;
 c_733810.fn = (function_type)__lambda_5;
c_733810.num_args = 1;
c_733810.num_elements = 9;
c_733810.elements = (object *)e_734224;
c_733810.elements[0] = ((closureN)self_733061)->elements[0];
c_733810.elements[1] = ((closureN)self_733061)->elements[1];
c_733810.elements[2] = ((closureN)self_733061)->elements[2];
c_733810.elements[3] = ((closureN)self_733061)->elements[3];
c_733810.elements[4] = ((closureN)self_733061)->elements[4];
c_733810.elements[5] = ((closureN)self_733061)->elements[5];
c_733810.elements[6] = ((closureN)self_733061)->elements[6];
c_733810.elements[7] = ((closureN)self_733061)->elements[7];
c_733810.elements[8] = ((closureN)self_733061)->elements[8];


mclosure0(c_734225, (function_type)__lambda_67);c_734225.num_args = 1;
return_direct_with_clo1(data,(closure)&c_733810,__lambda_5,  &c_734225);; 
}

static void __lambda_67(void *data, object self_733062, int argc, object *args) /* object self_733062, object k_731356, object exp_733_73951 */
 {
 object k_731356 = args[0]; object exp_733_73951 = args[1];
  
closureN_type c_734227;
object e_734242 [2];
c_734227.hdr.mark = gc_color_red;
 c_734227.hdr.grayed = 0;
c_734227.tag = closureN_tag;
 c_734227.fn = (function_type)__lambda_68;
c_734227.num_args = 1;
c_734227.num_elements = 2;
c_734227.elements = (object *)e_734242;
c_734227.elements[0] = exp_733_73951;
c_734227.elements[1] = k_731356;



return_direct_with_clo1(data,(closure)&c_734227,__lambda_68,  Cyc_length(data, exp_733_73951));; 
}

static void __lambda_68(void *data, object self_733063, int argc, object *args) /* object self_733063, object args_734_73952 */
 {
 object args_734_73952 = args[0];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, args_734_73952, obj_int2obj(3))) ){ 
  
make_utf8_string_with_len(c_734232, "Not enough arguments", 20, 20);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_733063)->elements[1], &c_734232, ((closureN)self_733063)->elements[0]);
} else { 
    
if( (boolean_f != Cyc_num_fast_gt_op(data, args_734_73952, obj_int2obj(4))) ){ 
  
make_utf8_string_with_len(c_734238, "Too many arguments", 18, 18);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_733063)->elements[1], &c_734238, ((closureN)self_733063)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733063)->elements[1], (((closure)  ((closureN)self_733063)->elements[1])->fn),  boolean_f);}
;}
;; 
}

static void __lambda_5(void *data, object self_733064, int argc, object *args) /* object self_733064, object r_731355 */
 {
 object r_731355 = args[0];
  
closureN_type c_733812;
object e_734220 [9];
c_733812.hdr.mark = gc_color_red;
 c_733812.hdr.grayed = 0;
c_733812.tag = closureN_tag;
 c_733812.fn = (function_type)__lambda_6;
c_733812.num_args = 1;
c_733812.num_elements = 9;
c_733812.elements = (object *)e_734220;
c_733812.elements[0] = ((closureN)self_733064)->elements[0];
c_733812.elements[1] = ((closureN)self_733064)->elements[1];
c_733812.elements[2] = ((closureN)self_733064)->elements[2];
c_733812.elements[3] = ((closureN)self_733064)->elements[3];
c_733812.elements[4] = ((closureN)self_733064)->elements[4];
c_733812.elements[5] = ((closureN)self_733064)->elements[5];
c_733812.elements[6] = ((closureN)self_733064)->elements[6];
c_733812.elements[7] = ((closureN)self_733064)->elements[7];
c_733812.elements[8] = ((closureN)self_733064)->elements[8];



return_direct_with_clo1(data,(closure)&c_733812,__lambda_6,  Cyc_set_cell(data, ((closureN)self_733064)->elements[1], r_731355));; 
}

static void __lambda_6(void *data, object self_733065, int argc, object *args) /* object self_733065, object r_731274 */
 {

  
closureN_type c_733814;
object e_734205 [9];
c_733814.hdr.mark = gc_color_red;
 c_733814.hdr.grayed = 0;
c_733814.tag = closureN_tag;
 c_733814.fn = (function_type)__lambda_7;
c_733814.num_args = 1;
c_733814.num_elements = 9;
c_733814.elements = (object *)e_734205;
c_733814.elements[0] = ((closureN)self_733065)->elements[0];
c_733814.elements[1] = ((closureN)self_733065)->elements[1];
c_733814.elements[2] = ((closureN)self_733065)->elements[2];
c_733814.elements[3] = ((closureN)self_733065)->elements[3];
c_733814.elements[4] = ((closureN)self_733065)->elements[4];
c_733814.elements[5] = ((closureN)self_733065)->elements[5];
c_733814.elements[6] = ((closureN)self_733065)->elements[6];
c_733814.elements[7] = ((closureN)self_733065)->elements[7];
c_733814.elements[8] = ((closureN)self_733065)->elements[8];


mclosure0(c_734206, (function_type)__lambda_65);c_734206.num_args = 1;
return_direct_with_clo1(data,(closure)&c_733814,__lambda_7,  &c_734206);; 
}

static void __lambda_65(void *data, object self_733066, int argc, object *args) /* object self_733066, object k_731352, object exp_7311_73953 */
 {
 object k_731352 = args[0]; object exp_7311_73953 = args[1];
  
closureN_type c_734208;
object e_734217 [2];
c_734208.hdr.mark = gc_color_red;
 c_734208.hdr.grayed = 0;
c_734208.tag = closureN_tag;
 c_734208.fn = (function_type)__lambda_66;
c_734208.num_args = 1;
c_734208.num_elements = 2;
c_734208.elements = (object *)e_734217;
c_734208.elements[0] = exp_7311_73953;
c_734208.elements[1] = k_731352;



return_direct_with_clo1(data,(closure)&c_734208,__lambda_66,  Cyc_length(data, exp_7311_73953));; 
}

static void __lambda_66(void *data, object self_733067, int argc, object *args) /* object self_733067, object args_7312_73954 */
 {
 object args_7312_73954 = args[0];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, args_7312_73954, obj_int2obj(2))) ){ 
  
make_utf8_string_with_len(c_734213, "Not enough arguments", 20, 20);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_733067)->elements[1], &c_734213, ((closureN)self_733067)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733067)->elements[1], (((closure)  ((closureN)self_733067)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_7(void *data, object self_733068, int argc, object *args) /* object self_733068, object r_731351 */
 {
 object r_731351 = args[0];
  
closureN_type c_733816;
object e_734201 [9];
c_733816.hdr.mark = gc_color_red;
 c_733816.hdr.grayed = 0;
c_733816.tag = closureN_tag;
 c_733816.fn = (function_type)__lambda_8;
c_733816.num_args = 1;
c_733816.num_elements = 9;
c_733816.elements = (object *)e_734201;
c_733816.elements[0] = ((closureN)self_733068)->elements[0];
c_733816.elements[1] = ((closureN)self_733068)->elements[1];
c_733816.elements[2] = ((closureN)self_733068)->elements[2];
c_733816.elements[3] = ((closureN)self_733068)->elements[3];
c_733816.elements[4] = ((closureN)self_733068)->elements[4];
c_733816.elements[5] = ((closureN)self_733068)->elements[5];
c_733816.elements[6] = ((closureN)self_733068)->elements[6];
c_733816.elements[7] = ((closureN)self_733068)->elements[7];
c_733816.elements[8] = ((closureN)self_733068)->elements[8];



return_direct_with_clo1(data,(closure)&c_733816,__lambda_8,  Cyc_set_cell(data, ((closureN)self_733068)->elements[0], r_731351));; 
}

static void __lambda_8(void *data, object self_733069, int argc, object *args) /* object self_733069, object r_731275 */
 {

  
closureN_type c_733818;
object e_734186 [9];
c_733818.hdr.mark = gc_color_red;
 c_733818.hdr.grayed = 0;
c_733818.tag = closureN_tag;
 c_733818.fn = (function_type)__lambda_9;
c_733818.num_args = 1;
c_733818.num_elements = 9;
c_733818.elements = (object *)e_734186;
c_733818.elements[0] = ((closureN)self_733069)->elements[0];
c_733818.elements[1] = ((closureN)self_733069)->elements[1];
c_733818.elements[2] = ((closureN)self_733069)->elements[2];
c_733818.elements[3] = ((closureN)self_733069)->elements[3];
c_733818.elements[4] = ((closureN)self_733069)->elements[4];
c_733818.elements[5] = ((closureN)self_733069)->elements[5];
c_733818.elements[6] = ((closureN)self_733069)->elements[6];
c_733818.elements[7] = ((closureN)self_733069)->elements[7];
c_733818.elements[8] = ((closureN)self_733069)->elements[8];


mclosure0(c_734187, (function_type)__lambda_63);c_734187.num_args = 1;
return_direct_with_clo1(data,(closure)&c_733818,__lambda_9,  &c_734187);; 
}

static void __lambda_63(void *data, object self_733070, int argc, object *args) /* object self_733070, object k_731348, object exp_7316_73955 */
 {
 object k_731348 = args[0]; object exp_7316_73955 = args[1];
  
closureN_type c_734189;
object e_734198 [2];
c_734189.hdr.mark = gc_color_red;
 c_734189.hdr.grayed = 0;
c_734189.tag = closureN_tag;
 c_734189.fn = (function_type)__lambda_64;
c_734189.num_args = 1;
c_734189.num_elements = 2;
c_734189.elements = (object *)e_734198;
c_734189.elements[0] = exp_7316_73955;
c_734189.elements[1] = k_731348;



return_direct_with_clo1(data,(closure)&c_734189,__lambda_64,  Cyc_length(data, exp_7316_73955));; 
}

static void __lambda_64(void *data, object self_733071, int argc, object *args) /* object self_733071, object args_7317_73956 */
 {
 object args_7317_73956 = args[0];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, args_7317_73956, obj_int2obj(2))) ){ 
  
make_utf8_string_with_len(c_734194, "Not enough arguments", 20, 20);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_733071)->elements[1], &c_734194, ((closureN)self_733071)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733071)->elements[1], (((closure)  ((closureN)self_733071)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_9(void *data, object self_733072, int argc, object *args) /* object self_733072, object r_731347 */
 {
 object r_731347 = args[0];
  
closureN_type c_733820;
object e_734182 [9];
c_733820.hdr.mark = gc_color_red;
 c_733820.hdr.grayed = 0;
c_733820.tag = closureN_tag;
 c_733820.fn = (function_type)__lambda_10;
c_733820.num_args = 1;
c_733820.num_elements = 9;
c_733820.elements = (object *)e_734182;
c_733820.elements[0] = ((closureN)self_733072)->elements[0];
c_733820.elements[1] = ((closureN)self_733072)->elements[1];
c_733820.elements[2] = ((closureN)self_733072)->elements[2];
c_733820.elements[3] = ((closureN)self_733072)->elements[3];
c_733820.elements[4] = ((closureN)self_733072)->elements[4];
c_733820.elements[5] = ((closureN)self_733072)->elements[5];
c_733820.elements[6] = ((closureN)self_733072)->elements[6];
c_733820.elements[7] = ((closureN)self_733072)->elements[7];
c_733820.elements[8] = ((closureN)self_733072)->elements[8];



return_direct_with_clo1(data,(closure)&c_733820,__lambda_10,  Cyc_set_cell(data, ((closureN)self_733072)->elements[3], r_731347));; 
}

static void __lambda_10(void *data, object self_733073, int argc, object *args) /* object self_733073, object r_731276 */
 {

  
closureN_type c_733822;
object e_734160 [9];
c_733822.hdr.mark = gc_color_red;
 c_733822.hdr.grayed = 0;
c_733822.tag = closureN_tag;
 c_733822.fn = (function_type)__lambda_11;
c_733822.num_args = 1;
c_733822.num_elements = 9;
c_733822.elements = (object *)e_734160;
c_733822.elements[0] = ((closureN)self_733073)->elements[0];
c_733822.elements[1] = ((closureN)self_733073)->elements[1];
c_733822.elements[2] = ((closureN)self_733073)->elements[2];
c_733822.elements[3] = ((closureN)self_733073)->elements[3];
c_733822.elements[4] = ((closureN)self_733073)->elements[4];
c_733822.elements[5] = ((closureN)self_733073)->elements[5];
c_733822.elements[6] = ((closureN)self_733073)->elements[6];
c_733822.elements[7] = ((closureN)self_733073)->elements[7];
c_733822.elements[8] = ((closureN)self_733073)->elements[8];


mclosure0(c_734161, (function_type)__lambda_59);c_734161.num_args = 1;
return_direct_with_clo1(data,(closure)&c_733822,__lambda_11,  &c_734161);; 
}

static void __lambda_59(void *data, object self_733074, int argc, object *args) /* object self_733074, object k_731342, object exp_7321_73957 */
 {
 object k_731342 = args[0]; object exp_7321_73957 = args[1];
  
closureN_type c_734163;
object e_734179 [2];
c_734163.hdr.mark = gc_color_red;
 c_734163.hdr.grayed = 0;
c_734163.tag = closureN_tag;
 c_734163.fn = (function_type)__lambda_60;
c_734163.num_args = 1;
c_734163.num_elements = 2;
c_734163.elements = (object *)e_734179;
c_734163.elements[0] = exp_7321_73957;
c_734163.elements[1] = k_731342;



return_direct_with_clo1(data,(closure)&c_734163,__lambda_60,  Cyc_length(data, exp_7321_73957));; 
}

static void __lambda_60(void *data, object self_733075, int argc, object *args) /* object self_733075, object num_91args_7322_73958 */
 {
 object num_91args_7322_73958 = args[0];
  
closureN_type c_734165;
object e_734173 [2];
c_734165.hdr.mark = gc_color_red;
 c_734165.hdr.grayed = 0;
c_734165.tag = closureN_tag;
 c_734165.fn = (function_type)__lambda_61;
c_734165.num_args = 0;
c_734165.num_elements = 2;
c_734165.elements = (object *)e_734173;
c_734165.elements[0] = ((closureN)self_733075)->elements[0];
c_734165.elements[1] = num_91args_7322_73958;


closureN_type c_734174;
object e_734178 [2];
c_734174.hdr.mark = gc_color_red;
 c_734174.hdr.grayed = 0;
c_734174.tag = closureN_tag;
 c_734174.fn = (function_type)__lambda_62;
c_734174.num_args = 1;
c_734174.num_elements = 2;
c_734174.elements = (object *)e_734178;
c_734174.elements[0] = ((closureN)self_733075)->elements[0];
c_734174.elements[1] = ((closureN)self_733075)->elements[1];

return_direct_with_clo1(data,(closure)&c_734165,__lambda_61,  &c_734174);; 
}

static void __lambda_62(void *data, object self_733076, int argc, object *args) /* object self_733076, object r_731343 */
 {

  return_direct_with_clo2(data,  __glo_lambda_91formals_91type_scheme_cyclone_util, (((closure)  __glo_lambda_91formals_91type_scheme_cyclone_util)->fn),  ((closureN)self_733076)->elements[1], ((closureN)self_733076)->elements[0]);; 
}

static void __lambda_61(void *data, object self_733077, int argc, object *args) /* object self_733077, object k_731345 */
 {
 object k_731345 = args[0];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_733077)->elements[1], obj_int2obj(2))) ){ 
  
make_utf8_string_with_len(c_734170, "Not enough arguments", 20, 20);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_731345, &c_734170, ((closureN)self_733077)->elements[0]);
} else { 
  return_direct_with_clo1(data,  k_731345, (((closure)  k_731345)->fn),  boolean_f);}
;; 
}

static void __lambda_11(void *data, object self_733078, int argc, object *args) /* object self_733078, object r_731341 */
 {
 object r_731341 = args[0];
  
closureN_type c_733824;
object e_734156 [9];
c_733824.hdr.mark = gc_color_red;
 c_733824.hdr.grayed = 0;
c_733824.tag = closureN_tag;
 c_733824.fn = (function_type)__lambda_12;
c_733824.num_args = 1;
c_733824.num_elements = 9;
c_733824.elements = (object *)e_734156;
c_733824.elements[0] = ((closureN)self_733078)->elements[0];
c_733824.elements[1] = ((closureN)self_733078)->elements[1];
c_733824.elements[2] = ((closureN)self_733078)->elements[2];
c_733824.elements[3] = ((closureN)self_733078)->elements[3];
c_733824.elements[4] = ((closureN)self_733078)->elements[4];
c_733824.elements[5] = ((closureN)self_733078)->elements[5];
c_733824.elements[6] = ((closureN)self_733078)->elements[6];
c_733824.elements[7] = ((closureN)self_733078)->elements[7];
c_733824.elements[8] = ((closureN)self_733078)->elements[8];



return_direct_with_clo1(data,(closure)&c_733824,__lambda_12,  Cyc_set_cell(data, ((closureN)self_733078)->elements[2], r_731341));; 
}

static void __lambda_12(void *data, object self_733079, int argc, object *args) /* object self_733079, object r_731277 */
 {

  
closureN_type c_733826;
object e_734144 [8];
c_733826.hdr.mark = gc_color_red;
 c_733826.hdr.grayed = 0;
c_733826.tag = closureN_tag;
 c_733826.fn = (function_type)__lambda_13;
c_733826.num_args = 1;
c_733826.num_elements = 8;
c_733826.elements = (object *)e_734144;
c_733826.elements[0] = ((closureN)self_733079)->elements[0];
c_733826.elements[1] = ((closureN)self_733079)->elements[1];
c_733826.elements[2] = ((closureN)self_733079)->elements[2];
c_733826.elements[3] = ((closureN)self_733079)->elements[3];
c_733826.elements[4] = ((closureN)self_733079)->elements[4];
c_733826.elements[5] = ((closureN)self_733079)->elements[6];
c_733826.elements[6] = ((closureN)self_733079)->elements[7];
c_733826.elements[7] = ((closureN)self_733079)->elements[8];


closureN_type c_734145;
object e_734155 [1];
c_734145.hdr.mark = gc_color_red;
 c_734145.hdr.grayed = 0;
c_734145.tag = closureN_tag;
 c_734145.fn = (function_type)__lambda_57;
c_734145.num_args = 2;
c_734145.num_elements = 1;
c_734145.elements = (object *)e_734155;
c_734145.elements[0] = ((closureN)self_733079)->elements[5];

return_direct_with_clo1(data,(closure)&c_733826,__lambda_13,  &c_734145);; 
}

static void __lambda_57(void *data, object self_733080, int argc, object *args) /* object self_733080, object k_731339, object syms_7326_73959, object vars_7327_73960 */
 {
 object k_731339 = args[0]; object syms_7326_73959 = args[1]; object vars_7327_73960 = args[2];
  
closureN_type c_734147;
object e_734151 [2];
c_734147.hdr.mark = gc_color_red;
 c_734147.hdr.grayed = 0;
c_734147.tag = closureN_tag;
 c_734147.fn = (function_type)__lambda_58;
c_734147.num_args = 1;
c_734147.num_elements = 2;
c_734147.elements = (object *)e_734151;
c_734147.elements[0] = k_731339;
c_734147.elements[1] = vars_7327_73960;



return_direct_with_clo3(data,  __glo_filter_scheme_cyclone_util, (((closure)  __glo_filter_scheme_cyclone_util)->fn),  &c_734147, car(((closureN)self_733080)->elements[0]), syms_7326_73959);; 
}

static void __lambda_58(void *data, object self_733081, int argc, object *args) /* object self_733081, object r_731340 */
 {
 object r_731340 = args[0];
  return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  ((closureN)self_733081)->elements[0], ((closureN)self_733081)->elements[1], r_731340);; 
}

static void __lambda_13(void *data, object self_733082, int argc, object *args) /* object self_733082, object r_731338 */
 {
 object r_731338 = args[0];
  
closureN_type c_733828;
object e_734140 [8];
c_733828.hdr.mark = gc_color_red;
 c_733828.hdr.grayed = 0;
c_733828.tag = closureN_tag;
 c_733828.fn = (function_type)__lambda_14;
c_733828.num_args = 1;
c_733828.num_elements = 8;
c_733828.elements = (object *)e_734140;
c_733828.elements[0] = ((closureN)self_733082)->elements[0];
c_733828.elements[1] = ((closureN)self_733082)->elements[1];
c_733828.elements[2] = ((closureN)self_733082)->elements[2];
c_733828.elements[3] = ((closureN)self_733082)->elements[3];
c_733828.elements[4] = ((closureN)self_733082)->elements[4];
c_733828.elements[5] = ((closureN)self_733082)->elements[5];
c_733828.elements[6] = ((closureN)self_733082)->elements[6];
c_733828.elements[7] = ((closureN)self_733082)->elements[7];



return_direct_with_clo1(data,(closure)&c_733828,__lambda_14,  Cyc_set_cell(data, ((closureN)self_733082)->elements[7], r_731338));; 
}

static void __lambda_14(void *data, object self_733083, int argc, object *args) /* object self_733083, object r_731278 */
 {

  
closureN_type c_733830;
object e_733843 [3];
c_733830.hdr.mark = gc_color_red;
 c_733830.hdr.grayed = 0;
c_733830.tag = closureN_tag;
 c_733830.fn = (function_type)__lambda_15;
c_733830.num_args = 1;
c_733830.num_elements = 3;
c_733830.elements = (object *)e_733843;
c_733830.elements[0] = ((closureN)self_733083)->elements[4];
c_733830.elements[1] = ((closureN)self_733083)->elements[5];
c_733830.elements[2] = ((closureN)self_733083)->elements[6];


closureN_type c_733844;
object e_734139 [6];
c_733844.hdr.mark = gc_color_red;
 c_733844.hdr.grayed = 0;
c_733844.tag = closureN_tag;
 c_733844.fn = (function_type)__lambda_17;
c_733844.num_args = 2;
c_733844.num_elements = 6;
c_733844.elements = (object *)e_734139;
c_733844.elements[0] = ((closureN)self_733083)->elements[0];
c_733844.elements[1] = ((closureN)self_733083)->elements[1];
c_733844.elements[2] = ((closureN)self_733083)->elements[2];
c_733844.elements[3] = ((closureN)self_733083)->elements[3];
c_733844.elements[4] = ((closureN)self_733083)->elements[6];
c_733844.elements[5] = ((closureN)self_733083)->elements[7];

return_direct_with_clo1(data,(closure)&c_733830,__lambda_15,  &c_733844);; 
}

static void __lambda_17(void *data, object self_733084, int argc, object *args) /* object self_733084, object k_731282, object exp_7328_73961, object vars_7329_73962 */
 {
 object k_731282 = args[0]; object exp_7328_73961 = args[1]; object vars_7329_73962 = args[2];
  
closureN_type c_733846;
object e_734138 [9];
c_733846.hdr.mark = gc_color_red;
 c_733846.hdr.grayed = 0;
c_733846.tag = closureN_tag;
 c_733846.fn = (function_type)__lambda_18;
c_733846.num_args = 1;
c_733846.num_elements = 9;
c_733846.elements = (object *)e_734138;
c_733846.elements[0] = ((closureN)self_733084)->elements[0];
c_733846.elements[1] = ((closureN)self_733084)->elements[1];
c_733846.elements[2] = ((closureN)self_733084)->elements[2];
c_733846.elements[3] = ((closureN)self_733084)->elements[3];
c_733846.elements[4] = exp_7328_73961;
c_733846.elements[5] = k_731282;
c_733846.elements[6] = ((closureN)self_733084)->elements[4];
c_733846.elements[7] = ((closureN)self_733084)->elements[5];
c_733846.elements[8] = vars_7329_73962;

return_direct_with_clo2(data,  __glo_const_127_scheme_cyclone_util, (((closure)  __glo_const_127_scheme_cyclone_util)->fn),  &c_733846, exp_7328_73961);; 
}

static void __lambda_18(void *data, object self_733085, int argc, object *args) /* object self_733085, object r_731284 */
 {
 object r_731284 = args[0];
  if( (boolean_f != r_731284) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733085)->elements[5], (((closure)  ((closureN)self_733085)->elements[5])->fn),  boolean_f);
} else { 
  
closureN_type c_733850;
object e_734136 [9];
c_733850.hdr.mark = gc_color_red;
 c_733850.hdr.grayed = 0;
c_733850.tag = closureN_tag;
 c_733850.fn = (function_type)__lambda_19;
c_733850.num_args = 1;
c_733850.num_elements = 9;
c_733850.elements = (object *)e_734136;
c_733850.elements[0] = ((closureN)self_733085)->elements[0];
c_733850.elements[1] = ((closureN)self_733085)->elements[1];
c_733850.elements[2] = ((closureN)self_733085)->elements[2];
c_733850.elements[3] = ((closureN)self_733085)->elements[3];
c_733850.elements[4] = ((closureN)self_733085)->elements[4];
c_733850.elements[5] = ((closureN)self_733085)->elements[5];
c_733850.elements[6] = ((closureN)self_733085)->elements[6];
c_733850.elements[7] = ((closureN)self_733085)->elements[7];
c_733850.elements[8] = ((closureN)self_733085)->elements[8];

return_direct_with_clo2(data,  __glo_quote_127_scheme_cyclone_util, (((closure)  __glo_quote_127_scheme_cyclone_util)->fn),  &c_733850, ((closureN)self_733085)->elements[4]);}
;; 
}

static void __lambda_19(void *data, object self_733086, int argc, object *args) /* object self_733086, object r_731285 */
 {
 object r_731285 = args[0];
  if( (boolean_f != r_731285) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733086)->elements[5], (((closure)  ((closureN)self_733086)->elements[5])->fn),  boolean_f);
} else { 
  
closureN_type c_733854;
object e_734131 [9];
c_733854.hdr.mark = gc_color_red;
 c_733854.hdr.grayed = 0;
c_733854.tag = closureN_tag;
 c_733854.fn = (function_type)__lambda_20;
c_733854.num_args = 1;
c_733854.num_elements = 9;
c_733854.elements = (object *)e_734131;
c_733854.elements[0] = ((closureN)self_733086)->elements[0];
c_733854.elements[1] = ((closureN)self_733086)->elements[1];
c_733854.elements[2] = ((closureN)self_733086)->elements[2];
c_733854.elements[3] = ((closureN)self_733086)->elements[3];
c_733854.elements[4] = ((closureN)self_733086)->elements[4];
c_733854.elements[5] = ((closureN)self_733086)->elements[5];
c_733854.elements[6] = ((closureN)self_733086)->elements[6];
c_733854.elements[7] = ((closureN)self_733086)->elements[7];
c_733854.elements[8] = ((closureN)self_733086)->elements[8];


complex_num_type local_734134; 
return_direct_with_clo1(data,(closure)&c_733854,__lambda_20,  ((inline_function_type)
                   ((closure)__glo_ref_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_734134, ((closureN)self_733086)->elements[4]));}
;; 
}

static void __lambda_20(void *data, object self_733087, int argc, object *args) /* object self_733087, object r_731286 */
 {
 object r_731286 = args[0];
  if( (boolean_f != r_731286) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733087)->elements[5], (((closure)  ((closureN)self_733087)->elements[5])->fn),  boolean_f);
} else { 
  
closureN_type c_733858;
object e_734129 [9];
c_733858.hdr.mark = gc_color_red;
 c_733858.hdr.grayed = 0;
c_733858.tag = closureN_tag;
 c_733858.fn = (function_type)__lambda_21;
c_733858.num_args = 1;
c_733858.num_elements = 9;
c_733858.elements = (object *)e_734129;
c_733858.elements[0] = ((closureN)self_733087)->elements[0];
c_733858.elements[1] = ((closureN)self_733087)->elements[1];
c_733858.elements[2] = ((closureN)self_733087)->elements[2];
c_733858.elements[3] = ((closureN)self_733087)->elements[3];
c_733858.elements[4] = ((closureN)self_733087)->elements[4];
c_733858.elements[5] = ((closureN)self_733087)->elements[5];
c_733858.elements[6] = ((closureN)self_733087)->elements[6];
c_733858.elements[7] = ((closureN)self_733087)->elements[7];
c_733858.elements[8] = ((closureN)self_733087)->elements[8];

return_direct_with_clo2(data,  __glo_lambda_127_scheme_cyclone_util, (((closure)  __glo_lambda_127_scheme_cyclone_util)->fn),  &c_733858, ((closureN)self_733087)->elements[4]);}
;; 
}

static void __lambda_21(void *data, object self_733088, int argc, object *args) /* object self_733088, object r_731287 */
 {
 object r_731287 = args[0];
  if( (boolean_f != r_731287) ){ 
  
closureN_type c_733860;
object e_733875 [3];
c_733860.hdr.mark = gc_color_red;
 c_733860.hdr.grayed = 0;
c_733860.tag = closureN_tag;
 c_733860.fn = (function_type)__lambda_22;
c_733860.num_args = 0;
c_733860.num_elements = 3;
c_733860.elements = (object *)e_733875;
c_733860.elements[0] = ((closureN)self_733088)->elements[2];
c_733860.elements[1] = ((closureN)self_733088)->elements[4];
c_733860.elements[2] = ((closureN)self_733088)->elements[8];


closureN_type c_733876;
object e_733905 [5];
c_733876.hdr.mark = gc_color_red;
 c_733876.hdr.grayed = 0;
c_733876.tag = closureN_tag;
 c_733876.fn = (function_type)__lambda_24;
c_733876.num_args = 1;
c_733876.num_elements = 5;
c_733876.elements = (object *)e_733905;
c_733876.elements[0] = ((closureN)self_733088)->elements[4];
c_733876.elements[1] = ((closureN)self_733088)->elements[5];
c_733876.elements[2] = ((closureN)self_733088)->elements[6];
c_733876.elements[3] = ((closureN)self_733088)->elements[7];
c_733876.elements[4] = ((closureN)self_733088)->elements[8];

return_direct_with_clo1(data,(closure)&c_733860,__lambda_22,  &c_733876);
} else { 
  
closureN_type c_733907;
object e_733925 [2];
c_733907.hdr.mark = gc_color_red;
 c_733907.hdr.grayed = 0;
c_733907.tag = closureN_tag;
 c_733907.fn = (function_type)__lambda_29;
c_733907.num_args = 0;
c_733907.num_elements = 2;
c_733907.elements = (object *)e_733925;
c_733907.elements[0] = ((closureN)self_733088)->elements[4];
c_733907.elements[1] = ((closureN)self_733088)->elements[8];


closureN_type c_733926;
object e_734128 [8];
c_733926.hdr.mark = gc_color_red;
 c_733926.hdr.grayed = 0;
c_733926.tag = closureN_tag;
 c_733926.fn = (function_type)__lambda_32;
c_733926.num_args = 1;
c_733926.num_elements = 8;
c_733926.elements = (object *)e_734128;
c_733926.elements[0] = ((closureN)self_733088)->elements[0];
c_733926.elements[1] = ((closureN)self_733088)->elements[1];
c_733926.elements[2] = ((closureN)self_733088)->elements[3];
c_733926.elements[3] = ((closureN)self_733088)->elements[4];
c_733926.elements[4] = ((closureN)self_733088)->elements[5];
c_733926.elements[5] = ((closureN)self_733088)->elements[6];
c_733926.elements[6] = ((closureN)self_733088)->elements[7];
c_733926.elements[7] = ((closureN)self_733088)->elements[8];

return_direct_with_clo1(data,(closure)&c_733907,__lambda_29,  &c_733926);}
;; 
}

static void __lambda_32(void *data, object self_733096, int argc, object *args) /* object self_733096, object r_731297 */
 {
 object r_731297 = args[0];
  if( (boolean_f != r_731297) ){ 
  


closureN_type c_733931;
object e_733974 [4];
c_733931.hdr.mark = gc_color_red;
 c_733931.hdr.grayed = 0;
c_733931.tag = closureN_tag;
 c_733931.fn = (function_type)__lambda_33;
c_733931.num_args = 1;
c_733931.num_elements = 4;
c_733931.elements = (object *)e_733974;
c_733931.elements[0] = ((closureN)self_733096)->elements[3];
c_733931.elements[1] = ((closureN)self_733096)->elements[4];
c_733931.elements[2] = ((closureN)self_733096)->elements[5];
c_733931.elements[3] = ((closureN)self_733096)->elements[7];

return_closcall2(data,  car(((closureN)self_733096)->elements[1]),  &c_733931, ((closureN)self_733096)->elements[3]);
} else { 
  
closureN_type c_733977;
object e_734126 [7];
c_733977.hdr.mark = gc_color_red;
 c_733977.hdr.grayed = 0;
c_733977.tag = closureN_tag;
 c_733977.fn = (function_type)__lambda_37;
c_733977.num_args = 1;
c_733977.num_elements = 7;
c_733977.elements = (object *)e_734126;
c_733977.elements[0] = ((closureN)self_733096)->elements[0];
c_733977.elements[1] = ((closureN)self_733096)->elements[2];
c_733977.elements[2] = ((closureN)self_733096)->elements[3];
c_733977.elements[3] = ((closureN)self_733096)->elements[4];
c_733977.elements[4] = ((closureN)self_733096)->elements[5];
c_733977.elements[5] = ((closureN)self_733096)->elements[6];
c_733977.elements[6] = ((closureN)self_733096)->elements[7];

return_direct_with_clo2(data,  __glo_define_127_scheme_cyclone_util, (((closure)  __glo_define_127_scheme_cyclone_util)->fn),  &c_733977, ((closureN)self_733096)->elements[3]);}
;; 
}

static void __lambda_37(void *data, object self_733101, int argc, object *args) /* object self_733101, object r_731306 */
 {
 object r_731306 = args[0];
  if( (boolean_f != r_731306) ){ 
  
closureN_type c_733979;
object e_733994 [3];
c_733979.hdr.mark = gc_color_red;
 c_733979.hdr.grayed = 0;
c_733979.tag = closureN_tag;
 c_733979.fn = (function_type)__lambda_38;
c_733979.num_args = 0;
c_733979.num_elements = 3;
c_733979.elements = (object *)e_733994;
c_733979.elements[0] = ((closureN)self_733101)->elements[0];
c_733979.elements[1] = ((closureN)self_733101)->elements[2];
c_733979.elements[2] = ((closureN)self_733101)->elements[6];


closureN_type c_733995;
object e_734038 [5];
c_733995.hdr.mark = gc_color_red;
 c_733995.hdr.grayed = 0;
c_733995.tag = closureN_tag;
 c_733995.fn = (function_type)__lambda_40;
c_733995.num_args = 1;
c_733995.num_elements = 5;
c_733995.elements = (object *)e_734038;
c_733995.elements[0] = ((closureN)self_733101)->elements[2];
c_733995.elements[1] = ((closureN)self_733101)->elements[3];
c_733995.elements[2] = ((closureN)self_733101)->elements[4];
c_733995.elements[3] = ((closureN)self_733101)->elements[5];
c_733995.elements[4] = ((closureN)self_733101)->elements[6];

return_direct_with_clo1(data,(closure)&c_733979,__lambda_38,  &c_733995);
} else { 
  
closureN_type c_734040;
object e_734124 [6];
c_734040.hdr.mark = gc_color_red;
 c_734040.hdr.grayed = 0;
c_734040.tag = closureN_tag;
 c_734040.fn = (function_type)__lambda_47;
c_734040.num_args = 1;
c_734040.num_elements = 6;
c_734040.elements = (object *)e_734124;
c_734040.elements[0] = ((closureN)self_733101)->elements[1];
c_734040.elements[1] = ((closureN)self_733101)->elements[2];
c_734040.elements[2] = ((closureN)self_733101)->elements[3];
c_734040.elements[3] = ((closureN)self_733101)->elements[4];
c_734040.elements[4] = ((closureN)self_733101)->elements[5];
c_734040.elements[5] = ((closureN)self_733101)->elements[6];

return_direct_with_clo2(data,  __glo_define_91c_127_scheme_cyclone_util, (((closure)  __glo_define_91c_127_scheme_cyclone_util)->fn),  &c_734040, ((closureN)self_733101)->elements[2]);}
;; 
}

static void __lambda_47(void *data, object self_733111, int argc, object *args) /* object self_733111, object r_731319 */
 {
 object r_731319 = args[0];
  if( (boolean_f != r_731319) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733111)->elements[2], (((closure)  ((closureN)self_733111)->elements[2])->fn),  boolean_f);
} else { 
  
closureN_type c_734044;
object e_734122 [6];
c_734044.hdr.mark = gc_color_red;
 c_734044.hdr.grayed = 0;
c_734044.tag = closureN_tag;
 c_734044.fn = (function_type)__lambda_48;
c_734044.num_args = 1;
c_734044.num_elements = 6;
c_734044.elements = (object *)e_734122;
c_734044.elements[0] = ((closureN)self_733111)->elements[0];
c_734044.elements[1] = ((closureN)self_733111)->elements[1];
c_734044.elements[2] = ((closureN)self_733111)->elements[2];
c_734044.elements[3] = ((closureN)self_733111)->elements[3];
c_734044.elements[4] = ((closureN)self_733111)->elements[4];
c_734044.elements[5] = ((closureN)self_733111)->elements[5];

return_direct_with_clo2(data,  __glo_set_67_127_scheme_cyclone_util, (((closure)  __glo_set_67_127_scheme_cyclone_util)->fn),  &c_734044, ((closureN)self_733111)->elements[1]);}
;; 
}

static void __lambda_48(void *data, object self_733112, int argc, object *args) /* object self_733112, object r_731320 */
 {
 object r_731320 = args[0];
  if( (boolean_f != r_731320) ){ 
  
closureN_type c_734046;
object e_734061 [3];
c_734046.hdr.mark = gc_color_red;
 c_734046.hdr.grayed = 0;
c_734046.tag = closureN_tag;
 c_734046.fn = (function_type)__lambda_49;
c_734046.num_args = 0;
c_734046.num_elements = 3;
c_734046.elements = (object *)e_734061;
c_734046.elements[0] = ((closureN)self_733112)->elements[0];
c_734046.elements[1] = ((closureN)self_733112)->elements[1];
c_734046.elements[2] = ((closureN)self_733112)->elements[5];


closureN_type c_734062;
object e_734097 [5];
c_734062.hdr.mark = gc_color_red;
 c_734062.hdr.grayed = 0;
c_734062.tag = closureN_tag;
 c_734062.fn = (function_type)__lambda_51;
c_734062.num_args = 1;
c_734062.num_elements = 5;
c_734062.elements = (object *)e_734097;
c_734062.elements[0] = ((closureN)self_733112)->elements[1];
c_734062.elements[1] = ((closureN)self_733112)->elements[2];
c_734062.elements[2] = ((closureN)self_733112)->elements[3];
c_734062.elements[3] = ((closureN)self_733112)->elements[4];
c_734062.elements[4] = ((closureN)self_733112)->elements[5];

return_direct_with_clo1(data,(closure)&c_734046,__lambda_49,  &c_734062);
} else { 
  
closureN_type c_734099;
object e_734117 [4];
c_734099.hdr.mark = gc_color_red;
 c_734099.hdr.grayed = 0;
c_734099.tag = closureN_tag;
 c_734099.fn = (function_type)__lambda_54;
c_734099.num_args = 1;
c_734099.num_elements = 4;
c_734099.elements = (object *)e_734117;
c_734099.elements[0] = ((closureN)self_733112)->elements[1];
c_734099.elements[1] = ((closureN)self_733112)->elements[2];
c_734099.elements[2] = ((closureN)self_733112)->elements[3];
c_734099.elements[3] = ((closureN)self_733112)->elements[5];


complex_num_type local_734120; 
return_direct_with_clo1(data,(closure)&c_734099,__lambda_54,  ((inline_function_type)
                   ((closure)__glo_app_127_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_734120, ((closureN)self_733112)->elements[1]));}
;; 
}

static void __lambda_54(void *data, object self_733118, int argc, object *args) /* object self_733118, object r_731331 */
 {
 object r_731331 = args[0];
  if( (boolean_f != r_731331) ){ 
  
closureN_type c_734101;
object e_734105 [2];
c_734101.hdr.mark = gc_color_red;
 c_734101.hdr.grayed = 0;
c_734101.tag = closureN_tag;
 c_734101.fn = (function_type)__lambda_55;
c_734101.num_args = 1;
c_734101.num_elements = 2;
c_734101.elements = (object *)e_734105;
c_734101.elements[0] = ((closureN)self_733118)->elements[0];
c_734101.elements[1] = ((closureN)self_733118)->elements[1];


closureN_type c_734106;
object e_734112 [2];
c_734106.hdr.mark = gc_color_red;
 c_734106.hdr.grayed = 0;
c_734106.tag = closureN_tag;
 c_734106.fn = (function_type)__lambda_56;
c_734106.num_args = 1;
c_734106.num_elements = 2;
c_734106.elements = (object *)e_734112;
c_734106.elements[0] = ((closureN)self_733118)->elements[2];
c_734106.elements[1] = ((closureN)self_733118)->elements[3];

return_direct_with_clo1(data,(closure)&c_734101,__lambda_55,  &c_734106);
} else { 
  
make_utf8_string_with_len(c_734115, "unknown expression: ", 20, 20);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_733118)->elements[1], &c_734115, ((closureN)self_733118)->elements[0]);}
;; 
}

static void __lambda_56(void *data, object self_733119, int argc, object *args) /* object self_733119, object k_731333, object e_7360_73965 */
 {
 object k_731333 = args[0]; object e_7360_73965 = args[1];
  

return_closcall3(data,  car(((closureN)self_733119)->elements[0]),  k_731333, e_7360_73965, ((closureN)self_733119)->elements[1]);; 
}

static void __lambda_55(void *data, object self_733120, int argc, object *args) /* object self_733120, object r_731332 */
 {
 object r_731332 = args[0];
  return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  ((closureN)self_733120)->elements[1], r_731332, ((closureN)self_733120)->elements[0]);; 
}

static void __lambda_51(void *data, object self_733113, int argc, object *args) /* object self_733113, object r_731321 */
 {

  


closureN_type c_734067;
object e_734091 [5];
c_734067.hdr.mark = gc_color_red;
 c_734067.hdr.grayed = 0;
c_734067.tag = closureN_tag;
 c_734067.fn = (function_type)__lambda_52;
c_734067.num_args = 1;
c_734067.num_elements = 5;
c_734067.elements = (object *)e_734091;
c_734067.elements[0] = ((closureN)self_733113)->elements[0];
c_734067.elements[1] = ((closureN)self_733113)->elements[1];
c_734067.elements[2] = ((closureN)self_733113)->elements[2];
c_734067.elements[3] = ((closureN)self_733113)->elements[3];
c_734067.elements[4] = ((closureN)self_733113)->elements[4];


complex_num_type local_734094; 
return_closcall3(data,  car(((closureN)self_733113)->elements[2]),  &c_734067, ((inline_function_type)
                   ((closure)__glo_set_67_91_125var_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_734094, ((closureN)self_733113)->elements[0]), ((closureN)self_733113)->elements[4]);; 
}

static void __lambda_52(void *data, object self_733114, int argc, object *args) /* object self_733114, object r_731322 */
 {

  


closureN_type c_734072;
object e_734082 [3];
c_734072.hdr.mark = gc_color_red;
 c_734072.hdr.grayed = 0;
c_734072.tag = closureN_tag;
 c_734072.fn = (function_type)__lambda_53;
c_734072.num_args = 1;
c_734072.num_elements = 3;
c_734072.elements = (object *)e_734082;
c_734072.elements[0] = ((closureN)self_733114)->elements[0];
c_734072.elements[1] = ((closureN)self_733114)->elements[1];
c_734072.elements[2] = ((closureN)self_733114)->elements[2];


pair_type local_734085; 

complex_num_type local_734088; 
return_closcall3(data,  car(((closureN)self_733114)->elements[3]),  &c_734072, set_cell_as_expr(&local_734085, ((inline_function_type)
                   ((closure)__glo_set_67_91_125var_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_734088, ((closureN)self_733114)->elements[0])), ((closureN)self_733114)->elements[4]);; 
}

static void __lambda_53(void *data, object self_733115, int argc, object *args) /* object self_733115, object r_731324 */
 {
 object r_731324 = args[0];
  


complex_num_type local_734080; 
return_closcall3(data,  car(((closureN)self_733115)->elements[2]),  ((closureN)self_733115)->elements[1], ((inline_function_type)
                   ((closure)__glo_set_67_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_734080, ((closureN)self_733115)->elements[0]), r_731324);; 
}

static void __lambda_49(void *data, object self_733116, int argc, object *args) /* object self_733116, object k_731328 */
 {
 object k_731328 = args[0];
  
closureN_type c_734048;
object e_734057 [3];
c_734048.hdr.mark = gc_color_red;
 c_734048.hdr.grayed = 0;
c_734048.tag = closureN_tag;
 c_734048.fn = (function_type)__lambda_50;
c_734048.num_args = 1;
c_734048.num_elements = 3;
c_734048.elements = (object *)e_734057;
c_734048.elements[0] = ((closureN)self_733116)->elements[0];
c_734048.elements[1] = ((closureN)self_733116)->elements[1];
c_734048.elements[2] = k_731328;



return_direct_with_clo1(data,(closure)&c_734048,__lambda_50,  memberp(data, quote_set_67, ((closureN)self_733116)->elements[2]));; 
}

static void __lambda_50(void *data, object self_733117, int argc, object *args) /* object self_733117, object r_731329 */
 {
 object r_731329 = args[0];
  if( (boolean_f != r_731329) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733117)->elements[2], (((closure)  ((closureN)self_733117)->elements[2])->fn),  Cyc_VOID);
} else { 
  

return_closcall2(data,  car(((closureN)self_733117)->elements[0]),  ((closureN)self_733117)->elements[2], ((closureN)self_733117)->elements[1]);}
;; 
}

static void __lambda_40(void *data, object self_733102, int argc, object *args) /* object self_733102, object r_731307 */
 {

  
closureN_type c_733997;
object e_734036 [5];
c_733997.hdr.mark = gc_color_red;
 c_733997.hdr.grayed = 0;
c_733997.tag = closureN_tag;
 c_733997.fn = (function_type)__lambda_41;
c_733997.num_args = 1;
c_733997.num_elements = 5;
c_733997.elements = (object *)e_734036;
c_733997.elements[0] = ((closureN)self_733102)->elements[0];
c_733997.elements[1] = ((closureN)self_733102)->elements[1];
c_733997.elements[2] = ((closureN)self_733102)->elements[2];
c_733997.elements[3] = ((closureN)self_733102)->elements[3];
c_733997.elements[4] = ((closureN)self_733102)->elements[4];

return_direct_with_clo2(data,  __glo_define_91_125var_scheme_cyclone_util, (((closure)  __glo_define_91_125var_scheme_cyclone_util)->fn),  &c_733997, ((closureN)self_733102)->elements[0]);; 
}

static void __lambda_41(void *data, object self_733103, int argc, object *args) /* object self_733103, object r_731315 */
 {
 object r_731315 = args[0];
  


closureN_type c_734002;
object e_734034 [5];
c_734002.hdr.mark = gc_color_red;
 c_734002.hdr.grayed = 0;
c_734002.tag = closureN_tag;
 c_734002.fn = (function_type)__lambda_42;
c_734002.num_args = 1;
c_734002.num_elements = 5;
c_734002.elements = (object *)e_734034;
c_734002.elements[0] = ((closureN)self_733103)->elements[0];
c_734002.elements[1] = ((closureN)self_733103)->elements[1];
c_734002.elements[2] = ((closureN)self_733103)->elements[2];
c_734002.elements[3] = ((closureN)self_733103)->elements[3];
c_734002.elements[4] = ((closureN)self_733103)->elements[4];

return_closcall3(data,  car(((closureN)self_733103)->elements[2]),  &c_734002, r_731315, ((closureN)self_733103)->elements[4]);; 
}

static void __lambda_42(void *data, object self_733104, int argc, object *args) /* object self_733104, object r_731308 */
 {

  
closureN_type c_734004;
object e_734011 [2];
c_734004.hdr.mark = gc_color_red;
 c_734004.hdr.grayed = 0;
c_734004.tag = closureN_tag;
 c_734004.fn = (function_type)__lambda_43;
c_734004.num_args = 1;
c_734004.num_elements = 2;
c_734004.elements = (object *)e_734011;
c_734004.elements[0] = ((closureN)self_733104)->elements[0];
c_734004.elements[1] = ((closureN)self_733104)->elements[1];


closureN_type c_734012;
object e_734033 [4];
c_734012.hdr.mark = gc_color_red;
 c_734012.hdr.grayed = 0;
c_734012.tag = closureN_tag;
 c_734012.fn = (function_type)__lambda_44;
c_734012.num_args = 1;
c_734012.num_elements = 4;
c_734012.elements = (object *)e_734033;
c_734012.elements[0] = ((closureN)self_733104)->elements[0];
c_734012.elements[1] = ((closureN)self_733104)->elements[2];
c_734012.elements[2] = ((closureN)self_733104)->elements[3];
c_734012.elements[3] = ((closureN)self_733104)->elements[4];

return_direct_with_clo1(data,(closure)&c_734004,__lambda_43,  &c_734012);; 
}

static void __lambda_44(void *data, object self_733105, int argc, object *args) /* object self_733105, object k_731311, object e_7350_73964 */
 {
 object k_731311 = args[0]; object e_7350_73964 = args[1];
  
closureN_type c_734014;
object e_734031 [5];
c_734014.hdr.mark = gc_color_red;
 c_734014.hdr.grayed = 0;
c_734014.tag = closureN_tag;
 c_734014.fn = (function_type)__lambda_45;
c_734014.num_args = 1;
c_734014.num_elements = 5;
c_734014.elements = (object *)e_734031;
c_734014.elements[0] = e_7350_73964;
c_734014.elements[1] = k_731311;
c_734014.elements[2] = ((closureN)self_733105)->elements[1];
c_734014.elements[3] = ((closureN)self_733105)->elements[2];
c_734014.elements[4] = ((closureN)self_733105)->elements[3];

return_direct_with_clo2(data,  __glo_define_91_125var_scheme_cyclone_util, (((closure)  __glo_define_91_125var_scheme_cyclone_util)->fn),  &c_734014, ((closureN)self_733105)->elements[0]);; 
}

static void __lambda_45(void *data, object self_733106, int argc, object *args) /* object self_733106, object r_731314 */
 {
 object r_731314 = args[0];
  


closureN_type c_734019;
object e_734026 [3];
c_734019.hdr.mark = gc_color_red;
 c_734019.hdr.grayed = 0;
c_734019.tag = closureN_tag;
 c_734019.fn = (function_type)__lambda_46;
c_734019.num_args = 1;
c_734019.num_elements = 3;
c_734019.elements = (object *)e_734026;
c_734019.elements[0] = ((closureN)self_733106)->elements[0];
c_734019.elements[1] = ((closureN)self_733106)->elements[1];
c_734019.elements[2] = ((closureN)self_733106)->elements[2];


pair_type local_734029; 
return_closcall3(data,  car(((closureN)self_733106)->elements[3]),  &c_734019, set_cell_as_expr(&local_734029, r_731314), ((closureN)self_733106)->elements[4]);; 
}

static void __lambda_46(void *data, object self_733107, int argc, object *args) /* object self_733107, object r_731312 */
 {
 object r_731312 = args[0];
  

return_closcall3(data,  car(((closureN)self_733107)->elements[2]),  ((closureN)self_733107)->elements[1], ((closureN)self_733107)->elements[0], r_731312);; 
}

static void __lambda_43(void *data, object self_733108, int argc, object *args) /* object self_733108, object r_731309 */
 {
 object r_731309 = args[0];
  
complex_num_type local_734009; 
return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  ((closureN)self_733108)->elements[1], r_731309, ((inline_function_type)
                   ((closure)__glo_define_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_734009, ((closureN)self_733108)->elements[0]));; 
}

static void __lambda_38(void *data, object self_733109, int argc, object *args) /* object self_733109, object k_731316 */
 {
 object k_731316 = args[0];
  
closureN_type c_733981;
object e_733990 [3];
c_733981.hdr.mark = gc_color_red;
 c_733981.hdr.grayed = 0;
c_733981.tag = closureN_tag;
 c_733981.fn = (function_type)__lambda_39;
c_733981.num_args = 1;
c_733981.num_elements = 3;
c_733981.elements = (object *)e_733990;
c_733981.elements[0] = ((closureN)self_733109)->elements[0];
c_733981.elements[1] = ((closureN)self_733109)->elements[1];
c_733981.elements[2] = k_731316;



return_direct_with_clo1(data,(closure)&c_733981,__lambda_39,  memberp(data, quote_define, ((closureN)self_733109)->elements[2]));; 
}

static void __lambda_39(void *data, object self_733110, int argc, object *args) /* object self_733110, object r_731317 */
 {
 object r_731317 = args[0];
  if( (boolean_f != r_731317) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733110)->elements[2], (((closure)  ((closureN)self_733110)->elements[2])->fn),  Cyc_VOID);
} else { 
  

return_closcall2(data,  car(((closureN)self_733110)->elements[0]),  ((closureN)self_733110)->elements[2], ((closureN)self_733110)->elements[1]);}
;; 
}

static void __lambda_33(void *data, object self_733097, int argc, object *args) /* object self_733097, object r_731298 */
 {

  


closureN_type c_733936;
object e_733968 [4];
c_733936.hdr.mark = gc_color_red;
 c_733936.hdr.grayed = 0;
c_733936.tag = closureN_tag;
 c_733936.fn = (function_type)__lambda_34;
c_733936.num_args = 1;
c_733936.num_elements = 4;
c_733936.elements = (object *)e_733968;
c_733936.elements[0] = ((closureN)self_733097)->elements[0];
c_733936.elements[1] = ((closureN)self_733097)->elements[1];
c_733936.elements[2] = ((closureN)self_733097)->elements[2];
c_733936.elements[3] = ((closureN)self_733097)->elements[3];


complex_num_type local_733971; 
return_closcall3(data,  car(((closureN)self_733097)->elements[2]),  &c_733936, ((inline_function_type)
                   ((closure)__glo_if_91_125condition_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_733971, ((closureN)self_733097)->elements[0]), ((closureN)self_733097)->elements[3]);; 
}

static void __lambda_34(void *data, object self_733098, int argc, object *args) /* object self_733098, object r_731299 */
 {

  
closureN_type c_733938;
object e_733963 [4];
c_733938.hdr.mark = gc_color_red;
 c_733938.hdr.grayed = 0;
c_733938.tag = closureN_tag;
 c_733938.fn = (function_type)__lambda_35;
c_733938.num_args = 1;
c_733938.num_elements = 4;
c_733938.elements = (object *)e_733963;
c_733938.elements[0] = ((closureN)self_733098)->elements[0];
c_733938.elements[1] = ((closureN)self_733098)->elements[1];
c_733938.elements[2] = ((closureN)self_733098)->elements[2];
c_733938.elements[3] = ((closureN)self_733098)->elements[3];


complex_num_type local_733966; 
return_direct_with_clo1(data,(closure)&c_733938,__lambda_35,  ((inline_function_type)
                   ((closure)__glo_if_91_125then_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_733966, ((closureN)self_733098)->elements[0]));; 
}

static void __lambda_35(void *data, object self_733099, int argc, object *args) /* object self_733099, object r_731304 */
 {
 object r_731304 = args[0];
  


closureN_type c_733943;
object e_733961 [4];
c_733943.hdr.mark = gc_color_red;
 c_733943.hdr.grayed = 0;
c_733943.tag = closureN_tag;
 c_733943.fn = (function_type)__lambda_36;
c_733943.num_args = 1;
c_733943.num_elements = 4;
c_733943.elements = (object *)e_733961;
c_733943.elements[0] = ((closureN)self_733099)->elements[0];
c_733943.elements[1] = ((closureN)self_733099)->elements[1];
c_733943.elements[2] = ((closureN)self_733099)->elements[2];
c_733943.elements[3] = ((closureN)self_733099)->elements[3];

return_closcall3(data,  car(((closureN)self_733099)->elements[2]),  &c_733943, r_731304, ((closureN)self_733099)->elements[3]);; 
}

static void __lambda_36(void *data, object self_733100, int argc, object *args) /* object self_733100, object r_731300 */
 {

    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_733100)->elements[0]), obj_int2obj(3))) ){ 
  


complex_num_type local_733956; 
return_closcall3(data,  car(((closureN)self_733100)->elements[2]),  ((closureN)self_733100)->elements[1], ((inline_function_type)
                   ((closure)__glo_if_91_125else_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_733956, ((closureN)self_733100)->elements[0]), ((closureN)self_733100)->elements[3]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733100)->elements[1], (((closure)  ((closureN)self_733100)->elements[1])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_29(void *data, object self_733121, int argc, object *args) /* object self_733121, object k_731334 */
 {
 object k_731334 = args[0];
  
closureN_type c_733909;
object e_733923 [2];
c_733909.hdr.mark = gc_color_red;
 c_733909.hdr.grayed = 0;
c_733909.tag = closureN_tag;
 c_733909.fn = (function_type)__lambda_30;
c_733909.num_args = 1;
c_733909.num_elements = 2;
c_733909.elements = (object *)e_733923;
c_733909.elements[0] = k_731334;
c_733909.elements[1] = ((closureN)self_733121)->elements[1];

return_direct_with_clo2(data,  __glo_if_127_scheme_cyclone_util, (((closure)  __glo_if_127_scheme_cyclone_util)->fn),  &c_733909, ((closureN)self_733121)->elements[0]);; 
}

static void __lambda_30(void *data, object self_733122, int argc, object *args) /* object self_733122, object r_731335 */
 {
 object r_731335 = args[0];
  if( (boolean_f != r_731335) ){ 
  
closureN_type c_733911;
object e_733917 [1];
c_733911.hdr.mark = gc_color_red;
 c_733911.hdr.grayed = 0;
c_733911.tag = closureN_tag;
 c_733911.fn = (function_type)__lambda_31;
c_733911.num_args = 1;
c_733911.num_elements = 1;
c_733911.elements = (object *)e_733917;
c_733911.elements[0] = ((closureN)self_733122)->elements[0];



return_direct_with_clo1(data,(closure)&c_733911,__lambda_31,  memberp(data, quote__if, ((closureN)self_733122)->elements[1]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733122)->elements[0], (((closure)  ((closureN)self_733122)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_31(void *data, object self_733123, int argc, object *args) /* object self_733123, object r_731336 */
 {
 object r_731336 = args[0];
  
complex_num_type local_733916; 
return_direct_with_clo1(data,  ((closureN)self_733123)->elements[0], (((closure)  ((closureN)self_733123)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_733916, r_731336));; 
}

static void __lambda_24(void *data, object self_733089, int argc, object *args) /* object self_733089, object r_731288 */
 {

  
closureN_type c_733878;
object e_733885 [2];
c_733878.hdr.mark = gc_color_red;
 c_733878.hdr.grayed = 0;
c_733878.tag = closureN_tag;
 c_733878.fn = (function_type)__lambda_25;
c_733878.num_args = 1;
c_733878.num_elements = 2;
c_733878.elements = (object *)e_733885;
c_733878.elements[0] = ((closureN)self_733089)->elements[0];
c_733878.elements[1] = ((closureN)self_733089)->elements[1];


closureN_type c_733886;
object e_733904 [4];
c_733886.hdr.mark = gc_color_red;
 c_733886.hdr.grayed = 0;
c_733886.tag = closureN_tag;
 c_733886.fn = (function_type)__lambda_26;
c_733886.num_args = 1;
c_733886.num_elements = 4;
c_733886.elements = (object *)e_733904;
c_733886.elements[0] = ((closureN)self_733089)->elements[0];
c_733886.elements[1] = ((closureN)self_733089)->elements[2];
c_733886.elements[2] = ((closureN)self_733089)->elements[3];
c_733886.elements[3] = ((closureN)self_733089)->elements[4];

return_direct_with_clo1(data,(closure)&c_733878,__lambda_25,  &c_733886);; 
}

static void __lambda_26(void *data, object self_733090, int argc, object *args) /* object self_733090, object k_731291, object e_7342_73963 */
 {
 object k_731291 = args[0]; object e_7342_73963 = args[1];
  
closureN_type c_733888;
object e_733902 [5];
c_733888.hdr.mark = gc_color_red;
 c_733888.hdr.grayed = 0;
c_733888.tag = closureN_tag;
 c_733888.fn = (function_type)__lambda_27;
c_733888.num_args = 1;
c_733888.num_elements = 5;
c_733888.elements = (object *)e_733902;
c_733888.elements[0] = e_7342_73963;
c_733888.elements[1] = k_731291;
c_733888.elements[2] = ((closureN)self_733090)->elements[1];
c_733888.elements[3] = ((closureN)self_733090)->elements[2];
c_733888.elements[4] = ((closureN)self_733090)->elements[3];

return_direct_with_clo2(data,  __glo_lambda_91formals_91_125list_scheme_cyclone_util, (((closure)  __glo_lambda_91formals_91_125list_scheme_cyclone_util)->fn),  &c_733888, ((closureN)self_733090)->elements[0]);; 
}

static void __lambda_27(void *data, object self_733091, int argc, object *args) /* object self_733091, object r_731293 */
 {
 object r_731293 = args[0];
  


closureN_type c_733893;
object e_733900 [3];
c_733893.hdr.mark = gc_color_red;
 c_733893.hdr.grayed = 0;
c_733893.tag = closureN_tag;
 c_733893.fn = (function_type)__lambda_28;
c_733893.num_args = 1;
c_733893.num_elements = 3;
c_733893.elements = (object *)e_733900;
c_733893.elements[0] = ((closureN)self_733091)->elements[0];
c_733893.elements[1] = ((closureN)self_733091)->elements[1];
c_733893.elements[2] = ((closureN)self_733091)->elements[2];

return_closcall3(data,  car(((closureN)self_733091)->elements[3]),  &c_733893, r_731293, ((closureN)self_733091)->elements[4]);; 
}

static void __lambda_28(void *data, object self_733092, int argc, object *args) /* object self_733092, object r_731292 */
 {
 object r_731292 = args[0];
  

return_closcall3(data,  car(((closureN)self_733092)->elements[2]),  ((closureN)self_733092)->elements[1], ((closureN)self_733092)->elements[0], r_731292);; 
}

static void __lambda_25(void *data, object self_733093, int argc, object *args) /* object self_733093, object r_731289 */
 {
 object r_731289 = args[0];
  
complex_num_type local_733883; 
return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  ((closureN)self_733093)->elements[1], r_731289, ((inline_function_type)
                   ((closure)__glo_lambda_91_125exp_191_191inline_191_191_scheme_cyclone_util)->fn)(data,&local_733883, ((closureN)self_733093)->elements[0]));; 
}

static void __lambda_22(void *data, object self_733094, int argc, object *args) /* object self_733094, object k_731294 */
 {
 object k_731294 = args[0];
  
closureN_type c_733862;
object e_733871 [3];
c_733862.hdr.mark = gc_color_red;
 c_733862.hdr.grayed = 0;
c_733862.tag = closureN_tag;
 c_733862.fn = (function_type)__lambda_23;
c_733862.num_args = 1;
c_733862.num_elements = 3;
c_733862.elements = (object *)e_733871;
c_733862.elements[0] = ((closureN)self_733094)->elements[0];
c_733862.elements[1] = ((closureN)self_733094)->elements[1];
c_733862.elements[2] = k_731294;



return_direct_with_clo1(data,(closure)&c_733862,__lambda_23,  memberp(data, quote_lambda, ((closureN)self_733094)->elements[2]));; 
}

static void __lambda_23(void *data, object self_733095, int argc, object *args) /* object self_733095, object r_731295 */
 {
 object r_731295 = args[0];
  if( (boolean_f != r_731295) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733095)->elements[2], (((closure)  ((closureN)self_733095)->elements[2])->fn),  Cyc_VOID);
} else { 
  

return_closcall2(data,  car(((closureN)self_733095)->elements[0]),  ((closureN)self_733095)->elements[2], ((closureN)self_733095)->elements[1]);}
;; 
}

static void __lambda_15(void *data, object self_733124, int argc, object *args) /* object self_733124, object r_731281 */
 {
 object r_731281 = args[0];
  
closureN_type c_733832;
object e_733839 [3];
c_733832.hdr.mark = gc_color_red;
 c_733832.hdr.grayed = 0;
c_733832.tag = closureN_tag;
 c_733832.fn = (function_type)__lambda_16;
c_733832.num_args = 1;
c_733832.num_elements = 3;
c_733832.elements = (object *)e_733839;
c_733832.elements[0] = ((closureN)self_733124)->elements[0];
c_733832.elements[1] = ((closureN)self_733124)->elements[1];
c_733832.elements[2] = ((closureN)self_733124)->elements[2];



return_direct_with_clo1(data,(closure)&c_733832,__lambda_16,  Cyc_set_cell(data, ((closureN)self_733124)->elements[2], r_731281));; 
}

static void __lambda_16(void *data, object self_733125, int argc, object *args) /* object self_733125, object r_731279 */
 {

  

return_closcall3(data,  car(((closureN)self_733125)->elements[2]),  ((closureN)self_733125)->elements[1], ((closureN)self_733125)->elements[0], NULL);; 
}

void c_schemecyclonetransforms_inlinable_lambdas(void *data, object clo, int argc, object *args){ 
make_pair(pair_739863, find_or_add_symbol("cell-get->cell"), find_or_add_symbol("cell-get->cell__inline__"));
make_pair(pair_739864, find_or_add_symbol("cell->value"), find_or_add_symbol("cell->value__inline__"));
make_pair(pair_739865, find_or_add_symbol("set-cell!->value"), find_or_add_symbol("set-cell!->value__inline__"));
make_pair(pair_739866, find_or_add_symbol("set-cell!->cell"), find_or_add_symbol("set-cell!->cell__inline__"));
make_pair(pair_739867, find_or_add_symbol("env-get->env"), find_or_add_symbol("env-get->env__inline__"));
make_pair(pair_739868, find_or_add_symbol("env-get->field"), find_or_add_symbol("env-get->field__inline__"));
make_pair(pair_739869, find_or_add_symbol("env-get->id"), find_or_add_symbol("env-get->id__inline__"));
make_pair(pair_739870, find_or_add_symbol("env-make->id"), find_or_add_symbol("env-make->id__inline__"));
make_pair(pair_739871, find_or_add_symbol("closure->fv"), find_or_add_symbol("closure->fv__inline__"));
make_pair(pair_739872, find_or_add_symbol("closure->env"), find_or_add_symbol("closure->env__inline__"));
make_pair(pair_739873, find_or_add_symbol("closure->lam"), find_or_add_symbol("closure->lam__inline__"));
make_pair(pair_739874, find_or_add_symbol("begin->exps"), find_or_add_symbol("begin->exps__inline__"));
make_pair(pair_739875, find_or_add_symbol("app->args"), find_or_add_symbol("app->args__inline__"));
make_pair(pair_739876, find_or_add_symbol("app->fun"), find_or_add_symbol("app->fun__inline__"));
make_pair(pair_739877, find_or_add_symbol("letrec->exp"), find_or_add_symbol("letrec->exp__inline__"));
make_pair(pair_739878, find_or_add_symbol("letrec->bindings"), find_or_add_symbol("letrec->bindings__inline__"));
make_pair(pair_739879, find_or_add_symbol("let->exp"), find_or_add_symbol("let->exp__inline__"));
make_pair(pair_739880, find_or_add_symbol("let->bindings"), find_or_add_symbol("let->bindings__inline__"));
make_pair(pair_739881, find_or_add_symbol("symbol<?"), find_or_add_symbol("symbol<?__inline__"));
make_pair(pair_739882, find_or_add_symbol("void"), find_or_add_symbol("void__inline__"));
make_pair(c_739902, &pair_739863, NULL);
make_pair(c_739901, &pair_739864, &c_739902);
make_pair(c_739900, &pair_739865, &c_739901);
make_pair(c_739899, &pair_739866, &c_739900);
make_pair(c_739898, &pair_739867, &c_739899);
make_pair(c_739897, &pair_739868, &c_739898);
make_pair(c_739896, &pair_739869, &c_739897);
make_pair(c_739895, &pair_739870, &c_739896);
make_pair(c_739894, &pair_739871, &c_739895);
make_pair(c_739893, &pair_739872, &c_739894);
make_pair(c_739892, &pair_739873, &c_739893);
make_pair(c_739891, &pair_739874, &c_739892);
make_pair(c_739890, &pair_739875, &c_739891);
make_pair(c_739889, &pair_739876, &c_739890);
make_pair(c_739888, &pair_739877, &c_739889);
make_pair(c_739887, &pair_739878, &c_739888);
make_pair(c_739886, &pair_739879, &c_739887);
make_pair(c_739885, &pair_739880, &c_739886);
make_pair(c_739884, &pair_739881, &c_739885);
make_pair(c_739883, &pair_739882, &c_739884);
object buf[1]; object cont = args[0];
buf[0] = &c_739883; (((closure)cont)->fn)(data, cont, 1, buf);
 } 
void c_schemecyclonetransforms_entry_pt_first_lambda(void *data, object clo, int argc, object *args){ 
Cyc_set_globals_changed((gc_thread_data *)data);
  quote__85prim_91args_91table_85 = find_or_add_symbol("*prim-args-table*");
  quote_k = find_or_add_symbol("k");
  quote_r = find_or_add_symbol("r");
  quote_unused = find_or_add_symbol("unused");
  quote_fast_91string_123_127 = find_or_add_symbol("fast-string=?");
  quote_string_123_127 = find_or_add_symbol("string=?");
  quote_fast_91string_121_127 = find_or_add_symbol("fast-string<?");
  quote_string_121_127 = find_or_add_symbol("string<?");
  quote_fast_91string_121_123_127 = find_or_add_symbol("fast-string<=?");
  quote_string_121_123_127 = find_or_add_symbol("string<=?");
  quote_fast_91string_125_127 = find_or_add_symbol("fast-string>?");
  quote_string_125_127 = find_or_add_symbol("string>?");
  quote_fast_91string_125_123_127 = find_or_add_symbol("fast-string>=?");
  quote_string_125_123_127 = find_or_add_symbol("string>=?");
  quote_write_91string_912 = find_or_add_symbol("write-string-2");
  quote_write_91string_911 = find_or_add_symbol("write-string-1");
  quote_write_91string = find_or_add_symbol("write-string");
  quote_Cyc_91map_91loop_912 = find_or_add_symbol("Cyc-map-loop-2");
  quote_Cyc_91map_91loop_911 = find_or_add_symbol("Cyc-map-loop-1");
  quote_map = find_or_add_symbol("map");
  quote_Cyc_91for_91each_91loop_912 = find_or_add_symbol("Cyc-for-each-loop-2");
  quote_Cyc_91for_91each_91loop_911 = find_or_add_symbol("Cyc-for-each-loop-1");
  quote_for_91each = find_or_add_symbol("for-each");
  quote_Cyc_91fast_91list_914 = find_or_add_symbol("Cyc-fast-list-4");
  quote_Cyc_91fast_91list_913 = find_or_add_symbol("Cyc-fast-list-3");
  quote_Cyc_91fast_91list_912 = find_or_add_symbol("Cyc-fast-list-2");
  quote_Cyc_91fast_91list_911 = find_or_add_symbol("Cyc-fast-list-1");
  quote__list = find_or_add_symbol("list");
  quote_Cyc_91fast_91vector_915 = find_or_add_symbol("Cyc-fast-vector-5");
  quote_Cyc_91fast_91vector_914 = find_or_add_symbol("Cyc-fast-vector-4");
  quote_Cyc_91fast_91vector_913 = find_or_add_symbol("Cyc-fast-vector-3");
  quote_Cyc_91fast_91vector_912 = find_or_add_symbol("Cyc-fast-vector-2");
  quote_vector = find_or_add_symbol("vector");
  quote_Cyc_91fast_91assoc = find_or_add_symbol("Cyc-fast-assoc");
  quote_assoc = find_or_add_symbol("assoc");
  quote_Cyc_91fast_91member = find_or_add_symbol("Cyc-fast-member");
  quote_member = find_or_add_symbol("member");
  quote__85 = find_or_add_symbol("*");
  quote__87 = find_or_add_symbol("+");
  quote__121_123 = find_or_add_symbol("<=");
  quote__125_123 = find_or_add_symbol(">=");
  quote__121 = find_or_add_symbol("<");
  quote__125 = find_or_add_symbol(">");
  quote__123 = find_or_add_symbol("=");
  quote_symbol_127 = find_or_add_symbol("symbol?");
  quote_string_127 = find_or_add_symbol("string?");
  quote_vector_127 = find_or_add_symbol("vector?");
  quote_Cyc_91macro_127 = find_or_add_symbol("Cyc-macro?");
  quote_procedure_127 = find_or_add_symbol("procedure?");
  quote_port_127 = find_or_add_symbol("port?");
  quote_pair_127 = find_or_add_symbol("pair?");
  quote_integer_127 = find_or_add_symbol("integer?");
  quote_real_127 = find_or_add_symbol("real?");
  quote_number_127 = find_or_add_symbol("number?");
  quote_null_127 = find_or_add_symbol("null?");
  quote_eof_91object_127 = find_or_add_symbol("eof-object?");
  quote_char_127 = find_or_add_symbol("char?");
  quote_boolean_127 = find_or_add_symbol("boolean?");
  quote_equal_127 = find_or_add_symbol("equal?");
  quote_eqv_127 = find_or_add_symbol("eqv?");
  quote_eq_127 = find_or_add_symbol("eq?");
  quote_Cyc_91fast_91char_91lte = find_or_add_symbol("Cyc-fast-char-lte");
  quote_Cyc_91fast_91char_91gte = find_or_add_symbol("Cyc-fast-char-gte");
  quote_Cyc_91fast_91char_91lt = find_or_add_symbol("Cyc-fast-char-lt");
  quote_Cyc_91fast_91char_91gt = find_or_add_symbol("Cyc-fast-char-gt");
  quote_Cyc_91fast_91char_91eq = find_or_add_symbol("Cyc-fast-char-eq");
  quote_Cyc_91fast_91lte = find_or_add_symbol("Cyc-fast-lte");
  quote_Cyc_91fast_91gte = find_or_add_symbol("Cyc-fast-gte");
  quote_Cyc_91fast_91lt = find_or_add_symbol("Cyc-fast-lt");
  quote_Cyc_91fast_91gt = find_or_add_symbol("Cyc-fast-gt");
  quote_Cyc_91fast_91eq = find_or_add_symbol("Cyc-fast-eq");
  quote_not = find_or_add_symbol("not");
  quote_Cyc_91seq = find_or_add_symbol("Cyc-seq");
  quote_quote = find_or_add_symbol("quote");
  quote_wrap_91mutables = find_or_add_symbol("wrap-mutables");
  quote_in = find_or_add_symbol("in");
  quote_mutable_91variables = find_or_add_symbol("mutable-variables");
  quote_begin = find_or_add_symbol("begin");
  quote_env_91get = find_or_add_symbol("env-get");
  quote_env_91make = find_or_add_symbol("env-make");
  quote_closure = find_or_add_symbol("closure");
  quote_Cyc_91display = find_or_add_symbol("Cyc-display");
  quote_Cyc_91write = find_or_add_symbol("Cyc-write");
  quote_Cyc_91write_91char = find_or_add_symbol("Cyc-write-char");
  quote_Cyc_91read_91line = find_or_add_symbol("Cyc-read-line");
  quote_peek_91char = find_or_add_symbol("peek-char");
  quote_read_91char = find_or_add_symbol("read-char");
  quote_delete_91file = find_or_add_symbol("delete-file");
  quote_file_91exists_127 = find_or_add_symbol("file-exists?");
  quote_Cyc_91flush_91output_91port = find_or_add_symbol("Cyc-flush-output-port");
  quote_close_91output_91port = find_or_add_symbol("close-output-port");
  quote_close_91input_91port = find_or_add_symbol("close-input-port");
  quote_close_91port = find_or_add_symbol("close-port");
  quote_open_91output_91file = find_or_add_symbol("open-output-file");
  quote_open_91input_91file = find_or_add_symbol("open-input-file");
  quote_Cyc_91stderr = find_or_add_symbol("Cyc-stderr");
  quote_Cyc_91stdin = find_or_add_symbol("Cyc-stdin");
  quote_Cyc_91stdout = find_or_add_symbol("Cyc-stdout");
  quote_make_91vector = find_or_add_symbol("make-vector");
  quote_make_91bytevector = find_or_add_symbol("make-bytevector");
  quote_string_91_125symbol = find_or_add_symbol("string->symbol");
  quote_string_91set_67 = find_or_add_symbol("string-set!");
  quote_set_91cdr_67 = find_or_add_symbol("set-cdr!");
  quote_set_91car_67 = find_or_add_symbol("set-car!");
  quote_cons = find_or_add_symbol("cons");
  quote_cell = find_or_add_symbol("cell");
  quote_set_91cell_67 = find_or_add_symbol("set-cell!");
  quote_set_91global_91unsafe_67 = find_or_add_symbol("set-global-unsafe!");
  quote_set_91global_67 = find_or_add_symbol("set-global!");
  quote_cell_91get = find_or_add_symbol("cell-get");
  quote_Cyc_91current_91exception_91handler = find_or_add_symbol("Cyc-current-exception-handler");
  quote_Cyc_91default_91exception_91handler = find_or_add_symbol("Cyc-default-exception-handler");
  quote_Cyc_91compilation_91environment = find_or_add_symbol("Cyc-compilation-environment");
  quote_Cyc_91installation_91dir = find_or_add_symbol("Cyc-installation-dir");
  quote_command_91line_91arguments = find_or_add_symbol("command-line-arguments");
  quote_system = find_or_add_symbol("system");
  quote_exit = find_or_add_symbol("exit");
  quote__75halt = find_or_add_symbol("%halt");
  quote_apply = find_or_add_symbol("apply");
  quote_Cyc_91end_91thread_67 = find_or_add_symbol("Cyc-end-thread!");
  quote_Cyc_91spawn_91thread_67 = find_or_add_symbol("Cyc-spawn-thread!");
  quote_Cyc_91opaque_127 = find_or_add_symbol("Cyc-opaque?");
  quote_Cyc_91cvar_127 = find_or_add_symbol("Cyc-cvar?");
  quote_Cyc_91set_91cvar_67 = find_or_add_symbol("Cyc-set-cvar!");
  quote_Cyc_91get_91cvar = find_or_add_symbol("Cyc-get-cvar");
  quote_Cyc_91global_91vars = find_or_add_symbol("Cyc-global-vars");
  quote_type = find_or_add_symbol("type");
  quote_Unexpected = find_or_add_symbol("Unexpected");
  quote_varargs = find_or_add_symbol("varargs");
  quote__for = find_or_add_symbol("for");
  quote_args = find_or_add_symbol("args");
  quote_many = find_or_add_symbol("many");
  quote_Too = find_or_add_symbol("Too");
  quote_args_117fixed = find_or_add_symbol("args:fixed");
  quote_args_117fixed_91with_91varargs = find_or_add_symbol("args:fixed-with-varargs");
  quote_args_117varargs = find_or_add_symbol("args:varargs");
  quote_letrec = find_or_add_symbol("letrec");
  quote_call_95cc = find_or_add_symbol("call/cc");
  quote_let = find_or_add_symbol("let");
  quote_set_67 = find_or_add_symbol("set!");
  quote_define = find_or_add_symbol("define");
  quote__if = find_or_add_symbol("if");
  quote_lambda = find_or_add_symbol("lambda");

  add_global("__glo_lib_91init_117schemecyclonetransforms_scheme_cyclone_transforms", (object *) &__glo_lib_91init_117schemecyclonetransforms_scheme_cyclone_transforms);
  add_global("__glo_cps_91convert_scheme_cyclone_transforms", (object *) &__glo_cps_91convert_scheme_cyclone_transforms);
  add_global("__glo__85prim_91args_91table_85_scheme_cyclone_transforms", (object *) &__glo__85prim_91args_91table_85_scheme_cyclone_transforms);
  add_global("__glo_prim_91convert_scheme_cyclone_transforms", (object *) &__glo_prim_91convert_scheme_cyclone_transforms);
  add_global("__glo_alpha_91convert_scheme_cyclone_transforms", (object *) &__glo_alpha_91convert_scheme_cyclone_transforms);
  add_global("__glo_flatten_91sequence_scheme_cyclone_transforms", (object *) &__glo_flatten_91sequence_scheme_cyclone_transforms);
  add_global("__glo_wrap_91mutables_scheme_cyclone_transforms", (object *) &__glo_wrap_91mutables_scheme_cyclone_transforms);
  add_global("__glo_analyze_91mutable_91variables_scheme_cyclone_transforms", (object *) &__glo_analyze_91mutable_91variables_scheme_cyclone_transforms);
  add_global("__glo_is_91mutable_127_scheme_cyclone_transforms", (object *) &__glo_is_91mutable_127_scheme_cyclone_transforms);
  add_global("__glo_mark_91mutable_scheme_cyclone_transforms", (object *) &__glo_mark_91mutable_scheme_cyclone_transforms);
  add_global("__glo_clear_91mutables_scheme_cyclone_transforms", (object *) &__glo_clear_91mutables_scheme_cyclone_transforms);
  add_global("__glo_mutable_91variables_scheme_cyclone_transforms", (object *) &__glo_mutable_91variables_scheme_cyclone_transforms);
  add_global("__glo_free_91vars_scheme_cyclone_transforms", (object *) &__glo_free_91vars_scheme_cyclone_transforms);
  add_global("__glo_filter_91unused_91variables_scheme_cyclone_transforms", (object *) &__glo_filter_91unused_91variables_scheme_cyclone_transforms);
  add_global("__glo_global_91vars_scheme_cyclone_transforms", (object *) &__glo_global_91vars_scheme_cyclone_transforms);
  add_global("__glo_has_91global_127_scheme_cyclone_transforms", (object *) &__glo_has_91global_127_scheme_cyclone_transforms);
  add_global("__glo_isolate_91globals_scheme_cyclone_transforms", (object *) &__glo_isolate_91globals_scheme_cyclone_transforms);
  add_global("__glo_cell_91get_91_125cell_191_191inline_191_191_scheme_cyclone_transforms", (object *) &__glo_cell_91get_91_125cell_191_191inline_191_191_scheme_cyclone_transforms);
  add_global("__glo_cell_91get_91_125cell_scheme_cyclone_transforms", (object *) &__glo_cell_91get_91_125cell_scheme_cyclone_transforms);
  add_global("__glo_cell_91get_127_scheme_cyclone_transforms", (object *) &__glo_cell_91get_127_scheme_cyclone_transforms);
  add_global("__glo_cell_91_125value_191_191inline_191_191_scheme_cyclone_transforms", (object *) &__glo_cell_91_125value_191_191inline_191_191_scheme_cyclone_transforms);
  add_global("__glo_cell_91_125value_scheme_cyclone_transforms", (object *) &__glo_cell_91_125value_scheme_cyclone_transforms);
  add_global("__glo_cell_127_scheme_cyclone_transforms", (object *) &__glo_cell_127_scheme_cyclone_transforms);
  add_global("__glo_set_91cell_67_91_125value_191_191inline_191_191_scheme_cyclone_transforms", (object *) &__glo_set_91cell_67_91_125value_191_191inline_191_191_scheme_cyclone_transforms);
  add_global("__glo_set_91cell_67_91_125value_scheme_cyclone_transforms", (object *) &__glo_set_91cell_67_91_125value_scheme_cyclone_transforms);
  add_global("__glo_set_91cell_67_91_125cell_191_191inline_191_191_scheme_cyclone_transforms", (object *) &__glo_set_91cell_67_91_125cell_191_191inline_191_191_scheme_cyclone_transforms);
  add_global("__glo_set_91cell_67_91_125cell_scheme_cyclone_transforms", (object *) &__glo_set_91cell_67_91_125cell_scheme_cyclone_transforms);
  add_global("__glo_set_91cell_67_127_scheme_cyclone_transforms", (object *) &__glo_set_91cell_67_127_scheme_cyclone_transforms);
  add_global("__glo_env_91get_91_125env_191_191inline_191_191_scheme_cyclone_transforms", (object *) &__glo_env_91get_91_125env_191_191inline_191_191_scheme_cyclone_transforms);
  add_global("__glo_env_91get_91_125env_scheme_cyclone_transforms", (object *) &__glo_env_91get_91_125env_scheme_cyclone_transforms);
  add_global("__glo_env_91get_91_125field_191_191inline_191_191_scheme_cyclone_transforms", (object *) &__glo_env_91get_91_125field_191_191inline_191_191_scheme_cyclone_transforms);
  add_global("__glo_env_91get_91_125field_scheme_cyclone_transforms", (object *) &__glo_env_91get_91_125field_scheme_cyclone_transforms);
  add_global("__glo_env_91get_91_125id_191_191inline_191_191_scheme_cyclone_transforms", (object *) &__glo_env_91get_91_125id_191_191inline_191_191_scheme_cyclone_transforms);
  add_global("__glo_env_91get_91_125id_scheme_cyclone_transforms", (object *) &__glo_env_91get_91_125id_scheme_cyclone_transforms);
  add_global("__glo_env_91get_127_scheme_cyclone_transforms", (object *) &__glo_env_91get_127_scheme_cyclone_transforms);
  add_global("__glo_env_91make_91_125values_scheme_cyclone_transforms", (object *) &__glo_env_91make_91_125values_scheme_cyclone_transforms);
  add_global("__glo_env_91make_91_125fields_scheme_cyclone_transforms", (object *) &__glo_env_91make_91_125fields_scheme_cyclone_transforms);
  add_global("__glo_env_91make_91_125id_191_191inline_191_191_scheme_cyclone_transforms", (object *) &__glo_env_91make_91_125id_191_191inline_191_191_scheme_cyclone_transforms);
  add_global("__glo_env_91make_91_125id_scheme_cyclone_transforms", (object *) &__glo_env_91make_91_125id_scheme_cyclone_transforms);
  add_global("__glo_env_91make_127_scheme_cyclone_transforms", (object *) &__glo_env_91make_127_scheme_cyclone_transforms);
  add_global("__glo_closure_91_125fv_191_191inline_191_191_scheme_cyclone_transforms", (object *) &__glo_closure_91_125fv_191_191inline_191_191_scheme_cyclone_transforms);
  add_global("__glo_closure_91_125fv_scheme_cyclone_transforms", (object *) &__glo_closure_91_125fv_scheme_cyclone_transforms);
  add_global("__glo_closure_91_125env_191_191inline_191_191_scheme_cyclone_transforms", (object *) &__glo_closure_91_125env_191_191inline_191_191_scheme_cyclone_transforms);
  add_global("__glo_closure_91_125env_scheme_cyclone_transforms", (object *) &__glo_closure_91_125env_scheme_cyclone_transforms);
  add_global("__glo_closure_91_125lam_191_191inline_191_191_scheme_cyclone_transforms", (object *) &__glo_closure_91_125lam_191_191inline_191_191_scheme_cyclone_transforms);
  add_global("__glo_closure_91_125lam_scheme_cyclone_transforms", (object *) &__glo_closure_91_125lam_scheme_cyclone_transforms);
  add_global("__glo_closure_127_scheme_cyclone_transforms", (object *) &__glo_closure_127_scheme_cyclone_transforms);
  add_global("__glo_begin_91_125exps_191_191inline_191_191_scheme_cyclone_transforms", (object *) &__glo_begin_91_125exps_191_191inline_191_191_scheme_cyclone_transforms);
  add_global("__glo_begin_91_125exps_scheme_cyclone_transforms", (object *) &__glo_begin_91_125exps_scheme_cyclone_transforms);
  add_global("__glo_precompute_91prim_91app_127_scheme_cyclone_transforms", (object *) &__glo_precompute_91prim_91app_127_scheme_cyclone_transforms);
  add_global("__glo_app_91_125args_191_191inline_191_191_scheme_cyclone_transforms", (object *) &__glo_app_91_125args_191_191inline_191_191_scheme_cyclone_transforms);
  add_global("__glo_app_91_125args_scheme_cyclone_transforms", (object *) &__glo_app_91_125args_scheme_cyclone_transforms);
  add_global("__glo_app_91_125fun_191_191inline_191_191_scheme_cyclone_transforms", (object *) &__glo_app_91_125fun_191_191inline_191_191_scheme_cyclone_transforms);
  add_global("__glo_app_91_125fun_scheme_cyclone_transforms", (object *) &__glo_app_91_125fun_scheme_cyclone_transforms);
  add_global("__glo_list_91_125pair_scheme_cyclone_transforms", (object *) &__glo_list_91_125pair_scheme_cyclone_transforms);
  add_global("__glo_list_91_125lambda_91formals_scheme_cyclone_transforms", (object *) &__glo_list_91_125lambda_91formals_scheme_cyclone_transforms);
  add_global("__glo_lambda_91num_91args_scheme_cyclone_transforms", (object *) &__glo_lambda_91num_91args_scheme_cyclone_transforms);
  add_global("__glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms", (object *) &__glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms);
  add_global("__glo_ast_117lambda_91formals_91type_scheme_cyclone_transforms", (object *) &__glo_ast_117lambda_91formals_91type_scheme_cyclone_transforms);
  add_global("__glo_letrec_91_125args_scheme_cyclone_transforms", (object *) &__glo_letrec_91_125args_scheme_cyclone_transforms);
  add_global("__glo_letrec_91_125bound_91vars_scheme_cyclone_transforms", (object *) &__glo_letrec_91_125bound_91vars_scheme_cyclone_transforms);
  add_global("__glo_letrec_91_125exp_191_191inline_191_191_scheme_cyclone_transforms", (object *) &__glo_letrec_91_125exp_191_191inline_191_191_scheme_cyclone_transforms);
  add_global("__glo_letrec_91_125exp_scheme_cyclone_transforms", (object *) &__glo_letrec_91_125exp_scheme_cyclone_transforms);
  add_global("__glo_letrec_91_125bindings_191_191inline_191_191_scheme_cyclone_transforms", (object *) &__glo_letrec_91_125bindings_191_191inline_191_191_scheme_cyclone_transforms);
  add_global("__glo_letrec_91_125bindings_scheme_cyclone_transforms", (object *) &__glo_letrec_91_125bindings_scheme_cyclone_transforms);
  add_global("__glo_letrec_127_scheme_cyclone_transforms", (object *) &__glo_letrec_127_scheme_cyclone_transforms);
  add_global("__glo_let_91_125args_scheme_cyclone_transforms", (object *) &__glo_let_91_125args_scheme_cyclone_transforms);
  add_global("__glo_let_91_125bound_91vars_scheme_cyclone_transforms", (object *) &__glo_let_91_125bound_91vars_scheme_cyclone_transforms);
  add_global("__glo_let_91_125exp_191_191inline_191_191_scheme_cyclone_transforms", (object *) &__glo_let_91_125exp_191_191inline_191_191_scheme_cyclone_transforms);
  add_global("__glo_let_91_125exp_scheme_cyclone_transforms", (object *) &__glo_let_91_125exp_scheme_cyclone_transforms);
  add_global("__glo_let_91_125bindings_191_191inline_191_191_scheme_cyclone_transforms", (object *) &__glo_let_91_125bindings_191_191inline_191_191_scheme_cyclone_transforms);
  add_global("__glo_let_91_125bindings_scheme_cyclone_transforms", (object *) &__glo_let_91_125bindings_scheme_cyclone_transforms);
  add_global("__glo_let_127_scheme_cyclone_transforms", (object *) &__glo_let_127_scheme_cyclone_transforms);
  add_global("__glo_assq_91remove_91keys_scheme_cyclone_transforms", (object *) &__glo_assq_91remove_91keys_scheme_cyclone_transforms);
  add_global("__glo_assq_91remove_91key_scheme_cyclone_transforms", (object *) &__glo_assq_91remove_91key_scheme_cyclone_transforms);
  add_global("__glo_azip_scheme_cyclone_transforms", (object *) &__glo_azip_scheme_cyclone_transforms);
  add_global("__glo_reduce_scheme_cyclone_transforms", (object *) &__glo_reduce_scheme_cyclone_transforms);
  add_global("__glo_difference_scheme_cyclone_transforms", (object *) &__glo_difference_scheme_cyclone_transforms);
  add_global("__glo__union_scheme_cyclone_transforms", (object *) &__glo__union_scheme_cyclone_transforms);
  add_global("__glo_remove_scheme_cyclone_transforms", (object *) &__glo_remove_scheme_cyclone_transforms);
  add_global("__glo_insert_scheme_cyclone_transforms", (object *) &__glo_insert_scheme_cyclone_transforms);
  add_global("__glo_symbol_121_127_scheme_cyclone_transforms", (object *) &__glo_symbol_121_127_scheme_cyclone_transforms);
  add_global("__glo_symbol_121_127_191_191inline_191_191_scheme_cyclone_transforms", (object *) &__glo_symbol_121_127_191_191inline_191_191_scheme_cyclone_transforms);
  add_global("__glo_void_191_191inline_191_191_scheme_cyclone_transforms", (object *) &__glo_void_191_191inline_191_191_scheme_cyclone_transforms);
  add_global("__glo__void_scheme_cyclone_transforms", (object *) &__glo__void_scheme_cyclone_transforms);
  add_global("__glo_list_91index_scheme_cyclone_transforms", (object *) &__glo_list_91index_scheme_cyclone_transforms);
  add_global("__glo_basename_scheme_cyclone_transforms", (object *) &__glo_basename_scheme_cyclone_transforms);
  add_global("__glo_cyc_117error_scheme_cyclone_transforms", (object *) &__glo_cyc_117error_scheme_cyclone_transforms);
  add_global("__glo_trace_117debug_scheme_cyclone_transforms", (object *) &__glo_trace_117debug_scheme_cyclone_transforms);
  add_global("__glo_trace_117info_scheme_cyclone_transforms", (object *) &__glo_trace_117info_scheme_cyclone_transforms);
  add_global("__glo_trace_117warn_scheme_cyclone_transforms", (object *) &__glo_trace_117warn_scheme_cyclone_transforms);
  add_global("__glo_trace_117error_scheme_cyclone_transforms", (object *) &__glo_trace_117error_scheme_cyclone_transforms);
  add_global("__glo_trace_scheme_cyclone_transforms", (object *) &__glo_trace_scheme_cyclone_transforms);
  add_global("__glo__85trace_91level_85_scheme_cyclone_transforms", (object *) &__glo__85trace_91level_85_scheme_cyclone_transforms);
  add_global("__glo__85do_91code_91gen_85_scheme_cyclone_transforms", (object *) &__glo__85do_91code_91gen_85_scheme_cyclone_transforms);
  add_global("__glo_built_91in_91syms_scheme_cyclone_transforms", (object *) &__glo_built_91in_91syms_scheme_cyclone_transforms);
  add_global("__glo_validate_91keyword_91syntax_scheme_cyclone_transforms", (object *) &__glo_validate_91keyword_91syntax_scheme_cyclone_transforms);
  mclosure0(c_739848, (function_type)__lambda_776);c_739848.num_args = 0; 
  __glo_lib_91init_117schemecyclonetransforms_scheme_cyclone_transforms = &c_739848; 
  mclosure0(c_738875, (function_type)__lambda_661);c_738875.num_args = 1; 
  __glo_cps_91convert_scheme_cyclone_transforms = &c_738875; 
  mclosure0(c_738612, (function_type)__lambda_629);c_738612.num_args = 1; 
  __glo_prim_91convert_scheme_cyclone_transforms = &c_738612; 
  mclosure0(c_736722, (function_type)__lambda_368);c_736722.num_args = 3; 
  __glo_alpha_91convert_scheme_cyclone_transforms = &c_736722; 
  mclosure0(c_736646, (function_type)__lambda_362);c_736646.num_args = 1; 
  __glo_flatten_91sequence_scheme_cyclone_transforms = &c_736646; 
  mclosure0(c_736159, (function_type)__lambda_310);c_736159.num_args = 2; 
  __glo_wrap_91mutables_scheme_cyclone_transforms = &c_736159; 
  mclosure0(c_736048, (function_type)__lambda_293);c_736048.num_args = 1; 
  __glo_analyze_91mutable_91variables_scheme_cyclone_transforms = &c_736048; 
  mclosure0(c_736007, (function_type)__lambda_288);c_736007.num_args = 1; 
  __glo_is_91mutable_127_scheme_cyclone_transforms = &c_736007; 
  mclosure0(c_735995, (function_type)__lambda_286);c_735995.num_args = 1; 
  __glo_mark_91mutable_scheme_cyclone_transforms = &c_735995; 
  mclosure0(c_735990, (function_type)__lambda_285);c_735990.num_args = 0; 
  __glo_clear_91mutables_scheme_cyclone_transforms = &c_735990; 
  mclosure0(c_735677, (function_type)__lambda_245);c_735677.num_args = 1; 
  __glo_free_91vars_scheme_cyclone_transforms = &c_735677; 
  mclosure0(c_735503, (function_type)__lambda_215);c_735503.num_args = 2; 
  __glo_filter_91unused_91variables_scheme_cyclone_transforms = &c_735503; 
  mclosure0(c_735416, (function_type)__lambda_200);c_735416.num_args = 1; 
  __glo_global_91vars_scheme_cyclone_transforms = &c_735416; 
  mclosure0(c_735372, (function_type)__lambda_190);c_735372.num_args = 2; 
  __glo_has_91global_127_scheme_cyclone_transforms = &c_735372; 
  mclosure0(c_735034, (function_type)__lambda_165);c_735034.num_args = 4; 
  __glo_isolate_91globals_scheme_cyclone_transforms = &c_735034; 
  mclosure0(c_735030, (function_type)__lambda_830);c_735030.num_args = 1; 
  __glo_cell_91get_91_125cell_191_191inline_191_191_scheme_cyclone_transforms = &c_735030; 
  mclosure0(c_735026, (function_type)__lambda_164);c_735026.num_args = 1; 
  __glo_cell_91get_91_125cell_scheme_cyclone_transforms = &c_735026; 
  mclosure0(c_735021, (function_type)__lambda_163);c_735021.num_args = 1; 
  __glo_cell_91get_127_scheme_cyclone_transforms = &c_735021; 
  mclosure0(c_735017, (function_type)__lambda_829);c_735017.num_args = 1; 
  __glo_cell_91_125value_191_191inline_191_191_scheme_cyclone_transforms = &c_735017; 
  mclosure0(c_735013, (function_type)__lambda_162);c_735013.num_args = 1; 
  __glo_cell_91_125value_scheme_cyclone_transforms = &c_735013; 
  mclosure0(c_735008, (function_type)__lambda_161);c_735008.num_args = 1; 
  __glo_cell_127_scheme_cyclone_transforms = &c_735008; 
  mclosure0(c_735004, (function_type)__lambda_828);c_735004.num_args = 1; 
  __glo_set_91cell_67_91_125value_191_191inline_191_191_scheme_cyclone_transforms = &c_735004; 
  mclosure0(c_735000, (function_type)__lambda_160);c_735000.num_args = 1; 
  __glo_set_91cell_67_91_125value_scheme_cyclone_transforms = &c_735000; 
  mclosure0(c_734996, (function_type)__lambda_827);c_734996.num_args = 1; 
  __glo_set_91cell_67_91_125cell_191_191inline_191_191_scheme_cyclone_transforms = &c_734996; 
  mclosure0(c_734992, (function_type)__lambda_159);c_734992.num_args = 1; 
  __glo_set_91cell_67_91_125cell_scheme_cyclone_transforms = &c_734992; 
  mclosure0(c_734987, (function_type)__lambda_158);c_734987.num_args = 1; 
  __glo_set_91cell_67_127_scheme_cyclone_transforms = &c_734987; 
  mclosure0(c_734983, (function_type)__lambda_826);c_734983.num_args = 1; 
  __glo_env_91get_91_125env_191_191inline_191_191_scheme_cyclone_transforms = &c_734983; 
  mclosure0(c_734979, (function_type)__lambda_157);c_734979.num_args = 1; 
  __glo_env_91get_91_125env_scheme_cyclone_transforms = &c_734979; 
  mclosure0(c_734975, (function_type)__lambda_825);c_734975.num_args = 1; 
  __glo_env_91get_91_125field_191_191inline_191_191_scheme_cyclone_transforms = &c_734975; 
  mclosure0(c_734971, (function_type)__lambda_156);c_734971.num_args = 1; 
  __glo_env_91get_91_125field_scheme_cyclone_transforms = &c_734971; 
  mclosure0(c_734967, (function_type)__lambda_824);c_734967.num_args = 1; 
  __glo_env_91get_91_125id_191_191inline_191_191_scheme_cyclone_transforms = &c_734967; 
  mclosure0(c_734963, (function_type)__lambda_155);c_734963.num_args = 1; 
  __glo_env_91get_91_125id_scheme_cyclone_transforms = &c_734963; 
  mclosure0(c_734958, (function_type)__lambda_154);c_734958.num_args = 1; 
  __glo_env_91get_127_scheme_cyclone_transforms = &c_734958; 
  mclosure0(c_734954, (function_type)__lambda_153);c_734954.num_args = 1; 
  __glo_env_91make_91_125values_scheme_cyclone_transforms = &c_734954; 
  mclosure0(c_734950, (function_type)__lambda_152);c_734950.num_args = 1; 
  __glo_env_91make_91_125fields_scheme_cyclone_transforms = &c_734950; 
  mclosure0(c_734946, (function_type)__lambda_823);c_734946.num_args = 1; 
  __glo_env_91make_91_125id_191_191inline_191_191_scheme_cyclone_transforms = &c_734946; 
  mclosure0(c_734942, (function_type)__lambda_151);c_734942.num_args = 1; 
  __glo_env_91make_91_125id_scheme_cyclone_transforms = &c_734942; 
  mclosure0(c_734937, (function_type)__lambda_150);c_734937.num_args = 1; 
  __glo_env_91make_127_scheme_cyclone_transforms = &c_734937; 
  mclosure0(c_734933, (function_type)__lambda_822);c_734933.num_args = 1; 
  __glo_closure_91_125fv_191_191inline_191_191_scheme_cyclone_transforms = &c_734933; 
  mclosure0(c_734929, (function_type)__lambda_149);c_734929.num_args = 1; 
  __glo_closure_91_125fv_scheme_cyclone_transforms = &c_734929; 
  mclosure0(c_734925, (function_type)__lambda_821);c_734925.num_args = 1; 
  __glo_closure_91_125env_191_191inline_191_191_scheme_cyclone_transforms = &c_734925; 
  mclosure0(c_734921, (function_type)__lambda_148);c_734921.num_args = 1; 
  __glo_closure_91_125env_scheme_cyclone_transforms = &c_734921; 
  mclosure0(c_734917, (function_type)__lambda_820);c_734917.num_args = 1; 
  __glo_closure_91_125lam_191_191inline_191_191_scheme_cyclone_transforms = &c_734917; 
  mclosure0(c_734913, (function_type)__lambda_147);c_734913.num_args = 1; 
  __glo_closure_91_125lam_scheme_cyclone_transforms = &c_734913; 
  mclosure0(c_734908, (function_type)__lambda_146);c_734908.num_args = 1; 
  __glo_closure_127_scheme_cyclone_transforms = &c_734908; 
  mclosure0(c_734904, (function_type)__lambda_819);c_734904.num_args = 1; 
  __glo_begin_91_125exps_191_191inline_191_191_scheme_cyclone_transforms = &c_734904; 
  mclosure0(c_734900, (function_type)__lambda_145);c_734900.num_args = 1; 
  __glo_begin_91_125exps_scheme_cyclone_transforms = &c_734900; 
  mclosure0(c_734780, (function_type)__lambda_133);c_734780.num_args = 1; 
  __glo_precompute_91prim_91app_127_scheme_cyclone_transforms = &c_734780; 
  mclosure0(c_734776, (function_type)__lambda_818);c_734776.num_args = 1; 
  __glo_app_91_125args_191_191inline_191_191_scheme_cyclone_transforms = &c_734776; 
  mclosure0(c_734772, (function_type)__lambda_132);c_734772.num_args = 1; 
  __glo_app_91_125args_scheme_cyclone_transforms = &c_734772; 
  mclosure0(c_734768, (function_type)__lambda_817);c_734768.num_args = 1; 
  __glo_app_91_125fun_191_191inline_191_191_scheme_cyclone_transforms = &c_734768; 
  mclosure0(c_734764, (function_type)__lambda_131);c_734764.num_args = 1; 
  __glo_app_91_125fun_scheme_cyclone_transforms = &c_734764; 
  mclosure0(c_734708, (function_type)__lambda_124);c_734708.num_args = 1; 
  __glo_list_91_125pair_scheme_cyclone_transforms = &c_734708; 
  mclosure0(c_734663, (function_type)__lambda_123);c_734663.num_args = 2; 
  __glo_list_91_125lambda_91formals_scheme_cyclone_transforms = &c_734663; 
  mclosure0(c_734636, (function_type)__lambda_119);c_734636.num_args = 1; 
  __glo_lambda_91num_91args_scheme_cyclone_transforms = &c_734636; 
  mclosure0(c_734621, (function_type)__lambda_117);c_734621.num_args = 1; 
  __glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms = &c_734621; 
  mclosure0(c_734606, (function_type)__lambda_115);c_734606.num_args = 1; 
  __glo_ast_117lambda_91formals_91type_scheme_cyclone_transforms = &c_734606; 
  mclosure0(c_734602, (function_type)__lambda_114);c_734602.num_args = 1; 
  __glo_letrec_91_125args_scheme_cyclone_transforms = &c_734602; 
  mclosure0(c_734598, (function_type)__lambda_113);c_734598.num_args = 1; 
  __glo_letrec_91_125bound_91vars_scheme_cyclone_transforms = &c_734598; 
  mclosure0(c_734594, (function_type)__lambda_816);c_734594.num_args = 1; 
  __glo_letrec_91_125exp_191_191inline_191_191_scheme_cyclone_transforms = &c_734594; 
  mclosure0(c_734590, (function_type)__lambda_112);c_734590.num_args = 1; 
  __glo_letrec_91_125exp_scheme_cyclone_transforms = &c_734590; 
  mclosure0(c_734586, (function_type)__lambda_815);c_734586.num_args = 1; 
  __glo_letrec_91_125bindings_191_191inline_191_191_scheme_cyclone_transforms = &c_734586; 
  mclosure0(c_734582, (function_type)__lambda_111);c_734582.num_args = 1; 
  __glo_letrec_91_125bindings_scheme_cyclone_transforms = &c_734582; 
  mclosure0(c_734577, (function_type)__lambda_110);c_734577.num_args = 1; 
  __glo_letrec_127_scheme_cyclone_transforms = &c_734577; 
  mclosure0(c_734573, (function_type)__lambda_109);c_734573.num_args = 1; 
  __glo_let_91_125args_scheme_cyclone_transforms = &c_734573; 
  mclosure0(c_734569, (function_type)__lambda_108);c_734569.num_args = 1; 
  __glo_let_91_125bound_91vars_scheme_cyclone_transforms = &c_734569; 
  mclosure0(c_734565, (function_type)__lambda_814);c_734565.num_args = 1; 
  __glo_let_91_125exp_191_191inline_191_191_scheme_cyclone_transforms = &c_734565; 
  mclosure0(c_734561, (function_type)__lambda_107);c_734561.num_args = 1; 
  __glo_let_91_125exp_scheme_cyclone_transforms = &c_734561; 
  mclosure0(c_734557, (function_type)__lambda_813);c_734557.num_args = 1; 
  __glo_let_91_125bindings_191_191inline_191_191_scheme_cyclone_transforms = &c_734557; 
  mclosure0(c_734553, (function_type)__lambda_106);c_734553.num_args = 1; 
  __glo_let_91_125bindings_scheme_cyclone_transforms = &c_734553; 
  mclosure0(c_734548, (function_type)__lambda_105);c_734548.num_args = 1; 
  __glo_let_127_scheme_cyclone_transforms = &c_734548; 
  mclosure0(c_734534, (function_type)__lambda_103);c_734534.num_args = 2; 
  __glo_assq_91remove_91keys_scheme_cyclone_transforms = &c_734534; 
  mclosure0(c_734508, (function_type)__lambda_101);c_734508.num_args = 2; 
  __glo_assq_91remove_91key_scheme_cyclone_transforms = &c_734508; 
  mclosure0(c_734478, (function_type)__lambda_99);c_734478.num_args = 2; 
  __glo_azip_scheme_cyclone_transforms = &c_734478; 
  mclosure0(c_734463, (function_type)__lambda_97);c_734463.num_args = 3; 
  __glo_reduce_scheme_cyclone_transforms = &c_734463; 
  mclosure0(c_734449, (function_type)__lambda_95);c_734449.num_args = 2; 
  __glo_difference_scheme_cyclone_transforms = &c_734449; 
  mclosure0(c_734435, (function_type)__lambda_93);c_734435.num_args = 2; 
  __glo__union_scheme_cyclone_transforms = &c_734435; 
  mclosure0(c_734411, (function_type)__lambda_91);c_734411.num_args = 2; 
  __glo_remove_scheme_cyclone_transforms = &c_734411; 
  mclosure0(c_734410, (function_type)__lambda_812);c_734410.num_args = 2; 
  __glo_insert_scheme_cyclone_transforms = &c_734410; 
  mclosure0(c_734409, (function_type)__lambda_810);c_734409.num_args = 2; 
  __glo_symbol_121_127_scheme_cyclone_transforms = &c_734409; 
  mclosure0(c_734408, (function_type)__lambda_811);c_734408.num_args = 0; 
  __glo_symbol_121_127_191_191inline_191_191_scheme_cyclone_transforms = &c_734408; 
  mclosure0(c_734406, (function_type)__lambda_809);c_734406.num_args = 0; 
  __glo_void_191_191inline_191_191_scheme_cyclone_transforms = &c_734406; 
  mclosure0(c_734404, (function_type)__lambda_90);c_734404.num_args = 0; 
  __glo__void_scheme_cyclone_transforms = &c_734404; 
  mclosure0(c_734374, (function_type)__lambda_87);c_734374.num_args = 2; 
  __glo_list_91index_scheme_cyclone_transforms = &c_734374; 
  mclosure0(c_734344, (function_type)__lambda_83);c_734344.num_args = 1; 
  __glo_basename_scheme_cyclone_transforms = &c_734344; 
  mclosure0(c_734336, (function_type)__lambda_81);c_734336.num_args = 1; 
  __glo_cyc_117error_scheme_cyclone_transforms = &c_734336; 
  mclosure0(c_734333, (function_type)__lambda_80);c_734333.num_args = 1; 
  __glo_trace_117debug_scheme_cyclone_transforms = &c_734333; 
  mclosure0(c_734330, (function_type)__lambda_79);c_734330.num_args = 1; 
  __glo_trace_117info_scheme_cyclone_transforms = &c_734330; 
  mclosure0(c_734327, (function_type)__lambda_78);c_734327.num_args = 1; 
  __glo_trace_117warn_scheme_cyclone_transforms = &c_734327; 
  mclosure0(c_734324, (function_type)__lambda_77);c_734324.num_args = 1; 
  __glo_trace_117error_scheme_cyclone_transforms = &c_734324; 
  mclosure0(c_734298, (function_type)__lambda_71);c_734298.num_args = 4; 
  __glo_trace_scheme_cyclone_transforms = &c_734298; 
  mclosure0(c_734294, (function_type)__lambda_70);c_734294.num_args = 0; 
  __glo_built_91in_91syms_scheme_cyclone_transforms = &c_734294; 
  mclosure0(c_733788, (function_type)__lambda_1);c_733788.num_args = 1; 
  __glo_validate_91keyword_91syntax_scheme_cyclone_transforms = &c_733788; 
  __glo__85prim_91args_91table_85_scheme_cyclone_transforms = boolean_f; 
  __glo_mutable_91variables_scheme_cyclone_transforms = boolean_f; 
  __glo__85trace_91level_85_scheme_cyclone_transforms = obj_int2obj(2); 
  __glo__85do_91code_91gen_85_scheme_cyclone_transforms = boolean_t; 

  mclosure0(clo_739904, c_schemecyclonetransforms_inlinable_lambdas); make_pair(pair_739903, find_or_add_symbol("c_schemecyclonetransforms_inlinable_lambdas"), &clo_739904);
  make_cvar(cvar_739905, (object *)&__glo_lib_91init_117schemecyclonetransforms_scheme_cyclone_transforms);make_pair(pair_739906, find_or_add_symbol("lib-init:schemecyclonetransforms"), &cvar_739905);
  make_cvar(cvar_739907, (object *)&__glo_cps_91convert_scheme_cyclone_transforms);make_pair(pair_739908, find_or_add_symbol("cps-convert"), &cvar_739907);
  make_cvar(cvar_739909, (object *)&__glo__85prim_91args_91table_85_scheme_cyclone_transforms);make_pair(pair_739910, find_or_add_symbol("*prim-args-table*"), &cvar_739909);
  make_cvar(cvar_739911, (object *)&__glo_prim_91convert_scheme_cyclone_transforms);make_pair(pair_739912, find_or_add_symbol("prim-convert"), &cvar_739911);
  make_cvar(cvar_739913, (object *)&__glo_alpha_91convert_scheme_cyclone_transforms);make_pair(pair_739914, find_or_add_symbol("alpha-convert"), &cvar_739913);
  make_cvar(cvar_739915, (object *)&__glo_flatten_91sequence_scheme_cyclone_transforms);make_pair(pair_739916, find_or_add_symbol("flatten-sequence"), &cvar_739915);
  make_cvar(cvar_739917, (object *)&__glo_wrap_91mutables_scheme_cyclone_transforms);make_pair(pair_739918, find_or_add_symbol("wrap-mutables"), &cvar_739917);
  make_cvar(cvar_739919, (object *)&__glo_analyze_91mutable_91variables_scheme_cyclone_transforms);make_pair(pair_739920, find_or_add_symbol("analyze-mutable-variables"), &cvar_739919);
  make_cvar(cvar_739921, (object *)&__glo_is_91mutable_127_scheme_cyclone_transforms);make_pair(pair_739922, find_or_add_symbol("is-mutable?"), &cvar_739921);
  make_cvar(cvar_739923, (object *)&__glo_mark_91mutable_scheme_cyclone_transforms);make_pair(pair_739924, find_or_add_symbol("mark-mutable"), &cvar_739923);
  make_cvar(cvar_739925, (object *)&__glo_clear_91mutables_scheme_cyclone_transforms);make_pair(pair_739926, find_or_add_symbol("clear-mutables"), &cvar_739925);
  make_cvar(cvar_739927, (object *)&__glo_mutable_91variables_scheme_cyclone_transforms);make_pair(pair_739928, find_or_add_symbol("mutable-variables"), &cvar_739927);
  make_cvar(cvar_739929, (object *)&__glo_free_91vars_scheme_cyclone_transforms);make_pair(pair_739930, find_or_add_symbol("free-vars"), &cvar_739929);
  make_cvar(cvar_739931, (object *)&__glo_filter_91unused_91variables_scheme_cyclone_transforms);make_pair(pair_739932, find_or_add_symbol("filter-unused-variables"), &cvar_739931);
  make_cvar(cvar_739933, (object *)&__glo_global_91vars_scheme_cyclone_transforms);make_pair(pair_739934, find_or_add_symbol("global-vars"), &cvar_739933);
  make_cvar(cvar_739935, (object *)&__glo_has_91global_127_scheme_cyclone_transforms);make_pair(pair_739936, find_or_add_symbol("has-global?"), &cvar_739935);
  make_cvar(cvar_739937, (object *)&__glo_isolate_91globals_scheme_cyclone_transforms);make_pair(pair_739938, find_or_add_symbol("isolate-globals"), &cvar_739937);
  make_cvar(cvar_739939, (object *)&__glo_cell_91get_91_125cell_191_191inline_191_191_scheme_cyclone_transforms);make_pair(pair_739940, find_or_add_symbol("cell-get->cell__inline__"), &cvar_739939);
  make_cvar(cvar_739941, (object *)&__glo_cell_91get_91_125cell_scheme_cyclone_transforms);make_pair(pair_739942, find_or_add_symbol("cell-get->cell"), &cvar_739941);
  make_cvar(cvar_739943, (object *)&__glo_cell_91get_127_scheme_cyclone_transforms);make_pair(pair_739944, find_or_add_symbol("cell-get?"), &cvar_739943);
  make_cvar(cvar_739945, (object *)&__glo_cell_91_125value_191_191inline_191_191_scheme_cyclone_transforms);make_pair(pair_739946, find_or_add_symbol("cell->value__inline__"), &cvar_739945);
  make_cvar(cvar_739947, (object *)&__glo_cell_91_125value_scheme_cyclone_transforms);make_pair(pair_739948, find_or_add_symbol("cell->value"), &cvar_739947);
  make_cvar(cvar_739949, (object *)&__glo_cell_127_scheme_cyclone_transforms);make_pair(pair_739950, find_or_add_symbol("cell?"), &cvar_739949);
  make_cvar(cvar_739951, (object *)&__glo_set_91cell_67_91_125value_191_191inline_191_191_scheme_cyclone_transforms);make_pair(pair_739952, find_or_add_symbol("set-cell!->value__inline__"), &cvar_739951);
  make_cvar(cvar_739953, (object *)&__glo_set_91cell_67_91_125value_scheme_cyclone_transforms);make_pair(pair_739954, find_or_add_symbol("set-cell!->value"), &cvar_739953);
  make_cvar(cvar_739955, (object *)&__glo_set_91cell_67_91_125cell_191_191inline_191_191_scheme_cyclone_transforms);make_pair(pair_739956, find_or_add_symbol("set-cell!->cell__inline__"), &cvar_739955);
  make_cvar(cvar_739957, (object *)&__glo_set_91cell_67_91_125cell_scheme_cyclone_transforms);make_pair(pair_739958, find_or_add_symbol("set-cell!->cell"), &cvar_739957);
  make_cvar(cvar_739959, (object *)&__glo_set_91cell_67_127_scheme_cyclone_transforms);make_pair(pair_739960, find_or_add_symbol("set-cell!?"), &cvar_739959);
  make_cvar(cvar_739961, (object *)&__glo_env_91get_91_125env_191_191inline_191_191_scheme_cyclone_transforms);make_pair(pair_739962, find_or_add_symbol("env-get->env__inline__"), &cvar_739961);
  make_cvar(cvar_739963, (object *)&__glo_env_91get_91_125env_scheme_cyclone_transforms);make_pair(pair_739964, find_or_add_symbol("env-get->env"), &cvar_739963);
  make_cvar(cvar_739965, (object *)&__glo_env_91get_91_125field_191_191inline_191_191_scheme_cyclone_transforms);make_pair(pair_739966, find_or_add_symbol("env-get->field__inline__"), &cvar_739965);
  make_cvar(cvar_739967, (object *)&__glo_env_91get_91_125field_scheme_cyclone_transforms);make_pair(pair_739968, find_or_add_symbol("env-get->field"), &cvar_739967);
  make_cvar(cvar_739969, (object *)&__glo_env_91get_91_125id_191_191inline_191_191_scheme_cyclone_transforms);make_pair(pair_739970, find_or_add_symbol("env-get->id__inline__"), &cvar_739969);
  make_cvar(cvar_739971, (object *)&__glo_env_91get_91_125id_scheme_cyclone_transforms);make_pair(pair_739972, find_or_add_symbol("env-get->id"), &cvar_739971);
  make_cvar(cvar_739973, (object *)&__glo_env_91get_127_scheme_cyclone_transforms);make_pair(pair_739974, find_or_add_symbol("env-get?"), &cvar_739973);
  make_cvar(cvar_739975, (object *)&__glo_env_91make_91_125values_scheme_cyclone_transforms);make_pair(pair_739976, find_or_add_symbol("env-make->values"), &cvar_739975);
  make_cvar(cvar_739977, (object *)&__glo_env_91make_91_125fields_scheme_cyclone_transforms);make_pair(pair_739978, find_or_add_symbol("env-make->fields"), &cvar_739977);
  make_cvar(cvar_739979, (object *)&__glo_env_91make_91_125id_191_191inline_191_191_scheme_cyclone_transforms);make_pair(pair_739980, find_or_add_symbol("env-make->id__inline__"), &cvar_739979);
  make_cvar(cvar_739981, (object *)&__glo_env_91make_91_125id_scheme_cyclone_transforms);make_pair(pair_739982, find_or_add_symbol("env-make->id"), &cvar_739981);
  make_cvar(cvar_739983, (object *)&__glo_env_91make_127_scheme_cyclone_transforms);make_pair(pair_739984, find_or_add_symbol("env-make?"), &cvar_739983);
  make_cvar(cvar_739985, (object *)&__glo_closure_91_125fv_191_191inline_191_191_scheme_cyclone_transforms);make_pair(pair_739986, find_or_add_symbol("closure->fv__inline__"), &cvar_739985);
  make_cvar(cvar_739987, (object *)&__glo_closure_91_125fv_scheme_cyclone_transforms);make_pair(pair_739988, find_or_add_symbol("closure->fv"), &cvar_739987);
  make_cvar(cvar_739989, (object *)&__glo_closure_91_125env_191_191inline_191_191_scheme_cyclone_transforms);make_pair(pair_739990, find_or_add_symbol("closure->env__inline__"), &cvar_739989);
  make_cvar(cvar_739991, (object *)&__glo_closure_91_125env_scheme_cyclone_transforms);make_pair(pair_739992, find_or_add_symbol("closure->env"), &cvar_739991);
  make_cvar(cvar_739993, (object *)&__glo_closure_91_125lam_191_191inline_191_191_scheme_cyclone_transforms);make_pair(pair_739994, find_or_add_symbol("closure->lam__inline__"), &cvar_739993);
  make_cvar(cvar_739995, (object *)&__glo_closure_91_125lam_scheme_cyclone_transforms);make_pair(pair_739996, find_or_add_symbol("closure->lam"), &cvar_739995);
  make_cvar(cvar_739997, (object *)&__glo_closure_127_scheme_cyclone_transforms);make_pair(pair_739998, find_or_add_symbol("closure?"), &cvar_739997);
  make_cvar(cvar_739999, (object *)&__glo_begin_91_125exps_191_191inline_191_191_scheme_cyclone_transforms);make_pair(pair_7310000, find_or_add_symbol("begin->exps__inline__"), &cvar_739999);
  make_cvar(cvar_7310001, (object *)&__glo_begin_91_125exps_scheme_cyclone_transforms);make_pair(pair_7310002, find_or_add_symbol("begin->exps"), &cvar_7310001);
  make_cvar(cvar_7310003, (object *)&__glo_precompute_91prim_91app_127_scheme_cyclone_transforms);make_pair(pair_7310004, find_or_add_symbol("precompute-prim-app?"), &cvar_7310003);
  make_cvar(cvar_7310005, (object *)&__glo_app_91_125args_191_191inline_191_191_scheme_cyclone_transforms);make_pair(pair_7310006, find_or_add_symbol("app->args__inline__"), &cvar_7310005);
  make_cvar(cvar_7310007, (object *)&__glo_app_91_125args_scheme_cyclone_transforms);make_pair(pair_7310008, find_or_add_symbol("app->args"), &cvar_7310007);
  make_cvar(cvar_7310009, (object *)&__glo_app_91_125fun_191_191inline_191_191_scheme_cyclone_transforms);make_pair(pair_7310010, find_or_add_symbol("app->fun__inline__"), &cvar_7310009);
  make_cvar(cvar_7310011, (object *)&__glo_app_91_125fun_scheme_cyclone_transforms);make_pair(pair_7310012, find_or_add_symbol("app->fun"), &cvar_7310011);
  make_cvar(cvar_7310013, (object *)&__glo_list_91_125pair_scheme_cyclone_transforms);make_pair(pair_7310014, find_or_add_symbol("list->pair"), &cvar_7310013);
  make_cvar(cvar_7310015, (object *)&__glo_list_91_125lambda_91formals_scheme_cyclone_transforms);make_pair(pair_7310016, find_or_add_symbol("list->lambda-formals"), &cvar_7310015);
  make_cvar(cvar_7310017, (object *)&__glo_lambda_91num_91args_scheme_cyclone_transforms);make_pair(pair_7310018, find_or_add_symbol("lambda-num-args"), &cvar_7310017);
  make_cvar(cvar_7310019, (object *)&__glo_ast_117lambda_91formals_91_125list_scheme_cyclone_transforms);make_pair(pair_7310020, find_or_add_symbol("ast:lambda-formals->list"), &cvar_7310019);
  make_cvar(cvar_7310021, (object *)&__glo_ast_117lambda_91formals_91type_scheme_cyclone_transforms);make_pair(pair_7310022, find_or_add_symbol("ast:lambda-formals-type"), &cvar_7310021);
  make_cvar(cvar_7310023, (object *)&__glo_letrec_91_125args_scheme_cyclone_transforms);make_pair(pair_7310024, find_or_add_symbol("letrec->args"), &cvar_7310023);
  make_cvar(cvar_7310025, (object *)&__glo_letrec_91_125bound_91vars_scheme_cyclone_transforms);make_pair(pair_7310026, find_or_add_symbol("letrec->bound-vars"), &cvar_7310025);
  make_cvar(cvar_7310027, (object *)&__glo_letrec_91_125exp_191_191inline_191_191_scheme_cyclone_transforms);make_pair(pair_7310028, find_or_add_symbol("letrec->exp__inline__"), &cvar_7310027);
  make_cvar(cvar_7310029, (object *)&__glo_letrec_91_125exp_scheme_cyclone_transforms);make_pair(pair_7310030, find_or_add_symbol("letrec->exp"), &cvar_7310029);
  make_cvar(cvar_7310031, (object *)&__glo_letrec_91_125bindings_191_191inline_191_191_scheme_cyclone_transforms);make_pair(pair_7310032, find_or_add_symbol("letrec->bindings__inline__"), &cvar_7310031);
  make_cvar(cvar_7310033, (object *)&__glo_letrec_91_125bindings_scheme_cyclone_transforms);make_pair(pair_7310034, find_or_add_symbol("letrec->bindings"), &cvar_7310033);
  make_cvar(cvar_7310035, (object *)&__glo_letrec_127_scheme_cyclone_transforms);make_pair(pair_7310036, find_or_add_symbol("letrec?"), &cvar_7310035);
  make_cvar(cvar_7310037, (object *)&__glo_let_91_125args_scheme_cyclone_transforms);make_pair(pair_7310038, find_or_add_symbol("let->args"), &cvar_7310037);
  make_cvar(cvar_7310039, (object *)&__glo_let_91_125bound_91vars_scheme_cyclone_transforms);make_pair(pair_7310040, find_or_add_symbol("let->bound-vars"), &cvar_7310039);
  make_cvar(cvar_7310041, (object *)&__glo_let_91_125exp_191_191inline_191_191_scheme_cyclone_transforms);make_pair(pair_7310042, find_or_add_symbol("let->exp__inline__"), &cvar_7310041);
  make_cvar(cvar_7310043, (object *)&__glo_let_91_125exp_scheme_cyclone_transforms);make_pair(pair_7310044, find_or_add_symbol("let->exp"), &cvar_7310043);
  make_cvar(cvar_7310045, (object *)&__glo_let_91_125bindings_191_191inline_191_191_scheme_cyclone_transforms);make_pair(pair_7310046, find_or_add_symbol("let->bindings__inline__"), &cvar_7310045);
  make_cvar(cvar_7310047, (object *)&__glo_let_91_125bindings_scheme_cyclone_transforms);make_pair(pair_7310048, find_or_add_symbol("let->bindings"), &cvar_7310047);
  make_cvar(cvar_7310049, (object *)&__glo_let_127_scheme_cyclone_transforms);make_pair(pair_7310050, find_or_add_symbol("let?"), &cvar_7310049);
  make_cvar(cvar_7310051, (object *)&__glo_assq_91remove_91keys_scheme_cyclone_transforms);make_pair(pair_7310052, find_or_add_symbol("assq-remove-keys"), &cvar_7310051);
  make_cvar(cvar_7310053, (object *)&__glo_assq_91remove_91key_scheme_cyclone_transforms);make_pair(pair_7310054, find_or_add_symbol("assq-remove-key"), &cvar_7310053);
  make_cvar(cvar_7310055, (object *)&__glo_azip_scheme_cyclone_transforms);make_pair(pair_7310056, find_or_add_symbol("azip"), &cvar_7310055);
  make_cvar(cvar_7310057, (object *)&__glo_reduce_scheme_cyclone_transforms);make_pair(pair_7310058, find_or_add_symbol("reduce"), &cvar_7310057);
  make_cvar(cvar_7310059, (object *)&__glo_difference_scheme_cyclone_transforms);make_pair(pair_7310060, find_or_add_symbol("difference"), &cvar_7310059);
  make_cvar(cvar_7310061, (object *)&__glo__union_scheme_cyclone_transforms);make_pair(pair_7310062, find_or_add_symbol("union"), &cvar_7310061);
  make_cvar(cvar_7310063, (object *)&__glo_remove_scheme_cyclone_transforms);make_pair(pair_7310064, find_or_add_symbol("remove"), &cvar_7310063);
  make_cvar(cvar_7310065, (object *)&__glo_insert_scheme_cyclone_transforms);make_pair(pair_7310066, find_or_add_symbol("insert"), &cvar_7310065);
  make_cvar(cvar_7310067, (object *)&__glo_symbol_121_127_scheme_cyclone_transforms);make_pair(pair_7310068, find_or_add_symbol("symbol<?"), &cvar_7310067);
  make_cvar(cvar_7310069, (object *)&__glo_symbol_121_127_191_191inline_191_191_scheme_cyclone_transforms);make_pair(pair_7310070, find_or_add_symbol("symbol<?__inline__"), &cvar_7310069);
  make_cvar(cvar_7310071, (object *)&__glo_void_191_191inline_191_191_scheme_cyclone_transforms);make_pair(pair_7310072, find_or_add_symbol("void__inline__"), &cvar_7310071);
  make_cvar(cvar_7310073, (object *)&__glo__void_scheme_cyclone_transforms);make_pair(pair_7310074, find_or_add_symbol("void"), &cvar_7310073);
  make_cvar(cvar_7310075, (object *)&__glo_list_91index_scheme_cyclone_transforms);make_pair(pair_7310076, find_or_add_symbol("list-index"), &cvar_7310075);
  make_cvar(cvar_7310077, (object *)&__glo_basename_scheme_cyclone_transforms);make_pair(pair_7310078, find_or_add_symbol("basename"), &cvar_7310077);
  make_cvar(cvar_7310079, (object *)&__glo_cyc_117error_scheme_cyclone_transforms);make_pair(pair_7310080, find_or_add_symbol("cyc:error"), &cvar_7310079);
  make_cvar(cvar_7310081, (object *)&__glo_trace_117debug_scheme_cyclone_transforms);make_pair(pair_7310082, find_or_add_symbol("trace:debug"), &cvar_7310081);
  make_cvar(cvar_7310083, (object *)&__glo_trace_117info_scheme_cyclone_transforms);make_pair(pair_7310084, find_or_add_symbol("trace:info"), &cvar_7310083);
  make_cvar(cvar_7310085, (object *)&__glo_trace_117warn_scheme_cyclone_transforms);make_pair(pair_7310086, find_or_add_symbol("trace:warn"), &cvar_7310085);
  make_cvar(cvar_7310087, (object *)&__glo_trace_117error_scheme_cyclone_transforms);make_pair(pair_7310088, find_or_add_symbol("trace:error"), &cvar_7310087);
  make_cvar(cvar_7310089, (object *)&__glo_trace_scheme_cyclone_transforms);make_pair(pair_7310090, find_or_add_symbol("trace"), &cvar_7310089);
  make_cvar(cvar_7310091, (object *)&__glo__85trace_91level_85_scheme_cyclone_transforms);make_pair(pair_7310092, find_or_add_symbol("*trace-level*"), &cvar_7310091);
  make_cvar(cvar_7310093, (object *)&__glo__85do_91code_91gen_85_scheme_cyclone_transforms);make_pair(pair_7310094, find_or_add_symbol("*do-code-gen*"), &cvar_7310093);
  make_cvar(cvar_7310095, (object *)&__glo_built_91in_91syms_scheme_cyclone_transforms);make_pair(pair_7310096, find_or_add_symbol("built-in-syms"), &cvar_7310095);
  make_cvar(cvar_7310097, (object *)&__glo_validate_91keyword_91syntax_scheme_cyclone_transforms);make_pair(pair_7310098, find_or_add_symbol("validate-keyword-syntax"), &cvar_7310097);
__glo__85primitives_85_scheme_cyclone_transforms = __glo__85primitives_85_scheme_cyclone_primitives;
make_pair(c_7310196, &pair_739903,Cyc_global_variables);
make_pair(c_7310195, &pair_739906, &c_7310196);
make_pair(c_7310194, &pair_739908, &c_7310195);
make_pair(c_7310193, &pair_739910, &c_7310194);
make_pair(c_7310192, &pair_739912, &c_7310193);
make_pair(c_7310191, &pair_739914, &c_7310192);
make_pair(c_7310190, &pair_739916, &c_7310191);
make_pair(c_7310189, &pair_739918, &c_7310190);
make_pair(c_7310188, &pair_739920, &c_7310189);
make_pair(c_7310187, &pair_739922, &c_7310188);
make_pair(c_7310186, &pair_739924, &c_7310187);
make_pair(c_7310185, &pair_739926, &c_7310186);
make_pair(c_7310184, &pair_739928, &c_7310185);
make_pair(c_7310183, &pair_739930, &c_7310184);
make_pair(c_7310182, &pair_739932, &c_7310183);
make_pair(c_7310181, &pair_739934, &c_7310182);
make_pair(c_7310180, &pair_739936, &c_7310181);
make_pair(c_7310179, &pair_739938, &c_7310180);
make_pair(c_7310178, &pair_739940, &c_7310179);
make_pair(c_7310177, &pair_739942, &c_7310178);
make_pair(c_7310176, &pair_739944, &c_7310177);
make_pair(c_7310175, &pair_739946, &c_7310176);
make_pair(c_7310174, &pair_739948, &c_7310175);
make_pair(c_7310173, &pair_739950, &c_7310174);
make_pair(c_7310172, &pair_739952, &c_7310173);
make_pair(c_7310171, &pair_739954, &c_7310172);
make_pair(c_7310170, &pair_739956, &c_7310171);
make_pair(c_7310169, &pair_739958, &c_7310170);
make_pair(c_7310168, &pair_739960, &c_7310169);
make_pair(c_7310167, &pair_739962, &c_7310168);
make_pair(c_7310166, &pair_739964, &c_7310167);
make_pair(c_7310165, &pair_739966, &c_7310166);
make_pair(c_7310164, &pair_739968, &c_7310165);
make_pair(c_7310163, &pair_739970, &c_7310164);
make_pair(c_7310162, &pair_739972, &c_7310163);
make_pair(c_7310161, &pair_739974, &c_7310162);
make_pair(c_7310160, &pair_739976, &c_7310161);
make_pair(c_7310159, &pair_739978, &c_7310160);
make_pair(c_7310158, &pair_739980, &c_7310159);
make_pair(c_7310157, &pair_739982, &c_7310158);
make_pair(c_7310156, &pair_739984, &c_7310157);
make_pair(c_7310155, &pair_739986, &c_7310156);
make_pair(c_7310154, &pair_739988, &c_7310155);
make_pair(c_7310153, &pair_739990, &c_7310154);
make_pair(c_7310152, &pair_739992, &c_7310153);
make_pair(c_7310151, &pair_739994, &c_7310152);
make_pair(c_7310150, &pair_739996, &c_7310151);
make_pair(c_7310149, &pair_739998, &c_7310150);
make_pair(c_7310148, &pair_7310000, &c_7310149);
make_pair(c_7310147, &pair_7310002, &c_7310148);
make_pair(c_7310146, &pair_7310004, &c_7310147);
make_pair(c_7310145, &pair_7310006, &c_7310146);
make_pair(c_7310144, &pair_7310008, &c_7310145);
make_pair(c_7310143, &pair_7310010, &c_7310144);
make_pair(c_7310142, &pair_7310012, &c_7310143);
make_pair(c_7310141, &pair_7310014, &c_7310142);
make_pair(c_7310140, &pair_7310016, &c_7310141);
make_pair(c_7310139, &pair_7310018, &c_7310140);
make_pair(c_7310138, &pair_7310020, &c_7310139);
make_pair(c_7310137, &pair_7310022, &c_7310138);
make_pair(c_7310136, &pair_7310024, &c_7310137);
make_pair(c_7310135, &pair_7310026, &c_7310136);
make_pair(c_7310134, &pair_7310028, &c_7310135);
make_pair(c_7310133, &pair_7310030, &c_7310134);
make_pair(c_7310132, &pair_7310032, &c_7310133);
make_pair(c_7310131, &pair_7310034, &c_7310132);
make_pair(c_7310130, &pair_7310036, &c_7310131);
make_pair(c_7310129, &pair_7310038, &c_7310130);
make_pair(c_7310128, &pair_7310040, &c_7310129);
make_pair(c_7310127, &pair_7310042, &c_7310128);
make_pair(c_7310126, &pair_7310044, &c_7310127);
make_pair(c_7310125, &pair_7310046, &c_7310126);
make_pair(c_7310124, &pair_7310048, &c_7310125);
make_pair(c_7310123, &pair_7310050, &c_7310124);
make_pair(c_7310122, &pair_7310052, &c_7310123);
make_pair(c_7310121, &pair_7310054, &c_7310122);
make_pair(c_7310120, &pair_7310056, &c_7310121);
make_pair(c_7310119, &pair_7310058, &c_7310120);
make_pair(c_7310118, &pair_7310060, &c_7310119);
make_pair(c_7310117, &pair_7310062, &c_7310118);
make_pair(c_7310116, &pair_7310064, &c_7310117);
make_pair(c_7310115, &pair_7310066, &c_7310116);
make_pair(c_7310114, &pair_7310068, &c_7310115);
make_pair(c_7310113, &pair_7310070, &c_7310114);
make_pair(c_7310112, &pair_7310072, &c_7310113);
make_pair(c_7310111, &pair_7310074, &c_7310112);
make_pair(c_7310110, &pair_7310076, &c_7310111);
make_pair(c_7310109, &pair_7310078, &c_7310110);
make_pair(c_7310108, &pair_7310080, &c_7310109);
make_pair(c_7310107, &pair_7310082, &c_7310108);
make_pair(c_7310106, &pair_7310084, &c_7310107);
make_pair(c_7310105, &pair_7310086, &c_7310106);
make_pair(c_7310104, &pair_7310088, &c_7310105);
make_pair(c_7310103, &pair_7310090, &c_7310104);
make_pair(c_7310102, &pair_7310092, &c_7310103);
make_pair(c_7310101, &pair_7310094, &c_7310102);
make_pair(c_7310100, &pair_7310096, &c_7310101);
make_pair(c_7310099, &pair_7310098, &c_7310100);
Cyc_global_variables = &c_7310099;
object buf[1]; buf[0] = ((closure1_type *)clo)->element;
(((closure)__glo_lib_91init_117schemecyclonetransforms_scheme_cyclone_transforms)->fn)(data, buf[0], 1, buf);
}
void c_schemecyclonetransforms_entry_pt(void *data, object cont, int argc, object value){ 
  register_library("scheme_cyclone_transforms");
  mclosure1(clo, c_schemecyclonetransforms_entry_pt_first_lambda, ((closure1_type *)cont)->element);
  object buf[1]; buf[0] = cont;
  GC(data, (closure)&clo, buf, 1);

}
