/**
 ** 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); \
 }}

#include "cyclone/types.h"
object __glo_lib_91init_117schemecycloneprimitives_scheme_cyclone_primitives = NULL;
object __glo_prim_117func_91_125prim_scheme_cyclone_primitives = NULL;
object __glo__91_125dyadic_scheme_cyclone_primitives = NULL;
object __glo_prim_117inline_91convert_91prim_91call_scheme_cyclone_primitives = NULL;
object __glo_prim_117immutable_91args_95result_127_scheme_cyclone_primitives = NULL;
object __glo_prim_117allocates_91object_127_scheme_cyclone_primitives = NULL;
object __glo_prim_117arg_91count_127_scheme_cyclone_primitives = NULL;
object __glo_prim_117cont_95no_91args_127_scheme_cyclone_primitives = NULL;
object __glo_prim_117cont_127_scheme_cyclone_primitives = NULL;
object __glo_prim_95cvar_127_scheme_cyclone_primitives = NULL;
object __glo_prim_95c_91var_91assign_scheme_cyclone_primitives = NULL;
object __glo_prim_95c_91var_91pointer_scheme_cyclone_primitives = NULL;
object __glo_prim_95data_91arg_127_scheme_cyclone_primitives = NULL;
object __glo__191prim_91_125c_91func_scheme_cyclone_primitives = NULL;
object __glo_prim_91_125c_91func_scheme_cyclone_primitives = NULL;
object __glo_prim_91_125c_91func_91uses_91alloca_127_scheme_cyclone_primitives = NULL;
object __glo_prim_91call_127_scheme_cyclone_primitives = NULL;
object __glo_prim_117check_91arg_91count_scheme_cyclone_primitives = NULL;
object __glo__85primitives_91num_91args_85_scheme_cyclone_primitives = NULL;
object __glo__85primitives_85_scheme_cyclone_primitives = NULL;
object __glo_prim_117mutates_127_scheme_cyclone_primitives = NULL;
object __glo_prim_127_scheme_cyclone_primitives = NULL;
object __glo__85hs_91prims_85_scheme_cyclone_primitives = NULL;
object __glo_prim_117udf_127_scheme_cyclone_primitives = NULL;
object __glo_prim_117add_91udf_67_scheme_cyclone_primitives = NULL;
object __glo__85udf_91cps_91_125inline_85_scheme_cyclone_primitives = NULL;
object __glo__85udf_91prims_85_scheme_cyclone_primitives = NULL;
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_base;
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_hs_91create_scheme_cyclone_hashset;
extern object __glo_hs_91destroy_67_scheme_cyclone_hashset;
extern object __glo_hs_91num_91items_scheme_cyclone_hashset;
extern object __glo_hs_91add_67_scheme_cyclone_hashset;
extern object __glo_hs_91add_91all_67_scheme_cyclone_hashset;
extern object __glo_hs_91remove_67_scheme_cyclone_hashset;
extern object __glo_hs_91member_127_scheme_cyclone_hashset;
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_void_191_191inline_191_191_scheme_base;
extern object __glo_make_91record_91marker_191_191inline_191_191_scheme_base;
extern object __glo_symbol_91hash_191_191inline_191_191_srfi_69;
#include "cyclone/runtime.h"
defsymbol(_85hs_91prims_85);
defsymbol(_85primitives_85);
defsymbol(_85primitives_91num_91args_85);
defsymbol(peek_91char);
defsymbol(read_91char);
defsymbol(char_121_123_127);
defsymbol(char_125_123_127);
defsymbol(char_121_127);
defsymbol(char_125_127);
defsymbol(char_123_127);
defsymbol(error);
defsymbol(Cyc_91global_91vars);
defsymbol(Cyc_91get_91cvar);
defsymbol(Cyc_91cvar_127);
defsymbol(Cyc_91opaque_127);
defsymbol(Cyc_91has_91cycle_127);
defsymbol(Cyc_91stdout);
defsymbol(Cyc_91stdin);
defsymbol(Cyc_91stderr);
defsymbol(Cyc_91if);
defsymbol(Cyc_91foreign_91code);
defsymbol(Cyc_91foreign_91value);
defsymbol(Cyc_91fast_91plus);
defsymbol(Cyc_91fast_91sub);
defsymbol(Cyc_91fast_91mul);
defsymbol(Cyc_91fast_91div);
defsymbol(_87);
defsymbol(_91);
defsymbol(_85);
defsymbol(_95);
defsymbol(Cyc_91fast_91eq);
defsymbol(Cyc_91fast_91gt);
defsymbol(Cyc_91fast_91lt);
defsymbol(Cyc_91fast_91gte);
defsymbol(Cyc_91fast_91lte);
defsymbol(Cyc_91fast_91char_91eq);
defsymbol(Cyc_91fast_91char_91gt);
defsymbol(Cyc_91fast_91char_91lt);
defsymbol(Cyc_91fast_91char_91gte);
defsymbol(Cyc_91fast_91char_91lte);
defsymbol(_123);
defsymbol(_125);
defsymbol(_121);
defsymbol(_125_123);
defsymbol(_121_123);
defsymbol(_75halt);
defsymbol(exit);
defsymbol(Cyc_91default_91exception_91handler);
defsymbol(Cyc_91current_91exception_91handler);
defsymbol(open_91input_91file);
defsymbol(open_91output_91file);
defsymbol(open_91binary_91input_91file);
defsymbol(open_91binary_91output_91file);
defsymbol(close_91port);
defsymbol(close_91input_91port);
defsymbol(close_91output_91port);
defsymbol(Cyc_91flush_91output_91port);
defsymbol(file_91exists_127);
defsymbol(delete_91file);
defsymbol(Cyc_91read_91char);
defsymbol(Cyc_91peek_91char);
defsymbol(Cyc_91read_91line);
defsymbol(Cyc_91display);
defsymbol(Cyc_91write);
defsymbol(Cyc_91write_91char);
defsymbol(Cyc_91unsafe_91car);
defsymbol(Cyc_91unsafe_91cdr);
defsymbol(car);
defsymbol(cdr);
defsymbol(caar);
defsymbol(cadr);
defsymbol(cdar);
defsymbol(cddr);
defsymbol(caaar);
defsymbol(caadr);
defsymbol(cadar);
defsymbol(caddr);
defsymbol(cdaar);
defsymbol(cdadr);
defsymbol(cddar);
defsymbol(cdddr);
defsymbol(caaaar);
defsymbol(caaadr);
defsymbol(caadar);
defsymbol(caaddr);
defsymbol(cadaar);
defsymbol(cadadr);
defsymbol(caddar);
defsymbol(cadddr);
defsymbol(cdaaar);
defsymbol(cdaadr);
defsymbol(cdadar);
defsymbol(cdaddr);
defsymbol(cddaar);
defsymbol(cddadr);
defsymbol(cdddar);
defsymbol(cddddr);
defsymbol(char_91_125integer);
defsymbol(integer_91_125char);
defsymbol(string_91_125number);
defsymbol(list_91_125string);
defsymbol(make_91bytevector);
defsymbol(bytevector_91length);
defsymbol(bytevector);
defsymbol(bytevector_91append);
defsymbol(Cyc_91bytevector_91copy);
defsymbol(Cyc_91utf8_91_125string);
defsymbol(Cyc_91string_91_125utf8);
defsymbol(bytevector_91u8_91ref);
defsymbol(make_91vector);
defsymbol(list_91_125vector);
defsymbol(vector_91length);
defsymbol(vector_91ref);
defsymbol(string_91append);
defsymbol(string_91cmp);
defsymbol(string_91_125symbol);
defsymbol(symbol_91_125string);
defsymbol(number_91_125string);
defsymbol(string_91length);
defsymbol(string_91ref);
defsymbol(substring);
defsymbol(Cyc_91installation_91dir);
defsymbol(Cyc_91compilation_91environment);
defsymbol(command_91line_91arguments);
defsymbol(system);
defsymbol(length);
defsymbol(eq_127);
defsymbol(eqv_127);
defsymbol(equal_127);
defsymbol(Cyc_91fast_91member);
defsymbol(Cyc_91fast_91assoc);
defsymbol(assq);
defsymbol(assv);
defsymbol(memq);
defsymbol(memv);
defsymbol(boolean_127);
defsymbol(char_127);
defsymbol(null_127);
defsymbol(number_127);
defsymbol(real_127);
defsymbol(integer_127);
defsymbol(pair_127);
defsymbol(procedure_127);
defsymbol(Cyc_91macro_127);
defsymbol(port_127);
defsymbol(vector_127);
defsymbol(bytevector_127);
defsymbol(string_127);
defsymbol(eof_91object_127);
defsymbol(symbol_127);
defsymbol(cons);
defsymbol(Cyc_91fast_91vector_912);
defsymbol(Cyc_91fast_91vector_913);
defsymbol(Cyc_91fast_91vector_914);
defsymbol(Cyc_91fast_91vector_915);
defsymbol(Cyc_91fast_91list_911);
defsymbol(Cyc_91fast_91list_912);
defsymbol(Cyc_91fast_91list_913);
defsymbol(Cyc_91fast_91list_914);
defsymbol(cell);
defsymbol(cell_91get);
defsymbol(vector_91set_67);
defsymbol(bytevector_91u8_91set_67);
defsymbol(string_91set_67);
defsymbol(set_91cdr_67);
defsymbol(set_91car_67);
defsymbol(set_91cell_67);
defsymbol(set_91global_91unsafe_67);
defsymbol(set_91global_67);
defsymbol(Cyc_91end_91thread_67);
defsymbol(Cyc_91spawn_91thread_67);
defsymbol(Cyc_91set_91cvar_67);
defsymbol(Cyc_91fast_91apply);
defsymbol(apply);
defsymbol(_85udf_91cps_91_125inline_85);
defsymbol(_85udf_91prims_85);
static void __lambda_230(void *data, object clo, int argc, object *args) ;/*closure _,object k_731543*/
static void __lambda_231(void *data, object clo, int argc, object *args) ;/*object self_731764, object r_731545*/
static void __lambda_232(void *data, object clo, int argc, object *args) ;/*object self_731765, object r_731546*/
static void __lambda_233(void *data, object clo, int argc, object *args) ;/*object self_731766, object r_731552*/
static void __lambda_234(void *data, object clo, int argc, object *args) ;/*object self_731767, object r_731547*/
static void __lambda_235(void *data, object clo, int argc, object *args) ;/*object self_731768, object r_731548*/
static void __lambda_236(void *data, object clo, int argc, object *args) ;/*object self_731769, object r_731549*/
static void __lambda_224(void *data, object clo, int argc, object *args) ;/*closure _,object k_731533, object func_91sym_73805_73854, object num_91args_73806_73855*/
static void __lambda_225(void *data, object clo, int argc, object *args) ;/*object self_731758, object mappings_73857*/
static void __lambda_237(void *data, object clo, int argc, object *args) ;/*object self_731759, object mappings_73857*/
static void __lambda_226(void *data, object clo, int argc, object *args) ;/*object self_731760, object r_731534*/
static void __lambda_227(void *data, object clo, int argc, object *args) ;/*object self_731761, object r_731535*/
static void __lambda_228(void *data, object clo, int argc, object *args) ;/*object self_731762, object r_731536*/
static void __lambda_229(void *data, object clo, int argc, object *args) ;/*object self_731763, object m_73807_73859, object udf_73808_73860*/
static void __lambda_221(void *data, object clo, int argc, object *args) ;/*closure _,object k_731518, object expr_73794_73850*/
static void __lambda_223(void *data, object clo, int argc, object *args) ;/*object self_731756, object k_731529, object x_73800_73852, object acc_73801_73853*/
static void __lambda_222(void *data, object clo, int argc, object *args) ;/*object self_731757, object r_731521*/
static void __lambda_202(void *data, object clo, int argc, object *args) ;/*closure _,object k_731407, object prim_91call_73728_73849*/
static void __lambda_204(void *data, object clo, int argc, object *args) ;/*object self_731738, object r_731412*/
static void __lambda_206(void *data, object clo, int argc, object *args) ;/*object self_731739, object r_731424*/
static void __lambda_208(void *data, object clo, int argc, object *args) ;/*object self_731740, object r_731432*/
static void __lambda_210(void *data, object clo, int argc, object *args) ;/*object self_731741, object r_731440*/
static void __lambda_212(void *data, object clo, int argc, object *args) ;/*object self_731742, object r_731443*/
static void __lambda_214(void *data, object clo, int argc, object *args) ;/*object self_731743, object r_731446*/
static void __lambda_216(void *data, object clo, int argc, object *args) ;/*object self_731744, object r_731449*/
static void __lambda_218(void *data, object clo, int argc, object *args) ;/*object self_731745, object r_731452*/
static void __lambda_220(void *data, object clo, int argc, object *args) ;/*object self_731746, object r_731455*/
static void __lambda_219(void *data, object clo, int argc, object *args) ;/*object self_731747, object k_731458*/
static void __lambda_217(void *data, object clo, int argc, object *args) ;/*object self_731748, object k_731463*/
static void __lambda_215(void *data, object clo, int argc, object *args) ;/*object self_731749, object k_731468*/
static void __lambda_213(void *data, object clo, int argc, object *args) ;/*object self_731750, object k_731473*/
static void __lambda_211(void *data, object clo, int argc, object *args) ;/*object self_731751, object k_731478*/
static void __lambda_209(void *data, object clo, int argc, object *args) ;/*object self_731752, object k_731483*/
static void __lambda_207(void *data, object clo, int argc, object *args) ;/*object self_731753, object k_731490*/
static void __lambda_205(void *data, object clo, int argc, object *args) ;/*object self_731754, object k_731497*/
static void __lambda_203(void *data, object clo, int argc, object *args) ;/*object self_731755, object k_731506*/
static void __lambda_201(void *data, object clo, int argc, object *args) ;/*closure _,object k_731403, object sym_73727_73848*/
static void __lambda_199(void *data, object clo, int argc, object *args) ;/*closure _,object k_731398, object exp_73723_73846, object use_91alloca_127_73724_73847*/
static void __lambda_200(void *data, object clo, int argc, object *args) ;/*object self_731737, object r_731399*/
static void __lambda_197(void *data, object clo, int argc, object *args) ;/*closure _,object k_731393, object exp_73721_73845*/
static void __lambda_198(void *data, object clo, int argc, object *args) ;/*object self_731736, object r_731394*/
static void __lambda_195(void *data, object clo, int argc, object *args) ;/*closure _,object k_731388, object exp_73719_73844*/
static void __lambda_196(void *data, object clo, int argc, object *args) ;/*object self_731735, object r_731389*/
static void __lambda_193(void *data, object clo, int argc, object *args) ;/*closure _,object k_731383, object exp_73717_73843*/
static void __lambda_194(void *data, object clo, int argc, object *args) ;/*object self_731734, object r_731384*/
static void __lambda_191(void *data, object clo, int argc, object *args) ;/*closure _,object k_731378, object exp_73715_73842*/
static void __lambda_192(void *data, object clo, int argc, object *args) ;/*object self_731733, object r_731379*/
static void __lambda_190(void *data, object clo, int argc, object *args) ;/*closure _,object k_731291, object p_73587_73841*/
static void __lambda_188(void *data, object clo, int argc, object *args) ;/*closure _,object k_731259, object p_73540_73840*/
static void __lambda_189(void *data, object clo, int argc, object *args) ;/*object self_731732, object r_731274*/
static void __lambda_186(void *data, object clo, int argc, object *args) ;/*closure _,object k_731254, object p_73535_73838*/
static void __lambda_187(void *data, object clo, int argc, object *args) ;/*object self_731731, object tmp_73537_73539_73839*/
static void __lambda_22(void *data, object clo, int argc, object *args) ;/*closure _,object k_73925, object p_7343_73836, object emit_91unsafe_7344_73837*/
static void __lambda_23(void *data, object clo, int argc, object *args) ;/*object self_731568, object r_73926*/
static void __lambda_24(void *data, object clo, int argc, object *args) ;/*object self_731569, object r_73927*/
static void __lambda_25(void *data, object clo, int argc, object *args) ;/*object self_731570, object r_73928*/
static void __lambda_26(void *data, object clo, int argc, object *args) ;/*object self_731571, object r_73929*/
static void __lambda_27(void *data, object clo, int argc, object *args) ;/*object self_731572, object r_73930*/
static void __lambda_28(void *data, object clo, int argc, object *args) ;/*object self_731573, object r_73931*/
static void __lambda_29(void *data, object clo, int argc, object *args) ;/*object self_731574, object r_73932*/
static void __lambda_30(void *data, object clo, int argc, object *args) ;/*object self_731575, object r_73933*/
static void __lambda_31(void *data, object clo, int argc, object *args) ;/*object self_731576, object r_73934*/
static void __lambda_32(void *data, object clo, int argc, object *args) ;/*object self_731577, object r_73935*/
static void __lambda_33(void *data, object clo, int argc, object *args) ;/*object self_731578, object r_73936*/
static void __lambda_34(void *data, object clo, int argc, object *args) ;/*object self_731579, object r_73937*/
static void __lambda_35(void *data, object clo, int argc, object *args) ;/*object self_731580, object r_73938*/
static void __lambda_36(void *data, object clo, int argc, object *args) ;/*object self_731581, object r_73939*/
static void __lambda_37(void *data, object clo, int argc, object *args) ;/*object self_731582, object r_73940*/
static void __lambda_38(void *data, object clo, int argc, object *args) ;/*object self_731583, object r_73941*/
static void __lambda_39(void *data, object clo, int argc, object *args) ;/*object self_731584, object r_73942*/
static void __lambda_40(void *data, object clo, int argc, object *args) ;/*object self_731585, object r_73943*/
static void __lambda_41(void *data, object clo, int argc, object *args) ;/*object self_731586, object r_73944*/
static void __lambda_42(void *data, object clo, int argc, object *args) ;/*object self_731587, object r_73945*/
static void __lambda_43(void *data, object clo, int argc, object *args) ;/*object self_731588, object r_73946*/
static void __lambda_44(void *data, object clo, int argc, object *args) ;/*object self_731589, object r_73947*/
static void __lambda_45(void *data, object clo, int argc, object *args) ;/*object self_731590, object r_73948*/
static void __lambda_46(void *data, object clo, int argc, object *args) ;/*object self_731591, object r_73949*/
static void __lambda_47(void *data, object clo, int argc, object *args) ;/*object self_731592, object r_73950*/
static void __lambda_48(void *data, object clo, int argc, object *args) ;/*object self_731593, object r_73951*/
static void __lambda_49(void *data, object clo, int argc, object *args) ;/*object self_731594, object r_73952*/
static void __lambda_50(void *data, object clo, int argc, object *args) ;/*object self_731595, object r_73953*/
static void __lambda_51(void *data, object clo, int argc, object *args) ;/*object self_731596, object r_73954*/
static void __lambda_52(void *data, object clo, int argc, object *args) ;/*object self_731597, object r_73955*/
static void __lambda_53(void *data, object clo, int argc, object *args) ;/*object self_731598, object r_73956*/
static void __lambda_54(void *data, object clo, int argc, object *args) ;/*object self_731599, object r_73957*/
static void __lambda_55(void *data, object clo, int argc, object *args) ;/*object self_731600, object r_73958*/
static void __lambda_56(void *data, object clo, int argc, object *args) ;/*object self_731601, object r_73959*/
static void __lambda_57(void *data, object clo, int argc, object *args) ;/*object self_731602, object r_73960*/
static void __lambda_58(void *data, object clo, int argc, object *args) ;/*object self_731603, object r_73961*/
static void __lambda_59(void *data, object clo, int argc, object *args) ;/*object self_731604, object r_73962*/
static void __lambda_60(void *data, object clo, int argc, object *args) ;/*object self_731605, object r_73963*/
static void __lambda_61(void *data, object clo, int argc, object *args) ;/*object self_731606, object r_73964*/
static void __lambda_62(void *data, object clo, int argc, object *args) ;/*object self_731607, object r_73965*/
static void __lambda_63(void *data, object clo, int argc, object *args) ;/*object self_731608, object r_73966*/
static void __lambda_64(void *data, object clo, int argc, object *args) ;/*object self_731609, object r_73967*/
static void __lambda_65(void *data, object clo, int argc, object *args) ;/*object self_731610, object r_73968*/
static void __lambda_66(void *data, object clo, int argc, object *args) ;/*object self_731611, object r_73969*/
static void __lambda_67(void *data, object clo, int argc, object *args) ;/*object self_731612, object r_73970*/
static void __lambda_68(void *data, object clo, int argc, object *args) ;/*object self_731613, object r_73971*/
static void __lambda_69(void *data, object clo, int argc, object *args) ;/*object self_731614, object r_73972*/
static void __lambda_70(void *data, object clo, int argc, object *args) ;/*object self_731615, object r_73973*/
static void __lambda_71(void *data, object clo, int argc, object *args) ;/*object self_731616, object r_73974*/
static void __lambda_72(void *data, object clo, int argc, object *args) ;/*object self_731617, object r_73975*/
static void __lambda_73(void *data, object clo, int argc, object *args) ;/*object self_731618, object r_73976*/
static void __lambda_74(void *data, object clo, int argc, object *args) ;/*object self_731619, object r_73977*/
static void __lambda_75(void *data, object clo, int argc, object *args) ;/*object self_731620, object r_73978*/
static void __lambda_76(void *data, object clo, int argc, object *args) ;/*object self_731621, object r_73979*/
static void __lambda_77(void *data, object clo, int argc, object *args) ;/*object self_731622, object r_73980*/
static void __lambda_78(void *data, object clo, int argc, object *args) ;/*object self_731623, object r_73981*/
static void __lambda_79(void *data, object clo, int argc, object *args) ;/*object self_731624, object r_73982*/
static void __lambda_80(void *data, object clo, int argc, object *args) ;/*object self_731625, object r_73983*/
static void __lambda_81(void *data, object clo, int argc, object *args) ;/*object self_731626, object r_73984*/
static void __lambda_82(void *data, object clo, int argc, object *args) ;/*object self_731627, object r_73985*/
static void __lambda_83(void *data, object clo, int argc, object *args) ;/*object self_731628, object r_73986*/
static void __lambda_84(void *data, object clo, int argc, object *args) ;/*object self_731629, object r_73987*/
static void __lambda_85(void *data, object clo, int argc, object *args) ;/*object self_731630, object r_73988*/
static void __lambda_86(void *data, object clo, int argc, object *args) ;/*object self_731631, object r_73989*/
static void __lambda_87(void *data, object clo, int argc, object *args) ;/*object self_731632, object r_73990*/
static void __lambda_88(void *data, object clo, int argc, object *args) ;/*object self_731633, object r_73991*/
static void __lambda_89(void *data, object clo, int argc, object *args) ;/*object self_731634, object r_73992*/
static void __lambda_90(void *data, object clo, int argc, object *args) ;/*object self_731635, object r_73993*/
static void __lambda_91(void *data, object clo, int argc, object *args) ;/*object self_731636, object r_73994*/
static void __lambda_92(void *data, object clo, int argc, object *args) ;/*object self_731637, object r_73995*/
static void __lambda_93(void *data, object clo, int argc, object *args) ;/*object self_731638, object r_73996*/
static void __lambda_94(void *data, object clo, int argc, object *args) ;/*object self_731639, object r_73997*/
static void __lambda_95(void *data, object clo, int argc, object *args) ;/*object self_731640, object r_73998*/
static void __lambda_96(void *data, object clo, int argc, object *args) ;/*object self_731641, object r_73999*/
static void __lambda_97(void *data, object clo, int argc, object *args) ;/*object self_731642, object r_731000*/
static void __lambda_98(void *data, object clo, int argc, object *args) ;/*object self_731643, object r_731001*/
static void __lambda_99(void *data, object clo, int argc, object *args) ;/*object self_731644, object r_731002*/
static void __lambda_100(void *data, object clo, int argc, object *args) ;/*object self_731645, object r_731003*/
static void __lambda_101(void *data, object clo, int argc, object *args) ;/*object self_731646, object r_731004*/
static void __lambda_102(void *data, object clo, int argc, object *args) ;/*object self_731647, object r_731005*/
static void __lambda_103(void *data, object clo, int argc, object *args) ;/*object self_731648, object r_731006*/
static void __lambda_104(void *data, object clo, int argc, object *args) ;/*object self_731649, object r_731007*/
static void __lambda_105(void *data, object clo, int argc, object *args) ;/*object self_731650, object r_731008*/
static void __lambda_106(void *data, object clo, int argc, object *args) ;/*object self_731651, object r_731009*/
static void __lambda_107(void *data, object clo, int argc, object *args) ;/*object self_731652, object r_731010*/
static void __lambda_108(void *data, object clo, int argc, object *args) ;/*object self_731653, object r_731011*/
static void __lambda_109(void *data, object clo, int argc, object *args) ;/*object self_731654, object r_731012*/
static void __lambda_110(void *data, object clo, int argc, object *args) ;/*object self_731655, object r_731013*/
static void __lambda_111(void *data, object clo, int argc, object *args) ;/*object self_731656, object r_731014*/
static void __lambda_112(void *data, object clo, int argc, object *args) ;/*object self_731657, object r_731015*/
static void __lambda_113(void *data, object clo, int argc, object *args) ;/*object self_731658, object r_731016*/
static void __lambda_114(void *data, object clo, int argc, object *args) ;/*object self_731659, object r_731017*/
static void __lambda_115(void *data, object clo, int argc, object *args) ;/*object self_731660, object r_731018*/
static void __lambda_116(void *data, object clo, int argc, object *args) ;/*object self_731661, object r_731019*/
static void __lambda_117(void *data, object clo, int argc, object *args) ;/*object self_731662, object r_731020*/
static void __lambda_118(void *data, object clo, int argc, object *args) ;/*object self_731663, object r_731021*/
static void __lambda_119(void *data, object clo, int argc, object *args) ;/*object self_731664, object r_731022*/
static void __lambda_120(void *data, object clo, int argc, object *args) ;/*object self_731665, object r_731023*/
static void __lambda_121(void *data, object clo, int argc, object *args) ;/*object self_731666, object r_731024*/
static void __lambda_122(void *data, object clo, int argc, object *args) ;/*object self_731667, object r_731025*/
static void __lambda_123(void *data, object clo, int argc, object *args) ;/*object self_731668, object r_731026*/
static void __lambda_124(void *data, object clo, int argc, object *args) ;/*object self_731669, object r_731027*/
static void __lambda_125(void *data, object clo, int argc, object *args) ;/*object self_731670, object r_731028*/
static void __lambda_126(void *data, object clo, int argc, object *args) ;/*object self_731671, object r_731029*/
static void __lambda_127(void *data, object clo, int argc, object *args) ;/*object self_731672, object r_731030*/
static void __lambda_128(void *data, object clo, int argc, object *args) ;/*object self_731673, object r_731031*/
static void __lambda_129(void *data, object clo, int argc, object *args) ;/*object self_731674, object r_731032*/
static void __lambda_130(void *data, object clo, int argc, object *args) ;/*object self_731675, object r_731033*/
static void __lambda_131(void *data, object clo, int argc, object *args) ;/*object self_731676, object r_731034*/
static void __lambda_132(void *data, object clo, int argc, object *args) ;/*object self_731677, object r_731035*/
static void __lambda_133(void *data, object clo, int argc, object *args) ;/*object self_731678, object r_731036*/
static void __lambda_134(void *data, object clo, int argc, object *args) ;/*object self_731679, object r_731037*/
static void __lambda_135(void *data, object clo, int argc, object *args) ;/*object self_731680, object r_731038*/
static void __lambda_136(void *data, object clo, int argc, object *args) ;/*object self_731681, object r_731039*/
static void __lambda_137(void *data, object clo, int argc, object *args) ;/*object self_731682, object r_731040*/
static void __lambda_138(void *data, object clo, int argc, object *args) ;/*object self_731683, object r_731041*/
static void __lambda_139(void *data, object clo, int argc, object *args) ;/*object self_731684, object r_731042*/
static void __lambda_140(void *data, object clo, int argc, object *args) ;/*object self_731685, object r_731043*/
static void __lambda_141(void *data, object clo, int argc, object *args) ;/*object self_731686, object r_731044*/
static void __lambda_142(void *data, object clo, int argc, object *args) ;/*object self_731687, object r_731045*/
static void __lambda_143(void *data, object clo, int argc, object *args) ;/*object self_731688, object r_731046*/
static void __lambda_144(void *data, object clo, int argc, object *args) ;/*object self_731689, object r_731047*/
static void __lambda_145(void *data, object clo, int argc, object *args) ;/*object self_731690, object r_731048*/
static void __lambda_146(void *data, object clo, int argc, object *args) ;/*object self_731691, object r_731049*/
static void __lambda_147(void *data, object clo, int argc, object *args) ;/*object self_731692, object r_731050*/
static void __lambda_148(void *data, object clo, int argc, object *args) ;/*object self_731693, object r_731051*/
static void __lambda_149(void *data, object clo, int argc, object *args) ;/*object self_731694, object r_731052*/
static void __lambda_150(void *data, object clo, int argc, object *args) ;/*object self_731695, object r_731053*/
static void __lambda_151(void *data, object clo, int argc, object *args) ;/*object self_731696, object r_731054*/
static void __lambda_152(void *data, object clo, int argc, object *args) ;/*object self_731697, object r_731055*/
static void __lambda_153(void *data, object clo, int argc, object *args) ;/*object self_731698, object r_731056*/
static void __lambda_154(void *data, object clo, int argc, object *args) ;/*object self_731699, object r_731057*/
static void __lambda_155(void *data, object clo, int argc, object *args) ;/*object self_731700, object r_731058*/
static void __lambda_156(void *data, object clo, int argc, object *args) ;/*object self_731701, object r_731059*/
static void __lambda_157(void *data, object clo, int argc, object *args) ;/*object self_731702, object r_731060*/
static void __lambda_158(void *data, object clo, int argc, object *args) ;/*object self_731703, object r_731061*/
static void __lambda_159(void *data, object clo, int argc, object *args) ;/*object self_731704, object r_731062*/
static void __lambda_160(void *data, object clo, int argc, object *args) ;/*object self_731705, object r_731063*/
static void __lambda_161(void *data, object clo, int argc, object *args) ;/*object self_731706, object r_731064*/
static void __lambda_162(void *data, object clo, int argc, object *args) ;/*object self_731707, object r_731065*/
static void __lambda_163(void *data, object clo, int argc, object *args) ;/*object self_731708, object r_731066*/
static void __lambda_164(void *data, object clo, int argc, object *args) ;/*object self_731709, object r_731067*/
static void __lambda_165(void *data, object clo, int argc, object *args) ;/*object self_731710, object r_731068*/
static void __lambda_166(void *data, object clo, int argc, object *args) ;/*object self_731711, object r_731069*/
static void __lambda_167(void *data, object clo, int argc, object *args) ;/*object self_731712, object r_731070*/
static void __lambda_168(void *data, object clo, int argc, object *args) ;/*object self_731713, object r_731071*/
static void __lambda_169(void *data, object clo, int argc, object *args) ;/*object self_731714, object r_731072*/
static void __lambda_170(void *data, object clo, int argc, object *args) ;/*object self_731715, object r_731073*/
static void __lambda_171(void *data, object clo, int argc, object *args) ;/*object self_731716, object r_731074*/
static void __lambda_172(void *data, object clo, int argc, object *args) ;/*object self_731717, object r_731075*/
static void __lambda_173(void *data, object clo, int argc, object *args) ;/*object self_731718, object r_731076*/
static void __lambda_174(void *data, object clo, int argc, object *args) ;/*object self_731719, object r_731077*/
static void __lambda_175(void *data, object clo, int argc, object *args) ;/*object self_731720, object r_731078*/
static void __lambda_176(void *data, object clo, int argc, object *args) ;/*object self_731721, object r_731079*/
static void __lambda_177(void *data, object clo, int argc, object *args) ;/*object self_731722, object r_731080*/
static void __lambda_178(void *data, object clo, int argc, object *args) ;/*object self_731723, object r_731081*/
static void __lambda_179(void *data, object clo, int argc, object *args) ;/*object self_731724, object r_731082*/
static void __lambda_180(void *data, object clo, int argc, object *args) ;/*object self_731725, object r_731083*/
static void __lambda_181(void *data, object clo, int argc, object *args) ;/*object self_731726, object r_731084*/
static void __lambda_182(void *data, object clo, int argc, object *args) ;/*object self_731727, object r_731085*/
static void __lambda_183(void *data, object clo, int argc, object *args) ;/*object self_731728, object r_731086*/
static void __lambda_184(void *data, object clo, int argc, object *args) ;/*object self_731729, object r_731087*/
static void __lambda_185(void *data, object clo, int argc, object *args) ;/*object self_731730, object r_731088*/
static void __lambda_21(void *data, object clo, int argc, object *args) ;/*closure _,object k_73922, object p_7335_73833, object use_91alloca_127_7336_73834, object emit_91unsafe_7337_73835*/
static void __lambda_20(void *data, object clo, int argc, object *args) ;/*closure _,object k_73918, object p_7332_73831, object use_91alloca_127_7333_73832*/
static void __lambda_19(void *data, object clo, int argc, object *args) ;/*closure _,object k_73913, object exp_7330_73830*/
static void __lambda_9(void *data, object clo, int argc, object *args) ;/*closure _,object k_73891, object sym_7310_73823, object num_91args_7311_73824, object expected_7312_73825*/
static void __lambda_15(void *data, object clo, int argc, object *args) ;/*object self_731559, object k_73907, object prefix_7327_73827, object expected_7328_73828, object actual_7329_73829*/
static void __lambda_16(void *data, object clo, int argc, object *args) ;/*object self_731560, object r_73908*/
static void __lambda_17(void *data, object clo, int argc, object *args) ;/*object self_731561, object r_73909*/
static void __lambda_18(void *data, object clo, int argc, object *args) ;/*object self_731562, object r_73910*/
static void __lambda_10(void *data, object clo, int argc, object *args) ;/*object self_731563, object build_91error_91str_7313_73826*/
static void __lambda_13(void *data, object clo, int argc, object *args) ;/*object self_731565, object r_73896*/
static void __lambda_14(void *data, object clo, int argc, object *args) ;/*object self_731566, object r_73897*/
static void __lambda_12(void *data, object clo, int argc, object *args) ;/*object self_731567, object k_73899*/
static void __lambda_11(void *data, object clo, int argc, object *args) ;/*object self_731564, object r_73894*/
static void __lambda_8(void *data, object clo, int argc, object *args) ;/*closure _,object k_73883, object exp_739_73822*/
static void __lambda_6(void *data, object clo, int argc, object *args) ;/*closure _,object k_73879, object exp_734_73820*/
static void __lambda_7(void *data, object clo, int argc, object *args) ;/*object self_731558, object tmp_736_738_73821*/
static void __lambda_5(void *data, object clo, int argc, object *args) ;/*closure _,object k_73874, object exp_733_73819*/
static void __lambda_1(void *data, object clo, int argc, object *args) ;/*closure _,object k_73867, object cps_91sym_731_73817, object inline_91sym_732_73818*/
static void __lambda_2(void *data, object clo, int argc, object *args) ;/*object self_731555, object r_73870*/
static void __lambda_3(void *data, object clo, int argc, object *args) ;/*object self_731556, object r_73868*/
static void __lambda_4(void *data, object clo, int argc, object *args) ;/*object self_731557, object r_73869*/

static void __lambda_230(void *data, object _, int argc, object *args) /* closure _,object k_731543 */
 {
object k_731543 = args[0];
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:lib-init:schemecycloneprimitives");

closureN_type c_734438;
object e_735275 [1];
c_734438.hdr.mark = gc_color_red;
 c_734438.hdr.grayed = 0;
c_734438.tag = closureN_tag;
 c_734438.fn = (function_type)__lambda_231;
c_734438.num_args = 1;
c_734438.num_elements = 1;
c_734438.elements = (object *)e_735275;
c_734438.elements[0] = k_731543;


object c_735278 = global_set_cps_id(data,(closure)&c_734438,"__glo__85udf_91prims_85_scheme_cyclone_primitives", __glo__85udf_91prims_85_scheme_cyclone_primitives, NULL);
return_closcall1(data,(closure)&c_734438,  c_735278);; 
}

static void __lambda_231(void *data, object self_731764, int argc, object *args) /* object self_731764, object r_731545 */
 {

  
closureN_type c_734440;
object e_735271 [1];
c_734440.hdr.mark = gc_color_red;
 c_734440.hdr.grayed = 0;
c_734440.tag = closureN_tag;
 c_734440.fn = (function_type)__lambda_232;
c_734440.num_args = 1;
c_734440.num_elements = 1;
c_734440.elements = (object *)e_735271;
c_734440.elements[0] = ((closureN)self_731764)->elements[0];


object c_735274 = global_set_cps_id(data,(closure)&c_734440,"__glo__85udf_91cps_91_125inline_85_scheme_cyclone_primitives", __glo__85udf_91cps_91_125inline_85_scheme_cyclone_primitives, NULL);
return_closcall1(data,(closure)&c_734440,  c_735274);; 
}

static void __lambda_232(void *data, object self_731765, int argc, object *args) /* object self_731765, object r_731546 */
 {

  
closureN_type c_734442;
object e_735270 [1];
c_734442.hdr.mark = gc_color_red;
 c_734442.hdr.grayed = 0;
c_734442.tag = closureN_tag;
 c_734442.fn = (function_type)__lambda_233;
c_734442.num_args = 1;
c_734442.num_elements = 1;
c_734442.elements = (object *)e_735270;
c_734442.elements[0] = ((closureN)self_731765)->elements[0];

return_direct_with_clo1(data,  __glo_hs_91create_scheme_cyclone_hashset, (((closure)  __glo_hs_91create_scheme_cyclone_hashset)->fn),  &c_734442);; 
}

static void __lambda_233(void *data, object self_731766, int argc, object *args) /* object self_731766, object r_731552 */
 {
 object r_731552 = args[0];
  
closureN_type c_734444;
object e_735266 [1];
c_734444.hdr.mark = gc_color_red;
 c_734444.hdr.grayed = 0;
c_734444.tag = closureN_tag;
 c_734444.fn = (function_type)__lambda_234;
c_734444.num_args = 1;
c_734444.num_elements = 1;
c_734444.elements = (object *)e_735266;
c_734444.elements[0] = ((closureN)self_731766)->elements[0];


object c_735269 = global_set_cps_id(data,(closure)&c_734444,"__glo__85hs_91prims_85_scheme_cyclone_primitives", __glo__85hs_91prims_85_scheme_cyclone_primitives, r_731552);
return_closcall1(data,(closure)&c_734444,  c_735269);; 
}

static void __lambda_234(void *data, object self_731767, int argc, object *args) /* object self_731767, object r_731547 */
 {

  
closureN_type c_734446;
object e_735099 [1];
c_734446.hdr.mark = gc_color_red;
 c_734446.hdr.grayed = 0;
c_734446.tag = closureN_tag;
 c_734446.fn = (function_type)__lambda_235;
c_734446.num_args = 1;
c_734446.num_elements = 1;
c_734446.elements = (object *)e_735099;
c_734446.elements[0] = ((closureN)self_731767)->elements[0];


make_pair(c_735265,quote_Cyc_91unsafe_91cdr,NULL);c_735265.hdr.immutable = 1;

make_pair(c_735264,quote_Cyc_91unsafe_91car,&c_735265);c_735264.hdr.immutable = 1;

make_pair(c_735263,quote_Cyc_91display,&c_735264);c_735263.hdr.immutable = 1;

make_pair(c_735262,quote_Cyc_91write,&c_735263);c_735262.hdr.immutable = 1;

make_pair(c_735261,quote_Cyc_91write_91char,&c_735262);c_735261.hdr.immutable = 1;

make_pair(c_735260,quote_Cyc_91read_91line,&c_735261);c_735260.hdr.immutable = 1;

make_pair(c_735259,quote_Cyc_91peek_91char,&c_735260);c_735259.hdr.immutable = 1;

make_pair(c_735258,quote_Cyc_91read_91char,&c_735259);c_735258.hdr.immutable = 1;

make_pair(c_735257,quote_delete_91file,&c_735258);c_735257.hdr.immutable = 1;

make_pair(c_735256,quote_file_91exists_127,&c_735257);c_735256.hdr.immutable = 1;

make_pair(c_735255,quote_Cyc_91flush_91output_91port,&c_735256);c_735255.hdr.immutable = 1;

make_pair(c_735254,quote_close_91output_91port,&c_735255);c_735254.hdr.immutable = 1;

make_pair(c_735253,quote_close_91input_91port,&c_735254);c_735253.hdr.immutable = 1;

make_pair(c_735252,quote_close_91port,&c_735253);c_735252.hdr.immutable = 1;

make_pair(c_735251,quote_open_91binary_91output_91file,&c_735252);c_735251.hdr.immutable = 1;

make_pair(c_735250,quote_open_91binary_91input_91file,&c_735251);c_735250.hdr.immutable = 1;

make_pair(c_735249,quote_open_91output_91file,&c_735250);c_735249.hdr.immutable = 1;

make_pair(c_735248,quote_open_91input_91file,&c_735249);c_735248.hdr.immutable = 1;

make_pair(c_735247,quote_symbol_127,&c_735248);c_735247.hdr.immutable = 1;

make_pair(c_735246,quote_string_127,&c_735247);c_735246.hdr.immutable = 1;

make_pair(c_735245,quote_vector_127,&c_735246);c_735245.hdr.immutable = 1;

make_pair(c_735244,quote_Cyc_91macro_127,&c_735245);c_735244.hdr.immutable = 1;

make_pair(c_735243,quote_procedure_127,&c_735244);c_735243.hdr.immutable = 1;

make_pair(c_735242,quote_port_127,&c_735243);c_735242.hdr.immutable = 1;

make_pair(c_735241,quote_pair_127,&c_735242);c_735241.hdr.immutable = 1;

make_pair(c_735240,quote_integer_127,&c_735241);c_735240.hdr.immutable = 1;

make_pair(c_735239,quote_real_127,&c_735240);c_735239.hdr.immutable = 1;

make_pair(c_735238,quote_number_127,&c_735239);c_735238.hdr.immutable = 1;

make_pair(c_735237,quote_null_127,&c_735238);c_735237.hdr.immutable = 1;

make_pair(c_735236,quote_eof_91object_127,&c_735237);c_735236.hdr.immutable = 1;

make_pair(c_735235,quote_char_127,&c_735236);c_735235.hdr.immutable = 1;

make_pair(c_735234,quote_boolean_127,&c_735235);c_735234.hdr.immutable = 1;

make_pair(c_735233,quote_vector_91set_67,&c_735234);c_735233.hdr.immutable = 1;

make_pair(c_735232,quote_vector_91ref,&c_735233);c_735232.hdr.immutable = 1;

make_pair(c_735231,quote_vector_91length,&c_735232);c_735231.hdr.immutable = 1;

make_pair(c_735230,quote_list_91_125vector,&c_735231);c_735230.hdr.immutable = 1;

make_pair(c_735229,quote_make_91vector,&c_735230);c_735229.hdr.immutable = 1;

make_pair(c_735228,quote_bytevector_127,&c_735229);c_735228.hdr.immutable = 1;

make_pair(c_735227,quote_bytevector_91u8_91set_67,&c_735228);c_735227.hdr.immutable = 1;

make_pair(c_735226,quote_bytevector_91u8_91ref,&c_735227);c_735226.hdr.immutable = 1;

make_pair(c_735225,quote_Cyc_91string_91_125utf8,&c_735226);c_735225.hdr.immutable = 1;

make_pair(c_735224,quote_Cyc_91utf8_91_125string,&c_735225);c_735224.hdr.immutable = 1;

make_pair(c_735223,quote_Cyc_91bytevector_91copy,&c_735224);c_735223.hdr.immutable = 1;

make_pair(c_735222,quote_bytevector_91append,&c_735223);c_735222.hdr.immutable = 1;

make_pair(c_735221,quote_bytevector,&c_735222);c_735221.hdr.immutable = 1;

make_pair(c_735220,quote_bytevector_91length,&c_735221);c_735220.hdr.immutable = 1;

make_pair(c_735219,quote_make_91bytevector,&c_735220);c_735219.hdr.immutable = 1;

make_pair(c_735218,quote_substring,&c_735219);c_735218.hdr.immutable = 1;

make_pair(c_735217,quote_string_91set_67,&c_735218);c_735217.hdr.immutable = 1;

make_pair(c_735216,quote_string_91ref,&c_735217);c_735216.hdr.immutable = 1;

make_pair(c_735215,quote_string_91length,&c_735216);c_735215.hdr.immutable = 1;

make_pair(c_735214,quote_number_91_125string,&c_735215);c_735214.hdr.immutable = 1;

make_pair(c_735213,quote_symbol_91_125string,&c_735214);c_735213.hdr.immutable = 1;

make_pair(c_735212,quote_string_91_125symbol,&c_735213);c_735212.hdr.immutable = 1;

make_pair(c_735211,quote_list_91_125string,&c_735212);c_735211.hdr.immutable = 1;

make_pair(c_735210,quote_string_91cmp,&c_735211);c_735210.hdr.immutable = 1;

make_pair(c_735209,quote_string_91append,&c_735210);c_735209.hdr.immutable = 1;

make_pair(c_735208,quote_string_91_125number,&c_735209);c_735208.hdr.immutable = 1;

make_pair(c_735207,quote_integer_91_125char,&c_735208);c_735207.hdr.immutable = 1;

make_pair(c_735206,quote_char_91_125integer,&c_735207);c_735206.hdr.immutable = 1;

make_pair(c_735205,quote_cddddr,&c_735206);c_735205.hdr.immutable = 1;

make_pair(c_735204,quote_cdddar,&c_735205);c_735204.hdr.immutable = 1;

make_pair(c_735203,quote_cddadr,&c_735204);c_735203.hdr.immutable = 1;

make_pair(c_735202,quote_cddaar,&c_735203);c_735202.hdr.immutable = 1;

make_pair(c_735201,quote_cdaddr,&c_735202);c_735201.hdr.immutable = 1;

make_pair(c_735200,quote_cdadar,&c_735201);c_735200.hdr.immutable = 1;

make_pair(c_735199,quote_cdaadr,&c_735200);c_735199.hdr.immutable = 1;

make_pair(c_735198,quote_cdaaar,&c_735199);c_735198.hdr.immutable = 1;

make_pair(c_735197,quote_cadddr,&c_735198);c_735197.hdr.immutable = 1;

make_pair(c_735196,quote_caddar,&c_735197);c_735196.hdr.immutable = 1;

make_pair(c_735195,quote_cadadr,&c_735196);c_735195.hdr.immutable = 1;

make_pair(c_735194,quote_cadaar,&c_735195);c_735194.hdr.immutable = 1;

make_pair(c_735193,quote_caaddr,&c_735194);c_735193.hdr.immutable = 1;

make_pair(c_735192,quote_caadar,&c_735193);c_735192.hdr.immutable = 1;

make_pair(c_735191,quote_caaadr,&c_735192);c_735191.hdr.immutable = 1;

make_pair(c_735190,quote_caaaar,&c_735191);c_735190.hdr.immutable = 1;

make_pair(c_735189,quote_cdddr,&c_735190);c_735189.hdr.immutable = 1;

make_pair(c_735188,quote_cddar,&c_735189);c_735188.hdr.immutable = 1;

make_pair(c_735187,quote_cdadr,&c_735188);c_735187.hdr.immutable = 1;

make_pair(c_735186,quote_cdaar,&c_735187);c_735186.hdr.immutable = 1;

make_pair(c_735185,quote_caddr,&c_735186);c_735185.hdr.immutable = 1;

make_pair(c_735184,quote_cadar,&c_735185);c_735184.hdr.immutable = 1;

make_pair(c_735183,quote_caadr,&c_735184);c_735183.hdr.immutable = 1;

make_pair(c_735182,quote_caaar,&c_735183);c_735182.hdr.immutable = 1;

make_pair(c_735181,quote_cddr,&c_735182);c_735181.hdr.immutable = 1;

make_pair(c_735180,quote_cdar,&c_735181);c_735180.hdr.immutable = 1;

make_pair(c_735179,quote_cadr,&c_735180);c_735179.hdr.immutable = 1;

make_pair(c_735178,quote_caar,&c_735179);c_735178.hdr.immutable = 1;

make_pair(c_735177,quote_cdr,&c_735178);c_735177.hdr.immutable = 1;

make_pair(c_735176,quote_car,&c_735177);c_735176.hdr.immutable = 1;

make_pair(c_735175,quote_set_91cdr_67,&c_735176);c_735175.hdr.immutable = 1;

make_pair(c_735174,quote_set_91car_67,&c_735175);c_735174.hdr.immutable = 1;

make_pair(c_735173,quote_length,&c_735174);c_735173.hdr.immutable = 1;

make_pair(c_735172,quote_memv,&c_735173);c_735172.hdr.immutable = 1;

make_pair(c_735171,quote_memq,&c_735172);c_735171.hdr.immutable = 1;

make_pair(c_735170,quote_assq,&c_735171);c_735170.hdr.immutable = 1;

make_pair(c_735169,quote_assv,&c_735170);c_735169.hdr.immutable = 1;

make_pair(c_735168,quote_Cyc_91fast_91assoc,&c_735169);c_735168.hdr.immutable = 1;

make_pair(c_735167,quote_Cyc_91fast_91member,&c_735168);c_735167.hdr.immutable = 1;

make_pair(c_735166,quote_equal_127,&c_735167);c_735166.hdr.immutable = 1;

make_pair(c_735165,quote_eqv_127,&c_735166);c_735165.hdr.immutable = 1;

make_pair(c_735164,quote_eq_127,&c_735165);c_735164.hdr.immutable = 1;

make_pair(c_735163,quote_cell,&c_735164);c_735163.hdr.immutable = 1;

make_pair(c_735162,quote_set_91cell_67,&c_735163);c_735162.hdr.immutable = 1;

make_pair(c_735161,quote_set_91global_91unsafe_67,&c_735162);c_735161.hdr.immutable = 1;

make_pair(c_735160,quote_set_91global_67,&c_735161);c_735160.hdr.immutable = 1;

make_pair(c_735159,quote_cell_91get,&c_735160);c_735159.hdr.immutable = 1;

make_pair(c_735158,quote_Cyc_91fast_91list_914,&c_735159);c_735158.hdr.immutable = 1;

make_pair(c_735157,quote_Cyc_91fast_91list_913,&c_735158);c_735157.hdr.immutable = 1;

make_pair(c_735156,quote_Cyc_91fast_91list_912,&c_735157);c_735156.hdr.immutable = 1;

make_pair(c_735155,quote_Cyc_91fast_91list_911,&c_735156);c_735155.hdr.immutable = 1;

make_pair(c_735154,quote_Cyc_91fast_91vector_915,&c_735155);c_735154.hdr.immutable = 1;

make_pair(c_735153,quote_Cyc_91fast_91vector_914,&c_735154);c_735153.hdr.immutable = 1;

make_pair(c_735152,quote_Cyc_91fast_91vector_913,&c_735153);c_735152.hdr.immutable = 1;

make_pair(c_735151,quote_Cyc_91fast_91vector_912,&c_735152);c_735151.hdr.immutable = 1;

make_pair(c_735150,quote_cons,&c_735151);c_735150.hdr.immutable = 1;

make_pair(c_735149,quote_Cyc_91current_91exception_91handler,&c_735150);c_735149.hdr.immutable = 1;

make_pair(c_735148,quote_Cyc_91default_91exception_91handler,&c_735149);c_735148.hdr.immutable = 1;

make_pair(c_735147,quote_Cyc_91compilation_91environment,&c_735148);c_735147.hdr.immutable = 1;

make_pair(c_735146,quote_Cyc_91installation_91dir,&c_735147);c_735146.hdr.immutable = 1;

make_pair(c_735145,quote_command_91line_91arguments,&c_735146);c_735145.hdr.immutable = 1;

make_pair(c_735144,quote_system,&c_735145);c_735144.hdr.immutable = 1;

make_pair(c_735143,quote_exit,&c_735144);c_735143.hdr.immutable = 1;

make_pair(c_735142,quote__75halt,&c_735143);c_735142.hdr.immutable = 1;

make_pair(c_735141,quote_Cyc_91fast_91apply,&c_735142);c_735141.hdr.immutable = 1;

make_pair(c_735140,quote_apply,&c_735141);c_735140.hdr.immutable = 1;

make_pair(c_735139,quote__121_123,&c_735140);c_735139.hdr.immutable = 1;

make_pair(c_735138,quote__125_123,&c_735139);c_735138.hdr.immutable = 1;

make_pair(c_735137,quote__121,&c_735138);c_735137.hdr.immutable = 1;

make_pair(c_735136,quote__125,&c_735137);c_735136.hdr.immutable = 1;

make_pair(c_735135,quote__123,&c_735136);c_735135.hdr.immutable = 1;

make_pair(c_735134,quote_Cyc_91fast_91char_91lte,&c_735135);c_735134.hdr.immutable = 1;

make_pair(c_735133,quote_Cyc_91fast_91char_91gte,&c_735134);c_735133.hdr.immutable = 1;

make_pair(c_735132,quote_Cyc_91fast_91char_91lt,&c_735133);c_735132.hdr.immutable = 1;

make_pair(c_735131,quote_Cyc_91fast_91char_91gt,&c_735132);c_735131.hdr.immutable = 1;

make_pair(c_735130,quote_Cyc_91fast_91char_91eq,&c_735131);c_735130.hdr.immutable = 1;

make_pair(c_735129,quote_Cyc_91fast_91lte,&c_735130);c_735129.hdr.immutable = 1;

make_pair(c_735128,quote_Cyc_91fast_91gte,&c_735129);c_735128.hdr.immutable = 1;

make_pair(c_735127,quote_Cyc_91fast_91lt,&c_735128);c_735127.hdr.immutable = 1;

make_pair(c_735126,quote_Cyc_91fast_91gt,&c_735127);c_735126.hdr.immutable = 1;

make_pair(c_735125,quote_Cyc_91fast_91eq,&c_735126);c_735125.hdr.immutable = 1;

make_pair(c_735124,quote__95,&c_735125);c_735124.hdr.immutable = 1;

make_pair(c_735123,quote__85,&c_735124);c_735123.hdr.immutable = 1;

make_pair(c_735122,quote__91,&c_735123);c_735122.hdr.immutable = 1;

make_pair(c_735121,quote__87,&c_735122);c_735121.hdr.immutable = 1;

make_pair(c_735120,quote_Cyc_91fast_91div,&c_735121);c_735120.hdr.immutable = 1;

make_pair(c_735119,quote_Cyc_91fast_91mul,&c_735120);c_735119.hdr.immutable = 1;

make_pair(c_735118,quote_Cyc_91fast_91sub,&c_735119);c_735118.hdr.immutable = 1;

make_pair(c_735117,quote_Cyc_91fast_91plus,&c_735118);c_735117.hdr.immutable = 1;

make_pair(c_735116,quote_Cyc_91foreign_91value,&c_735117);c_735116.hdr.immutable = 1;

make_pair(c_735115,quote_Cyc_91foreign_91code,&c_735116);c_735115.hdr.immutable = 1;

make_pair(c_735114,quote_Cyc_91if,&c_735115);c_735114.hdr.immutable = 1;

make_pair(c_735113,quote_Cyc_91stderr,&c_735114);c_735113.hdr.immutable = 1;

make_pair(c_735112,quote_Cyc_91stdin,&c_735113);c_735112.hdr.immutable = 1;

make_pair(c_735111,quote_Cyc_91stdout,&c_735112);c_735111.hdr.immutable = 1;

make_pair(c_735110,quote_Cyc_91end_91thread_67,&c_735111);c_735110.hdr.immutable = 1;

make_pair(c_735109,quote_Cyc_91spawn_91thread_67,&c_735110);c_735109.hdr.immutable = 1;

make_pair(c_735108,quote_Cyc_91has_91cycle_127,&c_735109);c_735108.hdr.immutable = 1;

make_pair(c_735107,quote_Cyc_91opaque_127,&c_735108);c_735107.hdr.immutable = 1;

make_pair(c_735106,quote_Cyc_91cvar_127,&c_735107);c_735106.hdr.immutable = 1;

make_pair(c_735105,quote_Cyc_91set_91cvar_67,&c_735106);c_735105.hdr.immutable = 1;

make_pair(c_735104,quote_Cyc_91get_91cvar,&c_735105);c_735104.hdr.immutable = 1;

make_pair(c_735103,quote_Cyc_91global_91vars,&c_735104);c_735103.hdr.immutable = 1;

object c_735102 = global_set_cps_id(data,(closure)&c_734446,"__glo__85primitives_85_scheme_cyclone_primitives", __glo__85primitives_85_scheme_cyclone_primitives, &c_735103);
return_closcall1(data,(closure)&c_734446,  c_735102);; 
}

static void __lambda_235(void *data, object self_731768, int argc, object *args) /* object self_731768, object r_731548 */
 {

  
closureN_type c_734448;
object e_734451 [1];
c_734448.hdr.mark = gc_color_red;
 c_734448.hdr.grayed = 0;
c_734448.tag = closureN_tag;
 c_734448.fn = (function_type)__lambda_236;
c_734448.num_args = 1;
c_734448.num_elements = 1;
c_734448.elements = (object *)e_734451;
c_734448.elements[0] = ((closureN)self_731768)->elements[0];


make_pair(c_734458,obj_int2obj(0),NULL);c_734458.hdr.immutable = 1;

make_pair(c_734457,obj_int2obj(0),&c_734458);c_734457.hdr.immutable = 1;

make_pair(c_734456,quote_Cyc_91global_91vars,&c_734457);c_734456.hdr.immutable = 1;

make_pair(c_734462,obj_int2obj(1),NULL);c_734462.hdr.immutable = 1;

make_pair(c_734461,obj_int2obj(1),&c_734462);c_734461.hdr.immutable = 1;

make_pair(c_734460,quote_Cyc_91get_91cvar,&c_734461);c_734460.hdr.immutable = 1;

make_pair(c_734466,obj_int2obj(2),NULL);c_734466.hdr.immutable = 1;

make_pair(c_734465,obj_int2obj(2),&c_734466);c_734465.hdr.immutable = 1;

make_pair(c_734464,quote_Cyc_91set_91cvar_67,&c_734465);c_734464.hdr.immutable = 1;

make_pair(c_734470,obj_int2obj(1),NULL);c_734470.hdr.immutable = 1;

make_pair(c_734469,obj_int2obj(1),&c_734470);c_734469.hdr.immutable = 1;

make_pair(c_734468,quote_Cyc_91cvar_127,&c_734469);c_734468.hdr.immutable = 1;

make_pair(c_734474,obj_int2obj(1),NULL);c_734474.hdr.immutable = 1;

make_pair(c_734473,obj_int2obj(1),&c_734474);c_734473.hdr.immutable = 1;

make_pair(c_734472,quote_Cyc_91opaque_127,&c_734473);c_734472.hdr.immutable = 1;

make_pair(c_734478,obj_int2obj(1),NULL);c_734478.hdr.immutable = 1;

make_pair(c_734477,obj_int2obj(1),&c_734478);c_734477.hdr.immutable = 1;

make_pair(c_734476,quote_Cyc_91has_91cycle_127,&c_734477);c_734476.hdr.immutable = 1;

make_pair(c_734482,obj_int2obj(1),NULL);c_734482.hdr.immutable = 1;

make_pair(c_734481,obj_int2obj(1),&c_734482);c_734481.hdr.immutable = 1;

make_pair(c_734480,quote_Cyc_91spawn_91thread_67,&c_734481);c_734480.hdr.immutable = 1;

make_pair(c_734486,obj_int2obj(0),NULL);c_734486.hdr.immutable = 1;

make_pair(c_734485,obj_int2obj(0),&c_734486);c_734485.hdr.immutable = 1;

make_pair(c_734484,quote_Cyc_91end_91thread_67,&c_734485);c_734484.hdr.immutable = 1;

make_pair(c_734490,obj_int2obj(0),NULL);c_734490.hdr.immutable = 1;

make_pair(c_734489,obj_int2obj(0),&c_734490);c_734489.hdr.immutable = 1;

make_pair(c_734488,quote_Cyc_91stdout,&c_734489);c_734488.hdr.immutable = 1;

make_pair(c_734494,obj_int2obj(0),NULL);c_734494.hdr.immutable = 1;

make_pair(c_734493,obj_int2obj(0),&c_734494);c_734493.hdr.immutable = 1;

make_pair(c_734492,quote_Cyc_91stdin,&c_734493);c_734492.hdr.immutable = 1;

make_pair(c_734498,obj_int2obj(0),NULL);c_734498.hdr.immutable = 1;

make_pair(c_734497,obj_int2obj(0),&c_734498);c_734497.hdr.immutable = 1;

make_pair(c_734496,quote_Cyc_91stderr,&c_734497);c_734496.hdr.immutable = 1;

make_pair(c_734502,obj_int2obj(3),NULL);c_734502.hdr.immutable = 1;

make_pair(c_734501,obj_int2obj(3),&c_734502);c_734501.hdr.immutable = 1;

make_pair(c_734500,quote_Cyc_91if,&c_734501);c_734500.hdr.immutable = 1;

make_pair(c_734506,boolean_f,NULL);c_734506.hdr.immutable = 1;

make_pair(c_734505,obj_int2obj(1),&c_734506);c_734505.hdr.immutable = 1;

make_pair(c_734504,quote_Cyc_91foreign_91code,&c_734505);c_734504.hdr.immutable = 1;

make_pair(c_734510,obj_int2obj(2),NULL);c_734510.hdr.immutable = 1;

make_pair(c_734509,obj_int2obj(2),&c_734510);c_734509.hdr.immutable = 1;

make_pair(c_734508,quote_Cyc_91foreign_91value,&c_734509);c_734508.hdr.immutable = 1;

make_pair(c_734514,obj_int2obj(2),NULL);c_734514.hdr.immutable = 1;

make_pair(c_734513,obj_int2obj(2),&c_734514);c_734513.hdr.immutable = 1;

make_pair(c_734512,quote_Cyc_91fast_91plus,&c_734513);c_734512.hdr.immutable = 1;

make_pair(c_734518,obj_int2obj(2),NULL);c_734518.hdr.immutable = 1;

make_pair(c_734517,obj_int2obj(2),&c_734518);c_734517.hdr.immutable = 1;

make_pair(c_734516,quote_Cyc_91fast_91sub,&c_734517);c_734516.hdr.immutable = 1;

make_pair(c_734522,obj_int2obj(2),NULL);c_734522.hdr.immutable = 1;

make_pair(c_734521,obj_int2obj(2),&c_734522);c_734521.hdr.immutable = 1;

make_pair(c_734520,quote_Cyc_91fast_91mul,&c_734521);c_734520.hdr.immutable = 1;

make_pair(c_734526,obj_int2obj(2),NULL);c_734526.hdr.immutable = 1;

make_pair(c_734525,obj_int2obj(2),&c_734526);c_734525.hdr.immutable = 1;

make_pair(c_734524,quote_Cyc_91fast_91div,&c_734525);c_734524.hdr.immutable = 1;

make_pair(c_734530,obj_int2obj(2),NULL);c_734530.hdr.immutable = 1;

make_pair(c_734529,obj_int2obj(2),&c_734530);c_734529.hdr.immutable = 1;

make_pair(c_734528,quote_Cyc_91fast_91eq,&c_734529);c_734528.hdr.immutable = 1;

make_pair(c_734534,obj_int2obj(2),NULL);c_734534.hdr.immutable = 1;

make_pair(c_734533,obj_int2obj(2),&c_734534);c_734533.hdr.immutable = 1;

make_pair(c_734532,quote_Cyc_91fast_91gt,&c_734533);c_734532.hdr.immutable = 1;

make_pair(c_734538,obj_int2obj(2),NULL);c_734538.hdr.immutable = 1;

make_pair(c_734537,obj_int2obj(2),&c_734538);c_734537.hdr.immutable = 1;

make_pair(c_734536,quote_Cyc_91fast_91lt,&c_734537);c_734536.hdr.immutable = 1;

make_pair(c_734542,obj_int2obj(2),NULL);c_734542.hdr.immutable = 1;

make_pair(c_734541,obj_int2obj(2),&c_734542);c_734541.hdr.immutable = 1;

make_pair(c_734540,quote_Cyc_91fast_91gte,&c_734541);c_734540.hdr.immutable = 1;

make_pair(c_734546,obj_int2obj(2),NULL);c_734546.hdr.immutable = 1;

make_pair(c_734545,obj_int2obj(2),&c_734546);c_734545.hdr.immutable = 1;

make_pair(c_734544,quote_Cyc_91fast_91lte,&c_734545);c_734544.hdr.immutable = 1;

make_pair(c_734550,obj_int2obj(2),NULL);c_734550.hdr.immutable = 1;

make_pair(c_734549,obj_int2obj(2),&c_734550);c_734549.hdr.immutable = 1;

make_pair(c_734548,quote_Cyc_91fast_91char_91eq,&c_734549);c_734548.hdr.immutable = 1;

make_pair(c_734554,obj_int2obj(2),NULL);c_734554.hdr.immutable = 1;

make_pair(c_734553,obj_int2obj(2),&c_734554);c_734553.hdr.immutable = 1;

make_pair(c_734552,quote_Cyc_91fast_91char_91gt,&c_734553);c_734552.hdr.immutable = 1;

make_pair(c_734558,obj_int2obj(2),NULL);c_734558.hdr.immutable = 1;

make_pair(c_734557,obj_int2obj(2),&c_734558);c_734557.hdr.immutable = 1;

make_pair(c_734556,quote_Cyc_91fast_91char_91lt,&c_734557);c_734556.hdr.immutable = 1;

make_pair(c_734562,obj_int2obj(2),NULL);c_734562.hdr.immutable = 1;

make_pair(c_734561,obj_int2obj(2),&c_734562);c_734561.hdr.immutable = 1;

make_pair(c_734560,quote_Cyc_91fast_91char_91gte,&c_734561);c_734560.hdr.immutable = 1;

make_pair(c_734566,obj_int2obj(2),NULL);c_734566.hdr.immutable = 1;

make_pair(c_734565,obj_int2obj(2),&c_734566);c_734565.hdr.immutable = 1;

make_pair(c_734564,quote_Cyc_91fast_91char_91lte,&c_734565);c_734564.hdr.immutable = 1;

make_pair(c_734570,boolean_f,NULL);c_734570.hdr.immutable = 1;

make_pair(c_734569,obj_int2obj(1),&c_734570);c_734569.hdr.immutable = 1;

make_pair(c_734568,quote__91,&c_734569);c_734568.hdr.immutable = 1;

make_pair(c_734574,boolean_f,NULL);c_734574.hdr.immutable = 1;

make_pair(c_734573,obj_int2obj(1),&c_734574);c_734573.hdr.immutable = 1;

make_pair(c_734572,quote__95,&c_734573);c_734572.hdr.immutable = 1;

make_pair(c_734578,boolean_f,NULL);c_734578.hdr.immutable = 1;

make_pair(c_734577,obj_int2obj(2),&c_734578);c_734577.hdr.immutable = 1;

make_pair(c_734576,quote__123,&c_734577);c_734576.hdr.immutable = 1;

make_pair(c_734582,boolean_f,NULL);c_734582.hdr.immutable = 1;

make_pair(c_734581,obj_int2obj(2),&c_734582);c_734581.hdr.immutable = 1;

make_pair(c_734580,quote__125,&c_734581);c_734580.hdr.immutable = 1;

make_pair(c_734586,boolean_f,NULL);c_734586.hdr.immutable = 1;

make_pair(c_734585,obj_int2obj(2),&c_734586);c_734585.hdr.immutable = 1;

make_pair(c_734584,quote__121,&c_734585);c_734584.hdr.immutable = 1;

make_pair(c_734590,boolean_f,NULL);c_734590.hdr.immutable = 1;

make_pair(c_734589,obj_int2obj(2),&c_734590);c_734589.hdr.immutable = 1;

make_pair(c_734588,quote__125_123,&c_734589);c_734588.hdr.immutable = 1;

make_pair(c_734594,boolean_f,NULL);c_734594.hdr.immutable = 1;

make_pair(c_734593,obj_int2obj(2),&c_734594);c_734593.hdr.immutable = 1;

make_pair(c_734592,quote__121_123,&c_734593);c_734592.hdr.immutable = 1;

make_pair(c_734598,boolean_f,NULL);c_734598.hdr.immutable = 1;

make_pair(c_734597,obj_int2obj(1),&c_734598);c_734597.hdr.immutable = 1;

make_pair(c_734596,quote_apply,&c_734597);c_734596.hdr.immutable = 1;

make_pair(c_734602,boolean_f,NULL);c_734602.hdr.immutable = 1;

make_pair(c_734601,obj_int2obj(2),&c_734602);c_734601.hdr.immutable = 1;

make_pair(c_734600,quote_Cyc_91fast_91apply,&c_734601);c_734600.hdr.immutable = 1;

make_pair(c_734606,obj_int2obj(1),NULL);c_734606.hdr.immutable = 1;

make_pair(c_734605,obj_int2obj(1),&c_734606);c_734605.hdr.immutable = 1;

make_pair(c_734604,quote__75halt,&c_734605);c_734604.hdr.immutable = 1;

make_pair(c_734610,obj_int2obj(1),NULL);c_734610.hdr.immutable = 1;

make_pair(c_734609,obj_int2obj(1),&c_734610);c_734609.hdr.immutable = 1;

make_pair(c_734608,quote_exit,&c_734609);c_734608.hdr.immutable = 1;

make_pair(c_734614,obj_int2obj(1),NULL);c_734614.hdr.immutable = 1;

make_pair(c_734613,obj_int2obj(1),&c_734614);c_734613.hdr.immutable = 1;

make_pair(c_734612,quote_system,&c_734613);c_734612.hdr.immutable = 1;

make_pair(c_734618,obj_int2obj(0),NULL);c_734618.hdr.immutable = 1;

make_pair(c_734617,obj_int2obj(0),&c_734618);c_734617.hdr.immutable = 1;

make_pair(c_734616,quote_command_91line_91arguments,&c_734617);c_734616.hdr.immutable = 1;

make_pair(c_734622,obj_int2obj(1),NULL);c_734622.hdr.immutable = 1;

make_pair(c_734621,obj_int2obj(1),&c_734622);c_734621.hdr.immutable = 1;

make_pair(c_734620,quote_Cyc_91installation_91dir,&c_734621);c_734620.hdr.immutable = 1;

make_pair(c_734626,obj_int2obj(1),NULL);c_734626.hdr.immutable = 1;

make_pair(c_734625,obj_int2obj(1),&c_734626);c_734625.hdr.immutable = 1;

make_pair(c_734624,quote_Cyc_91compilation_91environment,&c_734625);c_734624.hdr.immutable = 1;

make_pair(c_734630,obj_int2obj(1),NULL);c_734630.hdr.immutable = 1;

make_pair(c_734629,obj_int2obj(1),&c_734630);c_734629.hdr.immutable = 1;

make_pair(c_734628,quote_Cyc_91default_91exception_91handler,&c_734629);c_734628.hdr.immutable = 1;

make_pair(c_734634,obj_int2obj(0),NULL);c_734634.hdr.immutable = 1;

make_pair(c_734633,obj_int2obj(0),&c_734634);c_734633.hdr.immutable = 1;

make_pair(c_734632,quote_Cyc_91current_91exception_91handler,&c_734633);c_734632.hdr.immutable = 1;

make_pair(c_734638,obj_int2obj(2),NULL);c_734638.hdr.immutable = 1;

make_pair(c_734637,obj_int2obj(2),&c_734638);c_734637.hdr.immutable = 1;

make_pair(c_734636,quote_cons,&c_734637);c_734636.hdr.immutable = 1;

make_pair(c_734642,obj_int2obj(2),NULL);c_734642.hdr.immutable = 1;

make_pair(c_734641,obj_int2obj(2),&c_734642);c_734641.hdr.immutable = 1;

make_pair(c_734640,quote_Cyc_91fast_91vector_912,&c_734641);c_734640.hdr.immutable = 1;

make_pair(c_734646,obj_int2obj(3),NULL);c_734646.hdr.immutable = 1;

make_pair(c_734645,obj_int2obj(3),&c_734646);c_734645.hdr.immutable = 1;

make_pair(c_734644,quote_Cyc_91fast_91vector_913,&c_734645);c_734644.hdr.immutable = 1;

make_pair(c_734650,obj_int2obj(4),NULL);c_734650.hdr.immutable = 1;

make_pair(c_734649,obj_int2obj(4),&c_734650);c_734649.hdr.immutable = 1;

make_pair(c_734648,quote_Cyc_91fast_91vector_914,&c_734649);c_734648.hdr.immutable = 1;

make_pair(c_734654,obj_int2obj(5),NULL);c_734654.hdr.immutable = 1;

make_pair(c_734653,obj_int2obj(5),&c_734654);c_734653.hdr.immutable = 1;

make_pair(c_734652,quote_Cyc_91fast_91vector_915,&c_734653);c_734652.hdr.immutable = 1;

make_pair(c_734658,obj_int2obj(1),NULL);c_734658.hdr.immutable = 1;

make_pair(c_734657,obj_int2obj(1),&c_734658);c_734657.hdr.immutable = 1;

make_pair(c_734656,quote_Cyc_91fast_91list_911,&c_734657);c_734656.hdr.immutable = 1;

make_pair(c_734662,obj_int2obj(2),NULL);c_734662.hdr.immutable = 1;

make_pair(c_734661,obj_int2obj(2),&c_734662);c_734661.hdr.immutable = 1;

make_pair(c_734660,quote_Cyc_91fast_91list_912,&c_734661);c_734660.hdr.immutable = 1;

make_pair(c_734666,obj_int2obj(3),NULL);c_734666.hdr.immutable = 1;

make_pair(c_734665,obj_int2obj(3),&c_734666);c_734665.hdr.immutable = 1;

make_pair(c_734664,quote_Cyc_91fast_91list_913,&c_734665);c_734664.hdr.immutable = 1;

make_pair(c_734670,obj_int2obj(4),NULL);c_734670.hdr.immutable = 1;

make_pair(c_734669,obj_int2obj(4),&c_734670);c_734669.hdr.immutable = 1;

make_pair(c_734668,quote_Cyc_91fast_91list_914,&c_734669);c_734668.hdr.immutable = 1;

make_pair(c_734674,obj_int2obj(1),NULL);c_734674.hdr.immutable = 1;

make_pair(c_734673,obj_int2obj(1),&c_734674);c_734673.hdr.immutable = 1;

make_pair(c_734672,quote_cell_91get,&c_734673);c_734672.hdr.immutable = 1;

make_pair(c_734678,obj_int2obj(3),NULL);c_734678.hdr.immutable = 1;

make_pair(c_734677,obj_int2obj(3),&c_734678);c_734677.hdr.immutable = 1;

make_pair(c_734676,quote_set_91global_67,&c_734677);c_734676.hdr.immutable = 1;

make_pair(c_734682,obj_int2obj(3),NULL);c_734682.hdr.immutable = 1;

make_pair(c_734681,obj_int2obj(3),&c_734682);c_734681.hdr.immutable = 1;

make_pair(c_734680,quote_set_91global_91unsafe_67,&c_734681);c_734680.hdr.immutable = 1;

make_pair(c_734686,obj_int2obj(2),NULL);c_734686.hdr.immutable = 1;

make_pair(c_734685,obj_int2obj(2),&c_734686);c_734685.hdr.immutable = 1;

make_pair(c_734684,quote_set_91cell_67,&c_734685);c_734684.hdr.immutable = 1;

make_pair(c_734690,obj_int2obj(1),NULL);c_734690.hdr.immutable = 1;

make_pair(c_734689,obj_int2obj(1),&c_734690);c_734689.hdr.immutable = 1;

make_pair(c_734688,quote_cell,&c_734689);c_734688.hdr.immutable = 1;

make_pair(c_734694,obj_int2obj(2),NULL);c_734694.hdr.immutable = 1;

make_pair(c_734693,obj_int2obj(2),&c_734694);c_734693.hdr.immutable = 1;

make_pair(c_734692,quote_eq_127,&c_734693);c_734692.hdr.immutable = 1;

make_pair(c_734698,obj_int2obj(2),NULL);c_734698.hdr.immutable = 1;

make_pair(c_734697,obj_int2obj(2),&c_734698);c_734697.hdr.immutable = 1;

make_pair(c_734696,quote_eqv_127,&c_734697);c_734696.hdr.immutable = 1;

make_pair(c_734702,obj_int2obj(2),NULL);c_734702.hdr.immutable = 1;

make_pair(c_734701,obj_int2obj(2),&c_734702);c_734701.hdr.immutable = 1;

make_pair(c_734700,quote_equal_127,&c_734701);c_734700.hdr.immutable = 1;

make_pair(c_734706,obj_int2obj(2),NULL);c_734706.hdr.immutable = 1;

make_pair(c_734705,obj_int2obj(2),&c_734706);c_734705.hdr.immutable = 1;

make_pair(c_734704,quote_Cyc_91fast_91member,&c_734705);c_734704.hdr.immutable = 1;

make_pair(c_734710,obj_int2obj(2),NULL);c_734710.hdr.immutable = 1;

make_pair(c_734709,obj_int2obj(2),&c_734710);c_734709.hdr.immutable = 1;

make_pair(c_734708,quote_Cyc_91fast_91assoc,&c_734709);c_734708.hdr.immutable = 1;

make_pair(c_734714,obj_int2obj(2),NULL);c_734714.hdr.immutable = 1;

make_pair(c_734713,obj_int2obj(2),&c_734714);c_734713.hdr.immutable = 1;

make_pair(c_734712,quote_assq,&c_734713);c_734712.hdr.immutable = 1;

make_pair(c_734718,obj_int2obj(2),NULL);c_734718.hdr.immutable = 1;

make_pair(c_734717,obj_int2obj(2),&c_734718);c_734717.hdr.immutable = 1;

make_pair(c_734716,quote_assv,&c_734717);c_734716.hdr.immutable = 1;

make_pair(c_734722,obj_int2obj(2),NULL);c_734722.hdr.immutable = 1;

make_pair(c_734721,obj_int2obj(2),&c_734722);c_734721.hdr.immutable = 1;

make_pair(c_734720,quote_memq,&c_734721);c_734720.hdr.immutable = 1;

make_pair(c_734726,obj_int2obj(2),NULL);c_734726.hdr.immutable = 1;

make_pair(c_734725,obj_int2obj(2),&c_734726);c_734725.hdr.immutable = 1;

make_pair(c_734724,quote_memv,&c_734725);c_734724.hdr.immutable = 1;

make_pair(c_734730,obj_int2obj(1),NULL);c_734730.hdr.immutable = 1;

make_pair(c_734729,obj_int2obj(1),&c_734730);c_734729.hdr.immutable = 1;

make_pair(c_734728,quote_length,&c_734729);c_734728.hdr.immutable = 1;

make_pair(c_734734,obj_int2obj(2),NULL);c_734734.hdr.immutable = 1;

make_pair(c_734733,obj_int2obj(2),&c_734734);c_734733.hdr.immutable = 1;

make_pair(c_734732,quote_set_91car_67,&c_734733);c_734732.hdr.immutable = 1;

make_pair(c_734738,obj_int2obj(2),NULL);c_734738.hdr.immutable = 1;

make_pair(c_734737,obj_int2obj(2),&c_734738);c_734737.hdr.immutable = 1;

make_pair(c_734736,quote_set_91cdr_67,&c_734737);c_734736.hdr.immutable = 1;

make_pair(c_734742,obj_int2obj(1),NULL);c_734742.hdr.immutable = 1;

make_pair(c_734741,obj_int2obj(1),&c_734742);c_734741.hdr.immutable = 1;

make_pair(c_734740,quote_Cyc_91unsafe_91car,&c_734741);c_734740.hdr.immutable = 1;

make_pair(c_734746,obj_int2obj(1),NULL);c_734746.hdr.immutable = 1;

make_pair(c_734745,obj_int2obj(1),&c_734746);c_734745.hdr.immutable = 1;

make_pair(c_734744,quote_Cyc_91unsafe_91cdr,&c_734745);c_734744.hdr.immutable = 1;

make_pair(c_734750,obj_int2obj(1),NULL);c_734750.hdr.immutable = 1;

make_pair(c_734749,obj_int2obj(1),&c_734750);c_734749.hdr.immutable = 1;

make_pair(c_734748,quote_car,&c_734749);c_734748.hdr.immutable = 1;

make_pair(c_734754,obj_int2obj(1),NULL);c_734754.hdr.immutable = 1;

make_pair(c_734753,obj_int2obj(1),&c_734754);c_734753.hdr.immutable = 1;

make_pair(c_734752,quote_cdr,&c_734753);c_734752.hdr.immutable = 1;

make_pair(c_734758,obj_int2obj(1),NULL);c_734758.hdr.immutable = 1;

make_pair(c_734757,obj_int2obj(1),&c_734758);c_734757.hdr.immutable = 1;

make_pair(c_734756,quote_caar,&c_734757);c_734756.hdr.immutable = 1;

make_pair(c_734762,obj_int2obj(1),NULL);c_734762.hdr.immutable = 1;

make_pair(c_734761,obj_int2obj(1),&c_734762);c_734761.hdr.immutable = 1;

make_pair(c_734760,quote_cadr,&c_734761);c_734760.hdr.immutable = 1;

make_pair(c_734766,obj_int2obj(1),NULL);c_734766.hdr.immutable = 1;

make_pair(c_734765,obj_int2obj(1),&c_734766);c_734765.hdr.immutable = 1;

make_pair(c_734764,quote_cdar,&c_734765);c_734764.hdr.immutable = 1;

make_pair(c_734770,obj_int2obj(1),NULL);c_734770.hdr.immutable = 1;

make_pair(c_734769,obj_int2obj(1),&c_734770);c_734769.hdr.immutable = 1;

make_pair(c_734768,quote_cddr,&c_734769);c_734768.hdr.immutable = 1;

make_pair(c_734774,obj_int2obj(1),NULL);c_734774.hdr.immutable = 1;

make_pair(c_734773,obj_int2obj(1),&c_734774);c_734773.hdr.immutable = 1;

make_pair(c_734772,quote_caaar,&c_734773);c_734772.hdr.immutable = 1;

make_pair(c_734778,obj_int2obj(1),NULL);c_734778.hdr.immutable = 1;

make_pair(c_734777,obj_int2obj(1),&c_734778);c_734777.hdr.immutable = 1;

make_pair(c_734776,quote_caadr,&c_734777);c_734776.hdr.immutable = 1;

make_pair(c_734782,obj_int2obj(1),NULL);c_734782.hdr.immutable = 1;

make_pair(c_734781,obj_int2obj(1),&c_734782);c_734781.hdr.immutable = 1;

make_pair(c_734780,quote_cadar,&c_734781);c_734780.hdr.immutable = 1;

make_pair(c_734786,obj_int2obj(1),NULL);c_734786.hdr.immutable = 1;

make_pair(c_734785,obj_int2obj(1),&c_734786);c_734785.hdr.immutable = 1;

make_pair(c_734784,quote_caddr,&c_734785);c_734784.hdr.immutable = 1;

make_pair(c_734790,obj_int2obj(1),NULL);c_734790.hdr.immutable = 1;

make_pair(c_734789,obj_int2obj(1),&c_734790);c_734789.hdr.immutable = 1;

make_pair(c_734788,quote_cdaar,&c_734789);c_734788.hdr.immutable = 1;

make_pair(c_734794,obj_int2obj(1),NULL);c_734794.hdr.immutable = 1;

make_pair(c_734793,obj_int2obj(1),&c_734794);c_734793.hdr.immutable = 1;

make_pair(c_734792,quote_cdadr,&c_734793);c_734792.hdr.immutable = 1;

make_pair(c_734798,obj_int2obj(1),NULL);c_734798.hdr.immutable = 1;

make_pair(c_734797,obj_int2obj(1),&c_734798);c_734797.hdr.immutable = 1;

make_pair(c_734796,quote_cddar,&c_734797);c_734796.hdr.immutable = 1;

make_pair(c_734802,obj_int2obj(1),NULL);c_734802.hdr.immutable = 1;

make_pair(c_734801,obj_int2obj(1),&c_734802);c_734801.hdr.immutable = 1;

make_pair(c_734800,quote_cdddr,&c_734801);c_734800.hdr.immutable = 1;

make_pair(c_734806,obj_int2obj(1),NULL);c_734806.hdr.immutable = 1;

make_pair(c_734805,obj_int2obj(1),&c_734806);c_734805.hdr.immutable = 1;

make_pair(c_734804,quote_caaaar,&c_734805);c_734804.hdr.immutable = 1;

make_pair(c_734810,obj_int2obj(1),NULL);c_734810.hdr.immutable = 1;

make_pair(c_734809,obj_int2obj(1),&c_734810);c_734809.hdr.immutable = 1;

make_pair(c_734808,quote_caaadr,&c_734809);c_734808.hdr.immutable = 1;

make_pair(c_734814,obj_int2obj(1),NULL);c_734814.hdr.immutable = 1;

make_pair(c_734813,obj_int2obj(1),&c_734814);c_734813.hdr.immutable = 1;

make_pair(c_734812,quote_caadar,&c_734813);c_734812.hdr.immutable = 1;

make_pair(c_734818,obj_int2obj(1),NULL);c_734818.hdr.immutable = 1;

make_pair(c_734817,obj_int2obj(1),&c_734818);c_734817.hdr.immutable = 1;

make_pair(c_734816,quote_caaddr,&c_734817);c_734816.hdr.immutable = 1;

make_pair(c_734822,obj_int2obj(1),NULL);c_734822.hdr.immutable = 1;

make_pair(c_734821,obj_int2obj(1),&c_734822);c_734821.hdr.immutable = 1;

make_pair(c_734820,quote_cadaar,&c_734821);c_734820.hdr.immutable = 1;

make_pair(c_734826,obj_int2obj(1),NULL);c_734826.hdr.immutable = 1;

make_pair(c_734825,obj_int2obj(1),&c_734826);c_734825.hdr.immutable = 1;

make_pair(c_734824,quote_cadadr,&c_734825);c_734824.hdr.immutable = 1;

make_pair(c_734830,obj_int2obj(1),NULL);c_734830.hdr.immutable = 1;

make_pair(c_734829,obj_int2obj(1),&c_734830);c_734829.hdr.immutable = 1;

make_pair(c_734828,quote_caddar,&c_734829);c_734828.hdr.immutable = 1;

make_pair(c_734834,obj_int2obj(1),NULL);c_734834.hdr.immutable = 1;

make_pair(c_734833,obj_int2obj(1),&c_734834);c_734833.hdr.immutable = 1;

make_pair(c_734832,quote_cadddr,&c_734833);c_734832.hdr.immutable = 1;

make_pair(c_734838,obj_int2obj(1),NULL);c_734838.hdr.immutable = 1;

make_pair(c_734837,obj_int2obj(1),&c_734838);c_734837.hdr.immutable = 1;

make_pair(c_734836,quote_cdaaar,&c_734837);c_734836.hdr.immutable = 1;

make_pair(c_734842,obj_int2obj(1),NULL);c_734842.hdr.immutable = 1;

make_pair(c_734841,obj_int2obj(1),&c_734842);c_734841.hdr.immutable = 1;

make_pair(c_734840,quote_cdaadr,&c_734841);c_734840.hdr.immutable = 1;

make_pair(c_734846,obj_int2obj(1),NULL);c_734846.hdr.immutable = 1;

make_pair(c_734845,obj_int2obj(1),&c_734846);c_734845.hdr.immutable = 1;

make_pair(c_734844,quote_cdadar,&c_734845);c_734844.hdr.immutable = 1;

make_pair(c_734850,obj_int2obj(1),NULL);c_734850.hdr.immutable = 1;

make_pair(c_734849,obj_int2obj(1),&c_734850);c_734849.hdr.immutable = 1;

make_pair(c_734848,quote_cdaddr,&c_734849);c_734848.hdr.immutable = 1;

make_pair(c_734854,obj_int2obj(1),NULL);c_734854.hdr.immutable = 1;

make_pair(c_734853,obj_int2obj(1),&c_734854);c_734853.hdr.immutable = 1;

make_pair(c_734852,quote_cddaar,&c_734853);c_734852.hdr.immutable = 1;

make_pair(c_734858,obj_int2obj(1),NULL);c_734858.hdr.immutable = 1;

make_pair(c_734857,obj_int2obj(1),&c_734858);c_734857.hdr.immutable = 1;

make_pair(c_734856,quote_cddadr,&c_734857);c_734856.hdr.immutable = 1;

make_pair(c_734862,obj_int2obj(1),NULL);c_734862.hdr.immutable = 1;

make_pair(c_734861,obj_int2obj(1),&c_734862);c_734861.hdr.immutable = 1;

make_pair(c_734860,quote_cdddar,&c_734861);c_734860.hdr.immutable = 1;

make_pair(c_734866,obj_int2obj(1),NULL);c_734866.hdr.immutable = 1;

make_pair(c_734865,obj_int2obj(1),&c_734866);c_734865.hdr.immutable = 1;

make_pair(c_734864,quote_cddddr,&c_734865);c_734864.hdr.immutable = 1;

make_pair(c_734870,obj_int2obj(1),NULL);c_734870.hdr.immutable = 1;

make_pair(c_734869,obj_int2obj(1),&c_734870);c_734869.hdr.immutable = 1;

make_pair(c_734868,quote_char_91_125integer,&c_734869);c_734868.hdr.immutable = 1;

make_pair(c_734874,obj_int2obj(1),NULL);c_734874.hdr.immutable = 1;

make_pair(c_734873,obj_int2obj(1),&c_734874);c_734873.hdr.immutable = 1;

make_pair(c_734872,quote_integer_91_125char,&c_734873);c_734872.hdr.immutable = 1;

make_pair(c_734878,obj_int2obj(2),NULL);c_734878.hdr.immutable = 1;

make_pair(c_734877,obj_int2obj(1),&c_734878);c_734877.hdr.immutable = 1;

make_pair(c_734876,quote_string_91_125number,&c_734877);c_734876.hdr.immutable = 1;

make_pair(c_734882,boolean_f,NULL);c_734882.hdr.immutable = 1;

make_pair(c_734881,boolean_f,&c_734882);c_734881.hdr.immutable = 1;

make_pair(c_734880,quote_string_91append,&c_734881);c_734880.hdr.immutable = 1;

make_pair(c_734886,obj_int2obj(2),NULL);c_734886.hdr.immutable = 1;

make_pair(c_734885,obj_int2obj(2),&c_734886);c_734885.hdr.immutable = 1;

make_pair(c_734884,quote_string_91cmp,&c_734885);c_734884.hdr.immutable = 1;

make_pair(c_734890,obj_int2obj(1),NULL);c_734890.hdr.immutable = 1;

make_pair(c_734889,obj_int2obj(1),&c_734890);c_734889.hdr.immutable = 1;

make_pair(c_734888,quote_list_91_125string,&c_734889);c_734888.hdr.immutable = 1;

make_pair(c_734894,obj_int2obj(1),NULL);c_734894.hdr.immutable = 1;

make_pair(c_734893,obj_int2obj(1),&c_734894);c_734893.hdr.immutable = 1;

make_pair(c_734892,quote_string_91_125symbol,&c_734893);c_734892.hdr.immutable = 1;

make_pair(c_734898,obj_int2obj(1),NULL);c_734898.hdr.immutable = 1;

make_pair(c_734897,obj_int2obj(1),&c_734898);c_734897.hdr.immutable = 1;

make_pair(c_734896,quote_symbol_91_125string,&c_734897);c_734896.hdr.immutable = 1;

make_pair(c_734902,obj_int2obj(2),NULL);c_734902.hdr.immutable = 1;

make_pair(c_734901,obj_int2obj(1),&c_734902);c_734901.hdr.immutable = 1;

make_pair(c_734900,quote_number_91_125string,&c_734901);c_734900.hdr.immutable = 1;

make_pair(c_734906,obj_int2obj(1),NULL);c_734906.hdr.immutable = 1;

make_pair(c_734905,obj_int2obj(1),&c_734906);c_734905.hdr.immutable = 1;

make_pair(c_734904,quote_string_91length,&c_734905);c_734904.hdr.immutable = 1;

make_pair(c_734910,obj_int2obj(2),NULL);c_734910.hdr.immutable = 1;

make_pair(c_734909,obj_int2obj(2),&c_734910);c_734909.hdr.immutable = 1;

make_pair(c_734908,quote_string_91ref,&c_734909);c_734908.hdr.immutable = 1;

make_pair(c_734914,obj_int2obj(3),NULL);c_734914.hdr.immutable = 1;

make_pair(c_734913,obj_int2obj(3),&c_734914);c_734913.hdr.immutable = 1;

make_pair(c_734912,quote_string_91set_67,&c_734913);c_734912.hdr.immutable = 1;

make_pair(c_734918,obj_int2obj(3),NULL);c_734918.hdr.immutable = 1;

make_pair(c_734917,obj_int2obj(3),&c_734918);c_734917.hdr.immutable = 1;

make_pair(c_734916,quote_substring,&c_734917);c_734916.hdr.immutable = 1;

make_pair(c_734922,boolean_f,NULL);c_734922.hdr.immutable = 1;

make_pair(c_734921,obj_int2obj(1),&c_734922);c_734921.hdr.immutable = 1;

make_pair(c_734920,quote_make_91bytevector,&c_734921);c_734920.hdr.immutable = 1;

make_pair(c_734926,obj_int2obj(1),NULL);c_734926.hdr.immutable = 1;

make_pair(c_734925,obj_int2obj(1),&c_734926);c_734925.hdr.immutable = 1;

make_pair(c_734924,quote_bytevector_91length,&c_734925);c_734924.hdr.immutable = 1;

make_pair(c_734930,boolean_f,NULL);c_734930.hdr.immutable = 1;

make_pair(c_734929,boolean_f,&c_734930);c_734929.hdr.immutable = 1;

make_pair(c_734928,quote_bytevector,&c_734929);c_734928.hdr.immutable = 1;

make_pair(c_734934,boolean_f,NULL);c_734934.hdr.immutable = 1;

make_pair(c_734933,boolean_f,&c_734934);c_734933.hdr.immutable = 1;

make_pair(c_734932,quote_bytevector_91append,&c_734933);c_734932.hdr.immutable = 1;

make_pair(c_734938,obj_int2obj(3),NULL);c_734938.hdr.immutable = 1;

make_pair(c_734937,obj_int2obj(3),&c_734938);c_734937.hdr.immutable = 1;

make_pair(c_734936,quote_Cyc_91bytevector_91copy,&c_734937);c_734936.hdr.immutable = 1;

make_pair(c_734942,obj_int2obj(3),NULL);c_734942.hdr.immutable = 1;

make_pair(c_734941,obj_int2obj(3),&c_734942);c_734941.hdr.immutable = 1;

make_pair(c_734940,quote_Cyc_91utf8_91_125string,&c_734941);c_734940.hdr.immutable = 1;

make_pair(c_734946,obj_int2obj(3),NULL);c_734946.hdr.immutable = 1;

make_pair(c_734945,obj_int2obj(3),&c_734946);c_734945.hdr.immutable = 1;

make_pair(c_734944,quote_Cyc_91string_91_125utf8,&c_734945);c_734944.hdr.immutable = 1;

make_pair(c_734950,obj_int2obj(2),NULL);c_734950.hdr.immutable = 1;

make_pair(c_734949,obj_int2obj(2),&c_734950);c_734949.hdr.immutable = 1;

make_pair(c_734948,quote_bytevector_91u8_91ref,&c_734949);c_734948.hdr.immutable = 1;

make_pair(c_734954,obj_int2obj(3),NULL);c_734954.hdr.immutable = 1;

make_pair(c_734953,obj_int2obj(3),&c_734954);c_734953.hdr.immutable = 1;

make_pair(c_734952,quote_bytevector_91u8_91set_67,&c_734953);c_734952.hdr.immutable = 1;

make_pair(c_734958,obj_int2obj(1),NULL);c_734958.hdr.immutable = 1;

make_pair(c_734957,obj_int2obj(1),&c_734958);c_734957.hdr.immutable = 1;

make_pair(c_734956,quote_bytevector_127,&c_734957);c_734956.hdr.immutable = 1;

make_pair(c_734962,boolean_f,NULL);c_734962.hdr.immutable = 1;

make_pair(c_734961,obj_int2obj(1),&c_734962);c_734961.hdr.immutable = 1;

make_pair(c_734960,quote_make_91vector,&c_734961);c_734960.hdr.immutable = 1;

make_pair(c_734966,obj_int2obj(1),NULL);c_734966.hdr.immutable = 1;

make_pair(c_734965,obj_int2obj(1),&c_734966);c_734965.hdr.immutable = 1;

make_pair(c_734964,quote_list_91_125vector,&c_734965);c_734964.hdr.immutable = 1;

make_pair(c_734970,obj_int2obj(1),NULL);c_734970.hdr.immutable = 1;

make_pair(c_734969,obj_int2obj(1),&c_734970);c_734969.hdr.immutable = 1;

make_pair(c_734968,quote_vector_91length,&c_734969);c_734968.hdr.immutable = 1;

make_pair(c_734974,obj_int2obj(2),NULL);c_734974.hdr.immutable = 1;

make_pair(c_734973,obj_int2obj(2),&c_734974);c_734973.hdr.immutable = 1;

make_pair(c_734972,quote_vector_91ref,&c_734973);c_734972.hdr.immutable = 1;

make_pair(c_734978,obj_int2obj(3),NULL);c_734978.hdr.immutable = 1;

make_pair(c_734977,obj_int2obj(3),&c_734978);c_734977.hdr.immutable = 1;

make_pair(c_734976,quote_vector_91set_67,&c_734977);c_734976.hdr.immutable = 1;

make_pair(c_734982,obj_int2obj(1),NULL);c_734982.hdr.immutable = 1;

make_pair(c_734981,obj_int2obj(1),&c_734982);c_734981.hdr.immutable = 1;

make_pair(c_734980,quote_boolean_127,&c_734981);c_734980.hdr.immutable = 1;

make_pair(c_734986,obj_int2obj(1),NULL);c_734986.hdr.immutable = 1;

make_pair(c_734985,obj_int2obj(1),&c_734986);c_734985.hdr.immutable = 1;

make_pair(c_734984,quote_char_127,&c_734985);c_734984.hdr.immutable = 1;

make_pair(c_734990,obj_int2obj(1),NULL);c_734990.hdr.immutable = 1;

make_pair(c_734989,obj_int2obj(1),&c_734990);c_734989.hdr.immutable = 1;

make_pair(c_734988,quote_eof_91object_127,&c_734989);c_734988.hdr.immutable = 1;

make_pair(c_734994,obj_int2obj(1),NULL);c_734994.hdr.immutable = 1;

make_pair(c_734993,obj_int2obj(1),&c_734994);c_734993.hdr.immutable = 1;

make_pair(c_734992,quote_null_127,&c_734993);c_734992.hdr.immutable = 1;

make_pair(c_734998,obj_int2obj(1),NULL);c_734998.hdr.immutable = 1;

make_pair(c_734997,obj_int2obj(1),&c_734998);c_734997.hdr.immutable = 1;

make_pair(c_734996,quote_number_127,&c_734997);c_734996.hdr.immutable = 1;

make_pair(c_735002,obj_int2obj(1),NULL);c_735002.hdr.immutable = 1;

make_pair(c_735001,obj_int2obj(1),&c_735002);c_735001.hdr.immutable = 1;

make_pair(c_735000,quote_real_127,&c_735001);c_735000.hdr.immutable = 1;

make_pair(c_735006,obj_int2obj(1),NULL);c_735006.hdr.immutable = 1;

make_pair(c_735005,obj_int2obj(1),&c_735006);c_735005.hdr.immutable = 1;

make_pair(c_735004,quote_integer_127,&c_735005);c_735004.hdr.immutable = 1;

make_pair(c_735010,obj_int2obj(1),NULL);c_735010.hdr.immutable = 1;

make_pair(c_735009,obj_int2obj(1),&c_735010);c_735009.hdr.immutable = 1;

make_pair(c_735008,quote_pair_127,&c_735009);c_735008.hdr.immutable = 1;

make_pair(c_735014,obj_int2obj(1),NULL);c_735014.hdr.immutable = 1;

make_pair(c_735013,obj_int2obj(1),&c_735014);c_735013.hdr.immutable = 1;

make_pair(c_735012,quote_port_127,&c_735013);c_735012.hdr.immutable = 1;

make_pair(c_735018,obj_int2obj(1),NULL);c_735018.hdr.immutable = 1;

make_pair(c_735017,obj_int2obj(1),&c_735018);c_735017.hdr.immutable = 1;

make_pair(c_735016,quote_procedure_127,&c_735017);c_735016.hdr.immutable = 1;

make_pair(c_735022,obj_int2obj(1),NULL);c_735022.hdr.immutable = 1;

make_pair(c_735021,obj_int2obj(1),&c_735022);c_735021.hdr.immutable = 1;

make_pair(c_735020,quote_Cyc_91macro_127,&c_735021);c_735020.hdr.immutable = 1;

make_pair(c_735026,obj_int2obj(1),NULL);c_735026.hdr.immutable = 1;

make_pair(c_735025,obj_int2obj(1),&c_735026);c_735025.hdr.immutable = 1;

make_pair(c_735024,quote_vector_127,&c_735025);c_735024.hdr.immutable = 1;

make_pair(c_735030,obj_int2obj(1),NULL);c_735030.hdr.immutable = 1;

make_pair(c_735029,obj_int2obj(1),&c_735030);c_735029.hdr.immutable = 1;

make_pair(c_735028,quote_string_127,&c_735029);c_735028.hdr.immutable = 1;

make_pair(c_735034,obj_int2obj(1),NULL);c_735034.hdr.immutable = 1;

make_pair(c_735033,obj_int2obj(1),&c_735034);c_735033.hdr.immutable = 1;

make_pair(c_735032,quote_symbol_127,&c_735033);c_735032.hdr.immutable = 1;

make_pair(c_735038,obj_int2obj(1),NULL);c_735038.hdr.immutable = 1;

make_pair(c_735037,obj_int2obj(1),&c_735038);c_735037.hdr.immutable = 1;

make_pair(c_735036,quote_open_91input_91file,&c_735037);c_735036.hdr.immutable = 1;

make_pair(c_735042,obj_int2obj(1),NULL);c_735042.hdr.immutable = 1;

make_pair(c_735041,obj_int2obj(1),&c_735042);c_735041.hdr.immutable = 1;

make_pair(c_735040,quote_open_91output_91file,&c_735041);c_735040.hdr.immutable = 1;

make_pair(c_735046,obj_int2obj(1),NULL);c_735046.hdr.immutable = 1;

make_pair(c_735045,obj_int2obj(1),&c_735046);c_735045.hdr.immutable = 1;

make_pair(c_735044,quote_open_91binary_91input_91file,&c_735045);c_735044.hdr.immutable = 1;

make_pair(c_735050,obj_int2obj(1),NULL);c_735050.hdr.immutable = 1;

make_pair(c_735049,obj_int2obj(1),&c_735050);c_735049.hdr.immutable = 1;

make_pair(c_735048,quote_open_91binary_91output_91file,&c_735049);c_735048.hdr.immutable = 1;

make_pair(c_735054,obj_int2obj(1),NULL);c_735054.hdr.immutable = 1;

make_pair(c_735053,obj_int2obj(1),&c_735054);c_735053.hdr.immutable = 1;

make_pair(c_735052,quote_close_91port,&c_735053);c_735052.hdr.immutable = 1;

make_pair(c_735058,obj_int2obj(1),NULL);c_735058.hdr.immutable = 1;

make_pair(c_735057,obj_int2obj(1),&c_735058);c_735057.hdr.immutable = 1;

make_pair(c_735056,quote_close_91input_91port,&c_735057);c_735056.hdr.immutable = 1;

make_pair(c_735062,obj_int2obj(1),NULL);c_735062.hdr.immutable = 1;

make_pair(c_735061,obj_int2obj(1),&c_735062);c_735061.hdr.immutable = 1;

make_pair(c_735060,quote_close_91output_91port,&c_735061);c_735060.hdr.immutable = 1;

make_pair(c_735066,obj_int2obj(1),NULL);c_735066.hdr.immutable = 1;

make_pair(c_735065,obj_int2obj(1),&c_735066);c_735065.hdr.immutable = 1;

make_pair(c_735064,quote_Cyc_91flush_91output_91port,&c_735065);c_735064.hdr.immutable = 1;

make_pair(c_735070,obj_int2obj(1),NULL);c_735070.hdr.immutable = 1;

make_pair(c_735069,obj_int2obj(1),&c_735070);c_735069.hdr.immutable = 1;

make_pair(c_735068,quote_file_91exists_127,&c_735069);c_735068.hdr.immutable = 1;

make_pair(c_735074,obj_int2obj(1),NULL);c_735074.hdr.immutable = 1;

make_pair(c_735073,obj_int2obj(1),&c_735074);c_735073.hdr.immutable = 1;

make_pair(c_735072,quote_delete_91file,&c_735073);c_735072.hdr.immutable = 1;

make_pair(c_735078,obj_int2obj(1),NULL);c_735078.hdr.immutable = 1;

make_pair(c_735077,obj_int2obj(1),&c_735078);c_735077.hdr.immutable = 1;

make_pair(c_735076,quote_Cyc_91read_91char,&c_735077);c_735076.hdr.immutable = 1;

make_pair(c_735082,obj_int2obj(1),NULL);c_735082.hdr.immutable = 1;

make_pair(c_735081,obj_int2obj(1),&c_735082);c_735081.hdr.immutable = 1;

make_pair(c_735080,quote_Cyc_91peek_91char,&c_735081);c_735080.hdr.immutable = 1;

make_pair(c_735086,obj_int2obj(1),NULL);c_735086.hdr.immutable = 1;

make_pair(c_735085,obj_int2obj(1),&c_735086);c_735085.hdr.immutable = 1;

make_pair(c_735084,quote_Cyc_91read_91line,&c_735085);c_735084.hdr.immutable = 1;

make_pair(c_735090,obj_int2obj(2),NULL);c_735090.hdr.immutable = 1;

make_pair(c_735089,obj_int2obj(1),&c_735090);c_735089.hdr.immutable = 1;

make_pair(c_735088,quote_Cyc_91write_91char,&c_735089);c_735088.hdr.immutable = 1;

make_pair(c_735094,obj_int2obj(2),NULL);c_735094.hdr.immutable = 1;

make_pair(c_735093,obj_int2obj(1),&c_735094);c_735093.hdr.immutable = 1;

make_pair(c_735092,quote_Cyc_91write,&c_735093);c_735092.hdr.immutable = 1;

make_pair(c_735098,obj_int2obj(2),NULL);c_735098.hdr.immutable = 1;

make_pair(c_735097,obj_int2obj(1),&c_735098);c_735097.hdr.immutable = 1;

make_pair(c_735096,quote_Cyc_91display,&c_735097);c_735096.hdr.immutable = 1;

make_pair(c_735095,&c_735096,NULL);c_735095.hdr.immutable = 1;

make_pair(c_735091,&c_735092,&c_735095);c_735091.hdr.immutable = 1;

make_pair(c_735087,&c_735088,&c_735091);c_735087.hdr.immutable = 1;

make_pair(c_735083,&c_735084,&c_735087);c_735083.hdr.immutable = 1;

make_pair(c_735079,&c_735080,&c_735083);c_735079.hdr.immutable = 1;

make_pair(c_735075,&c_735076,&c_735079);c_735075.hdr.immutable = 1;

make_pair(c_735071,&c_735072,&c_735075);c_735071.hdr.immutable = 1;

make_pair(c_735067,&c_735068,&c_735071);c_735067.hdr.immutable = 1;

make_pair(c_735063,&c_735064,&c_735067);c_735063.hdr.immutable = 1;

make_pair(c_735059,&c_735060,&c_735063);c_735059.hdr.immutable = 1;

make_pair(c_735055,&c_735056,&c_735059);c_735055.hdr.immutable = 1;

make_pair(c_735051,&c_735052,&c_735055);c_735051.hdr.immutable = 1;

make_pair(c_735047,&c_735048,&c_735051);c_735047.hdr.immutable = 1;

make_pair(c_735043,&c_735044,&c_735047);c_735043.hdr.immutable = 1;

make_pair(c_735039,&c_735040,&c_735043);c_735039.hdr.immutable = 1;

make_pair(c_735035,&c_735036,&c_735039);c_735035.hdr.immutable = 1;

make_pair(c_735031,&c_735032,&c_735035);c_735031.hdr.immutable = 1;

make_pair(c_735027,&c_735028,&c_735031);c_735027.hdr.immutable = 1;

make_pair(c_735023,&c_735024,&c_735027);c_735023.hdr.immutable = 1;

make_pair(c_735019,&c_735020,&c_735023);c_735019.hdr.immutable = 1;

make_pair(c_735015,&c_735016,&c_735019);c_735015.hdr.immutable = 1;

make_pair(c_735011,&c_735012,&c_735015);c_735011.hdr.immutable = 1;

make_pair(c_735007,&c_735008,&c_735011);c_735007.hdr.immutable = 1;

make_pair(c_735003,&c_735004,&c_735007);c_735003.hdr.immutable = 1;

make_pair(c_734999,&c_735000,&c_735003);c_734999.hdr.immutable = 1;

make_pair(c_734995,&c_734996,&c_734999);c_734995.hdr.immutable = 1;

make_pair(c_734991,&c_734992,&c_734995);c_734991.hdr.immutable = 1;

make_pair(c_734987,&c_734988,&c_734991);c_734987.hdr.immutable = 1;

make_pair(c_734983,&c_734984,&c_734987);c_734983.hdr.immutable = 1;

make_pair(c_734979,&c_734980,&c_734983);c_734979.hdr.immutable = 1;

make_pair(c_734975,&c_734976,&c_734979);c_734975.hdr.immutable = 1;

make_pair(c_734971,&c_734972,&c_734975);c_734971.hdr.immutable = 1;

make_pair(c_734967,&c_734968,&c_734971);c_734967.hdr.immutable = 1;

make_pair(c_734963,&c_734964,&c_734967);c_734963.hdr.immutable = 1;

make_pair(c_734959,&c_734960,&c_734963);c_734959.hdr.immutable = 1;

make_pair(c_734955,&c_734956,&c_734959);c_734955.hdr.immutable = 1;

make_pair(c_734951,&c_734952,&c_734955);c_734951.hdr.immutable = 1;

make_pair(c_734947,&c_734948,&c_734951);c_734947.hdr.immutable = 1;

make_pair(c_734943,&c_734944,&c_734947);c_734943.hdr.immutable = 1;

make_pair(c_734939,&c_734940,&c_734943);c_734939.hdr.immutable = 1;

make_pair(c_734935,&c_734936,&c_734939);c_734935.hdr.immutable = 1;

make_pair(c_734931,&c_734932,&c_734935);c_734931.hdr.immutable = 1;

make_pair(c_734927,&c_734928,&c_734931);c_734927.hdr.immutable = 1;

make_pair(c_734923,&c_734924,&c_734927);c_734923.hdr.immutable = 1;

make_pair(c_734919,&c_734920,&c_734923);c_734919.hdr.immutable = 1;

make_pair(c_734915,&c_734916,&c_734919);c_734915.hdr.immutable = 1;

make_pair(c_734911,&c_734912,&c_734915);c_734911.hdr.immutable = 1;

make_pair(c_734907,&c_734908,&c_734911);c_734907.hdr.immutable = 1;

make_pair(c_734903,&c_734904,&c_734907);c_734903.hdr.immutable = 1;

make_pair(c_734899,&c_734900,&c_734903);c_734899.hdr.immutable = 1;

make_pair(c_734895,&c_734896,&c_734899);c_734895.hdr.immutable = 1;

make_pair(c_734891,&c_734892,&c_734895);c_734891.hdr.immutable = 1;

make_pair(c_734887,&c_734888,&c_734891);c_734887.hdr.immutable = 1;

make_pair(c_734883,&c_734884,&c_734887);c_734883.hdr.immutable = 1;

make_pair(c_734879,&c_734880,&c_734883);c_734879.hdr.immutable = 1;

make_pair(c_734875,&c_734876,&c_734879);c_734875.hdr.immutable = 1;

make_pair(c_734871,&c_734872,&c_734875);c_734871.hdr.immutable = 1;

make_pair(c_734867,&c_734868,&c_734871);c_734867.hdr.immutable = 1;

make_pair(c_734863,&c_734864,&c_734867);c_734863.hdr.immutable = 1;

make_pair(c_734859,&c_734860,&c_734863);c_734859.hdr.immutable = 1;

make_pair(c_734855,&c_734856,&c_734859);c_734855.hdr.immutable = 1;

make_pair(c_734851,&c_734852,&c_734855);c_734851.hdr.immutable = 1;

make_pair(c_734847,&c_734848,&c_734851);c_734847.hdr.immutable = 1;

make_pair(c_734843,&c_734844,&c_734847);c_734843.hdr.immutable = 1;

make_pair(c_734839,&c_734840,&c_734843);c_734839.hdr.immutable = 1;

make_pair(c_734835,&c_734836,&c_734839);c_734835.hdr.immutable = 1;

make_pair(c_734831,&c_734832,&c_734835);c_734831.hdr.immutable = 1;

make_pair(c_734827,&c_734828,&c_734831);c_734827.hdr.immutable = 1;

make_pair(c_734823,&c_734824,&c_734827);c_734823.hdr.immutable = 1;

make_pair(c_734819,&c_734820,&c_734823);c_734819.hdr.immutable = 1;

make_pair(c_734815,&c_734816,&c_734819);c_734815.hdr.immutable = 1;

make_pair(c_734811,&c_734812,&c_734815);c_734811.hdr.immutable = 1;

make_pair(c_734807,&c_734808,&c_734811);c_734807.hdr.immutable = 1;

make_pair(c_734803,&c_734804,&c_734807);c_734803.hdr.immutable = 1;

make_pair(c_734799,&c_734800,&c_734803);c_734799.hdr.immutable = 1;

make_pair(c_734795,&c_734796,&c_734799);c_734795.hdr.immutable = 1;

make_pair(c_734791,&c_734792,&c_734795);c_734791.hdr.immutable = 1;

make_pair(c_734787,&c_734788,&c_734791);c_734787.hdr.immutable = 1;

make_pair(c_734783,&c_734784,&c_734787);c_734783.hdr.immutable = 1;

make_pair(c_734779,&c_734780,&c_734783);c_734779.hdr.immutable = 1;

make_pair(c_734775,&c_734776,&c_734779);c_734775.hdr.immutable = 1;

make_pair(c_734771,&c_734772,&c_734775);c_734771.hdr.immutable = 1;

make_pair(c_734767,&c_734768,&c_734771);c_734767.hdr.immutable = 1;

make_pair(c_734763,&c_734764,&c_734767);c_734763.hdr.immutable = 1;

make_pair(c_734759,&c_734760,&c_734763);c_734759.hdr.immutable = 1;

make_pair(c_734755,&c_734756,&c_734759);c_734755.hdr.immutable = 1;

make_pair(c_734751,&c_734752,&c_734755);c_734751.hdr.immutable = 1;

make_pair(c_734747,&c_734748,&c_734751);c_734747.hdr.immutable = 1;

make_pair(c_734743,&c_734744,&c_734747);c_734743.hdr.immutable = 1;

make_pair(c_734739,&c_734740,&c_734743);c_734739.hdr.immutable = 1;

make_pair(c_734735,&c_734736,&c_734739);c_734735.hdr.immutable = 1;

make_pair(c_734731,&c_734732,&c_734735);c_734731.hdr.immutable = 1;

make_pair(c_734727,&c_734728,&c_734731);c_734727.hdr.immutable = 1;

make_pair(c_734723,&c_734724,&c_734727);c_734723.hdr.immutable = 1;

make_pair(c_734719,&c_734720,&c_734723);c_734719.hdr.immutable = 1;

make_pair(c_734715,&c_734716,&c_734719);c_734715.hdr.immutable = 1;

make_pair(c_734711,&c_734712,&c_734715);c_734711.hdr.immutable = 1;

make_pair(c_734707,&c_734708,&c_734711);c_734707.hdr.immutable = 1;

make_pair(c_734703,&c_734704,&c_734707);c_734703.hdr.immutable = 1;

make_pair(c_734699,&c_734700,&c_734703);c_734699.hdr.immutable = 1;

make_pair(c_734695,&c_734696,&c_734699);c_734695.hdr.immutable = 1;

make_pair(c_734691,&c_734692,&c_734695);c_734691.hdr.immutable = 1;

make_pair(c_734687,&c_734688,&c_734691);c_734687.hdr.immutable = 1;

make_pair(c_734683,&c_734684,&c_734687);c_734683.hdr.immutable = 1;

make_pair(c_734679,&c_734680,&c_734683);c_734679.hdr.immutable = 1;

make_pair(c_734675,&c_734676,&c_734679);c_734675.hdr.immutable = 1;

make_pair(c_734671,&c_734672,&c_734675);c_734671.hdr.immutable = 1;

make_pair(c_734667,&c_734668,&c_734671);c_734667.hdr.immutable = 1;

make_pair(c_734663,&c_734664,&c_734667);c_734663.hdr.immutable = 1;

make_pair(c_734659,&c_734660,&c_734663);c_734659.hdr.immutable = 1;

make_pair(c_734655,&c_734656,&c_734659);c_734655.hdr.immutable = 1;

make_pair(c_734651,&c_734652,&c_734655);c_734651.hdr.immutable = 1;

make_pair(c_734647,&c_734648,&c_734651);c_734647.hdr.immutable = 1;

make_pair(c_734643,&c_734644,&c_734647);c_734643.hdr.immutable = 1;

make_pair(c_734639,&c_734640,&c_734643);c_734639.hdr.immutable = 1;

make_pair(c_734635,&c_734636,&c_734639);c_734635.hdr.immutable = 1;

make_pair(c_734631,&c_734632,&c_734635);c_734631.hdr.immutable = 1;

make_pair(c_734627,&c_734628,&c_734631);c_734627.hdr.immutable = 1;

make_pair(c_734623,&c_734624,&c_734627);c_734623.hdr.immutable = 1;

make_pair(c_734619,&c_734620,&c_734623);c_734619.hdr.immutable = 1;

make_pair(c_734615,&c_734616,&c_734619);c_734615.hdr.immutable = 1;

make_pair(c_734611,&c_734612,&c_734615);c_734611.hdr.immutable = 1;

make_pair(c_734607,&c_734608,&c_734611);c_734607.hdr.immutable = 1;

make_pair(c_734603,&c_734604,&c_734607);c_734603.hdr.immutable = 1;

make_pair(c_734599,&c_734600,&c_734603);c_734599.hdr.immutable = 1;

make_pair(c_734595,&c_734596,&c_734599);c_734595.hdr.immutable = 1;

make_pair(c_734591,&c_734592,&c_734595);c_734591.hdr.immutable = 1;

make_pair(c_734587,&c_734588,&c_734591);c_734587.hdr.immutable = 1;

make_pair(c_734583,&c_734584,&c_734587);c_734583.hdr.immutable = 1;

make_pair(c_734579,&c_734580,&c_734583);c_734579.hdr.immutable = 1;

make_pair(c_734575,&c_734576,&c_734579);c_734575.hdr.immutable = 1;

make_pair(c_734571,&c_734572,&c_734575);c_734571.hdr.immutable = 1;

make_pair(c_734567,&c_734568,&c_734571);c_734567.hdr.immutable = 1;

make_pair(c_734563,&c_734564,&c_734567);c_734563.hdr.immutable = 1;

make_pair(c_734559,&c_734560,&c_734563);c_734559.hdr.immutable = 1;

make_pair(c_734555,&c_734556,&c_734559);c_734555.hdr.immutable = 1;

make_pair(c_734551,&c_734552,&c_734555);c_734551.hdr.immutable = 1;

make_pair(c_734547,&c_734548,&c_734551);c_734547.hdr.immutable = 1;

make_pair(c_734543,&c_734544,&c_734547);c_734543.hdr.immutable = 1;

make_pair(c_734539,&c_734540,&c_734543);c_734539.hdr.immutable = 1;

make_pair(c_734535,&c_734536,&c_734539);c_734535.hdr.immutable = 1;

make_pair(c_734531,&c_734532,&c_734535);c_734531.hdr.immutable = 1;

make_pair(c_734527,&c_734528,&c_734531);c_734527.hdr.immutable = 1;

make_pair(c_734523,&c_734524,&c_734527);c_734523.hdr.immutable = 1;

make_pair(c_734519,&c_734520,&c_734523);c_734519.hdr.immutable = 1;

make_pair(c_734515,&c_734516,&c_734519);c_734515.hdr.immutable = 1;

make_pair(c_734511,&c_734512,&c_734515);c_734511.hdr.immutable = 1;

make_pair(c_734507,&c_734508,&c_734511);c_734507.hdr.immutable = 1;

make_pair(c_734503,&c_734504,&c_734507);c_734503.hdr.immutable = 1;

make_pair(c_734499,&c_734500,&c_734503);c_734499.hdr.immutable = 1;

make_pair(c_734495,&c_734496,&c_734499);c_734495.hdr.immutable = 1;

make_pair(c_734491,&c_734492,&c_734495);c_734491.hdr.immutable = 1;

make_pair(c_734487,&c_734488,&c_734491);c_734487.hdr.immutable = 1;

make_pair(c_734483,&c_734484,&c_734487);c_734483.hdr.immutable = 1;

make_pair(c_734479,&c_734480,&c_734483);c_734479.hdr.immutable = 1;

make_pair(c_734475,&c_734476,&c_734479);c_734475.hdr.immutable = 1;

make_pair(c_734471,&c_734472,&c_734475);c_734471.hdr.immutable = 1;

make_pair(c_734467,&c_734468,&c_734471);c_734467.hdr.immutable = 1;

make_pair(c_734463,&c_734464,&c_734467);c_734463.hdr.immutable = 1;

make_pair(c_734459,&c_734460,&c_734463);c_734459.hdr.immutable = 1;

make_pair(c_734455,&c_734456,&c_734459);c_734455.hdr.immutable = 1;

object c_734454 = global_set_cps_id(data,(closure)&c_734448,"__glo__85primitives_91num_91args_85_scheme_cyclone_primitives", __glo__85primitives_91num_91args_85_scheme_cyclone_primitives, &c_734455);
return_closcall1(data,(closure)&c_734448,  c_734454);; 
}

static void __lambda_236(void *data, object self_731769, int argc, object *args) /* object self_731769, object r_731549 */
 {

  return_direct_with_clo3(data,  __glo_hs_91add_91all_67_scheme_cyclone_hashset, (((closure)  __glo_hs_91add_91all_67_scheme_cyclone_hashset)->fn),  ((closureN)self_731769)->elements[0], __glo__85hs_91prims_85_scheme_cyclone_primitives, __glo__85primitives_85_scheme_cyclone_primitives);; 
}

static void __lambda_224(void *data, object _, int argc, object *args) /* closure _,object k_731533, object func_91sym_73805_73854, object num_91args_73806_73855 */
 {
object k_731533 = args[0]; object func_91sym_73805_73854 = args[1]; object num_91args_73806_73855 = args[2];
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:prim:func->prim");

closureN_type c_734357;
object e_734435 [3];
c_734357.hdr.mark = gc_color_red;
 c_734357.hdr.grayed = 0;
c_734357.tag = closureN_tag;
 c_734357.fn = (function_type)__lambda_225;
c_734357.num_args = 1;
c_734357.num_elements = 3;
c_734357.elements = (object *)e_734435;
c_734357.elements[0] = func_91sym_73805_73854;
c_734357.elements[1] = k_731533;
c_734357.elements[2] = num_91args_73806_73855;

return_direct_with_clo1(data,(closure)&c_734357,__lambda_225,  boolean_f);; 
}

static void __lambda_225(void *data, object self_731758, int argc, object *args) /* object self_731758, object mappings_73857 */
 {
 object mappings_73857 = args[0];
  
closureN_type c_734359;
object e_734431 [3];
c_734359.hdr.mark = gc_color_red;
 c_734359.hdr.grayed = 0;
c_734359.tag = closureN_tag;
 c_734359.fn = (function_type)__lambda_237;
c_734359.num_args = 1;
c_734359.num_elements = 3;
c_734359.elements = (object *)e_734431;
c_734359.elements[0] = ((closureN)self_731758)->elements[0];
c_734359.elements[1] = ((closureN)self_731758)->elements[1];
c_734359.elements[2] = ((closureN)self_731758)->elements[2];


pair_type local_734434; 
return_direct_with_clo1(data,(closure)&c_734359,__lambda_237,  set_cell_as_expr(&local_734434, mappings_73857));; 
}

static void __lambda_237(void *data, object self_731759, int argc, object *args) /* object self_731759, object mappings_73857 */
 {
 object mappings_73857 = args[0];
  
closureN_type c_734361;
object e_734400 [4];
c_734361.hdr.mark = gc_color_red;
 c_734361.hdr.grayed = 0;
c_734361.tag = closureN_tag;
 c_734361.fn = (function_type)__lambda_226;
c_734361.num_args = 1;
c_734361.num_elements = 4;
c_734361.elements = (object *)e_734400;
c_734361.elements[0] = ((closureN)self_731759)->elements[0];
c_734361.elements[1] = ((closureN)self_731759)->elements[1];
c_734361.elements[2] = mappings_73857;
c_734361.elements[3] = ((closureN)self_731759)->elements[2];




make_pair(c_734406,quote_Cyc_91fast_91char_91eq,NULL);c_734406.hdr.immutable = 1;

make_pair(c_734405,obj_int2obj(2),&c_734406);c_734405.hdr.immutable = 1;

make_pair(c_734404,quote_char_123_127,&c_734405);c_734404.hdr.immutable = 1;

make_pair(c_734410,quote_Cyc_91fast_91char_91gt,NULL);c_734410.hdr.immutable = 1;

make_pair(c_734409,obj_int2obj(2),&c_734410);c_734409.hdr.immutable = 1;

make_pair(c_734408,quote_char_125_127,&c_734409);c_734408.hdr.immutable = 1;

make_pair(c_734414,quote_Cyc_91fast_91char_91lt,NULL);c_734414.hdr.immutable = 1;

make_pair(c_734413,obj_int2obj(2),&c_734414);c_734413.hdr.immutable = 1;

make_pair(c_734412,quote_char_121_127,&c_734413);c_734412.hdr.immutable = 1;

make_pair(c_734418,quote_Cyc_91fast_91char_91gte,NULL);c_734418.hdr.immutable = 1;

make_pair(c_734417,obj_int2obj(2),&c_734418);c_734417.hdr.immutable = 1;

make_pair(c_734416,quote_char_125_123_127,&c_734417);c_734416.hdr.immutable = 1;

make_pair(c_734422,quote_Cyc_91fast_91char_91lte,NULL);c_734422.hdr.immutable = 1;

make_pair(c_734421,obj_int2obj(2),&c_734422);c_734421.hdr.immutable = 1;

make_pair(c_734420,quote_char_121_123_127,&c_734421);c_734420.hdr.immutable = 1;

make_pair(c_734426,quote_Cyc_91read_91char,NULL);c_734426.hdr.immutable = 1;

make_pair(c_734425,obj_int2obj(1),&c_734426);c_734425.hdr.immutable = 1;

make_pair(c_734424,quote_read_91char,&c_734425);c_734424.hdr.immutable = 1;

make_pair(c_734430,quote_Cyc_91peek_91char,NULL);c_734430.hdr.immutable = 1;

make_pair(c_734429,obj_int2obj(1),&c_734430);c_734429.hdr.immutable = 1;

make_pair(c_734428,quote_peek_91char,&c_734429);c_734428.hdr.immutable = 1;

make_pair(c_734427,&c_734428,NULL);c_734427.hdr.immutable = 1;

make_pair(c_734423,&c_734424,&c_734427);c_734423.hdr.immutable = 1;

make_pair(c_734419,&c_734420,&c_734423);c_734419.hdr.immutable = 1;

make_pair(c_734415,&c_734416,&c_734419);c_734415.hdr.immutable = 1;

make_pair(c_734411,&c_734412,&c_734415);c_734411.hdr.immutable = 1;

make_pair(c_734407,&c_734408,&c_734411);c_734407.hdr.immutable = 1;

make_pair(c_734403,&c_734404,&c_734407);c_734403.hdr.immutable = 1;
return_direct_with_clo1(data,(closure)&c_734361,__lambda_226,  Cyc_set_cell(data, mappings_73857, &c_734403));; 
}

static void __lambda_226(void *data, object self_731760, int argc, object *args) /* object self_731760, object r_731534 */
 {

  
closureN_type c_734363;
object e_734393 [3];
c_734363.hdr.mark = gc_color_red;
 c_734363.hdr.grayed = 0;
c_734363.tag = closureN_tag;
 c_734363.fn = (function_type)__lambda_227;
c_734363.num_args = 1;
c_734363.num_elements = 3;
c_734363.elements = (object *)e_734393;
c_734363.elements[0] = ((closureN)self_731760)->elements[0];
c_734363.elements[1] = ((closureN)self_731760)->elements[1];
c_734363.elements[2] = ((closureN)self_731760)->elements[3];





return_direct_with_clo1(data,(closure)&c_734363,__lambda_227,  assoc(data, ((closureN)self_731760)->elements[0], car(((closureN)self_731760)->elements[2])));; 
}

static void __lambda_227(void *data, object self_731761, int argc, object *args) /* object self_731761, object r_731535 */
 {
 object r_731535 = args[0];
  
closureN_type c_734365;
object e_734389 [4];
c_734365.hdr.mark = gc_color_red;
 c_734365.hdr.grayed = 0;
c_734365.tag = closureN_tag;
 c_734365.fn = (function_type)__lambda_228;
c_734365.num_args = 1;
c_734365.num_elements = 4;
c_734365.elements = (object *)e_734389;
c_734365.elements[0] = ((closureN)self_731761)->elements[0];
c_734365.elements[1] = ((closureN)self_731761)->elements[1];
c_734365.elements[2] = ((closureN)self_731761)->elements[2];
c_734365.elements[3] = r_731535;



return_direct_with_clo1(data,(closure)&c_734365,__lambda_228,  assoc(data, ((closureN)self_731761)->elements[0], __glo__85udf_91cps_91_125inline_85_scheme_cyclone_primitives));; 
}

static void __lambda_228(void *data, object self_731762, int argc, object *args) /* object self_731762, object r_731536 */
 {
 object r_731536 = args[0];
  
closureN_type c_734367;
object e_734387 [3];
c_734367.hdr.mark = gc_color_red;
 c_734367.hdr.grayed = 0;
c_734367.tag = closureN_tag;
 c_734367.fn = (function_type)__lambda_229;
c_734367.num_args = 2;
c_734367.num_elements = 3;
c_734367.elements = (object *)e_734387;
c_734367.elements[0] = ((closureN)self_731762)->elements[0];
c_734367.elements[1] = ((closureN)self_731762)->elements[1];
c_734367.elements[2] = ((closureN)self_731762)->elements[2];

return_direct_with_clo2(data,(closure)&c_734367,__lambda_229,  ((closureN)self_731762)->elements[3], r_731536);; 
}

static void __lambda_229(void *data, object self_731763, int argc, object *args) /* object self_731763, object m_73807_73859, object udf_73808_73860 */
 {
 object m_73807_73859 = args[0]; object udf_73808_73860 = args[1];
  object r_731537;
  if( (boolean_f != m_73807_73859) ){ 
  
  
  r_731537 = Cyc_num_fast_eq_op(data, Cyc_cadr(data, m_73807_73859), ((closureN)self_731763)->elements[2]);
} else { 
  r_731537 = boolean_f;}
;if( (boolean_f != r_731537) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_731763)->elements[1], (((closure)  ((closureN)self_731763)->elements[1])->fn),  Cyc_caddr(data, m_73807_73859));
} else { 
  if( (boolean_f != udf_73808_73860) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_731763)->elements[1], (((closure)  ((closureN)self_731763)->elements[1])->fn),  Cyc_cdr(data, udf_73808_73860));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_731763)->elements[1], (((closure)  ((closureN)self_731763)->elements[1])->fn),  ((closureN)self_731763)->elements[0]);}
;}
;; 
}

static void __lambda_221(void *data, object _, int argc, object *args) /* closure _,object k_731518, object expr_73794_73850 */
 {
object k_731518 = args[0]; object expr_73794_73850 = args[1];
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:->dyadic");
  
  
if( (boolean_f != Cyc_num_fast_lt_op(data, Cyc_length(data, expr_73794_73850), obj_int2obj(4))) ){ 
  return_direct_with_clo1(data,  k_731518, (((closure)  k_731518)->fn),  expr_73794_73850);
} else { 
  
closureN_type c_734321;
object e_734345 [2];
c_734321.hdr.mark = gc_color_red;
 c_734321.hdr.grayed = 0;
c_734321.tag = closureN_tag;
 c_734321.fn = (function_type)__lambda_222;
c_734321.num_args = 1;
c_734321.num_elements = 2;
c_734321.elements = (object *)e_734345;
c_734321.elements[0] = expr_73794_73850;
c_734321.elements[1] = k_731518;


closureN_type c_734346;
object e_734354 [1];
c_734346.hdr.mark = gc_color_red;
 c_734346.hdr.grayed = 0;
c_734346.tag = closureN_tag;
 c_734346.fn = (function_type)__lambda_223;
c_734346.num_args = 2;
c_734346.num_elements = 1;
c_734346.elements = (object *)e_734354;
c_734346.elements[0] = expr_73794_73850;

return_direct_with_clo1(data,(closure)&c_734321,__lambda_222,  &c_734346);}
;; 
}

static void __lambda_223(void *data, object self_731756, int argc, object *args) /* object self_731756, object k_731529, object x_73800_73852, object acc_73801_73853 */
 {
 object k_731529 = args[0]; object x_73800_73852 = args[1]; object acc_73801_73853 = args[2];
  
list_3_type local_734350; 


return_direct_with_clo1(data,  k_731529, (((closure)  k_731529)->fn),  Cyc_fast_list_3(&local_734350, Cyc_car(data, ((closureN)self_731756)->elements[0]), acc_73801_73853, x_73800_73852));; 
}

static void __lambda_222(void *data, object self_731757, int argc, object *args) /* object self_731757, object r_731521 */
 {
 object r_731521 = args[0];
  
pair_type local_734326; 



pair_type local_734332; 



pair_type local_734338; 




return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  ((closureN)self_731757)->elements[1], r_731521, set_pair_as_expr(&local_734326, Cyc_car(data, ((closureN)self_731757)->elements[0]), set_pair_as_expr(&local_734332, Cyc_cadr(data, ((closureN)self_731757)->elements[0]), set_pair_as_expr(&local_734338, Cyc_caddr(data, ((closureN)self_731757)->elements[0]), NULL))), Cyc_cdddr(data, ((closureN)self_731757)->elements[0]));; 
}

static void __lambda_202(void *data, object _, int argc, object *args) /* closure _,object k_731407, object prim_91call_73728_73849 */
 {
object k_731407 = args[0]; object prim_91call_73728_73849 = args[1];
  object r_731408;
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:prim:inline-convert-prim-call");
  
  
if( (boolean_f != equalp(Cyc_car(data, prim_91call_73728_73849), quote__87)) ){ 
  
  
  r_731408 = Cyc_num_fast_eq_op(data, Cyc_length(data, prim_91call_73728_73849), obj_int2obj(2));
} else { 
  r_731408 = boolean_f;}
;if( (boolean_f != r_731408) ){ 
  
pair_type local_734019; 

pair_type local_734022; 


return_direct_with_clo1(data,  k_731407, (((closure)  k_731407)->fn),  set_pair_as_expr(&local_734019, quote_Cyc_91fast_91plus, set_pair_as_expr(&local_734022, obj_int2obj(0), Cyc_cdr(data, prim_91call_73728_73849))));
} else { 
  
closureN_type c_734026;
object e_734039 [1];
c_734026.hdr.mark = gc_color_red;
 c_734026.hdr.grayed = 0;
c_734026.tag = closureN_tag;
 c_734026.fn = (function_type)__lambda_203;
c_734026.num_args = 0;
c_734026.num_elements = 1;
c_734026.elements = (object *)e_734039;
c_734026.elements[0] = prim_91call_73728_73849;


closureN_type c_734040;
object e_734313 [2];
c_734040.hdr.mark = gc_color_red;
 c_734040.hdr.grayed = 0;
c_734040.tag = closureN_tag;
 c_734040.fn = (function_type)__lambda_204;
c_734040.num_args = 1;
c_734040.num_elements = 2;
c_734040.elements = (object *)e_734313;
c_734040.elements[0] = k_731407;
c_734040.elements[1] = prim_91call_73728_73849;

return_direct_with_clo1(data,(closure)&c_734026,__lambda_203,  &c_734040);}
;; 
}

static void __lambda_204(void *data, object self_731738, int argc, object *args) /* object self_731738, object r_731412 */
 {
 object r_731412 = args[0];
  if( (boolean_f != r_731412) ){ 
  
pair_type local_734045; 

pair_type local_734048; 


return_direct_with_clo1(data,  ((closureN)self_731738)->elements[0], (((closure)  ((closureN)self_731738)->elements[0])->fn),  set_pair_as_expr(&local_734045, quote_Cyc_91fast_91mul, set_pair_as_expr(&local_734048, obj_int2obj(1), Cyc_cdr(data, ((closureN)self_731738)->elements[1]))));
} else { 
    
  
if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_731738)->elements[1]), quote__87)) ){ 
  
pair_type local_734061; 


return_direct_with_clo2(data,  __glo__91_125dyadic_scheme_cyclone_primitives, (((closure)  __glo__91_125dyadic_scheme_cyclone_primitives)->fn),  ((closureN)self_731738)->elements[0], set_pair_as_expr(&local_734061, quote_Cyc_91fast_91plus, Cyc_cdr(data, ((closureN)self_731738)->elements[1])));
} else { 
    
  
if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_731738)->elements[1]), quote__85)) ){ 
  
pair_type local_734074; 


return_direct_with_clo2(data,  __glo__91_125dyadic_scheme_cyclone_primitives, (((closure)  __glo__91_125dyadic_scheme_cyclone_primitives)->fn),  ((closureN)self_731738)->elements[0], set_pair_as_expr(&local_734074, quote_Cyc_91fast_91mul, Cyc_cdr(data, ((closureN)self_731738)->elements[1])));
} else { 
  
closureN_type c_734079;
object e_734092 [1];
c_734079.hdr.mark = gc_color_red;
 c_734079.hdr.grayed = 0;
c_734079.tag = closureN_tag;
 c_734079.fn = (function_type)__lambda_205;
c_734079.num_args = 0;
c_734079.num_elements = 1;
c_734079.elements = (object *)e_734092;
c_734079.elements[0] = ((closureN)self_731738)->elements[1];


closureN_type c_734093;
object e_734312 [2];
c_734093.hdr.mark = gc_color_red;
 c_734093.hdr.grayed = 0;
c_734093.tag = closureN_tag;
 c_734093.fn = (function_type)__lambda_206;
c_734093.num_args = 1;
c_734093.num_elements = 2;
c_734093.elements = (object *)e_734312;
c_734093.elements[0] = ((closureN)self_731738)->elements[0];
c_734093.elements[1] = ((closureN)self_731738)->elements[1];

return_direct_with_clo1(data,(closure)&c_734079,__lambda_205,  &c_734093);}
;}
;}
;; 
}

static void __lambda_206(void *data, object self_731739, int argc, object *args) /* object self_731739, object r_731424 */
 {
 object r_731424 = args[0];
  if( (boolean_f != r_731424) ){ 
  
pair_type local_734098; 

pair_type local_734101; 


return_direct_with_clo1(data,  ((closureN)self_731739)->elements[0], (((closure)  ((closureN)self_731739)->elements[0])->fn),  set_pair_as_expr(&local_734098, quote_Cyc_91fast_91sub, set_pair_as_expr(&local_734101, obj_int2obj(0), Cyc_cdr(data, ((closureN)self_731739)->elements[1]))));
} else { 
    
  
if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_731739)->elements[1]), quote__91)) ){ 
  
pair_type local_734114; 


return_direct_with_clo2(data,  __glo__91_125dyadic_scheme_cyclone_primitives, (((closure)  __glo__91_125dyadic_scheme_cyclone_primitives)->fn),  ((closureN)self_731739)->elements[0], set_pair_as_expr(&local_734114, quote_Cyc_91fast_91sub, Cyc_cdr(data, ((closureN)self_731739)->elements[1])));
} else { 
  
closureN_type c_734119;
object e_734132 [1];
c_734119.hdr.mark = gc_color_red;
 c_734119.hdr.grayed = 0;
c_734119.tag = closureN_tag;
 c_734119.fn = (function_type)__lambda_207;
c_734119.num_args = 0;
c_734119.num_elements = 1;
c_734119.elements = (object *)e_734132;
c_734119.elements[0] = ((closureN)self_731739)->elements[1];


closureN_type c_734133;
object e_734311 [2];
c_734133.hdr.mark = gc_color_red;
 c_734133.hdr.grayed = 0;
c_734133.tag = closureN_tag;
 c_734133.fn = (function_type)__lambda_208;
c_734133.num_args = 1;
c_734133.num_elements = 2;
c_734133.elements = (object *)e_734311;
c_734133.elements[0] = ((closureN)self_731739)->elements[0];
c_734133.elements[1] = ((closureN)self_731739)->elements[1];

return_direct_with_clo1(data,(closure)&c_734119,__lambda_207,  &c_734133);}
;}
;; 
}

static void __lambda_208(void *data, object self_731740, int argc, object *args) /* object self_731740, object r_731432 */
 {
 object r_731432 = args[0];
  if( (boolean_f != r_731432) ){ 
  
pair_type local_734138; 

pair_type local_734141; 


return_direct_with_clo1(data,  ((closureN)self_731740)->elements[0], (((closure)  ((closureN)self_731740)->elements[0])->fn),  set_pair_as_expr(&local_734138, quote_Cyc_91fast_91div, set_pair_as_expr(&local_734141, obj_int2obj(1), Cyc_cdr(data, ((closureN)self_731740)->elements[1]))));
} else { 
    
  
if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_731740)->elements[1]), quote__95)) ){ 
  
pair_type local_734154; 


return_direct_with_clo2(data,  __glo__91_125dyadic_scheme_cyclone_primitives, (((closure)  __glo__91_125dyadic_scheme_cyclone_primitives)->fn),  ((closureN)self_731740)->elements[0], set_pair_as_expr(&local_734154, quote_Cyc_91fast_91div, Cyc_cdr(data, ((closureN)self_731740)->elements[1])));
} else { 
  
closureN_type c_734159;
object e_734172 [1];
c_734159.hdr.mark = gc_color_red;
 c_734159.hdr.grayed = 0;
c_734159.tag = closureN_tag;
 c_734159.fn = (function_type)__lambda_209;
c_734159.num_args = 0;
c_734159.num_elements = 1;
c_734159.elements = (object *)e_734172;
c_734159.elements[0] = ((closureN)self_731740)->elements[1];


closureN_type c_734173;
object e_734310 [2];
c_734173.hdr.mark = gc_color_red;
 c_734173.hdr.grayed = 0;
c_734173.tag = closureN_tag;
 c_734173.fn = (function_type)__lambda_210;
c_734173.num_args = 1;
c_734173.num_elements = 2;
c_734173.elements = (object *)e_734310;
c_734173.elements[0] = ((closureN)self_731740)->elements[0];
c_734173.elements[1] = ((closureN)self_731740)->elements[1];

return_direct_with_clo1(data,(closure)&c_734159,__lambda_209,  &c_734173);}
;}
;; 
}

static void __lambda_210(void *data, object self_731741, int argc, object *args) /* object self_731741, object r_731440 */
 {
 object r_731440 = args[0];
  if( (boolean_f != r_731440) ){ 
  
pair_type local_734178; 


return_direct_with_clo1(data,  ((closureN)self_731741)->elements[0], (((closure)  ((closureN)self_731741)->elements[0])->fn),  set_pair_as_expr(&local_734178, quote_Cyc_91fast_91eq, Cyc_cdr(data, ((closureN)self_731741)->elements[1])));
} else { 
  
closureN_type c_734183;
object e_734196 [1];
c_734183.hdr.mark = gc_color_red;
 c_734183.hdr.grayed = 0;
c_734183.tag = closureN_tag;
 c_734183.fn = (function_type)__lambda_211;
c_734183.num_args = 0;
c_734183.num_elements = 1;
c_734183.elements = (object *)e_734196;
c_734183.elements[0] = ((closureN)self_731741)->elements[1];


closureN_type c_734197;
object e_734309 [2];
c_734197.hdr.mark = gc_color_red;
 c_734197.hdr.grayed = 0;
c_734197.tag = closureN_tag;
 c_734197.fn = (function_type)__lambda_212;
c_734197.num_args = 1;
c_734197.num_elements = 2;
c_734197.elements = (object *)e_734309;
c_734197.elements[0] = ((closureN)self_731741)->elements[0];
c_734197.elements[1] = ((closureN)self_731741)->elements[1];

return_direct_with_clo1(data,(closure)&c_734183,__lambda_211,  &c_734197);}
;; 
}

static void __lambda_212(void *data, object self_731742, int argc, object *args) /* object self_731742, object r_731443 */
 {
 object r_731443 = args[0];
  if( (boolean_f != r_731443) ){ 
  
pair_type local_734202; 


return_direct_with_clo1(data,  ((closureN)self_731742)->elements[0], (((closure)  ((closureN)self_731742)->elements[0])->fn),  set_pair_as_expr(&local_734202, quote_Cyc_91fast_91gt, Cyc_cdr(data, ((closureN)self_731742)->elements[1])));
} else { 
  
closureN_type c_734207;
object e_734220 [1];
c_734207.hdr.mark = gc_color_red;
 c_734207.hdr.grayed = 0;
c_734207.tag = closureN_tag;
 c_734207.fn = (function_type)__lambda_213;
c_734207.num_args = 0;
c_734207.num_elements = 1;
c_734207.elements = (object *)e_734220;
c_734207.elements[0] = ((closureN)self_731742)->elements[1];


closureN_type c_734221;
object e_734308 [2];
c_734221.hdr.mark = gc_color_red;
 c_734221.hdr.grayed = 0;
c_734221.tag = closureN_tag;
 c_734221.fn = (function_type)__lambda_214;
c_734221.num_args = 1;
c_734221.num_elements = 2;
c_734221.elements = (object *)e_734308;
c_734221.elements[0] = ((closureN)self_731742)->elements[0];
c_734221.elements[1] = ((closureN)self_731742)->elements[1];

return_direct_with_clo1(data,(closure)&c_734207,__lambda_213,  &c_734221);}
;; 
}

static void __lambda_214(void *data, object self_731743, int argc, object *args) /* object self_731743, object r_731446 */
 {
 object r_731446 = args[0];
  if( (boolean_f != r_731446) ){ 
  
pair_type local_734226; 


return_direct_with_clo1(data,  ((closureN)self_731743)->elements[0], (((closure)  ((closureN)self_731743)->elements[0])->fn),  set_pair_as_expr(&local_734226, quote_Cyc_91fast_91lt, Cyc_cdr(data, ((closureN)self_731743)->elements[1])));
} else { 
  
closureN_type c_734231;
object e_734244 [1];
c_734231.hdr.mark = gc_color_red;
 c_734231.hdr.grayed = 0;
c_734231.tag = closureN_tag;
 c_734231.fn = (function_type)__lambda_215;
c_734231.num_args = 0;
c_734231.num_elements = 1;
c_734231.elements = (object *)e_734244;
c_734231.elements[0] = ((closureN)self_731743)->elements[1];


closureN_type c_734245;
object e_734307 [2];
c_734245.hdr.mark = gc_color_red;
 c_734245.hdr.grayed = 0;
c_734245.tag = closureN_tag;
 c_734245.fn = (function_type)__lambda_216;
c_734245.num_args = 1;
c_734245.num_elements = 2;
c_734245.elements = (object *)e_734307;
c_734245.elements[0] = ((closureN)self_731743)->elements[0];
c_734245.elements[1] = ((closureN)self_731743)->elements[1];

return_direct_with_clo1(data,(closure)&c_734231,__lambda_215,  &c_734245);}
;; 
}

static void __lambda_216(void *data, object self_731744, int argc, object *args) /* object self_731744, object r_731449 */
 {
 object r_731449 = args[0];
  if( (boolean_f != r_731449) ){ 
  
pair_type local_734250; 


return_direct_with_clo1(data,  ((closureN)self_731744)->elements[0], (((closure)  ((closureN)self_731744)->elements[0])->fn),  set_pair_as_expr(&local_734250, quote_Cyc_91fast_91gte, Cyc_cdr(data, ((closureN)self_731744)->elements[1])));
} else { 
  
closureN_type c_734255;
object e_734268 [1];
c_734255.hdr.mark = gc_color_red;
 c_734255.hdr.grayed = 0;
c_734255.tag = closureN_tag;
 c_734255.fn = (function_type)__lambda_217;
c_734255.num_args = 0;
c_734255.num_elements = 1;
c_734255.elements = (object *)e_734268;
c_734255.elements[0] = ((closureN)self_731744)->elements[1];


closureN_type c_734269;
object e_734306 [2];
c_734269.hdr.mark = gc_color_red;
 c_734269.hdr.grayed = 0;
c_734269.tag = closureN_tag;
 c_734269.fn = (function_type)__lambda_218;
c_734269.num_args = 1;
c_734269.num_elements = 2;
c_734269.elements = (object *)e_734306;
c_734269.elements[0] = ((closureN)self_731744)->elements[0];
c_734269.elements[1] = ((closureN)self_731744)->elements[1];

return_direct_with_clo1(data,(closure)&c_734255,__lambda_217,  &c_734269);}
;; 
}

static void __lambda_218(void *data, object self_731745, int argc, object *args) /* object self_731745, object r_731452 */
 {
 object r_731452 = args[0];
  if( (boolean_f != r_731452) ){ 
  
pair_type local_734274; 


return_direct_with_clo1(data,  ((closureN)self_731745)->elements[0], (((closure)  ((closureN)self_731745)->elements[0])->fn),  set_pair_as_expr(&local_734274, quote_Cyc_91fast_91lte, Cyc_cdr(data, ((closureN)self_731745)->elements[1])));
} else { 
  
closureN_type c_734279;
object e_734292 [1];
c_734279.hdr.mark = gc_color_red;
 c_734279.hdr.grayed = 0;
c_734279.tag = closureN_tag;
 c_734279.fn = (function_type)__lambda_219;
c_734279.num_args = 0;
c_734279.num_elements = 1;
c_734279.elements = (object *)e_734292;
c_734279.elements[0] = ((closureN)self_731745)->elements[1];


closureN_type c_734293;
object e_734305 [2];
c_734293.hdr.mark = gc_color_red;
 c_734293.hdr.grayed = 0;
c_734293.tag = closureN_tag;
 c_734293.fn = (function_type)__lambda_220;
c_734293.num_args = 1;
c_734293.num_elements = 2;
c_734293.elements = (object *)e_734305;
c_734293.elements[0] = ((closureN)self_731745)->elements[0];
c_734293.elements[1] = ((closureN)self_731745)->elements[1];

return_direct_with_clo1(data,(closure)&c_734279,__lambda_219,  &c_734293);}
;; 
}

static void __lambda_220(void *data, object self_731746, int argc, object *args) /* object self_731746, object r_731455 */
 {
 object r_731455 = args[0];
  if( (boolean_f != r_731455) ){ 
  
pair_type local_734298; 


return_direct_with_clo1(data,  ((closureN)self_731746)->elements[0], (((closure)  ((closureN)self_731746)->elements[0])->fn),  set_pair_as_expr(&local_734298, quote_Cyc_91fast_91apply, Cyc_cdr(data, ((closureN)self_731746)->elements[1])));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_731746)->elements[0], (((closure)  ((closureN)self_731746)->elements[0])->fn),  ((closureN)self_731746)->elements[1]);}
;; 
}

static void __lambda_219(void *data, object self_731747, int argc, object *args) /* object self_731747, object k_731458 */
 {
 object k_731458 = args[0];
    
  
if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_731747)->elements[0]), quote_apply)) ){ 
  



return_direct_with_clo1(data,  k_731458,__lambda_220,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_731747)->elements[0]), obj_int2obj(3)));
} else { 
  return_direct_with_clo1(data,  k_731458,__lambda_220,  boolean_f);}
;; 
}

static void __lambda_217(void *data, object self_731748, int argc, object *args) /* object self_731748, object k_731463 */
 {
 object k_731463 = args[0];
    
  
if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_731748)->elements[0]), quote__121_123)) ){ 
  



return_direct_with_clo1(data,  k_731463,__lambda_218,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_731748)->elements[0]), obj_int2obj(3)));
} else { 
  return_direct_with_clo1(data,  k_731463,__lambda_218,  boolean_f);}
;; 
}

static void __lambda_215(void *data, object self_731749, int argc, object *args) /* object self_731749, object k_731468 */
 {
 object k_731468 = args[0];
    
  
if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_731749)->elements[0]), quote__125_123)) ){ 
  



return_direct_with_clo1(data,  k_731468,__lambda_216,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_731749)->elements[0]), obj_int2obj(3)));
} else { 
  return_direct_with_clo1(data,  k_731468,__lambda_216,  boolean_f);}
;; 
}

static void __lambda_213(void *data, object self_731750, int argc, object *args) /* object self_731750, object k_731473 */
 {
 object k_731473 = args[0];
    
  
if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_731750)->elements[0]), quote__121)) ){ 
  



return_direct_with_clo1(data,  k_731473,__lambda_214,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_731750)->elements[0]), obj_int2obj(3)));
} else { 
  return_direct_with_clo1(data,  k_731473,__lambda_214,  boolean_f);}
;; 
}

static void __lambda_211(void *data, object self_731751, int argc, object *args) /* object self_731751, object k_731478 */
 {
 object k_731478 = args[0];
    
  
if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_731751)->elements[0]), quote__125)) ){ 
  



return_direct_with_clo1(data,  k_731478,__lambda_212,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_731751)->elements[0]), obj_int2obj(3)));
} else { 
  return_direct_with_clo1(data,  k_731478,__lambda_212,  boolean_f);}
;; 
}

static void __lambda_209(void *data, object self_731752, int argc, object *args) /* object self_731752, object k_731483 */
 {
 object k_731483 = args[0];
    
  
if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_731752)->elements[0]), quote__123)) ){ 
  



return_direct_with_clo1(data,  k_731483,__lambda_210,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_731752)->elements[0]), obj_int2obj(3)));
} else { 
  return_direct_with_clo1(data,  k_731483,__lambda_210,  boolean_f);}
;; 
}

static void __lambda_207(void *data, object self_731753, int argc, object *args) /* object self_731753, object k_731490 */
 {
 object k_731490 = args[0];
    
  
if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_731753)->elements[0]), quote__95)) ){ 
  



return_direct_with_clo1(data,  k_731490,__lambda_208,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_731753)->elements[0]), obj_int2obj(2)));
} else { 
  return_direct_with_clo1(data,  k_731490,__lambda_208,  boolean_f);}
;; 
}

static void __lambda_205(void *data, object self_731754, int argc, object *args) /* object self_731754, object k_731497 */
 {
 object k_731497 = args[0];
    
  
if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_731754)->elements[0]), quote__91)) ){ 
  



return_direct_with_clo1(data,  k_731497,__lambda_206,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_731754)->elements[0]), obj_int2obj(2)));
} else { 
  return_direct_with_clo1(data,  k_731497,__lambda_206,  boolean_f);}
;; 
}

static void __lambda_203(void *data, object self_731755, int argc, object *args) /* object self_731755, object k_731506 */
 {
 object k_731506 = args[0];
    
  
if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_731755)->elements[0]), quote__85)) ){ 
  



return_direct_with_clo1(data,  k_731506,__lambda_204,  Cyc_num_fast_eq_op(data, Cyc_length(data, ((closureN)self_731755)->elements[0]), obj_int2obj(2)));
} else { 
  return_direct_with_clo1(data,  k_731506,__lambda_204,  boolean_f);}
;; 
}

static void __lambda_201(void *data, object _, int argc, object *args) /* closure _,object k_731403, object sym_73727_73848 */
 {
object k_731403 = args[0]; object sym_73727_73848 = args[1];
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:prim:immutable-args/result?");



make_pair(c_734003,quote_symbol_127,NULL);c_734003.hdr.immutable = 1;

make_pair(c_734002,quote_string_127,&c_734003);c_734002.hdr.immutable = 1;

make_pair(c_734001,quote_vector_127,&c_734002);c_734001.hdr.immutable = 1;

make_pair(c_734000,quote_Cyc_91macro_127,&c_734001);c_734000.hdr.immutable = 1;

make_pair(c_733999,quote_procedure_127,&c_734000);c_733999.hdr.immutable = 1;

make_pair(c_733998,quote_port_127,&c_733999);c_733998.hdr.immutable = 1;

make_pair(c_733997,quote_pair_127,&c_733998);c_733997.hdr.immutable = 1;

make_pair(c_733996,quote_integer_127,&c_733997);c_733996.hdr.immutable = 1;

make_pair(c_733995,quote_real_127,&c_733996);c_733995.hdr.immutable = 1;

make_pair(c_733994,quote_number_127,&c_733995);c_733994.hdr.immutable = 1;

make_pair(c_733993,quote_null_127,&c_733994);c_733993.hdr.immutable = 1;

make_pair(c_733992,quote_eof_91object_127,&c_733993);c_733992.hdr.immutable = 1;

make_pair(c_733991,quote_char_127,&c_733992);c_733991.hdr.immutable = 1;

make_pair(c_733990,quote_boolean_127,&c_733991);c_733990.hdr.immutable = 1;

make_pair(c_733989,quote_Cyc_91opaque_127,&c_733990);c_733989.hdr.immutable = 1;

make_pair(c_733988,quote_Cyc_91cvar_127,&c_733989);c_733988.hdr.immutable = 1;

make_pair(c_733987,quote_integer_91_125char,&c_733988);c_733987.hdr.immutable = 1;

make_pair(c_733986,quote_char_91_125integer,&c_733987);c_733986.hdr.immutable = 1;

make_pair(c_733985,quote_Cyc_91fast_91char_91lte,&c_733986);c_733985.hdr.immutable = 1;

make_pair(c_733984,quote_Cyc_91fast_91char_91gte,&c_733985);c_733984.hdr.immutable = 1;

make_pair(c_733983,quote_Cyc_91fast_91char_91lt,&c_733984);c_733983.hdr.immutable = 1;

make_pair(c_733982,quote_Cyc_91fast_91char_91gt,&c_733983);c_733982.hdr.immutable = 1;

make_pair(c_733981,quote_Cyc_91fast_91char_91eq,&c_733982);c_733981.hdr.immutable = 1;

make_pair(c_733980,quote_Cyc_91fast_91lte,&c_733981);c_733980.hdr.immutable = 1;

make_pair(c_733979,quote_Cyc_91fast_91gte,&c_733980);c_733979.hdr.immutable = 1;

make_pair(c_733978,quote_Cyc_91fast_91lt,&c_733979);c_733978.hdr.immutable = 1;

make_pair(c_733977,quote_Cyc_91fast_91gt,&c_733978);c_733977.hdr.immutable = 1;

make_pair(c_733976,quote_Cyc_91fast_91eq,&c_733977);c_733976.hdr.immutable = 1;

make_pair(c_733975,quote_Cyc_91fast_91div,&c_733976);c_733975.hdr.immutable = 1;

make_pair(c_733974,quote_Cyc_91fast_91mul,&c_733975);c_733974.hdr.immutable = 1;

make_pair(c_733973,quote_Cyc_91fast_91sub,&c_733974);c_733973.hdr.immutable = 1;

make_pair(c_733972,quote_Cyc_91fast_91plus,&c_733973);c_733972.hdr.immutable = 1;

make_pair(c_733971,quote__95,&c_733972);c_733971.hdr.immutable = 1;

make_pair(c_733970,quote__85,&c_733971);c_733970.hdr.immutable = 1;

make_pair(c_733969,quote__91,&c_733970);c_733969.hdr.immutable = 1;

make_pair(c_733968,quote__87,&c_733969);c_733968.hdr.immutable = 1;

make_pair(c_733967,quote__121_123,&c_733968);c_733967.hdr.immutable = 1;

make_pair(c_733966,quote__125_123,&c_733967);c_733966.hdr.immutable = 1;

make_pair(c_733965,quote__121,&c_733966);c_733965.hdr.immutable = 1;

make_pair(c_733964,quote__125,&c_733965);c_733964.hdr.immutable = 1;

make_pair(c_733963,quote__123,&c_733964);c_733963.hdr.immutable = 1;
return_direct_with_clo1(data,  k_731403, (((closure)  k_731403)->fn),  memqp(data, sym_73727_73848, &c_733963));; 
}

static void __lambda_199(void *data, object _, int argc, object *args) /* closure _,object k_731398, object exp_73723_73846, object use_91alloca_127_73724_73847 */
 {
object k_731398 = args[0]; object exp_73723_73846 = args[1]; object use_91alloca_127_73724_73847 = args[2];
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:prim:allocates-object?");

closureN_type c_733947;
object e_733958 [3];
c_733947.hdr.mark = gc_color_red;
 c_733947.hdr.grayed = 0;
c_733947.tag = closureN_tag;
 c_733947.fn = (function_type)__lambda_200;
c_733947.num_args = 1;
c_733947.num_elements = 3;
c_733947.elements = (object *)e_733958;
c_733947.elements[0] = exp_73723_73846;
c_733947.elements[1] = k_731398;
c_733947.elements[2] = use_91alloca_127_73724_73847;

return_direct_with_clo2(data,  __glo_prim_127_scheme_cyclone_primitives, (((closure)  __glo_prim_127_scheme_cyclone_primitives)->fn),  &c_733947, exp_73723_73846);; 
}

static void __lambda_200(void *data, object self_731737, int argc, object *args) /* object self_731737, object r_731399 */
 {
 object r_731399 = args[0];
  if( (boolean_f != r_731399) ){ 
  if( (boolean_f != ((closureN)self_731737)->elements[2]) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_731737)->elements[1], (((closure)  ((closureN)self_731737)->elements[1])->fn),  memqp(data, ((closureN)self_731737)->elements[0], NULL));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_731737)->elements[1], (((closure)  ((closureN)self_731737)->elements[1])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_731737)->elements[1], (((closure)  ((closureN)self_731737)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_197(void *data, object _, int argc, object *args) /* closure _,object k_731393, object exp_73721_73845 */
 {
object k_731393 = args[0]; object exp_73721_73845 = args[1];
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:prim:arg-count?");

closureN_type c_733916;
object e_733944 [2];
c_733916.hdr.mark = gc_color_red;
 c_733916.hdr.grayed = 0;
c_733916.tag = closureN_tag;
 c_733916.fn = (function_type)__lambda_198;
c_733916.num_args = 1;
c_733916.num_elements = 2;
c_733916.elements = (object *)e_733944;
c_733916.elements[0] = exp_73721_73845;
c_733916.elements[1] = k_731393;

return_direct_with_clo2(data,  __glo_prim_127_scheme_cyclone_primitives, (((closure)  __glo_prim_127_scheme_cyclone_primitives)->fn),  &c_733916, exp_73721_73845);; 
}

static void __lambda_198(void *data, object self_731736, int argc, object *args) /* object self_731736, object r_731394 */
 {
 object r_731394 = args[0];
  if( (boolean_f != r_731394) ){ 
  


make_pair(c_733941,quote__95,NULL);c_733941.hdr.immutable = 1;

make_pair(c_733940,quote__85,&c_733941);c_733940.hdr.immutable = 1;

make_pair(c_733939,quote__91,&c_733940);c_733939.hdr.immutable = 1;

make_pair(c_733938,quote__87,&c_733939);c_733938.hdr.immutable = 1;

make_pair(c_733937,quote__121_123,&c_733938);c_733937.hdr.immutable = 1;

make_pair(c_733936,quote__125_123,&c_733937);c_733936.hdr.immutable = 1;

make_pair(c_733935,quote__121,&c_733936);c_733935.hdr.immutable = 1;

make_pair(c_733934,quote__125,&c_733935);c_733934.hdr.immutable = 1;

make_pair(c_733933,quote__123,&c_733934);c_733933.hdr.immutable = 1;

make_pair(c_733932,quote_make_91vector,&c_733933);c_733932.hdr.immutable = 1;

make_pair(c_733931,quote_bytevector_91append,&c_733932);c_733931.hdr.immutable = 1;

make_pair(c_733930,quote_bytevector,&c_733931);c_733930.hdr.immutable = 1;

make_pair(c_733929,quote_make_91bytevector,&c_733930);c_733929.hdr.immutable = 1;

make_pair(c_733928,quote_apply,&c_733929);c_733928.hdr.immutable = 1;

make_pair(c_733927,quote_string_91append,&c_733928);c_733927.hdr.immutable = 1;

make_pair(c_733926,quote_string_91_125number,&c_733927);c_733926.hdr.immutable = 1;

make_pair(c_733925,quote_number_91_125string,&c_733926);c_733925.hdr.immutable = 1;

make_pair(c_733924,quote_Cyc_91display,&c_733925);c_733924.hdr.immutable = 1;

make_pair(c_733923,quote_Cyc_91write,&c_733924);c_733923.hdr.immutable = 1;

make_pair(c_733922,quote_error,&c_733923);c_733922.hdr.immutable = 1;
return_direct_with_clo1(data,  ((closureN)self_731736)->elements[1], (((closure)  ((closureN)self_731736)->elements[1])->fn),  memqp(data, ((closureN)self_731736)->elements[0], &c_733922));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_731736)->elements[1], (((closure)  ((closureN)self_731736)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_195(void *data, object _, int argc, object *args) /* closure _,object k_731388, object exp_73719_73844 */
 {
object k_731388 = args[0]; object exp_73719_73844 = args[1];
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:prim:cont/no-args?");

closureN_type c_733903;
object e_733913 [2];
c_733903.hdr.mark = gc_color_red;
 c_733903.hdr.grayed = 0;
c_733903.tag = closureN_tag;
 c_733903.fn = (function_type)__lambda_196;
c_733903.num_args = 1;
c_733903.num_elements = 2;
c_733903.elements = (object *)e_733913;
c_733903.elements[0] = exp_73719_73844;
c_733903.elements[1] = k_731388;

return_direct_with_clo2(data,  __glo_prim_127_scheme_cyclone_primitives, (((closure)  __glo_prim_127_scheme_cyclone_primitives)->fn),  &c_733903, exp_73719_73844);; 
}

static void __lambda_196(void *data, object self_731735, int argc, object *args) /* object self_731735, object r_731389 */
 {
 object r_731389 = args[0];
  if( (boolean_f != r_731389) ){ 
  


make_pair(c_733910,quote_Cyc_91current_91exception_91handler,NULL);c_733910.hdr.immutable = 1;

make_pair(c_733909,quote_command_91line_91arguments,&c_733910);c_733909.hdr.immutable = 1;
return_direct_with_clo1(data,  ((closureN)self_731735)->elements[1], (((closure)  ((closureN)self_731735)->elements[1])->fn),  memqp(data, ((closureN)self_731735)->elements[0], &c_733909));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_731735)->elements[1], (((closure)  ((closureN)self_731735)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_193(void *data, object _, int argc, object *args) /* closure _,object k_731383, object exp_73717_73843 */
 {
object k_731383 = args[0]; object exp_73717_73843 = args[1];
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:prim:cont?");

closureN_type c_733855;
object e_733900 [2];
c_733855.hdr.mark = gc_color_red;
 c_733855.hdr.grayed = 0;
c_733855.tag = closureN_tag;
 c_733855.fn = (function_type)__lambda_194;
c_733855.num_args = 1;
c_733855.num_elements = 2;
c_733855.elements = (object *)e_733900;
c_733855.elements[0] = exp_73717_73843;
c_733855.elements[1] = k_731383;

return_direct_with_clo2(data,  __glo_prim_127_scheme_cyclone_primitives, (((closure)  __glo_prim_127_scheme_cyclone_primitives)->fn),  &c_733855, exp_73717_73843);; 
}

static void __lambda_194(void *data, object self_731734, int argc, object *args) /* object self_731734, object r_731384 */
 {
 object r_731384 = args[0];
  if( (boolean_f != r_731384) ){ 
  


make_pair(c_733897,quote_Cyc_91installation_91dir,NULL);c_733897.hdr.immutable = 1;

make_pair(c_733896,quote_Cyc_91compilation_91environment,&c_733897);c_733896.hdr.immutable = 1;

make_pair(c_733895,quote_list_91_125vector,&c_733896);c_733895.hdr.immutable = 1;

make_pair(c_733894,quote_make_91vector,&c_733895);c_733894.hdr.immutable = 1;

make_pair(c_733893,quote_bytevector_91u8_91set_67,&c_733894);c_733893.hdr.immutable = 1;

make_pair(c_733892,quote_bytevector_91u8_91ref,&c_733893);c_733892.hdr.immutable = 1;

make_pair(c_733891,quote_bytevector,&c_733892);c_733891.hdr.immutable = 1;

make_pair(c_733890,quote_Cyc_91string_91_125utf8,&c_733891);c_733890.hdr.immutable = 1;

make_pair(c_733889,quote_Cyc_91utf8_91_125string,&c_733890);c_733889.hdr.immutable = 1;

make_pair(c_733888,quote_Cyc_91bytevector_91copy,&c_733889);c_733888.hdr.immutable = 1;

make_pair(c_733887,quote_bytevector_91append,&c_733888);c_733887.hdr.immutable = 1;

make_pair(c_733886,quote_make_91bytevector,&c_733887);c_733886.hdr.immutable = 1;

make_pair(c_733885,quote_string_91_125number,&c_733886);c_733885.hdr.immutable = 1;

make_pair(c_733884,quote_string_91append,&c_733885);c_733884.hdr.immutable = 1;

make_pair(c_733883,quote_substring,&c_733884);c_733883.hdr.immutable = 1;

make_pair(c_733882,quote_list_91_125string,&c_733883);c_733882.hdr.immutable = 1;

make_pair(c_733881,quote_symbol_91_125string,&c_733882);c_733881.hdr.immutable = 1;

make_pair(c_733880,quote_Cyc_91peek_91char,&c_733881);c_733880.hdr.immutable = 1;

make_pair(c_733879,quote_Cyc_91read_91char,&c_733880);c_733879.hdr.immutable = 1;

make_pair(c_733878,quote_set_91global_67,&c_733879);c_733878.hdr.immutable = 1;

make_pair(c_733877,quote_vector_91set_67,&c_733878);c_733877.hdr.immutable = 1;

make_pair(c_733876,quote_set_91cdr_67,&c_733877);c_733876.hdr.immutable = 1;

make_pair(c_733875,quote_set_91car_67,&c_733876);c_733875.hdr.immutable = 1;

make_pair(c_733874,quote__121_123,&c_733875);c_733874.hdr.immutable = 1;

make_pair(c_733873,quote__125_123,&c_733874);c_733873.hdr.immutable = 1;

make_pair(c_733872,quote__121,&c_733873);c_733872.hdr.immutable = 1;

make_pair(c_733871,quote__125,&c_733872);c_733871.hdr.immutable = 1;

make_pair(c_733870,quote__123,&c_733871);c_733870.hdr.immutable = 1;

make_pair(c_733869,quote__95,&c_733870);c_733869.hdr.immutable = 1;

make_pair(c_733868,quote__85,&c_733869);c_733868.hdr.immutable = 1;

make_pair(c_733867,quote__91,&c_733868);c_733867.hdr.immutable = 1;

make_pair(c_733866,quote__87,&c_733867);c_733866.hdr.immutable = 1;

make_pair(c_733865,quote_Cyc_91fast_91apply,&c_733866);c_733865.hdr.immutable = 1;

make_pair(c_733864,quote_number_91_125string,&c_733865);c_733864.hdr.immutable = 1;

make_pair(c_733863,quote_command_91line_91arguments,&c_733864);c_733863.hdr.immutable = 1;

make_pair(c_733862,quote_apply,&c_733863);c_733862.hdr.immutable = 1;

make_pair(c_733861,quote_Cyc_91read_91line,&c_733862);c_733861.hdr.immutable = 1;
return_direct_with_clo1(data,  ((closureN)self_731734)->elements[1], (((closure)  ((closureN)self_731734)->elements[1])->fn),  memqp(data, ((closureN)self_731734)->elements[0], &c_733861));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_731734)->elements[1], (((closure)  ((closureN)self_731734)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_191(void *data, object _, int argc, object *args) /* closure _,object k_731378, object exp_73715_73842 */
 {
object k_731378 = args[0]; object exp_73715_73842 = args[1];
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:prim/cvar?");

closureN_type c_733802;
object e_733852 [2];
c_733802.hdr.mark = gc_color_red;
 c_733802.hdr.grayed = 0;
c_733802.tag = closureN_tag;
 c_733802.fn = (function_type)__lambda_192;
c_733802.num_args = 1;
c_733802.num_elements = 2;
c_733802.elements = (object *)e_733852;
c_733802.elements[0] = exp_73715_73842;
c_733802.elements[1] = k_731378;

return_direct_with_clo2(data,  __glo_prim_127_scheme_cyclone_primitives, (((closure)  __glo_prim_127_scheme_cyclone_primitives)->fn),  &c_733802, exp_73715_73842);; 
}

static void __lambda_192(void *data, object self_731733, int argc, object *args) /* object self_731733, object r_731379 */
 {
 object r_731379 = args[0];
  if( (boolean_f != r_731379) ){ 
  


make_pair(c_733849,quote_Cyc_91peek_91char,NULL);c_733849.hdr.immutable = 1;

make_pair(c_733848,quote_Cyc_91read_91char,&c_733849);c_733848.hdr.immutable = 1;

make_pair(c_733847,quote_Cyc_91read_91line,&c_733848);c_733847.hdr.immutable = 1;

make_pair(c_733846,quote_command_91line_91arguments,&c_733847);c_733846.hdr.immutable = 1;

make_pair(c_733845,quote__121_123,&c_733846);c_733845.hdr.immutable = 1;

make_pair(c_733844,quote__125_123,&c_733845);c_733844.hdr.immutable = 1;

make_pair(c_733843,quote__121,&c_733844);c_733843.hdr.immutable = 1;

make_pair(c_733842,quote__125,&c_733843);c_733842.hdr.immutable = 1;

make_pair(c_733841,quote__123,&c_733842);c_733841.hdr.immutable = 1;

make_pair(c_733840,quote_Cyc_91fast_91apply,&c_733841);c_733840.hdr.immutable = 1;

make_pair(c_733839,quote_apply,&c_733840);c_733839.hdr.immutable = 1;

make_pair(c_733838,quote__95,&c_733839);c_733838.hdr.immutable = 1;

make_pair(c_733837,quote__85,&c_733838);c_733837.hdr.immutable = 1;

make_pair(c_733836,quote__91,&c_733837);c_733836.hdr.immutable = 1;

make_pair(c_733835,quote__87,&c_733836);c_733835.hdr.immutable = 1;

make_pair(c_733834,quote_set_91global_67,&c_733835);c_733834.hdr.immutable = 1;

make_pair(c_733833,quote_vector_91set_67,&c_733834);c_733833.hdr.immutable = 1;

make_pair(c_733832,quote_set_91cdr_67,&c_733833);c_733832.hdr.immutable = 1;

make_pair(c_733831,quote_set_91car_67,&c_733832);c_733831.hdr.immutable = 1;

make_pair(c_733830,quote_substring,&c_733831);c_733830.hdr.immutable = 1;

make_pair(c_733829,quote_number_91_125string,&c_733830);c_733829.hdr.immutable = 1;

make_pair(c_733828,quote_symbol_91_125string,&c_733829);c_733828.hdr.immutable = 1;

make_pair(c_733827,quote_list_91_125vector,&c_733828);c_733827.hdr.immutable = 1;

make_pair(c_733826,quote_make_91vector,&c_733827);c_733826.hdr.immutable = 1;

make_pair(c_733825,quote_Cyc_91string_91_125utf8,&c_733826);c_733825.hdr.immutable = 1;

make_pair(c_733824,quote_Cyc_91utf8_91_125string,&c_733825);c_733824.hdr.immutable = 1;

make_pair(c_733823,quote_Cyc_91bytevector_91copy,&c_733824);c_733823.hdr.immutable = 1;

make_pair(c_733822,quote_bytevector_91append,&c_733823);c_733822.hdr.immutable = 1;

make_pair(c_733821,quote_bytevector,&c_733822);c_733821.hdr.immutable = 1;

make_pair(c_733820,quote_make_91bytevector,&c_733821);c_733820.hdr.immutable = 1;

make_pair(c_733819,quote_list_91_125string,&c_733820);c_733819.hdr.immutable = 1;

make_pair(c_733818,quote_string_91append,&c_733819);c_733818.hdr.immutable = 1;

make_pair(c_733817,quote_string_91_125number,&c_733818);c_733817.hdr.immutable = 1;

make_pair(c_733816,quote_Cyc_91compilation_91environment,&c_733817);c_733816.hdr.immutable = 1;

make_pair(c_733815,quote_Cyc_91installation_91dir,&c_733816);c_733815.hdr.immutable = 1;

make_pair(c_733814,quote_open_91binary_91output_91file,&c_733815);c_733814.hdr.immutable = 1;

make_pair(c_733813,quote_open_91binary_91input_91file,&c_733814);c_733813.hdr.immutable = 1;

make_pair(c_733812,quote_open_91output_91file,&c_733813);c_733812.hdr.immutable = 1;

make_pair(c_733811,quote_open_91input_91file,&c_733812);c_733811.hdr.immutable = 1;

make_pair(c_733810,quote_Cyc_91stderr,&c_733811);c_733810.hdr.immutable = 1;

make_pair(c_733809,quote_Cyc_91stdin,&c_733810);c_733809.hdr.immutable = 1;

make_pair(c_733808,quote_Cyc_91stdout,&c_733809);c_733808.hdr.immutable = 1;
return_direct_with_clo1(data,  ((closureN)self_731733)->elements[1], (((closure)  ((closureN)self_731733)->elements[1])->fn),  memqp(data, ((closureN)self_731733)->elements[0], &c_733808));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_731733)->elements[1], (((closure)  ((closureN)self_731733)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_190(void *data, object _, int argc, object *args) /* closure _,object k_731291, object p_73587_73841 */
 {
object k_731291 = args[0]; object p_73587_73841 = args[1];
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:prim/c-var-assign");
  
if( (boolean_f != Cyc_eq(p_73587_73841, quote_Cyc_91stdout)) ){ 
  
make_utf8_string_with_len(c_733634, "port_type", 9, 9);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733634);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_Cyc_91stdin)) ){ 
  
make_utf8_string_with_len(c_733638, "port_type", 9, 9);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733638);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_Cyc_91stderr)) ){ 
  
make_utf8_string_with_len(c_733642, "port_type", 9, 9);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733642);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_open_91input_91file)) ){ 
  
make_utf8_string_with_len(c_733646, "port_type", 9, 9);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733646);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_open_91output_91file)) ){ 
  
make_utf8_string_with_len(c_733650, "port_type", 9, 9);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733650);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_open_91binary_91input_91file)) ){ 
  
make_utf8_string_with_len(c_733654, "port_type", 9, 9);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733654);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_open_91binary_91output_91file)) ){ 
  
make_utf8_string_with_len(c_733658, "port_type", 9, 9);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733658);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote__87)) ){ 
  
make_utf8_string_with_len(c_733662, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733662);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote__91)) ){ 
  
make_utf8_string_with_len(c_733666, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733666);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote__85)) ){ 
  
make_utf8_string_with_len(c_733670, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733670);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote__95)) ){ 
  
make_utf8_string_with_len(c_733674, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733674);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote__123)) ){ 
  
make_utf8_string_with_len(c_733678, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733678);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote__125)) ){ 
  
make_utf8_string_with_len(c_733682, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733682);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote__121)) ){ 
  
make_utf8_string_with_len(c_733686, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733686);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote__125_123)) ){ 
  
make_utf8_string_with_len(c_733690, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733690);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote__121_123)) ){ 
  
make_utf8_string_with_len(c_733694, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733694);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_string_91_125number)) ){ 
  
make_utf8_string_with_len(c_733698, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733698);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_string_91append)) ){ 
  
make_utf8_string_with_len(c_733702, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733702);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_apply)) ){ 
  
make_utf8_string_with_len(c_733706, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733706);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_Cyc_91fast_91apply)) ){ 
  
make_utf8_string_with_len(c_733710, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733710);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_Cyc_91read_91line)) ){ 
  
make_utf8_string_with_len(c_733714, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733714);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_Cyc_91read_91char)) ){ 
  
make_utf8_string_with_len(c_733718, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733718);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_Cyc_91peek_91char)) ){ 
  
make_utf8_string_with_len(c_733722, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733722);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_command_91line_91arguments)) ){ 
  
make_utf8_string_with_len(c_733726, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733726);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_number_91_125string)) ){ 
  
make_utf8_string_with_len(c_733730, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733730);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_symbol_91_125string)) ){ 
  
make_utf8_string_with_len(c_733734, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733734);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_substring)) ){ 
  
make_utf8_string_with_len(c_733738, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733738);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_make_91bytevector)) ){ 
  
make_utf8_string_with_len(c_733742, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733742);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_bytevector)) ){ 
  
make_utf8_string_with_len(c_733746, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733746);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_bytevector_91append)) ){ 
  
make_utf8_string_with_len(c_733750, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733750);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_Cyc_91bytevector_91copy)) ){ 
  
make_utf8_string_with_len(c_733754, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733754);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_Cyc_91utf8_91_125string)) ){ 
  
make_utf8_string_with_len(c_733758, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733758);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_Cyc_91string_91_125utf8)) ){ 
  
make_utf8_string_with_len(c_733762, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733762);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_make_91vector)) ){ 
  
make_utf8_string_with_len(c_733766, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733766);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_list_91_125string)) ){ 
  
make_utf8_string_with_len(c_733770, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733770);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_list_91_125vector)) ){ 
  
make_utf8_string_with_len(c_733774, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733774);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_set_91car_67)) ){ 
  
make_utf8_string_with_len(c_733778, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733778);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_set_91cdr_67)) ){ 
  
make_utf8_string_with_len(c_733782, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733782);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_vector_91set_67)) ){ 
  
make_utf8_string_with_len(c_733786, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733786);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_set_91global_67)) ){ 
  
make_utf8_string_with_len(c_733790, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733790);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_Cyc_91installation_91dir)) ){ 
  
make_utf8_string_with_len(c_733794, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733794);
} else { 
    
if( (boolean_f != Cyc_eq(p_73587_73841, quote_Cyc_91compilation_91environment)) ){ 
  
make_utf8_string_with_len(c_733798, "object", 6, 6);
return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  &c_733798);
} else { 
  return_direct_with_clo1(data,  k_731291, (((closure)  k_731291)->fn),  boolean_f);}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;; 
}

static void __lambda_188(void *data, object _, int argc, object *args) /* closure _,object k_731259, object p_73540_73840 */
 {
object k_731259 = args[0]; object p_73540_73840 = args[1];
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:prim/c-var-pointer");
  
if( (boolean_f != Cyc_eq(p_73540_73840, quote_cons)) ){ 
  
make_utf8_string_with_len(c_733567, "pair_type", 9, 9);
return_direct_with_clo1(data,  k_731259, (((closure)  k_731259)->fn),  &c_733567);
} else { 
    
if( (boolean_f != Cyc_eq(p_73540_73840, quote_cell)) ){ 
  
make_utf8_string_with_len(c_733571, "pair_type", 9, 9);
return_direct_with_clo1(data,  k_731259, (((closure)  k_731259)->fn),  &c_733571);
} else { 
    
if( (boolean_f != Cyc_eq(p_73540_73840, quote_Cyc_91fast_91vector_912)) ){ 
  
make_utf8_string_with_len(c_733575, "vector_2_type", 13, 13);
return_direct_with_clo1(data,  k_731259, (((closure)  k_731259)->fn),  &c_733575);
} else { 
    
if( (boolean_f != Cyc_eq(p_73540_73840, quote_Cyc_91fast_91vector_913)) ){ 
  
make_utf8_string_with_len(c_733579, "vector_3_type", 13, 13);
return_direct_with_clo1(data,  k_731259, (((closure)  k_731259)->fn),  &c_733579);
} else { 
    
if( (boolean_f != Cyc_eq(p_73540_73840, quote_Cyc_91fast_91vector_914)) ){ 
  
make_utf8_string_with_len(c_733583, "vector_4_type", 13, 13);
return_direct_with_clo1(data,  k_731259, (((closure)  k_731259)->fn),  &c_733583);
} else { 
    
if( (boolean_f != Cyc_eq(p_73540_73840, quote_Cyc_91fast_91vector_915)) ){ 
  
make_utf8_string_with_len(c_733587, "vector_5_type", 13, 13);
return_direct_with_clo1(data,  k_731259, (((closure)  k_731259)->fn),  &c_733587);
} else { 
    
if( (boolean_f != Cyc_eq(p_73540_73840, quote_Cyc_91fast_91list_911)) ){ 
  
make_utf8_string_with_len(c_733591, "pair_type", 9, 9);
return_direct_with_clo1(data,  k_731259, (((closure)  k_731259)->fn),  &c_733591);
} else { 
    
if( (boolean_f != Cyc_eq(p_73540_73840, quote_Cyc_91fast_91list_912)) ){ 
  
make_utf8_string_with_len(c_733595, "list_2_type", 11, 11);
return_direct_with_clo1(data,  k_731259, (((closure)  k_731259)->fn),  &c_733595);
} else { 
    
if( (boolean_f != Cyc_eq(p_73540_73840, quote_Cyc_91fast_91list_913)) ){ 
  
make_utf8_string_with_len(c_733599, "list_3_type", 11, 11);
return_direct_with_clo1(data,  k_731259, (((closure)  k_731259)->fn),  &c_733599);
} else { 
    
if( (boolean_f != Cyc_eq(p_73540_73840, quote_Cyc_91fast_91list_914)) ){ 
  
make_utf8_string_with_len(c_733603, "list_4_type", 11, 11);
return_direct_with_clo1(data,  k_731259, (((closure)  k_731259)->fn),  &c_733603);
} else { 
    
if( (boolean_f != Cyc_eq(p_73540_73840, quote_Cyc_91fast_91plus)) ){ 
  
make_utf8_string_with_len(c_733607, "complex_num_type", 16, 16);
return_direct_with_clo1(data,  k_731259, (((closure)  k_731259)->fn),  &c_733607);
} else { 
    
if( (boolean_f != Cyc_eq(p_73540_73840, quote_Cyc_91fast_91sub)) ){ 
  
make_utf8_string_with_len(c_733611, "complex_num_type", 16, 16);
return_direct_with_clo1(data,  k_731259, (((closure)  k_731259)->fn),  &c_733611);
} else { 
    
if( (boolean_f != Cyc_eq(p_73540_73840, quote_Cyc_91fast_91mul)) ){ 
  
make_utf8_string_with_len(c_733615, "complex_num_type", 16, 16);
return_direct_with_clo1(data,  k_731259, (((closure)  k_731259)->fn),  &c_733615);
} else { 
    
if( (boolean_f != Cyc_eq(p_73540_73840, quote_Cyc_91fast_91div)) ){ 
  
make_utf8_string_with_len(c_733619, "complex_num_type", 16, 16);
return_direct_with_clo1(data,  k_731259, (((closure)  k_731259)->fn),  &c_733619);
} else { 
  
closureN_type c_733621;
object e_733627 [1];
c_733621.hdr.mark = gc_color_red;
 c_733621.hdr.grayed = 0;
c_733621.tag = closureN_tag;
 c_733621.fn = (function_type)__lambda_189;
c_733621.num_args = 1;
c_733621.num_elements = 1;
c_733621.elements = (object *)e_733627;
c_733621.elements[0] = k_731259;



return_direct_with_clo1(data,(closure)&c_733621,__lambda_189,  memqp(data, p_73540_73840, __glo__85udf_91prims_85_scheme_cyclone_primitives));}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;}
;; 
}

static void __lambda_189(void *data, object self_731732, int argc, object *args) /* object self_731732, object r_731274 */
 {
 object r_731274 = args[0];
  if( (boolean_f != r_731274) ){ 
  
make_utf8_string_with_len(c_733624, "complex_num_type", 16, 16);
return_direct_with_clo1(data,  ((closureN)self_731732)->elements[0], (((closure)  ((closureN)self_731732)->elements[0])->fn),  &c_733624);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_731732)->elements[0], (((closure)  ((closureN)self_731732)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_186(void *data, object _, int argc, object *args) /* closure _,object k_731254, object p_73535_73838 */
 {
object k_731254 = args[0]; object p_73535_73838 = args[1];
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:prim/data-arg?");

closureN_type c_733435;
object e_733443 [2];
c_733435.hdr.mark = gc_color_red;
 c_733435.hdr.grayed = 0;
c_733435.tag = closureN_tag;
 c_733435.fn = (function_type)__lambda_187;
c_733435.num_args = 1;
c_733435.num_elements = 2;
c_733435.elements = (object *)e_733443;
c_733435.elements[0] = k_731254;
c_733435.elements[1] = p_73535_73838;




make_pair(c_733562,quote_set_91global_67,NULL);c_733562.hdr.immutable = 1;

make_pair(c_733561,quote_set_91cell_67,&c_733562);c_733561.hdr.immutable = 1;

make_pair(c_733560,quote_procedure_127,&c_733561);c_733560.hdr.immutable = 1;

make_pair(c_733559,quote_set_91cdr_67,&c_733560);c_733559.hdr.immutable = 1;

make_pair(c_733558,quote_set_91car_67,&c_733559);c_733558.hdr.immutable = 1;

make_pair(c_733557,quote_length,&c_733558);c_733557.hdr.immutable = 1;

make_pair(c_733556,quote_memv,&c_733557);c_733556.hdr.immutable = 1;

make_pair(c_733555,quote_memq,&c_733556);c_733555.hdr.immutable = 1;

make_pair(c_733554,quote_assv,&c_733555);c_733554.hdr.immutable = 1;

make_pair(c_733553,quote_assq,&c_733554);c_733553.hdr.immutable = 1;

make_pair(c_733552,quote_command_91line_91arguments,&c_733553);c_733552.hdr.immutable = 1;

make_pair(c_733551,quote_Cyc_91compilation_91environment,&c_733552);c_733551.hdr.immutable = 1;

make_pair(c_733550,quote_Cyc_91installation_91dir,&c_733551);c_733550.hdr.immutable = 1;

make_pair(c_733549,quote_substring,&c_733550);c_733549.hdr.immutable = 1;

make_pair(c_733548,quote_string_91set_67,&c_733549);c_733548.hdr.immutable = 1;

make_pair(c_733547,quote_string_91ref,&c_733548);c_733547.hdr.immutable = 1;

make_pair(c_733546,quote_string_91length,&c_733547);c_733546.hdr.immutable = 1;

make_pair(c_733545,quote_number_91_125string,&c_733546);c_733545.hdr.immutable = 1;

make_pair(c_733544,quote_symbol_91_125string,&c_733545);c_733544.hdr.immutable = 1;

make_pair(c_733543,quote_string_91_125symbol,&c_733544);c_733543.hdr.immutable = 1;

make_pair(c_733542,quote_string_91cmp,&c_733543);c_733542.hdr.immutable = 1;

make_pair(c_733541,quote_string_91append,&c_733542);c_733541.hdr.immutable = 1;

make_pair(c_733540,quote_vector_91set_67,&c_733541);c_733540.hdr.immutable = 1;

make_pair(c_733539,quote_vector_91ref,&c_733540);c_733539.hdr.immutable = 1;

make_pair(c_733538,quote_vector_91length,&c_733539);c_733538.hdr.immutable = 1;

make_pair(c_733537,quote_list_91_125vector,&c_733538);c_733537.hdr.immutable = 1;

make_pair(c_733536,quote_make_91vector,&c_733537);c_733536.hdr.immutable = 1;

make_pair(c_733535,quote_bytevector_91u8_91set_67,&c_733536);c_733535.hdr.immutable = 1;

make_pair(c_733534,quote_bytevector_91u8_91ref,&c_733535);c_733534.hdr.immutable = 1;

make_pair(c_733533,quote_bytevector,&c_733534);c_733533.hdr.immutable = 1;

make_pair(c_733532,quote_Cyc_91string_91_125utf8,&c_733533);c_733532.hdr.immutable = 1;

make_pair(c_733531,quote_Cyc_91utf8_91_125string,&c_733532);c_733531.hdr.immutable = 1;

make_pair(c_733530,quote_Cyc_91bytevector_91copy,&c_733531);c_733530.hdr.immutable = 1;

make_pair(c_733529,quote_bytevector_91append,&c_733530);c_733529.hdr.immutable = 1;

make_pair(c_733528,quote_bytevector_91length,&c_733529);c_733528.hdr.immutable = 1;

make_pair(c_733527,quote_make_91bytevector,&c_733528);c_733527.hdr.immutable = 1;

make_pair(c_733526,quote_list_91_125string,&c_733527);c_733526.hdr.immutable = 1;

make_pair(c_733525,quote_string_91_125number,&c_733526);c_733525.hdr.immutable = 1;

make_pair(c_733524,quote_integer_91_125char,&c_733525);c_733524.hdr.immutable = 1;

make_pair(c_733523,quote_Cyc_91write_91char,&c_733524);c_733523.hdr.immutable = 1;

make_pair(c_733522,quote_Cyc_91read_91line,&c_733523);c_733522.hdr.immutable = 1;

make_pair(c_733521,quote_Cyc_91peek_91char,&c_733522);c_733521.hdr.immutable = 1;

make_pair(c_733520,quote_Cyc_91read_91char,&c_733521);c_733520.hdr.immutable = 1;

make_pair(c_733519,quote_delete_91file,&c_733520);c_733519.hdr.immutable = 1;

make_pair(c_733518,quote_file_91exists_127,&c_733519);c_733518.hdr.immutable = 1;

make_pair(c_733517,quote_Cyc_91write,&c_733518);c_733517.hdr.immutable = 1;

make_pair(c_733516,quote_Cyc_91display,&c_733517);c_733516.hdr.immutable = 1;

make_pair(c_733515,quote_Cyc_91flush_91output_91port,&c_733516);c_733515.hdr.immutable = 1;

make_pair(c_733514,quote_close_91output_91port,&c_733515);c_733514.hdr.immutable = 1;

make_pair(c_733513,quote_close_91input_91port,&c_733514);c_733513.hdr.immutable = 1;

make_pair(c_733512,quote_close_91port,&c_733513);c_733512.hdr.immutable = 1;

make_pair(c_733511,quote_open_91binary_91output_91file,&c_733512);c_733511.hdr.immutable = 1;

make_pair(c_733510,quote_open_91binary_91input_91file,&c_733511);c_733510.hdr.immutable = 1;

make_pair(c_733509,quote_open_91output_91file,&c_733510);c_733509.hdr.immutable = 1;

make_pair(c_733508,quote_open_91input_91file,&c_733509);c_733508.hdr.immutable = 1;

make_pair(c_733507,quote_Cyc_91end_91thread_67,&c_733508);c_733507.hdr.immutable = 1;

make_pair(c_733506,quote_Cyc_91current_91exception_91handler,&c_733507);c_733506.hdr.immutable = 1;

make_pair(c_733505,quote_Cyc_91default_91exception_91handler,&c_733506);c_733505.hdr.immutable = 1;

make_pair(c_733504,quote_cddddr,&c_733505);c_733504.hdr.immutable = 1;

make_pair(c_733503,quote_cdddar,&c_733504);c_733503.hdr.immutable = 1;

make_pair(c_733502,quote_cddadr,&c_733503);c_733502.hdr.immutable = 1;

make_pair(c_733501,quote_cddaar,&c_733502);c_733501.hdr.immutable = 1;

make_pair(c_733500,quote_cdaddr,&c_733501);c_733500.hdr.immutable = 1;

make_pair(c_733499,quote_cdadar,&c_733500);c_733499.hdr.immutable = 1;

make_pair(c_733498,quote_cdaadr,&c_733499);c_733498.hdr.immutable = 1;

make_pair(c_733497,quote_cdaaar,&c_733498);c_733497.hdr.immutable = 1;

make_pair(c_733496,quote_cadddr,&c_733497);c_733496.hdr.immutable = 1;

make_pair(c_733495,quote_caddar,&c_733496);c_733495.hdr.immutable = 1;

make_pair(c_733494,quote_cadadr,&c_733495);c_733494.hdr.immutable = 1;

make_pair(c_733493,quote_cadaar,&c_733494);c_733493.hdr.immutable = 1;

make_pair(c_733492,quote_caaddr,&c_733493);c_733492.hdr.immutable = 1;

make_pair(c_733491,quote_caadar,&c_733492);c_733491.hdr.immutable = 1;

make_pair(c_733490,quote_caaadr,&c_733491);c_733490.hdr.immutable = 1;

make_pair(c_733489,quote_caaaar,&c_733490);c_733489.hdr.immutable = 1;

make_pair(c_733488,quote_cdddr,&c_733489);c_733488.hdr.immutable = 1;

make_pair(c_733487,quote_cddar,&c_733488);c_733487.hdr.immutable = 1;

make_pair(c_733486,quote_cdadr,&c_733487);c_733486.hdr.immutable = 1;

make_pair(c_733485,quote_cdaar,&c_733486);c_733485.hdr.immutable = 1;

make_pair(c_733484,quote_caddr,&c_733485);c_733484.hdr.immutable = 1;

make_pair(c_733483,quote_cadar,&c_733484);c_733483.hdr.immutable = 1;

make_pair(c_733482,quote_caadr,&c_733483);c_733482.hdr.immutable = 1;

make_pair(c_733481,quote_caaar,&c_733482);c_733481.hdr.immutable = 1;

make_pair(c_733480,quote_cddr,&c_733481);c_733480.hdr.immutable = 1;

make_pair(c_733479,quote_cdar,&c_733480);c_733479.hdr.immutable = 1;

make_pair(c_733478,quote_cadr,&c_733479);c_733478.hdr.immutable = 1;

make_pair(c_733477,quote_caar,&c_733478);c_733477.hdr.immutable = 1;

make_pair(c_733476,quote_cdr,&c_733477);c_733476.hdr.immutable = 1;

make_pair(c_733475,quote_car,&c_733476);c_733475.hdr.immutable = 1;

make_pair(c_733474,quote_apply,&c_733475);c_733474.hdr.immutable = 1;

make_pair(c_733473,quote_Cyc_91fast_91apply,&c_733474);c_733473.hdr.immutable = 1;

make_pair(c_733472,quote_Cyc_91fast_91assoc,&c_733473);c_733472.hdr.immutable = 1;

make_pair(c_733471,quote_Cyc_91fast_91member,&c_733472);c_733471.hdr.immutable = 1;

make_pair(c_733470,quote__121_123,&c_733471);c_733470.hdr.immutable = 1;

make_pair(c_733469,quote__125_123,&c_733470);c_733469.hdr.immutable = 1;

make_pair(c_733468,quote__121,&c_733469);c_733468.hdr.immutable = 1;

make_pair(c_733467,quote__125,&c_733468);c_733467.hdr.immutable = 1;

make_pair(c_733466,quote__123,&c_733467);c_733466.hdr.immutable = 1;

make_pair(c_733465,quote_Cyc_91fast_91char_91lte,&c_733466);c_733465.hdr.immutable = 1;

make_pair(c_733464,quote_Cyc_91fast_91char_91gte,&c_733465);c_733464.hdr.immutable = 1;

make_pair(c_733463,quote_Cyc_91fast_91char_91lt,&c_733464);c_733463.hdr.immutable = 1;

make_pair(c_733462,quote_Cyc_91fast_91char_91gt,&c_733463);c_733462.hdr.immutable = 1;

make_pair(c_733461,quote_Cyc_91fast_91char_91eq,&c_733462);c_733461.hdr.immutable = 1;

make_pair(c_733460,quote_Cyc_91fast_91lte,&c_733461);c_733460.hdr.immutable = 1;

make_pair(c_733459,quote_Cyc_91fast_91gte,&c_733460);c_733459.hdr.immutable = 1;

make_pair(c_733458,quote_Cyc_91fast_91lt,&c_733459);c_733458.hdr.immutable = 1;

make_pair(c_733457,quote_Cyc_91fast_91gt,&c_733458);c_733457.hdr.immutable = 1;

make_pair(c_733456,quote_Cyc_91fast_91eq,&c_733457);c_733456.hdr.immutable = 1;

make_pair(c_733455,quote__95,&c_733456);c_733455.hdr.immutable = 1;

make_pair(c_733454,quote__85,&c_733455);c_733454.hdr.immutable = 1;

make_pair(c_733453,quote__91,&c_733454);c_733453.hdr.immutable = 1;

make_pair(c_733452,quote__87,&c_733453);c_733452.hdr.immutable = 1;

make_pair(c_733451,quote_Cyc_91fast_91div,&c_733452);c_733451.hdr.immutable = 1;

make_pair(c_733450,quote_Cyc_91fast_91mul,&c_733451);c_733450.hdr.immutable = 1;

make_pair(c_733449,quote_Cyc_91fast_91sub,&c_733450);c_733449.hdr.immutable = 1;

make_pair(c_733448,quote_Cyc_91fast_91plus,&c_733449);c_733448.hdr.immutable = 1;

make_pair(c_733447,quote_Cyc_91foreign_91value,&c_733448);c_733447.hdr.immutable = 1;

make_pair(c_733446,quote_Cyc_91foreign_91code,&c_733447);c_733446.hdr.immutable = 1;
return_direct_with_clo1(data,(closure)&c_733435,__lambda_187,  memqp(data, p_73535_73838, &c_733446));; 
}

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

return_direct_with_clo1(data,  ((closureN)self_731731)->elements[0], (((closure)  ((closureN)self_731731)->elements[0])->fn),  memqp(data, ((closureN)self_731731)->elements[1], __glo__85udf_91prims_85_scheme_cyclone_primitives));}
;; 
}

static void __lambda_22(void *data, object _, int argc, object *args) /* closure _,object k_73925, object p_7343_73836, object emit_91unsafe_7344_73837 */
 {
object k_73925 = args[0]; object p_7343_73836 = args[1]; object emit_91unsafe_7344_73837 = args[2];
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:_prim->c-func");

closureN_type c_731944;
object e_733430 [3];
c_731944.hdr.mark = gc_color_red;
 c_731944.hdr.grayed = 0;
c_731944.tag = closureN_tag;
 c_731944.fn = (function_type)__lambda_23;
c_731944.num_args = 1;
c_731944.num_elements = 3;
c_731944.elements = (object *)e_733430;
c_731944.elements[0] = emit_91unsafe_7344_73837;
c_731944.elements[1] = k_73925;
c_731944.elements[2] = p_7343_73836;



return_direct_with_clo1(data,(closure)&c_731944,__lambda_23,  Cyc_eq(p_7343_73836, quote_Cyc_91global_91vars));; 
}

static void __lambda_23(void *data, object self_731568, int argc, object *args) /* object self_731568, object r_73926 */
 {
 object r_73926 = args[0];
  if( (boolean_f != r_73926) ){ 
  
make_utf8_string_with_len(c_731947, "Cyc_get_global_variables", 24, 24);
return_direct_with_clo1(data,  ((closureN)self_731568)->elements[1], (((closure)  ((closureN)self_731568)->elements[1])->fn),  &c_731947);
} else { 
  
closureN_type c_731949;
object e_733426 [3];
c_731949.hdr.mark = gc_color_red;
 c_731949.hdr.grayed = 0;
c_731949.tag = closureN_tag;
 c_731949.fn = (function_type)__lambda_24;
c_731949.num_args = 1;
c_731949.num_elements = 3;
c_731949.elements = (object *)e_733426;
c_731949.elements[0] = ((closureN)self_731568)->elements[0];
c_731949.elements[1] = ((closureN)self_731568)->elements[1];
c_731949.elements[2] = ((closureN)self_731568)->elements[2];



return_direct_with_clo1(data,(closure)&c_731949,__lambda_24,  Cyc_eq(((closureN)self_731568)->elements[2], quote_Cyc_91get_91cvar));}
;; 
}

static void __lambda_24(void *data, object self_731569, int argc, object *args) /* object self_731569, object r_73927 */
 {
 object r_73927 = args[0];
  if( (boolean_f != r_73927) ){ 
  
make_utf8_string_with_len(c_731952, "Cyc_get_cvar", 12, 12);
return_direct_with_clo1(data,  ((closureN)self_731569)->elements[1], (((closure)  ((closureN)self_731569)->elements[1])->fn),  &c_731952);
} else { 
  
closureN_type c_731954;
object e_733422 [3];
c_731954.hdr.mark = gc_color_red;
 c_731954.hdr.grayed = 0;
c_731954.tag = closureN_tag;
 c_731954.fn = (function_type)__lambda_25;
c_731954.num_args = 1;
c_731954.num_elements = 3;
c_731954.elements = (object *)e_733422;
c_731954.elements[0] = ((closureN)self_731569)->elements[0];
c_731954.elements[1] = ((closureN)self_731569)->elements[1];
c_731954.elements[2] = ((closureN)self_731569)->elements[2];



return_direct_with_clo1(data,(closure)&c_731954,__lambda_25,  Cyc_eq(((closureN)self_731569)->elements[2], quote_Cyc_91set_91cvar_67));}
;; 
}

static void __lambda_25(void *data, object self_731570, int argc, object *args) /* object self_731570, object r_73928 */
 {
 object r_73928 = args[0];
  if( (boolean_f != r_73928) ){ 
  
make_utf8_string_with_len(c_731957, "Cyc_set_cvar", 12, 12);
return_direct_with_clo1(data,  ((closureN)self_731570)->elements[1], (((closure)  ((closureN)self_731570)->elements[1])->fn),  &c_731957);
} else { 
  
closureN_type c_731959;
object e_733418 [3];
c_731959.hdr.mark = gc_color_red;
 c_731959.hdr.grayed = 0;
c_731959.tag = closureN_tag;
 c_731959.fn = (function_type)__lambda_26;
c_731959.num_args = 1;
c_731959.num_elements = 3;
c_731959.elements = (object *)e_733418;
c_731959.elements[0] = ((closureN)self_731570)->elements[0];
c_731959.elements[1] = ((closureN)self_731570)->elements[1];
c_731959.elements[2] = ((closureN)self_731570)->elements[2];



return_direct_with_clo1(data,(closure)&c_731959,__lambda_26,  Cyc_eq(((closureN)self_731570)->elements[2], quote_Cyc_91cvar_127));}
;; 
}

static void __lambda_26(void *data, object self_731571, int argc, object *args) /* object self_731571, object r_73929 */
 {
 object r_73929 = args[0];
  if( (boolean_f != r_73929) ){ 
  
make_utf8_string_with_len(c_731962, "Cyc_is_cvar", 11, 11);
return_direct_with_clo1(data,  ((closureN)self_731571)->elements[1], (((closure)  ((closureN)self_731571)->elements[1])->fn),  &c_731962);
} else { 
  
closureN_type c_731964;
object e_733414 [3];
c_731964.hdr.mark = gc_color_red;
 c_731964.hdr.grayed = 0;
c_731964.tag = closureN_tag;
 c_731964.fn = (function_type)__lambda_27;
c_731964.num_args = 1;
c_731964.num_elements = 3;
c_731964.elements = (object *)e_733414;
c_731964.elements[0] = ((closureN)self_731571)->elements[0];
c_731964.elements[1] = ((closureN)self_731571)->elements[1];
c_731964.elements[2] = ((closureN)self_731571)->elements[2];



return_direct_with_clo1(data,(closure)&c_731964,__lambda_27,  Cyc_eq(((closureN)self_731571)->elements[2], quote_Cyc_91opaque_127));}
;; 
}

static void __lambda_27(void *data, object self_731572, int argc, object *args) /* object self_731572, object r_73930 */
 {
 object r_73930 = args[0];
  if( (boolean_f != r_73930) ){ 
  
make_utf8_string_with_len(c_731967, "Cyc_is_opaque", 13, 13);
return_direct_with_clo1(data,  ((closureN)self_731572)->elements[1], (((closure)  ((closureN)self_731572)->elements[1])->fn),  &c_731967);
} else { 
  
closureN_type c_731969;
object e_733410 [3];
c_731969.hdr.mark = gc_color_red;
 c_731969.hdr.grayed = 0;
c_731969.tag = closureN_tag;
 c_731969.fn = (function_type)__lambda_28;
c_731969.num_args = 1;
c_731969.num_elements = 3;
c_731969.elements = (object *)e_733410;
c_731969.elements[0] = ((closureN)self_731572)->elements[0];
c_731969.elements[1] = ((closureN)self_731572)->elements[1];
c_731969.elements[2] = ((closureN)self_731572)->elements[2];



return_direct_with_clo1(data,(closure)&c_731969,__lambda_28,  Cyc_eq(((closureN)self_731572)->elements[2], quote_Cyc_91has_91cycle_127));}
;; 
}

static void __lambda_28(void *data, object self_731573, int argc, object *args) /* object self_731573, object r_73931 */
 {
 object r_73931 = args[0];
  if( (boolean_f != r_73931) ){ 
  
make_utf8_string_with_len(c_731972, "Cyc_has_cycle", 13, 13);
return_direct_with_clo1(data,  ((closureN)self_731573)->elements[1], (((closure)  ((closureN)self_731573)->elements[1])->fn),  &c_731972);
} else { 
  
closureN_type c_731974;
object e_733406 [3];
c_731974.hdr.mark = gc_color_red;
 c_731974.hdr.grayed = 0;
c_731974.tag = closureN_tag;
 c_731974.fn = (function_type)__lambda_29;
c_731974.num_args = 1;
c_731974.num_elements = 3;
c_731974.elements = (object *)e_733406;
c_731974.elements[0] = ((closureN)self_731573)->elements[0];
c_731974.elements[1] = ((closureN)self_731573)->elements[1];
c_731974.elements[2] = ((closureN)self_731573)->elements[2];



return_direct_with_clo1(data,(closure)&c_731974,__lambda_29,  Cyc_eq(((closureN)self_731573)->elements[2], quote_Cyc_91spawn_91thread_67));}
;; 
}

static void __lambda_29(void *data, object self_731574, int argc, object *args) /* object self_731574, object r_73932 */
 {
 object r_73932 = args[0];
  if( (boolean_f != r_73932) ){ 
  
make_utf8_string_with_len(c_731977, "Cyc_spawn_thread", 16, 16);
return_direct_with_clo1(data,  ((closureN)self_731574)->elements[1], (((closure)  ((closureN)self_731574)->elements[1])->fn),  &c_731977);
} else { 
  
closureN_type c_731979;
object e_733402 [3];
c_731979.hdr.mark = gc_color_red;
 c_731979.hdr.grayed = 0;
c_731979.tag = closureN_tag;
 c_731979.fn = (function_type)__lambda_30;
c_731979.num_args = 1;
c_731979.num_elements = 3;
c_731979.elements = (object *)e_733402;
c_731979.elements[0] = ((closureN)self_731574)->elements[0];
c_731979.elements[1] = ((closureN)self_731574)->elements[1];
c_731979.elements[2] = ((closureN)self_731574)->elements[2];



return_direct_with_clo1(data,(closure)&c_731979,__lambda_30,  Cyc_eq(((closureN)self_731574)->elements[2], quote_Cyc_91end_91thread_67));}
;; 
}

static void __lambda_30(void *data, object self_731575, int argc, object *args) /* object self_731575, object r_73933 */
 {
 object r_73933 = args[0];
  if( (boolean_f != r_73933) ){ 
  
make_utf8_string_with_len(c_731982, "Cyc_end_thread", 14, 14);
return_direct_with_clo1(data,  ((closureN)self_731575)->elements[1], (((closure)  ((closureN)self_731575)->elements[1])->fn),  &c_731982);
} else { 
  
closureN_type c_731984;
object e_733398 [3];
c_731984.hdr.mark = gc_color_red;
 c_731984.hdr.grayed = 0;
c_731984.tag = closureN_tag;
 c_731984.fn = (function_type)__lambda_31;
c_731984.num_args = 1;
c_731984.num_elements = 3;
c_731984.elements = (object *)e_733398;
c_731984.elements[0] = ((closureN)self_731575)->elements[0];
c_731984.elements[1] = ((closureN)self_731575)->elements[1];
c_731984.elements[2] = ((closureN)self_731575)->elements[2];



return_direct_with_clo1(data,(closure)&c_731984,__lambda_31,  Cyc_eq(((closureN)self_731575)->elements[2], quote_Cyc_91stdout));}
;; 
}

static void __lambda_31(void *data, object self_731576, int argc, object *args) /* object self_731576, object r_73934 */
 {
 object r_73934 = args[0];
  if( (boolean_f != r_73934) ){ 
  
make_utf8_string_with_len(c_731987, "Cyc_stdout", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731576)->elements[1], (((closure)  ((closureN)self_731576)->elements[1])->fn),  &c_731987);
} else { 
  
closureN_type c_731989;
object e_733394 [3];
c_731989.hdr.mark = gc_color_red;
 c_731989.hdr.grayed = 0;
c_731989.tag = closureN_tag;
 c_731989.fn = (function_type)__lambda_32;
c_731989.num_args = 1;
c_731989.num_elements = 3;
c_731989.elements = (object *)e_733394;
c_731989.elements[0] = ((closureN)self_731576)->elements[0];
c_731989.elements[1] = ((closureN)self_731576)->elements[1];
c_731989.elements[2] = ((closureN)self_731576)->elements[2];



return_direct_with_clo1(data,(closure)&c_731989,__lambda_32,  Cyc_eq(((closureN)self_731576)->elements[2], quote_Cyc_91stdin));}
;; 
}

static void __lambda_32(void *data, object self_731577, int argc, object *args) /* object self_731577, object r_73935 */
 {
 object r_73935 = args[0];
  if( (boolean_f != r_73935) ){ 
  
make_utf8_string_with_len(c_731992, "Cyc_stdin", 9, 9);
return_direct_with_clo1(data,  ((closureN)self_731577)->elements[1], (((closure)  ((closureN)self_731577)->elements[1])->fn),  &c_731992);
} else { 
  
closureN_type c_731994;
object e_733390 [3];
c_731994.hdr.mark = gc_color_red;
 c_731994.hdr.grayed = 0;
c_731994.tag = closureN_tag;
 c_731994.fn = (function_type)__lambda_33;
c_731994.num_args = 1;
c_731994.num_elements = 3;
c_731994.elements = (object *)e_733390;
c_731994.elements[0] = ((closureN)self_731577)->elements[0];
c_731994.elements[1] = ((closureN)self_731577)->elements[1];
c_731994.elements[2] = ((closureN)self_731577)->elements[2];



return_direct_with_clo1(data,(closure)&c_731994,__lambda_33,  Cyc_eq(((closureN)self_731577)->elements[2], quote_Cyc_91stderr));}
;; 
}

static void __lambda_33(void *data, object self_731578, int argc, object *args) /* object self_731578, object r_73936 */
 {
 object r_73936 = args[0];
  if( (boolean_f != r_73936) ){ 
  
make_utf8_string_with_len(c_731997, "Cyc_stderr", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731578)->elements[1], (((closure)  ((closureN)self_731578)->elements[1])->fn),  &c_731997);
} else { 
  
closureN_type c_731999;
object e_733386 [3];
c_731999.hdr.mark = gc_color_red;
 c_731999.hdr.grayed = 0;
c_731999.tag = closureN_tag;
 c_731999.fn = (function_type)__lambda_34;
c_731999.num_args = 1;
c_731999.num_elements = 3;
c_731999.elements = (object *)e_733386;
c_731999.elements[0] = ((closureN)self_731578)->elements[0];
c_731999.elements[1] = ((closureN)self_731578)->elements[1];
c_731999.elements[2] = ((closureN)self_731578)->elements[2];



return_direct_with_clo1(data,(closure)&c_731999,__lambda_34,  Cyc_eq(((closureN)self_731578)->elements[2], quote_Cyc_91if));}
;; 
}

static void __lambda_34(void *data, object self_731579, int argc, object *args) /* object self_731579, object r_73937 */
 {
 object r_73937 = args[0];
  if( (boolean_f != r_73937) ){ 
  
make_utf8_string_with_len(c_732002, "Cyc_if", 6, 6);
return_direct_with_clo1(data,  ((closureN)self_731579)->elements[1], (((closure)  ((closureN)self_731579)->elements[1])->fn),  &c_732002);
} else { 
  
closureN_type c_732004;
object e_733382 [3];
c_732004.hdr.mark = gc_color_red;
 c_732004.hdr.grayed = 0;
c_732004.tag = closureN_tag;
 c_732004.fn = (function_type)__lambda_35;
c_732004.num_args = 1;
c_732004.num_elements = 3;
c_732004.elements = (object *)e_733382;
c_732004.elements[0] = ((closureN)self_731579)->elements[0];
c_732004.elements[1] = ((closureN)self_731579)->elements[1];
c_732004.elements[2] = ((closureN)self_731579)->elements[2];



return_direct_with_clo1(data,(closure)&c_732004,__lambda_35,  Cyc_eq(((closureN)self_731579)->elements[2], quote_Cyc_91foreign_91code));}
;; 
}

static void __lambda_35(void *data, object self_731580, int argc, object *args) /* object self_731580, object r_73938 */
 {
 object r_73938 = args[0];
  if( (boolean_f != r_73938) ){ 
  
make_utf8_string_with_len(c_732007, "UNDEF", 5, 5);
return_direct_with_clo1(data,  ((closureN)self_731580)->elements[1], (((closure)  ((closureN)self_731580)->elements[1])->fn),  &c_732007);
} else { 
  
closureN_type c_732009;
object e_733378 [3];
c_732009.hdr.mark = gc_color_red;
 c_732009.hdr.grayed = 0;
c_732009.tag = closureN_tag;
 c_732009.fn = (function_type)__lambda_36;
c_732009.num_args = 1;
c_732009.num_elements = 3;
c_732009.elements = (object *)e_733378;
c_732009.elements[0] = ((closureN)self_731580)->elements[0];
c_732009.elements[1] = ((closureN)self_731580)->elements[1];
c_732009.elements[2] = ((closureN)self_731580)->elements[2];



return_direct_with_clo1(data,(closure)&c_732009,__lambda_36,  Cyc_eq(((closureN)self_731580)->elements[2], quote_Cyc_91foreign_91value));}
;; 
}

static void __lambda_36(void *data, object self_731581, int argc, object *args) /* object self_731581, object r_73939 */
 {
 object r_73939 = args[0];
  if( (boolean_f != r_73939) ){ 
  
make_utf8_string_with_len(c_732012, "UNDEF", 5, 5);
return_direct_with_clo1(data,  ((closureN)self_731581)->elements[1], (((closure)  ((closureN)self_731581)->elements[1])->fn),  &c_732012);
} else { 
  
closureN_type c_732014;
object e_733374 [3];
c_732014.hdr.mark = gc_color_red;
 c_732014.hdr.grayed = 0;
c_732014.tag = closureN_tag;
 c_732014.fn = (function_type)__lambda_37;
c_732014.num_args = 1;
c_732014.num_elements = 3;
c_732014.elements = (object *)e_733374;
c_732014.elements[0] = ((closureN)self_731581)->elements[0];
c_732014.elements[1] = ((closureN)self_731581)->elements[1];
c_732014.elements[2] = ((closureN)self_731581)->elements[2];



return_direct_with_clo1(data,(closure)&c_732014,__lambda_37,  Cyc_eq(((closureN)self_731581)->elements[2], quote_Cyc_91fast_91plus));}
;; 
}

static void __lambda_37(void *data, object self_731582, int argc, object *args) /* object self_731582, object r_73940 */
 {
 object r_73940 = args[0];
  if( (boolean_f != r_73940) ){ 
  
make_utf8_string_with_len(c_732017, "Cyc_fast_sum", 12, 12);
return_direct_with_clo1(data,  ((closureN)self_731582)->elements[1], (((closure)  ((closureN)self_731582)->elements[1])->fn),  &c_732017);
} else { 
  
closureN_type c_732019;
object e_733370 [3];
c_732019.hdr.mark = gc_color_red;
 c_732019.hdr.grayed = 0;
c_732019.tag = closureN_tag;
 c_732019.fn = (function_type)__lambda_38;
c_732019.num_args = 1;
c_732019.num_elements = 3;
c_732019.elements = (object *)e_733370;
c_732019.elements[0] = ((closureN)self_731582)->elements[0];
c_732019.elements[1] = ((closureN)self_731582)->elements[1];
c_732019.elements[2] = ((closureN)self_731582)->elements[2];



return_direct_with_clo1(data,(closure)&c_732019,__lambda_38,  Cyc_eq(((closureN)self_731582)->elements[2], quote_Cyc_91fast_91sub));}
;; 
}

static void __lambda_38(void *data, object self_731583, int argc, object *args) /* object self_731583, object r_73941 */
 {
 object r_73941 = args[0];
  if( (boolean_f != r_73941) ){ 
  
make_utf8_string_with_len(c_732022, "Cyc_fast_sub", 12, 12);
return_direct_with_clo1(data,  ((closureN)self_731583)->elements[1], (((closure)  ((closureN)self_731583)->elements[1])->fn),  &c_732022);
} else { 
  
closureN_type c_732024;
object e_733366 [3];
c_732024.hdr.mark = gc_color_red;
 c_732024.hdr.grayed = 0;
c_732024.tag = closureN_tag;
 c_732024.fn = (function_type)__lambda_39;
c_732024.num_args = 1;
c_732024.num_elements = 3;
c_732024.elements = (object *)e_733366;
c_732024.elements[0] = ((closureN)self_731583)->elements[0];
c_732024.elements[1] = ((closureN)self_731583)->elements[1];
c_732024.elements[2] = ((closureN)self_731583)->elements[2];



return_direct_with_clo1(data,(closure)&c_732024,__lambda_39,  Cyc_eq(((closureN)self_731583)->elements[2], quote_Cyc_91fast_91mul));}
;; 
}

static void __lambda_39(void *data, object self_731584, int argc, object *args) /* object self_731584, object r_73942 */
 {
 object r_73942 = args[0];
  if( (boolean_f != r_73942) ){ 
  
make_utf8_string_with_len(c_732027, "Cyc_fast_mul", 12, 12);
return_direct_with_clo1(data,  ((closureN)self_731584)->elements[1], (((closure)  ((closureN)self_731584)->elements[1])->fn),  &c_732027);
} else { 
  
closureN_type c_732029;
object e_733362 [3];
c_732029.hdr.mark = gc_color_red;
 c_732029.hdr.grayed = 0;
c_732029.tag = closureN_tag;
 c_732029.fn = (function_type)__lambda_40;
c_732029.num_args = 1;
c_732029.num_elements = 3;
c_732029.elements = (object *)e_733362;
c_732029.elements[0] = ((closureN)self_731584)->elements[0];
c_732029.elements[1] = ((closureN)self_731584)->elements[1];
c_732029.elements[2] = ((closureN)self_731584)->elements[2];



return_direct_with_clo1(data,(closure)&c_732029,__lambda_40,  Cyc_eq(((closureN)self_731584)->elements[2], quote_Cyc_91fast_91div));}
;; 
}

static void __lambda_40(void *data, object self_731585, int argc, object *args) /* object self_731585, object r_73943 */
 {
 object r_73943 = args[0];
  if( (boolean_f != r_73943) ){ 
  
make_utf8_string_with_len(c_732032, "Cyc_fast_div", 12, 12);
return_direct_with_clo1(data,  ((closureN)self_731585)->elements[1], (((closure)  ((closureN)self_731585)->elements[1])->fn),  &c_732032);
} else { 
  
closureN_type c_732034;
object e_733358 [3];
c_732034.hdr.mark = gc_color_red;
 c_732034.hdr.grayed = 0;
c_732034.tag = closureN_tag;
 c_732034.fn = (function_type)__lambda_41;
c_732034.num_args = 1;
c_732034.num_elements = 3;
c_732034.elements = (object *)e_733358;
c_732034.elements[0] = ((closureN)self_731585)->elements[0];
c_732034.elements[1] = ((closureN)self_731585)->elements[1];
c_732034.elements[2] = ((closureN)self_731585)->elements[2];



return_direct_with_clo1(data,(closure)&c_732034,__lambda_41,  Cyc_eq(((closureN)self_731585)->elements[2], quote__87));}
;; 
}

static void __lambda_41(void *data, object self_731586, int argc, object *args) /* object self_731586, object r_73944 */
 {
 object r_73944 = args[0];
  if( (boolean_f != r_73944) ){ 
  
make_utf8_string_with_len(c_732037, "Cyc_sum", 7, 7);
return_direct_with_clo1(data,  ((closureN)self_731586)->elements[1], (((closure)  ((closureN)self_731586)->elements[1])->fn),  &c_732037);
} else { 
  
closureN_type c_732039;
object e_733354 [3];
c_732039.hdr.mark = gc_color_red;
 c_732039.hdr.grayed = 0;
c_732039.tag = closureN_tag;
 c_732039.fn = (function_type)__lambda_42;
c_732039.num_args = 1;
c_732039.num_elements = 3;
c_732039.elements = (object *)e_733354;
c_732039.elements[0] = ((closureN)self_731586)->elements[0];
c_732039.elements[1] = ((closureN)self_731586)->elements[1];
c_732039.elements[2] = ((closureN)self_731586)->elements[2];



return_direct_with_clo1(data,(closure)&c_732039,__lambda_42,  Cyc_eq(((closureN)self_731586)->elements[2], quote__91));}
;; 
}

static void __lambda_42(void *data, object self_731587, int argc, object *args) /* object self_731587, object r_73945 */
 {
 object r_73945 = args[0];
  if( (boolean_f != r_73945) ){ 
  
make_utf8_string_with_len(c_732042, "Cyc_sub", 7, 7);
return_direct_with_clo1(data,  ((closureN)self_731587)->elements[1], (((closure)  ((closureN)self_731587)->elements[1])->fn),  &c_732042);
} else { 
  
closureN_type c_732044;
object e_733350 [3];
c_732044.hdr.mark = gc_color_red;
 c_732044.hdr.grayed = 0;
c_732044.tag = closureN_tag;
 c_732044.fn = (function_type)__lambda_43;
c_732044.num_args = 1;
c_732044.num_elements = 3;
c_732044.elements = (object *)e_733350;
c_732044.elements[0] = ((closureN)self_731587)->elements[0];
c_732044.elements[1] = ((closureN)self_731587)->elements[1];
c_732044.elements[2] = ((closureN)self_731587)->elements[2];



return_direct_with_clo1(data,(closure)&c_732044,__lambda_43,  Cyc_eq(((closureN)self_731587)->elements[2], quote__85));}
;; 
}

static void __lambda_43(void *data, object self_731588, int argc, object *args) /* object self_731588, object r_73946 */
 {
 object r_73946 = args[0];
  if( (boolean_f != r_73946) ){ 
  
make_utf8_string_with_len(c_732047, "Cyc_mul", 7, 7);
return_direct_with_clo1(data,  ((closureN)self_731588)->elements[1], (((closure)  ((closureN)self_731588)->elements[1])->fn),  &c_732047);
} else { 
  
closureN_type c_732049;
object e_733346 [3];
c_732049.hdr.mark = gc_color_red;
 c_732049.hdr.grayed = 0;
c_732049.tag = closureN_tag;
 c_732049.fn = (function_type)__lambda_44;
c_732049.num_args = 1;
c_732049.num_elements = 3;
c_732049.elements = (object *)e_733346;
c_732049.elements[0] = ((closureN)self_731588)->elements[0];
c_732049.elements[1] = ((closureN)self_731588)->elements[1];
c_732049.elements[2] = ((closureN)self_731588)->elements[2];



return_direct_with_clo1(data,(closure)&c_732049,__lambda_44,  Cyc_eq(((closureN)self_731588)->elements[2], quote__95));}
;; 
}

static void __lambda_44(void *data, object self_731589, int argc, object *args) /* object self_731589, object r_73947 */
 {
 object r_73947 = args[0];
  if( (boolean_f != r_73947) ){ 
  
make_utf8_string_with_len(c_732052, "Cyc_div", 7, 7);
return_direct_with_clo1(data,  ((closureN)self_731589)->elements[1], (((closure)  ((closureN)self_731589)->elements[1])->fn),  &c_732052);
} else { 
  
closureN_type c_732054;
object e_733342 [3];
c_732054.hdr.mark = gc_color_red;
 c_732054.hdr.grayed = 0;
c_732054.tag = closureN_tag;
 c_732054.fn = (function_type)__lambda_45;
c_732054.num_args = 1;
c_732054.num_elements = 3;
c_732054.elements = (object *)e_733342;
c_732054.elements[0] = ((closureN)self_731589)->elements[0];
c_732054.elements[1] = ((closureN)self_731589)->elements[1];
c_732054.elements[2] = ((closureN)self_731589)->elements[2];



return_direct_with_clo1(data,(closure)&c_732054,__lambda_45,  Cyc_eq(((closureN)self_731589)->elements[2], quote_Cyc_91fast_91eq));}
;; 
}

static void __lambda_45(void *data, object self_731590, int argc, object *args) /* object self_731590, object r_73948 */
 {
 object r_73948 = args[0];
  if( (boolean_f != r_73948) ){ 
  
make_utf8_string_with_len(c_732057, "Cyc_num_fast_eq_op", 18, 18);
return_direct_with_clo1(data,  ((closureN)self_731590)->elements[1], (((closure)  ((closureN)self_731590)->elements[1])->fn),  &c_732057);
} else { 
  
closureN_type c_732059;
object e_733338 [3];
c_732059.hdr.mark = gc_color_red;
 c_732059.hdr.grayed = 0;
c_732059.tag = closureN_tag;
 c_732059.fn = (function_type)__lambda_46;
c_732059.num_args = 1;
c_732059.num_elements = 3;
c_732059.elements = (object *)e_733338;
c_732059.elements[0] = ((closureN)self_731590)->elements[0];
c_732059.elements[1] = ((closureN)self_731590)->elements[1];
c_732059.elements[2] = ((closureN)self_731590)->elements[2];



return_direct_with_clo1(data,(closure)&c_732059,__lambda_46,  Cyc_eq(((closureN)self_731590)->elements[2], quote_Cyc_91fast_91gt));}
;; 
}

static void __lambda_46(void *data, object self_731591, int argc, object *args) /* object self_731591, object r_73949 */
 {
 object r_73949 = args[0];
  if( (boolean_f != r_73949) ){ 
  
make_utf8_string_with_len(c_732062, "Cyc_num_fast_gt_op", 18, 18);
return_direct_with_clo1(data,  ((closureN)self_731591)->elements[1], (((closure)  ((closureN)self_731591)->elements[1])->fn),  &c_732062);
} else { 
  
closureN_type c_732064;
object e_733334 [3];
c_732064.hdr.mark = gc_color_red;
 c_732064.hdr.grayed = 0;
c_732064.tag = closureN_tag;
 c_732064.fn = (function_type)__lambda_47;
c_732064.num_args = 1;
c_732064.num_elements = 3;
c_732064.elements = (object *)e_733334;
c_732064.elements[0] = ((closureN)self_731591)->elements[0];
c_732064.elements[1] = ((closureN)self_731591)->elements[1];
c_732064.elements[2] = ((closureN)self_731591)->elements[2];



return_direct_with_clo1(data,(closure)&c_732064,__lambda_47,  Cyc_eq(((closureN)self_731591)->elements[2], quote_Cyc_91fast_91lt));}
;; 
}

static void __lambda_47(void *data, object self_731592, int argc, object *args) /* object self_731592, object r_73950 */
 {
 object r_73950 = args[0];
  if( (boolean_f != r_73950) ){ 
  
make_utf8_string_with_len(c_732067, "Cyc_num_fast_lt_op", 18, 18);
return_direct_with_clo1(data,  ((closureN)self_731592)->elements[1], (((closure)  ((closureN)self_731592)->elements[1])->fn),  &c_732067);
} else { 
  
closureN_type c_732069;
object e_733330 [3];
c_732069.hdr.mark = gc_color_red;
 c_732069.hdr.grayed = 0;
c_732069.tag = closureN_tag;
 c_732069.fn = (function_type)__lambda_48;
c_732069.num_args = 1;
c_732069.num_elements = 3;
c_732069.elements = (object *)e_733330;
c_732069.elements[0] = ((closureN)self_731592)->elements[0];
c_732069.elements[1] = ((closureN)self_731592)->elements[1];
c_732069.elements[2] = ((closureN)self_731592)->elements[2];



return_direct_with_clo1(data,(closure)&c_732069,__lambda_48,  Cyc_eq(((closureN)self_731592)->elements[2], quote_Cyc_91fast_91gte));}
;; 
}

static void __lambda_48(void *data, object self_731593, int argc, object *args) /* object self_731593, object r_73951 */
 {
 object r_73951 = args[0];
  if( (boolean_f != r_73951) ){ 
  
make_utf8_string_with_len(c_732072, "Cyc_num_fast_gte_op", 19, 19);
return_direct_with_clo1(data,  ((closureN)self_731593)->elements[1], (((closure)  ((closureN)self_731593)->elements[1])->fn),  &c_732072);
} else { 
  
closureN_type c_732074;
object e_733326 [3];
c_732074.hdr.mark = gc_color_red;
 c_732074.hdr.grayed = 0;
c_732074.tag = closureN_tag;
 c_732074.fn = (function_type)__lambda_49;
c_732074.num_args = 1;
c_732074.num_elements = 3;
c_732074.elements = (object *)e_733326;
c_732074.elements[0] = ((closureN)self_731593)->elements[0];
c_732074.elements[1] = ((closureN)self_731593)->elements[1];
c_732074.elements[2] = ((closureN)self_731593)->elements[2];



return_direct_with_clo1(data,(closure)&c_732074,__lambda_49,  Cyc_eq(((closureN)self_731593)->elements[2], quote_Cyc_91fast_91lte));}
;; 
}

static void __lambda_49(void *data, object self_731594, int argc, object *args) /* object self_731594, object r_73952 */
 {
 object r_73952 = args[0];
  if( (boolean_f != r_73952) ){ 
  
make_utf8_string_with_len(c_732077, "Cyc_num_fast_lte_op", 19, 19);
return_direct_with_clo1(data,  ((closureN)self_731594)->elements[1], (((closure)  ((closureN)self_731594)->elements[1])->fn),  &c_732077);
} else { 
  
closureN_type c_732079;
object e_733322 [3];
c_732079.hdr.mark = gc_color_red;
 c_732079.hdr.grayed = 0;
c_732079.tag = closureN_tag;
 c_732079.fn = (function_type)__lambda_50;
c_732079.num_args = 1;
c_732079.num_elements = 3;
c_732079.elements = (object *)e_733322;
c_732079.elements[0] = ((closureN)self_731594)->elements[0];
c_732079.elements[1] = ((closureN)self_731594)->elements[1];
c_732079.elements[2] = ((closureN)self_731594)->elements[2];



return_direct_with_clo1(data,(closure)&c_732079,__lambda_50,  Cyc_eq(((closureN)self_731594)->elements[2], quote_Cyc_91fast_91char_91eq));}
;; 
}

static void __lambda_50(void *data, object self_731595, int argc, object *args) /* object self_731595, object r_73953 */
 {
 object r_73953 = args[0];
  if( (boolean_f != r_73953) ){ 
  
make_utf8_string_with_len(c_732082, "Cyc_char_eq_op", 14, 14);
return_direct_with_clo1(data,  ((closureN)self_731595)->elements[1], (((closure)  ((closureN)self_731595)->elements[1])->fn),  &c_732082);
} else { 
  
closureN_type c_732084;
object e_733318 [3];
c_732084.hdr.mark = gc_color_red;
 c_732084.hdr.grayed = 0;
c_732084.tag = closureN_tag;
 c_732084.fn = (function_type)__lambda_51;
c_732084.num_args = 1;
c_732084.num_elements = 3;
c_732084.elements = (object *)e_733318;
c_732084.elements[0] = ((closureN)self_731595)->elements[0];
c_732084.elements[1] = ((closureN)self_731595)->elements[1];
c_732084.elements[2] = ((closureN)self_731595)->elements[2];



return_direct_with_clo1(data,(closure)&c_732084,__lambda_51,  Cyc_eq(((closureN)self_731595)->elements[2], quote_Cyc_91fast_91char_91gt));}
;; 
}

static void __lambda_51(void *data, object self_731596, int argc, object *args) /* object self_731596, object r_73954 */
 {
 object r_73954 = args[0];
  if( (boolean_f != r_73954) ){ 
  
make_utf8_string_with_len(c_732087, "Cyc_char_gt_op", 14, 14);
return_direct_with_clo1(data,  ((closureN)self_731596)->elements[1], (((closure)  ((closureN)self_731596)->elements[1])->fn),  &c_732087);
} else { 
  
closureN_type c_732089;
object e_733314 [3];
c_732089.hdr.mark = gc_color_red;
 c_732089.hdr.grayed = 0;
c_732089.tag = closureN_tag;
 c_732089.fn = (function_type)__lambda_52;
c_732089.num_args = 1;
c_732089.num_elements = 3;
c_732089.elements = (object *)e_733314;
c_732089.elements[0] = ((closureN)self_731596)->elements[0];
c_732089.elements[1] = ((closureN)self_731596)->elements[1];
c_732089.elements[2] = ((closureN)self_731596)->elements[2];



return_direct_with_clo1(data,(closure)&c_732089,__lambda_52,  Cyc_eq(((closureN)self_731596)->elements[2], quote_Cyc_91fast_91char_91lt));}
;; 
}

static void __lambda_52(void *data, object self_731597, int argc, object *args) /* object self_731597, object r_73955 */
 {
 object r_73955 = args[0];
  if( (boolean_f != r_73955) ){ 
  
make_utf8_string_with_len(c_732092, "Cyc_char_lt_op", 14, 14);
return_direct_with_clo1(data,  ((closureN)self_731597)->elements[1], (((closure)  ((closureN)self_731597)->elements[1])->fn),  &c_732092);
} else { 
  
closureN_type c_732094;
object e_733310 [3];
c_732094.hdr.mark = gc_color_red;
 c_732094.hdr.grayed = 0;
c_732094.tag = closureN_tag;
 c_732094.fn = (function_type)__lambda_53;
c_732094.num_args = 1;
c_732094.num_elements = 3;
c_732094.elements = (object *)e_733310;
c_732094.elements[0] = ((closureN)self_731597)->elements[0];
c_732094.elements[1] = ((closureN)self_731597)->elements[1];
c_732094.elements[2] = ((closureN)self_731597)->elements[2];



return_direct_with_clo1(data,(closure)&c_732094,__lambda_53,  Cyc_eq(((closureN)self_731597)->elements[2], quote_Cyc_91fast_91char_91gte));}
;; 
}

static void __lambda_53(void *data, object self_731598, int argc, object *args) /* object self_731598, object r_73956 */
 {
 object r_73956 = args[0];
  if( (boolean_f != r_73956) ){ 
  
make_utf8_string_with_len(c_732097, "Cyc_char_gte_op", 15, 15);
return_direct_with_clo1(data,  ((closureN)self_731598)->elements[1], (((closure)  ((closureN)self_731598)->elements[1])->fn),  &c_732097);
} else { 
  
closureN_type c_732099;
object e_733306 [3];
c_732099.hdr.mark = gc_color_red;
 c_732099.hdr.grayed = 0;
c_732099.tag = closureN_tag;
 c_732099.fn = (function_type)__lambda_54;
c_732099.num_args = 1;
c_732099.num_elements = 3;
c_732099.elements = (object *)e_733306;
c_732099.elements[0] = ((closureN)self_731598)->elements[0];
c_732099.elements[1] = ((closureN)self_731598)->elements[1];
c_732099.elements[2] = ((closureN)self_731598)->elements[2];



return_direct_with_clo1(data,(closure)&c_732099,__lambda_54,  Cyc_eq(((closureN)self_731598)->elements[2], quote_Cyc_91fast_91char_91lte));}
;; 
}

static void __lambda_54(void *data, object self_731599, int argc, object *args) /* object self_731599, object r_73957 */
 {
 object r_73957 = args[0];
  if( (boolean_f != r_73957) ){ 
  
make_utf8_string_with_len(c_732102, "Cyc_char_lte_op", 15, 15);
return_direct_with_clo1(data,  ((closureN)self_731599)->elements[1], (((closure)  ((closureN)self_731599)->elements[1])->fn),  &c_732102);
} else { 
  
closureN_type c_732104;
object e_733302 [3];
c_732104.hdr.mark = gc_color_red;
 c_732104.hdr.grayed = 0;
c_732104.tag = closureN_tag;
 c_732104.fn = (function_type)__lambda_55;
c_732104.num_args = 1;
c_732104.num_elements = 3;
c_732104.elements = (object *)e_733302;
c_732104.elements[0] = ((closureN)self_731599)->elements[0];
c_732104.elements[1] = ((closureN)self_731599)->elements[1];
c_732104.elements[2] = ((closureN)self_731599)->elements[2];



return_direct_with_clo1(data,(closure)&c_732104,__lambda_55,  Cyc_eq(((closureN)self_731599)->elements[2], quote__123));}
;; 
}

static void __lambda_55(void *data, object self_731600, int argc, object *args) /* object self_731600, object r_73958 */
 {
 object r_73958 = args[0];
  if( (boolean_f != r_73958) ){ 
  
make_utf8_string_with_len(c_732107, "Cyc_num_eq", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731600)->elements[1], (((closure)  ((closureN)self_731600)->elements[1])->fn),  &c_732107);
} else { 
  
closureN_type c_732109;
object e_733298 [3];
c_732109.hdr.mark = gc_color_red;
 c_732109.hdr.grayed = 0;
c_732109.tag = closureN_tag;
 c_732109.fn = (function_type)__lambda_56;
c_732109.num_args = 1;
c_732109.num_elements = 3;
c_732109.elements = (object *)e_733298;
c_732109.elements[0] = ((closureN)self_731600)->elements[0];
c_732109.elements[1] = ((closureN)self_731600)->elements[1];
c_732109.elements[2] = ((closureN)self_731600)->elements[2];



return_direct_with_clo1(data,(closure)&c_732109,__lambda_56,  Cyc_eq(((closureN)self_731600)->elements[2], quote__125));}
;; 
}

static void __lambda_56(void *data, object self_731601, int argc, object *args) /* object self_731601, object r_73959 */
 {
 object r_73959 = args[0];
  if( (boolean_f != r_73959) ){ 
  
make_utf8_string_with_len(c_732112, "Cyc_num_gt", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731601)->elements[1], (((closure)  ((closureN)self_731601)->elements[1])->fn),  &c_732112);
} else { 
  
closureN_type c_732114;
object e_733294 [3];
c_732114.hdr.mark = gc_color_red;
 c_732114.hdr.grayed = 0;
c_732114.tag = closureN_tag;
 c_732114.fn = (function_type)__lambda_57;
c_732114.num_args = 1;
c_732114.num_elements = 3;
c_732114.elements = (object *)e_733294;
c_732114.elements[0] = ((closureN)self_731601)->elements[0];
c_732114.elements[1] = ((closureN)self_731601)->elements[1];
c_732114.elements[2] = ((closureN)self_731601)->elements[2];



return_direct_with_clo1(data,(closure)&c_732114,__lambda_57,  Cyc_eq(((closureN)self_731601)->elements[2], quote__121));}
;; 
}

static void __lambda_57(void *data, object self_731602, int argc, object *args) /* object self_731602, object r_73960 */
 {
 object r_73960 = args[0];
  if( (boolean_f != r_73960) ){ 
  
make_utf8_string_with_len(c_732117, "Cyc_num_lt", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731602)->elements[1], (((closure)  ((closureN)self_731602)->elements[1])->fn),  &c_732117);
} else { 
  
closureN_type c_732119;
object e_733290 [3];
c_732119.hdr.mark = gc_color_red;
 c_732119.hdr.grayed = 0;
c_732119.tag = closureN_tag;
 c_732119.fn = (function_type)__lambda_58;
c_732119.num_args = 1;
c_732119.num_elements = 3;
c_732119.elements = (object *)e_733290;
c_732119.elements[0] = ((closureN)self_731602)->elements[0];
c_732119.elements[1] = ((closureN)self_731602)->elements[1];
c_732119.elements[2] = ((closureN)self_731602)->elements[2];



return_direct_with_clo1(data,(closure)&c_732119,__lambda_58,  Cyc_eq(((closureN)self_731602)->elements[2], quote__125_123));}
;; 
}

static void __lambda_58(void *data, object self_731603, int argc, object *args) /* object self_731603, object r_73961 */
 {
 object r_73961 = args[0];
  if( (boolean_f != r_73961) ){ 
  
make_utf8_string_with_len(c_732122, "Cyc_num_gte", 11, 11);
return_direct_with_clo1(data,  ((closureN)self_731603)->elements[1], (((closure)  ((closureN)self_731603)->elements[1])->fn),  &c_732122);
} else { 
  
closureN_type c_732124;
object e_733286 [3];
c_732124.hdr.mark = gc_color_red;
 c_732124.hdr.grayed = 0;
c_732124.tag = closureN_tag;
 c_732124.fn = (function_type)__lambda_59;
c_732124.num_args = 1;
c_732124.num_elements = 3;
c_732124.elements = (object *)e_733286;
c_732124.elements[0] = ((closureN)self_731603)->elements[0];
c_732124.elements[1] = ((closureN)self_731603)->elements[1];
c_732124.elements[2] = ((closureN)self_731603)->elements[2];



return_direct_with_clo1(data,(closure)&c_732124,__lambda_59,  Cyc_eq(((closureN)self_731603)->elements[2], quote__121_123));}
;; 
}

static void __lambda_59(void *data, object self_731604, int argc, object *args) /* object self_731604, object r_73962 */
 {
 object r_73962 = args[0];
  if( (boolean_f != r_73962) ){ 
  
make_utf8_string_with_len(c_732127, "Cyc_num_lte", 11, 11);
return_direct_with_clo1(data,  ((closureN)self_731604)->elements[1], (((closure)  ((closureN)self_731604)->elements[1])->fn),  &c_732127);
} else { 
  
closureN_type c_732129;
object e_733282 [3];
c_732129.hdr.mark = gc_color_red;
 c_732129.hdr.grayed = 0;
c_732129.tag = closureN_tag;
 c_732129.fn = (function_type)__lambda_60;
c_732129.num_args = 1;
c_732129.num_elements = 3;
c_732129.elements = (object *)e_733282;
c_732129.elements[0] = ((closureN)self_731604)->elements[0];
c_732129.elements[1] = ((closureN)self_731604)->elements[1];
c_732129.elements[2] = ((closureN)self_731604)->elements[2];



return_direct_with_clo1(data,(closure)&c_732129,__lambda_60,  Cyc_eq(((closureN)self_731604)->elements[2], quote_apply));}
;; 
}

static void __lambda_60(void *data, object self_731605, int argc, object *args) /* object self_731605, object r_73963 */
 {
 object r_73963 = args[0];
  if( (boolean_f != r_73963) ){ 
  
make_utf8_string_with_len(c_732132, "apply_va", 8, 8);
return_direct_with_clo1(data,  ((closureN)self_731605)->elements[1], (((closure)  ((closureN)self_731605)->elements[1])->fn),  &c_732132);
} else { 
  
closureN_type c_732134;
object e_733278 [3];
c_732134.hdr.mark = gc_color_red;
 c_732134.hdr.grayed = 0;
c_732134.tag = closureN_tag;
 c_732134.fn = (function_type)__lambda_61;
c_732134.num_args = 1;
c_732134.num_elements = 3;
c_732134.elements = (object *)e_733278;
c_732134.elements[0] = ((closureN)self_731605)->elements[0];
c_732134.elements[1] = ((closureN)self_731605)->elements[1];
c_732134.elements[2] = ((closureN)self_731605)->elements[2];



return_direct_with_clo1(data,(closure)&c_732134,__lambda_61,  Cyc_eq(((closureN)self_731605)->elements[2], quote_Cyc_91fast_91apply));}
;; 
}

static void __lambda_61(void *data, object self_731606, int argc, object *args) /* object self_731606, object r_73964 */
 {
 object r_73964 = args[0];
  if( (boolean_f != r_73964) ){ 
  
make_utf8_string_with_len(c_732137, "apply", 5, 5);
return_direct_with_clo1(data,  ((closureN)self_731606)->elements[1], (((closure)  ((closureN)self_731606)->elements[1])->fn),  &c_732137);
} else { 
  
closureN_type c_732139;
object e_733274 [3];
c_732139.hdr.mark = gc_color_red;
 c_732139.hdr.grayed = 0;
c_732139.tag = closureN_tag;
 c_732139.fn = (function_type)__lambda_62;
c_732139.num_args = 1;
c_732139.num_elements = 3;
c_732139.elements = (object *)e_733274;
c_732139.elements[0] = ((closureN)self_731606)->elements[0];
c_732139.elements[1] = ((closureN)self_731606)->elements[1];
c_732139.elements[2] = ((closureN)self_731606)->elements[2];



return_direct_with_clo1(data,(closure)&c_732139,__lambda_62,  Cyc_eq(((closureN)self_731606)->elements[2], quote__75halt));}
;; 
}

static void __lambda_62(void *data, object self_731607, int argc, object *args) /* object self_731607, object r_73965 */
 {
 object r_73965 = args[0];
  if( (boolean_f != r_73965) ){ 
  
make_utf8_string_with_len(c_732142, "__halt", 6, 6);
return_direct_with_clo1(data,  ((closureN)self_731607)->elements[1], (((closure)  ((closureN)self_731607)->elements[1])->fn),  &c_732142);
} else { 
  
closureN_type c_732144;
object e_733270 [3];
c_732144.hdr.mark = gc_color_red;
 c_732144.hdr.grayed = 0;
c_732144.tag = closureN_tag;
 c_732144.fn = (function_type)__lambda_63;
c_732144.num_args = 1;
c_732144.num_elements = 3;
c_732144.elements = (object *)e_733270;
c_732144.elements[0] = ((closureN)self_731607)->elements[0];
c_732144.elements[1] = ((closureN)self_731607)->elements[1];
c_732144.elements[2] = ((closureN)self_731607)->elements[2];



return_direct_with_clo1(data,(closure)&c_732144,__lambda_63,  Cyc_eq(((closureN)self_731607)->elements[2], quote_exit));}
;; 
}

static void __lambda_63(void *data, object self_731608, int argc, object *args) /* object self_731608, object r_73966 */
 {
 object r_73966 = args[0];
  if( (boolean_f != r_73966) ){ 
  
make_utf8_string_with_len(c_732147, "__halt", 6, 6);
return_direct_with_clo1(data,  ((closureN)self_731608)->elements[1], (((closure)  ((closureN)self_731608)->elements[1])->fn),  &c_732147);
} else { 
  
closureN_type c_732149;
object e_733266 [3];
c_732149.hdr.mark = gc_color_red;
 c_732149.hdr.grayed = 0;
c_732149.tag = closureN_tag;
 c_732149.fn = (function_type)__lambda_64;
c_732149.num_args = 1;
c_732149.num_elements = 3;
c_732149.elements = (object *)e_733266;
c_732149.elements[0] = ((closureN)self_731608)->elements[0];
c_732149.elements[1] = ((closureN)self_731608)->elements[1];
c_732149.elements[2] = ((closureN)self_731608)->elements[2];



return_direct_with_clo1(data,(closure)&c_732149,__lambda_64,  Cyc_eq(((closureN)self_731608)->elements[2], quote_Cyc_91default_91exception_91handler));}
;; 
}

static void __lambda_64(void *data, object self_731609, int argc, object *args) /* object self_731609, object r_73967 */
 {
 object r_73967 = args[0];
  if( (boolean_f != r_73967) ){ 
  
make_utf8_string_with_len(c_732152, "Cyc_default_exception_handler", 29, 29);
return_direct_with_clo1(data,  ((closureN)self_731609)->elements[1], (((closure)  ((closureN)self_731609)->elements[1])->fn),  &c_732152);
} else { 
  
closureN_type c_732154;
object e_733262 [3];
c_732154.hdr.mark = gc_color_red;
 c_732154.hdr.grayed = 0;
c_732154.tag = closureN_tag;
 c_732154.fn = (function_type)__lambda_65;
c_732154.num_args = 1;
c_732154.num_elements = 3;
c_732154.elements = (object *)e_733262;
c_732154.elements[0] = ((closureN)self_731609)->elements[0];
c_732154.elements[1] = ((closureN)self_731609)->elements[1];
c_732154.elements[2] = ((closureN)self_731609)->elements[2];



return_direct_with_clo1(data,(closure)&c_732154,__lambda_65,  Cyc_eq(((closureN)self_731609)->elements[2], quote_Cyc_91current_91exception_91handler));}
;; 
}

static void __lambda_65(void *data, object self_731610, int argc, object *args) /* object self_731610, object r_73968 */
 {
 object r_73968 = args[0];
  if( (boolean_f != r_73968) ){ 
  
make_utf8_string_with_len(c_732157, "Cyc_current_exception_handler", 29, 29);
return_direct_with_clo1(data,  ((closureN)self_731610)->elements[1], (((closure)  ((closureN)self_731610)->elements[1])->fn),  &c_732157);
} else { 
  
closureN_type c_732159;
object e_733258 [3];
c_732159.hdr.mark = gc_color_red;
 c_732159.hdr.grayed = 0;
c_732159.tag = closureN_tag;
 c_732159.fn = (function_type)__lambda_66;
c_732159.num_args = 1;
c_732159.num_elements = 3;
c_732159.elements = (object *)e_733258;
c_732159.elements[0] = ((closureN)self_731610)->elements[0];
c_732159.elements[1] = ((closureN)self_731610)->elements[1];
c_732159.elements[2] = ((closureN)self_731610)->elements[2];



return_direct_with_clo1(data,(closure)&c_732159,__lambda_66,  Cyc_eq(((closureN)self_731610)->elements[2], quote_open_91input_91file));}
;; 
}

static void __lambda_66(void *data, object self_731611, int argc, object *args) /* object self_731611, object r_73969 */
 {
 object r_73969 = args[0];
  if( (boolean_f != r_73969) ){ 
  
make_utf8_string_with_len(c_732162, "Cyc_io_open_input_file", 22, 22);
return_direct_with_clo1(data,  ((closureN)self_731611)->elements[1], (((closure)  ((closureN)self_731611)->elements[1])->fn),  &c_732162);
} else { 
  
closureN_type c_732164;
object e_733254 [3];
c_732164.hdr.mark = gc_color_red;
 c_732164.hdr.grayed = 0;
c_732164.tag = closureN_tag;
 c_732164.fn = (function_type)__lambda_67;
c_732164.num_args = 1;
c_732164.num_elements = 3;
c_732164.elements = (object *)e_733254;
c_732164.elements[0] = ((closureN)self_731611)->elements[0];
c_732164.elements[1] = ((closureN)self_731611)->elements[1];
c_732164.elements[2] = ((closureN)self_731611)->elements[2];



return_direct_with_clo1(data,(closure)&c_732164,__lambda_67,  Cyc_eq(((closureN)self_731611)->elements[2], quote_open_91output_91file));}
;; 
}

static void __lambda_67(void *data, object self_731612, int argc, object *args) /* object self_731612, object r_73970 */
 {
 object r_73970 = args[0];
  if( (boolean_f != r_73970) ){ 
  
make_utf8_string_with_len(c_732167, "Cyc_io_open_output_file", 23, 23);
return_direct_with_clo1(data,  ((closureN)self_731612)->elements[1], (((closure)  ((closureN)self_731612)->elements[1])->fn),  &c_732167);
} else { 
  
closureN_type c_732169;
object e_733250 [3];
c_732169.hdr.mark = gc_color_red;
 c_732169.hdr.grayed = 0;
c_732169.tag = closureN_tag;
 c_732169.fn = (function_type)__lambda_68;
c_732169.num_args = 1;
c_732169.num_elements = 3;
c_732169.elements = (object *)e_733250;
c_732169.elements[0] = ((closureN)self_731612)->elements[0];
c_732169.elements[1] = ((closureN)self_731612)->elements[1];
c_732169.elements[2] = ((closureN)self_731612)->elements[2];



return_direct_with_clo1(data,(closure)&c_732169,__lambda_68,  Cyc_eq(((closureN)self_731612)->elements[2], quote_open_91binary_91input_91file));}
;; 
}

static void __lambda_68(void *data, object self_731613, int argc, object *args) /* object self_731613, object r_73971 */
 {
 object r_73971 = args[0];
  if( (boolean_f != r_73971) ){ 
  
make_utf8_string_with_len(c_732172, "Cyc_io_open_binary_input_file", 29, 29);
return_direct_with_clo1(data,  ((closureN)self_731613)->elements[1], (((closure)  ((closureN)self_731613)->elements[1])->fn),  &c_732172);
} else { 
  
closureN_type c_732174;
object e_733246 [3];
c_732174.hdr.mark = gc_color_red;
 c_732174.hdr.grayed = 0;
c_732174.tag = closureN_tag;
 c_732174.fn = (function_type)__lambda_69;
c_732174.num_args = 1;
c_732174.num_elements = 3;
c_732174.elements = (object *)e_733246;
c_732174.elements[0] = ((closureN)self_731613)->elements[0];
c_732174.elements[1] = ((closureN)self_731613)->elements[1];
c_732174.elements[2] = ((closureN)self_731613)->elements[2];



return_direct_with_clo1(data,(closure)&c_732174,__lambda_69,  Cyc_eq(((closureN)self_731613)->elements[2], quote_open_91binary_91output_91file));}
;; 
}

static void __lambda_69(void *data, object self_731614, int argc, object *args) /* object self_731614, object r_73972 */
 {
 object r_73972 = args[0];
  if( (boolean_f != r_73972) ){ 
  
make_utf8_string_with_len(c_732177, "Cyc_io_open_binary_output_file", 30, 30);
return_direct_with_clo1(data,  ((closureN)self_731614)->elements[1], (((closure)  ((closureN)self_731614)->elements[1])->fn),  &c_732177);
} else { 
  
closureN_type c_732179;
object e_733242 [3];
c_732179.hdr.mark = gc_color_red;
 c_732179.hdr.grayed = 0;
c_732179.tag = closureN_tag;
 c_732179.fn = (function_type)__lambda_70;
c_732179.num_args = 1;
c_732179.num_elements = 3;
c_732179.elements = (object *)e_733242;
c_732179.elements[0] = ((closureN)self_731614)->elements[0];
c_732179.elements[1] = ((closureN)self_731614)->elements[1];
c_732179.elements[2] = ((closureN)self_731614)->elements[2];



return_direct_with_clo1(data,(closure)&c_732179,__lambda_70,  Cyc_eq(((closureN)self_731614)->elements[2], quote_close_91port));}
;; 
}

static void __lambda_70(void *data, object self_731615, int argc, object *args) /* object self_731615, object r_73973 */
 {
 object r_73973 = args[0];
  if( (boolean_f != r_73973) ){ 
  
make_utf8_string_with_len(c_732182, "Cyc_io_close_port", 17, 17);
return_direct_with_clo1(data,  ((closureN)self_731615)->elements[1], (((closure)  ((closureN)self_731615)->elements[1])->fn),  &c_732182);
} else { 
  
closureN_type c_732184;
object e_733238 [3];
c_732184.hdr.mark = gc_color_red;
 c_732184.hdr.grayed = 0;
c_732184.tag = closureN_tag;
 c_732184.fn = (function_type)__lambda_71;
c_732184.num_args = 1;
c_732184.num_elements = 3;
c_732184.elements = (object *)e_733238;
c_732184.elements[0] = ((closureN)self_731615)->elements[0];
c_732184.elements[1] = ((closureN)self_731615)->elements[1];
c_732184.elements[2] = ((closureN)self_731615)->elements[2];



return_direct_with_clo1(data,(closure)&c_732184,__lambda_71,  Cyc_eq(((closureN)self_731615)->elements[2], quote_close_91input_91port));}
;; 
}

static void __lambda_71(void *data, object self_731616, int argc, object *args) /* object self_731616, object r_73974 */
 {
 object r_73974 = args[0];
  if( (boolean_f != r_73974) ){ 
  
make_utf8_string_with_len(c_732187, "Cyc_io_close_input_port", 23, 23);
return_direct_with_clo1(data,  ((closureN)self_731616)->elements[1], (((closure)  ((closureN)self_731616)->elements[1])->fn),  &c_732187);
} else { 
  
closureN_type c_732189;
object e_733234 [3];
c_732189.hdr.mark = gc_color_red;
 c_732189.hdr.grayed = 0;
c_732189.tag = closureN_tag;
 c_732189.fn = (function_type)__lambda_72;
c_732189.num_args = 1;
c_732189.num_elements = 3;
c_732189.elements = (object *)e_733234;
c_732189.elements[0] = ((closureN)self_731616)->elements[0];
c_732189.elements[1] = ((closureN)self_731616)->elements[1];
c_732189.elements[2] = ((closureN)self_731616)->elements[2];



return_direct_with_clo1(data,(closure)&c_732189,__lambda_72,  Cyc_eq(((closureN)self_731616)->elements[2], quote_close_91output_91port));}
;; 
}

static void __lambda_72(void *data, object self_731617, int argc, object *args) /* object self_731617, object r_73975 */
 {
 object r_73975 = args[0];
  if( (boolean_f != r_73975) ){ 
  
make_utf8_string_with_len(c_732192, "Cyc_io_close_output_port", 24, 24);
return_direct_with_clo1(data,  ((closureN)self_731617)->elements[1], (((closure)  ((closureN)self_731617)->elements[1])->fn),  &c_732192);
} else { 
  
closureN_type c_732194;
object e_733230 [3];
c_732194.hdr.mark = gc_color_red;
 c_732194.hdr.grayed = 0;
c_732194.tag = closureN_tag;
 c_732194.fn = (function_type)__lambda_73;
c_732194.num_args = 1;
c_732194.num_elements = 3;
c_732194.elements = (object *)e_733230;
c_732194.elements[0] = ((closureN)self_731617)->elements[0];
c_732194.elements[1] = ((closureN)self_731617)->elements[1];
c_732194.elements[2] = ((closureN)self_731617)->elements[2];



return_direct_with_clo1(data,(closure)&c_732194,__lambda_73,  Cyc_eq(((closureN)self_731617)->elements[2], quote_Cyc_91flush_91output_91port));}
;; 
}

static void __lambda_73(void *data, object self_731618, int argc, object *args) /* object self_731618, object r_73976 */
 {
 object r_73976 = args[0];
  if( (boolean_f != r_73976) ){ 
  
make_utf8_string_with_len(c_732197, "Cyc_io_flush_output_port", 24, 24);
return_direct_with_clo1(data,  ((closureN)self_731618)->elements[1], (((closure)  ((closureN)self_731618)->elements[1])->fn),  &c_732197);
} else { 
  
closureN_type c_732199;
object e_733226 [3];
c_732199.hdr.mark = gc_color_red;
 c_732199.hdr.grayed = 0;
c_732199.tag = closureN_tag;
 c_732199.fn = (function_type)__lambda_74;
c_732199.num_args = 1;
c_732199.num_elements = 3;
c_732199.elements = (object *)e_733226;
c_732199.elements[0] = ((closureN)self_731618)->elements[0];
c_732199.elements[1] = ((closureN)self_731618)->elements[1];
c_732199.elements[2] = ((closureN)self_731618)->elements[2];



return_direct_with_clo1(data,(closure)&c_732199,__lambda_74,  Cyc_eq(((closureN)self_731618)->elements[2], quote_file_91exists_127));}
;; 
}

static void __lambda_74(void *data, object self_731619, int argc, object *args) /* object self_731619, object r_73977 */
 {
 object r_73977 = args[0];
  if( (boolean_f != r_73977) ){ 
  
make_utf8_string_with_len(c_732202, "Cyc_io_file_exists", 18, 18);
return_direct_with_clo1(data,  ((closureN)self_731619)->elements[1], (((closure)  ((closureN)self_731619)->elements[1])->fn),  &c_732202);
} else { 
  
closureN_type c_732204;
object e_733222 [3];
c_732204.hdr.mark = gc_color_red;
 c_732204.hdr.grayed = 0;
c_732204.tag = closureN_tag;
 c_732204.fn = (function_type)__lambda_75;
c_732204.num_args = 1;
c_732204.num_elements = 3;
c_732204.elements = (object *)e_733222;
c_732204.elements[0] = ((closureN)self_731619)->elements[0];
c_732204.elements[1] = ((closureN)self_731619)->elements[1];
c_732204.elements[2] = ((closureN)self_731619)->elements[2];



return_direct_with_clo1(data,(closure)&c_732204,__lambda_75,  Cyc_eq(((closureN)self_731619)->elements[2], quote_delete_91file));}
;; 
}

static void __lambda_75(void *data, object self_731620, int argc, object *args) /* object self_731620, object r_73978 */
 {
 object r_73978 = args[0];
  if( (boolean_f != r_73978) ){ 
  
make_utf8_string_with_len(c_732207, "Cyc_io_delete_file", 18, 18);
return_direct_with_clo1(data,  ((closureN)self_731620)->elements[1], (((closure)  ((closureN)self_731620)->elements[1])->fn),  &c_732207);
} else { 
  
closureN_type c_732209;
object e_733218 [3];
c_732209.hdr.mark = gc_color_red;
 c_732209.hdr.grayed = 0;
c_732209.tag = closureN_tag;
 c_732209.fn = (function_type)__lambda_76;
c_732209.num_args = 1;
c_732209.num_elements = 3;
c_732209.elements = (object *)e_733218;
c_732209.elements[0] = ((closureN)self_731620)->elements[0];
c_732209.elements[1] = ((closureN)self_731620)->elements[1];
c_732209.elements[2] = ((closureN)self_731620)->elements[2];



return_direct_with_clo1(data,(closure)&c_732209,__lambda_76,  Cyc_eq(((closureN)self_731620)->elements[2], quote_Cyc_91read_91char));}
;; 
}

static void __lambda_76(void *data, object self_731621, int argc, object *args) /* object self_731621, object r_73979 */
 {
 object r_73979 = args[0];
  if( (boolean_f != r_73979) ){ 
  
make_utf8_string_with_len(c_732212, "Cyc_io_read_char", 16, 16);
return_direct_with_clo1(data,  ((closureN)self_731621)->elements[1], (((closure)  ((closureN)self_731621)->elements[1])->fn),  &c_732212);
} else { 
  
closureN_type c_732214;
object e_733214 [3];
c_732214.hdr.mark = gc_color_red;
 c_732214.hdr.grayed = 0;
c_732214.tag = closureN_tag;
 c_732214.fn = (function_type)__lambda_77;
c_732214.num_args = 1;
c_732214.num_elements = 3;
c_732214.elements = (object *)e_733214;
c_732214.elements[0] = ((closureN)self_731621)->elements[0];
c_732214.elements[1] = ((closureN)self_731621)->elements[1];
c_732214.elements[2] = ((closureN)self_731621)->elements[2];



return_direct_with_clo1(data,(closure)&c_732214,__lambda_77,  Cyc_eq(((closureN)self_731621)->elements[2], quote_Cyc_91peek_91char));}
;; 
}

static void __lambda_77(void *data, object self_731622, int argc, object *args) /* object self_731622, object r_73980 */
 {
 object r_73980 = args[0];
  if( (boolean_f != r_73980) ){ 
  
make_utf8_string_with_len(c_732217, "Cyc_io_peek_char", 16, 16);
return_direct_with_clo1(data,  ((closureN)self_731622)->elements[1], (((closure)  ((closureN)self_731622)->elements[1])->fn),  &c_732217);
} else { 
  
closureN_type c_732219;
object e_733210 [3];
c_732219.hdr.mark = gc_color_red;
 c_732219.hdr.grayed = 0;
c_732219.tag = closureN_tag;
 c_732219.fn = (function_type)__lambda_78;
c_732219.num_args = 1;
c_732219.num_elements = 3;
c_732219.elements = (object *)e_733210;
c_732219.elements[0] = ((closureN)self_731622)->elements[0];
c_732219.elements[1] = ((closureN)self_731622)->elements[1];
c_732219.elements[2] = ((closureN)self_731622)->elements[2];



return_direct_with_clo1(data,(closure)&c_732219,__lambda_78,  Cyc_eq(((closureN)self_731622)->elements[2], quote_Cyc_91read_91line));}
;; 
}

static void __lambda_78(void *data, object self_731623, int argc, object *args) /* object self_731623, object r_73981 */
 {
 object r_73981 = args[0];
  if( (boolean_f != r_73981) ){ 
  
make_utf8_string_with_len(c_732222, "Cyc_io_read_line", 16, 16);
return_direct_with_clo1(data,  ((closureN)self_731623)->elements[1], (((closure)  ((closureN)self_731623)->elements[1])->fn),  &c_732222);
} else { 
  
closureN_type c_732224;
object e_733206 [3];
c_732224.hdr.mark = gc_color_red;
 c_732224.hdr.grayed = 0;
c_732224.tag = closureN_tag;
 c_732224.fn = (function_type)__lambda_79;
c_732224.num_args = 1;
c_732224.num_elements = 3;
c_732224.elements = (object *)e_733206;
c_732224.elements[0] = ((closureN)self_731623)->elements[0];
c_732224.elements[1] = ((closureN)self_731623)->elements[1];
c_732224.elements[2] = ((closureN)self_731623)->elements[2];



return_direct_with_clo1(data,(closure)&c_732224,__lambda_79,  Cyc_eq(((closureN)self_731623)->elements[2], quote_Cyc_91display));}
;; 
}

static void __lambda_79(void *data, object self_731624, int argc, object *args) /* object self_731624, object r_73982 */
 {
 object r_73982 = args[0];
  if( (boolean_f != r_73982) ){ 
  
make_utf8_string_with_len(c_732227, "Cyc_display_va", 14, 14);
return_direct_with_clo1(data,  ((closureN)self_731624)->elements[1], (((closure)  ((closureN)self_731624)->elements[1])->fn),  &c_732227);
} else { 
  
closureN_type c_732229;
object e_733202 [3];
c_732229.hdr.mark = gc_color_red;
 c_732229.hdr.grayed = 0;
c_732229.tag = closureN_tag;
 c_732229.fn = (function_type)__lambda_80;
c_732229.num_args = 1;
c_732229.num_elements = 3;
c_732229.elements = (object *)e_733202;
c_732229.elements[0] = ((closureN)self_731624)->elements[0];
c_732229.elements[1] = ((closureN)self_731624)->elements[1];
c_732229.elements[2] = ((closureN)self_731624)->elements[2];



return_direct_with_clo1(data,(closure)&c_732229,__lambda_80,  Cyc_eq(((closureN)self_731624)->elements[2], quote_Cyc_91write));}
;; 
}

static void __lambda_80(void *data, object self_731625, int argc, object *args) /* object self_731625, object r_73983 */
 {
 object r_73983 = args[0];
  if( (boolean_f != r_73983) ){ 
  
make_utf8_string_with_len(c_732232, "Cyc_write_va", 12, 12);
return_direct_with_clo1(data,  ((closureN)self_731625)->elements[1], (((closure)  ((closureN)self_731625)->elements[1])->fn),  &c_732232);
} else { 
  
closureN_type c_732234;
object e_733198 [3];
c_732234.hdr.mark = gc_color_red;
 c_732234.hdr.grayed = 0;
c_732234.tag = closureN_tag;
 c_732234.fn = (function_type)__lambda_81;
c_732234.num_args = 1;
c_732234.num_elements = 3;
c_732234.elements = (object *)e_733198;
c_732234.elements[0] = ((closureN)self_731625)->elements[0];
c_732234.elements[1] = ((closureN)self_731625)->elements[1];
c_732234.elements[2] = ((closureN)self_731625)->elements[2];



return_direct_with_clo1(data,(closure)&c_732234,__lambda_81,  Cyc_eq(((closureN)self_731625)->elements[2], quote_Cyc_91write_91char));}
;; 
}

static void __lambda_81(void *data, object self_731626, int argc, object *args) /* object self_731626, object r_73984 */
 {
 object r_73984 = args[0];
  if( (boolean_f != r_73984) ){ 
  
make_utf8_string_with_len(c_732237, "Cyc_write_char", 14, 14);
return_direct_with_clo1(data,  ((closureN)self_731626)->elements[1], (((closure)  ((closureN)self_731626)->elements[1])->fn),  &c_732237);
} else { 
  
closureN_type c_732239;
object e_733194 [3];
c_732239.hdr.mark = gc_color_red;
 c_732239.hdr.grayed = 0;
c_732239.tag = closureN_tag;
 c_732239.fn = (function_type)__lambda_82;
c_732239.num_args = 1;
c_732239.num_elements = 3;
c_732239.elements = (object *)e_733194;
c_732239.elements[0] = ((closureN)self_731626)->elements[0];
c_732239.elements[1] = ((closureN)self_731626)->elements[1];
c_732239.elements[2] = ((closureN)self_731626)->elements[2];



return_direct_with_clo1(data,(closure)&c_732239,__lambda_82,  Cyc_eq(((closureN)self_731626)->elements[2], quote_Cyc_91unsafe_91car));}
;; 
}

static void __lambda_82(void *data, object self_731627, int argc, object *args) /* object self_731627, object r_73985 */
 {
 object r_73985 = args[0];
  if( (boolean_f != r_73985) ){ 
  
make_utf8_string_with_len(c_732242, "car", 3, 3);
return_direct_with_clo1(data,  ((closureN)self_731627)->elements[1], (((closure)  ((closureN)self_731627)->elements[1])->fn),  &c_732242);
} else { 
  
closureN_type c_732244;
object e_733190 [3];
c_732244.hdr.mark = gc_color_red;
 c_732244.hdr.grayed = 0;
c_732244.tag = closureN_tag;
 c_732244.fn = (function_type)__lambda_83;
c_732244.num_args = 1;
c_732244.num_elements = 3;
c_732244.elements = (object *)e_733190;
c_732244.elements[0] = ((closureN)self_731627)->elements[0];
c_732244.elements[1] = ((closureN)self_731627)->elements[1];
c_732244.elements[2] = ((closureN)self_731627)->elements[2];



return_direct_with_clo1(data,(closure)&c_732244,__lambda_83,  Cyc_eq(((closureN)self_731627)->elements[2], quote_Cyc_91unsafe_91cdr));}
;; 
}

static void __lambda_83(void *data, object self_731628, int argc, object *args) /* object self_731628, object r_73986 */
 {
 object r_73986 = args[0];
  if( (boolean_f != r_73986) ){ 
  
make_utf8_string_with_len(c_732247, "cdr", 3, 3);
return_direct_with_clo1(data,  ((closureN)self_731628)->elements[1], (((closure)  ((closureN)self_731628)->elements[1])->fn),  &c_732247);
} else { 
  
closureN_type c_732249;
object e_733186 [3];
c_732249.hdr.mark = gc_color_red;
 c_732249.hdr.grayed = 0;
c_732249.tag = closureN_tag;
 c_732249.fn = (function_type)__lambda_84;
c_732249.num_args = 1;
c_732249.num_elements = 3;
c_732249.elements = (object *)e_733186;
c_732249.elements[0] = ((closureN)self_731628)->elements[0];
c_732249.elements[1] = ((closureN)self_731628)->elements[1];
c_732249.elements[2] = ((closureN)self_731628)->elements[2];



return_direct_with_clo1(data,(closure)&c_732249,__lambda_84,  Cyc_eq(((closureN)self_731628)->elements[2], quote_car));}
;; 
}

static void __lambda_84(void *data, object self_731629, int argc, object *args) /* object self_731629, object r_73987 */
 {
 object r_73987 = args[0];
  if( (boolean_f != r_73987) ){ 
  if( (boolean_f != ((closureN)self_731629)->elements[0]) ){ 
  
make_utf8_string_with_len(c_732253, "Cyc_car_unsafe", 14, 14);
return_direct_with_clo1(data,  ((closureN)self_731629)->elements[1], (((closure)  ((closureN)self_731629)->elements[1])->fn),  &c_732253);
} else { 
  
make_utf8_string_with_len(c_732256, "Cyc_car", 7, 7);
return_direct_with_clo1(data,  ((closureN)self_731629)->elements[1], (((closure)  ((closureN)self_731629)->elements[1])->fn),  &c_732256);}
;
} else { 
  
closureN_type c_732258;
object e_733182 [3];
c_732258.hdr.mark = gc_color_red;
 c_732258.hdr.grayed = 0;
c_732258.tag = closureN_tag;
 c_732258.fn = (function_type)__lambda_85;
c_732258.num_args = 1;
c_732258.num_elements = 3;
c_732258.elements = (object *)e_733182;
c_732258.elements[0] = ((closureN)self_731629)->elements[0];
c_732258.elements[1] = ((closureN)self_731629)->elements[1];
c_732258.elements[2] = ((closureN)self_731629)->elements[2];



return_direct_with_clo1(data,(closure)&c_732258,__lambda_85,  Cyc_eq(((closureN)self_731629)->elements[2], quote_cdr));}
;; 
}

static void __lambda_85(void *data, object self_731630, int argc, object *args) /* object self_731630, object r_73988 */
 {
 object r_73988 = args[0];
  if( (boolean_f != r_73988) ){ 
  if( (boolean_f != ((closureN)self_731630)->elements[0]) ){ 
  
make_utf8_string_with_len(c_732262, "Cyc_cdr_unsafe", 14, 14);
return_direct_with_clo1(data,  ((closureN)self_731630)->elements[1], (((closure)  ((closureN)self_731630)->elements[1])->fn),  &c_732262);
} else { 
  
make_utf8_string_with_len(c_732265, "Cyc_cdr", 7, 7);
return_direct_with_clo1(data,  ((closureN)self_731630)->elements[1], (((closure)  ((closureN)self_731630)->elements[1])->fn),  &c_732265);}
;
} else { 
  
closureN_type c_732267;
object e_733178 [3];
c_732267.hdr.mark = gc_color_red;
 c_732267.hdr.grayed = 0;
c_732267.tag = closureN_tag;
 c_732267.fn = (function_type)__lambda_86;
c_732267.num_args = 1;
c_732267.num_elements = 3;
c_732267.elements = (object *)e_733178;
c_732267.elements[0] = ((closureN)self_731630)->elements[0];
c_732267.elements[1] = ((closureN)self_731630)->elements[1];
c_732267.elements[2] = ((closureN)self_731630)->elements[2];



return_direct_with_clo1(data,(closure)&c_732267,__lambda_86,  Cyc_eq(((closureN)self_731630)->elements[2], quote_caar));}
;; 
}

static void __lambda_86(void *data, object self_731631, int argc, object *args) /* object self_731631, object r_73989 */
 {
 object r_73989 = args[0];
  if( (boolean_f != r_73989) ){ 
  
make_utf8_string_with_len(c_732270, "Cyc_caar", 8, 8);
return_direct_with_clo1(data,  ((closureN)self_731631)->elements[1], (((closure)  ((closureN)self_731631)->elements[1])->fn),  &c_732270);
} else { 
  
closureN_type c_732272;
object e_733174 [3];
c_732272.hdr.mark = gc_color_red;
 c_732272.hdr.grayed = 0;
c_732272.tag = closureN_tag;
 c_732272.fn = (function_type)__lambda_87;
c_732272.num_args = 1;
c_732272.num_elements = 3;
c_732272.elements = (object *)e_733174;
c_732272.elements[0] = ((closureN)self_731631)->elements[0];
c_732272.elements[1] = ((closureN)self_731631)->elements[1];
c_732272.elements[2] = ((closureN)self_731631)->elements[2];



return_direct_with_clo1(data,(closure)&c_732272,__lambda_87,  Cyc_eq(((closureN)self_731631)->elements[2], quote_cadr));}
;; 
}

static void __lambda_87(void *data, object self_731632, int argc, object *args) /* object self_731632, object r_73990 */
 {
 object r_73990 = args[0];
  if( (boolean_f != r_73990) ){ 
  
make_utf8_string_with_len(c_732275, "Cyc_cadr", 8, 8);
return_direct_with_clo1(data,  ((closureN)self_731632)->elements[1], (((closure)  ((closureN)self_731632)->elements[1])->fn),  &c_732275);
} else { 
  
closureN_type c_732277;
object e_733170 [3];
c_732277.hdr.mark = gc_color_red;
 c_732277.hdr.grayed = 0;
c_732277.tag = closureN_tag;
 c_732277.fn = (function_type)__lambda_88;
c_732277.num_args = 1;
c_732277.num_elements = 3;
c_732277.elements = (object *)e_733170;
c_732277.elements[0] = ((closureN)self_731632)->elements[0];
c_732277.elements[1] = ((closureN)self_731632)->elements[1];
c_732277.elements[2] = ((closureN)self_731632)->elements[2];



return_direct_with_clo1(data,(closure)&c_732277,__lambda_88,  Cyc_eq(((closureN)self_731632)->elements[2], quote_cdar));}
;; 
}

static void __lambda_88(void *data, object self_731633, int argc, object *args) /* object self_731633, object r_73991 */
 {
 object r_73991 = args[0];
  if( (boolean_f != r_73991) ){ 
  
make_utf8_string_with_len(c_732280, "Cyc_cdar", 8, 8);
return_direct_with_clo1(data,  ((closureN)self_731633)->elements[1], (((closure)  ((closureN)self_731633)->elements[1])->fn),  &c_732280);
} else { 
  
closureN_type c_732282;
object e_733166 [3];
c_732282.hdr.mark = gc_color_red;
 c_732282.hdr.grayed = 0;
c_732282.tag = closureN_tag;
 c_732282.fn = (function_type)__lambda_89;
c_732282.num_args = 1;
c_732282.num_elements = 3;
c_732282.elements = (object *)e_733166;
c_732282.elements[0] = ((closureN)self_731633)->elements[0];
c_732282.elements[1] = ((closureN)self_731633)->elements[1];
c_732282.elements[2] = ((closureN)self_731633)->elements[2];



return_direct_with_clo1(data,(closure)&c_732282,__lambda_89,  Cyc_eq(((closureN)self_731633)->elements[2], quote_cddr));}
;; 
}

static void __lambda_89(void *data, object self_731634, int argc, object *args) /* object self_731634, object r_73992 */
 {
 object r_73992 = args[0];
  if( (boolean_f != r_73992) ){ 
  
make_utf8_string_with_len(c_732285, "Cyc_cddr", 8, 8);
return_direct_with_clo1(data,  ((closureN)self_731634)->elements[1], (((closure)  ((closureN)self_731634)->elements[1])->fn),  &c_732285);
} else { 
  
closureN_type c_732287;
object e_733162 [3];
c_732287.hdr.mark = gc_color_red;
 c_732287.hdr.grayed = 0;
c_732287.tag = closureN_tag;
 c_732287.fn = (function_type)__lambda_90;
c_732287.num_args = 1;
c_732287.num_elements = 3;
c_732287.elements = (object *)e_733162;
c_732287.elements[0] = ((closureN)self_731634)->elements[0];
c_732287.elements[1] = ((closureN)self_731634)->elements[1];
c_732287.elements[2] = ((closureN)self_731634)->elements[2];



return_direct_with_clo1(data,(closure)&c_732287,__lambda_90,  Cyc_eq(((closureN)self_731634)->elements[2], quote_caaar));}
;; 
}

static void __lambda_90(void *data, object self_731635, int argc, object *args) /* object self_731635, object r_73993 */
 {
 object r_73993 = args[0];
  if( (boolean_f != r_73993) ){ 
  
make_utf8_string_with_len(c_732290, "Cyc_caaar", 9, 9);
return_direct_with_clo1(data,  ((closureN)self_731635)->elements[1], (((closure)  ((closureN)self_731635)->elements[1])->fn),  &c_732290);
} else { 
  
closureN_type c_732292;
object e_733158 [3];
c_732292.hdr.mark = gc_color_red;
 c_732292.hdr.grayed = 0;
c_732292.tag = closureN_tag;
 c_732292.fn = (function_type)__lambda_91;
c_732292.num_args = 1;
c_732292.num_elements = 3;
c_732292.elements = (object *)e_733158;
c_732292.elements[0] = ((closureN)self_731635)->elements[0];
c_732292.elements[1] = ((closureN)self_731635)->elements[1];
c_732292.elements[2] = ((closureN)self_731635)->elements[2];



return_direct_with_clo1(data,(closure)&c_732292,__lambda_91,  Cyc_eq(((closureN)self_731635)->elements[2], quote_caadr));}
;; 
}

static void __lambda_91(void *data, object self_731636, int argc, object *args) /* object self_731636, object r_73994 */
 {
 object r_73994 = args[0];
  if( (boolean_f != r_73994) ){ 
  
make_utf8_string_with_len(c_732295, "Cyc_caadr", 9, 9);
return_direct_with_clo1(data,  ((closureN)self_731636)->elements[1], (((closure)  ((closureN)self_731636)->elements[1])->fn),  &c_732295);
} else { 
  
closureN_type c_732297;
object e_733154 [3];
c_732297.hdr.mark = gc_color_red;
 c_732297.hdr.grayed = 0;
c_732297.tag = closureN_tag;
 c_732297.fn = (function_type)__lambda_92;
c_732297.num_args = 1;
c_732297.num_elements = 3;
c_732297.elements = (object *)e_733154;
c_732297.elements[0] = ((closureN)self_731636)->elements[0];
c_732297.elements[1] = ((closureN)self_731636)->elements[1];
c_732297.elements[2] = ((closureN)self_731636)->elements[2];



return_direct_with_clo1(data,(closure)&c_732297,__lambda_92,  Cyc_eq(((closureN)self_731636)->elements[2], quote_cadar));}
;; 
}

static void __lambda_92(void *data, object self_731637, int argc, object *args) /* object self_731637, object r_73995 */
 {
 object r_73995 = args[0];
  if( (boolean_f != r_73995) ){ 
  
make_utf8_string_with_len(c_732300, "Cyc_cadar", 9, 9);
return_direct_with_clo1(data,  ((closureN)self_731637)->elements[1], (((closure)  ((closureN)self_731637)->elements[1])->fn),  &c_732300);
} else { 
  
closureN_type c_732302;
object e_733150 [3];
c_732302.hdr.mark = gc_color_red;
 c_732302.hdr.grayed = 0;
c_732302.tag = closureN_tag;
 c_732302.fn = (function_type)__lambda_93;
c_732302.num_args = 1;
c_732302.num_elements = 3;
c_732302.elements = (object *)e_733150;
c_732302.elements[0] = ((closureN)self_731637)->elements[0];
c_732302.elements[1] = ((closureN)self_731637)->elements[1];
c_732302.elements[2] = ((closureN)self_731637)->elements[2];



return_direct_with_clo1(data,(closure)&c_732302,__lambda_93,  Cyc_eq(((closureN)self_731637)->elements[2], quote_caddr));}
;; 
}

static void __lambda_93(void *data, object self_731638, int argc, object *args) /* object self_731638, object r_73996 */
 {
 object r_73996 = args[0];
  if( (boolean_f != r_73996) ){ 
  
make_utf8_string_with_len(c_732305, "Cyc_caddr", 9, 9);
return_direct_with_clo1(data,  ((closureN)self_731638)->elements[1], (((closure)  ((closureN)self_731638)->elements[1])->fn),  &c_732305);
} else { 
  
closureN_type c_732307;
object e_733146 [3];
c_732307.hdr.mark = gc_color_red;
 c_732307.hdr.grayed = 0;
c_732307.tag = closureN_tag;
 c_732307.fn = (function_type)__lambda_94;
c_732307.num_args = 1;
c_732307.num_elements = 3;
c_732307.elements = (object *)e_733146;
c_732307.elements[0] = ((closureN)self_731638)->elements[0];
c_732307.elements[1] = ((closureN)self_731638)->elements[1];
c_732307.elements[2] = ((closureN)self_731638)->elements[2];



return_direct_with_clo1(data,(closure)&c_732307,__lambda_94,  Cyc_eq(((closureN)self_731638)->elements[2], quote_cdaar));}
;; 
}

static void __lambda_94(void *data, object self_731639, int argc, object *args) /* object self_731639, object r_73997 */
 {
 object r_73997 = args[0];
  if( (boolean_f != r_73997) ){ 
  
make_utf8_string_with_len(c_732310, "Cyc_cdaar", 9, 9);
return_direct_with_clo1(data,  ((closureN)self_731639)->elements[1], (((closure)  ((closureN)self_731639)->elements[1])->fn),  &c_732310);
} else { 
  
closureN_type c_732312;
object e_733142 [3];
c_732312.hdr.mark = gc_color_red;
 c_732312.hdr.grayed = 0;
c_732312.tag = closureN_tag;
 c_732312.fn = (function_type)__lambda_95;
c_732312.num_args = 1;
c_732312.num_elements = 3;
c_732312.elements = (object *)e_733142;
c_732312.elements[0] = ((closureN)self_731639)->elements[0];
c_732312.elements[1] = ((closureN)self_731639)->elements[1];
c_732312.elements[2] = ((closureN)self_731639)->elements[2];



return_direct_with_clo1(data,(closure)&c_732312,__lambda_95,  Cyc_eq(((closureN)self_731639)->elements[2], quote_cdadr));}
;; 
}

static void __lambda_95(void *data, object self_731640, int argc, object *args) /* object self_731640, object r_73998 */
 {
 object r_73998 = args[0];
  if( (boolean_f != r_73998) ){ 
  
make_utf8_string_with_len(c_732315, "Cyc_cdadr", 9, 9);
return_direct_with_clo1(data,  ((closureN)self_731640)->elements[1], (((closure)  ((closureN)self_731640)->elements[1])->fn),  &c_732315);
} else { 
  
closureN_type c_732317;
object e_733138 [3];
c_732317.hdr.mark = gc_color_red;
 c_732317.hdr.grayed = 0;
c_732317.tag = closureN_tag;
 c_732317.fn = (function_type)__lambda_96;
c_732317.num_args = 1;
c_732317.num_elements = 3;
c_732317.elements = (object *)e_733138;
c_732317.elements[0] = ((closureN)self_731640)->elements[0];
c_732317.elements[1] = ((closureN)self_731640)->elements[1];
c_732317.elements[2] = ((closureN)self_731640)->elements[2];



return_direct_with_clo1(data,(closure)&c_732317,__lambda_96,  Cyc_eq(((closureN)self_731640)->elements[2], quote_cddar));}
;; 
}

static void __lambda_96(void *data, object self_731641, int argc, object *args) /* object self_731641, object r_73999 */
 {
 object r_73999 = args[0];
  if( (boolean_f != r_73999) ){ 
  
make_utf8_string_with_len(c_732320, "Cyc_cddar", 9, 9);
return_direct_with_clo1(data,  ((closureN)self_731641)->elements[1], (((closure)  ((closureN)self_731641)->elements[1])->fn),  &c_732320);
} else { 
  
closureN_type c_732322;
object e_733134 [3];
c_732322.hdr.mark = gc_color_red;
 c_732322.hdr.grayed = 0;
c_732322.tag = closureN_tag;
 c_732322.fn = (function_type)__lambda_97;
c_732322.num_args = 1;
c_732322.num_elements = 3;
c_732322.elements = (object *)e_733134;
c_732322.elements[0] = ((closureN)self_731641)->elements[0];
c_732322.elements[1] = ((closureN)self_731641)->elements[1];
c_732322.elements[2] = ((closureN)self_731641)->elements[2];



return_direct_with_clo1(data,(closure)&c_732322,__lambda_97,  Cyc_eq(((closureN)self_731641)->elements[2], quote_cdddr));}
;; 
}

static void __lambda_97(void *data, object self_731642, int argc, object *args) /* object self_731642, object r_731000 */
 {
 object r_731000 = args[0];
  if( (boolean_f != r_731000) ){ 
  
make_utf8_string_with_len(c_732325, "Cyc_cdddr", 9, 9);
return_direct_with_clo1(data,  ((closureN)self_731642)->elements[1], (((closure)  ((closureN)self_731642)->elements[1])->fn),  &c_732325);
} else { 
  
closureN_type c_732327;
object e_733130 [3];
c_732327.hdr.mark = gc_color_red;
 c_732327.hdr.grayed = 0;
c_732327.tag = closureN_tag;
 c_732327.fn = (function_type)__lambda_98;
c_732327.num_args = 1;
c_732327.num_elements = 3;
c_732327.elements = (object *)e_733130;
c_732327.elements[0] = ((closureN)self_731642)->elements[0];
c_732327.elements[1] = ((closureN)self_731642)->elements[1];
c_732327.elements[2] = ((closureN)self_731642)->elements[2];



return_direct_with_clo1(data,(closure)&c_732327,__lambda_98,  Cyc_eq(((closureN)self_731642)->elements[2], quote_caaaar));}
;; 
}

static void __lambda_98(void *data, object self_731643, int argc, object *args) /* object self_731643, object r_731001 */
 {
 object r_731001 = args[0];
  if( (boolean_f != r_731001) ){ 
  
make_utf8_string_with_len(c_732330, "Cyc_caaaar", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731643)->elements[1], (((closure)  ((closureN)self_731643)->elements[1])->fn),  &c_732330);
} else { 
  
closureN_type c_732332;
object e_733126 [3];
c_732332.hdr.mark = gc_color_red;
 c_732332.hdr.grayed = 0;
c_732332.tag = closureN_tag;
 c_732332.fn = (function_type)__lambda_99;
c_732332.num_args = 1;
c_732332.num_elements = 3;
c_732332.elements = (object *)e_733126;
c_732332.elements[0] = ((closureN)self_731643)->elements[0];
c_732332.elements[1] = ((closureN)self_731643)->elements[1];
c_732332.elements[2] = ((closureN)self_731643)->elements[2];



return_direct_with_clo1(data,(closure)&c_732332,__lambda_99,  Cyc_eq(((closureN)self_731643)->elements[2], quote_caaadr));}
;; 
}

static void __lambda_99(void *data, object self_731644, int argc, object *args) /* object self_731644, object r_731002 */
 {
 object r_731002 = args[0];
  if( (boolean_f != r_731002) ){ 
  
make_utf8_string_with_len(c_732335, "Cyc_caaadr", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731644)->elements[1], (((closure)  ((closureN)self_731644)->elements[1])->fn),  &c_732335);
} else { 
  
closureN_type c_732337;
object e_733122 [3];
c_732337.hdr.mark = gc_color_red;
 c_732337.hdr.grayed = 0;
c_732337.tag = closureN_tag;
 c_732337.fn = (function_type)__lambda_100;
c_732337.num_args = 1;
c_732337.num_elements = 3;
c_732337.elements = (object *)e_733122;
c_732337.elements[0] = ((closureN)self_731644)->elements[0];
c_732337.elements[1] = ((closureN)self_731644)->elements[1];
c_732337.elements[2] = ((closureN)self_731644)->elements[2];



return_direct_with_clo1(data,(closure)&c_732337,__lambda_100,  Cyc_eq(((closureN)self_731644)->elements[2], quote_caadar));}
;; 
}

static void __lambda_100(void *data, object self_731645, int argc, object *args) /* object self_731645, object r_731003 */
 {
 object r_731003 = args[0];
  if( (boolean_f != r_731003) ){ 
  
make_utf8_string_with_len(c_732340, "Cyc_caadar", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731645)->elements[1], (((closure)  ((closureN)self_731645)->elements[1])->fn),  &c_732340);
} else { 
  
closureN_type c_732342;
object e_733118 [3];
c_732342.hdr.mark = gc_color_red;
 c_732342.hdr.grayed = 0;
c_732342.tag = closureN_tag;
 c_732342.fn = (function_type)__lambda_101;
c_732342.num_args = 1;
c_732342.num_elements = 3;
c_732342.elements = (object *)e_733118;
c_732342.elements[0] = ((closureN)self_731645)->elements[0];
c_732342.elements[1] = ((closureN)self_731645)->elements[1];
c_732342.elements[2] = ((closureN)self_731645)->elements[2];



return_direct_with_clo1(data,(closure)&c_732342,__lambda_101,  Cyc_eq(((closureN)self_731645)->elements[2], quote_caaddr));}
;; 
}

static void __lambda_101(void *data, object self_731646, int argc, object *args) /* object self_731646, object r_731004 */
 {
 object r_731004 = args[0];
  if( (boolean_f != r_731004) ){ 
  
make_utf8_string_with_len(c_732345, "Cyc_caaddr", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731646)->elements[1], (((closure)  ((closureN)self_731646)->elements[1])->fn),  &c_732345);
} else { 
  
closureN_type c_732347;
object e_733114 [3];
c_732347.hdr.mark = gc_color_red;
 c_732347.hdr.grayed = 0;
c_732347.tag = closureN_tag;
 c_732347.fn = (function_type)__lambda_102;
c_732347.num_args = 1;
c_732347.num_elements = 3;
c_732347.elements = (object *)e_733114;
c_732347.elements[0] = ((closureN)self_731646)->elements[0];
c_732347.elements[1] = ((closureN)self_731646)->elements[1];
c_732347.elements[2] = ((closureN)self_731646)->elements[2];



return_direct_with_clo1(data,(closure)&c_732347,__lambda_102,  Cyc_eq(((closureN)self_731646)->elements[2], quote_cadaar));}
;; 
}

static void __lambda_102(void *data, object self_731647, int argc, object *args) /* object self_731647, object r_731005 */
 {
 object r_731005 = args[0];
  if( (boolean_f != r_731005) ){ 
  
make_utf8_string_with_len(c_732350, "Cyc_cadaar", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731647)->elements[1], (((closure)  ((closureN)self_731647)->elements[1])->fn),  &c_732350);
} else { 
  
closureN_type c_732352;
object e_733110 [3];
c_732352.hdr.mark = gc_color_red;
 c_732352.hdr.grayed = 0;
c_732352.tag = closureN_tag;
 c_732352.fn = (function_type)__lambda_103;
c_732352.num_args = 1;
c_732352.num_elements = 3;
c_732352.elements = (object *)e_733110;
c_732352.elements[0] = ((closureN)self_731647)->elements[0];
c_732352.elements[1] = ((closureN)self_731647)->elements[1];
c_732352.elements[2] = ((closureN)self_731647)->elements[2];



return_direct_with_clo1(data,(closure)&c_732352,__lambda_103,  Cyc_eq(((closureN)self_731647)->elements[2], quote_cadadr));}
;; 
}

static void __lambda_103(void *data, object self_731648, int argc, object *args) /* object self_731648, object r_731006 */
 {
 object r_731006 = args[0];
  if( (boolean_f != r_731006) ){ 
  
make_utf8_string_with_len(c_732355, "Cyc_cadadr", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731648)->elements[1], (((closure)  ((closureN)self_731648)->elements[1])->fn),  &c_732355);
} else { 
  
closureN_type c_732357;
object e_733106 [3];
c_732357.hdr.mark = gc_color_red;
 c_732357.hdr.grayed = 0;
c_732357.tag = closureN_tag;
 c_732357.fn = (function_type)__lambda_104;
c_732357.num_args = 1;
c_732357.num_elements = 3;
c_732357.elements = (object *)e_733106;
c_732357.elements[0] = ((closureN)self_731648)->elements[0];
c_732357.elements[1] = ((closureN)self_731648)->elements[1];
c_732357.elements[2] = ((closureN)self_731648)->elements[2];



return_direct_with_clo1(data,(closure)&c_732357,__lambda_104,  Cyc_eq(((closureN)self_731648)->elements[2], quote_caddar));}
;; 
}

static void __lambda_104(void *data, object self_731649, int argc, object *args) /* object self_731649, object r_731007 */
 {
 object r_731007 = args[0];
  if( (boolean_f != r_731007) ){ 
  
make_utf8_string_with_len(c_732360, "Cyc_caddar", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731649)->elements[1], (((closure)  ((closureN)self_731649)->elements[1])->fn),  &c_732360);
} else { 
  
closureN_type c_732362;
object e_733102 [3];
c_732362.hdr.mark = gc_color_red;
 c_732362.hdr.grayed = 0;
c_732362.tag = closureN_tag;
 c_732362.fn = (function_type)__lambda_105;
c_732362.num_args = 1;
c_732362.num_elements = 3;
c_732362.elements = (object *)e_733102;
c_732362.elements[0] = ((closureN)self_731649)->elements[0];
c_732362.elements[1] = ((closureN)self_731649)->elements[1];
c_732362.elements[2] = ((closureN)self_731649)->elements[2];



return_direct_with_clo1(data,(closure)&c_732362,__lambda_105,  Cyc_eq(((closureN)self_731649)->elements[2], quote_cadddr));}
;; 
}

static void __lambda_105(void *data, object self_731650, int argc, object *args) /* object self_731650, object r_731008 */
 {
 object r_731008 = args[0];
  if( (boolean_f != r_731008) ){ 
  
make_utf8_string_with_len(c_732365, "Cyc_cadddr", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731650)->elements[1], (((closure)  ((closureN)self_731650)->elements[1])->fn),  &c_732365);
} else { 
  
closureN_type c_732367;
object e_733098 [3];
c_732367.hdr.mark = gc_color_red;
 c_732367.hdr.grayed = 0;
c_732367.tag = closureN_tag;
 c_732367.fn = (function_type)__lambda_106;
c_732367.num_args = 1;
c_732367.num_elements = 3;
c_732367.elements = (object *)e_733098;
c_732367.elements[0] = ((closureN)self_731650)->elements[0];
c_732367.elements[1] = ((closureN)self_731650)->elements[1];
c_732367.elements[2] = ((closureN)self_731650)->elements[2];



return_direct_with_clo1(data,(closure)&c_732367,__lambda_106,  Cyc_eq(((closureN)self_731650)->elements[2], quote_cdaaar));}
;; 
}

static void __lambda_106(void *data, object self_731651, int argc, object *args) /* object self_731651, object r_731009 */
 {
 object r_731009 = args[0];
  if( (boolean_f != r_731009) ){ 
  
make_utf8_string_with_len(c_732370, "Cyc_cdaaar", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731651)->elements[1], (((closure)  ((closureN)self_731651)->elements[1])->fn),  &c_732370);
} else { 
  
closureN_type c_732372;
object e_733094 [3];
c_732372.hdr.mark = gc_color_red;
 c_732372.hdr.grayed = 0;
c_732372.tag = closureN_tag;
 c_732372.fn = (function_type)__lambda_107;
c_732372.num_args = 1;
c_732372.num_elements = 3;
c_732372.elements = (object *)e_733094;
c_732372.elements[0] = ((closureN)self_731651)->elements[0];
c_732372.elements[1] = ((closureN)self_731651)->elements[1];
c_732372.elements[2] = ((closureN)self_731651)->elements[2];



return_direct_with_clo1(data,(closure)&c_732372,__lambda_107,  Cyc_eq(((closureN)self_731651)->elements[2], quote_cdaadr));}
;; 
}

static void __lambda_107(void *data, object self_731652, int argc, object *args) /* object self_731652, object r_731010 */
 {
 object r_731010 = args[0];
  if( (boolean_f != r_731010) ){ 
  
make_utf8_string_with_len(c_732375, "Cyc_cdaadr", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731652)->elements[1], (((closure)  ((closureN)self_731652)->elements[1])->fn),  &c_732375);
} else { 
  
closureN_type c_732377;
object e_733090 [3];
c_732377.hdr.mark = gc_color_red;
 c_732377.hdr.grayed = 0;
c_732377.tag = closureN_tag;
 c_732377.fn = (function_type)__lambda_108;
c_732377.num_args = 1;
c_732377.num_elements = 3;
c_732377.elements = (object *)e_733090;
c_732377.elements[0] = ((closureN)self_731652)->elements[0];
c_732377.elements[1] = ((closureN)self_731652)->elements[1];
c_732377.elements[2] = ((closureN)self_731652)->elements[2];



return_direct_with_clo1(data,(closure)&c_732377,__lambda_108,  Cyc_eq(((closureN)self_731652)->elements[2], quote_cdadar));}
;; 
}

static void __lambda_108(void *data, object self_731653, int argc, object *args) /* object self_731653, object r_731011 */
 {
 object r_731011 = args[0];
  if( (boolean_f != r_731011) ){ 
  
make_utf8_string_with_len(c_732380, "Cyc_cdadar", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731653)->elements[1], (((closure)  ((closureN)self_731653)->elements[1])->fn),  &c_732380);
} else { 
  
closureN_type c_732382;
object e_733086 [3];
c_732382.hdr.mark = gc_color_red;
 c_732382.hdr.grayed = 0;
c_732382.tag = closureN_tag;
 c_732382.fn = (function_type)__lambda_109;
c_732382.num_args = 1;
c_732382.num_elements = 3;
c_732382.elements = (object *)e_733086;
c_732382.elements[0] = ((closureN)self_731653)->elements[0];
c_732382.elements[1] = ((closureN)self_731653)->elements[1];
c_732382.elements[2] = ((closureN)self_731653)->elements[2];



return_direct_with_clo1(data,(closure)&c_732382,__lambda_109,  Cyc_eq(((closureN)self_731653)->elements[2], quote_cdaddr));}
;; 
}

static void __lambda_109(void *data, object self_731654, int argc, object *args) /* object self_731654, object r_731012 */
 {
 object r_731012 = args[0];
  if( (boolean_f != r_731012) ){ 
  
make_utf8_string_with_len(c_732385, "Cyc_cdaddr", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731654)->elements[1], (((closure)  ((closureN)self_731654)->elements[1])->fn),  &c_732385);
} else { 
  
closureN_type c_732387;
object e_733082 [3];
c_732387.hdr.mark = gc_color_red;
 c_732387.hdr.grayed = 0;
c_732387.tag = closureN_tag;
 c_732387.fn = (function_type)__lambda_110;
c_732387.num_args = 1;
c_732387.num_elements = 3;
c_732387.elements = (object *)e_733082;
c_732387.elements[0] = ((closureN)self_731654)->elements[0];
c_732387.elements[1] = ((closureN)self_731654)->elements[1];
c_732387.elements[2] = ((closureN)self_731654)->elements[2];



return_direct_with_clo1(data,(closure)&c_732387,__lambda_110,  Cyc_eq(((closureN)self_731654)->elements[2], quote_cddaar));}
;; 
}

static void __lambda_110(void *data, object self_731655, int argc, object *args) /* object self_731655, object r_731013 */
 {
 object r_731013 = args[0];
  if( (boolean_f != r_731013) ){ 
  
make_utf8_string_with_len(c_732390, "Cyc_cddaar", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731655)->elements[1], (((closure)  ((closureN)self_731655)->elements[1])->fn),  &c_732390);
} else { 
  
closureN_type c_732392;
object e_733078 [3];
c_732392.hdr.mark = gc_color_red;
 c_732392.hdr.grayed = 0;
c_732392.tag = closureN_tag;
 c_732392.fn = (function_type)__lambda_111;
c_732392.num_args = 1;
c_732392.num_elements = 3;
c_732392.elements = (object *)e_733078;
c_732392.elements[0] = ((closureN)self_731655)->elements[0];
c_732392.elements[1] = ((closureN)self_731655)->elements[1];
c_732392.elements[2] = ((closureN)self_731655)->elements[2];



return_direct_with_clo1(data,(closure)&c_732392,__lambda_111,  Cyc_eq(((closureN)self_731655)->elements[2], quote_cddadr));}
;; 
}

static void __lambda_111(void *data, object self_731656, int argc, object *args) /* object self_731656, object r_731014 */
 {
 object r_731014 = args[0];
  if( (boolean_f != r_731014) ){ 
  
make_utf8_string_with_len(c_732395, "Cyc_cddadr", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731656)->elements[1], (((closure)  ((closureN)self_731656)->elements[1])->fn),  &c_732395);
} else { 
  
closureN_type c_732397;
object e_733074 [3];
c_732397.hdr.mark = gc_color_red;
 c_732397.hdr.grayed = 0;
c_732397.tag = closureN_tag;
 c_732397.fn = (function_type)__lambda_112;
c_732397.num_args = 1;
c_732397.num_elements = 3;
c_732397.elements = (object *)e_733074;
c_732397.elements[0] = ((closureN)self_731656)->elements[0];
c_732397.elements[1] = ((closureN)self_731656)->elements[1];
c_732397.elements[2] = ((closureN)self_731656)->elements[2];



return_direct_with_clo1(data,(closure)&c_732397,__lambda_112,  Cyc_eq(((closureN)self_731656)->elements[2], quote_cdddar));}
;; 
}

static void __lambda_112(void *data, object self_731657, int argc, object *args) /* object self_731657, object r_731015 */
 {
 object r_731015 = args[0];
  if( (boolean_f != r_731015) ){ 
  
make_utf8_string_with_len(c_732400, "Cyc_cdddar", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731657)->elements[1], (((closure)  ((closureN)self_731657)->elements[1])->fn),  &c_732400);
} else { 
  
closureN_type c_732402;
object e_733070 [3];
c_732402.hdr.mark = gc_color_red;
 c_732402.hdr.grayed = 0;
c_732402.tag = closureN_tag;
 c_732402.fn = (function_type)__lambda_113;
c_732402.num_args = 1;
c_732402.num_elements = 3;
c_732402.elements = (object *)e_733070;
c_732402.elements[0] = ((closureN)self_731657)->elements[0];
c_732402.elements[1] = ((closureN)self_731657)->elements[1];
c_732402.elements[2] = ((closureN)self_731657)->elements[2];



return_direct_with_clo1(data,(closure)&c_732402,__lambda_113,  Cyc_eq(((closureN)self_731657)->elements[2], quote_cddddr));}
;; 
}

static void __lambda_113(void *data, object self_731658, int argc, object *args) /* object self_731658, object r_731016 */
 {
 object r_731016 = args[0];
  if( (boolean_f != r_731016) ){ 
  
make_utf8_string_with_len(c_732405, "Cyc_cddddr", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731658)->elements[1], (((closure)  ((closureN)self_731658)->elements[1])->fn),  &c_732405);
} else { 
  
closureN_type c_732407;
object e_733066 [3];
c_732407.hdr.mark = gc_color_red;
 c_732407.hdr.grayed = 0;
c_732407.tag = closureN_tag;
 c_732407.fn = (function_type)__lambda_114;
c_732407.num_args = 1;
c_732407.num_elements = 3;
c_732407.elements = (object *)e_733066;
c_732407.elements[0] = ((closureN)self_731658)->elements[0];
c_732407.elements[1] = ((closureN)self_731658)->elements[1];
c_732407.elements[2] = ((closureN)self_731658)->elements[2];



return_direct_with_clo1(data,(closure)&c_732407,__lambda_114,  Cyc_eq(((closureN)self_731658)->elements[2], quote_char_91_125integer));}
;; 
}

static void __lambda_114(void *data, object self_731659, int argc, object *args) /* object self_731659, object r_731017 */
 {
 object r_731017 = args[0];
  if( (boolean_f != r_731017) ){ 
  
make_utf8_string_with_len(c_732410, "Cyc_char2integer", 16, 16);
return_direct_with_clo1(data,  ((closureN)self_731659)->elements[1], (((closure)  ((closureN)self_731659)->elements[1])->fn),  &c_732410);
} else { 
  
closureN_type c_732412;
object e_733062 [3];
c_732412.hdr.mark = gc_color_red;
 c_732412.hdr.grayed = 0;
c_732412.tag = closureN_tag;
 c_732412.fn = (function_type)__lambda_115;
c_732412.num_args = 1;
c_732412.num_elements = 3;
c_732412.elements = (object *)e_733062;
c_732412.elements[0] = ((closureN)self_731659)->elements[0];
c_732412.elements[1] = ((closureN)self_731659)->elements[1];
c_732412.elements[2] = ((closureN)self_731659)->elements[2];



return_direct_with_clo1(data,(closure)&c_732412,__lambda_115,  Cyc_eq(((closureN)self_731659)->elements[2], quote_integer_91_125char));}
;; 
}

static void __lambda_115(void *data, object self_731660, int argc, object *args) /* object self_731660, object r_731018 */
 {
 object r_731018 = args[0];
  if( (boolean_f != r_731018) ){ 
  
make_utf8_string_with_len(c_732415, "Cyc_integer2char", 16, 16);
return_direct_with_clo1(data,  ((closureN)self_731660)->elements[1], (((closure)  ((closureN)self_731660)->elements[1])->fn),  &c_732415);
} else { 
  
closureN_type c_732417;
object e_733058 [3];
c_732417.hdr.mark = gc_color_red;
 c_732417.hdr.grayed = 0;
c_732417.tag = closureN_tag;
 c_732417.fn = (function_type)__lambda_116;
c_732417.num_args = 1;
c_732417.num_elements = 3;
c_732417.elements = (object *)e_733058;
c_732417.elements[0] = ((closureN)self_731660)->elements[0];
c_732417.elements[1] = ((closureN)self_731660)->elements[1];
c_732417.elements[2] = ((closureN)self_731660)->elements[2];



return_direct_with_clo1(data,(closure)&c_732417,__lambda_116,  Cyc_eq(((closureN)self_731660)->elements[2], quote_string_91_125number));}
;; 
}

static void __lambda_116(void *data, object self_731661, int argc, object *args) /* object self_731661, object r_731019 */
 {
 object r_731019 = args[0];
  if( (boolean_f != r_731019) ){ 
  
make_utf8_string_with_len(c_732420, "Cyc_string2number2_", 19, 19);
return_direct_with_clo1(data,  ((closureN)self_731661)->elements[1], (((closure)  ((closureN)self_731661)->elements[1])->fn),  &c_732420);
} else { 
  
closureN_type c_732422;
object e_733054 [3];
c_732422.hdr.mark = gc_color_red;
 c_732422.hdr.grayed = 0;
c_732422.tag = closureN_tag;
 c_732422.fn = (function_type)__lambda_117;
c_732422.num_args = 1;
c_732422.num_elements = 3;
c_732422.elements = (object *)e_733054;
c_732422.elements[0] = ((closureN)self_731661)->elements[0];
c_732422.elements[1] = ((closureN)self_731661)->elements[1];
c_732422.elements[2] = ((closureN)self_731661)->elements[2];



return_direct_with_clo1(data,(closure)&c_732422,__lambda_117,  Cyc_eq(((closureN)self_731661)->elements[2], quote_list_91_125string));}
;; 
}

static void __lambda_117(void *data, object self_731662, int argc, object *args) /* object self_731662, object r_731020 */
 {
 object r_731020 = args[0];
  if( (boolean_f != r_731020) ){ 
  
make_utf8_string_with_len(c_732425, "Cyc_list2string", 15, 15);
return_direct_with_clo1(data,  ((closureN)self_731662)->elements[1], (((closure)  ((closureN)self_731662)->elements[1])->fn),  &c_732425);
} else { 
  
closureN_type c_732427;
object e_733050 [3];
c_732427.hdr.mark = gc_color_red;
 c_732427.hdr.grayed = 0;
c_732427.tag = closureN_tag;
 c_732427.fn = (function_type)__lambda_118;
c_732427.num_args = 1;
c_732427.num_elements = 3;
c_732427.elements = (object *)e_733050;
c_732427.elements[0] = ((closureN)self_731662)->elements[0];
c_732427.elements[1] = ((closureN)self_731662)->elements[1];
c_732427.elements[2] = ((closureN)self_731662)->elements[2];



return_direct_with_clo1(data,(closure)&c_732427,__lambda_118,  Cyc_eq(((closureN)self_731662)->elements[2], quote_make_91bytevector));}
;; 
}

static void __lambda_118(void *data, object self_731663, int argc, object *args) /* object self_731663, object r_731021 */
 {
 object r_731021 = args[0];
  if( (boolean_f != r_731021) ){ 
  
make_utf8_string_with_len(c_732430, "Cyc_make_bytevector", 19, 19);
return_direct_with_clo1(data,  ((closureN)self_731663)->elements[1], (((closure)  ((closureN)self_731663)->elements[1])->fn),  &c_732430);
} else { 
  
closureN_type c_732432;
object e_733046 [3];
c_732432.hdr.mark = gc_color_red;
 c_732432.hdr.grayed = 0;
c_732432.tag = closureN_tag;
 c_732432.fn = (function_type)__lambda_119;
c_732432.num_args = 1;
c_732432.num_elements = 3;
c_732432.elements = (object *)e_733046;
c_732432.elements[0] = ((closureN)self_731663)->elements[0];
c_732432.elements[1] = ((closureN)self_731663)->elements[1];
c_732432.elements[2] = ((closureN)self_731663)->elements[2];



return_direct_with_clo1(data,(closure)&c_732432,__lambda_119,  Cyc_eq(((closureN)self_731663)->elements[2], quote_bytevector_91length));}
;; 
}

static void __lambda_119(void *data, object self_731664, int argc, object *args) /* object self_731664, object r_731022 */
 {
 object r_731022 = args[0];
  if( (boolean_f != r_731022) ){ 
  
make_utf8_string_with_len(c_732435, "Cyc_bytevector_length", 21, 21);
return_direct_with_clo1(data,  ((closureN)self_731664)->elements[1], (((closure)  ((closureN)self_731664)->elements[1])->fn),  &c_732435);
} else { 
  
closureN_type c_732437;
object e_733042 [3];
c_732437.hdr.mark = gc_color_red;
 c_732437.hdr.grayed = 0;
c_732437.tag = closureN_tag;
 c_732437.fn = (function_type)__lambda_120;
c_732437.num_args = 1;
c_732437.num_elements = 3;
c_732437.elements = (object *)e_733042;
c_732437.elements[0] = ((closureN)self_731664)->elements[0];
c_732437.elements[1] = ((closureN)self_731664)->elements[1];
c_732437.elements[2] = ((closureN)self_731664)->elements[2];



return_direct_with_clo1(data,(closure)&c_732437,__lambda_120,  Cyc_eq(((closureN)self_731664)->elements[2], quote_bytevector));}
;; 
}

static void __lambda_120(void *data, object self_731665, int argc, object *args) /* object self_731665, object r_731023 */
 {
 object r_731023 = args[0];
  if( (boolean_f != r_731023) ){ 
  
make_utf8_string_with_len(c_732440, "Cyc_bytevector", 14, 14);
return_direct_with_clo1(data,  ((closureN)self_731665)->elements[1], (((closure)  ((closureN)self_731665)->elements[1])->fn),  &c_732440);
} else { 
  
closureN_type c_732442;
object e_733038 [3];
c_732442.hdr.mark = gc_color_red;
 c_732442.hdr.grayed = 0;
c_732442.tag = closureN_tag;
 c_732442.fn = (function_type)__lambda_121;
c_732442.num_args = 1;
c_732442.num_elements = 3;
c_732442.elements = (object *)e_733038;
c_732442.elements[0] = ((closureN)self_731665)->elements[0];
c_732442.elements[1] = ((closureN)self_731665)->elements[1];
c_732442.elements[2] = ((closureN)self_731665)->elements[2];



return_direct_with_clo1(data,(closure)&c_732442,__lambda_121,  Cyc_eq(((closureN)self_731665)->elements[2], quote_bytevector_91append));}
;; 
}

static void __lambda_121(void *data, object self_731666, int argc, object *args) /* object self_731666, object r_731024 */
 {
 object r_731024 = args[0];
  if( (boolean_f != r_731024) ){ 
  
make_utf8_string_with_len(c_732445, "Cyc_bytevector_append", 21, 21);
return_direct_with_clo1(data,  ((closureN)self_731666)->elements[1], (((closure)  ((closureN)self_731666)->elements[1])->fn),  &c_732445);
} else { 
  
closureN_type c_732447;
object e_733034 [3];
c_732447.hdr.mark = gc_color_red;
 c_732447.hdr.grayed = 0;
c_732447.tag = closureN_tag;
 c_732447.fn = (function_type)__lambda_122;
c_732447.num_args = 1;
c_732447.num_elements = 3;
c_732447.elements = (object *)e_733034;
c_732447.elements[0] = ((closureN)self_731666)->elements[0];
c_732447.elements[1] = ((closureN)self_731666)->elements[1];
c_732447.elements[2] = ((closureN)self_731666)->elements[2];



return_direct_with_clo1(data,(closure)&c_732447,__lambda_122,  Cyc_eq(((closureN)self_731666)->elements[2], quote_Cyc_91bytevector_91copy));}
;; 
}

static void __lambda_122(void *data, object self_731667, int argc, object *args) /* object self_731667, object r_731025 */
 {
 object r_731025 = args[0];
  if( (boolean_f != r_731025) ){ 
  
make_utf8_string_with_len(c_732450, "Cyc_bytevector_copy", 19, 19);
return_direct_with_clo1(data,  ((closureN)self_731667)->elements[1], (((closure)  ((closureN)self_731667)->elements[1])->fn),  &c_732450);
} else { 
  
closureN_type c_732452;
object e_733030 [3];
c_732452.hdr.mark = gc_color_red;
 c_732452.hdr.grayed = 0;
c_732452.tag = closureN_tag;
 c_732452.fn = (function_type)__lambda_123;
c_732452.num_args = 1;
c_732452.num_elements = 3;
c_732452.elements = (object *)e_733030;
c_732452.elements[0] = ((closureN)self_731667)->elements[0];
c_732452.elements[1] = ((closureN)self_731667)->elements[1];
c_732452.elements[2] = ((closureN)self_731667)->elements[2];



return_direct_with_clo1(data,(closure)&c_732452,__lambda_123,  Cyc_eq(((closureN)self_731667)->elements[2], quote_Cyc_91utf8_91_125string));}
;; 
}

static void __lambda_123(void *data, object self_731668, int argc, object *args) /* object self_731668, object r_731026 */
 {
 object r_731026 = args[0];
  if( (boolean_f != r_731026) ){ 
  
make_utf8_string_with_len(c_732455, "Cyc_utf82string", 15, 15);
return_direct_with_clo1(data,  ((closureN)self_731668)->elements[1], (((closure)  ((closureN)self_731668)->elements[1])->fn),  &c_732455);
} else { 
  
closureN_type c_732457;
object e_733026 [3];
c_732457.hdr.mark = gc_color_red;
 c_732457.hdr.grayed = 0;
c_732457.tag = closureN_tag;
 c_732457.fn = (function_type)__lambda_124;
c_732457.num_args = 1;
c_732457.num_elements = 3;
c_732457.elements = (object *)e_733026;
c_732457.elements[0] = ((closureN)self_731668)->elements[0];
c_732457.elements[1] = ((closureN)self_731668)->elements[1];
c_732457.elements[2] = ((closureN)self_731668)->elements[2];



return_direct_with_clo1(data,(closure)&c_732457,__lambda_124,  Cyc_eq(((closureN)self_731668)->elements[2], quote_Cyc_91string_91_125utf8));}
;; 
}

static void __lambda_124(void *data, object self_731669, int argc, object *args) /* object self_731669, object r_731027 */
 {
 object r_731027 = args[0];
  if( (boolean_f != r_731027) ){ 
  
make_utf8_string_with_len(c_732460, "Cyc_string2utf8", 15, 15);
return_direct_with_clo1(data,  ((closureN)self_731669)->elements[1], (((closure)  ((closureN)self_731669)->elements[1])->fn),  &c_732460);
} else { 
  
closureN_type c_732462;
object e_733022 [3];
c_732462.hdr.mark = gc_color_red;
 c_732462.hdr.grayed = 0;
c_732462.tag = closureN_tag;
 c_732462.fn = (function_type)__lambda_125;
c_732462.num_args = 1;
c_732462.num_elements = 3;
c_732462.elements = (object *)e_733022;
c_732462.elements[0] = ((closureN)self_731669)->elements[0];
c_732462.elements[1] = ((closureN)self_731669)->elements[1];
c_732462.elements[2] = ((closureN)self_731669)->elements[2];



return_direct_with_clo1(data,(closure)&c_732462,__lambda_125,  Cyc_eq(((closureN)self_731669)->elements[2], quote_bytevector_91u8_91ref));}
;; 
}

static void __lambda_125(void *data, object self_731670, int argc, object *args) /* object self_731670, object r_731028 */
 {
 object r_731028 = args[0];
  if( (boolean_f != r_731028) ){ 
  
make_utf8_string_with_len(c_732465, "Cyc_bytevector_u8_ref", 21, 21);
return_direct_with_clo1(data,  ((closureN)self_731670)->elements[1], (((closure)  ((closureN)self_731670)->elements[1])->fn),  &c_732465);
} else { 
  
closureN_type c_732467;
object e_733018 [3];
c_732467.hdr.mark = gc_color_red;
 c_732467.hdr.grayed = 0;
c_732467.tag = closureN_tag;
 c_732467.fn = (function_type)__lambda_126;
c_732467.num_args = 1;
c_732467.num_elements = 3;
c_732467.elements = (object *)e_733018;
c_732467.elements[0] = ((closureN)self_731670)->elements[0];
c_732467.elements[1] = ((closureN)self_731670)->elements[1];
c_732467.elements[2] = ((closureN)self_731670)->elements[2];



return_direct_with_clo1(data,(closure)&c_732467,__lambda_126,  Cyc_eq(((closureN)self_731670)->elements[2], quote_bytevector_91u8_91set_67));}
;; 
}

static void __lambda_126(void *data, object self_731671, int argc, object *args) /* object self_731671, object r_731029 */
 {
 object r_731029 = args[0];
  if( (boolean_f != r_731029) ){ 
  
make_utf8_string_with_len(c_732470, "Cyc_bytevector_u8_set", 21, 21);
return_direct_with_clo1(data,  ((closureN)self_731671)->elements[1], (((closure)  ((closureN)self_731671)->elements[1])->fn),  &c_732470);
} else { 
  
closureN_type c_732472;
object e_733014 [3];
c_732472.hdr.mark = gc_color_red;
 c_732472.hdr.grayed = 0;
c_732472.tag = closureN_tag;
 c_732472.fn = (function_type)__lambda_127;
c_732472.num_args = 1;
c_732472.num_elements = 3;
c_732472.elements = (object *)e_733014;
c_732472.elements[0] = ((closureN)self_731671)->elements[0];
c_732472.elements[1] = ((closureN)self_731671)->elements[1];
c_732472.elements[2] = ((closureN)self_731671)->elements[2];



return_direct_with_clo1(data,(closure)&c_732472,__lambda_127,  Cyc_eq(((closureN)self_731671)->elements[2], quote_make_91vector));}
;; 
}

static void __lambda_127(void *data, object self_731672, int argc, object *args) /* object self_731672, object r_731030 */
 {
 object r_731030 = args[0];
  if( (boolean_f != r_731030) ){ 
  
make_utf8_string_with_len(c_732475, "Cyc_make_vector", 15, 15);
return_direct_with_clo1(data,  ((closureN)self_731672)->elements[1], (((closure)  ((closureN)self_731672)->elements[1])->fn),  &c_732475);
} else { 
  
closureN_type c_732477;
object e_733010 [3];
c_732477.hdr.mark = gc_color_red;
 c_732477.hdr.grayed = 0;
c_732477.tag = closureN_tag;
 c_732477.fn = (function_type)__lambda_128;
c_732477.num_args = 1;
c_732477.num_elements = 3;
c_732477.elements = (object *)e_733010;
c_732477.elements[0] = ((closureN)self_731672)->elements[0];
c_732477.elements[1] = ((closureN)self_731672)->elements[1];
c_732477.elements[2] = ((closureN)self_731672)->elements[2];



return_direct_with_clo1(data,(closure)&c_732477,__lambda_128,  Cyc_eq(((closureN)self_731672)->elements[2], quote_list_91_125vector));}
;; 
}

static void __lambda_128(void *data, object self_731673, int argc, object *args) /* object self_731673, object r_731031 */
 {
 object r_731031 = args[0];
  if( (boolean_f != r_731031) ){ 
  
make_utf8_string_with_len(c_732480, "Cyc_list2vector", 15, 15);
return_direct_with_clo1(data,  ((closureN)self_731673)->elements[1], (((closure)  ((closureN)self_731673)->elements[1])->fn),  &c_732480);
} else { 
  
closureN_type c_732482;
object e_733006 [3];
c_732482.hdr.mark = gc_color_red;
 c_732482.hdr.grayed = 0;
c_732482.tag = closureN_tag;
 c_732482.fn = (function_type)__lambda_129;
c_732482.num_args = 1;
c_732482.num_elements = 3;
c_732482.elements = (object *)e_733006;
c_732482.elements[0] = ((closureN)self_731673)->elements[0];
c_732482.elements[1] = ((closureN)self_731673)->elements[1];
c_732482.elements[2] = ((closureN)self_731673)->elements[2];



return_direct_with_clo1(data,(closure)&c_732482,__lambda_129,  Cyc_eq(((closureN)self_731673)->elements[2], quote_vector_91length));}
;; 
}

static void __lambda_129(void *data, object self_731674, int argc, object *args) /* object self_731674, object r_731032 */
 {
 object r_731032 = args[0];
  if( (boolean_f != r_731032) ){ 
  
make_utf8_string_with_len(c_732485, "Cyc_vector_length", 17, 17);
return_direct_with_clo1(data,  ((closureN)self_731674)->elements[1], (((closure)  ((closureN)self_731674)->elements[1])->fn),  &c_732485);
} else { 
  
closureN_type c_732487;
object e_733002 [3];
c_732487.hdr.mark = gc_color_red;
 c_732487.hdr.grayed = 0;
c_732487.tag = closureN_tag;
 c_732487.fn = (function_type)__lambda_130;
c_732487.num_args = 1;
c_732487.num_elements = 3;
c_732487.elements = (object *)e_733002;
c_732487.elements[0] = ((closureN)self_731674)->elements[0];
c_732487.elements[1] = ((closureN)self_731674)->elements[1];
c_732487.elements[2] = ((closureN)self_731674)->elements[2];



return_direct_with_clo1(data,(closure)&c_732487,__lambda_130,  Cyc_eq(((closureN)self_731674)->elements[2], quote_vector_91ref));}
;; 
}

static void __lambda_130(void *data, object self_731675, int argc, object *args) /* object self_731675, object r_731033 */
 {
 object r_731033 = args[0];
  if( (boolean_f != r_731033) ){ 
  if( (boolean_f != ((closureN)self_731675)->elements[0]) ){ 
  
make_utf8_string_with_len(c_732491, "Cyc_vector_ref_unsafe", 21, 21);
return_direct_with_clo1(data,  ((closureN)self_731675)->elements[1], (((closure)  ((closureN)self_731675)->elements[1])->fn),  &c_732491);
} else { 
  
make_utf8_string_with_len(c_732494, "Cyc_vector_ref", 14, 14);
return_direct_with_clo1(data,  ((closureN)self_731675)->elements[1], (((closure)  ((closureN)self_731675)->elements[1])->fn),  &c_732494);}
;
} else { 
  
closureN_type c_732496;
object e_732998 [3];
c_732496.hdr.mark = gc_color_red;
 c_732496.hdr.grayed = 0;
c_732496.tag = closureN_tag;
 c_732496.fn = (function_type)__lambda_131;
c_732496.num_args = 1;
c_732496.num_elements = 3;
c_732496.elements = (object *)e_732998;
c_732496.elements[0] = ((closureN)self_731675)->elements[0];
c_732496.elements[1] = ((closureN)self_731675)->elements[1];
c_732496.elements[2] = ((closureN)self_731675)->elements[2];



return_direct_with_clo1(data,(closure)&c_732496,__lambda_131,  Cyc_eq(((closureN)self_731675)->elements[2], quote_vector_91set_67));}
;; 
}

static void __lambda_131(void *data, object self_731676, int argc, object *args) /* object self_731676, object r_731034 */
 {
 object r_731034 = args[0];
  if( (boolean_f != r_731034) ){ 
  if( (boolean_f != ((closureN)self_731676)->elements[0]) ){ 
  
make_utf8_string_with_len(c_732500, "Cyc_vector_set_unsafe_cps", 25, 25);
return_direct_with_clo1(data,  ((closureN)self_731676)->elements[1], (((closure)  ((closureN)self_731676)->elements[1])->fn),  &c_732500);
} else { 
  
make_utf8_string_with_len(c_732503, "Cyc_vector_set_cps", 18, 18);
return_direct_with_clo1(data,  ((closureN)self_731676)->elements[1], (((closure)  ((closureN)self_731676)->elements[1])->fn),  &c_732503);}
;
} else { 
  
closureN_type c_732505;
object e_732994 [3];
c_732505.hdr.mark = gc_color_red;
 c_732505.hdr.grayed = 0;
c_732505.tag = closureN_tag;
 c_732505.fn = (function_type)__lambda_132;
c_732505.num_args = 1;
c_732505.num_elements = 3;
c_732505.elements = (object *)e_732994;
c_732505.elements[0] = ((closureN)self_731676)->elements[0];
c_732505.elements[1] = ((closureN)self_731676)->elements[1];
c_732505.elements[2] = ((closureN)self_731676)->elements[2];



return_direct_with_clo1(data,(closure)&c_732505,__lambda_132,  Cyc_eq(((closureN)self_731676)->elements[2], quote_string_91append));}
;; 
}

static void __lambda_132(void *data, object self_731677, int argc, object *args) /* object self_731677, object r_731035 */
 {
 object r_731035 = args[0];
  if( (boolean_f != r_731035) ){ 
  
make_utf8_string_with_len(c_732508, "Cyc_string_append", 17, 17);
return_direct_with_clo1(data,  ((closureN)self_731677)->elements[1], (((closure)  ((closureN)self_731677)->elements[1])->fn),  &c_732508);
} else { 
  
closureN_type c_732510;
object e_732990 [3];
c_732510.hdr.mark = gc_color_red;
 c_732510.hdr.grayed = 0;
c_732510.tag = closureN_tag;
 c_732510.fn = (function_type)__lambda_133;
c_732510.num_args = 1;
c_732510.num_elements = 3;
c_732510.elements = (object *)e_732990;
c_732510.elements[0] = ((closureN)self_731677)->elements[0];
c_732510.elements[1] = ((closureN)self_731677)->elements[1];
c_732510.elements[2] = ((closureN)self_731677)->elements[2];



return_direct_with_clo1(data,(closure)&c_732510,__lambda_133,  Cyc_eq(((closureN)self_731677)->elements[2], quote_string_91cmp));}
;; 
}

static void __lambda_133(void *data, object self_731678, int argc, object *args) /* object self_731678, object r_731036 */
 {
 object r_731036 = args[0];
  if( (boolean_f != r_731036) ){ 
  
make_utf8_string_with_len(c_732513, "Cyc_string_cmp", 14, 14);
return_direct_with_clo1(data,  ((closureN)self_731678)->elements[1], (((closure)  ((closureN)self_731678)->elements[1])->fn),  &c_732513);
} else { 
  
closureN_type c_732515;
object e_732986 [3];
c_732515.hdr.mark = gc_color_red;
 c_732515.hdr.grayed = 0;
c_732515.tag = closureN_tag;
 c_732515.fn = (function_type)__lambda_134;
c_732515.num_args = 1;
c_732515.num_elements = 3;
c_732515.elements = (object *)e_732986;
c_732515.elements[0] = ((closureN)self_731678)->elements[0];
c_732515.elements[1] = ((closureN)self_731678)->elements[1];
c_732515.elements[2] = ((closureN)self_731678)->elements[2];



return_direct_with_clo1(data,(closure)&c_732515,__lambda_134,  Cyc_eq(((closureN)self_731678)->elements[2], quote_string_91_125symbol));}
;; 
}

static void __lambda_134(void *data, object self_731679, int argc, object *args) /* object self_731679, object r_731037 */
 {
 object r_731037 = args[0];
  if( (boolean_f != r_731037) ){ 
  
make_utf8_string_with_len(c_732518, "Cyc_string2symbol", 17, 17);
return_direct_with_clo1(data,  ((closureN)self_731679)->elements[1], (((closure)  ((closureN)self_731679)->elements[1])->fn),  &c_732518);
} else { 
  
closureN_type c_732520;
object e_732982 [3];
c_732520.hdr.mark = gc_color_red;
 c_732520.hdr.grayed = 0;
c_732520.tag = closureN_tag;
 c_732520.fn = (function_type)__lambda_135;
c_732520.num_args = 1;
c_732520.num_elements = 3;
c_732520.elements = (object *)e_732982;
c_732520.elements[0] = ((closureN)self_731679)->elements[0];
c_732520.elements[1] = ((closureN)self_731679)->elements[1];
c_732520.elements[2] = ((closureN)self_731679)->elements[2];



return_direct_with_clo1(data,(closure)&c_732520,__lambda_135,  Cyc_eq(((closureN)self_731679)->elements[2], quote_symbol_91_125string));}
;; 
}

static void __lambda_135(void *data, object self_731680, int argc, object *args) /* object self_731680, object r_731038 */
 {
 object r_731038 = args[0];
  if( (boolean_f != r_731038) ){ 
  
make_utf8_string_with_len(c_732523, "Cyc_symbol2string", 17, 17);
return_direct_with_clo1(data,  ((closureN)self_731680)->elements[1], (((closure)  ((closureN)self_731680)->elements[1])->fn),  &c_732523);
} else { 
  
closureN_type c_732525;
object e_732978 [3];
c_732525.hdr.mark = gc_color_red;
 c_732525.hdr.grayed = 0;
c_732525.tag = closureN_tag;
 c_732525.fn = (function_type)__lambda_136;
c_732525.num_args = 1;
c_732525.num_elements = 3;
c_732525.elements = (object *)e_732978;
c_732525.elements[0] = ((closureN)self_731680)->elements[0];
c_732525.elements[1] = ((closureN)self_731680)->elements[1];
c_732525.elements[2] = ((closureN)self_731680)->elements[2];



return_direct_with_clo1(data,(closure)&c_732525,__lambda_136,  Cyc_eq(((closureN)self_731680)->elements[2], quote_number_91_125string));}
;; 
}

static void __lambda_136(void *data, object self_731681, int argc, object *args) /* object self_731681, object r_731039 */
 {
 object r_731039 = args[0];
  if( (boolean_f != r_731039) ){ 
  
make_utf8_string_with_len(c_732528, "Cyc_number2string2", 18, 18);
return_direct_with_clo1(data,  ((closureN)self_731681)->elements[1], (((closure)  ((closureN)self_731681)->elements[1])->fn),  &c_732528);
} else { 
  
closureN_type c_732530;
object e_732974 [3];
c_732530.hdr.mark = gc_color_red;
 c_732530.hdr.grayed = 0;
c_732530.tag = closureN_tag;
 c_732530.fn = (function_type)__lambda_137;
c_732530.num_args = 1;
c_732530.num_elements = 3;
c_732530.elements = (object *)e_732974;
c_732530.elements[0] = ((closureN)self_731681)->elements[0];
c_732530.elements[1] = ((closureN)self_731681)->elements[1];
c_732530.elements[2] = ((closureN)self_731681)->elements[2];



return_direct_with_clo1(data,(closure)&c_732530,__lambda_137,  Cyc_eq(((closureN)self_731681)->elements[2], quote_string_91length));}
;; 
}

static void __lambda_137(void *data, object self_731682, int argc, object *args) /* object self_731682, object r_731040 */
 {
 object r_731040 = args[0];
  if( (boolean_f != r_731040) ){ 
  
make_utf8_string_with_len(c_732533, "Cyc_string_length", 17, 17);
return_direct_with_clo1(data,  ((closureN)self_731682)->elements[1], (((closure)  ((closureN)self_731682)->elements[1])->fn),  &c_732533);
} else { 
  
closureN_type c_732535;
object e_732970 [3];
c_732535.hdr.mark = gc_color_red;
 c_732535.hdr.grayed = 0;
c_732535.tag = closureN_tag;
 c_732535.fn = (function_type)__lambda_138;
c_732535.num_args = 1;
c_732535.num_elements = 3;
c_732535.elements = (object *)e_732970;
c_732535.elements[0] = ((closureN)self_731682)->elements[0];
c_732535.elements[1] = ((closureN)self_731682)->elements[1];
c_732535.elements[2] = ((closureN)self_731682)->elements[2];



return_direct_with_clo1(data,(closure)&c_732535,__lambda_138,  Cyc_eq(((closureN)self_731682)->elements[2], quote_string_91ref));}
;; 
}

static void __lambda_138(void *data, object self_731683, int argc, object *args) /* object self_731683, object r_731041 */
 {
 object r_731041 = args[0];
  if( (boolean_f != r_731041) ){ 
  
make_utf8_string_with_len(c_732538, "Cyc_string_ref", 14, 14);
return_direct_with_clo1(data,  ((closureN)self_731683)->elements[1], (((closure)  ((closureN)self_731683)->elements[1])->fn),  &c_732538);
} else { 
  
closureN_type c_732540;
object e_732966 [3];
c_732540.hdr.mark = gc_color_red;
 c_732540.hdr.grayed = 0;
c_732540.tag = closureN_tag;
 c_732540.fn = (function_type)__lambda_139;
c_732540.num_args = 1;
c_732540.num_elements = 3;
c_732540.elements = (object *)e_732966;
c_732540.elements[0] = ((closureN)self_731683)->elements[0];
c_732540.elements[1] = ((closureN)self_731683)->elements[1];
c_732540.elements[2] = ((closureN)self_731683)->elements[2];



return_direct_with_clo1(data,(closure)&c_732540,__lambda_139,  Cyc_eq(((closureN)self_731683)->elements[2], quote_string_91set_67));}
;; 
}

static void __lambda_139(void *data, object self_731684, int argc, object *args) /* object self_731684, object r_731042 */
 {
 object r_731042 = args[0];
  if( (boolean_f != r_731042) ){ 
  
make_utf8_string_with_len(c_732543, "Cyc_string_set", 14, 14);
return_direct_with_clo1(data,  ((closureN)self_731684)->elements[1], (((closure)  ((closureN)self_731684)->elements[1])->fn),  &c_732543);
} else { 
  
closureN_type c_732545;
object e_732962 [3];
c_732545.hdr.mark = gc_color_red;
 c_732545.hdr.grayed = 0;
c_732545.tag = closureN_tag;
 c_732545.fn = (function_type)__lambda_140;
c_732545.num_args = 1;
c_732545.num_elements = 3;
c_732545.elements = (object *)e_732962;
c_732545.elements[0] = ((closureN)self_731684)->elements[0];
c_732545.elements[1] = ((closureN)self_731684)->elements[1];
c_732545.elements[2] = ((closureN)self_731684)->elements[2];



return_direct_with_clo1(data,(closure)&c_732545,__lambda_140,  Cyc_eq(((closureN)self_731684)->elements[2], quote_substring));}
;; 
}

static void __lambda_140(void *data, object self_731685, int argc, object *args) /* object self_731685, object r_731043 */
 {
 object r_731043 = args[0];
  if( (boolean_f != r_731043) ){ 
  
make_utf8_string_with_len(c_732548, "Cyc_substring", 13, 13);
return_direct_with_clo1(data,  ((closureN)self_731685)->elements[1], (((closure)  ((closureN)self_731685)->elements[1])->fn),  &c_732548);
} else { 
  
closureN_type c_732550;
object e_732958 [3];
c_732550.hdr.mark = gc_color_red;
 c_732550.hdr.grayed = 0;
c_732550.tag = closureN_tag;
 c_732550.fn = (function_type)__lambda_141;
c_732550.num_args = 1;
c_732550.num_elements = 3;
c_732550.elements = (object *)e_732958;
c_732550.elements[0] = ((closureN)self_731685)->elements[0];
c_732550.elements[1] = ((closureN)self_731685)->elements[1];
c_732550.elements[2] = ((closureN)self_731685)->elements[2];



return_direct_with_clo1(data,(closure)&c_732550,__lambda_141,  Cyc_eq(((closureN)self_731685)->elements[2], quote_Cyc_91installation_91dir));}
;; 
}

static void __lambda_141(void *data, object self_731686, int argc, object *args) /* object self_731686, object r_731044 */
 {
 object r_731044 = args[0];
  if( (boolean_f != r_731044) ){ 
  
make_utf8_string_with_len(c_732553, "Cyc_installation_dir", 20, 20);
return_direct_with_clo1(data,  ((closureN)self_731686)->elements[1], (((closure)  ((closureN)self_731686)->elements[1])->fn),  &c_732553);
} else { 
  
closureN_type c_732555;
object e_732954 [3];
c_732555.hdr.mark = gc_color_red;
 c_732555.hdr.grayed = 0;
c_732555.tag = closureN_tag;
 c_732555.fn = (function_type)__lambda_142;
c_732555.num_args = 1;
c_732555.num_elements = 3;
c_732555.elements = (object *)e_732954;
c_732555.elements[0] = ((closureN)self_731686)->elements[0];
c_732555.elements[1] = ((closureN)self_731686)->elements[1];
c_732555.elements[2] = ((closureN)self_731686)->elements[2];



return_direct_with_clo1(data,(closure)&c_732555,__lambda_142,  Cyc_eq(((closureN)self_731686)->elements[2], quote_Cyc_91compilation_91environment));}
;; 
}

static void __lambda_142(void *data, object self_731687, int argc, object *args) /* object self_731687, object r_731045 */
 {
 object r_731045 = args[0];
  if( (boolean_f != r_731045) ){ 
  
make_utf8_string_with_len(c_732558, "Cyc_compilation_environment", 27, 27);
return_direct_with_clo1(data,  ((closureN)self_731687)->elements[1], (((closure)  ((closureN)self_731687)->elements[1])->fn),  &c_732558);
} else { 
  
closureN_type c_732560;
object e_732950 [3];
c_732560.hdr.mark = gc_color_red;
 c_732560.hdr.grayed = 0;
c_732560.tag = closureN_tag;
 c_732560.fn = (function_type)__lambda_143;
c_732560.num_args = 1;
c_732560.num_elements = 3;
c_732560.elements = (object *)e_732950;
c_732560.elements[0] = ((closureN)self_731687)->elements[0];
c_732560.elements[1] = ((closureN)self_731687)->elements[1];
c_732560.elements[2] = ((closureN)self_731687)->elements[2];



return_direct_with_clo1(data,(closure)&c_732560,__lambda_143,  Cyc_eq(((closureN)self_731687)->elements[2], quote_command_91line_91arguments));}
;; 
}

static void __lambda_143(void *data, object self_731688, int argc, object *args) /* object self_731688, object r_731046 */
 {
 object r_731046 = args[0];
  if( (boolean_f != r_731046) ){ 
  
make_utf8_string_with_len(c_732563, "Cyc_command_line_arguments", 26, 26);
return_direct_with_clo1(data,  ((closureN)self_731688)->elements[1], (((closure)  ((closureN)self_731688)->elements[1])->fn),  &c_732563);
} else { 
  
closureN_type c_732565;
object e_732946 [3];
c_732565.hdr.mark = gc_color_red;
 c_732565.hdr.grayed = 0;
c_732565.tag = closureN_tag;
 c_732565.fn = (function_type)__lambda_144;
c_732565.num_args = 1;
c_732565.num_elements = 3;
c_732565.elements = (object *)e_732946;
c_732565.elements[0] = ((closureN)self_731688)->elements[0];
c_732565.elements[1] = ((closureN)self_731688)->elements[1];
c_732565.elements[2] = ((closureN)self_731688)->elements[2];



return_direct_with_clo1(data,(closure)&c_732565,__lambda_144,  Cyc_eq(((closureN)self_731688)->elements[2], quote_system));}
;; 
}

static void __lambda_144(void *data, object self_731689, int argc, object *args) /* object self_731689, object r_731047 */
 {
 object r_731047 = args[0];
  if( (boolean_f != r_731047) ){ 
  
make_utf8_string_with_len(c_732568, "Cyc_system", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731689)->elements[1], (((closure)  ((closureN)self_731689)->elements[1])->fn),  &c_732568);
} else { 
  
closureN_type c_732570;
object e_732942 [3];
c_732570.hdr.mark = gc_color_red;
 c_732570.hdr.grayed = 0;
c_732570.tag = closureN_tag;
 c_732570.fn = (function_type)__lambda_145;
c_732570.num_args = 1;
c_732570.num_elements = 3;
c_732570.elements = (object *)e_732942;
c_732570.elements[0] = ((closureN)self_731689)->elements[0];
c_732570.elements[1] = ((closureN)self_731689)->elements[1];
c_732570.elements[2] = ((closureN)self_731689)->elements[2];



return_direct_with_clo1(data,(closure)&c_732570,__lambda_145,  Cyc_eq(((closureN)self_731689)->elements[2], quote_length));}
;; 
}

static void __lambda_145(void *data, object self_731690, int argc, object *args) /* object self_731690, object r_731048 */
 {
 object r_731048 = args[0];
  if( (boolean_f != r_731048) ){ 
  if( (boolean_f != ((closureN)self_731690)->elements[0]) ){ 
  
make_utf8_string_with_len(c_732574, "Cyc_length_unsafe", 17, 17);
return_direct_with_clo1(data,  ((closureN)self_731690)->elements[1], (((closure)  ((closureN)self_731690)->elements[1])->fn),  &c_732574);
} else { 
  
make_utf8_string_with_len(c_732577, "Cyc_length", 10, 10);
return_direct_with_clo1(data,  ((closureN)self_731690)->elements[1], (((closure)  ((closureN)self_731690)->elements[1])->fn),  &c_732577);}
;
} else { 
  
closureN_type c_732579;
object e_732938 [2];
c_732579.hdr.mark = gc_color_red;
 c_732579.hdr.grayed = 0;
c_732579.tag = closureN_tag;
 c_732579.fn = (function_type)__lambda_146;
c_732579.num_args = 1;
c_732579.num_elements = 2;
c_732579.elements = (object *)e_732938;
c_732579.elements[0] = ((closureN)self_731690)->elements[1];
c_732579.elements[1] = ((closureN)self_731690)->elements[2];



return_direct_with_clo1(data,(closure)&c_732579,__lambda_146,  Cyc_eq(((closureN)self_731690)->elements[2], quote_set_91car_67));}
;; 
}

static void __lambda_146(void *data, object self_731691, int argc, object *args) /* object self_731691, object r_731049 */
 {
 object r_731049 = args[0];
  if( (boolean_f != r_731049) ){ 
  
make_utf8_string_with_len(c_732582, "Cyc_set_car_cps", 15, 15);
return_direct_with_clo1(data,  ((closureN)self_731691)->elements[0], (((closure)  ((closureN)self_731691)->elements[0])->fn),  &c_732582);
} else { 
  
closureN_type c_732584;
object e_732934 [2];
c_732584.hdr.mark = gc_color_red;
 c_732584.hdr.grayed = 0;
c_732584.tag = closureN_tag;
 c_732584.fn = (function_type)__lambda_147;
c_732584.num_args = 1;
c_732584.num_elements = 2;
c_732584.elements = (object *)e_732934;
c_732584.elements[0] = ((closureN)self_731691)->elements[0];
c_732584.elements[1] = ((closureN)self_731691)->elements[1];



return_direct_with_clo1(data,(closure)&c_732584,__lambda_147,  Cyc_eq(((closureN)self_731691)->elements[1], quote_set_91cdr_67));}
;; 
}

static void __lambda_147(void *data, object self_731692, int argc, object *args) /* object self_731692, object r_731050 */
 {
 object r_731050 = args[0];
  if( (boolean_f != r_731050) ){ 
  
make_utf8_string_with_len(c_732587, "Cyc_set_cdr_cps", 15, 15);
return_direct_with_clo1(data,  ((closureN)self_731692)->elements[0], (((closure)  ((closureN)self_731692)->elements[0])->fn),  &c_732587);
} else { 
  
closureN_type c_732589;
object e_732930 [2];
c_732589.hdr.mark = gc_color_red;
 c_732589.hdr.grayed = 0;
c_732589.tag = closureN_tag;
 c_732589.fn = (function_type)__lambda_148;
c_732589.num_args = 1;
c_732589.num_elements = 2;
c_732589.elements = (object *)e_732930;
c_732589.elements[0] = ((closureN)self_731692)->elements[0];
c_732589.elements[1] = ((closureN)self_731692)->elements[1];



return_direct_with_clo1(data,(closure)&c_732589,__lambda_148,  Cyc_eq(((closureN)self_731692)->elements[1], quote_eq_127));}
;; 
}

static void __lambda_148(void *data, object self_731693, int argc, object *args) /* object self_731693, object r_731051 */
 {
 object r_731051 = args[0];
  if( (boolean_f != r_731051) ){ 
  
make_utf8_string_with_len(c_732592, "Cyc_eq", 6, 6);
return_direct_with_clo1(data,  ((closureN)self_731693)->elements[0], (((closure)  ((closureN)self_731693)->elements[0])->fn),  &c_732592);
} else { 
  
closureN_type c_732594;
object e_732926 [2];
c_732594.hdr.mark = gc_color_red;
 c_732594.hdr.grayed = 0;
c_732594.tag = closureN_tag;
 c_732594.fn = (function_type)__lambda_149;
c_732594.num_args = 1;
c_732594.num_elements = 2;
c_732594.elements = (object *)e_732926;
c_732594.elements[0] = ((closureN)self_731693)->elements[0];
c_732594.elements[1] = ((closureN)self_731693)->elements[1];



return_direct_with_clo1(data,(closure)&c_732594,__lambda_149,  Cyc_eq(((closureN)self_731693)->elements[1], quote_eqv_127));}
;; 
}

static void __lambda_149(void *data, object self_731694, int argc, object *args) /* object self_731694, object r_731052 */
 {
 object r_731052 = args[0];
  if( (boolean_f != r_731052) ){ 
  
make_utf8_string_with_len(c_732597, "Cyc_eqv", 7, 7);
return_direct_with_clo1(data,  ((closureN)self_731694)->elements[0], (((closure)  ((closureN)self_731694)->elements[0])->fn),  &c_732597);
} else { 
  
closureN_type c_732599;
object e_732922 [2];
c_732599.hdr.mark = gc_color_red;
 c_732599.hdr.grayed = 0;
c_732599.tag = closureN_tag;
 c_732599.fn = (function_type)__lambda_150;
c_732599.num_args = 1;
c_732599.num_elements = 2;
c_732599.elements = (object *)e_732922;
c_732599.elements[0] = ((closureN)self_731694)->elements[0];
c_732599.elements[1] = ((closureN)self_731694)->elements[1];



return_direct_with_clo1(data,(closure)&c_732599,__lambda_150,  Cyc_eq(((closureN)self_731694)->elements[1], quote_equal_127));}
;; 
}

static void __lambda_150(void *data, object self_731695, int argc, object *args) /* object self_731695, object r_731053 */
 {
 object r_731053 = args[0];
  if( (boolean_f != r_731053) ){ 
  
make_utf8_string_with_len(c_732602, "equalp", 6, 6);
return_direct_with_clo1(data,  ((closureN)self_731695)->elements[0], (((closure)  ((closureN)self_731695)->elements[0])->fn),  &c_732602);
} else { 
  
closureN_type c_732604;
object e_732918 [2];
c_732604.hdr.mark = gc_color_red;
 c_732604.hdr.grayed = 0;
c_732604.tag = closureN_tag;
 c_732604.fn = (function_type)__lambda_151;
c_732604.num_args = 1;
c_732604.num_elements = 2;
c_732604.elements = (object *)e_732918;
c_732604.elements[0] = ((closureN)self_731695)->elements[0];
c_732604.elements[1] = ((closureN)self_731695)->elements[1];



return_direct_with_clo1(data,(closure)&c_732604,__lambda_151,  Cyc_eq(((closureN)self_731695)->elements[1], quote_Cyc_91fast_91member));}
;; 
}

static void __lambda_151(void *data, object self_731696, int argc, object *args) /* object self_731696, object r_731054 */
 {
 object r_731054 = args[0];
  if( (boolean_f != r_731054) ){ 
  
make_utf8_string_with_len(c_732607, "memberp", 7, 7);
return_direct_with_clo1(data,  ((closureN)self_731696)->elements[0], (((closure)  ((closureN)self_731696)->elements[0])->fn),  &c_732607);
} else { 
  
closureN_type c_732609;
object e_732914 [2];
c_732609.hdr.mark = gc_color_red;
 c_732609.hdr.grayed = 0;
c_732609.tag = closureN_tag;
 c_732609.fn = (function_type)__lambda_152;
c_732609.num_args = 1;
c_732609.num_elements = 2;
c_732609.elements = (object *)e_732914;
c_732609.elements[0] = ((closureN)self_731696)->elements[0];
c_732609.elements[1] = ((closureN)self_731696)->elements[1];



return_direct_with_clo1(data,(closure)&c_732609,__lambda_152,  Cyc_eq(((closureN)self_731696)->elements[1], quote_Cyc_91fast_91assoc));}
;; 
}

static void __lambda_152(void *data, object self_731697, int argc, object *args) /* object self_731697, object r_731055 */
 {
 object r_731055 = args[0];
  if( (boolean_f != r_731055) ){ 
  
make_utf8_string_with_len(c_732612, "assoc", 5, 5);
return_direct_with_clo1(data,  ((closureN)self_731697)->elements[0], (((closure)  ((closureN)self_731697)->elements[0])->fn),  &c_732612);
} else { 
  
closureN_type c_732614;
object e_732910 [2];
c_732614.hdr.mark = gc_color_red;
 c_732614.hdr.grayed = 0;
c_732614.tag = closureN_tag;
 c_732614.fn = (function_type)__lambda_153;
c_732614.num_args = 1;
c_732614.num_elements = 2;
c_732614.elements = (object *)e_732910;
c_732614.elements[0] = ((closureN)self_731697)->elements[0];
c_732614.elements[1] = ((closureN)self_731697)->elements[1];



return_direct_with_clo1(data,(closure)&c_732614,__lambda_153,  Cyc_eq(((closureN)self_731697)->elements[1], quote_assq));}
;; 
}

static void __lambda_153(void *data, object self_731698, int argc, object *args) /* object self_731698, object r_731056 */
 {
 object r_731056 = args[0];
  if( (boolean_f != r_731056) ){ 
  
make_utf8_string_with_len(c_732617, "assq", 4, 4);
return_direct_with_clo1(data,  ((closureN)self_731698)->elements[0], (((closure)  ((closureN)self_731698)->elements[0])->fn),  &c_732617);
} else { 
  
closureN_type c_732619;
object e_732906 [2];
c_732619.hdr.mark = gc_color_red;
 c_732619.hdr.grayed = 0;
c_732619.tag = closureN_tag;
 c_732619.fn = (function_type)__lambda_154;
c_732619.num_args = 1;
c_732619.num_elements = 2;
c_732619.elements = (object *)e_732906;
c_732619.elements[0] = ((closureN)self_731698)->elements[0];
c_732619.elements[1] = ((closureN)self_731698)->elements[1];



return_direct_with_clo1(data,(closure)&c_732619,__lambda_154,  Cyc_eq(((closureN)self_731698)->elements[1], quote_assv));}
;; 
}

static void __lambda_154(void *data, object self_731699, int argc, object *args) /* object self_731699, object r_731057 */
 {
 object r_731057 = args[0];
  if( (boolean_f != r_731057) ){ 
  
make_utf8_string_with_len(c_732622, "assv", 4, 4);
return_direct_with_clo1(data,  ((closureN)self_731699)->elements[0], (((closure)  ((closureN)self_731699)->elements[0])->fn),  &c_732622);
} else { 
  
closureN_type c_732624;
object e_732902 [2];
c_732624.hdr.mark = gc_color_red;
 c_732624.hdr.grayed = 0;
c_732624.tag = closureN_tag;
 c_732624.fn = (function_type)__lambda_155;
c_732624.num_args = 1;
c_732624.num_elements = 2;
c_732624.elements = (object *)e_732902;
c_732624.elements[0] = ((closureN)self_731699)->elements[0];
c_732624.elements[1] = ((closureN)self_731699)->elements[1];



return_direct_with_clo1(data,(closure)&c_732624,__lambda_155,  Cyc_eq(((closureN)self_731699)->elements[1], quote_memq));}
;; 
}

static void __lambda_155(void *data, object self_731700, int argc, object *args) /* object self_731700, object r_731058 */
 {
 object r_731058 = args[0];
  if( (boolean_f != r_731058) ){ 
  
make_utf8_string_with_len(c_732627, "memqp", 5, 5);
return_direct_with_clo1(data,  ((closureN)self_731700)->elements[0], (((closure)  ((closureN)self_731700)->elements[0])->fn),  &c_732627);
} else { 
  
closureN_type c_732629;
object e_732898 [2];
c_732629.hdr.mark = gc_color_red;
 c_732629.hdr.grayed = 0;
c_732629.tag = closureN_tag;
 c_732629.fn = (function_type)__lambda_156;
c_732629.num_args = 1;
c_732629.num_elements = 2;
c_732629.elements = (object *)e_732898;
c_732629.elements[0] = ((closureN)self_731700)->elements[0];
c_732629.elements[1] = ((closureN)self_731700)->elements[1];



return_direct_with_clo1(data,(closure)&c_732629,__lambda_156,  Cyc_eq(((closureN)self_731700)->elements[1], quote_memv));}
;; 
}

static void __lambda_156(void *data, object self_731701, int argc, object *args) /* object self_731701, object r_731059 */
 {
 object r_731059 = args[0];
  if( (boolean_f != r_731059) ){ 
  
make_utf8_string_with_len(c_732632, "memvp", 5, 5);
return_direct_with_clo1(data,  ((closureN)self_731701)->elements[0], (((closure)  ((closureN)self_731701)->elements[0])->fn),  &c_732632);
} else { 
  
closureN_type c_732634;
object e_732894 [2];
c_732634.hdr.mark = gc_color_red;
 c_732634.hdr.grayed = 0;
c_732634.tag = closureN_tag;
 c_732634.fn = (function_type)__lambda_157;
c_732634.num_args = 1;
c_732634.num_elements = 2;
c_732634.elements = (object *)e_732894;
c_732634.elements[0] = ((closureN)self_731701)->elements[0];
c_732634.elements[1] = ((closureN)self_731701)->elements[1];



return_direct_with_clo1(data,(closure)&c_732634,__lambda_157,  Cyc_eq(((closureN)self_731701)->elements[1], quote_boolean_127));}
;; 
}

static void __lambda_157(void *data, object self_731702, int argc, object *args) /* object self_731702, object r_731060 */
 {
 object r_731060 = args[0];
  if( (boolean_f != r_731060) ){ 
  
make_utf8_string_with_len(c_732637, "Cyc_is_boolean", 14, 14);
return_direct_with_clo1(data,  ((closureN)self_731702)->elements[0], (((closure)  ((closureN)self_731702)->elements[0])->fn),  &c_732637);
} else { 
  
closureN_type c_732639;
object e_732890 [2];
c_732639.hdr.mark = gc_color_red;
 c_732639.hdr.grayed = 0;
c_732639.tag = closureN_tag;
 c_732639.fn = (function_type)__lambda_158;
c_732639.num_args = 1;
c_732639.num_elements = 2;
c_732639.elements = (object *)e_732890;
c_732639.elements[0] = ((closureN)self_731702)->elements[0];
c_732639.elements[1] = ((closureN)self_731702)->elements[1];



return_direct_with_clo1(data,(closure)&c_732639,__lambda_158,  Cyc_eq(((closureN)self_731702)->elements[1], quote_char_127));}
;; 
}

static void __lambda_158(void *data, object self_731703, int argc, object *args) /* object self_731703, object r_731061 */
 {
 object r_731061 = args[0];
  if( (boolean_f != r_731061) ){ 
  
make_utf8_string_with_len(c_732642, "Cyc_is_char", 11, 11);
return_direct_with_clo1(data,  ((closureN)self_731703)->elements[0], (((closure)  ((closureN)self_731703)->elements[0])->fn),  &c_732642);
} else { 
  
closureN_type c_732644;
object e_732886 [2];
c_732644.hdr.mark = gc_color_red;
 c_732644.hdr.grayed = 0;
c_732644.tag = closureN_tag;
 c_732644.fn = (function_type)__lambda_159;
c_732644.num_args = 1;
c_732644.num_elements = 2;
c_732644.elements = (object *)e_732886;
c_732644.elements[0] = ((closureN)self_731703)->elements[0];
c_732644.elements[1] = ((closureN)self_731703)->elements[1];



return_direct_with_clo1(data,(closure)&c_732644,__lambda_159,  Cyc_eq(((closureN)self_731703)->elements[1], quote_null_127));}
;; 
}

static void __lambda_159(void *data, object self_731704, int argc, object *args) /* object self_731704, object r_731062 */
 {
 object r_731062 = args[0];
  if( (boolean_f != r_731062) ){ 
  
make_utf8_string_with_len(c_732647, "Cyc_is_null", 11, 11);
return_direct_with_clo1(data,  ((closureN)self_731704)->elements[0], (((closure)  ((closureN)self_731704)->elements[0])->fn),  &c_732647);
} else { 
  
closureN_type c_732649;
object e_732882 [2];
c_732649.hdr.mark = gc_color_red;
 c_732649.hdr.grayed = 0;
c_732649.tag = closureN_tag;
 c_732649.fn = (function_type)__lambda_160;
c_732649.num_args = 1;
c_732649.num_elements = 2;
c_732649.elements = (object *)e_732882;
c_732649.elements[0] = ((closureN)self_731704)->elements[0];
c_732649.elements[1] = ((closureN)self_731704)->elements[1];



return_direct_with_clo1(data,(closure)&c_732649,__lambda_160,  Cyc_eq(((closureN)self_731704)->elements[1], quote_number_127));}
;; 
}

static void __lambda_160(void *data, object self_731705, int argc, object *args) /* object self_731705, object r_731063 */
 {
 object r_731063 = args[0];
  if( (boolean_f != r_731063) ){ 
  
make_utf8_string_with_len(c_732652, "Cyc_is_number", 13, 13);
return_direct_with_clo1(data,  ((closureN)self_731705)->elements[0], (((closure)  ((closureN)self_731705)->elements[0])->fn),  &c_732652);
} else { 
  
closureN_type c_732654;
object e_732878 [2];
c_732654.hdr.mark = gc_color_red;
 c_732654.hdr.grayed = 0;
c_732654.tag = closureN_tag;
 c_732654.fn = (function_type)__lambda_161;
c_732654.num_args = 1;
c_732654.num_elements = 2;
c_732654.elements = (object *)e_732878;
c_732654.elements[0] = ((closureN)self_731705)->elements[0];
c_732654.elements[1] = ((closureN)self_731705)->elements[1];



return_direct_with_clo1(data,(closure)&c_732654,__lambda_161,  Cyc_eq(((closureN)self_731705)->elements[1], quote_real_127));}
;; 
}

static void __lambda_161(void *data, object self_731706, int argc, object *args) /* object self_731706, object r_731064 */
 {
 object r_731064 = args[0];
  if( (boolean_f != r_731064) ){ 
  
make_utf8_string_with_len(c_732657, "Cyc_is_real", 11, 11);
return_direct_with_clo1(data,  ((closureN)self_731706)->elements[0], (((closure)  ((closureN)self_731706)->elements[0])->fn),  &c_732657);
} else { 
  
closureN_type c_732659;
object e_732874 [2];
c_732659.hdr.mark = gc_color_red;
 c_732659.hdr.grayed = 0;
c_732659.tag = closureN_tag;
 c_732659.fn = (function_type)__lambda_162;
c_732659.num_args = 1;
c_732659.num_elements = 2;
c_732659.elements = (object *)e_732874;
c_732659.elements[0] = ((closureN)self_731706)->elements[0];
c_732659.elements[1] = ((closureN)self_731706)->elements[1];



return_direct_with_clo1(data,(closure)&c_732659,__lambda_162,  Cyc_eq(((closureN)self_731706)->elements[1], quote_integer_127));}
;; 
}

static void __lambda_162(void *data, object self_731707, int argc, object *args) /* object self_731707, object r_731065 */
 {
 object r_731065 = args[0];
  if( (boolean_f != r_731065) ){ 
  
make_utf8_string_with_len(c_732662, "Cyc_is_integer", 14, 14);
return_direct_with_clo1(data,  ((closureN)self_731707)->elements[0], (((closure)  ((closureN)self_731707)->elements[0])->fn),  &c_732662);
} else { 
  
closureN_type c_732664;
object e_732870 [2];
c_732664.hdr.mark = gc_color_red;
 c_732664.hdr.grayed = 0;
c_732664.tag = closureN_tag;
 c_732664.fn = (function_type)__lambda_163;
c_732664.num_args = 1;
c_732664.num_elements = 2;
c_732664.elements = (object *)e_732870;
c_732664.elements[0] = ((closureN)self_731707)->elements[0];
c_732664.elements[1] = ((closureN)self_731707)->elements[1];



return_direct_with_clo1(data,(closure)&c_732664,__lambda_163,  Cyc_eq(((closureN)self_731707)->elements[1], quote_pair_127));}
;; 
}

static void __lambda_163(void *data, object self_731708, int argc, object *args) /* object self_731708, object r_731066 */
 {
 object r_731066 = args[0];
  if( (boolean_f != r_731066) ){ 
  
make_utf8_string_with_len(c_732667, "Cyc_is_pair", 11, 11);
return_direct_with_clo1(data,  ((closureN)self_731708)->elements[0], (((closure)  ((closureN)self_731708)->elements[0])->fn),  &c_732667);
} else { 
  
closureN_type c_732669;
object e_732866 [2];
c_732669.hdr.mark = gc_color_red;
 c_732669.hdr.grayed = 0;
c_732669.tag = closureN_tag;
 c_732669.fn = (function_type)__lambda_164;
c_732669.num_args = 1;
c_732669.num_elements = 2;
c_732669.elements = (object *)e_732866;
c_732669.elements[0] = ((closureN)self_731708)->elements[0];
c_732669.elements[1] = ((closureN)self_731708)->elements[1];



return_direct_with_clo1(data,(closure)&c_732669,__lambda_164,  Cyc_eq(((closureN)self_731708)->elements[1], quote_procedure_127));}
;; 
}

static void __lambda_164(void *data, object self_731709, int argc, object *args) /* object self_731709, object r_731067 */
 {
 object r_731067 = args[0];
  if( (boolean_f != r_731067) ){ 
  
make_utf8_string_with_len(c_732672, "Cyc_is_procedure", 16, 16);
return_direct_with_clo1(data,  ((closureN)self_731709)->elements[0], (((closure)  ((closureN)self_731709)->elements[0])->fn),  &c_732672);
} else { 
  
closureN_type c_732674;
object e_732862 [2];
c_732674.hdr.mark = gc_color_red;
 c_732674.hdr.grayed = 0;
c_732674.tag = closureN_tag;
 c_732674.fn = (function_type)__lambda_165;
c_732674.num_args = 1;
c_732674.num_elements = 2;
c_732674.elements = (object *)e_732862;
c_732674.elements[0] = ((closureN)self_731709)->elements[0];
c_732674.elements[1] = ((closureN)self_731709)->elements[1];



return_direct_with_clo1(data,(closure)&c_732674,__lambda_165,  Cyc_eq(((closureN)self_731709)->elements[1], quote_Cyc_91macro_127));}
;; 
}

static void __lambda_165(void *data, object self_731710, int argc, object *args) /* object self_731710, object r_731068 */
 {
 object r_731068 = args[0];
  if( (boolean_f != r_731068) ){ 
  
make_utf8_string_with_len(c_732677, "Cyc_is_macro", 12, 12);
return_direct_with_clo1(data,  ((closureN)self_731710)->elements[0], (((closure)  ((closureN)self_731710)->elements[0])->fn),  &c_732677);
} else { 
  
closureN_type c_732679;
object e_732858 [2];
c_732679.hdr.mark = gc_color_red;
 c_732679.hdr.grayed = 0;
c_732679.tag = closureN_tag;
 c_732679.fn = (function_type)__lambda_166;
c_732679.num_args = 1;
c_732679.num_elements = 2;
c_732679.elements = (object *)e_732858;
c_732679.elements[0] = ((closureN)self_731710)->elements[0];
c_732679.elements[1] = ((closureN)self_731710)->elements[1];



return_direct_with_clo1(data,(closure)&c_732679,__lambda_166,  Cyc_eq(((closureN)self_731710)->elements[1], quote_port_127));}
;; 
}

static void __lambda_166(void *data, object self_731711, int argc, object *args) /* object self_731711, object r_731069 */
 {
 object r_731069 = args[0];
  if( (boolean_f != r_731069) ){ 
  
make_utf8_string_with_len(c_732682, "Cyc_is_port", 11, 11);
return_direct_with_clo1(data,  ((closureN)self_731711)->elements[0], (((closure)  ((closureN)self_731711)->elements[0])->fn),  &c_732682);
} else { 
  
closureN_type c_732684;
object e_732854 [2];
c_732684.hdr.mark = gc_color_red;
 c_732684.hdr.grayed = 0;
c_732684.tag = closureN_tag;
 c_732684.fn = (function_type)__lambda_167;
c_732684.num_args = 1;
c_732684.num_elements = 2;
c_732684.elements = (object *)e_732854;
c_732684.elements[0] = ((closureN)self_731711)->elements[0];
c_732684.elements[1] = ((closureN)self_731711)->elements[1];



return_direct_with_clo1(data,(closure)&c_732684,__lambda_167,  Cyc_eq(((closureN)self_731711)->elements[1], quote_vector_127));}
;; 
}

static void __lambda_167(void *data, object self_731712, int argc, object *args) /* object self_731712, object r_731070 */
 {
 object r_731070 = args[0];
  if( (boolean_f != r_731070) ){ 
  
make_utf8_string_with_len(c_732687, "Cyc_is_vector_not_record_type", 29, 29);
return_direct_with_clo1(data,  ((closureN)self_731712)->elements[0], (((closure)  ((closureN)self_731712)->elements[0])->fn),  &c_732687);
} else { 
  
closureN_type c_732689;
object e_732850 [2];
c_732689.hdr.mark = gc_color_red;
 c_732689.hdr.grayed = 0;
c_732689.tag = closureN_tag;
 c_732689.fn = (function_type)__lambda_168;
c_732689.num_args = 1;
c_732689.num_elements = 2;
c_732689.elements = (object *)e_732850;
c_732689.elements[0] = ((closureN)self_731712)->elements[0];
c_732689.elements[1] = ((closureN)self_731712)->elements[1];



return_direct_with_clo1(data,(closure)&c_732689,__lambda_168,  Cyc_eq(((closureN)self_731712)->elements[1], quote_bytevector_127));}
;; 
}

static void __lambda_168(void *data, object self_731713, int argc, object *args) /* object self_731713, object r_731071 */
 {
 object r_731071 = args[0];
  if( (boolean_f != r_731071) ){ 
  
make_utf8_string_with_len(c_732692, "Cyc_is_bytevector", 17, 17);
return_direct_with_clo1(data,  ((closureN)self_731713)->elements[0], (((closure)  ((closureN)self_731713)->elements[0])->fn),  &c_732692);
} else { 
  
closureN_type c_732694;
object e_732846 [2];
c_732694.hdr.mark = gc_color_red;
 c_732694.hdr.grayed = 0;
c_732694.tag = closureN_tag;
 c_732694.fn = (function_type)__lambda_169;
c_732694.num_args = 1;
c_732694.num_elements = 2;
c_732694.elements = (object *)e_732846;
c_732694.elements[0] = ((closureN)self_731713)->elements[0];
c_732694.elements[1] = ((closureN)self_731713)->elements[1];



return_direct_with_clo1(data,(closure)&c_732694,__lambda_169,  Cyc_eq(((closureN)self_731713)->elements[1], quote_string_127));}
;; 
}

static void __lambda_169(void *data, object self_731714, int argc, object *args) /* object self_731714, object r_731072 */
 {
 object r_731072 = args[0];
  if( (boolean_f != r_731072) ){ 
  
make_utf8_string_with_len(c_732697, "Cyc_is_string", 13, 13);
return_direct_with_clo1(data,  ((closureN)self_731714)->elements[0], (((closure)  ((closureN)self_731714)->elements[0])->fn),  &c_732697);
} else { 
  
closureN_type c_732699;
object e_732842 [2];
c_732699.hdr.mark = gc_color_red;
 c_732699.hdr.grayed = 0;
c_732699.tag = closureN_tag;
 c_732699.fn = (function_type)__lambda_170;
c_732699.num_args = 1;
c_732699.num_elements = 2;
c_732699.elements = (object *)e_732842;
c_732699.elements[0] = ((closureN)self_731714)->elements[0];
c_732699.elements[1] = ((closureN)self_731714)->elements[1];



return_direct_with_clo1(data,(closure)&c_732699,__lambda_170,  Cyc_eq(((closureN)self_731714)->elements[1], quote_eof_91object_127));}
;; 
}

static void __lambda_170(void *data, object self_731715, int argc, object *args) /* object self_731715, object r_731073 */
 {
 object r_731073 = args[0];
  if( (boolean_f != r_731073) ){ 
  
make_utf8_string_with_len(c_732702, "Cyc_is_eof_object", 17, 17);
return_direct_with_clo1(data,  ((closureN)self_731715)->elements[0], (((closure)  ((closureN)self_731715)->elements[0])->fn),  &c_732702);
} else { 
  
closureN_type c_732704;
object e_732838 [2];
c_732704.hdr.mark = gc_color_red;
 c_732704.hdr.grayed = 0;
c_732704.tag = closureN_tag;
 c_732704.fn = (function_type)__lambda_171;
c_732704.num_args = 1;
c_732704.num_elements = 2;
c_732704.elements = (object *)e_732838;
c_732704.elements[0] = ((closureN)self_731715)->elements[0];
c_732704.elements[1] = ((closureN)self_731715)->elements[1];



return_direct_with_clo1(data,(closure)&c_732704,__lambda_171,  Cyc_eq(((closureN)self_731715)->elements[1], quote_symbol_127));}
;; 
}

static void __lambda_171(void *data, object self_731716, int argc, object *args) /* object self_731716, object r_731074 */
 {
 object r_731074 = args[0];
  if( (boolean_f != r_731074) ){ 
  
make_utf8_string_with_len(c_732707, "Cyc_is_symbol", 13, 13);
return_direct_with_clo1(data,  ((closureN)self_731716)->elements[0], (((closure)  ((closureN)self_731716)->elements[0])->fn),  &c_732707);
} else { 
  
closureN_type c_732709;
object e_732834 [2];
c_732709.hdr.mark = gc_color_red;
 c_732709.hdr.grayed = 0;
c_732709.tag = closureN_tag;
 c_732709.fn = (function_type)__lambda_172;
c_732709.num_args = 1;
c_732709.num_elements = 2;
c_732709.elements = (object *)e_732834;
c_732709.elements[0] = ((closureN)self_731716)->elements[0];
c_732709.elements[1] = ((closureN)self_731716)->elements[1];



return_direct_with_clo1(data,(closure)&c_732709,__lambda_172,  Cyc_eq(((closureN)self_731716)->elements[1], quote_cons));}
;; 
}

static void __lambda_172(void *data, object self_731717, int argc, object *args) /* object self_731717, object r_731075 */
 {
 object r_731075 = args[0];
  if( (boolean_f != r_731075) ){ 
  
make_utf8_string_with_len(c_732712, "set_pair_as_expr", 16, 16);
return_direct_with_clo1(data,  ((closureN)self_731717)->elements[0], (((closure)  ((closureN)self_731717)->elements[0])->fn),  &c_732712);
} else { 
  
closureN_type c_732714;
object e_732830 [2];
c_732714.hdr.mark = gc_color_red;
 c_732714.hdr.grayed = 0;
c_732714.tag = closureN_tag;
 c_732714.fn = (function_type)__lambda_173;
c_732714.num_args = 1;
c_732714.num_elements = 2;
c_732714.elements = (object *)e_732830;
c_732714.elements[0] = ((closureN)self_731717)->elements[0];
c_732714.elements[1] = ((closureN)self_731717)->elements[1];



return_direct_with_clo1(data,(closure)&c_732714,__lambda_173,  Cyc_eq(((closureN)self_731717)->elements[1], quote_Cyc_91fast_91vector_912));}
;; 
}

static void __lambda_173(void *data, object self_731718, int argc, object *args) /* object self_731718, object r_731076 */
 {
 object r_731076 = args[0];
  if( (boolean_f != r_731076) ){ 
  
make_utf8_string_with_len(c_732717, "Cyc_fast_vector_2", 17, 17);
return_direct_with_clo1(data,  ((closureN)self_731718)->elements[0], (((closure)  ((closureN)self_731718)->elements[0])->fn),  &c_732717);
} else { 
  
closureN_type c_732719;
object e_732826 [2];
c_732719.hdr.mark = gc_color_red;
 c_732719.hdr.grayed = 0;
c_732719.tag = closureN_tag;
 c_732719.fn = (function_type)__lambda_174;
c_732719.num_args = 1;
c_732719.num_elements = 2;
c_732719.elements = (object *)e_732826;
c_732719.elements[0] = ((closureN)self_731718)->elements[0];
c_732719.elements[1] = ((closureN)self_731718)->elements[1];



return_direct_with_clo1(data,(closure)&c_732719,__lambda_174,  Cyc_eq(((closureN)self_731718)->elements[1], quote_Cyc_91fast_91vector_913));}
;; 
}

static void __lambda_174(void *data, object self_731719, int argc, object *args) /* object self_731719, object r_731077 */
 {
 object r_731077 = args[0];
  if( (boolean_f != r_731077) ){ 
  
make_utf8_string_with_len(c_732722, "Cyc_fast_vector_3", 17, 17);
return_direct_with_clo1(data,  ((closureN)self_731719)->elements[0], (((closure)  ((closureN)self_731719)->elements[0])->fn),  &c_732722);
} else { 
  
closureN_type c_732724;
object e_732822 [2];
c_732724.hdr.mark = gc_color_red;
 c_732724.hdr.grayed = 0;
c_732724.tag = closureN_tag;
 c_732724.fn = (function_type)__lambda_175;
c_732724.num_args = 1;
c_732724.num_elements = 2;
c_732724.elements = (object *)e_732822;
c_732724.elements[0] = ((closureN)self_731719)->elements[0];
c_732724.elements[1] = ((closureN)self_731719)->elements[1];



return_direct_with_clo1(data,(closure)&c_732724,__lambda_175,  Cyc_eq(((closureN)self_731719)->elements[1], quote_Cyc_91fast_91vector_914));}
;; 
}

static void __lambda_175(void *data, object self_731720, int argc, object *args) /* object self_731720, object r_731078 */
 {
 object r_731078 = args[0];
  if( (boolean_f != r_731078) ){ 
  
make_utf8_string_with_len(c_732727, "Cyc_fast_vector_4", 17, 17);
return_direct_with_clo1(data,  ((closureN)self_731720)->elements[0], (((closure)  ((closureN)self_731720)->elements[0])->fn),  &c_732727);
} else { 
  
closureN_type c_732729;
object e_732818 [2];
c_732729.hdr.mark = gc_color_red;
 c_732729.hdr.grayed = 0;
c_732729.tag = closureN_tag;
 c_732729.fn = (function_type)__lambda_176;
c_732729.num_args = 1;
c_732729.num_elements = 2;
c_732729.elements = (object *)e_732818;
c_732729.elements[0] = ((closureN)self_731720)->elements[0];
c_732729.elements[1] = ((closureN)self_731720)->elements[1];



return_direct_with_clo1(data,(closure)&c_732729,__lambda_176,  Cyc_eq(((closureN)self_731720)->elements[1], quote_Cyc_91fast_91vector_915));}
;; 
}

static void __lambda_176(void *data, object self_731721, int argc, object *args) /* object self_731721, object r_731079 */
 {
 object r_731079 = args[0];
  if( (boolean_f != r_731079) ){ 
  
make_utf8_string_with_len(c_732732, "Cyc_fast_vector_5", 17, 17);
return_direct_with_clo1(data,  ((closureN)self_731721)->elements[0], (((closure)  ((closureN)self_731721)->elements[0])->fn),  &c_732732);
} else { 
  
closureN_type c_732734;
object e_732814 [2];
c_732734.hdr.mark = gc_color_red;
 c_732734.hdr.grayed = 0;
c_732734.tag = closureN_tag;
 c_732734.fn = (function_type)__lambda_177;
c_732734.num_args = 1;
c_732734.num_elements = 2;
c_732734.elements = (object *)e_732814;
c_732734.elements[0] = ((closureN)self_731721)->elements[0];
c_732734.elements[1] = ((closureN)self_731721)->elements[1];



return_direct_with_clo1(data,(closure)&c_732734,__lambda_177,  Cyc_eq(((closureN)self_731721)->elements[1], quote_Cyc_91fast_91list_911));}
;; 
}

static void __lambda_177(void *data, object self_731722, int argc, object *args) /* object self_731722, object r_731080 */
 {
 object r_731080 = args[0];
  if( (boolean_f != r_731080) ){ 
  
make_utf8_string_with_len(c_732737, "set_cell_as_expr", 16, 16);
return_direct_with_clo1(data,  ((closureN)self_731722)->elements[0], (((closure)  ((closureN)self_731722)->elements[0])->fn),  &c_732737);
} else { 
  
closureN_type c_732739;
object e_732810 [2];
c_732739.hdr.mark = gc_color_red;
 c_732739.hdr.grayed = 0;
c_732739.tag = closureN_tag;
 c_732739.fn = (function_type)__lambda_178;
c_732739.num_args = 1;
c_732739.num_elements = 2;
c_732739.elements = (object *)e_732810;
c_732739.elements[0] = ((closureN)self_731722)->elements[0];
c_732739.elements[1] = ((closureN)self_731722)->elements[1];



return_direct_with_clo1(data,(closure)&c_732739,__lambda_178,  Cyc_eq(((closureN)self_731722)->elements[1], quote_Cyc_91fast_91list_912));}
;; 
}

static void __lambda_178(void *data, object self_731723, int argc, object *args) /* object self_731723, object r_731081 */
 {
 object r_731081 = args[0];
  if( (boolean_f != r_731081) ){ 
  
make_utf8_string_with_len(c_732742, "Cyc_fast_list_2", 15, 15);
return_direct_with_clo1(data,  ((closureN)self_731723)->elements[0], (((closure)  ((closureN)self_731723)->elements[0])->fn),  &c_732742);
} else { 
  
closureN_type c_732744;
object e_732806 [2];
c_732744.hdr.mark = gc_color_red;
 c_732744.hdr.grayed = 0;
c_732744.tag = closureN_tag;
 c_732744.fn = (function_type)__lambda_179;
c_732744.num_args = 1;
c_732744.num_elements = 2;
c_732744.elements = (object *)e_732806;
c_732744.elements[0] = ((closureN)self_731723)->elements[0];
c_732744.elements[1] = ((closureN)self_731723)->elements[1];



return_direct_with_clo1(data,(closure)&c_732744,__lambda_179,  Cyc_eq(((closureN)self_731723)->elements[1], quote_Cyc_91fast_91list_913));}
;; 
}

static void __lambda_179(void *data, object self_731724, int argc, object *args) /* object self_731724, object r_731082 */
 {
 object r_731082 = args[0];
  if( (boolean_f != r_731082) ){ 
  
make_utf8_string_with_len(c_732747, "Cyc_fast_list_3", 15, 15);
return_direct_with_clo1(data,  ((closureN)self_731724)->elements[0], (((closure)  ((closureN)self_731724)->elements[0])->fn),  &c_732747);
} else { 
  
closureN_type c_732749;
object e_732802 [2];
c_732749.hdr.mark = gc_color_red;
 c_732749.hdr.grayed = 0;
c_732749.tag = closureN_tag;
 c_732749.fn = (function_type)__lambda_180;
c_732749.num_args = 1;
c_732749.num_elements = 2;
c_732749.elements = (object *)e_732802;
c_732749.elements[0] = ((closureN)self_731724)->elements[0];
c_732749.elements[1] = ((closureN)self_731724)->elements[1];



return_direct_with_clo1(data,(closure)&c_732749,__lambda_180,  Cyc_eq(((closureN)self_731724)->elements[1], quote_Cyc_91fast_91list_914));}
;; 
}

static void __lambda_180(void *data, object self_731725, int argc, object *args) /* object self_731725, object r_731083 */
 {
 object r_731083 = args[0];
  if( (boolean_f != r_731083) ){ 
  
make_utf8_string_with_len(c_732752, "Cyc_fast_list_4", 15, 15);
return_direct_with_clo1(data,  ((closureN)self_731725)->elements[0], (((closure)  ((closureN)self_731725)->elements[0])->fn),  &c_732752);
} else { 
  
closureN_type c_732754;
object e_732798 [2];
c_732754.hdr.mark = gc_color_red;
 c_732754.hdr.grayed = 0;
c_732754.tag = closureN_tag;
 c_732754.fn = (function_type)__lambda_181;
c_732754.num_args = 1;
c_732754.num_elements = 2;
c_732754.elements = (object *)e_732798;
c_732754.elements[0] = ((closureN)self_731725)->elements[0];
c_732754.elements[1] = ((closureN)self_731725)->elements[1];



return_direct_with_clo1(data,(closure)&c_732754,__lambda_181,  Cyc_eq(((closureN)self_731725)->elements[1], quote_cell));}
;; 
}

static void __lambda_181(void *data, object self_731726, int argc, object *args) /* object self_731726, object r_731084 */
 {
 object r_731084 = args[0];
  if( (boolean_f != r_731084) ){ 
  
make_utf8_string_with_len(c_732757, "set_cell_as_expr", 16, 16);
return_direct_with_clo1(data,  ((closureN)self_731726)->elements[0], (((closure)  ((closureN)self_731726)->elements[0])->fn),  &c_732757);
} else { 
  
closureN_type c_732759;
object e_732794 [2];
c_732759.hdr.mark = gc_color_red;
 c_732759.hdr.grayed = 0;
c_732759.tag = closureN_tag;
 c_732759.fn = (function_type)__lambda_182;
c_732759.num_args = 1;
c_732759.num_elements = 2;
c_732759.elements = (object *)e_732794;
c_732759.elements[0] = ((closureN)self_731726)->elements[0];
c_732759.elements[1] = ((closureN)self_731726)->elements[1];



return_direct_with_clo1(data,(closure)&c_732759,__lambda_182,  Cyc_eq(((closureN)self_731726)->elements[1], quote_cell_91get));}
;; 
}

static void __lambda_182(void *data, object self_731727, int argc, object *args) /* object self_731727, object r_731085 */
 {
 object r_731085 = args[0];
  if( (boolean_f != r_731085) ){ 
  
make_utf8_string_with_len(c_732762, "car", 3, 3);
return_direct_with_clo1(data,  ((closureN)self_731727)->elements[0], (((closure)  ((closureN)self_731727)->elements[0])->fn),  &c_732762);
} else { 
  
closureN_type c_732764;
object e_732790 [2];
c_732764.hdr.mark = gc_color_red;
 c_732764.hdr.grayed = 0;
c_732764.tag = closureN_tag;
 c_732764.fn = (function_type)__lambda_183;
c_732764.num_args = 1;
c_732764.num_elements = 2;
c_732764.elements = (object *)e_732790;
c_732764.elements[0] = ((closureN)self_731727)->elements[0];
c_732764.elements[1] = ((closureN)self_731727)->elements[1];



return_direct_with_clo1(data,(closure)&c_732764,__lambda_183,  Cyc_eq(((closureN)self_731727)->elements[1], quote_set_91cell_67));}
;; 
}

static void __lambda_183(void *data, object self_731728, int argc, object *args) /* object self_731728, object r_731086 */
 {
 object r_731086 = args[0];
  if( (boolean_f != r_731086) ){ 
  
make_utf8_string_with_len(c_732767, "Cyc_set_cell", 12, 12);
return_direct_with_clo1(data,  ((closureN)self_731728)->elements[0], (((closure)  ((closureN)self_731728)->elements[0])->fn),  &c_732767);
} else { 
  
closureN_type c_732769;
object e_732786 [2];
c_732769.hdr.mark = gc_color_red;
 c_732769.hdr.grayed = 0;
c_732769.tag = closureN_tag;
 c_732769.fn = (function_type)__lambda_184;
c_732769.num_args = 1;
c_732769.num_elements = 2;
c_732769.elements = (object *)e_732786;
c_732769.elements[0] = ((closureN)self_731728)->elements[0];
c_732769.elements[1] = ((closureN)self_731728)->elements[1];



return_direct_with_clo1(data,(closure)&c_732769,__lambda_184,  Cyc_eq(((closureN)self_731728)->elements[1], quote_set_91global_67));}
;; 
}

static void __lambda_184(void *data, object self_731729, int argc, object *args) /* object self_731729, object r_731087 */
 {
 object r_731087 = args[0];
  if( (boolean_f != r_731087) ){ 
  
make_utf8_string_with_len(c_732772, "global_set_cps_id", 17, 17);
return_direct_with_clo1(data,  ((closureN)self_731729)->elements[0], (((closure)  ((closureN)self_731729)->elements[0])->fn),  &c_732772);
} else { 
  
closureN_type c_732774;
object e_732782 [2];
c_732774.hdr.mark = gc_color_red;
 c_732774.hdr.grayed = 0;
c_732774.tag = closureN_tag;
 c_732774.fn = (function_type)__lambda_185;
c_732774.num_args = 1;
c_732774.num_elements = 2;
c_732774.elements = (object *)e_732782;
c_732774.elements[0] = ((closureN)self_731729)->elements[0];
c_732774.elements[1] = ((closureN)self_731729)->elements[1];



return_direct_with_clo1(data,(closure)&c_732774,__lambda_185,  Cyc_eq(((closureN)self_731729)->elements[1], quote_set_91global_91unsafe_67));}
;; 
}

static void __lambda_185(void *data, object self_731730, int argc, object *args) /* object self_731730, object r_731088 */
 {
 object r_731088 = args[0];
  if( (boolean_f != r_731088) ){ 
  
make_utf8_string_with_len(c_732777, "global_set_id", 13, 13);
return_direct_with_clo1(data,  ((closureN)self_731730)->elements[0], (((closure)  ((closureN)self_731730)->elements[0])->fn),  &c_732777);
} else { 
  
make_utf8_string_with_len(c_732780, "unhandled primitive: ", 21, 21);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_731730)->elements[0], &c_732780, ((closureN)self_731730)->elements[1]);}
;; 
}

static void __lambda_21(void *data, object _, int argc, object *args) /* closure _,object k_73922, object p_7335_73833, object use_91alloca_127_7336_73834, object emit_91unsafe_7337_73835 */
 {
object k_73922 = args[0]; object p_7335_73833 = args[1]; object use_91alloca_127_7336_73834 = args[2]; object emit_91unsafe_7337_73835 = args[3];
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:prim->c-func");
if( (boolean_f != use_91alloca_127_7336_73834) ){ 
  return_direct_with_clo3(data,  __glo__191prim_91_125c_91func_scheme_cyclone_primitives, (((closure)  __glo__191prim_91_125c_91func_scheme_cyclone_primitives)->fn),  k_73922, p_7335_73833, emit_91unsafe_7337_73835);
} else { 
  return_direct_with_clo3(data,  __glo__191prim_91_125c_91func_scheme_cyclone_primitives, (((closure)  __glo__191prim_91_125c_91func_scheme_cyclone_primitives)->fn),  k_73922, p_7335_73833, emit_91unsafe_7337_73835);}
;; 
}

static void __lambda_20(void *data, object _, int argc, object *args) /* closure _,object k_73918, object p_7332_73831, object use_91alloca_127_7333_73832 */
 {
object k_73918 = args[0]; object p_7332_73831 = args[1]; object use_91alloca_127_7333_73832 = args[2];
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:prim->c-func-uses-alloca?");
if( (boolean_f != use_91alloca_127_7333_73832) ){ 
  

return_direct_with_clo1(data,  k_73918, (((closure)  k_73918)->fn),  memberp(data, p_7332_73831, NULL));
} else { 
  return_direct_with_clo1(data,  k_73918, (((closure)  k_73918)->fn),  boolean_f);}
;; 
}

static void __lambda_19(void *data, object _, int argc, object *args) /* closure _,object k_73913, object exp_7330_73830 */
 {
object k_73913 = args[0]; object exp_7330_73830 = args[1];
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:prim-call?");
  complex_num_type local_731929; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_731929, exp_7330_73830)) ){ 
  

return_direct_with_clo2(data,  __glo_prim_127_scheme_cyclone_primitives, (((closure)  __glo_prim_127_scheme_cyclone_primitives)->fn),  k_73913, Cyc_car(data, exp_7330_73830));
} else { 
  return_direct_with_clo1(data,  k_73913, (((closure)  k_73913)->fn),  boolean_f);}
;; 
}

static void __lambda_9(void *data, object _, int argc, object *args) /* closure _,object k_73891, object sym_7310_73823, object num_91args_7311_73824, object expected_7312_73825 */
 {
object k_73891 = args[0]; object sym_7310_73823 = args[1]; object num_91args_7311_73824 = args[2]; object expected_7312_73825 = args[3];
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:prim:check-arg-count");

closureN_type c_731832;
object e_731893 [3];
c_731832.hdr.mark = gc_color_red;
 c_731832.hdr.grayed = 0;
c_731832.tag = closureN_tag;
 c_731832.fn = (function_type)__lambda_10;
c_731832.num_args = 1;
c_731832.num_elements = 3;
c_731832.elements = (object *)e_731893;
c_731832.elements[0] = expected_7312_73825;
c_731832.elements[1] = k_73891;
c_731832.elements[2] = num_91args_7311_73824;


closureN_type c_731894;
object e_731925 [1];
c_731894.hdr.mark = gc_color_red;
 c_731894.hdr.grayed = 0;
c_731894.tag = closureN_tag;
 c_731894.fn = (function_type)__lambda_15;
c_731894.num_args = 3;
c_731894.num_elements = 1;
c_731894.elements = (object *)e_731925;
c_731894.elements[0] = sym_7310_73823;

return_direct_with_clo1(data,(closure)&c_731832,__lambda_10,  &c_731894);; 
}

static void __lambda_15(void *data, object self_731559, int argc, object *args) /* object self_731559, object k_73907, object prefix_7327_73827, object expected_7328_73828, object actual_7329_73829 */
 {
 object k_73907 = args[0]; object prefix_7327_73827 = args[1]; object expected_7328_73828 = args[2]; object actual_7329_73829 = args[3];
  
closureN_type c_731896;
object e_731921 [4];
c_731896.hdr.mark = gc_color_red;
 c_731896.hdr.grayed = 0;
c_731896.tag = closureN_tag;
 c_731896.fn = (function_type)__lambda_16;
c_731896.num_args = 1;
c_731896.num_elements = 4;
c_731896.elements = (object *)e_731921;
c_731896.elements[0] = actual_7329_73829;
c_731896.elements[1] = k_73907;
c_731896.elements[2] = prefix_7327_73827;
c_731896.elements[3] = ((closureN)self_731559)->elements[0];


object c_731924 = Cyc_number2string2(data,(closure)&c_731896,1,expected_7328_73828);
return_closcall1(data,(closure)&c_731896,  c_731924);; 
}

static void __lambda_16(void *data, object self_731560, int argc, object *args) /* object self_731560, object r_73908 */
 {
 object r_73908 = args[0];
  
closureN_type c_731898;
object e_731916 [4];
c_731898.hdr.mark = gc_color_red;
 c_731898.hdr.grayed = 0;
c_731898.tag = closureN_tag;
 c_731898.fn = (function_type)__lambda_17;
c_731898.num_args = 1;
c_731898.num_elements = 4;
c_731898.elements = (object *)e_731916;
c_731898.elements[0] = ((closureN)self_731560)->elements[0];
c_731898.elements[1] = ((closureN)self_731560)->elements[1];
c_731898.elements[2] = ((closureN)self_731560)->elements[2];
c_731898.elements[3] = r_73908;


object c_731919 = Cyc_symbol2string(data,(closure)&c_731898,((closureN)self_731560)->elements[3]);
return_closcall1(data,(closure)&c_731898,  c_731919);; 
}

static void __lambda_17(void *data, object self_731561, int argc, object *args) /* object self_731561, object r_73909 */
 {
 object r_73909 = args[0];
  
closureN_type c_731900;
object e_731911 [4];
c_731900.hdr.mark = gc_color_red;
 c_731900.hdr.grayed = 0;
c_731900.tag = closureN_tag;
 c_731900.fn = (function_type)__lambda_18;
c_731900.num_args = 1;
c_731900.num_elements = 4;
c_731900.elements = (object *)e_731911;
c_731900.elements[0] = ((closureN)self_731561)->elements[1];
c_731900.elements[1] = ((closureN)self_731561)->elements[2];
c_731900.elements[2] = ((closureN)self_731561)->elements[3];
c_731900.elements[3] = r_73909;


object c_731914 = Cyc_number2string2(data,(closure)&c_731900,1,((closureN)self_731561)->elements[0]);
return_closcall1(data,(closure)&c_731900,  c_731914);; 
}

static void __lambda_18(void *data, object self_731562, int argc, object *args) /* object self_731562, object r_73910 */
 {
 object r_73910 = args[0];
  
make_utf8_string_with_len(c_731908, " arguments to ", 14, 14);

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

object c_731905 = Cyc_string_append(data,  ((closureN)self_731562)->elements[0],6,((closureN)self_731562)->elements[1], ((closureN)self_731562)->elements[2], &c_731908, ((closureN)self_731562)->elements[3], &c_731910, r_73910);
return_direct_with_clo1(data,  ((closureN)self_731562)->elements[0], (((closure)  ((closureN)self_731562)->elements[0])->fn),  c_731905);; 
}

static void __lambda_10(void *data, object self_731563, int argc, object *args) /* object self_731563, object build_91error_91str_7313_73826 */
 {
 object build_91error_91str_7313_73826 = args[0];
  if( (boolean_f != ((closureN)self_731563)->elements[0]) ){ 
  object r_73893;
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_731563)->elements[0]))) ){ 
  r_73893 = boolean_f;
} else { 
    
if( (boolean_f != Cyc_cadr(data, ((closureN)self_731563)->elements[0])) ){ 
  
  
  r_73893 = Cyc_num_fast_gt_op(data, ((closureN)self_731563)->elements[2], Cyc_cadr(data, ((closureN)self_731563)->elements[0]));
} else { 
  r_73893 = boolean_f;}
;}
;if( (boolean_f != r_73893) ){ 
  
closureN_type c_731853;
object e_731856 [1];
c_731853.hdr.mark = gc_color_red;
 c_731853.hdr.grayed = 0;
c_731853.tag = closureN_tag;
 c_731853.fn = (function_type)__lambda_11;
c_731853.num_args = 1;
c_731853.num_elements = 1;
c_731853.elements = (object *)e_731856;
c_731853.elements[0] = ((closureN)self_731563)->elements[1];


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


return_closcall4(data,  build_91error_91str_7313_73826,  &c_731853, &c_731857, Cyc_car(data, ((closureN)self_731563)->elements[0]), ((closureN)self_731563)->elements[2]);
} else { 
  
closureN_type c_731863;
object e_731875 [2];
c_731863.hdr.mark = gc_color_red;
 c_731863.hdr.grayed = 0;
c_731863.tag = closureN_tag;
 c_731863.fn = (function_type)__lambda_12;
c_731863.num_args = 0;
c_731863.num_elements = 2;
c_731863.elements = (object *)e_731875;
c_731863.elements[0] = ((closureN)self_731563)->elements[0];
c_731863.elements[1] = ((closureN)self_731563)->elements[2];


closureN_type c_731876;
object e_731890 [4];
c_731876.hdr.mark = gc_color_red;
 c_731876.hdr.grayed = 0;
c_731876.tag = closureN_tag;
 c_731876.fn = (function_type)__lambda_13;
c_731876.num_args = 1;
c_731876.num_elements = 4;
c_731876.elements = (object *)e_731890;
c_731876.elements[0] = build_91error_91str_7313_73826;
c_731876.elements[1] = ((closureN)self_731563)->elements[0];
c_731876.elements[2] = ((closureN)self_731563)->elements[1];
c_731876.elements[3] = ((closureN)self_731563)->elements[2];

return_direct_with_clo1(data,(closure)&c_731863,__lambda_12,  &c_731876);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_731563)->elements[1], (((closure)  ((closureN)self_731563)->elements[1])->fn),  boolean_t);}
;; 
}

static void __lambda_13(void *data, object self_731565, int argc, object *args) /* object self_731565, object r_73896 */
 {
 object r_73896 = args[0];
  if( (boolean_f != r_73896) ){ 
  
closureN_type c_731879;
object e_731882 [1];
c_731879.hdr.mark = gc_color_red;
 c_731879.hdr.grayed = 0;
c_731879.tag = closureN_tag;
 c_731879.fn = (function_type)__lambda_14;
c_731879.num_args = 1;
c_731879.num_elements = 1;
c_731879.elements = (object *)e_731882;
c_731879.elements[0] = ((closureN)self_731565)->elements[2];


make_utf8_string_with_len(c_731883, "Expected at least ", 18, 18);


return_closcall4(data,  ((closureN)self_731565)->elements[0],  &c_731879, &c_731883, Cyc_car(data, ((closureN)self_731565)->elements[1]), ((closureN)self_731565)->elements[3]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_731565)->elements[2], (((closure)  ((closureN)self_731565)->elements[2])->fn),  boolean_t);}
;; 
}

static void __lambda_14(void *data, object self_731566, int argc, object *args) /* object self_731566, object r_73897 */
 {
 object r_73897 = args[0];
  return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_731566)->elements[0], r_73897);; 
}

static void __lambda_12(void *data, object self_731567, int argc, object *args) /* object self_731567, object k_73899 */
 {
 object k_73899 = args[0];
    
if( (boolean_f != Cyc_car(data, ((closureN)self_731567)->elements[0])) ){ 
  



return_direct_with_clo1(data,  k_73899,__lambda_13,  Cyc_num_fast_lt_op(data, ((closureN)self_731567)->elements[1], Cyc_car(data, ((closureN)self_731567)->elements[0])));
} else { 
  return_direct_with_clo1(data,  k_73899,__lambda_13,  boolean_f);}
;; 
}

static void __lambda_11(void *data, object self_731564, int argc, object *args) /* object self_731564, object r_73894 */
 {
 object r_73894 = args[0];
  return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_731564)->elements[0], r_73894);; 
}

static void __lambda_8(void *data, object _, int argc, object *args) /* closure _,object k_73883, object exp_739_73822 */
 {
object k_73883 = args[0]; object exp_739_73822 = args[1];
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:prim:mutates?");



make_pair(c_731829,quote_vector_91set_67,NULL);c_731829.hdr.immutable = 1;

make_pair(c_731828,quote_bytevector_91u8_91set_67,&c_731829);c_731828.hdr.immutable = 1;

make_pair(c_731827,quote_string_91set_67,&c_731828);c_731827.hdr.immutable = 1;

make_pair(c_731826,quote_set_91cdr_67,&c_731827);c_731826.hdr.immutable = 1;

make_pair(c_731825,quote_set_91car_67,&c_731826);c_731825.hdr.immutable = 1;

make_pair(c_731824,quote_set_91cell_67,&c_731825);c_731824.hdr.immutable = 1;

make_pair(c_731823,quote_set_91global_91unsafe_67,&c_731824);c_731823.hdr.immutable = 1;

make_pair(c_731822,quote_set_91global_67,&c_731823);c_731822.hdr.immutable = 1;

make_pair(c_731821,quote_Cyc_91end_91thread_67,&c_731822);c_731821.hdr.immutable = 1;

make_pair(c_731820,quote_Cyc_91spawn_91thread_67,&c_731821);c_731820.hdr.immutable = 1;

make_pair(c_731819,quote_Cyc_91set_91cvar_67,&c_731820);c_731819.hdr.immutable = 1;

make_pair(c_731818,quote_Cyc_91fast_91apply,&c_731819);c_731818.hdr.immutable = 1;

make_pair(c_731817,quote_apply,&c_731818);c_731817.hdr.immutable = 1;
return_direct_with_clo1(data,  k_73883, (((closure)  k_73883)->fn),  memqp(data, exp_739_73822, &c_731817));; 
}

static void __lambda_6(void *data, object _, int argc, object *args) /* closure _,object k_73879, object exp_734_73820 */
 {
object k_73879 = args[0]; object exp_734_73820 = args[1];
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:prim?");

closureN_type c_731804;
object e_731812 [2];
c_731804.hdr.mark = gc_color_red;
 c_731804.hdr.grayed = 0;
c_731804.tag = closureN_tag;
 c_731804.fn = (function_type)__lambda_7;
c_731804.num_args = 1;
c_731804.num_elements = 2;
c_731804.elements = (object *)e_731812;
c_731804.elements[0] = exp_734_73820;
c_731804.elements[1] = k_73879;

return_direct_with_clo3(data,  __glo_hs_91member_127_scheme_cyclone_hashset, (((closure)  __glo_hs_91member_127_scheme_cyclone_hashset)->fn),  &c_731804, __glo__85hs_91prims_85_scheme_cyclone_primitives, exp_734_73820);; 
}

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

return_direct_with_clo1(data,  ((closureN)self_731558)->elements[1], (((closure)  ((closureN)self_731558)->elements[1])->fn),  memqp(data, ((closureN)self_731558)->elements[0], __glo__85udf_91prims_85_scheme_cyclone_primitives));}
;; 
}

static void __lambda_5(void *data, object _, int argc, object *args) /* closure _,object k_73874, object exp_733_73819 */
 {
object k_73874 = args[0]; object exp_733_73819 = args[1];
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:prim:udf?");


return_direct_with_clo1(data,  k_73874, (((closure)  k_73874)->fn),  memqp(data, exp_733_73819, __glo__85udf_91prims_85_scheme_cyclone_primitives));; 
}

static void __lambda_1(void *data, object _, int argc, object *args) /* closure _,object k_73867, object cps_91sym_731_73817, object inline_91sym_732_73818 */
 {
object k_73867 = args[0]; object cps_91sym_731_73817 = args[1]; object inline_91sym_732_73818 = args[2];
  Cyc_st_add(data, "scheme/cyclone/primitives.sld:prim:add-udf!");

closureN_type c_731772;
object e_731791 [2];
c_731772.hdr.mark = gc_color_red;
 c_731772.hdr.grayed = 0;
c_731772.tag = closureN_tag;
 c_731772.fn = (function_type)__lambda_2;
c_731772.num_args = 1;
c_731772.num_elements = 2;
c_731772.elements = (object *)e_731791;
c_731772.elements[0] = inline_91sym_732_73818;
c_731772.elements[1] = k_73867;


pair_type local_731794; 

pair_type local_731797; 
return_direct_with_clo1(data,(closure)&c_731772,__lambda_2,  set_pair_as_expr(&local_731794, set_pair_as_expr(&local_731797, cps_91sym_731_73817, inline_91sym_732_73818), __glo__85udf_91cps_91_125inline_85_scheme_cyclone_primitives));; 
}

static void __lambda_2(void *data, object self_731555, int argc, object *args) /* object self_731555, object r_73870 */
 {
 object r_73870 = args[0];
  
closureN_type c_731774;
object e_731787 [2];
c_731774.hdr.mark = gc_color_red;
 c_731774.hdr.grayed = 0;
c_731774.tag = closureN_tag;
 c_731774.fn = (function_type)__lambda_3;
c_731774.num_args = 1;
c_731774.num_elements = 2;
c_731774.elements = (object *)e_731787;
c_731774.elements[0] = ((closureN)self_731555)->elements[0];
c_731774.elements[1] = ((closureN)self_731555)->elements[1];


object c_731790 = global_set_cps_id(data,(closure)&c_731774,"__glo__85udf_91cps_91_125inline_85_scheme_cyclone_primitives", __glo__85udf_91cps_91_125inline_85_scheme_cyclone_primitives, r_73870);
return_closcall1(data,(closure)&c_731774,  c_731790);; 
}

static void __lambda_3(void *data, object self_731556, int argc, object *args) /* object self_731556, object r_73868 */
 {

  
closureN_type c_731776;
object e_731782 [1];
c_731776.hdr.mark = gc_color_red;
 c_731776.hdr.grayed = 0;
c_731776.tag = closureN_tag;
 c_731776.fn = (function_type)__lambda_4;
c_731776.num_args = 1;
c_731776.num_elements = 1;
c_731776.elements = (object *)e_731782;
c_731776.elements[0] = ((closureN)self_731556)->elements[1];


pair_type local_731785; 
return_direct_with_clo1(data,(closure)&c_731776,__lambda_4,  set_pair_as_expr(&local_731785, ((closureN)self_731556)->elements[0], __glo__85udf_91prims_85_scheme_cyclone_primitives));; 
}

static void __lambda_4(void *data, object self_731557, int argc, object *args) /* object self_731557, object r_73869 */
 {
 object r_73869 = args[0];
  
object c_731781 = global_set_cps_id(data,  ((closureN)self_731557)->elements[0],"__glo__85udf_91prims_85_scheme_cyclone_primitives", __glo__85udf_91prims_85_scheme_cyclone_primitives, r_73869);
return_direct_with_clo1(data,  ((closureN)self_731557)->elements[0], (((closure)  ((closureN)self_731557)->elements[0])->fn),  c_731781);; 
}

void c_schemecycloneprimitives_inlinable_lambdas(void *data, object clo, int argc, object *args){ 
object buf[1]; object cont = args[0];
buf[0] = NULL; (((closure)cont)->fn)(data, cont, 1, buf);
 } 
void c_schemecycloneprimitives_entry_pt_first_lambda(void *data, object clo, int argc, object *args){ 
Cyc_set_globals_changed((gc_thread_data *)data);
  quote__85hs_91prims_85 = find_or_add_symbol("*hs-prims*");
  quote__85primitives_85 = find_or_add_symbol("*primitives*");
  quote__85primitives_91num_91args_85 = find_or_add_symbol("*primitives-num-args*");
  quote_peek_91char = find_or_add_symbol("peek-char");
  quote_read_91char = find_or_add_symbol("read-char");
  quote_char_121_123_127 = find_or_add_symbol("char<=?");
  quote_char_125_123_127 = find_or_add_symbol("char>=?");
  quote_char_121_127 = find_or_add_symbol("char<?");
  quote_char_125_127 = find_or_add_symbol("char>?");
  quote_char_123_127 = find_or_add_symbol("char=?");
  quote_error = find_or_add_symbol("error");
  quote_Cyc_91global_91vars = find_or_add_symbol("Cyc-global-vars");
  quote_Cyc_91get_91cvar = find_or_add_symbol("Cyc-get-cvar");
  quote_Cyc_91cvar_127 = find_or_add_symbol("Cyc-cvar?");
  quote_Cyc_91opaque_127 = find_or_add_symbol("Cyc-opaque?");
  quote_Cyc_91has_91cycle_127 = find_or_add_symbol("Cyc-has-cycle?");
  quote_Cyc_91stdout = find_or_add_symbol("Cyc-stdout");
  quote_Cyc_91stdin = find_or_add_symbol("Cyc-stdin");
  quote_Cyc_91stderr = find_or_add_symbol("Cyc-stderr");
  quote_Cyc_91if = find_or_add_symbol("Cyc-if");
  quote_Cyc_91foreign_91code = find_or_add_symbol("Cyc-foreign-code");
  quote_Cyc_91foreign_91value = find_or_add_symbol("Cyc-foreign-value");
  quote_Cyc_91fast_91plus = find_or_add_symbol("Cyc-fast-plus");
  quote_Cyc_91fast_91sub = find_or_add_symbol("Cyc-fast-sub");
  quote_Cyc_91fast_91mul = find_or_add_symbol("Cyc-fast-mul");
  quote_Cyc_91fast_91div = find_or_add_symbol("Cyc-fast-div");
  quote__87 = find_or_add_symbol("+");
  quote__91 = find_or_add_symbol("-");
  quote__85 = find_or_add_symbol("*");
  quote__95 = find_or_add_symbol("/");
  quote_Cyc_91fast_91eq = find_or_add_symbol("Cyc-fast-eq");
  quote_Cyc_91fast_91gt = find_or_add_symbol("Cyc-fast-gt");
  quote_Cyc_91fast_91lt = find_or_add_symbol("Cyc-fast-lt");
  quote_Cyc_91fast_91gte = find_or_add_symbol("Cyc-fast-gte");
  quote_Cyc_91fast_91lte = find_or_add_symbol("Cyc-fast-lte");
  quote_Cyc_91fast_91char_91eq = find_or_add_symbol("Cyc-fast-char-eq");
  quote_Cyc_91fast_91char_91gt = find_or_add_symbol("Cyc-fast-char-gt");
  quote_Cyc_91fast_91char_91lt = find_or_add_symbol("Cyc-fast-char-lt");
  quote_Cyc_91fast_91char_91gte = find_or_add_symbol("Cyc-fast-char-gte");
  quote_Cyc_91fast_91char_91lte = find_or_add_symbol("Cyc-fast-char-lte");
  quote__123 = find_or_add_symbol("=");
  quote__125 = find_or_add_symbol(">");
  quote__121 = find_or_add_symbol("<");
  quote__125_123 = find_or_add_symbol(">=");
  quote__121_123 = find_or_add_symbol("<=");
  quote__75halt = find_or_add_symbol("%halt");
  quote_exit = find_or_add_symbol("exit");
  quote_Cyc_91default_91exception_91handler = find_or_add_symbol("Cyc-default-exception-handler");
  quote_Cyc_91current_91exception_91handler = find_or_add_symbol("Cyc-current-exception-handler");
  quote_open_91input_91file = find_or_add_symbol("open-input-file");
  quote_open_91output_91file = find_or_add_symbol("open-output-file");
  quote_open_91binary_91input_91file = find_or_add_symbol("open-binary-input-file");
  quote_open_91binary_91output_91file = find_or_add_symbol("open-binary-output-file");
  quote_close_91port = find_or_add_symbol("close-port");
  quote_close_91input_91port = find_or_add_symbol("close-input-port");
  quote_close_91output_91port = find_or_add_symbol("close-output-port");
  quote_Cyc_91flush_91output_91port = find_or_add_symbol("Cyc-flush-output-port");
  quote_file_91exists_127 = find_or_add_symbol("file-exists?");
  quote_delete_91file = find_or_add_symbol("delete-file");
  quote_Cyc_91read_91char = find_or_add_symbol("Cyc-read-char");
  quote_Cyc_91peek_91char = find_or_add_symbol("Cyc-peek-char");
  quote_Cyc_91read_91line = find_or_add_symbol("Cyc-read-line");
  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_91unsafe_91car = find_or_add_symbol("Cyc-unsafe-car");
  quote_Cyc_91unsafe_91cdr = find_or_add_symbol("Cyc-unsafe-cdr");
  quote_car = find_or_add_symbol("car");
  quote_cdr = find_or_add_symbol("cdr");
  quote_caar = find_or_add_symbol("caar");
  quote_cadr = find_or_add_symbol("cadr");
  quote_cdar = find_or_add_symbol("cdar");
  quote_cddr = find_or_add_symbol("cddr");
  quote_caaar = find_or_add_symbol("caaar");
  quote_caadr = find_or_add_symbol("caadr");
  quote_cadar = find_or_add_symbol("cadar");
  quote_caddr = find_or_add_symbol("caddr");
  quote_cdaar = find_or_add_symbol("cdaar");
  quote_cdadr = find_or_add_symbol("cdadr");
  quote_cddar = find_or_add_symbol("cddar");
  quote_cdddr = find_or_add_symbol("cdddr");
  quote_caaaar = find_or_add_symbol("caaaar");
  quote_caaadr = find_or_add_symbol("caaadr");
  quote_caadar = find_or_add_symbol("caadar");
  quote_caaddr = find_or_add_symbol("caaddr");
  quote_cadaar = find_or_add_symbol("cadaar");
  quote_cadadr = find_or_add_symbol("cadadr");
  quote_caddar = find_or_add_symbol("caddar");
  quote_cadddr = find_or_add_symbol("cadddr");
  quote_cdaaar = find_or_add_symbol("cdaaar");
  quote_cdaadr = find_or_add_symbol("cdaadr");
  quote_cdadar = find_or_add_symbol("cdadar");
  quote_cdaddr = find_or_add_symbol("cdaddr");
  quote_cddaar = find_or_add_symbol("cddaar");
  quote_cddadr = find_or_add_symbol("cddadr");
  quote_cdddar = find_or_add_symbol("cdddar");
  quote_cddddr = find_or_add_symbol("cddddr");
  quote_char_91_125integer = find_or_add_symbol("char->integer");
  quote_integer_91_125char = find_or_add_symbol("integer->char");
  quote_string_91_125number = find_or_add_symbol("string->number");
  quote_list_91_125string = find_or_add_symbol("list->string");
  quote_make_91bytevector = find_or_add_symbol("make-bytevector");
  quote_bytevector_91length = find_or_add_symbol("bytevector-length");
  quote_bytevector = find_or_add_symbol("bytevector");
  quote_bytevector_91append = find_or_add_symbol("bytevector-append");
  quote_Cyc_91bytevector_91copy = find_or_add_symbol("Cyc-bytevector-copy");
  quote_Cyc_91utf8_91_125string = find_or_add_symbol("Cyc-utf8->string");
  quote_Cyc_91string_91_125utf8 = find_or_add_symbol("Cyc-string->utf8");
  quote_bytevector_91u8_91ref = find_or_add_symbol("bytevector-u8-ref");
  quote_make_91vector = find_or_add_symbol("make-vector");
  quote_list_91_125vector = find_or_add_symbol("list->vector");
  quote_vector_91length = find_or_add_symbol("vector-length");
  quote_vector_91ref = find_or_add_symbol("vector-ref");
  quote_string_91append = find_or_add_symbol("string-append");
  quote_string_91cmp = find_or_add_symbol("string-cmp");
  quote_string_91_125symbol = find_or_add_symbol("string->symbol");
  quote_symbol_91_125string = find_or_add_symbol("symbol->string");
  quote_number_91_125string = find_or_add_symbol("number->string");
  quote_string_91length = find_or_add_symbol("string-length");
  quote_string_91ref = find_or_add_symbol("string-ref");
  quote_substring = find_or_add_symbol("substring");
  quote_Cyc_91installation_91dir = find_or_add_symbol("Cyc-installation-dir");
  quote_Cyc_91compilation_91environment = find_or_add_symbol("Cyc-compilation-environment");
  quote_command_91line_91arguments = find_or_add_symbol("command-line-arguments");
  quote_system = find_or_add_symbol("system");
  quote_length = find_or_add_symbol("length");
  quote_eq_127 = find_or_add_symbol("eq?");
  quote_eqv_127 = find_or_add_symbol("eqv?");
  quote_equal_127 = find_or_add_symbol("equal?");
  quote_Cyc_91fast_91member = find_or_add_symbol("Cyc-fast-member");
  quote_Cyc_91fast_91assoc = find_or_add_symbol("Cyc-fast-assoc");
  quote_assq = find_or_add_symbol("assq");
  quote_assv = find_or_add_symbol("assv");
  quote_memq = find_or_add_symbol("memq");
  quote_memv = find_or_add_symbol("memv");
  quote_boolean_127 = find_or_add_symbol("boolean?");
  quote_char_127 = find_or_add_symbol("char?");
  quote_null_127 = find_or_add_symbol("null?");
  quote_number_127 = find_or_add_symbol("number?");
  quote_real_127 = find_or_add_symbol("real?");
  quote_integer_127 = find_or_add_symbol("integer?");
  quote_pair_127 = find_or_add_symbol("pair?");
  quote_procedure_127 = find_or_add_symbol("procedure?");
  quote_Cyc_91macro_127 = find_or_add_symbol("Cyc-macro?");
  quote_port_127 = find_or_add_symbol("port?");
  quote_vector_127 = find_or_add_symbol("vector?");
  quote_bytevector_127 = find_or_add_symbol("bytevector?");
  quote_string_127 = find_or_add_symbol("string?");
  quote_eof_91object_127 = find_or_add_symbol("eof-object?");
  quote_symbol_127 = find_or_add_symbol("symbol?");
  quote_cons = find_or_add_symbol("cons");
  quote_Cyc_91fast_91vector_912 = find_or_add_symbol("Cyc-fast-vector-2");
  quote_Cyc_91fast_91vector_913 = find_or_add_symbol("Cyc-fast-vector-3");
  quote_Cyc_91fast_91vector_914 = find_or_add_symbol("Cyc-fast-vector-4");
  quote_Cyc_91fast_91vector_915 = find_or_add_symbol("Cyc-fast-vector-5");
  quote_Cyc_91fast_91list_911 = find_or_add_symbol("Cyc-fast-list-1");
  quote_Cyc_91fast_91list_912 = find_or_add_symbol("Cyc-fast-list-2");
  quote_Cyc_91fast_91list_913 = find_or_add_symbol("Cyc-fast-list-3");
  quote_Cyc_91fast_91list_914 = find_or_add_symbol("Cyc-fast-list-4");
  quote_cell = find_or_add_symbol("cell");
  quote_cell_91get = find_or_add_symbol("cell-get");
  quote_vector_91set_67 = find_or_add_symbol("vector-set!");
  quote_bytevector_91u8_91set_67 = find_or_add_symbol("bytevector-u8-set!");
  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_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_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_91set_91cvar_67 = find_or_add_symbol("Cyc-set-cvar!");
  quote_Cyc_91fast_91apply = find_or_add_symbol("Cyc-fast-apply");
  quote_apply = find_or_add_symbol("apply");
  quote__85udf_91cps_91_125inline_85 = find_or_add_symbol("*udf-cps->inline*");
  quote__85udf_91prims_85 = find_or_add_symbol("*udf-prims*");

  add_global("__glo_lib_91init_117schemecycloneprimitives_scheme_cyclone_primitives", (object *) &__glo_lib_91init_117schemecycloneprimitives_scheme_cyclone_primitives);
  add_global("__glo_prim_117func_91_125prim_scheme_cyclone_primitives", (object *) &__glo_prim_117func_91_125prim_scheme_cyclone_primitives);
  add_global("__glo__91_125dyadic_scheme_cyclone_primitives", (object *) &__glo__91_125dyadic_scheme_cyclone_primitives);
  add_global("__glo_prim_117inline_91convert_91prim_91call_scheme_cyclone_primitives", (object *) &__glo_prim_117inline_91convert_91prim_91call_scheme_cyclone_primitives);
  add_global("__glo_prim_117immutable_91args_95result_127_scheme_cyclone_primitives", (object *) &__glo_prim_117immutable_91args_95result_127_scheme_cyclone_primitives);
  add_global("__glo_prim_117allocates_91object_127_scheme_cyclone_primitives", (object *) &__glo_prim_117allocates_91object_127_scheme_cyclone_primitives);
  add_global("__glo_prim_117arg_91count_127_scheme_cyclone_primitives", (object *) &__glo_prim_117arg_91count_127_scheme_cyclone_primitives);
  add_global("__glo_prim_117cont_95no_91args_127_scheme_cyclone_primitives", (object *) &__glo_prim_117cont_95no_91args_127_scheme_cyclone_primitives);
  add_global("__glo_prim_117cont_127_scheme_cyclone_primitives", (object *) &__glo_prim_117cont_127_scheme_cyclone_primitives);
  add_global("__glo_prim_95cvar_127_scheme_cyclone_primitives", (object *) &__glo_prim_95cvar_127_scheme_cyclone_primitives);
  add_global("__glo_prim_95c_91var_91assign_scheme_cyclone_primitives", (object *) &__glo_prim_95c_91var_91assign_scheme_cyclone_primitives);
  add_global("__glo_prim_95c_91var_91pointer_scheme_cyclone_primitives", (object *) &__glo_prim_95c_91var_91pointer_scheme_cyclone_primitives);
  add_global("__glo_prim_95data_91arg_127_scheme_cyclone_primitives", (object *) &__glo_prim_95data_91arg_127_scheme_cyclone_primitives);
  add_global("__glo__191prim_91_125c_91func_scheme_cyclone_primitives", (object *) &__glo__191prim_91_125c_91func_scheme_cyclone_primitives);
  add_global("__glo_prim_91_125c_91func_scheme_cyclone_primitives", (object *) &__glo_prim_91_125c_91func_scheme_cyclone_primitives);
  add_global("__glo_prim_91_125c_91func_91uses_91alloca_127_scheme_cyclone_primitives", (object *) &__glo_prim_91_125c_91func_91uses_91alloca_127_scheme_cyclone_primitives);
  add_global("__glo_prim_91call_127_scheme_cyclone_primitives", (object *) &__glo_prim_91call_127_scheme_cyclone_primitives);
  add_global("__glo_prim_117check_91arg_91count_scheme_cyclone_primitives", (object *) &__glo_prim_117check_91arg_91count_scheme_cyclone_primitives);
  add_global("__glo__85primitives_91num_91args_85_scheme_cyclone_primitives", (object *) &__glo__85primitives_91num_91args_85_scheme_cyclone_primitives);
  add_global("__glo__85primitives_85_scheme_cyclone_primitives", (object *) &__glo__85primitives_85_scheme_cyclone_primitives);
  add_global("__glo_prim_117mutates_127_scheme_cyclone_primitives", (object *) &__glo_prim_117mutates_127_scheme_cyclone_primitives);
  add_global("__glo_prim_127_scheme_cyclone_primitives", (object *) &__glo_prim_127_scheme_cyclone_primitives);
  add_global("__glo__85hs_91prims_85_scheme_cyclone_primitives", (object *) &__glo__85hs_91prims_85_scheme_cyclone_primitives);
  add_global("__glo_prim_117udf_127_scheme_cyclone_primitives", (object *) &__glo_prim_117udf_127_scheme_cyclone_primitives);
  add_global("__glo_prim_117add_91udf_67_scheme_cyclone_primitives", (object *) &__glo_prim_117add_91udf_67_scheme_cyclone_primitives);
  add_global("__glo__85udf_91cps_91_125inline_85_scheme_cyclone_primitives", (object *) &__glo__85udf_91cps_91_125inline_85_scheme_cyclone_primitives);
  add_global("__glo__85udf_91prims_85_scheme_cyclone_primitives", (object *) &__glo__85udf_91prims_85_scheme_cyclone_primitives);
  mclosure0(c_734436, (function_type)__lambda_230);c_734436.num_args = 0; 
  __glo_lib_91init_117schemecycloneprimitives_scheme_cyclone_primitives = &c_734436; 
  mclosure0(c_734355, (function_type)__lambda_224);c_734355.num_args = 2; 
  __glo_prim_117func_91_125prim_scheme_cyclone_primitives = &c_734355; 
  mclosure0(c_734314, (function_type)__lambda_221);c_734314.num_args = 1; 
  __glo__91_125dyadic_scheme_cyclone_primitives = &c_734314; 
  mclosure0(c_734004, (function_type)__lambda_202);c_734004.num_args = 1; 
  __glo_prim_117inline_91convert_91prim_91call_scheme_cyclone_primitives = &c_734004; 
  mclosure0(c_733959, (function_type)__lambda_201);c_733959.num_args = 1; 
  __glo_prim_117immutable_91args_95result_127_scheme_cyclone_primitives = &c_733959; 
  mclosure0(c_733945, (function_type)__lambda_199);c_733945.num_args = 2; 
  __glo_prim_117allocates_91object_127_scheme_cyclone_primitives = &c_733945; 
  mclosure0(c_733914, (function_type)__lambda_197);c_733914.num_args = 1; 
  __glo_prim_117arg_91count_127_scheme_cyclone_primitives = &c_733914; 
  mclosure0(c_733901, (function_type)__lambda_195);c_733901.num_args = 1; 
  __glo_prim_117cont_95no_91args_127_scheme_cyclone_primitives = &c_733901; 
  mclosure0(c_733853, (function_type)__lambda_193);c_733853.num_args = 1; 
  __glo_prim_117cont_127_scheme_cyclone_primitives = &c_733853; 
  mclosure0(c_733800, (function_type)__lambda_191);c_733800.num_args = 1; 
  __glo_prim_95cvar_127_scheme_cyclone_primitives = &c_733800; 
  mclosure0(c_733630, (function_type)__lambda_190);c_733630.num_args = 1; 
  __glo_prim_95c_91var_91assign_scheme_cyclone_primitives = &c_733630; 
  mclosure0(c_733563, (function_type)__lambda_188);c_733563.num_args = 1; 
  __glo_prim_95c_91var_91pointer_scheme_cyclone_primitives = &c_733563; 
  mclosure0(c_733433, (function_type)__lambda_186);c_733433.num_args = 1; 
  __glo_prim_95data_91arg_127_scheme_cyclone_primitives = &c_733433; 
  mclosure0(c_731942, (function_type)__lambda_22);c_731942.num_args = 2; 
  __glo__191prim_91_125c_91func_scheme_cyclone_primitives = &c_731942; 
  mclosure0(c_731939, (function_type)__lambda_21);c_731939.num_args = 3; 
  __glo_prim_91_125c_91func_scheme_cyclone_primitives = &c_731939; 
  mclosure0(c_731934, (function_type)__lambda_20);c_731934.num_args = 2; 
  __glo_prim_91_125c_91func_91uses_91alloca_127_scheme_cyclone_primitives = &c_731934; 
  mclosure0(c_731926, (function_type)__lambda_19);c_731926.num_args = 1; 
  __glo_prim_91call_127_scheme_cyclone_primitives = &c_731926; 
  mclosure0(c_731830, (function_type)__lambda_9);c_731830.num_args = 3; 
  __glo_prim_117check_91arg_91count_scheme_cyclone_primitives = &c_731830; 
  mclosure0(c_731813, (function_type)__lambda_8);c_731813.num_args = 1; 
  __glo_prim_117mutates_127_scheme_cyclone_primitives = &c_731813; 
  mclosure0(c_731802, (function_type)__lambda_6);c_731802.num_args = 1; 
  __glo_prim_127_scheme_cyclone_primitives = &c_731802; 
  mclosure0(c_731798, (function_type)__lambda_5);c_731798.num_args = 1; 
  __glo_prim_117udf_127_scheme_cyclone_primitives = &c_731798; 
  mclosure0(c_731770, (function_type)__lambda_1);c_731770.num_args = 2; 
  __glo_prim_117add_91udf_67_scheme_cyclone_primitives = &c_731770; 
  __glo__85primitives_91num_91args_85_scheme_cyclone_primitives = boolean_f; 
  __glo__85primitives_85_scheme_cyclone_primitives = boolean_f; 
  __glo__85hs_91prims_85_scheme_cyclone_primitives = boolean_f; 
  __glo__85udf_91cps_91_125inline_85_scheme_cyclone_primitives = boolean_f; 
  __glo__85udf_91prims_85_scheme_cyclone_primitives = boolean_f; 

  mclosure0(clo_735280, c_schemecycloneprimitives_inlinable_lambdas); make_pair(pair_735279, find_or_add_symbol("c_schemecycloneprimitives_inlinable_lambdas"), &clo_735280);
  make_cvar(cvar_735281, (object *)&__glo_lib_91init_117schemecycloneprimitives_scheme_cyclone_primitives);make_pair(pair_735282, find_or_add_symbol("lib-init:schemecycloneprimitives"), &cvar_735281);
  make_cvar(cvar_735283, (object *)&__glo_prim_117func_91_125prim_scheme_cyclone_primitives);make_pair(pair_735284, find_or_add_symbol("prim:func->prim"), &cvar_735283);
  make_cvar(cvar_735285, (object *)&__glo__91_125dyadic_scheme_cyclone_primitives);make_pair(pair_735286, find_or_add_symbol("->dyadic"), &cvar_735285);
  make_cvar(cvar_735287, (object *)&__glo_prim_117inline_91convert_91prim_91call_scheme_cyclone_primitives);make_pair(pair_735288, find_or_add_symbol("prim:inline-convert-prim-call"), &cvar_735287);
  make_cvar(cvar_735289, (object *)&__glo_prim_117immutable_91args_95result_127_scheme_cyclone_primitives);make_pair(pair_735290, find_or_add_symbol("prim:immutable-args/result?"), &cvar_735289);
  make_cvar(cvar_735291, (object *)&__glo_prim_117allocates_91object_127_scheme_cyclone_primitives);make_pair(pair_735292, find_or_add_symbol("prim:allocates-object?"), &cvar_735291);
  make_cvar(cvar_735293, (object *)&__glo_prim_117arg_91count_127_scheme_cyclone_primitives);make_pair(pair_735294, find_or_add_symbol("prim:arg-count?"), &cvar_735293);
  make_cvar(cvar_735295, (object *)&__glo_prim_117cont_95no_91args_127_scheme_cyclone_primitives);make_pair(pair_735296, find_or_add_symbol("prim:cont/no-args?"), &cvar_735295);
  make_cvar(cvar_735297, (object *)&__glo_prim_117cont_127_scheme_cyclone_primitives);make_pair(pair_735298, find_or_add_symbol("prim:cont?"), &cvar_735297);
  make_cvar(cvar_735299, (object *)&__glo_prim_95cvar_127_scheme_cyclone_primitives);make_pair(pair_735300, find_or_add_symbol("prim/cvar?"), &cvar_735299);
  make_cvar(cvar_735301, (object *)&__glo_prim_95c_91var_91assign_scheme_cyclone_primitives);make_pair(pair_735302, find_or_add_symbol("prim/c-var-assign"), &cvar_735301);
  make_cvar(cvar_735303, (object *)&__glo_prim_95c_91var_91pointer_scheme_cyclone_primitives);make_pair(pair_735304, find_or_add_symbol("prim/c-var-pointer"), &cvar_735303);
  make_cvar(cvar_735305, (object *)&__glo_prim_95data_91arg_127_scheme_cyclone_primitives);make_pair(pair_735306, find_or_add_symbol("prim/data-arg?"), &cvar_735305);
  make_cvar(cvar_735307, (object *)&__glo__191prim_91_125c_91func_scheme_cyclone_primitives);make_pair(pair_735308, find_or_add_symbol("_prim->c-func"), &cvar_735307);
  make_cvar(cvar_735309, (object *)&__glo_prim_91_125c_91func_scheme_cyclone_primitives);make_pair(pair_735310, find_or_add_symbol("prim->c-func"), &cvar_735309);
  make_cvar(cvar_735311, (object *)&__glo_prim_91_125c_91func_91uses_91alloca_127_scheme_cyclone_primitives);make_pair(pair_735312, find_or_add_symbol("prim->c-func-uses-alloca?"), &cvar_735311);
  make_cvar(cvar_735313, (object *)&__glo_prim_91call_127_scheme_cyclone_primitives);make_pair(pair_735314, find_or_add_symbol("prim-call?"), &cvar_735313);
  make_cvar(cvar_735315, (object *)&__glo_prim_117check_91arg_91count_scheme_cyclone_primitives);make_pair(pair_735316, find_or_add_symbol("prim:check-arg-count"), &cvar_735315);
  make_cvar(cvar_735317, (object *)&__glo__85primitives_91num_91args_85_scheme_cyclone_primitives);make_pair(pair_735318, find_or_add_symbol("*primitives-num-args*"), &cvar_735317);
  make_cvar(cvar_735319, (object *)&__glo__85primitives_85_scheme_cyclone_primitives);make_pair(pair_735320, find_or_add_symbol("*primitives*"), &cvar_735319);
  make_cvar(cvar_735321, (object *)&__glo_prim_117mutates_127_scheme_cyclone_primitives);make_pair(pair_735322, find_or_add_symbol("prim:mutates?"), &cvar_735321);
  make_cvar(cvar_735323, (object *)&__glo_prim_127_scheme_cyclone_primitives);make_pair(pair_735324, find_or_add_symbol("prim?"), &cvar_735323);
  make_cvar(cvar_735325, (object *)&__glo__85hs_91prims_85_scheme_cyclone_primitives);make_pair(pair_735326, find_or_add_symbol("*hs-prims*"), &cvar_735325);
  make_cvar(cvar_735327, (object *)&__glo_prim_117udf_127_scheme_cyclone_primitives);make_pair(pair_735328, find_or_add_symbol("prim:udf?"), &cvar_735327);
  make_cvar(cvar_735329, (object *)&__glo_prim_117add_91udf_67_scheme_cyclone_primitives);make_pair(pair_735330, find_or_add_symbol("prim:add-udf!"), &cvar_735329);
  make_cvar(cvar_735331, (object *)&__glo__85udf_91cps_91_125inline_85_scheme_cyclone_primitives);make_pair(pair_735332, find_or_add_symbol("*udf-cps->inline*"), &cvar_735331);
  make_cvar(cvar_735333, (object *)&__glo__85udf_91prims_85_scheme_cyclone_primitives);make_pair(pair_735334, find_or_add_symbol("*udf-prims*"), &cvar_735333);
make_pair(c_735362, &pair_735279,Cyc_global_variables);
make_pair(c_735361, &pair_735282, &c_735362);
make_pair(c_735360, &pair_735284, &c_735361);
make_pair(c_735359, &pair_735286, &c_735360);
make_pair(c_735358, &pair_735288, &c_735359);
make_pair(c_735357, &pair_735290, &c_735358);
make_pair(c_735356, &pair_735292, &c_735357);
make_pair(c_735355, &pair_735294, &c_735356);
make_pair(c_735354, &pair_735296, &c_735355);
make_pair(c_735353, &pair_735298, &c_735354);
make_pair(c_735352, &pair_735300, &c_735353);
make_pair(c_735351, &pair_735302, &c_735352);
make_pair(c_735350, &pair_735304, &c_735351);
make_pair(c_735349, &pair_735306, &c_735350);
make_pair(c_735348, &pair_735308, &c_735349);
make_pair(c_735347, &pair_735310, &c_735348);
make_pair(c_735346, &pair_735312, &c_735347);
make_pair(c_735345, &pair_735314, &c_735346);
make_pair(c_735344, &pair_735316, &c_735345);
make_pair(c_735343, &pair_735318, &c_735344);
make_pair(c_735342, &pair_735320, &c_735343);
make_pair(c_735341, &pair_735322, &c_735342);
make_pair(c_735340, &pair_735324, &c_735341);
make_pair(c_735339, &pair_735326, &c_735340);
make_pair(c_735338, &pair_735328, &c_735339);
make_pair(c_735337, &pair_735330, &c_735338);
make_pair(c_735336, &pair_735332, &c_735337);
make_pair(c_735335, &pair_735334, &c_735336);
Cyc_global_variables = &c_735335;
object buf[1]; buf[0] = ((closure1_type *)clo)->element;
(((closure)__glo_lib_91init_117schemecycloneprimitives_scheme_cyclone_primitives)->fn)(data, buf[0], 1, buf);
}
void c_schemecycloneprimitives_entry_pt(void *data, object cont, int argc, object value){ 
  register_library("scheme_cyclone_primitives");
  c_schemecycloneprimitives_entry_pt_first_lambda(data, cont, argc, value);
}
