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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

#include "cyclone/types.h"
object __glo_lib_91init_117srfi128_srfi_128 = NULL;
object __glo_equal_91comparator_srfi_128 = NULL;
object __glo_eqv_91comparator_srfi_128 = NULL;
object __glo_eq_91comparator_srfi_128 = NULL;
object __glo_vector_91comparator_srfi_128 = NULL;
object __glo_list_91comparator_srfi_128 = NULL;
object __glo_pair_91comparator_srfi_128 = NULL;
object __glo_string_91ci_91comparator_srfi_128 = NULL;
object __glo_string_91comparator_srfi_128 = NULL;
object __glo_char_91ci_91comparator_srfi_128 = NULL;
object __glo_char_91comparator_srfi_128 = NULL;
object __glo_real_91comparator_srfi_128 = NULL;
object __glo_boolean_91comparator_srfi_128 = NULL;
object __glo_default_91comparator_srfi_128 = NULL;
object __glo_comparator_91min_srfi_128 = NULL;
object __glo_comparator_91max_srfi_128 = NULL;
object __glo_comparator_91min_91in_91list_srfi_128 = NULL;
object __glo_comparator_91max_91in_91list_srfi_128 = NULL;
object __glo_make_91default_91comparator_srfi_128 = NULL;
object __glo_default_91equality_srfi_128 = NULL;
object __glo_default_91ordering_srfi_128 = NULL;
object __glo_default_91hash_srfi_128 = NULL;
object __glo_dispatch_91ordering_srfi_128 = NULL;
object __glo_dispatch_91equality_srfi_128 = NULL;
object __glo_registered_91comparator_srfi_128 = NULL;
object __glo_registered_91index_srfi_128 = NULL;
object __glo_object_91type_srfi_128 = NULL;
object __glo_comparator_91register_91default_67_srfi_128 = NULL;
object __glo__85registered_91comparators_85_srfi_128 = NULL;
object __glo__85next_91comparator_91index_85_srfi_128 = NULL;
object __glo_first_91comparator_91index_srfi_128 = NULL;
object __glo_unknown_91object_91comparator_srfi_128 = NULL;
object __glo_string_91hash_srfi_128 = NULL;
object __glo_make_91vector_91hash_srfi_128 = NULL;
object __glo_make_91vector_121_127_srfi_128 = NULL;
object __glo_make_91vector_123_127_srfi_128 = NULL;
object __glo_make_91vector_91type_91test_srfi_128 = NULL;
object __glo_make_91vector_91comparator_srfi_128 = NULL;
object __glo_make_91list_91hash_srfi_128 = NULL;
object __glo_make_91list_121_127_srfi_128 = NULL;
object __glo_make_91list_123_127_srfi_128 = NULL;
object __glo_make_91list_91type_91test_srfi_128 = NULL;
object __glo_make_91list_91comparator_srfi_128 = NULL;
object __glo_make_91pair_91hash_srfi_128 = NULL;
object __glo_make_91pair_121_127_srfi_128 = NULL;
object __glo_make_91pair_123_127_srfi_128 = NULL;
object __glo_make_91pair_91type_91test_srfi_128 = NULL;
object __glo_make_91pair_91comparator_srfi_128 = NULL;
object __glo_make_91hasher_srfi_128 = NULL;
object __glo_make_91equal_91comparator_srfi_128 = NULL;
object __glo_make_91eqv_91comparator_srfi_128 = NULL;
object __glo_make_91eq_91comparator_srfi_128 = NULL;
object __glo_symbol_91hash_srfi_128 = NULL;
object __glo_symbol_121_127_srfi_128 = NULL;
object __glo_string_91ci_91hash_srfi_128 = NULL;
object __glo_complex_121_127_srfi_128 = NULL;
object __glo_number_91hash_srfi_128 = NULL;
object __glo_char_91ci_91hash_srfi_128 = NULL;
object __glo_char_91hash_srfi_128 = NULL;
object __glo_boolean_91hash_srfi_128 = NULL;
object __glo_boolean_121_127_191_191inline_191_191_srfi_128 = NULL;
object __glo_boolean_121_127_srfi_128 = NULL;
object __glo__125_123_127_srfi_128 = NULL;
object __glo__121_123_127_srfi_128 = NULL;
object __glo__125_127_srfi_128 = NULL;
object __glo__121_127_srfi_128 = NULL;
object __glo__123_127_srfi_128 = NULL;
object __glo_binary_125_123_127_srfi_128 = NULL;
object __glo_binary_121_123_127_srfi_128 = NULL;
object __glo_binary_125_127_srfi_128 = NULL;
object __glo_binary_121_127_srfi_128 = NULL;
object __glo_binary_123_127_srfi_128 = NULL;
object __glo_comparator_91hash_srfi_128 = NULL;
object __glo_comparator_91check_91type_srfi_128 = NULL;
object __glo_comparator_91test_91type_srfi_128 = NULL;
object __glo_make_91comparator_srfi_128 = NULL;
object __glo_make_91raw_91comparator_srfi_128 = NULL;
object __glo_comparator_91hashable_127_srfi_128 = NULL;
object __glo_comparator_91ordered_127_srfi_128 = NULL;
object __glo_comparator_91hash_91function_srfi_128 = NULL;
object __glo_comparator_91ordering_91predicate_srfi_128 = NULL;
object __glo_comparator_91equality_91predicate_srfi_128 = NULL;
object __glo_comparator_91type_91test_91predicate_srfi_128 = NULL;
object __glo_comparator_127_srfi_128 = NULL;
object __glo_comparator_srfi_128 = NULL;
object __glo_with_91hash_91salt_srfi_128 = NULL;
object __glo_hash_91salt_srfi_128 = NULL;
object __glo__75salt_75_srfi_128 = NULL;
object __glo_hash_91bound_srfi_128 = NULL;
object __glo_comparator_91if_121_123_125_srfi_128 = 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_case_91lambda_scheme_case_91lambda;
extern object __glo_char_91alphabetic_127_scheme__char;
extern object __glo_char_91downcase_scheme__char;
extern object __glo_char_91foldcase_scheme__char;
extern object __glo_char_91lower_91case_127_scheme__char;
extern object __glo_char_91numeric_127_scheme__char;
extern object __glo_char_91upcase_scheme__char;
extern object __glo_char_91upper_91case_127_scheme__char;
extern object __glo_char_91whitespace_127_scheme__char;
extern object __glo_char_91ci_121_123_127_scheme__char;
extern object __glo_char_91ci_121_127_scheme__char;
extern object __glo_char_91ci_123_127_scheme__char;
extern object __glo_char_91ci_125_123_127_scheme__char;
extern object __glo_char_91ci_125_127_scheme__char;
extern object __glo_digit_91value_scheme__char;
extern object __glo_string_91upcase_scheme__char;
extern object __glo_string_91downcase_scheme__char;
extern object __glo_string_91foldcase_scheme__char;
extern object __glo_string_91ci_121_123_127_scheme__char;
extern object __glo_string_91ci_121_127_scheme__char;
extern object __glo_string_91ci_123_127_scheme__char;
extern object __glo_string_91ci_125_123_127_scheme__char;
extern object __glo_string_91ci_125_127_scheme__char;
extern object __glo_angle_scheme_complex;
extern object __glo_imag_91part_scheme_complex;
extern object __glo_magnitude_scheme_complex;
extern object __glo_make_91polar_scheme_complex;
extern object __glo_make_91rectangular_scheme_complex;
extern object __glo_real_91part_scheme_complex;
extern object __glo_acos_scheme_inexact;
extern object __glo_asin_scheme_inexact;
extern object __glo_atan_scheme_inexact;
extern object __glo_cos_scheme_inexact;
extern object __glo_exp_scheme_inexact;
extern object __glo_finite_127_scheme_inexact;
extern object __glo_infinite_127_scheme_inexact;
extern object __glo_log_scheme_inexact;
extern object __glo_nan_127_scheme_inexact;
extern object __glo_sin_scheme_inexact;
extern object __glo_sqrt_scheme_inexact;
extern object __glo_tan_scheme_inexact;
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;
#include "cyclone/runtime.h"
defsymbol(comparator_127);
defsymbol(type_91test);
defsymbol(comparator_91type_91test_91predicate);
defsymbol(equality);
defsymbol(comparator_91equality_91predicate);
defsymbol(ordering);
defsymbol(comparator_91ordering_91predicate);
defsymbol(hash);
defsymbol(comparator_91hash_91function);
defsymbol(ordering_127);
defsymbol(comparator_91ordered_127);
defsymbol(hash_127);
defsymbol(comparator_91hashable_127);
defsymbol(unknown_91object_91comparator);
defsymbol(default_91comparator);
defsymbol(boolean_91comparator);
defsymbol(real_91comparator);
defsymbol(char_91comparator);
defsymbol(char_91ci_91comparator);
defsymbol(string_91comparator);
defsymbol(string_91ci_91comparator);
defsymbol(pair_91comparator);
defsymbol(list_91comparator);
defsymbol(vector_91comparator);
defsymbol(eq_91comparator);
defsymbol(eqv_91comparator);
defsymbol(equal_91comparator);
defsymbol(_85registered_91comparators_85);
defsymbol(_85next_91comparator_91index_85);
defsymbol(n);
defsymbol(obj);
defsymbol(hash_91func);
defsymbol(new_91salt);
defsymbol(parameterize);
defsymbol(_75salt_75);
defsymbol(_else);
defsymbol(_121_127);
defsymbol(comparator);
defsymbol(_123_127);
defsymbol(cond);
defsymbol(greater);
defsymbol(equal);
defsymbol(less);
defsymbol(b);
defsymbol(a);
defsymbol(make_91default_91comparator);
defsymbol(comparator_91if_121_123_125);
static void __lambda_436(void *data, object clo, int argc, object *args) ;/*closure _,object k_731937*/
static void __lambda_437(void *data, object clo, int argc, object *args) ;/*object self_732426, object r_732029*/
static void __lambda_438(void *data, object clo, int argc, object *args) ;/*object self_732427, object r_731939*/
static void __lambda_439(void *data, object clo, int argc, object *args) ;/*object self_732428, object r_732026*/
static void __lambda_440(void *data, object clo, int argc, object *args) ;/*object self_732429, object r_731940*/
static void __lambda_441(void *data, object clo, int argc, object *args) ;/*object self_732430, object r_732024*/
static void __lambda_442(void *data, object clo, int argc, object *args) ;/*object self_732431, object r_731941*/
static void __lambda_443(void *data, object clo, int argc, object *args) ;/*object self_732432, object r_732022*/
static void __lambda_444(void *data, object clo, int argc, object *args) ;/*object self_732433, object r_732020*/
static void __lambda_445(void *data, object clo, int argc, object *args) ;/*object self_732434, object r_731942*/
static void __lambda_446(void *data, object clo, int argc, object *args) ;/*object self_732435, object r_732018*/
static void __lambda_447(void *data, object clo, int argc, object *args) ;/*object self_732436, object r_732016*/
static void __lambda_448(void *data, object clo, int argc, object *args) ;/*object self_732437, object r_731943*/
static void __lambda_449(void *data, object clo, int argc, object *args) ;/*object self_732438, object r_732014*/
static void __lambda_450(void *data, object clo, int argc, object *args) ;/*object self_732439, object r_732012*/
static void __lambda_451(void *data, object clo, int argc, object *args) ;/*object self_732440, object r_731944*/
static void __lambda_452(void *data, object clo, int argc, object *args) ;/*object self_732441, object r_732010*/
static void __lambda_453(void *data, object clo, int argc, object *args) ;/*object self_732442, object r_732008*/
static void __lambda_454(void *data, object clo, int argc, object *args) ;/*object self_732443, object r_731945*/
static void __lambda_455(void *data, object clo, int argc, object *args) ;/*object self_732444, object r_732006*/
static void __lambda_456(void *data, object clo, int argc, object *args) ;/*object self_732445, object r_732004*/
static void __lambda_457(void *data, object clo, int argc, object *args) ;/*object self_732446, object r_731946*/
static void __lambda_458(void *data, object clo, int argc, object *args) ;/*object self_732447, object r_732002*/
static void __lambda_459(void *data, object clo, int argc, object *args) ;/*object self_732448, object r_732000*/
static void __lambda_460(void *data, object clo, int argc, object *args) ;/*object self_732449, object r_731947*/
static void __lambda_503(void *data, object clo, int argc, object *args) ;/*object self_732450, object k_731999, object obj_73629_73742_731099*/
static void __lambda_461(void *data, object clo, int argc, object *args) ;/*object self_732451, object r_731992*/
static void __lambda_502(void *data, object clo, int argc, object *args) ;/*object self_732452, object k_731998, object a_73630_73743_731100, object b_73631_73744_731101*/
static void __lambda_462(void *data, object clo, int argc, object *args) ;/*object self_732453, object r_731993*/
static void __lambda_501(void *data, object clo, int argc, object *args) ;/*object self_732454, object k_731997, object a_73632_73745_731102, object b_73633_73746_731103*/
static void __lambda_463(void *data, object clo, int argc, object *args) ;/*object self_732455, object r_731994*/
static void __lambda_500(void *data, object clo, int argc, object *args) ;/*object self_732456, object k_731996, object obj_73634_73747_731104*/
static void __lambda_464(void *data, object clo, int argc, object *args) ;/*object self_732457, object r_731995*/
static void __lambda_465(void *data, object clo, int argc, object *args) ;/*object self_732458, object r_731991*/
static void __lambda_466(void *data, object clo, int argc, object *args) ;/*object self_732459, object r_731954*/
static void __lambda_467(void *data, object clo, int argc, object *args) ;/*object self_732460, object r_731955*/
static void __lambda_468(void *data, object clo, int argc, object *args) ;/*object self_732461, object r_731989*/
static void __lambda_469(void *data, object clo, int argc, object *args) ;/*object self_732462, object r_731956*/
static void __lambda_499(void *data, object clo, int argc, object *args) ;/*object self_732463, object k_731988, object x_73737_73748_731105, object y_73738_73749_731106*/
static void __lambda_470(void *data, object clo, int argc, object *args) ;/*object self_732464, object r_731987*/
static void __lambda_471(void *data, object clo, int argc, object *args) ;/*object self_732465, object r_731986*/
static void __lambda_472(void *data, object clo, int argc, object *args) ;/*object self_732466, object r_731957*/
static void __lambda_473(void *data, object clo, int argc, object *args) ;/*object self_732467, object r_731985*/
static void __lambda_474(void *data, object clo, int argc, object *args) ;/*object self_732468, object r_731958*/
static void __lambda_498(void *data, object clo, int argc, object *args) ;/*object self_732469, object k_731983, object c_73740_73750_731107*/
static void __lambda_475(void *data, object clo, int argc, object *args) ;/*object self_732470, object r_731982*/
static void __lambda_476(void *data, object clo, int argc, object *args) ;/*object self_732471, object r_731981*/
static void __lambda_477(void *data, object clo, int argc, object *args) ;/*object self_732472, object r_731959*/
static void __lambda_496(void *data, object clo, int argc, object *args) ;/*object self_732473, object k_731978, object c_73741_73751_731108*/
static void __lambda_497(void *data, object clo, int argc, object *args) ;/*object self_732474, object r_731980*/
static void __lambda_478(void *data, object clo, int argc, object *args) ;/*object self_732475, object r_731977*/
static void __lambda_479(void *data, object clo, int argc, object *args) ;/*object self_732476, object r_731976*/
static void __lambda_480(void *data, object clo, int argc, object *args) ;/*object self_732477, object r_731960*/
static void __lambda_481(void *data, object clo, int argc, object *args) ;/*object self_732478, object r_731975*/
static void __lambda_482(void *data, object clo, int argc, object *args) ;/*object self_732479, object r_731961*/
static void __lambda_483(void *data, object clo, int argc, object *args) ;/*object self_732480, object r_731974*/
static void __lambda_484(void *data, object clo, int argc, object *args) ;/*object self_732481, object r_731962*/
static void __lambda_485(void *data, object clo, int argc, object *args) ;/*object self_732482, object r_731973*/
static void __lambda_486(void *data, object clo, int argc, object *args) ;/*object self_732483, object r_731963*/
static void __lambda_487(void *data, object clo, int argc, object *args) ;/*object self_732484, object r_731972*/
static void __lambda_488(void *data, object clo, int argc, object *args) ;/*object self_732485, object r_731964*/
static void __lambda_489(void *data, object clo, int argc, object *args) ;/*object self_732486, object r_731971*/
static void __lambda_490(void *data, object clo, int argc, object *args) ;/*object self_732487, object r_731965*/
static void __lambda_491(void *data, object clo, int argc, object *args) ;/*object self_732488, object r_731970*/
static void __lambda_492(void *data, object clo, int argc, object *args) ;/*object self_732489, object r_731966*/
static void __lambda_493(void *data, object clo, int argc, object *args) ;/*object self_732490, object r_731969*/
static void __lambda_494(void *data, object clo, int argc, object *args) ;/*object self_732491, object r_731967*/
static void __lambda_495(void *data, object clo, int argc, object *args) ;/*object self_732492, object r_731968*/
static void __lambda_435(void *data, object clo, int argc, object *args) ;/*closure _,object k_731908, object comp_73735_731097, object args_73736_731098_raw, ...*/
static void __lambda_434(void *data, object clo, int argc, object *args) ;/*closure _,object k_731905, object comp_73733_731095, object args_73734_731096_raw, ...*/
static void __lambda_426(void *data, object clo, int argc, object *args) ;/*closure _,object k_731890, object comp_73724_731087, object list_73725_731088*/
static void __lambda_427(void *data, object clo, int argc, object *args) ;/*object self_732418, object _121_73726_731089*/
static void __lambda_428(void *data, object clo, int argc, object *args) ;/*object self_732419, object min_73728_731090, object list_73729_731091*/
static void __lambda_429(void *data, object clo, int argc, object *args) ;/*object self_732420, object loop_73730_731092*/
static void __lambda_521(void *data, object clo, int argc, object *args) ;/*object self_732421, object loop_73730_731092*/
static void __lambda_432(void *data, object clo, int argc, object *args) ;/*object self_732422, object k_731896, object min_73731_731093, object list_73732_731094*/
static void __lambda_433(void *data, object clo, int argc, object *args) ;/*object self_732423, object r_731898*/
static void __lambda_430(void *data, object clo, int argc, object *args) ;/*object self_732424, object r_731895*/
static void __lambda_431(void *data, object clo, int argc, object *args) ;/*object self_732425, object r_731894*/
static void __lambda_418(void *data, object clo, int argc, object *args) ;/*closure _,object k_731875, object comp_73715_731079, object list_73716_731080*/
static void __lambda_419(void *data, object clo, int argc, object *args) ;/*object self_732410, object _121_73717_731081*/
static void __lambda_420(void *data, object clo, int argc, object *args) ;/*object self_732411, object max_73719_731082, object list_73720_731083*/
static void __lambda_421(void *data, object clo, int argc, object *args) ;/*object self_732412, object loop_73721_731084*/
static void __lambda_520(void *data, object clo, int argc, object *args) ;/*object self_732413, object loop_73721_731084*/
static void __lambda_424(void *data, object clo, int argc, object *args) ;/*object self_732414, object k_731881, object max_73722_731085, object list_73723_731086*/
static void __lambda_425(void *data, object clo, int argc, object *args) ;/*object self_732415, object r_731883*/
static void __lambda_422(void *data, object clo, int argc, object *args) ;/*object self_732416, object r_731880*/
static void __lambda_423(void *data, object clo, int argc, object *args) ;/*object self_732417, object r_731879*/
static void __lambda_415(void *data, object clo, int argc, object *args) ;/*closure _,object k_731870*/
static void __lambda_417(void *data, object clo, int argc, object *args) ;/*object self_732408, object k_731872, object obj_73714_731078*/
static void __lambda_416(void *data, object clo, int argc, object *args) ;/*object self_732409, object r_731871*/
static void __lambda_411(void *data, object clo, int argc, object *args) ;/*closure _,object k_731864, object a_73710_731074, object b_73711_731075*/
static void __lambda_412(void *data, object clo, int argc, object *args) ;/*object self_732405, object r_731865*/
static void __lambda_413(void *data, object clo, int argc, object *args) ;/*object self_732406, object r_731866*/
static void __lambda_414(void *data, object clo, int argc, object *args) ;/*object self_732407, object a_91type_73712_731076, object b_91type_73713_731077*/
static void __lambda_407(void *data, object clo, int argc, object *args) ;/*closure _,object k_731857, object a_73699_731070, object b_73700_731071*/
static void __lambda_408(void *data, object clo, int argc, object *args) ;/*object self_732402, object r_731858*/
static void __lambda_409(void *data, object clo, int argc, object *args) ;/*object self_732403, object r_731859*/
static void __lambda_410(void *data, object clo, int argc, object *args) ;/*object self_732404, object a_91type_73701_731072, object b_91type_73702_731073*/
static void __lambda_396(void *data, object clo, int argc, object *args) ;/*closure _,object k_731826, object obj_73694_731068*/
static void __lambda_397(void *data, object clo, int argc, object *args) ;/*object self_732392, object tmp_73695_73698_731069*/
static void __lambda_405(void *data, object clo, int argc, object *args) ;/*object self_732400, object r_731845*/
static void __lambda_406(void *data, object clo, int argc, object *args) ;/*object self_732401, object r_731844_732034*/
static void __lambda_403(void *data, object clo, int argc, object *args) ;/*object self_732398, object r_731843*/
static void __lambda_404(void *data, object clo, int argc, object *args) ;/*object self_732399, object r_731842*/
static void __lambda_401(void *data, object clo, int argc, object *args) ;/*object self_732396, object r_731840*/
static void __lambda_402(void *data, object clo, int argc, object *args) ;/*object self_732397, object r_731839*/
static void __lambda_398(void *data, object clo, int argc, object *args) ;/*object self_732393, object r_731831*/
static void __lambda_399(void *data, object clo, int argc, object *args) ;/*object self_732394, object r_731832*/
static void __lambda_400(void *data, object clo, int argc, object *args) ;/*object self_732395, object r_731830*/
static void __lambda_386(void *data, object clo, int argc, object *args) ;/*closure _,object k_731797, object type_73687_731064, object a_73688_731065, object b_73689_731066*/
static void __lambda_387(void *data, object clo, int argc, object *args) ;/*object self_732383, object tmp_73690_73693_731067*/
static void __lambda_395(void *data, object clo, int argc, object *args) ;/*object self_732391, object r_731814_732033*/
static void __lambda_393(void *data, object clo, int argc, object *args) ;/*object self_732389, object r_731813*/
static void __lambda_394(void *data, object clo, int argc, object *args) ;/*object self_732390, object r_731812*/
static void __lambda_391(void *data, object clo, int argc, object *args) ;/*object self_732387, object r_731810*/
static void __lambda_392(void *data, object clo, int argc, object *args) ;/*object self_732388, object r_731809*/
static void __lambda_388(void *data, object clo, int argc, object *args) ;/*object self_732384, object r_731801*/
static void __lambda_389(void *data, object clo, int argc, object *args) ;/*object self_732385, object r_731802*/
static void __lambda_390(void *data, object clo, int argc, object *args) ;/*object self_732386, object r_731800*/
static void __lambda_376(void *data, object clo, int argc, object *args) ;/*closure _,object k_731768, object type_73680_731060, object a_73681_731061, object b_73682_731062*/
static void __lambda_377(void *data, object clo, int argc, object *args) ;/*object self_732374, object tmp_73683_73686_731063*/
static void __lambda_385(void *data, object clo, int argc, object *args) ;/*object self_732382, object r_731785_732032*/
static void __lambda_383(void *data, object clo, int argc, object *args) ;/*object self_732380, object r_731784*/
static void __lambda_384(void *data, object clo, int argc, object *args) ;/*object self_732381, object r_731783*/
static void __lambda_381(void *data, object clo, int argc, object *args) ;/*object self_732378, object r_731781*/
static void __lambda_382(void *data, object clo, int argc, object *args) ;/*object self_732379, object r_731780*/
static void __lambda_378(void *data, object clo, int argc, object *args) ;/*object self_732375, object r_731772*/
static void __lambda_379(void *data, object clo, int argc, object *args) ;/*object self_732376, object r_731773*/
static void __lambda_380(void *data, object clo, int argc, object *args) ;/*object self_732377, object r_731771*/
static void __lambda_375(void *data, object clo, int argc, object *args) ;/*closure _,object k_731764, object i_73679_731059*/
static void __lambda_368(void *data, object clo, int argc, object *args) ;/*closure _,object k_731753, object obj_73665_731053*/
static void __lambda_369(void *data, object clo, int argc, object *args) ;/*object self_732367, object registry_73668_731055*/
static void __lambda_370(void *data, object clo, int argc, object *args) ;/*object self_732368, object loop_73669_731056*/
static void __lambda_519(void *data, object clo, int argc, object *args) ;/*object self_732369, object loop_73669_731056*/
static void __lambda_373(void *data, object clo, int argc, object *args) ;/*object self_732370, object k_731756, object i_73670_731057, object registry_73671_731058*/
static void __lambda_374(void *data, object clo, int argc, object *args) ;/*object self_732371, object r_731758*/
static void __lambda_371(void *data, object clo, int argc, object *args) ;/*object self_732372, object r_731755*/
static void __lambda_372(void *data, object clo, int argc, object *args) ;/*object self_732373, object r_731754*/
static void __lambda_366(void *data, object clo, int argc, object *args) ;/*closure _,object k_731741, object obj_73636_731052*/
static void __lambda_367(void *data, object clo, int argc, object *args) ;/*object self_732366, object r_731750*/
static void __lambda_362(void *data, object clo, int argc, object *args) ;/*closure _,object k_731735, object comparator_73635_731051*/
static void __lambda_363(void *data, object clo, int argc, object *args) ;/*object self_732363, object r_731738*/
static void __lambda_364(void *data, object clo, int argc, object *args) ;/*object self_732364, object r_731736*/
static void __lambda_365(void *data, object clo, int argc, object *args) ;/*object self_732365, object r_731737*/
static void __lambda_354(void *data, object clo, int argc, object *args) ;/*closure _,object k_731714, object obj_73618_731045*/
static void __lambda_355(void *data, object clo, int argc, object *args) ;/*object self_732355, object r_731715*/
static void __lambda_356(void *data, object clo, int argc, object *args) ;/*object self_732356, object acc_73619_731046, object len_73620_731047*/
static void __lambda_357(void *data, object clo, int argc, object *args) ;/*object self_732357, object loop_73623_731049*/
static void __lambda_518(void *data, object clo, int argc, object *args) ;/*object self_732358, object loop_73623_731049*/
static void __lambda_360(void *data, object clo, int argc, object *args) ;/*object self_732359, object k_731719, object n_73624_731050*/
static void __lambda_361(void *data, object clo, int argc, object *args) ;/*object self_732360, object r_731721*/
static void __lambda_358(void *data, object clo, int argc, object *args) ;/*object self_732361, object r_731718*/
static void __lambda_359(void *data, object clo, int argc, object *args) ;/*object self_732362, object r_731717*/
static void __lambda_340(void *data, object clo, int argc, object *args) ;/*closure _,object k_731699, object element_91comparator_73602_731034, object type_91test_73603_731035, object length_73604_731036, object ref_73605_731037*/
static void __lambda_341(void *data, object clo, int argc, object *args) ;/*object self_732341, object k_731700, object obj_73606_731038*/
static void __lambda_342(void *data, object clo, int argc, object *args) ;/*object self_732342, object r_731701*/
static void __lambda_343(void *data, object clo, int argc, object *args) ;/*object self_732343, object r_731702*/
static void __lambda_344(void *data, object clo, int argc, object *args) ;/*object self_732344, object r_731703*/
static void __lambda_345(void *data, object clo, int argc, object *args) ;/*object self_732345, object elem_91hash_73607_731039, object acc_73608_731040, object len_73609_731041*/
static void __lambda_346(void *data, object clo, int argc, object *args) ;/*object self_732346, object loop_73612_731043*/
static void __lambda_517(void *data, object clo, int argc, object *args) ;/*object self_732347, object loop_73612_731043*/
static void __lambda_349(void *data, object clo, int argc, object *args) ;/*object self_732348, object k_731706, object n_73613_731044*/
static void __lambda_350(void *data, object clo, int argc, object *args) ;/*object self_732349, object r_731711*/
static void __lambda_351(void *data, object clo, int argc, object *args) ;/*object self_732350, object r_731710*/
static void __lambda_352(void *data, object clo, int argc, object *args) ;/*object self_732351, object r_731708*/
static void __lambda_353(void *data, object clo, int argc, object *args) ;/*object self_732352, object r_731709*/
static void __lambda_347(void *data, object clo, int argc, object *args) ;/*object self_732353, object r_731705*/
static void __lambda_348(void *data, object clo, int argc, object *args) ;/*object self_732354, object r_731704*/
static void __lambda_320(void *data, object clo, int argc, object *args) ;/*closure _,object k_731675, object element_91comparator_73572_731022, object type_91test_73573_731023, object length_73574_731024, object ref_73575_731025*/
static void __lambda_321(void *data, object clo, int argc, object *args) ;/*object self_732321, object k_731676, object a_73576_731026, object b_73577_731027*/
static void __lambda_322(void *data, object clo, int argc, object *args) ;/*object self_732322, object r_731695*/
static void __lambda_323(void *data, object clo, int argc, object *args) ;/*object self_732323, object r_731696*/
static void __lambda_324(void *data, object clo, int argc, object *args) ;/*object self_732324, object r_731693*/
static void __lambda_325(void *data, object clo, int argc, object *args) ;/*object self_732325, object r_731694*/
static void __lambda_326(void *data, object clo, int argc, object *args) ;/*object self_732326, object r_731679*/
static void __lambda_327(void *data, object clo, int argc, object *args) ;/*object self_732327, object r_731680*/
static void __lambda_328(void *data, object clo, int argc, object *args) ;/*object self_732328, object r_731681*/
static void __lambda_329(void *data, object clo, int argc, object *args) ;/*object self_732329, object elem_123_127_73585_731028, object elem_121_127_73586_731029, object len_73587_731030*/
static void __lambda_330(void *data, object clo, int argc, object *args) ;/*object self_732330, object loop_73590_731032*/
static void __lambda_516(void *data, object clo, int argc, object *args) ;/*object self_732331, object loop_73590_731032*/
static void __lambda_333(void *data, object clo, int argc, object *args) ;/*object self_732332, object k_731684, object n_73591_731033*/
static void __lambda_334(void *data, object clo, int argc, object *args) ;/*object self_732333, object r_731691*/
static void __lambda_335(void *data, object clo, int argc, object *args) ;/*object self_732334, object r_731692*/
static void __lambda_336(void *data, object clo, int argc, object *args) ;/*object self_732335, object r_731686*/
static void __lambda_337(void *data, object clo, int argc, object *args) ;/*object self_732336, object r_731689*/
static void __lambda_338(void *data, object clo, int argc, object *args) ;/*object self_732337, object r_731690*/
static void __lambda_339(void *data, object clo, int argc, object *args) ;/*object self_732338, object r_731688*/
static void __lambda_331(void *data, object clo, int argc, object *args) ;/*object self_732339, object r_731683*/
static void __lambda_332(void *data, object clo, int argc, object *args) ;/*object self_732340, object r_731682*/
static void __lambda_306(void *data, object clo, int argc, object *args) ;/*closure _,object k_731658, object element_91comparator_73552_731011, object type_91test_73553_731012, object length_73554_731013, object ref_73555_731014*/
static void __lambda_307(void *data, object clo, int argc, object *args) ;/*object self_732307, object k_731659, object a_73556_731015, object b_73557_731016*/
static void __lambda_308(void *data, object clo, int argc, object *args) ;/*object self_732308, object r_731671*/
static void __lambda_309(void *data, object clo, int argc, object *args) ;/*object self_732309, object r_731672*/
static void __lambda_310(void *data, object clo, int argc, object *args) ;/*object self_732310, object r_731661*/
static void __lambda_311(void *data, object clo, int argc, object *args) ;/*object self_732311, object r_731662*/
static void __lambda_312(void *data, object clo, int argc, object *args) ;/*object self_732312, object elem_123_127_73559_731017, object len_73560_731018*/
static void __lambda_313(void *data, object clo, int argc, object *args) ;/*object self_732313, object loop_73563_731020*/
static void __lambda_515(void *data, object clo, int argc, object *args) ;/*object self_732314, object loop_73563_731020*/
static void __lambda_316(void *data, object clo, int argc, object *args) ;/*object self_732315, object k_731665, object n_73564_731021*/
static void __lambda_317(void *data, object clo, int argc, object *args) ;/*object self_732316, object r_731669*/
static void __lambda_318(void *data, object clo, int argc, object *args) ;/*object self_732317, object r_731670*/
static void __lambda_319(void *data, object clo, int argc, object *args) ;/*object self_732318, object r_731667*/
static void __lambda_314(void *data, object clo, int argc, object *args) ;/*object self_732319, object r_731664*/
static void __lambda_315(void *data, object clo, int argc, object *args) ;/*object self_732320, object r_731663*/
static void __lambda_294(void *data, object clo, int argc, object *args) ;/*closure _,object k_731644, object element_91comparator_73533_731001, object type_91test_73534_731002, object length_73535_731003, object ref_73536_731004*/
static void __lambda_295(void *data, object clo, int argc, object *args) ;/*object self_732295, object k_731645, object obj_73537_731005*/
static void __lambda_296(void *data, object clo, int argc, object *args) ;/*object self_732296, object r_731646*/
static void __lambda_297(void *data, object clo, int argc, object *args) ;/*object self_732297, object r_731647*/
static void __lambda_298(void *data, object clo, int argc, object *args) ;/*object self_732298, object r_731648*/
static void __lambda_299(void *data, object clo, int argc, object *args) ;/*object self_732299, object elem_91type_91test_73539_731006, object len_73540_731007*/
static void __lambda_300(void *data, object clo, int argc, object *args) ;/*object self_732300, object loop_73543_731009*/
static void __lambda_514(void *data, object clo, int argc, object *args) ;/*object self_732301, object loop_73543_731009*/
static void __lambda_303(void *data, object clo, int argc, object *args) ;/*object self_732302, object k_731651, object n_73544_731010*/
static void __lambda_304(void *data, object clo, int argc, object *args) ;/*object self_732303, object r_731655*/
static void __lambda_305(void *data, object clo, int argc, object *args) ;/*object self_732304, object r_731653*/
static void __lambda_301(void *data, object clo, int argc, object *args) ;/*object self_732305, object r_731650*/
static void __lambda_302(void *data, object clo, int argc, object *args) ;/*object self_732306, object r_731649*/
static void __lambda_289(void *data, object clo, int argc, object *args) ;/*closure _,object k_731637, object element_91comparator_73529_73997, object type_91test_73530_73998, object length_73531_73999, object ref_73532_731000*/
static void __lambda_290(void *data, object clo, int argc, object *args) ;/*object self_732291, object r_731638*/
static void __lambda_291(void *data, object clo, int argc, object *args) ;/*object self_732292, object r_731639*/
static void __lambda_292(void *data, object clo, int argc, object *args) ;/*object self_732293, object r_731640*/
static void __lambda_293(void *data, object clo, int argc, object *args) ;/*object self_732294, object r_731641*/
static void __lambda_274(void *data, object clo, int argc, object *args) ;/*closure _,object k_731623, object element_91comparator_73513_73986, object type_91test_73514_73987, object empty_127_73515_73988, object head_73516_73989, object tail_73517_73990*/
static void __lambda_275(void *data, object clo, int argc, object *args) ;/*object self_732276, object k_731624, object obj_73518_73991*/
static void __lambda_276(void *data, object clo, int argc, object *args) ;/*object self_732277, object r_731625*/
static void __lambda_277(void *data, object clo, int argc, object *args) ;/*object self_732278, object r_731626*/
static void __lambda_278(void *data, object clo, int argc, object *args) ;/*object self_732279, object elem_91hash_73519_73992, object acc_73520_73993*/
static void __lambda_279(void *data, object clo, int argc, object *args) ;/*object self_732280, object obj_73522_73994*/
static void __lambda_280(void *data, object clo, int argc, object *args) ;/*object self_732281, object loop_73523_73995*/
static void __lambda_513(void *data, object clo, int argc, object *args) ;/*object self_732282, object loop_73523_73995*/
static void __lambda_283(void *data, object clo, int argc, object *args) ;/*object self_732283, object k_731629, object obj_73524_73996*/
static void __lambda_284(void *data, object clo, int argc, object *args) ;/*object self_732284, object r_731630*/
static void __lambda_285(void *data, object clo, int argc, object *args) ;/*object self_732285, object r_731634*/
static void __lambda_286(void *data, object clo, int argc, object *args) ;/*object self_732286, object r_731633*/
static void __lambda_287(void *data, object clo, int argc, object *args) ;/*object self_732287, object r_731631*/
static void __lambda_288(void *data, object clo, int argc, object *args) ;/*object self_732288, object r_731632*/
static void __lambda_281(void *data, object clo, int argc, object *args) ;/*object self_732289, object r_731628*/
static void __lambda_282(void *data, object clo, int argc, object *args) ;/*object self_732290, object r_731627*/
static void __lambda_250(void *data, object clo, int argc, object *args) ;/*closure _,object k_731600, object element_91comparator_73479_73971, object type_91test_73480_73972, object empty_127_73481_73973, object head_73482_73974, object tail_73483_73975*/
static void __lambda_251(void *data, object clo, int argc, object *args) ;/*object self_732252, object k_731601, object a_73484_73976, object b_73485_73977*/
static void __lambda_252(void *data, object clo, int argc, object *args) ;/*object self_732253, object r_731602*/
static void __lambda_253(void *data, object clo, int argc, object *args) ;/*object self_732254, object r_731603*/
static void __lambda_254(void *data, object clo, int argc, object *args) ;/*object self_732255, object elem_123_127_73486_73978, object elem_121_127_73487_73979*/
static void __lambda_255(void *data, object clo, int argc, object *args) ;/*object self_732256, object a_73489_73980, object b_73490_73981*/
static void __lambda_256(void *data, object clo, int argc, object *args) ;/*object self_732257, object loop_73491_73982*/
static void __lambda_512(void *data, object clo, int argc, object *args) ;/*object self_732258, object loop_73491_73982*/
static void __lambda_259(void *data, object clo, int argc, object *args) ;/*object self_732259, object k_731606, object a_73492_73983, object b_73493_73984*/
static void __lambda_263(void *data, object clo, int argc, object *args) ;/*object self_732260, object tmp_73495_73497_73985*/
static void __lambda_264(void *data, object clo, int argc, object *args) ;/*object self_732261, object r_731608*/
static void __lambda_265(void *data, object clo, int argc, object *args) ;/*object self_732262, object r_731609*/
static void __lambda_266(void *data, object clo, int argc, object *args) ;/*object self_732263, object r_731616*/
static void __lambda_267(void *data, object clo, int argc, object *args) ;/*object self_732264, object r_731617*/
static void __lambda_268(void *data, object clo, int argc, object *args) ;/*object self_732265, object r_731610*/
static void __lambda_271(void *data, object clo, int argc, object *args) ;/*object self_732268, object r_731614*/
static void __lambda_272(void *data, object clo, int argc, object *args) ;/*object self_732269, object r_731615*/
static void __lambda_273(void *data, object clo, int argc, object *args) ;/*object self_732270, object r_731613*/
static void __lambda_269(void *data, object clo, int argc, object *args) ;/*object self_732266, object r_731611*/
static void __lambda_270(void *data, object clo, int argc, object *args) ;/*object self_732267, object r_731612*/
static void __lambda_260(void *data, object clo, int argc, object *args) ;/*object self_732271, object k_731618*/
static void __lambda_261(void *data, object clo, int argc, object *args) ;/*object self_732272, object r_731619*/
static void __lambda_262(void *data, object clo, int argc, object *args) ;/*object self_732273, object r_731620*/
static void __lambda_257(void *data, object clo, int argc, object *args) ;/*object self_732274, object r_731605*/
static void __lambda_258(void *data, object clo, int argc, object *args) ;/*object self_732275, object r_731604*/
static void __lambda_231(void *data, object clo, int argc, object *args) ;/*closure _,object k_731581, object element_91comparator_73449_73957, object type_91test_73450_73958, object empty_127_73451_73959, object head_73452_73960, object tail_73453_73961*/
static void __lambda_232(void *data, object clo, int argc, object *args) ;/*object self_732233, object k_731582, object a_73454_73962, object b_73455_73963*/
static void __lambda_233(void *data, object clo, int argc, object *args) ;/*object self_732234, object elem_123_127_73456_73964*/
static void __lambda_234(void *data, object clo, int argc, object *args) ;/*object self_732235, object a_73458_73965, object b_73459_73966*/
static void __lambda_235(void *data, object clo, int argc, object *args) ;/*object self_732236, object loop_73460_73967*/
static void __lambda_511(void *data, object clo, int argc, object *args) ;/*object self_732237, object loop_73460_73967*/
static void __lambda_238(void *data, object clo, int argc, object *args) ;/*object self_732238, object k_731586, object a_73461_73968, object b_73462_73969*/
static void __lambda_242(void *data, object clo, int argc, object *args) ;/*object self_732239, object tmp_73464_73466_73970*/
static void __lambda_243(void *data, object clo, int argc, object *args) ;/*object self_732240, object r_731588*/
static void __lambda_244(void *data, object clo, int argc, object *args) ;/*object self_732241, object r_731589*/
static void __lambda_245(void *data, object clo, int argc, object *args) ;/*object self_732242, object r_731593*/
static void __lambda_246(void *data, object clo, int argc, object *args) ;/*object self_732243, object r_731594*/
static void __lambda_247(void *data, object clo, int argc, object *args) ;/*object self_732244, object r_731590*/
static void __lambda_248(void *data, object clo, int argc, object *args) ;/*object self_732245, object r_731591*/
static void __lambda_249(void *data, object clo, int argc, object *args) ;/*object self_732246, object r_731592*/
static void __lambda_239(void *data, object clo, int argc, object *args) ;/*object self_732247, object k_731595*/
static void __lambda_240(void *data, object clo, int argc, object *args) ;/*object self_732248, object r_731596*/
static void __lambda_241(void *data, object clo, int argc, object *args) ;/*object self_732249, object r_731597*/
static void __lambda_236(void *data, object clo, int argc, object *args) ;/*object self_732250, object r_731585*/
static void __lambda_237(void *data, object clo, int argc, object *args) ;/*object self_732251, object r_731584*/
static void __lambda_218(void *data, object clo, int argc, object *args) ;/*closure _,object k_731568, object element_91comparator_73430_73947, object type_91test_73431_73948, object empty_127_73432_73949, object head_73433_73950, object tail_73434_73951*/
static void __lambda_219(void *data, object clo, int argc, object *args) ;/*object self_732220, object k_731569, object obj_73435_73952*/
static void __lambda_220(void *data, object clo, int argc, object *args) ;/*object self_732221, object r_731570*/
static void __lambda_221(void *data, object clo, int argc, object *args) ;/*object self_732222, object elem_91type_91test_73437_73953*/
static void __lambda_222(void *data, object clo, int argc, object *args) ;/*object self_732223, object obj_73439_73954*/
static void __lambda_223(void *data, object clo, int argc, object *args) ;/*object self_732224, object loop_73440_73955*/
static void __lambda_510(void *data, object clo, int argc, object *args) ;/*object self_732225, object loop_73440_73955*/
static void __lambda_226(void *data, object clo, int argc, object *args) ;/*object self_732226, object k_731574, object obj_73441_73956*/
static void __lambda_227(void *data, object clo, int argc, object *args) ;/*object self_732227, object r_731575*/
static void __lambda_228(void *data, object clo, int argc, object *args) ;/*object self_732228, object r_731578*/
static void __lambda_229(void *data, object clo, int argc, object *args) ;/*object self_732229, object r_731576*/
static void __lambda_230(void *data, object clo, int argc, object *args) ;/*object self_732230, object r_731577*/
static void __lambda_224(void *data, object clo, int argc, object *args) ;/*object self_732231, object r_731573*/
static void __lambda_225(void *data, object clo, int argc, object *args) ;/*object self_732232, object r_731572*/
static void __lambda_213(void *data, object clo, int argc, object *args) ;/*closure _,object k_731561, object element_91comparator_73425_73942, object type_91test_73426_73943, object empty_127_73427_73944, object head_73428_73945, object tail_73429_73946*/
static void __lambda_214(void *data, object clo, int argc, object *args) ;/*object self_732216, object r_731562*/
static void __lambda_215(void *data, object clo, int argc, object *args) ;/*object self_732217, object r_731563*/
static void __lambda_216(void *data, object clo, int argc, object *args) ;/*object self_732218, object r_731564*/
static void __lambda_217(void *data, object clo, int argc, object *args) ;/*object self_732219, object r_731565*/
static void __lambda_206(void *data, object clo, int argc, object *args) ;/*closure _,object k_731550, object car_91comparator_73416_73938, object cdr_91comparator_73417_73939*/
static void __lambda_207(void *data, object clo, int argc, object *args) ;/*object self_732210, object k_731551, object obj_73418_73940*/
static void __lambda_208(void *data, object clo, int argc, object *args) ;/*object self_732211, object acc_73419_73941*/
static void __lambda_209(void *data, object clo, int argc, object *args) ;/*object self_732212, object r_731557*/
static void __lambda_210(void *data, object clo, int argc, object *args) ;/*object self_732213, object r_731553*/
static void __lambda_211(void *data, object clo, int argc, object *args) ;/*object self_732214, object r_731555*/
static void __lambda_212(void *data, object clo, int argc, object *args) ;/*object self_732215, object r_731554*/
static void __lambda_203(void *data, object clo, int argc, object *args) ;/*closure _,object k_731539, object car_91comparator_73412_73934, object cdr_91comparator_73413_73935*/
static void __lambda_204(void *data, object clo, int argc, object *args) ;/*object self_732208, object k_731540, object a_73414_73936, object b_73415_73937*/
static void __lambda_205(void *data, object clo, int argc, object *args) ;/*object self_732209, object r_731541*/
static void __lambda_197(void *data, object clo, int argc, object *args) ;/*closure _,object k_731528, object car_91comparator_73407_73930, object cdr_91comparator_73408_73931*/
static void __lambda_198(void *data, object clo, int argc, object *args) ;/*object self_732203, object k_731529, object a_73409_73932, object b_73410_73933*/
static void __lambda_199(void *data, object clo, int argc, object *args) ;/*object self_732204, object r_731534*/
static void __lambda_200(void *data, object clo, int argc, object *args) ;/*object self_732205, object r_731530*/
static void __lambda_201(void *data, object clo, int argc, object *args) ;/*object self_732206, object r_731531*/
static void __lambda_202(void *data, object clo, int argc, object *args) ;/*object self_732207, object r_731532*/
static void __lambda_194(void *data, object clo, int argc, object *args) ;/*closure _,object k_731520, object car_91comparator_73402_73927, object cdr_91comparator_73403_73928*/
static void __lambda_195(void *data, object clo, int argc, object *args) ;/*object self_732201, object k_731521, object obj_73404_73929*/
static void __lambda_196(void *data, object clo, int argc, object *args) ;/*object self_732202, object r_731523*/
static void __lambda_189(void *data, object clo, int argc, object *args) ;/*closure _,object k_731513, object car_91comparator_73400_73925, object cdr_91comparator_73401_73926*/
static void __lambda_190(void *data, object clo, int argc, object *args) ;/*object self_732197, object r_731514*/
static void __lambda_191(void *data, object clo, int argc, object *args) ;/*object self_732198, object r_731515*/
static void __lambda_192(void *data, object clo, int argc, object *args) ;/*object self_732199, object r_731516*/
static void __lambda_193(void *data, object clo, int argc, object *args) ;/*object self_732200, object r_731517*/
static void __lambda_179(void *data, object clo, int argc, object *args) ;/*closure _,object k_731493*/
static void __lambda_180(void *data, object clo, int argc, object *args) ;/*object self_732187, object result_73385_73921*/
static void __lambda_509(void *data, object clo, int argc, object *args) ;/*object self_732188, object result_73385_73921*/
static void __lambda_181(void *data, object clo, int argc, object *args) ;/*object self_732189, object k_731495, object args_73386_73390_73922_raw, ...*/
static void __lambda_185(void *data, object clo, int argc, object *args) ;/*object self_732192, object k_731502, object n_73394_73924*/
static void __lambda_186(void *data, object clo, int argc, object *args) ;/*object self_732193, object r_731506*/
static void __lambda_187(void *data, object clo, int argc, object *args) ;/*object self_732194, object r_731505*/
static void __lambda_188(void *data, object clo, int argc, object *args) ;/*object self_732195, object r_731503*/
static void __lambda_184(void *data, object clo, int argc, object *args) ;/*object self_732196, object r_731501*/
static void __lambda_183(void *data, object clo, int argc, object *args) ;/*object self_732190, object k_731499*/
static void __lambda_182(void *data, object clo, int argc, object *args) ;/*object self_732191, object r_731498*/
static void __lambda_178(void *data, object clo, int argc, object *args) ;/*closure _,object k_731490*/
static void __lambda_177(void *data, object clo, int argc, object *args) ;/*closure _,object k_731487*/
static void __lambda_176(void *data, object clo, int argc, object *args) ;/*closure _,object k_731484*/
static void __lambda_174(void *data, object clo, int argc, object *args) ;/*closure _,object k_731480, object obj_73384_73920*/
static void __lambda_175(void *data, object clo, int argc, object *args) ;/*object self_732186, object r_731481*/
static void __lambda_171(void *data, object clo, int argc, object *args) ;/*closure _,object k_731475, object a_73382_73918, object b_73383_73919*/
static void __lambda_172(void *data, object clo, int argc, object *args) ;/*object self_732184, object r_731476*/
static void __lambda_173(void *data, object clo, int argc, object *args) ;/*object self_732185, object r_731477*/
static void __lambda_169(void *data, object clo, int argc, object *args) ;/*closure _,object k_731471, object obj_73381_73917*/
static void __lambda_170(void *data, object clo, int argc, object *args) ;/*object self_732183, object r_731472*/
static void __lambda_162(void *data, object clo, int argc, object *args) ;/*closure _,object k_731461, object a_73379_73915, object b_73380_73916*/
static void __lambda_163(void *data, object clo, int argc, object *args) ;/*object self_732177, object r_731467*/
static void __lambda_164(void *data, object clo, int argc, object *args) ;/*object self_732178, object r_731468*/
static void __lambda_167(void *data, object clo, int argc, object *args) ;/*object self_732181, object r_731465*/
static void __lambda_168(void *data, object clo, int argc, object *args) ;/*object self_732182, object r_731466*/
static void __lambda_165(void *data, object clo, int argc, object *args) ;/*object self_732179, object r_731463*/
static void __lambda_166(void *data, object clo, int argc, object *args) ;/*object self_732180, object r_731464*/
static void __lambda_150(void *data, object clo, int argc, object *args) ;/*closure _,object k_731444, object obj_73364_73914*/
static void __lambda_151(void *data, object clo, int argc, object *args) ;/*object self_732166, object r_731445*/
static void __lambda_154(void *data, object clo, int argc, object *args) ;/*object self_732167, object r_731446*/
static void __lambda_156(void *data, object clo, int argc, object *args) ;/*object self_732169, object r_731448*/
static void __lambda_158(void *data, object clo, int argc, object *args) ;/*object self_732171, object r_731456*/
static void __lambda_159(void *data, object clo, int argc, object *args) ;/*object self_732172, object r_731453*/
static void __lambda_160(void *data, object clo, int argc, object *args) ;/*object self_732173, object r_731455*/
static void __lambda_161(void *data, object clo, int argc, object *args) ;/*object self_732174, object r_731454*/
static void __lambda_157(void *data, object clo, int argc, object *args) ;/*object self_732170, object r_731449*/
static void __lambda_155(void *data, object clo, int argc, object *args) ;/*object self_732168, object r_731447*/
static void __lambda_152(void *data, object clo, int argc, object *args) ;/*object self_732175, object k_731457*/
static void __lambda_153(void *data, object clo, int argc, object *args) ;/*object self_732176, object r_731458*/
static void __lambda_147(void *data, object clo, int argc, object *args) ;/*closure _,object k_731437, object obj_73358_73913*/
static void __lambda_148(void *data, object clo, int argc, object *args) ;/*object self_732164, object r_731439*/
static void __lambda_149(void *data, object clo, int argc, object *args) ;/*object self_732165, object r_731441*/
static void __lambda_145(void *data, object clo, int argc, object *args) ;/*closure _,object k_731431, object obj_73352_73912*/
static void __lambda_146(void *data, object clo, int argc, object *args) ;/*object self_732163, object r_731433*/
static void __lambda_144(void *data, object clo, int argc, object *args) ;/*closure _,object k_731428, object obj_73351_73911*/
static object __lambda_522(void *data, object ptr,object a_73348_73909, object b_73349_73910) ;
static void __lambda_143(void *data, object clo, int argc, object *args) ;/*closure _,object k_731425, object a_73348_73909, object b_73349_73910*/
static void __lambda_136(void *data, object clo, int argc, object *args) ;/*closure _,object k_731415, object comparator_73335_73898, object a_73336_73899, object b_73337_73900, object objs_73338_73901_raw, ...*/
static void __lambda_137(void *data, object clo, int argc, object *args) ;/*object self_732156, object a_73340_73902, object b_73341_73903, object objs_73342_73904*/
static void __lambda_138(void *data, object clo, int argc, object *args) ;/*object self_732157, object loop_73343_73905*/
static void __lambda_508(void *data, object clo, int argc, object *args) ;/*object self_732158, object loop_73343_73905*/
static void __lambda_141(void *data, object clo, int argc, object *args) ;/*object self_732159, object k_731418, object a_73344_73906, object b_73345_73907, object objs_73346_73908*/
static void __lambda_142(void *data, object clo, int argc, object *args) ;/*object self_732160, object r_731419*/
static void __lambda_139(void *data, object clo, int argc, object *args) ;/*object self_732161, object r_731417*/
static void __lambda_140(void *data, object clo, int argc, object *args) ;/*object self_732162, object r_731416*/
static void __lambda_129(void *data, object clo, int argc, object *args) ;/*closure _,object k_731405, object comparator_73322_73887, object a_73323_73888, object b_73324_73889, object objs_73325_73890_raw, ...*/
static void __lambda_130(void *data, object clo, int argc, object *args) ;/*object self_732149, object a_73327_73891, object b_73328_73892, object objs_73329_73893*/
static void __lambda_131(void *data, object clo, int argc, object *args) ;/*object self_732150, object loop_73330_73894*/
static void __lambda_507(void *data, object clo, int argc, object *args) ;/*object self_732151, object loop_73330_73894*/
static void __lambda_134(void *data, object clo, int argc, object *args) ;/*object self_732152, object k_731408, object a_73331_73895, object b_73332_73896, object objs_73333_73897*/
static void __lambda_135(void *data, object clo, int argc, object *args) ;/*object self_732153, object r_731409*/
static void __lambda_132(void *data, object clo, int argc, object *args) ;/*object self_732154, object r_731407*/
static void __lambda_133(void *data, object clo, int argc, object *args) ;/*object self_732155, object r_731406*/
static void __lambda_122(void *data, object clo, int argc, object *args) ;/*closure _,object k_731395, object comparator_73309_73876, object a_73310_73877, object b_73311_73878, object objs_73312_73879_raw, ...*/
static void __lambda_123(void *data, object clo, int argc, object *args) ;/*object self_732142, object a_73314_73880, object b_73315_73881, object objs_73316_73882*/
static void __lambda_124(void *data, object clo, int argc, object *args) ;/*object self_732143, object loop_73317_73883*/
static void __lambda_506(void *data, object clo, int argc, object *args) ;/*object self_732144, object loop_73317_73883*/
static void __lambda_127(void *data, object clo, int argc, object *args) ;/*object self_732145, object k_731398, object a_73318_73884, object b_73319_73885, object objs_73320_73886*/
static void __lambda_128(void *data, object clo, int argc, object *args) ;/*object self_732146, object r_731399_732031*/
static void __lambda_125(void *data, object clo, int argc, object *args) ;/*object self_732147, object r_731397*/
static void __lambda_126(void *data, object clo, int argc, object *args) ;/*object self_732148, object r_731396*/
static void __lambda_115(void *data, object clo, int argc, object *args) ;/*closure _,object k_731385, object comparator_73296_73865, object a_73297_73866, object b_73298_73867, object objs_73299_73868_raw, ...*/
static void __lambda_116(void *data, object clo, int argc, object *args) ;/*object self_732135, object a_73301_73869, object b_73302_73870, object objs_73303_73871*/
static void __lambda_117(void *data, object clo, int argc, object *args) ;/*object self_732136, object loop_73304_73872*/
static void __lambda_505(void *data, object clo, int argc, object *args) ;/*object self_732137, object loop_73304_73872*/
static void __lambda_120(void *data, object clo, int argc, object *args) ;/*object self_732138, object k_731388, object a_73305_73873, object b_73306_73874, object objs_73307_73875*/
static void __lambda_121(void *data, object clo, int argc, object *args) ;/*object self_732139, object r_731389*/
static void __lambda_118(void *data, object clo, int argc, object *args) ;/*object self_732140, object r_731387*/
static void __lambda_119(void *data, object clo, int argc, object *args) ;/*object self_732141, object r_731386*/
static void __lambda_108(void *data, object clo, int argc, object *args) ;/*closure _,object k_731375, object comparator_73283_73854, object a_73284_73855, object b_73285_73856, object objs_73286_73857_raw, ...*/
static void __lambda_109(void *data, object clo, int argc, object *args) ;/*object self_732128, object a_73288_73858, object b_73289_73859, object objs_73290_73860*/
static void __lambda_110(void *data, object clo, int argc, object *args) ;/*object self_732129, object loop_73291_73861*/
static void __lambda_504(void *data, object clo, int argc, object *args) ;/*object self_732130, object loop_73291_73861*/
static void __lambda_113(void *data, object clo, int argc, object *args) ;/*object self_732131, object k_731378, object a_73292_73862, object b_73293_73863, object objs_73294_73864*/
static void __lambda_114(void *data, object clo, int argc, object *args) ;/*object self_732132, object r_731379*/
static void __lambda_111(void *data, object clo, int argc, object *args) ;/*object self_732133, object r_731377*/
static void __lambda_112(void *data, object clo, int argc, object *args) ;/*object self_732134, object r_731376*/
static void __lambda_106(void *data, object clo, int argc, object *args) ;/*closure _,object k_731371, object comparator_73280_73851, object a_73281_73852, object b_73282_73853*/
static void __lambda_107(void *data, object clo, int argc, object *args) ;/*object self_732127, object r_731372*/
static void __lambda_104(void *data, object clo, int argc, object *args) ;/*closure _,object k_731367, object comparator_73277_73848, object a_73278_73849, object b_73279_73850*/
static void __lambda_105(void *data, object clo, int argc, object *args) ;/*object self_732126, object r_731368_732030*/
static void __lambda_103(void *data, object clo, int argc, object *args) ;/*closure _,object k_731364, object comparator_73274_73845, object a_73275_73846, object b_73276_73847*/
static void __lambda_101(void *data, object clo, int argc, object *args) ;/*closure _,object k_731360, object comparator_73271_73842, object a_73272_73843, object b_73273_73844*/
static void __lambda_102(void *data, object clo, int argc, object *args) ;/*object self_732125, object r_731361*/
static void __lambda_99(void *data, object clo, int argc, object *args) ;/*closure _,object k_731356, object comparator_73268_73839, object a_73269_73840, object b_73270_73841*/
static void __lambda_100(void *data, object clo, int argc, object *args) ;/*object self_732124, object r_731357*/
static void __lambda_97(void *data, object clo, int argc, object *args) ;/*closure _,object k_731352, object comparator_73266_73837, object obj_73267_73838*/
static void __lambda_98(void *data, object clo, int argc, object *args) ;/*object self_732123, object r_731353*/
static void __lambda_95(void *data, object clo, int argc, object *args) ;/*closure _,object k_731348, object comparator_73264_73835, object obj_73265_73836*/
static void __lambda_96(void *data, object clo, int argc, object *args) ;/*object self_732122, object r_731349*/
static void __lambda_93(void *data, object clo, int argc, object *args) ;/*closure _,object k_731344, object comparator_73262_73833, object obj_73263_73834*/
static void __lambda_94(void *data, object clo, int argc, object *args) ;/*object self_732121, object r_731345*/
static void __lambda_77(void *data, object clo, int argc, object *args) ;/*closure _,object k_731322, object type_91test_73251_73822, object equality_73252_73823, object ordering_73253_73824, object hash_73254_73825*/
static void __lambda_80(void *data, object clo, int argc, object *args) ;/*object self_732106, object r_731323*/
static void __lambda_84(void *data, object clo, int argc, object *args) ;/*object self_732107, object r_731324*/
static void __lambda_87(void *data, object clo, int argc, object *args) ;/*object self_732108, object r_731325*/
static void __lambda_90(void *data, object clo, int argc, object *args) ;/*object self_732109, object r_731326*/
static void __lambda_92(void *data, object clo, int argc, object *args) ;/*object self_732110, object r_731328*/
static void __lambda_91(void *data, object clo, int argc, object *args) ;/*object self_732111, object k_731329*/
static void __lambda_88(void *data, object clo, int argc, object *args) ;/*object self_732112, object k_731331*/
static void __lambda_89(void *data, object clo, int argc, object *args) ;/*object self_732113, object k_731332, object x_73260_73831, object y_73261_73832*/
static void __lambda_85(void *data, object clo, int argc, object *args) ;/*object self_732114, object k_731333*/
static void __lambda_86(void *data, object clo, int argc, object *args) ;/*object self_732115, object k_731334, object x_73258_73829, object y_73259_73830*/
static void __lambda_81(void *data, object clo, int argc, object *args) ;/*object self_732116, object k_731335*/
static void __lambda_82(void *data, object clo, int argc, object *args) ;/*object self_732117, object k_731337, object x_73256_73827, object y_73257_73828*/
static void __lambda_83(void *data, object clo, int argc, object *args) ;/*object self_732118, object r_731338*/
static void __lambda_78(void *data, object clo, int argc, object *args) ;/*object self_732119, object k_731339*/
static void __lambda_79(void *data, object clo, int argc, object *args) ;/*object self_732120, object k_731341, object x_73255_73826*/
static void __lambda_74(void *data, object clo, int argc, object *args) ;/*closure _,object k_731316, object type_91test_73245_73816, object equality_73246_73817, object ordering_73247_73818, object hash_73248_73819, object ordering_127_73249_73820, object hash_127_73250_73821*/
static void __lambda_75(void *data, object clo, int argc, object *args) ;/*object self_732104, object r_731317*/
static void __lambda_76(void *data, object clo, int argc, object *args) ;/*object self_732105, object r_731319*/
static void __lambda_57(void *data, object clo, int argc, object *args) ;/*closure _,object k_731257, object expr_73194_73209_73230_73802, object rename_73195_73210_73231_73803, object compare_73196_73211_73232_73804*/
static void __lambda_58(void *data, object clo, int argc, object *args) ;/*object self_732088, object v_931_73202_73216_73234_73806*/
static void __lambda_70(void *data, object clo, int argc, object *args) ;/*object self_732089, object tmp_73213_73215_73233_73805*/
static void __lambda_73(void *data, object clo, int argc, object *args) ;/*object self_732090, object r_731258*/
static void __lambda_71(void *data, object clo, int argc, object *args) ;/*object self_732091, object k_731260*/
static void __lambda_72(void *data, object clo, int argc, object *args) ;/*object self_732092, object r_731261*/
static void __lambda_59(void *data, object clo, int argc, object *args) ;/*object self_732093, object k_731263*/
static void __lambda_60(void *data, object clo, int argc, object *args) ;/*object self_732094, object r_731275*/
static void __lambda_61(void *data, object clo, int argc, object *args) ;/*object self_732095, object r_731291*/
static void __lambda_62(void *data, object clo, int argc, object *args) ;/*object self_732096, object r_731292*/
static void __lambda_63(void *data, object clo, int argc, object *args) ;/*object self_732097, object r_731288*/
static void __lambda_64(void *data, object clo, int argc, object *args) ;/*object self_732098, object r_731278*/
static void __lambda_65(void *data, object clo, int argc, object *args) ;/*object self_732099, object r_731284*/
static void __lambda_66(void *data, object clo, int argc, object *args) ;/*object self_732100, object r_731281*/
static void __lambda_67(void *data, object clo, int argc, object *args) ;/*object self_732101, object r_731279*/
static void __lambda_68(void *data, object clo, int argc, object *args) ;/*object self_732102, object r_731276*/
static void __lambda_69(void *data, object clo, int argc, object *args) ;/*object self_732103, object r_731274*/
static void __lambda_48(void *data, object clo, int argc, object *args) ;/*closure _,object k_731242, object expr_73167_73176_73185_73797, object rename_73168_73177_73186_73798, object compare_73169_73178_73187_73799*/
static void __lambda_49(void *data, object clo, int argc, object *args) ;/*object self_732080, object v_931_73175_73183_73189_73801*/
static void __lambda_53(void *data, object clo, int argc, object *args) ;/*object self_732081, object tmp_73180_73182_73188_73800*/
static void __lambda_56(void *data, object clo, int argc, object *args) ;/*object self_732082, object r_731243*/
static void __lambda_54(void *data, object clo, int argc, object *args) ;/*object self_732083, object k_731245*/
static void __lambda_55(void *data, object clo, int argc, object *args) ;/*object self_732084, object r_731246*/
static void __lambda_50(void *data, object clo, int argc, object *args) ;/*object self_732085, object k_731248*/
static void __lambda_51(void *data, object clo, int argc, object *args) ;/*object self_732086, object r_731251*/
static void __lambda_52(void *data, object clo, int argc, object *args) ;/*object self_732087, object r_731250*/
static void __lambda_43(void *data, object clo, int argc, object *args) ;/*closure _,object k_731230, object expr_73140_73149_73158_73792, object rename_73141_73150_73159_73793, object compare_73142_73151_73160_73794*/
static void __lambda_44(void *data, object clo, int argc, object *args) ;/*object self_732076, object v_931_73148_73156_73162_73796*/
static void __lambda_47(void *data, object clo, int argc, object *args) ;/*object self_732077, object r_731231*/
static void __lambda_45(void *data, object clo, int argc, object *args) ;/*object self_732078, object k_731233*/
static void __lambda_46(void *data, object clo, int argc, object *args) ;/*object self_732079, object r_731234*/
static void __lambda_1(void *data, object clo, int argc, object *args) ;/*closure _,object k_731111, object expr_735_7337_7396_73752, object rename_736_7338_7397_73753, object compare_737_7339_7398_73754*/
static void __lambda_2(void *data, object clo, int argc, object *args) ;/*object self_732035, object v_931_7313_7374_73120_73776*/
static void __lambda_14(void *data, object clo, int argc, object *args) ;/*object self_732036, object tmp_7341_7343_7399_73755*/
static void __lambda_42(void *data, object clo, int argc, object *args) ;/*object self_732037, object r_731112*/
static void __lambda_15(void *data, object clo, int argc, object *args) ;/*object self_732038, object k_731114*/
static void __lambda_16(void *data, object clo, int argc, object *args) ;/*object self_732039, object v_9312_7324_7348_73101_73757*/
static void __lambda_40(void *data, object clo, int argc, object *args) ;/*object self_732040, object tmp_7345_7347_73100_73756*/
static void __lambda_41(void *data, object clo, int argc, object *args) ;/*object self_732041, object r_731116*/
static void __lambda_17(void *data, object clo, int argc, object *args) ;/*object self_732042, object k_731118*/
static void __lambda_18(void *data, object clo, int argc, object *args) ;/*object self_732043, object r_731139*/
static void __lambda_19(void *data, object clo, int argc, object *args) ;/*object self_732044, object r_731177*/
static void __lambda_20(void *data, object clo, int argc, object *args) ;/*object self_732045, object r_731182*/
static void __lambda_21(void *data, object clo, int argc, object *args) ;/*object self_732046, object r_731180*/
static void __lambda_22(void *data, object clo, int argc, object *args) ;/*object self_732047, object r_731178*/
static void __lambda_23(void *data, object clo, int argc, object *args) ;/*object self_732048, object r_731172*/
static void __lambda_24(void *data, object clo, int argc, object *args) ;/*object self_732049, object r_731173*/
static void __lambda_25(void *data, object clo, int argc, object *args) ;/*object self_732050, object r_731142*/
static void __lambda_26(void *data, object clo, int argc, object *args) ;/*object self_732051, object r_731162*/
static void __lambda_27(void *data, object clo, int argc, object *args) ;/*object self_732052, object r_731167*/
static void __lambda_28(void *data, object clo, int argc, object *args) ;/*object self_732053, object r_731165*/
static void __lambda_29(void *data, object clo, int argc, object *args) ;/*object self_732054, object r_731163*/
static void __lambda_30(void *data, object clo, int argc, object *args) ;/*object self_732055, object r_731157*/
static void __lambda_31(void *data, object clo, int argc, object *args) ;/*object self_732056, object r_731158*/
static void __lambda_32(void *data, object clo, int argc, object *args) ;/*object self_732057, object r_731145*/
static void __lambda_33(void *data, object clo, int argc, object *args) ;/*object self_732058, object r_731151*/
static void __lambda_34(void *data, object clo, int argc, object *args) ;/*object self_732059, object r_731152*/
static void __lambda_35(void *data, object clo, int argc, object *args) ;/*object self_732060, object r_731148*/
static void __lambda_36(void *data, object clo, int argc, object *args) ;/*object self_732061, object r_731146*/
static void __lambda_37(void *data, object clo, int argc, object *args) ;/*object self_732062, object r_731143*/
static void __lambda_38(void *data, object clo, int argc, object *args) ;/*object self_732063, object r_731140*/
static void __lambda_39(void *data, object clo, int argc, object *args) ;/*object self_732064, object r_731138*/
static void __lambda_3(void *data, object clo, int argc, object *args) ;/*object self_732065, object k_731189*/
static void __lambda_4(void *data, object clo, int argc, object *args) ;/*object self_732066, object r_731207*/
static void __lambda_5(void *data, object clo, int argc, object *args) ;/*object self_732067, object r_731223*/
static void __lambda_6(void *data, object clo, int argc, object *args) ;/*object self_732068, object r_731210*/
static void __lambda_7(void *data, object clo, int argc, object *args) ;/*object self_732069, object r_731219*/
static void __lambda_8(void *data, object clo, int argc, object *args) ;/*object self_732070, object r_731217*/
static void __lambda_9(void *data, object clo, int argc, object *args) ;/*object self_732071, object r_731215*/
static void __lambda_10(void *data, object clo, int argc, object *args) ;/*object self_732072, object r_731213*/
static void __lambda_11(void *data, object clo, int argc, object *args) ;/*object self_732073, object r_731211*/
static void __lambda_12(void *data, object clo, int argc, object *args) ;/*object self_732074, object r_731208*/
static void __lambda_13(void *data, object clo, int argc, object *args) ;/*object self_732075, object r_731206*/

static void __lambda_436(void *data, object _, int argc, object *args) /* closure _,object k_731937 */
 {
object k_731937 = args[0];
  Cyc_st_add(data, "srfi/128.sld:lib-init:srfi128");

closureN_type c_735548;
object e_735838 [1];
c_735548.hdr.mark = gc_color_red;
 c_735548.hdr.grayed = 0;
c_735548.tag = closureN_tag;
 c_735548.fn = (function_type)__lambda_437;
c_735548.num_args = 1;
c_735548.num_elements = 1;
c_735548.elements = (object *)e_735838;
c_735548.elements[0] = k_731937;

return_direct_with_clo2(data,  __glo_make_91parameter_scheme_base, (((closure)  __glo_make_91parameter_scheme_base)->fn),  &c_735548, obj_int2obj(16064047));; 
}

static void __lambda_437(void *data, object self_732426, int argc, object *args) /* object self_732426, object r_732029 */
 {
 object r_732029 = args[0];
  
closureN_type c_735550;
object e_735834 [1];
c_735550.hdr.mark = gc_color_red;
 c_735550.hdr.grayed = 0;
c_735550.tag = closureN_tag;
 c_735550.fn = (function_type)__lambda_438;
c_735550.num_args = 1;
c_735550.num_elements = 1;
c_735550.elements = (object *)e_735834;
c_735550.elements[0] = ((closureN)self_732426)->elements[0];


object c_735837 = global_set_cps_id(data,(closure)&c_735550,"__glo__75salt_75_srfi_128", __glo__75salt_75_srfi_128, r_732029);
return_closcall1(data,(closure)&c_735550,  c_735837);; 
}

static void __lambda_438(void *data, object self_732427, int argc, object *args) /* object self_732427, object r_731939 */
 {

  
closureN_type c_735552;
object e_735827 [1];
c_735552.hdr.mark = gc_color_red;
 c_735552.hdr.grayed = 0;
c_735552.tag = closureN_tag;
 c_735552.fn = (function_type)__lambda_439;
c_735552.num_args = 1;
c_735552.num_elements = 1;
c_735552.elements = (object *)e_735827;
c_735552.elements[0] = ((closureN)self_732427)->elements[0];


make_pair(c_735833,quote_hash_127,NULL);c_735833.hdr.immutable = 1;

make_pair(c_735832,quote_ordering_127,&c_735833);c_735832.hdr.immutable = 1;

make_pair(c_735831,quote_hash,&c_735832);c_735831.hdr.immutable = 1;

make_pair(c_735830,quote_ordering,&c_735831);c_735830.hdr.immutable = 1;

make_pair(c_735829,quote_equality,&c_735830);c_735829.hdr.immutable = 1;

make_pair(c_735828,quote_type_91test,&c_735829);c_735828.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_register_91simple_91type_scheme_base, (((closure)  __glo_register_91simple_91type_scheme_base)->fn),  &c_735552, quote_comparator, boolean_f, &c_735828);; 
}

static void __lambda_439(void *data, object self_732428, int argc, object *args) /* object self_732428, object r_732026 */
 {
 object r_732026 = args[0];
  
closureN_type c_735554;
object e_735823 [1];
c_735554.hdr.mark = gc_color_red;
 c_735554.hdr.grayed = 0;
c_735554.tag = closureN_tag;
 c_735554.fn = (function_type)__lambda_440;
c_735554.num_args = 1;
c_735554.num_elements = 1;
c_735554.elements = (object *)e_735823;
c_735554.elements[0] = ((closureN)self_732428)->elements[0];


object c_735826 = global_set_cps_id(data,(closure)&c_735554,"__glo_comparator_srfi_128", __glo_comparator_srfi_128, r_732026);
return_closcall1(data,(closure)&c_735554,  c_735826);; 
}

static void __lambda_440(void *data, object self_732429, int argc, object *args) /* object self_732429, object r_731940 */
 {

  
closureN_type c_735556;
object e_735822 [1];
c_735556.hdr.mark = gc_color_red;
 c_735556.hdr.grayed = 0;
c_735556.tag = closureN_tag;
 c_735556.fn = (function_type)__lambda_441;
c_735556.num_args = 1;
c_735556.num_elements = 1;
c_735556.elements = (object *)e_735822;
c_735556.elements[0] = ((closureN)self_732429)->elements[0];

return_direct_with_clo3(data,  __glo_make_91type_91predicate_scheme_base, (((closure)  __glo_make_91type_91predicate_scheme_base)->fn),  &c_735556, obj_int2obj(0), quote_comparator);; 
}

static void __lambda_441(void *data, object self_732430, int argc, object *args) /* object self_732430, object r_732024 */
 {
 object r_732024 = args[0];
  
closureN_type c_735558;
object e_735818 [1];
c_735558.hdr.mark = gc_color_red;
 c_735558.hdr.grayed = 0;
c_735558.tag = closureN_tag;
 c_735558.fn = (function_type)__lambda_442;
c_735558.num_args = 1;
c_735558.num_elements = 1;
c_735558.elements = (object *)e_735818;
c_735558.elements[0] = ((closureN)self_732430)->elements[0];


object c_735821 = global_set_cps_id(data,(closure)&c_735558,"__glo_comparator_127_srfi_128", __glo_comparator_127_srfi_128, r_732024);
return_closcall1(data,(closure)&c_735558,  c_735821);; 
}

static void __lambda_442(void *data, object self_732431, int argc, object *args) /* object self_732431, object r_731941 */
 {

  
closureN_type c_735560;
object e_735817 [1];
c_735560.hdr.mark = gc_color_red;
 c_735560.hdr.grayed = 0;
c_735560.tag = closureN_tag;
 c_735560.fn = (function_type)__lambda_443;
c_735560.num_args = 1;
c_735560.num_elements = 1;
c_735560.elements = (object *)e_735817;
c_735560.elements[0] = ((closureN)self_732431)->elements[0];

return_direct_with_clo3(data,  __glo_type_91slot_91offset_scheme_base, (((closure)  __glo_type_91slot_91offset_scheme_base)->fn),  &c_735560, __glo_comparator_srfi_128, quote_type_91test);; 
}

static void __lambda_443(void *data, object self_732432, int argc, object *args) /* object self_732432, object r_732022 */
 {
 object r_732022 = args[0];
  
closureN_type c_735562;
object e_735815 [1];
c_735562.hdr.mark = gc_color_red;
 c_735562.hdr.grayed = 0;
c_735562.tag = closureN_tag;
 c_735562.fn = (function_type)__lambda_444;
c_735562.num_args = 1;
c_735562.num_elements = 1;
c_735562.elements = (object *)e_735815;
c_735562.elements[0] = ((closureN)self_732432)->elements[0];


make_utf8_string_with_len(c_735816, "comparator-type-test-predicate", 30, 30);
return_direct_with_clo4(data,  __glo_make_91getter_scheme_base, (((closure)  __glo_make_91getter_scheme_base)->fn),  &c_735562, &c_735816, quote_comparator, r_732022);; 
}

static void __lambda_444(void *data, object self_732433, int argc, object *args) /* object self_732433, object r_732020 */
 {
 object r_732020 = args[0];
  
closureN_type c_735564;
object e_735811 [1];
c_735564.hdr.mark = gc_color_red;
 c_735564.hdr.grayed = 0;
c_735564.tag = closureN_tag;
 c_735564.fn = (function_type)__lambda_445;
c_735564.num_args = 1;
c_735564.num_elements = 1;
c_735564.elements = (object *)e_735811;
c_735564.elements[0] = ((closureN)self_732433)->elements[0];


object c_735814 = global_set_cps_id(data,(closure)&c_735564,"__glo_comparator_91type_91test_91predicate_srfi_128", __glo_comparator_91type_91test_91predicate_srfi_128, r_732020);
return_closcall1(data,(closure)&c_735564,  c_735814);; 
}

static void __lambda_445(void *data, object self_732434, int argc, object *args) /* object self_732434, object r_731942 */
 {

  
closureN_type c_735566;
object e_735810 [1];
c_735566.hdr.mark = gc_color_red;
 c_735566.hdr.grayed = 0;
c_735566.tag = closureN_tag;
 c_735566.fn = (function_type)__lambda_446;
c_735566.num_args = 1;
c_735566.num_elements = 1;
c_735566.elements = (object *)e_735810;
c_735566.elements[0] = ((closureN)self_732434)->elements[0];

return_direct_with_clo3(data,  __glo_type_91slot_91offset_scheme_base, (((closure)  __glo_type_91slot_91offset_scheme_base)->fn),  &c_735566, __glo_comparator_srfi_128, quote_equality);; 
}

static void __lambda_446(void *data, object self_732435, int argc, object *args) /* object self_732435, object r_732018 */
 {
 object r_732018 = args[0];
  
closureN_type c_735568;
object e_735808 [1];
c_735568.hdr.mark = gc_color_red;
 c_735568.hdr.grayed = 0;
c_735568.tag = closureN_tag;
 c_735568.fn = (function_type)__lambda_447;
c_735568.num_args = 1;
c_735568.num_elements = 1;
c_735568.elements = (object *)e_735808;
c_735568.elements[0] = ((closureN)self_732435)->elements[0];


make_utf8_string_with_len(c_735809, "comparator-equality-predicate", 29, 29);
return_direct_with_clo4(data,  __glo_make_91getter_scheme_base, (((closure)  __glo_make_91getter_scheme_base)->fn),  &c_735568, &c_735809, quote_comparator, r_732018);; 
}

static void __lambda_447(void *data, object self_732436, int argc, object *args) /* object self_732436, object r_732016 */
 {
 object r_732016 = args[0];
  
closureN_type c_735570;
object e_735804 [1];
c_735570.hdr.mark = gc_color_red;
 c_735570.hdr.grayed = 0;
c_735570.tag = closureN_tag;
 c_735570.fn = (function_type)__lambda_448;
c_735570.num_args = 1;
c_735570.num_elements = 1;
c_735570.elements = (object *)e_735804;
c_735570.elements[0] = ((closureN)self_732436)->elements[0];


object c_735807 = global_set_cps_id(data,(closure)&c_735570,"__glo_comparator_91equality_91predicate_srfi_128", __glo_comparator_91equality_91predicate_srfi_128, r_732016);
return_closcall1(data,(closure)&c_735570,  c_735807);; 
}

static void __lambda_448(void *data, object self_732437, int argc, object *args) /* object self_732437, object r_731943 */
 {

  
closureN_type c_735572;
object e_735803 [1];
c_735572.hdr.mark = gc_color_red;
 c_735572.hdr.grayed = 0;
c_735572.tag = closureN_tag;
 c_735572.fn = (function_type)__lambda_449;
c_735572.num_args = 1;
c_735572.num_elements = 1;
c_735572.elements = (object *)e_735803;
c_735572.elements[0] = ((closureN)self_732437)->elements[0];

return_direct_with_clo3(data,  __glo_type_91slot_91offset_scheme_base, (((closure)  __glo_type_91slot_91offset_scheme_base)->fn),  &c_735572, __glo_comparator_srfi_128, quote_ordering);; 
}

static void __lambda_449(void *data, object self_732438, int argc, object *args) /* object self_732438, object r_732014 */
 {
 object r_732014 = args[0];
  
closureN_type c_735574;
object e_735801 [1];
c_735574.hdr.mark = gc_color_red;
 c_735574.hdr.grayed = 0;
c_735574.tag = closureN_tag;
 c_735574.fn = (function_type)__lambda_450;
c_735574.num_args = 1;
c_735574.num_elements = 1;
c_735574.elements = (object *)e_735801;
c_735574.elements[0] = ((closureN)self_732438)->elements[0];


make_utf8_string_with_len(c_735802, "comparator-ordering-predicate", 29, 29);
return_direct_with_clo4(data,  __glo_make_91getter_scheme_base, (((closure)  __glo_make_91getter_scheme_base)->fn),  &c_735574, &c_735802, quote_comparator, r_732014);; 
}

static void __lambda_450(void *data, object self_732439, int argc, object *args) /* object self_732439, object r_732012 */
 {
 object r_732012 = args[0];
  
closureN_type c_735576;
object e_735797 [1];
c_735576.hdr.mark = gc_color_red;
 c_735576.hdr.grayed = 0;
c_735576.tag = closureN_tag;
 c_735576.fn = (function_type)__lambda_451;
c_735576.num_args = 1;
c_735576.num_elements = 1;
c_735576.elements = (object *)e_735797;
c_735576.elements[0] = ((closureN)self_732439)->elements[0];


object c_735800 = global_set_cps_id(data,(closure)&c_735576,"__glo_comparator_91ordering_91predicate_srfi_128", __glo_comparator_91ordering_91predicate_srfi_128, r_732012);
return_closcall1(data,(closure)&c_735576,  c_735800);; 
}

static void __lambda_451(void *data, object self_732440, int argc, object *args) /* object self_732440, object r_731944 */
 {

  
closureN_type c_735578;
object e_735796 [1];
c_735578.hdr.mark = gc_color_red;
 c_735578.hdr.grayed = 0;
c_735578.tag = closureN_tag;
 c_735578.fn = (function_type)__lambda_452;
c_735578.num_args = 1;
c_735578.num_elements = 1;
c_735578.elements = (object *)e_735796;
c_735578.elements[0] = ((closureN)self_732440)->elements[0];

return_direct_with_clo3(data,  __glo_type_91slot_91offset_scheme_base, (((closure)  __glo_type_91slot_91offset_scheme_base)->fn),  &c_735578, __glo_comparator_srfi_128, quote_hash);; 
}

static void __lambda_452(void *data, object self_732441, int argc, object *args) /* object self_732441, object r_732010 */
 {
 object r_732010 = args[0];
  
closureN_type c_735580;
object e_735794 [1];
c_735580.hdr.mark = gc_color_red;
 c_735580.hdr.grayed = 0;
c_735580.tag = closureN_tag;
 c_735580.fn = (function_type)__lambda_453;
c_735580.num_args = 1;
c_735580.num_elements = 1;
c_735580.elements = (object *)e_735794;
c_735580.elements[0] = ((closureN)self_732441)->elements[0];


make_utf8_string_with_len(c_735795, "comparator-hash-function", 24, 24);
return_direct_with_clo4(data,  __glo_make_91getter_scheme_base, (((closure)  __glo_make_91getter_scheme_base)->fn),  &c_735580, &c_735795, quote_comparator, r_732010);; 
}

static void __lambda_453(void *data, object self_732442, int argc, object *args) /* object self_732442, object r_732008 */
 {
 object r_732008 = args[0];
  
closureN_type c_735582;
object e_735790 [1];
c_735582.hdr.mark = gc_color_red;
 c_735582.hdr.grayed = 0;
c_735582.tag = closureN_tag;
 c_735582.fn = (function_type)__lambda_454;
c_735582.num_args = 1;
c_735582.num_elements = 1;
c_735582.elements = (object *)e_735790;
c_735582.elements[0] = ((closureN)self_732442)->elements[0];


object c_735793 = global_set_cps_id(data,(closure)&c_735582,"__glo_comparator_91hash_91function_srfi_128", __glo_comparator_91hash_91function_srfi_128, r_732008);
return_closcall1(data,(closure)&c_735582,  c_735793);; 
}

static void __lambda_454(void *data, object self_732443, int argc, object *args) /* object self_732443, object r_731945 */
 {

  
closureN_type c_735584;
object e_735789 [1];
c_735584.hdr.mark = gc_color_red;
 c_735584.hdr.grayed = 0;
c_735584.tag = closureN_tag;
 c_735584.fn = (function_type)__lambda_455;
c_735584.num_args = 1;
c_735584.num_elements = 1;
c_735584.elements = (object *)e_735789;
c_735584.elements[0] = ((closureN)self_732443)->elements[0];

return_direct_with_clo3(data,  __glo_type_91slot_91offset_scheme_base, (((closure)  __glo_type_91slot_91offset_scheme_base)->fn),  &c_735584, __glo_comparator_srfi_128, quote_ordering_127);; 
}

static void __lambda_455(void *data, object self_732444, int argc, object *args) /* object self_732444, object r_732006 */
 {
 object r_732006 = args[0];
  
closureN_type c_735586;
object e_735787 [1];
c_735586.hdr.mark = gc_color_red;
 c_735586.hdr.grayed = 0;
c_735586.tag = closureN_tag;
 c_735586.fn = (function_type)__lambda_456;
c_735586.num_args = 1;
c_735586.num_elements = 1;
c_735586.elements = (object *)e_735787;
c_735586.elements[0] = ((closureN)self_732444)->elements[0];


make_utf8_string_with_len(c_735788, "comparator-ordered\?", 19, 19);
return_direct_with_clo4(data,  __glo_make_91getter_scheme_base, (((closure)  __glo_make_91getter_scheme_base)->fn),  &c_735586, &c_735788, quote_comparator, r_732006);; 
}

static void __lambda_456(void *data, object self_732445, int argc, object *args) /* object self_732445, object r_732004 */
 {
 object r_732004 = args[0];
  
closureN_type c_735588;
object e_735783 [1];
c_735588.hdr.mark = gc_color_red;
 c_735588.hdr.grayed = 0;
c_735588.tag = closureN_tag;
 c_735588.fn = (function_type)__lambda_457;
c_735588.num_args = 1;
c_735588.num_elements = 1;
c_735588.elements = (object *)e_735783;
c_735588.elements[0] = ((closureN)self_732445)->elements[0];


object c_735786 = global_set_cps_id(data,(closure)&c_735588,"__glo_comparator_91ordered_127_srfi_128", __glo_comparator_91ordered_127_srfi_128, r_732004);
return_closcall1(data,(closure)&c_735588,  c_735786);; 
}

static void __lambda_457(void *data, object self_732446, int argc, object *args) /* object self_732446, object r_731946 */
 {

  
closureN_type c_735590;
object e_735782 [1];
c_735590.hdr.mark = gc_color_red;
 c_735590.hdr.grayed = 0;
c_735590.tag = closureN_tag;
 c_735590.fn = (function_type)__lambda_458;
c_735590.num_args = 1;
c_735590.num_elements = 1;
c_735590.elements = (object *)e_735782;
c_735590.elements[0] = ((closureN)self_732446)->elements[0];

return_direct_with_clo3(data,  __glo_type_91slot_91offset_scheme_base, (((closure)  __glo_type_91slot_91offset_scheme_base)->fn),  &c_735590, __glo_comparator_srfi_128, quote_hash_127);; 
}

static void __lambda_458(void *data, object self_732447, int argc, object *args) /* object self_732447, object r_732002 */
 {
 object r_732002 = args[0];
  
closureN_type c_735592;
object e_735780 [1];
c_735592.hdr.mark = gc_color_red;
 c_735592.hdr.grayed = 0;
c_735592.tag = closureN_tag;
 c_735592.fn = (function_type)__lambda_459;
c_735592.num_args = 1;
c_735592.num_elements = 1;
c_735592.elements = (object *)e_735780;
c_735592.elements[0] = ((closureN)self_732447)->elements[0];


make_utf8_string_with_len(c_735781, "comparator-hashable\?", 20, 20);
return_direct_with_clo4(data,  __glo_make_91getter_scheme_base, (((closure)  __glo_make_91getter_scheme_base)->fn),  &c_735592, &c_735781, quote_comparator, r_732002);; 
}

static void __lambda_459(void *data, object self_732448, int argc, object *args) /* object self_732448, object r_732000 */
 {
 object r_732000 = args[0];
  
closureN_type c_735594;
object e_735776 [1];
c_735594.hdr.mark = gc_color_red;
 c_735594.hdr.grayed = 0;
c_735594.tag = closureN_tag;
 c_735594.fn = (function_type)__lambda_460;
c_735594.num_args = 1;
c_735594.num_elements = 1;
c_735594.elements = (object *)e_735776;
c_735594.elements[0] = ((closureN)self_732448)->elements[0];


object c_735779 = global_set_cps_id(data,(closure)&c_735594,"__glo_comparator_91hashable_127_srfi_128", __glo_comparator_91hashable_127_srfi_128, r_732000);
return_closcall1(data,(closure)&c_735594,  c_735779);; 
}

static void __lambda_460(void *data, object self_732449, int argc, object *args) /* object self_732449, object r_731947 */
 {

  
closureN_type c_735596;
object e_735773 [1];
c_735596.hdr.mark = gc_color_red;
 c_735596.hdr.grayed = 0;
c_735596.tag = closureN_tag;
 c_735596.fn = (function_type)__lambda_461;
c_735596.num_args = 1;
c_735596.num_elements = 1;
c_735596.elements = (object *)e_735773;
c_735596.elements[0] = ((closureN)self_732449)->elements[0];


mclosure0(c_735774, (function_type)__lambda_503);c_735774.num_args = 1;
return_direct_with_clo1(data,(closure)&c_735596,__lambda_461,  &c_735774);; 
}

static void __lambda_503(void *data, object self_732450, int argc, object *args) /* object self_732450, object k_731999, object obj_73629_73742_731099 */
 {
 object k_731999 = args[0];
  return_direct_with_clo1(data,  k_731999, (((closure)  k_731999)->fn),  boolean_t);; 
}

static void __lambda_461(void *data, object self_732451, int argc, object *args) /* object self_732451, object r_731992 */
 {
 object r_731992 = args[0];
  
closureN_type c_735598;
object e_735770 [2];
c_735598.hdr.mark = gc_color_red;
 c_735598.hdr.grayed = 0;
c_735598.tag = closureN_tag;
 c_735598.fn = (function_type)__lambda_462;
c_735598.num_args = 1;
c_735598.num_elements = 2;
c_735598.elements = (object *)e_735770;
c_735598.elements[0] = ((closureN)self_732451)->elements[0];
c_735598.elements[1] = r_731992;


mclosure0(c_735771, (function_type)__lambda_502);c_735771.num_args = 2;
return_direct_with_clo1(data,(closure)&c_735598,__lambda_462,  &c_735771);; 
}

static void __lambda_502(void *data, object self_732452, int argc, object *args) /* object self_732452, object k_731998, object a_73630_73743_731100, object b_73631_73744_731101 */
 {
 object k_731998 = args[0];
  return_direct_with_clo1(data,  k_731998, (((closure)  k_731998)->fn),  boolean_t);; 
}

static void __lambda_462(void *data, object self_732453, int argc, object *args) /* object self_732453, object r_731993 */
 {
 object r_731993 = args[0];
  
closureN_type c_735600;
object e_735767 [3];
c_735600.hdr.mark = gc_color_red;
 c_735600.hdr.grayed = 0;
c_735600.tag = closureN_tag;
 c_735600.fn = (function_type)__lambda_463;
c_735600.num_args = 1;
c_735600.num_elements = 3;
c_735600.elements = (object *)e_735767;
c_735600.elements[0] = ((closureN)self_732453)->elements[0];
c_735600.elements[1] = ((closureN)self_732453)->elements[1];
c_735600.elements[2] = r_731993;


mclosure0(c_735768, (function_type)__lambda_501);c_735768.num_args = 2;
return_direct_with_clo1(data,(closure)&c_735600,__lambda_463,  &c_735768);; 
}

static void __lambda_501(void *data, object self_732454, int argc, object *args) /* object self_732454, object k_731997, object a_73632_73745_731102, object b_73633_73746_731103 */
 {
 object k_731997 = args[0];
  return_direct_with_clo1(data,  k_731997, (((closure)  k_731997)->fn),  boolean_f);; 
}

static void __lambda_463(void *data, object self_732455, int argc, object *args) /* object self_732455, object r_731994 */
 {
 object r_731994 = args[0];
  
closureN_type c_735602;
object e_735764 [4];
c_735602.hdr.mark = gc_color_red;
 c_735602.hdr.grayed = 0;
c_735602.tag = closureN_tag;
 c_735602.fn = (function_type)__lambda_464;
c_735602.num_args = 1;
c_735602.num_elements = 4;
c_735602.elements = (object *)e_735764;
c_735602.elements[0] = ((closureN)self_732455)->elements[0];
c_735602.elements[1] = ((closureN)self_732455)->elements[1];
c_735602.elements[2] = ((closureN)self_732455)->elements[2];
c_735602.elements[3] = r_731994;


mclosure0(c_735765, (function_type)__lambda_500);c_735765.num_args = 1;
return_direct_with_clo1(data,(closure)&c_735602,__lambda_464,  &c_735765);; 
}

static void __lambda_500(void *data, object self_732456, int argc, object *args) /* object self_732456, object k_731996, object obj_73634_73747_731104 */
 {
 object k_731996 = args[0];
  return_direct_with_clo1(data,  k_731996, (((closure)  k_731996)->fn),  obj_int2obj(0));; 
}

static void __lambda_464(void *data, object self_732457, int argc, object *args) /* object self_732457, object r_731995 */
 {
 object r_731995 = args[0];
  
closureN_type c_735604;
object e_735760 [1];
c_735604.hdr.mark = gc_color_red;
 c_735604.hdr.grayed = 0;
c_735604.tag = closureN_tag;
 c_735604.fn = (function_type)__lambda_465;
c_735604.num_args = 1;
c_735604.num_elements = 1;
c_735604.elements = (object *)e_735760;
c_735604.elements[0] = ((closureN)self_732457)->elements[0];

return_direct_with_clo5(data,  __glo_make_91comparator_srfi_128, (((closure)  __glo_make_91comparator_srfi_128)->fn),  &c_735604, ((closureN)self_732457)->elements[1], ((closureN)self_732457)->elements[2], ((closureN)self_732457)->elements[3], r_731995);; 
}

static void __lambda_465(void *data, object self_732458, int argc, object *args) /* object self_732458, object r_731991 */
 {
 object r_731991 = args[0];
  
closureN_type c_735606;
object e_735756 [1];
c_735606.hdr.mark = gc_color_red;
 c_735606.hdr.grayed = 0;
c_735606.tag = closureN_tag;
 c_735606.fn = (function_type)__lambda_466;
c_735606.num_args = 1;
c_735606.num_elements = 1;
c_735606.elements = (object *)e_735756;
c_735606.elements[0] = ((closureN)self_732458)->elements[0];


object c_735759 = global_set_cps_id(data,(closure)&c_735606,"__glo_unknown_91object_91comparator_srfi_128", __glo_unknown_91object_91comparator_srfi_128, r_731991);
return_closcall1(data,(closure)&c_735606,  c_735759);; 
}

static void __lambda_466(void *data, object self_732459, int argc, object *args) /* object self_732459, object r_731954 */
 {

  
closureN_type c_735608;
object e_735749 [1];
c_735608.hdr.mark = gc_color_red;
 c_735608.hdr.grayed = 0;
c_735608.tag = closureN_tag;
 c_735608.fn = (function_type)__lambda_467;
c_735608.num_args = 1;
c_735608.num_elements = 1;
c_735608.elements = (object *)e_735749;
c_735608.elements[0] = ((closureN)self_732459)->elements[0];


pair_type local_735755; 

object c_735752 = global_set_cps_id(data,(closure)&c_735608,"__glo__85registered_91comparators_85_srfi_128", __glo__85registered_91comparators_85_srfi_128, set_cell_as_expr(&local_735755, __glo_unknown_91object_91comparator_srfi_128));
return_closcall1(data,(closure)&c_735608,  c_735752);; 
}

static void __lambda_467(void *data, object self_732460, int argc, object *args) /* object self_732460, object r_731955 */
 {

  
closureN_type c_735610;
object e_735748 [1];
c_735610.hdr.mark = gc_color_red;
 c_735610.hdr.grayed = 0;
c_735610.tag = closureN_tag;
 c_735610.fn = (function_type)__lambda_468;
c_735610.num_args = 1;
c_735610.num_elements = 1;
c_735610.elements = (object *)e_735748;
c_735610.elements[0] = ((closureN)self_732460)->elements[0];

return_direct_with_clo1(data,  __glo_make_91default_91comparator_srfi_128, (((closure)  __glo_make_91default_91comparator_srfi_128)->fn),  &c_735610);; 
}

static void __lambda_468(void *data, object self_732461, int argc, object *args) /* object self_732461, object r_731989 */
 {
 object r_731989 = args[0];
  
closureN_type c_735612;
object e_735744 [1];
c_735612.hdr.mark = gc_color_red;
 c_735612.hdr.grayed = 0;
c_735612.tag = closureN_tag;
 c_735612.fn = (function_type)__lambda_469;
c_735612.num_args = 1;
c_735612.num_elements = 1;
c_735612.elements = (object *)e_735744;
c_735612.elements[0] = ((closureN)self_732461)->elements[0];


object c_735747 = global_set_cps_id(data,(closure)&c_735612,"__glo_default_91comparator_srfi_128", __glo_default_91comparator_srfi_128, r_731989);
return_closcall1(data,(closure)&c_735612,  c_735747);; 
}

static void __lambda_469(void *data, object self_732462, int argc, object *args) /* object self_732462, object r_731956 */
 {

  
closureN_type c_735614;
object e_735740 [1];
c_735614.hdr.mark = gc_color_red;
 c_735614.hdr.grayed = 0;
c_735614.tag = closureN_tag;
 c_735614.fn = (function_type)__lambda_470;
c_735614.num_args = 1;
c_735614.num_elements = 1;
c_735614.elements = (object *)e_735740;
c_735614.elements[0] = ((closureN)self_732462)->elements[0];


mclosure0(c_735741, (function_type)__lambda_499);c_735741.num_args = 2;
return_direct_with_clo1(data,(closure)&c_735614,__lambda_470,  &c_735741);; 
}

static void __lambda_499(void *data, object self_732463, int argc, object *args) /* object self_732463, object k_731988, object x_73737_73748_731105, object y_73738_73749_731106 */
 {
 object k_731988 = args[0]; object x_73737_73748_731105 = args[1]; object y_73738_73749_731106 = args[2];
  if( (boolean_f != x_73737_73748_731105) ){ 
  return_direct_with_clo1(data,  k_731988, (((closure)  k_731988)->fn),  boolean_f);
} else { 
  return_direct_with_clo1(data,  k_731988, (((closure)  k_731988)->fn),  y_73738_73749_731106);}
;; 
}

static void __lambda_470(void *data, object self_732464, int argc, object *args) /* object self_732464, object r_731987 */
 {
 object r_731987 = args[0];
  
closureN_type c_735616;
object e_735739 [1];
c_735616.hdr.mark = gc_color_red;
 c_735616.hdr.grayed = 0;
c_735616.tag = closureN_tag;
 c_735616.fn = (function_type)__lambda_471;
c_735616.num_args = 1;
c_735616.num_elements = 1;
c_735616.elements = (object *)e_735739;
c_735616.elements[0] = ((closureN)self_732464)->elements[0];

return_direct_with_clo5(data,  __glo_make_91comparator_srfi_128, (((closure)  __glo_make_91comparator_srfi_128)->fn),  &c_735616, primitive_boolean_127, __glo_boolean_123_127_scheme_base, r_731987, __glo_boolean_91hash_srfi_128);; 
}

static void __lambda_471(void *data, object self_732465, int argc, object *args) /* object self_732465, object r_731986 */
 {
 object r_731986 = args[0];
  
closureN_type c_735618;
object e_735735 [1];
c_735618.hdr.mark = gc_color_red;
 c_735618.hdr.grayed = 0;
c_735618.tag = closureN_tag;
 c_735618.fn = (function_type)__lambda_472;
c_735618.num_args = 1;
c_735618.num_elements = 1;
c_735618.elements = (object *)e_735735;
c_735618.elements[0] = ((closureN)self_732465)->elements[0];


object c_735738 = global_set_cps_id(data,(closure)&c_735618,"__glo_boolean_91comparator_srfi_128", __glo_boolean_91comparator_srfi_128, r_731986);
return_closcall1(data,(closure)&c_735618,  c_735738);; 
}

static void __lambda_472(void *data, object self_732466, int argc, object *args) /* object self_732466, object r_731957 */
 {

  
closureN_type c_735620;
object e_735734 [1];
c_735620.hdr.mark = gc_color_red;
 c_735620.hdr.grayed = 0;
c_735620.tag = closureN_tag;
 c_735620.fn = (function_type)__lambda_473;
c_735620.num_args = 1;
c_735620.num_elements = 1;
c_735620.elements = (object *)e_735734;
c_735620.elements[0] = ((closureN)self_732466)->elements[0];

return_direct_with_clo5(data,  __glo_make_91comparator_srfi_128, (((closure)  __glo_make_91comparator_srfi_128)->fn),  &c_735620, primitive_real_127, primitive__123, primitive__121, __glo_number_91hash_srfi_128);; 
}

static void __lambda_473(void *data, object self_732467, int argc, object *args) /* object self_732467, object r_731985 */
 {
 object r_731985 = args[0];
  
closureN_type c_735622;
object e_735730 [1];
c_735622.hdr.mark = gc_color_red;
 c_735622.hdr.grayed = 0;
c_735622.tag = closureN_tag;
 c_735622.fn = (function_type)__lambda_474;
c_735622.num_args = 1;
c_735622.num_elements = 1;
c_735622.elements = (object *)e_735730;
c_735622.elements[0] = ((closureN)self_732467)->elements[0];


object c_735733 = global_set_cps_id(data,(closure)&c_735622,"__glo_real_91comparator_srfi_128", __glo_real_91comparator_srfi_128, r_731985);
return_closcall1(data,(closure)&c_735622,  c_735733);; 
}

static void __lambda_474(void *data, object self_732468, int argc, object *args) /* object self_732468, object r_731958 */
 {

  
closureN_type c_735624;
object e_735725 [1];
c_735624.hdr.mark = gc_color_red;
 c_735624.hdr.grayed = 0;
c_735624.tag = closureN_tag;
 c_735624.fn = (function_type)__lambda_475;
c_735624.num_args = 1;
c_735624.num_elements = 1;
c_735624.elements = (object *)e_735725;
c_735624.elements[0] = ((closureN)self_732468)->elements[0];


mclosure0(c_735726, (function_type)__lambda_498);c_735726.num_args = 1;
return_direct_with_clo1(data,(closure)&c_735624,__lambda_475,  &c_735726);; 
}

static void __lambda_498(void *data, object self_732469, int argc, object *args) /* object self_732469, object k_731983, object c_73740_73750_731107 */
 {
 object k_731983 = args[0]; object c_73740_73750_731107 = args[1];
  

return_direct_with_clo2(data,  __glo_number_91hash_srfi_128, (((closure)  __glo_number_91hash_srfi_128)->fn),  k_731983, Cyc_char2integer(c_73740_73750_731107));; 
}

static void __lambda_475(void *data, object self_732470, int argc, object *args) /* object self_732470, object r_731982 */
 {
 object r_731982 = args[0];
  
closureN_type c_735626;
object e_735724 [1];
c_735626.hdr.mark = gc_color_red;
 c_735626.hdr.grayed = 0;
c_735626.tag = closureN_tag;
 c_735626.fn = (function_type)__lambda_476;
c_735626.num_args = 1;
c_735626.num_elements = 1;
c_735626.elements = (object *)e_735724;
c_735626.elements[0] = ((closureN)self_732470)->elements[0];

return_direct_with_clo5(data,  __glo_make_91comparator_srfi_128, (((closure)  __glo_make_91comparator_srfi_128)->fn),  &c_735626, primitive_char_127, __glo_char_123_127_scheme_base, __glo_char_121_127_scheme_base, r_731982);; 
}

static void __lambda_476(void *data, object self_732471, int argc, object *args) /* object self_732471, object r_731981 */
 {
 object r_731981 = args[0];
  
closureN_type c_735628;
object e_735720 [1];
c_735628.hdr.mark = gc_color_red;
 c_735628.hdr.grayed = 0;
c_735628.tag = closureN_tag;
 c_735628.fn = (function_type)__lambda_477;
c_735628.num_args = 1;
c_735628.num_elements = 1;
c_735628.elements = (object *)e_735720;
c_735628.elements[0] = ((closureN)self_732471)->elements[0];


object c_735723 = global_set_cps_id(data,(closure)&c_735628,"__glo_char_91comparator_srfi_128", __glo_char_91comparator_srfi_128, r_731981);
return_closcall1(data,(closure)&c_735628,  c_735723);; 
}

static void __lambda_477(void *data, object self_732472, int argc, object *args) /* object self_732472, object r_731959 */
 {

  
closureN_type c_735630;
object e_735711 [1];
c_735630.hdr.mark = gc_color_red;
 c_735630.hdr.grayed = 0;
c_735630.tag = closureN_tag;
 c_735630.fn = (function_type)__lambda_478;
c_735630.num_args = 1;
c_735630.num_elements = 1;
c_735630.elements = (object *)e_735711;
c_735630.elements[0] = ((closureN)self_732472)->elements[0];


mclosure0(c_735712, (function_type)__lambda_496);c_735712.num_args = 1;
return_direct_with_clo1(data,(closure)&c_735630,__lambda_478,  &c_735712);; 
}

static void __lambda_496(void *data, object self_732473, int argc, object *args) /* object self_732473, object k_731978, object c_73741_73751_731108 */
 {
 object k_731978 = args[0]; object c_73741_73751_731108 = args[1];
  
closureN_type c_735714;
object e_735719 [1];
c_735714.hdr.mark = gc_color_red;
 c_735714.hdr.grayed = 0;
c_735714.tag = closureN_tag;
 c_735714.fn = (function_type)__lambda_497;
c_735714.num_args = 1;
c_735714.num_elements = 1;
c_735714.elements = (object *)e_735719;
c_735714.elements[0] = k_731978;

return_direct_with_clo2(data,  __glo_char_91downcase_scheme__char, (((closure)  __glo_char_91downcase_scheme__char)->fn),  &c_735714, c_73741_73751_731108);; 
}

static void __lambda_497(void *data, object self_732474, int argc, object *args) /* object self_732474, object r_731980 */
 {
 object r_731980 = args[0];
  

return_direct_with_clo2(data,  __glo_number_91hash_srfi_128, (((closure)  __glo_number_91hash_srfi_128)->fn),  ((closureN)self_732474)->elements[0], Cyc_char2integer(r_731980));; 
}

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

return_direct_with_clo5(data,  __glo_make_91comparator_srfi_128, (((closure)  __glo_make_91comparator_srfi_128)->fn),  &c_735632, primitive_char_127, __glo_char_91ci_123_127_scheme__char, __glo_char_91ci_121_127_scheme__char, r_731977);; 
}

static void __lambda_479(void *data, object self_732476, int argc, object *args) /* object self_732476, object r_731976 */
 {
 object r_731976 = args[0];
  
closureN_type c_735634;
object e_735706 [1];
c_735634.hdr.mark = gc_color_red;
 c_735634.hdr.grayed = 0;
c_735634.tag = closureN_tag;
 c_735634.fn = (function_type)__lambda_480;
c_735634.num_args = 1;
c_735634.num_elements = 1;
c_735634.elements = (object *)e_735706;
c_735634.elements[0] = ((closureN)self_732476)->elements[0];


object c_735709 = global_set_cps_id(data,(closure)&c_735634,"__glo_char_91ci_91comparator_srfi_128", __glo_char_91ci_91comparator_srfi_128, r_731976);
return_closcall1(data,(closure)&c_735634,  c_735709);; 
}

static void __lambda_480(void *data, object self_732477, int argc, object *args) /* object self_732477, object r_731960 */
 {

  
closureN_type c_735636;
object e_735705 [1];
c_735636.hdr.mark = gc_color_red;
 c_735636.hdr.grayed = 0;
c_735636.tag = closureN_tag;
 c_735636.fn = (function_type)__lambda_481;
c_735636.num_args = 1;
c_735636.num_elements = 1;
c_735636.elements = (object *)e_735705;
c_735636.elements[0] = ((closureN)self_732477)->elements[0];

return_direct_with_clo5(data,  __glo_make_91comparator_srfi_128, (((closure)  __glo_make_91comparator_srfi_128)->fn),  &c_735636, primitive_string_127, __glo_string_123_127_scheme_base, __glo_string_121_127_scheme_base, __glo_string_91hash_srfi_128);; 
}

static void __lambda_481(void *data, object self_732478, int argc, object *args) /* object self_732478, object r_731975 */
 {
 object r_731975 = args[0];
  
closureN_type c_735638;
object e_735701 [1];
c_735638.hdr.mark = gc_color_red;
 c_735638.hdr.grayed = 0;
c_735638.tag = closureN_tag;
 c_735638.fn = (function_type)__lambda_482;
c_735638.num_args = 1;
c_735638.num_elements = 1;
c_735638.elements = (object *)e_735701;
c_735638.elements[0] = ((closureN)self_732478)->elements[0];


object c_735704 = global_set_cps_id(data,(closure)&c_735638,"__glo_string_91comparator_srfi_128", __glo_string_91comparator_srfi_128, r_731975);
return_closcall1(data,(closure)&c_735638,  c_735704);; 
}

static void __lambda_482(void *data, object self_732479, int argc, object *args) /* object self_732479, object r_731961 */
 {

  
closureN_type c_735640;
object e_735700 [1];
c_735640.hdr.mark = gc_color_red;
 c_735640.hdr.grayed = 0;
c_735640.tag = closureN_tag;
 c_735640.fn = (function_type)__lambda_483;
c_735640.num_args = 1;
c_735640.num_elements = 1;
c_735640.elements = (object *)e_735700;
c_735640.elements[0] = ((closureN)self_732479)->elements[0];

return_direct_with_clo5(data,  __glo_make_91comparator_srfi_128, (((closure)  __glo_make_91comparator_srfi_128)->fn),  &c_735640, primitive_string_127, __glo_string_91ci_123_127_scheme__char, __glo_string_91ci_121_127_scheme__char, __glo_string_91ci_91hash_srfi_128);; 
}

static void __lambda_483(void *data, object self_732480, int argc, object *args) /* object self_732480, object r_731974 */
 {
 object r_731974 = args[0];
  
closureN_type c_735642;
object e_735696 [1];
c_735642.hdr.mark = gc_color_red;
 c_735642.hdr.grayed = 0;
c_735642.tag = closureN_tag;
 c_735642.fn = (function_type)__lambda_484;
c_735642.num_args = 1;
c_735642.num_elements = 1;
c_735642.elements = (object *)e_735696;
c_735642.elements[0] = ((closureN)self_732480)->elements[0];


object c_735699 = global_set_cps_id(data,(closure)&c_735642,"__glo_string_91ci_91comparator_srfi_128", __glo_string_91ci_91comparator_srfi_128, r_731974);
return_closcall1(data,(closure)&c_735642,  c_735699);; 
}

static void __lambda_484(void *data, object self_732481, int argc, object *args) /* object self_732481, object r_731962 */
 {

  
closureN_type c_735644;
object e_735695 [1];
c_735644.hdr.mark = gc_color_red;
 c_735644.hdr.grayed = 0;
c_735644.tag = closureN_tag;
 c_735644.fn = (function_type)__lambda_485;
c_735644.num_args = 1;
c_735644.num_elements = 1;
c_735644.elements = (object *)e_735695;
c_735644.elements[0] = ((closureN)self_732481)->elements[0];

return_direct_with_clo3(data,  __glo_make_91pair_91comparator_srfi_128, (((closure)  __glo_make_91pair_91comparator_srfi_128)->fn),  &c_735644, __glo_default_91comparator_srfi_128, __glo_default_91comparator_srfi_128);; 
}

static void __lambda_485(void *data, object self_732482, int argc, object *args) /* object self_732482, object r_731973 */
 {
 object r_731973 = args[0];
  
closureN_type c_735646;
object e_735691 [1];
c_735646.hdr.mark = gc_color_red;
 c_735646.hdr.grayed = 0;
c_735646.tag = closureN_tag;
 c_735646.fn = (function_type)__lambda_486;
c_735646.num_args = 1;
c_735646.num_elements = 1;
c_735646.elements = (object *)e_735691;
c_735646.elements[0] = ((closureN)self_732482)->elements[0];


object c_735694 = global_set_cps_id(data,(closure)&c_735646,"__glo_pair_91comparator_srfi_128", __glo_pair_91comparator_srfi_128, r_731973);
return_closcall1(data,(closure)&c_735646,  c_735694);; 
}

static void __lambda_486(void *data, object self_732483, int argc, object *args) /* object self_732483, object r_731963 */
 {

  
closureN_type c_735648;
object e_735690 [1];
c_735648.hdr.mark = gc_color_red;
 c_735648.hdr.grayed = 0;
c_735648.tag = closureN_tag;
 c_735648.fn = (function_type)__lambda_487;
c_735648.num_args = 1;
c_735648.num_elements = 1;
c_735648.elements = (object *)e_735690;
c_735648.elements[0] = ((closureN)self_732483)->elements[0];

return_direct_with_clo6(data,  __glo_make_91list_91comparator_srfi_128, (((closure)  __glo_make_91list_91comparator_srfi_128)->fn),  &c_735648, __glo_default_91comparator_srfi_128, __glo_list_127_scheme_base, primitive_null_127, primitive_car, primitive_cdr);; 
}

static void __lambda_487(void *data, object self_732484, int argc, object *args) /* object self_732484, object r_731972 */
 {
 object r_731972 = args[0];
  
closureN_type c_735650;
object e_735686 [1];
c_735650.hdr.mark = gc_color_red;
 c_735650.hdr.grayed = 0;
c_735650.tag = closureN_tag;
 c_735650.fn = (function_type)__lambda_488;
c_735650.num_args = 1;
c_735650.num_elements = 1;
c_735650.elements = (object *)e_735686;
c_735650.elements[0] = ((closureN)self_732484)->elements[0];


object c_735689 = global_set_cps_id(data,(closure)&c_735650,"__glo_list_91comparator_srfi_128", __glo_list_91comparator_srfi_128, r_731972);
return_closcall1(data,(closure)&c_735650,  c_735689);; 
}

static void __lambda_488(void *data, object self_732485, int argc, object *args) /* object self_732485, object r_731964 */
 {

  
closureN_type c_735652;
object e_735685 [1];
c_735652.hdr.mark = gc_color_red;
 c_735652.hdr.grayed = 0;
c_735652.tag = closureN_tag;
 c_735652.fn = (function_type)__lambda_489;
c_735652.num_args = 1;
c_735652.num_elements = 1;
c_735652.elements = (object *)e_735685;
c_735652.elements[0] = ((closureN)self_732485)->elements[0];

return_direct_with_clo5(data,  __glo_make_91vector_91comparator_srfi_128, (((closure)  __glo_make_91vector_91comparator_srfi_128)->fn),  &c_735652, __glo_default_91comparator_srfi_128, primitive_vector_127, primitive_vector_91length, primitive_vector_91ref);; 
}

static void __lambda_489(void *data, object self_732486, int argc, object *args) /* object self_732486, object r_731971 */
 {
 object r_731971 = args[0];
  
closureN_type c_735654;
object e_735681 [1];
c_735654.hdr.mark = gc_color_red;
 c_735654.hdr.grayed = 0;
c_735654.tag = closureN_tag;
 c_735654.fn = (function_type)__lambda_490;
c_735654.num_args = 1;
c_735654.num_elements = 1;
c_735654.elements = (object *)e_735681;
c_735654.elements[0] = ((closureN)self_732486)->elements[0];


object c_735684 = global_set_cps_id(data,(closure)&c_735654,"__glo_vector_91comparator_srfi_128", __glo_vector_91comparator_srfi_128, r_731971);
return_closcall1(data,(closure)&c_735654,  c_735684);; 
}

static void __lambda_490(void *data, object self_732487, int argc, object *args) /* object self_732487, object r_731965 */
 {

  
closureN_type c_735656;
object e_735680 [1];
c_735656.hdr.mark = gc_color_red;
 c_735656.hdr.grayed = 0;
c_735656.tag = closureN_tag;
 c_735656.fn = (function_type)__lambda_491;
c_735656.num_args = 1;
c_735656.num_elements = 1;
c_735656.elements = (object *)e_735680;
c_735656.elements[0] = ((closureN)self_732487)->elements[0];

return_direct_with_clo5(data,  __glo_make_91comparator_srfi_128, (((closure)  __glo_make_91comparator_srfi_128)->fn),  &c_735656, boolean_t, primitive_eq_127, boolean_f, __glo_default_91hash_srfi_128);; 
}

static void __lambda_491(void *data, object self_732488, int argc, object *args) /* object self_732488, object r_731970 */
 {
 object r_731970 = args[0];
  
closureN_type c_735658;
object e_735676 [1];
c_735658.hdr.mark = gc_color_red;
 c_735658.hdr.grayed = 0;
c_735658.tag = closureN_tag;
 c_735658.fn = (function_type)__lambda_492;
c_735658.num_args = 1;
c_735658.num_elements = 1;
c_735658.elements = (object *)e_735676;
c_735658.elements[0] = ((closureN)self_732488)->elements[0];


object c_735679 = global_set_cps_id(data,(closure)&c_735658,"__glo_eq_91comparator_srfi_128", __glo_eq_91comparator_srfi_128, r_731970);
return_closcall1(data,(closure)&c_735658,  c_735679);; 
}

static void __lambda_492(void *data, object self_732489, int argc, object *args) /* object self_732489, object r_731966 */
 {

  
closureN_type c_735660;
object e_735675 [1];
c_735660.hdr.mark = gc_color_red;
 c_735660.hdr.grayed = 0;
c_735660.tag = closureN_tag;
 c_735660.fn = (function_type)__lambda_493;
c_735660.num_args = 1;
c_735660.num_elements = 1;
c_735660.elements = (object *)e_735675;
c_735660.elements[0] = ((closureN)self_732489)->elements[0];

return_direct_with_clo5(data,  __glo_make_91comparator_srfi_128, (((closure)  __glo_make_91comparator_srfi_128)->fn),  &c_735660, boolean_t, primitive_eqv_127, boolean_f, __glo_default_91hash_srfi_128);; 
}

static void __lambda_493(void *data, object self_732490, int argc, object *args) /* object self_732490, object r_731969 */
 {
 object r_731969 = args[0];
  
closureN_type c_735662;
object e_735671 [1];
c_735662.hdr.mark = gc_color_red;
 c_735662.hdr.grayed = 0;
c_735662.tag = closureN_tag;
 c_735662.fn = (function_type)__lambda_494;
c_735662.num_args = 1;
c_735662.num_elements = 1;
c_735662.elements = (object *)e_735671;
c_735662.elements[0] = ((closureN)self_732490)->elements[0];


object c_735674 = global_set_cps_id(data,(closure)&c_735662,"__glo_eqv_91comparator_srfi_128", __glo_eqv_91comparator_srfi_128, r_731969);
return_closcall1(data,(closure)&c_735662,  c_735674);; 
}

static void __lambda_494(void *data, object self_732491, int argc, object *args) /* object self_732491, object r_731967 */
 {

  
closureN_type c_735664;
object e_735670 [1];
c_735664.hdr.mark = gc_color_red;
 c_735664.hdr.grayed = 0;
c_735664.tag = closureN_tag;
 c_735664.fn = (function_type)__lambda_495;
c_735664.num_args = 1;
c_735664.num_elements = 1;
c_735664.elements = (object *)e_735670;
c_735664.elements[0] = ((closureN)self_732491)->elements[0];

return_direct_with_clo5(data,  __glo_make_91comparator_srfi_128, (((closure)  __glo_make_91comparator_srfi_128)->fn),  &c_735664, boolean_t, primitive_equal_127, boolean_f, __glo_default_91hash_srfi_128);; 
}

static void __lambda_495(void *data, object self_732492, int argc, object *args) /* object self_732492, object r_731968 */
 {
 object r_731968 = args[0];
  
object c_735669 = global_set_cps_id(data,  ((closureN)self_732492)->elements[0],"__glo_equal_91comparator_srfi_128", __glo_equal_91comparator_srfi_128, r_731968);
return_direct_with_clo1(data,  ((closureN)self_732492)->elements[0], (((closure)  ((closureN)self_732492)->elements[0])->fn),  c_735669);; 
}

static void __lambda_435(void *data, object _, int argc, object *args) /* closure _,object k_731908, object comp_73735_731097, object args_73736_731098_raw, ... */
 {
object k_731908 = args[0]; object comp_73735_731097 = args[1];
load_varargs(args_73736_731098, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/128.sld:comparator-min");
return_direct_with_clo3(data,  __glo_comparator_91min_91in_91list_srfi_128, (((closure)  __glo_comparator_91min_91in_91list_srfi_128)->fn),  k_731908, comp_73735_731097, args_73736_731098);; 
}

static void __lambda_434(void *data, object _, int argc, object *args) /* closure _,object k_731905, object comp_73733_731095, object args_73734_731096_raw, ... */
 {
object k_731905 = args[0]; object comp_73733_731095 = args[1];
load_varargs(args_73734_731096, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/128.sld:comparator-max");
return_direct_with_clo3(data,  __glo_comparator_91max_91in_91list_srfi_128, (((closure)  __glo_comparator_91max_91in_91list_srfi_128)->fn),  k_731905, comp_73733_731095, args_73734_731096);; 
}

static void __lambda_426(void *data, object _, int argc, object *args) /* closure _,object k_731890, object comp_73724_731087, object list_73725_731088 */
 {
object k_731890 = args[0]; object comp_73724_731087 = args[1]; object list_73725_731088 = args[2];
  Cyc_st_add(data, "srfi/128.sld:comparator-min-in-list");

closureN_type c_735475;
object e_735541 [2];
c_735475.hdr.mark = gc_color_red;
 c_735475.hdr.grayed = 0;
c_735475.tag = closureN_tag;
 c_735475.fn = (function_type)__lambda_427;
c_735475.num_args = 1;
c_735475.num_elements = 2;
c_735475.elements = (object *)e_735541;
c_735475.elements[0] = k_731890;
c_735475.elements[1] = list_73725_731088;

return_direct_with_clo2(data,  __glo_comparator_91ordering_91predicate_srfi_128, (((closure)  __glo_comparator_91ordering_91predicate_srfi_128)->fn),  &c_735475, comp_73724_731087);; 
}

static void __lambda_427(void *data, object self_732418, int argc, object *args) /* object self_732418, object _121_73726_731089 */
 {
 object _121_73726_731089 = args[0];
  
closureN_type c_735477;
object e_735534 [2];
c_735477.hdr.mark = gc_color_red;
 c_735477.hdr.grayed = 0;
c_735477.tag = closureN_tag;
 c_735477.fn = (function_type)__lambda_428;
c_735477.num_args = 2;
c_735477.num_elements = 2;
c_735477.elements = (object *)e_735534;
c_735477.elements[0] = _121_73726_731089;
c_735477.elements[1] = ((closureN)self_732418)->elements[0];





return_direct_with_clo2(data,(closure)&c_735477,__lambda_428,  Cyc_car(data, ((closureN)self_732418)->elements[1]), Cyc_cdr(data, ((closureN)self_732418)->elements[1]));; 
}

static void __lambda_428(void *data, object self_732419, int argc, object *args) /* object self_732419, object min_73728_731090, object list_73729_731091 */
 {
 object min_73728_731090 = args[0]; object list_73729_731091 = args[1];
  
closureN_type c_735479;
object e_735533 [4];
c_735479.hdr.mark = gc_color_red;
 c_735479.hdr.grayed = 0;
c_735479.tag = closureN_tag;
 c_735479.fn = (function_type)__lambda_429;
c_735479.num_args = 1;
c_735479.num_elements = 4;
c_735479.elements = (object *)e_735533;
c_735479.elements[0] = ((closureN)self_732419)->elements[0];
c_735479.elements[1] = ((closureN)self_732419)->elements[1];
c_735479.elements[2] = list_73729_731091;
c_735479.elements[3] = min_73728_731090;

return_direct_with_clo1(data,(closure)&c_735479,__lambda_429,  boolean_f);; 
}

static void __lambda_429(void *data, object self_732420, int argc, object *args) /* object self_732420, object loop_73730_731092 */
 {
 object loop_73730_731092 = args[0];
  
closureN_type c_735481;
object e_735529 [4];
c_735481.hdr.mark = gc_color_red;
 c_735481.hdr.grayed = 0;
c_735481.tag = closureN_tag;
 c_735481.fn = (function_type)__lambda_521;
c_735481.num_args = 1;
c_735481.num_elements = 4;
c_735481.elements = (object *)e_735529;
c_735481.elements[0] = ((closureN)self_732420)->elements[0];
c_735481.elements[1] = ((closureN)self_732420)->elements[1];
c_735481.elements[2] = ((closureN)self_732420)->elements[2];
c_735481.elements[3] = ((closureN)self_732420)->elements[3];


pair_type local_735532; 
return_direct_with_clo1(data,(closure)&c_735481,__lambda_521,  set_cell_as_expr(&local_735532, loop_73730_731092));; 
}

static void __lambda_521(void *data, object self_732421, int argc, object *args) /* object self_732421, object loop_73730_731092 */
 {
 object loop_73730_731092 = args[0];
  
closureN_type c_735483;
object e_735497 [4];
c_735483.hdr.mark = gc_color_red;
 c_735483.hdr.grayed = 0;
c_735483.tag = closureN_tag;
 c_735483.fn = (function_type)__lambda_430;
c_735483.num_args = 1;
c_735483.num_elements = 4;
c_735483.elements = (object *)e_735497;
c_735483.elements[0] = ((closureN)self_732421)->elements[1];
c_735483.elements[1] = ((closureN)self_732421)->elements[2];
c_735483.elements[2] = loop_73730_731092;
c_735483.elements[3] = ((closureN)self_732421)->elements[3];


closureN_type c_735498;
object e_735528 [2];
c_735498.hdr.mark = gc_color_red;
 c_735498.hdr.grayed = 0;
c_735498.tag = closureN_tag;
 c_735498.fn = (function_type)__lambda_432;
c_735498.num_args = 2;
c_735498.num_elements = 2;
c_735498.elements = (object *)e_735528;
c_735498.elements[0] = ((closureN)self_732421)->elements[0];
c_735498.elements[1] = loop_73730_731092;

return_direct_with_clo1(data,(closure)&c_735483,__lambda_430,  &c_735498);; 
}

static void __lambda_432(void *data, object self_732422, int argc, object *args) /* object self_732422, object k_731896, object min_73731_731093, object list_73732_731094 */
 {
 object k_731896 = args[0]; object min_73731_731093 = args[1]; object list_73732_731094 = args[2];
    
if( (boolean_f != Cyc_is_null(list_73732_731094)) ){ 
  return_direct_with_clo1(data,  k_731896, (((closure)  k_731896)->fn),  min_73731_731093);
} else { 
  
closureN_type c_735504;
object e_735525 [4];
c_735504.hdr.mark = gc_color_red;
 c_735504.hdr.grayed = 0;
c_735504.tag = closureN_tag;
 c_735504.fn = (function_type)__lambda_433;
c_735504.num_args = 1;
c_735504.num_elements = 4;
c_735504.elements = (object *)e_735525;
c_735504.elements[0] = k_731896;
c_735504.elements[1] = list_73732_731094;
c_735504.elements[2] = ((closureN)self_732422)->elements[1];
c_735504.elements[3] = min_73731_731093;



return_closcall3(data,  ((closureN)self_732422)->elements[0],  &c_735504, min_73731_731093, Cyc_car(data, list_73732_731094));}
;; 
}

static void __lambda_433(void *data, object self_732423, int argc, object *args) /* object self_732423, object r_731898 */
 {
 object r_731898 = args[0];
  if( (boolean_f != r_731898) ){ 
  



return_closcall3(data,  car(((closureN)self_732423)->elements[2]),  ((closureN)self_732423)->elements[0], ((closureN)self_732423)->elements[3], Cyc_cdr(data, ((closureN)self_732423)->elements[1]));
} else { 
  





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

static void __lambda_430(void *data, object self_732424, int argc, object *args) /* object self_732424, object r_731895 */
 {
 object r_731895 = args[0];
  
closureN_type c_735485;
object e_735493 [4];
c_735485.hdr.mark = gc_color_red;
 c_735485.hdr.grayed = 0;
c_735485.tag = closureN_tag;
 c_735485.fn = (function_type)__lambda_431;
c_735485.num_args = 1;
c_735485.num_elements = 4;
c_735485.elements = (object *)e_735493;
c_735485.elements[0] = ((closureN)self_732424)->elements[0];
c_735485.elements[1] = ((closureN)self_732424)->elements[1];
c_735485.elements[2] = ((closureN)self_732424)->elements[2];
c_735485.elements[3] = ((closureN)self_732424)->elements[3];



return_direct_with_clo1(data,(closure)&c_735485,__lambda_431,  Cyc_set_cell(data, ((closureN)self_732424)->elements[2], r_731895));; 
}

static void __lambda_431(void *data, object self_732425, int argc, object *args) /* object self_732425, object r_731894 */
 {

  

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

static void __lambda_418(void *data, object _, int argc, object *args) /* closure _,object k_731875, object comp_73715_731079, object list_73716_731080 */
 {
object k_731875 = args[0]; object comp_73715_731079 = args[1]; object list_73716_731080 = args[2];
  Cyc_st_add(data, "srfi/128.sld:comparator-max-in-list");

closureN_type c_735406;
object e_735472 [2];
c_735406.hdr.mark = gc_color_red;
 c_735406.hdr.grayed = 0;
c_735406.tag = closureN_tag;
 c_735406.fn = (function_type)__lambda_419;
c_735406.num_args = 1;
c_735406.num_elements = 2;
c_735406.elements = (object *)e_735472;
c_735406.elements[0] = k_731875;
c_735406.elements[1] = list_73716_731080;

return_direct_with_clo2(data,  __glo_comparator_91ordering_91predicate_srfi_128, (((closure)  __glo_comparator_91ordering_91predicate_srfi_128)->fn),  &c_735406, comp_73715_731079);; 
}

static void __lambda_419(void *data, object self_732410, int argc, object *args) /* object self_732410, object _121_73717_731081 */
 {
 object _121_73717_731081 = args[0];
  
closureN_type c_735408;
object e_735465 [2];
c_735408.hdr.mark = gc_color_red;
 c_735408.hdr.grayed = 0;
c_735408.tag = closureN_tag;
 c_735408.fn = (function_type)__lambda_420;
c_735408.num_args = 2;
c_735408.num_elements = 2;
c_735408.elements = (object *)e_735465;
c_735408.elements[0] = _121_73717_731081;
c_735408.elements[1] = ((closureN)self_732410)->elements[0];





return_direct_with_clo2(data,(closure)&c_735408,__lambda_420,  Cyc_car(data, ((closureN)self_732410)->elements[1]), Cyc_cdr(data, ((closureN)self_732410)->elements[1]));; 
}

static void __lambda_420(void *data, object self_732411, int argc, object *args) /* object self_732411, object max_73719_731082, object list_73720_731083 */
 {
 object max_73719_731082 = args[0]; object list_73720_731083 = args[1];
  
closureN_type c_735410;
object e_735464 [4];
c_735410.hdr.mark = gc_color_red;
 c_735410.hdr.grayed = 0;
c_735410.tag = closureN_tag;
 c_735410.fn = (function_type)__lambda_421;
c_735410.num_args = 1;
c_735410.num_elements = 4;
c_735410.elements = (object *)e_735464;
c_735410.elements[0] = ((closureN)self_732411)->elements[0];
c_735410.elements[1] = ((closureN)self_732411)->elements[1];
c_735410.elements[2] = list_73720_731083;
c_735410.elements[3] = max_73719_731082;

return_direct_with_clo1(data,(closure)&c_735410,__lambda_421,  boolean_f);; 
}

static void __lambda_421(void *data, object self_732412, int argc, object *args) /* object self_732412, object loop_73721_731084 */
 {
 object loop_73721_731084 = args[0];
  
closureN_type c_735412;
object e_735460 [4];
c_735412.hdr.mark = gc_color_red;
 c_735412.hdr.grayed = 0;
c_735412.tag = closureN_tag;
 c_735412.fn = (function_type)__lambda_520;
c_735412.num_args = 1;
c_735412.num_elements = 4;
c_735412.elements = (object *)e_735460;
c_735412.elements[0] = ((closureN)self_732412)->elements[0];
c_735412.elements[1] = ((closureN)self_732412)->elements[1];
c_735412.elements[2] = ((closureN)self_732412)->elements[2];
c_735412.elements[3] = ((closureN)self_732412)->elements[3];


pair_type local_735463; 
return_direct_with_clo1(data,(closure)&c_735412,__lambda_520,  set_cell_as_expr(&local_735463, loop_73721_731084));; 
}

static void __lambda_520(void *data, object self_732413, int argc, object *args) /* object self_732413, object loop_73721_731084 */
 {
 object loop_73721_731084 = args[0];
  
closureN_type c_735414;
object e_735428 [4];
c_735414.hdr.mark = gc_color_red;
 c_735414.hdr.grayed = 0;
c_735414.tag = closureN_tag;
 c_735414.fn = (function_type)__lambda_422;
c_735414.num_args = 1;
c_735414.num_elements = 4;
c_735414.elements = (object *)e_735428;
c_735414.elements[0] = ((closureN)self_732413)->elements[1];
c_735414.elements[1] = ((closureN)self_732413)->elements[2];
c_735414.elements[2] = loop_73721_731084;
c_735414.elements[3] = ((closureN)self_732413)->elements[3];


closureN_type c_735429;
object e_735459 [2];
c_735429.hdr.mark = gc_color_red;
 c_735429.hdr.grayed = 0;
c_735429.tag = closureN_tag;
 c_735429.fn = (function_type)__lambda_424;
c_735429.num_args = 2;
c_735429.num_elements = 2;
c_735429.elements = (object *)e_735459;
c_735429.elements[0] = ((closureN)self_732413)->elements[0];
c_735429.elements[1] = loop_73721_731084;

return_direct_with_clo1(data,(closure)&c_735414,__lambda_422,  &c_735429);; 
}

static void __lambda_424(void *data, object self_732414, int argc, object *args) /* object self_732414, object k_731881, object max_73722_731085, object list_73723_731086 */
 {
 object k_731881 = args[0]; object max_73722_731085 = args[1]; object list_73723_731086 = args[2];
    
if( (boolean_f != Cyc_is_null(list_73723_731086)) ){ 
  return_direct_with_clo1(data,  k_731881, (((closure)  k_731881)->fn),  max_73722_731085);
} else { 
  
closureN_type c_735435;
object e_735456 [4];
c_735435.hdr.mark = gc_color_red;
 c_735435.hdr.grayed = 0;
c_735435.tag = closureN_tag;
 c_735435.fn = (function_type)__lambda_425;
c_735435.num_args = 1;
c_735435.num_elements = 4;
c_735435.elements = (object *)e_735456;
c_735435.elements[0] = k_731881;
c_735435.elements[1] = list_73723_731086;
c_735435.elements[2] = ((closureN)self_732414)->elements[1];
c_735435.elements[3] = max_73722_731085;



return_closcall3(data,  ((closureN)self_732414)->elements[0],  &c_735435, max_73722_731085, Cyc_car(data, list_73723_731086));}
;; 
}

static void __lambda_425(void *data, object self_732415, int argc, object *args) /* object self_732415, object r_731883 */
 {
 object r_731883 = args[0];
  if( (boolean_f != r_731883) ){ 
  





return_closcall3(data,  car(((closureN)self_732415)->elements[2]),  ((closureN)self_732415)->elements[0], Cyc_car(data, ((closureN)self_732415)->elements[1]), Cyc_cdr(data, ((closureN)self_732415)->elements[1]));
} else { 
  



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

static void __lambda_422(void *data, object self_732416, int argc, object *args) /* object self_732416, object r_731880 */
 {
 object r_731880 = args[0];
  
closureN_type c_735416;
object e_735424 [4];
c_735416.hdr.mark = gc_color_red;
 c_735416.hdr.grayed = 0;
c_735416.tag = closureN_tag;
 c_735416.fn = (function_type)__lambda_423;
c_735416.num_args = 1;
c_735416.num_elements = 4;
c_735416.elements = (object *)e_735424;
c_735416.elements[0] = ((closureN)self_732416)->elements[0];
c_735416.elements[1] = ((closureN)self_732416)->elements[1];
c_735416.elements[2] = ((closureN)self_732416)->elements[2];
c_735416.elements[3] = ((closureN)self_732416)->elements[3];



return_direct_with_clo1(data,(closure)&c_735416,__lambda_423,  Cyc_set_cell(data, ((closureN)self_732416)->elements[2], r_731880));; 
}

static void __lambda_423(void *data, object self_732417, int argc, object *args) /* object self_732417, object r_731879 */
 {

  

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

static void __lambda_415(void *data, object _, int argc, object *args) /* closure _,object k_731870 */
 {
object k_731870 = args[0];
  Cyc_st_add(data, "srfi/128.sld:make-default-comparator");

closureN_type c_735398;
object e_735401 [1];
c_735398.hdr.mark = gc_color_red;
 c_735398.hdr.grayed = 0;
c_735398.tag = closureN_tag;
 c_735398.fn = (function_type)__lambda_416;
c_735398.num_args = 1;
c_735398.num_elements = 1;
c_735398.elements = (object *)e_735401;
c_735398.elements[0] = k_731870;


mclosure0(c_735402, (function_type)__lambda_417);c_735402.num_args = 1;
return_direct_with_clo1(data,(closure)&c_735398,__lambda_416,  &c_735402);; 
}

static void __lambda_417(void *data, object self_732408, int argc, object *args) /* object self_732408, object k_731872, object obj_73714_731078 */
 {
 object k_731872 = args[0];
  return_direct_with_clo1(data,  k_731872, (((closure)  k_731872)->fn),  boolean_t);; 
}

static void __lambda_416(void *data, object self_732409, int argc, object *args) /* object self_732409, object r_731871 */
 {
 object r_731871 = args[0];
  return_direct_with_clo5(data,  __glo_make_91comparator_srfi_128, (((closure)  __glo_make_91comparator_srfi_128)->fn),  ((closureN)self_732409)->elements[0], r_731871, __glo_default_91equality_srfi_128, __glo_default_91ordering_srfi_128, __glo_default_91hash_srfi_128);; 
}

static void __lambda_411(void *data, object _, int argc, object *args) /* closure _,object k_731864, object a_73710_731074, object b_73711_731075 */
 {
object k_731864 = args[0]; object a_73710_731074 = args[1]; object b_73711_731075 = args[2];
  Cyc_st_add(data, "srfi/128.sld:default-equality");

closureN_type c_735378;
object e_735395 [3];
c_735378.hdr.mark = gc_color_red;
 c_735378.hdr.grayed = 0;
c_735378.tag = closureN_tag;
 c_735378.fn = (function_type)__lambda_412;
c_735378.num_args = 1;
c_735378.num_elements = 3;
c_735378.elements = (object *)e_735395;
c_735378.elements[0] = a_73710_731074;
c_735378.elements[1] = b_73711_731075;
c_735378.elements[2] = k_731864;

return_direct_with_clo2(data,  __glo_object_91type_srfi_128, (((closure)  __glo_object_91type_srfi_128)->fn),  &c_735378, a_73710_731074);; 
}

static void __lambda_412(void *data, object self_732405, int argc, object *args) /* object self_732405, object r_731865 */
 {
 object r_731865 = args[0];
  
closureN_type c_735380;
object e_735393 [4];
c_735380.hdr.mark = gc_color_red;
 c_735380.hdr.grayed = 0;
c_735380.tag = closureN_tag;
 c_735380.fn = (function_type)__lambda_413;
c_735380.num_args = 1;
c_735380.num_elements = 4;
c_735380.elements = (object *)e_735393;
c_735380.elements[0] = ((closureN)self_732405)->elements[0];
c_735380.elements[1] = ((closureN)self_732405)->elements[1];
c_735380.elements[2] = ((closureN)self_732405)->elements[2];
c_735380.elements[3] = r_731865;

return_direct_with_clo2(data,  __glo_object_91type_srfi_128, (((closure)  __glo_object_91type_srfi_128)->fn),  &c_735380, ((closureN)self_732405)->elements[1]);; 
}

static void __lambda_413(void *data, object self_732406, int argc, object *args) /* object self_732406, object r_731866 */
 {
 object r_731866 = args[0];
  
closureN_type c_735382;
object e_735391 [3];
c_735382.hdr.mark = gc_color_red;
 c_735382.hdr.grayed = 0;
c_735382.tag = closureN_tag;
 c_735382.fn = (function_type)__lambda_414;
c_735382.num_args = 2;
c_735382.num_elements = 3;
c_735382.elements = (object *)e_735391;
c_735382.elements[0] = ((closureN)self_732406)->elements[0];
c_735382.elements[1] = ((closureN)self_732406)->elements[1];
c_735382.elements[2] = ((closureN)self_732406)->elements[2];

return_direct_with_clo2(data,(closure)&c_735382,__lambda_414,  ((closureN)self_732406)->elements[3], r_731866);; 
}

static void __lambda_414(void *data, object self_732407, int argc, object *args) /* object self_732407, object a_91type_73712_731076, object b_91type_73713_731077 */
 {
 object a_91type_73712_731076 = args[0]; object b_91type_73713_731077 = args[1];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, a_91type_73712_731076, b_91type_73713_731077)) ){ 
  return_direct_with_clo4(data,  __glo_dispatch_91equality_srfi_128, (((closure)  __glo_dispatch_91equality_srfi_128)->fn),  ((closureN)self_732407)->elements[2], a_91type_73712_731076, ((closureN)self_732407)->elements[0], ((closureN)self_732407)->elements[1]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732407)->elements[2], (((closure)  ((closureN)self_732407)->elements[2])->fn),  boolean_f);}
;; 
}

static void __lambda_407(void *data, object _, int argc, object *args) /* closure _,object k_731857, object a_73699_731070, object b_73700_731071 */
 {
object k_731857 = args[0]; object a_73699_731070 = args[1]; object b_73700_731071 = args[2];
  Cyc_st_add(data, "srfi/128.sld:default-ordering");

closureN_type c_735354;
object e_735375 [3];
c_735354.hdr.mark = gc_color_red;
 c_735354.hdr.grayed = 0;
c_735354.tag = closureN_tag;
 c_735354.fn = (function_type)__lambda_408;
c_735354.num_args = 1;
c_735354.num_elements = 3;
c_735354.elements = (object *)e_735375;
c_735354.elements[0] = a_73699_731070;
c_735354.elements[1] = b_73700_731071;
c_735354.elements[2] = k_731857;

return_direct_with_clo2(data,  __glo_object_91type_srfi_128, (((closure)  __glo_object_91type_srfi_128)->fn),  &c_735354, a_73699_731070);; 
}

static void __lambda_408(void *data, object self_732402, int argc, object *args) /* object self_732402, object r_731858 */
 {
 object r_731858 = args[0];
  
closureN_type c_735356;
object e_735373 [4];
c_735356.hdr.mark = gc_color_red;
 c_735356.hdr.grayed = 0;
c_735356.tag = closureN_tag;
 c_735356.fn = (function_type)__lambda_409;
c_735356.num_args = 1;
c_735356.num_elements = 4;
c_735356.elements = (object *)e_735373;
c_735356.elements[0] = ((closureN)self_732402)->elements[0];
c_735356.elements[1] = ((closureN)self_732402)->elements[1];
c_735356.elements[2] = ((closureN)self_732402)->elements[2];
c_735356.elements[3] = r_731858;

return_direct_with_clo2(data,  __glo_object_91type_srfi_128, (((closure)  __glo_object_91type_srfi_128)->fn),  &c_735356, ((closureN)self_732402)->elements[1]);; 
}

static void __lambda_409(void *data, object self_732403, int argc, object *args) /* object self_732403, object r_731859 */
 {
 object r_731859 = args[0];
  
closureN_type c_735358;
object e_735371 [3];
c_735358.hdr.mark = gc_color_red;
 c_735358.hdr.grayed = 0;
c_735358.tag = closureN_tag;
 c_735358.fn = (function_type)__lambda_410;
c_735358.num_args = 2;
c_735358.num_elements = 3;
c_735358.elements = (object *)e_735371;
c_735358.elements[0] = ((closureN)self_732403)->elements[0];
c_735358.elements[1] = ((closureN)self_732403)->elements[1];
c_735358.elements[2] = ((closureN)self_732403)->elements[2];

return_direct_with_clo2(data,(closure)&c_735358,__lambda_410,  ((closureN)self_732403)->elements[3], r_731859);; 
}

static void __lambda_410(void *data, object self_732404, int argc, object *args) /* object self_732404, object a_91type_73701_731072, object b_91type_73702_731073 */
 {
 object a_91type_73701_731072 = args[0]; object b_91type_73702_731073 = args[1];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, a_91type_73701_731072, b_91type_73702_731073)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732404)->elements[2], (((closure)  ((closureN)self_732404)->elements[2])->fn),  boolean_t);
} else { 
    
if( (boolean_f != Cyc_num_fast_gt_op(data, a_91type_73701_731072, b_91type_73702_731073)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732404)->elements[2], (((closure)  ((closureN)self_732404)->elements[2])->fn),  boolean_f);
} else { 
  return_direct_with_clo4(data,  __glo_dispatch_91ordering_srfi_128, (((closure)  __glo_dispatch_91ordering_srfi_128)->fn),  ((closureN)self_732404)->elements[2], a_91type_73701_731072, ((closureN)self_732404)->elements[0], ((closureN)self_732404)->elements[1]);}
;}
;; 
}

static void __lambda_396(void *data, object _, int argc, object *args) /* closure _,object k_731826, object obj_73694_731068 */
 {
object k_731826 = args[0]; object obj_73694_731068 = args[1];
  Cyc_st_add(data, "srfi/128.sld:default-hash");

closureN_type c_735269;
object e_735351 [2];
c_735269.hdr.mark = gc_color_red;
 c_735269.hdr.grayed = 0;
c_735269.tag = closureN_tag;
 c_735269.fn = (function_type)__lambda_397;
c_735269.num_args = 1;
c_735269.num_elements = 2;
c_735269.elements = (object *)e_735351;
c_735269.elements[0] = k_731826;
c_735269.elements[1] = obj_73694_731068;

return_direct_with_clo2(data,  __glo_object_91type_srfi_128, (((closure)  __glo_object_91type_srfi_128)->fn),  &c_735269, obj_73694_731068);; 
}

static void __lambda_397(void *data, object self_732392, int argc, object *args) /* object self_732392, object tmp_73695_73698_731069 */
 {
 object tmp_73695_73698_731069 = args[0];
    
if( (boolean_f != Cyc_eqv(tmp_73695_73698_731069, obj_int2obj(0))) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732392)->elements[0], (((closure)  ((closureN)self_732392)->elements[0])->fn),  obj_int2obj(0));
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73695_73698_731069, obj_int2obj(1))) ){ 
  
closureN_type c_735277;
object e_735288 [2];
c_735277.hdr.mark = gc_color_red;
 c_735277.hdr.grayed = 0;
c_735277.tag = closureN_tag;
 c_735277.fn = (function_type)__lambda_398;
c_735277.num_args = 1;
c_735277.num_elements = 2;
c_735277.elements = (object *)e_735288;
c_735277.elements[0] = ((closureN)self_732392)->elements[0];
c_735277.elements[1] = ((closureN)self_732392)->elements[1];

return_direct_with_clo1(data,  __glo_make_91default_91comparator_srfi_128, (((closure)  __glo_make_91default_91comparator_srfi_128)->fn),  &c_735277);
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73695_73698_731069, obj_int2obj(2))) ){ 
  if( (boolean_f != ((closureN)self_732392)->elements[1]) ){ 
  return_direct_with_clo1(data,  __glo__75salt_75_srfi_128, (((closure)  __glo__75salt_75_srfi_128)->fn),  ((closureN)self_732392)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732392)->elements[0], (((closure)  ((closureN)self_732392)->elements[0])->fn),  obj_int2obj(0));}
;
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73695_73698_731069, obj_int2obj(3))) ){ 
  return_direct_with_clo2(data,  __glo_char_91hash_srfi_128, (((closure)  __glo_char_91hash_srfi_128)->fn),  ((closureN)self_732392)->elements[0], ((closureN)self_732392)->elements[1]);
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73695_73698_731069, obj_int2obj(4))) ){ 
  return_direct_with_clo2(data,  __glo_string_91hash_srfi_128, (((closure)  __glo_string_91hash_srfi_128)->fn),  ((closureN)self_732392)->elements[0], ((closureN)self_732392)->elements[1]);
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73695_73698_731069, obj_int2obj(5))) ){ 
  return_direct_with_clo2(data,  __glo_symbol_91hash_srfi_128, (((closure)  __glo_symbol_91hash_srfi_128)->fn),  ((closureN)self_732392)->elements[0], ((closureN)self_732392)->elements[1]);
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73695_73698_731069, obj_int2obj(6))) ){ 
  return_direct_with_clo2(data,  __glo_number_91hash_srfi_128, (((closure)  __glo_number_91hash_srfi_128)->fn),  ((closureN)self_732392)->elements[0], ((closureN)self_732392)->elements[1]);
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73695_73698_731069, obj_int2obj(7))) ){ 
  
closureN_type c_735319;
object e_735326 [2];
c_735319.hdr.mark = gc_color_red;
 c_735319.hdr.grayed = 0;
c_735319.tag = closureN_tag;
 c_735319.fn = (function_type)__lambda_401;
c_735319.num_args = 1;
c_735319.num_elements = 2;
c_735319.elements = (object *)e_735326;
c_735319.elements[0] = ((closureN)self_732392)->elements[0];
c_735319.elements[1] = ((closureN)self_732392)->elements[1];

return_direct_with_clo1(data,  __glo_make_91default_91comparator_srfi_128, (((closure)  __glo_make_91default_91comparator_srfi_128)->fn),  &c_735319);
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73695_73698_731069, obj_int2obj(8))) ){ 
  
closureN_type c_735330;
object e_735337 [2];
c_735330.hdr.mark = gc_color_red;
 c_735330.hdr.grayed = 0;
c_735330.tag = closureN_tag;
 c_735330.fn = (function_type)__lambda_403;
c_735330.num_args = 1;
c_735330.num_elements = 2;
c_735330.elements = (object *)e_735337;
c_735330.elements[0] = ((closureN)self_732392)->elements[0];
c_735330.elements[1] = ((closureN)self_732392)->elements[1];

return_direct_with_clo1(data,  __glo_make_91default_91comparator_srfi_128, (((closure)  __glo_make_91default_91comparator_srfi_128)->fn),  &c_735330);
} else { 
  
closureN_type c_735339;
object e_735349 [2];
c_735339.hdr.mark = gc_color_red;
 c_735339.hdr.grayed = 0;
c_735339.tag = closureN_tag;
 c_735339.fn = (function_type)__lambda_405;
c_735339.num_args = 1;
c_735339.num_elements = 2;
c_735339.elements = (object *)e_735349;
c_735339.elements[0] = ((closureN)self_732392)->elements[0];
c_735339.elements[1] = ((closureN)self_732392)->elements[1];

return_direct_with_clo2(data,  __glo_object_91type_srfi_128, (((closure)  __glo_object_91type_srfi_128)->fn),  &c_735339, ((closureN)self_732392)->elements[1]);}
;}
;}
;}
;}
;}
;}
;}
;}
;; 
}

static void __lambda_405(void *data, object self_732400, int argc, object *args) /* object self_732400, object r_731845 */
 {
 object r_731845 = args[0];
  
closureN_type c_735341;
object e_735345 [2];
c_735341.hdr.mark = gc_color_red;
 c_735341.hdr.grayed = 0;
c_735341.tag = closureN_tag;
 c_735341.fn = (function_type)__lambda_406;
c_735341.num_args = 1;
c_735341.num_elements = 2;
c_735341.elements = (object *)e_735345;
c_735341.elements[0] = ((closureN)self_732400)->elements[0];
c_735341.elements[1] = ((closureN)self_732400)->elements[1];


complex_num_type local_735348; 
return_direct_with_clo3(data,  __glo_list_91ref_scheme_base, (((closure)  __glo_list_91ref_scheme_base)->fn),  &c_735341, __glo__85registered_91comparators_85_srfi_128, Cyc_fast_sub(data,&local_735348, r_731845, __glo_first_91comparator_91index_srfi_128));; 
}

static void __lambda_406(void *data, object self_732401, int argc, object *args) /* object self_732401, object r_731844_732034 */
 {
 object r_731844_732034 = args[0];
  return_direct_with_clo3(data,  __glo_comparator_91hash_srfi_128, (((closure)  __glo_comparator_91hash_srfi_128)->fn),  ((closureN)self_732401)->elements[0], r_731844_732034, ((closureN)self_732401)->elements[1]);; 
}

static void __lambda_403(void *data, object self_732398, int argc, object *args) /* object self_732398, object r_731843 */
 {
 object r_731843 = args[0];
  
closureN_type c_735332;
object e_735336 [2];
c_735332.hdr.mark = gc_color_red;
 c_735332.hdr.grayed = 0;
c_735332.tag = closureN_tag;
 c_735332.fn = (function_type)__lambda_404;
c_735332.num_args = 1;
c_735332.num_elements = 2;
c_735332.elements = (object *)e_735336;
c_735332.elements[0] = ((closureN)self_732398)->elements[0];
c_735332.elements[1] = ((closureN)self_732398)->elements[1];

return_direct_with_clo5(data,  __glo_make_91vector_91hash_srfi_128, (((closure)  __glo_make_91vector_91hash_srfi_128)->fn),  &c_735332, r_731843, primitive_bytevector_127, primitive_bytevector_91length, primitive_bytevector_91u8_91ref);; 
}

static void __lambda_404(void *data, object self_732399, int argc, object *args) /* object self_732399, object r_731842 */
 {
 object r_731842 = args[0];
  return_closcall2(data,  r_731842,  ((closureN)self_732399)->elements[0], ((closureN)self_732399)->elements[1]);; 
}

static void __lambda_401(void *data, object self_732396, int argc, object *args) /* object self_732396, object r_731840 */
 {
 object r_731840 = args[0];
  
closureN_type c_735321;
object e_735325 [2];
c_735321.hdr.mark = gc_color_red;
 c_735321.hdr.grayed = 0;
c_735321.tag = closureN_tag;
 c_735321.fn = (function_type)__lambda_402;
c_735321.num_args = 1;
c_735321.num_elements = 2;
c_735321.elements = (object *)e_735325;
c_735321.elements[0] = ((closureN)self_732396)->elements[0];
c_735321.elements[1] = ((closureN)self_732396)->elements[1];

return_direct_with_clo5(data,  __glo_make_91vector_91hash_srfi_128, (((closure)  __glo_make_91vector_91hash_srfi_128)->fn),  &c_735321, r_731840, primitive_vector_127, primitive_vector_91length, primitive_vector_91ref);; 
}

static void __lambda_402(void *data, object self_732397, int argc, object *args) /* object self_732397, object r_731839 */
 {
 object r_731839 = args[0];
  return_closcall2(data,  r_731839,  ((closureN)self_732397)->elements[0], ((closureN)self_732397)->elements[1]);; 
}

static void __lambda_398(void *data, object self_732393, int argc, object *args) /* object self_732393, object r_731831 */
 {
 object r_731831 = args[0];
  
closureN_type c_735279;
object e_735287 [3];
c_735279.hdr.mark = gc_color_red;
 c_735279.hdr.grayed = 0;
c_735279.tag = closureN_tag;
 c_735279.fn = (function_type)__lambda_399;
c_735279.num_args = 1;
c_735279.num_elements = 3;
c_735279.elements = (object *)e_735287;
c_735279.elements[0] = ((closureN)self_732393)->elements[0];
c_735279.elements[1] = ((closureN)self_732393)->elements[1];
c_735279.elements[2] = r_731831;

return_direct_with_clo1(data,  __glo_make_91default_91comparator_srfi_128, (((closure)  __glo_make_91default_91comparator_srfi_128)->fn),  &c_735279);; 
}

static void __lambda_399(void *data, object self_732394, int argc, object *args) /* object self_732394, object r_731832 */
 {
 object r_731832 = args[0];
  
closureN_type c_735281;
object e_735285 [2];
c_735281.hdr.mark = gc_color_red;
 c_735281.hdr.grayed = 0;
c_735281.tag = closureN_tag;
 c_735281.fn = (function_type)__lambda_400;
c_735281.num_args = 1;
c_735281.num_elements = 2;
c_735281.elements = (object *)e_735285;
c_735281.elements[0] = ((closureN)self_732394)->elements[0];
c_735281.elements[1] = ((closureN)self_732394)->elements[1];

return_direct_with_clo3(data,  __glo_make_91pair_91hash_srfi_128, (((closure)  __glo_make_91pair_91hash_srfi_128)->fn),  &c_735281, ((closureN)self_732394)->elements[2], r_731832);; 
}

static void __lambda_400(void *data, object self_732395, int argc, object *args) /* object self_732395, object r_731830 */
 {
 object r_731830 = args[0];
  return_closcall2(data,  r_731830,  ((closureN)self_732395)->elements[0], ((closureN)self_732395)->elements[1]);; 
}

static void __lambda_386(void *data, object _, int argc, object *args) /* closure _,object k_731797, object type_73687_731064, object a_73688_731065, object b_73689_731066 */
 {
object k_731797 = args[0]; object type_73687_731064 = args[1]; object a_73688_731065 = args[2]; object b_73689_731066 = args[3];
  Cyc_st_add(data, "srfi/128.sld:dispatch-ordering");

closureN_type c_735173;
object e_735266 [4];
c_735173.hdr.mark = gc_color_red;
 c_735173.hdr.grayed = 0;
c_735173.tag = closureN_tag;
 c_735173.fn = (function_type)__lambda_387;
c_735173.num_args = 1;
c_735173.num_elements = 4;
c_735173.elements = (object *)e_735266;
c_735173.elements[0] = a_73688_731065;
c_735173.elements[1] = b_73689_731066;
c_735173.elements[2] = k_731797;
c_735173.elements[3] = type_73687_731064;

return_direct_with_clo1(data,(closure)&c_735173,__lambda_387,  type_73687_731064);; 
}

static void __lambda_387(void *data, object self_732383, int argc, object *args) /* object self_732383, object tmp_73690_73693_731067 */
 {
 object tmp_73690_73693_731067 = args[0];
    
if( (boolean_f != Cyc_eqv(tmp_73690_73693_731067, obj_int2obj(0))) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732383)->elements[2], (((closure)  ((closureN)self_732383)->elements[2])->fn),  obj_int2obj(0));
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73690_73693_731067, obj_int2obj(1))) ){ 
  
closureN_type c_735181;
object e_735193 [3];
c_735181.hdr.mark = gc_color_red;
 c_735181.hdr.grayed = 0;
c_735181.tag = closureN_tag;
 c_735181.fn = (function_type)__lambda_388;
c_735181.num_args = 1;
c_735181.num_elements = 3;
c_735181.elements = (object *)e_735193;
c_735181.elements[0] = ((closureN)self_732383)->elements[0];
c_735181.elements[1] = ((closureN)self_732383)->elements[1];
c_735181.elements[2] = ((closureN)self_732383)->elements[2];

return_direct_with_clo1(data,  __glo_make_91default_91comparator_srfi_128, (((closure)  __glo_make_91default_91comparator_srfi_128)->fn),  &c_735181);
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73690_73693_731067, obj_int2obj(2))) ){ 
  if( (boolean_f != ((closureN)self_732383)->elements[0]) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732383)->elements[2], (((closure)  ((closureN)self_732383)->elements[2])->fn),  boolean_f);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732383)->elements[2], (((closure)  ((closureN)self_732383)->elements[2])->fn),  ((closureN)self_732383)->elements[1]);}
;
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73690_73693_731067, obj_int2obj(3))) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_732383)->elements[2], (((closure)  ((closureN)self_732383)->elements[2])->fn),  Cyc_char_lt_op(data, ((closureN)self_732383)->elements[0], ((closureN)self_732383)->elements[1]));
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73690_73693_731067, obj_int2obj(4))) ){ 
  
complex_num_type local_735216; 
return_direct_with_clo1(data,  ((closureN)self_732383)->elements[2], (((closure)  ((closureN)self_732383)->elements[2])->fn),  ((inline_function_type)
                   ((closure)__glo_fast_91string_121_127_191_191inline_191_191_scheme_base)->fn)(data,&local_735216, ((closureN)self_732383)->elements[0], ((closureN)self_732383)->elements[1]));
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73690_73693_731067, obj_int2obj(5))) ){ 
  return_direct_with_clo3(data,  __glo_symbol_121_127_srfi_128, (((closure)  __glo_symbol_121_127_srfi_128)->fn),  ((closureN)self_732383)->elements[2], ((closureN)self_732383)->elements[0], ((closureN)self_732383)->elements[1]);
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73690_73693_731067, obj_int2obj(6))) ){ 
  return_direct_with_clo3(data,  __glo_complex_121_127_srfi_128, (((closure)  __glo_complex_121_127_srfi_128)->fn),  ((closureN)self_732383)->elements[2], ((closureN)self_732383)->elements[0], ((closureN)self_732383)->elements[1]);
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73690_73693_731067, obj_int2obj(7))) ){ 
  
closureN_type c_735234;
object e_735242 [3];
c_735234.hdr.mark = gc_color_red;
 c_735234.hdr.grayed = 0;
c_735234.tag = closureN_tag;
 c_735234.fn = (function_type)__lambda_391;
c_735234.num_args = 1;
c_735234.num_elements = 3;
c_735234.elements = (object *)e_735242;
c_735234.elements[0] = ((closureN)self_732383)->elements[0];
c_735234.elements[1] = ((closureN)self_732383)->elements[1];
c_735234.elements[2] = ((closureN)self_732383)->elements[2];

return_direct_with_clo1(data,  __glo_make_91default_91comparator_srfi_128, (((closure)  __glo_make_91default_91comparator_srfi_128)->fn),  &c_735234);
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73690_73693_731067, obj_int2obj(8))) ){ 
  
closureN_type c_735246;
object e_735254 [3];
c_735246.hdr.mark = gc_color_red;
 c_735246.hdr.grayed = 0;
c_735246.tag = closureN_tag;
 c_735246.fn = (function_type)__lambda_393;
c_735246.num_args = 1;
c_735246.num_elements = 3;
c_735246.elements = (object *)e_735254;
c_735246.elements[0] = ((closureN)self_732383)->elements[0];
c_735246.elements[1] = ((closureN)self_732383)->elements[1];
c_735246.elements[2] = ((closureN)self_732383)->elements[2];

return_direct_with_clo5(data,  __glo_make_91comparator_srfi_128, (((closure)  __glo_make_91comparator_srfi_128)->fn),  &c_735246, __glo_exact_91integer_127_scheme_base, primitive__123, primitive__121, __glo_default_91hash_srfi_128);
} else { 
  
closureN_type c_735256;
object e_735261 [3];
c_735256.hdr.mark = gc_color_red;
 c_735256.hdr.grayed = 0;
c_735256.tag = closureN_tag;
 c_735256.fn = (function_type)__lambda_395;
c_735256.num_args = 1;
c_735256.num_elements = 3;
c_735256.elements = (object *)e_735261;
c_735256.elements[0] = ((closureN)self_732383)->elements[0];
c_735256.elements[1] = ((closureN)self_732383)->elements[1];
c_735256.elements[2] = ((closureN)self_732383)->elements[2];


complex_num_type local_735264; 
return_direct_with_clo3(data,  __glo_list_91ref_scheme_base, (((closure)  __glo_list_91ref_scheme_base)->fn),  &c_735256, __glo__85registered_91comparators_85_srfi_128, Cyc_fast_sub(data,&local_735264, ((closureN)self_732383)->elements[3], __glo_first_91comparator_91index_srfi_128));}
;}
;}
;}
;}
;}
;}
;}
;}
;; 
}

static void __lambda_395(void *data, object self_732391, int argc, object *args) /* object self_732391, object r_731814_732033 */
 {
 object r_731814_732033 = args[0];
  return_direct_with_clo4(data,  __glo_binary_121_127_srfi_128, (((closure)  __glo_binary_121_127_srfi_128)->fn),  ((closureN)self_732391)->elements[2], r_731814_732033, ((closureN)self_732391)->elements[0], ((closureN)self_732391)->elements[1]);; 
}

static void __lambda_393(void *data, object self_732389, int argc, object *args) /* object self_732389, object r_731813 */
 {
 object r_731813 = args[0];
  
closureN_type c_735248;
object e_735253 [3];
c_735248.hdr.mark = gc_color_red;
 c_735248.hdr.grayed = 0;
c_735248.tag = closureN_tag;
 c_735248.fn = (function_type)__lambda_394;
c_735248.num_args = 1;
c_735248.num_elements = 3;
c_735248.elements = (object *)e_735253;
c_735248.elements[0] = ((closureN)self_732389)->elements[0];
c_735248.elements[1] = ((closureN)self_732389)->elements[1];
c_735248.elements[2] = ((closureN)self_732389)->elements[2];

return_direct_with_clo5(data,  __glo_make_91vector_121_127_srfi_128, (((closure)  __glo_make_91vector_121_127_srfi_128)->fn),  &c_735248, r_731813, primitive_bytevector_127, primitive_bytevector_91length, primitive_bytevector_91u8_91ref);; 
}

static void __lambda_394(void *data, object self_732390, int argc, object *args) /* object self_732390, object r_731812 */
 {
 object r_731812 = args[0];
  return_closcall3(data,  r_731812,  ((closureN)self_732390)->elements[2], ((closureN)self_732390)->elements[0], ((closureN)self_732390)->elements[1]);; 
}

static void __lambda_391(void *data, object self_732387, int argc, object *args) /* object self_732387, object r_731810 */
 {
 object r_731810 = args[0];
  
closureN_type c_735236;
object e_735241 [3];
c_735236.hdr.mark = gc_color_red;
 c_735236.hdr.grayed = 0;
c_735236.tag = closureN_tag;
 c_735236.fn = (function_type)__lambda_392;
c_735236.num_args = 1;
c_735236.num_elements = 3;
c_735236.elements = (object *)e_735241;
c_735236.elements[0] = ((closureN)self_732387)->elements[0];
c_735236.elements[1] = ((closureN)self_732387)->elements[1];
c_735236.elements[2] = ((closureN)self_732387)->elements[2];

return_direct_with_clo5(data,  __glo_make_91vector_121_127_srfi_128, (((closure)  __glo_make_91vector_121_127_srfi_128)->fn),  &c_735236, r_731810, primitive_vector_127, primitive_vector_91length, primitive_vector_91ref);; 
}

static void __lambda_392(void *data, object self_732388, int argc, object *args) /* object self_732388, object r_731809 */
 {
 object r_731809 = args[0];
  return_closcall3(data,  r_731809,  ((closureN)self_732388)->elements[2], ((closureN)self_732388)->elements[0], ((closureN)self_732388)->elements[1]);; 
}

static void __lambda_388(void *data, object self_732384, int argc, object *args) /* object self_732384, object r_731801 */
 {
 object r_731801 = args[0];
  
closureN_type c_735183;
object e_735192 [4];
c_735183.hdr.mark = gc_color_red;
 c_735183.hdr.grayed = 0;
c_735183.tag = closureN_tag;
 c_735183.fn = (function_type)__lambda_389;
c_735183.num_args = 1;
c_735183.num_elements = 4;
c_735183.elements = (object *)e_735192;
c_735183.elements[0] = ((closureN)self_732384)->elements[0];
c_735183.elements[1] = ((closureN)self_732384)->elements[1];
c_735183.elements[2] = ((closureN)self_732384)->elements[2];
c_735183.elements[3] = r_731801;

return_direct_with_clo1(data,  __glo_make_91default_91comparator_srfi_128, (((closure)  __glo_make_91default_91comparator_srfi_128)->fn),  &c_735183);; 
}

static void __lambda_389(void *data, object self_732385, int argc, object *args) /* object self_732385, object r_731802 */
 {
 object r_731802 = args[0];
  
closureN_type c_735185;
object e_735190 [3];
c_735185.hdr.mark = gc_color_red;
 c_735185.hdr.grayed = 0;
c_735185.tag = closureN_tag;
 c_735185.fn = (function_type)__lambda_390;
c_735185.num_args = 1;
c_735185.num_elements = 3;
c_735185.elements = (object *)e_735190;
c_735185.elements[0] = ((closureN)self_732385)->elements[0];
c_735185.elements[1] = ((closureN)self_732385)->elements[1];
c_735185.elements[2] = ((closureN)self_732385)->elements[2];

return_direct_with_clo3(data,  __glo_make_91pair_121_127_srfi_128, (((closure)  __glo_make_91pair_121_127_srfi_128)->fn),  &c_735185, ((closureN)self_732385)->elements[3], r_731802);; 
}

static void __lambda_390(void *data, object self_732386, int argc, object *args) /* object self_732386, object r_731800 */
 {
 object r_731800 = args[0];
  return_closcall3(data,  r_731800,  ((closureN)self_732386)->elements[2], ((closureN)self_732386)->elements[0], ((closureN)self_732386)->elements[1]);; 
}

static void __lambda_376(void *data, object _, int argc, object *args) /* closure _,object k_731768, object type_73680_731060, object a_73681_731061, object b_73682_731062 */
 {
object k_731768 = args[0]; object type_73680_731060 = args[1]; object a_73681_731061 = args[2]; object b_73682_731062 = args[3];
  Cyc_st_add(data, "srfi/128.sld:dispatch-equality");

closureN_type c_735077;
object e_735170 [4];
c_735077.hdr.mark = gc_color_red;
 c_735077.hdr.grayed = 0;
c_735077.tag = closureN_tag;
 c_735077.fn = (function_type)__lambda_377;
c_735077.num_args = 1;
c_735077.num_elements = 4;
c_735077.elements = (object *)e_735170;
c_735077.elements[0] = a_73681_731061;
c_735077.elements[1] = b_73682_731062;
c_735077.elements[2] = k_731768;
c_735077.elements[3] = type_73680_731060;

return_direct_with_clo1(data,(closure)&c_735077,__lambda_377,  type_73680_731060);; 
}

static void __lambda_377(void *data, object self_732374, int argc, object *args) /* object self_732374, object tmp_73683_73686_731063 */
 {
 object tmp_73683_73686_731063 = args[0];
    
if( (boolean_f != Cyc_eqv(tmp_73683_73686_731063, obj_int2obj(0))) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732374)->elements[2], (((closure)  ((closureN)self_732374)->elements[2])->fn),  boolean_t);
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73683_73686_731063, obj_int2obj(1))) ){ 
  
closureN_type c_735085;
object e_735097 [3];
c_735085.hdr.mark = gc_color_red;
 c_735085.hdr.grayed = 0;
c_735085.tag = closureN_tag;
 c_735085.fn = (function_type)__lambda_378;
c_735085.num_args = 1;
c_735085.num_elements = 3;
c_735085.elements = (object *)e_735097;
c_735085.elements[0] = ((closureN)self_732374)->elements[0];
c_735085.elements[1] = ((closureN)self_732374)->elements[1];
c_735085.elements[2] = ((closureN)self_732374)->elements[2];

return_direct_with_clo1(data,  __glo_make_91default_91comparator_srfi_128, (((closure)  __glo_make_91default_91comparator_srfi_128)->fn),  &c_735085);
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73683_73686_731063, obj_int2obj(2))) ){ 
  return_direct_with_clo3(data,  __glo_boolean_123_127_scheme_base, (((closure)  __glo_boolean_123_127_scheme_base)->fn),  ((closureN)self_732374)->elements[2], ((closureN)self_732374)->elements[0], ((closureN)self_732374)->elements[1]);
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73683_73686_731063, obj_int2obj(3))) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_732374)->elements[2], (((closure)  ((closureN)self_732374)->elements[2])->fn),  Cyc_char_eq_op(data, ((closureN)self_732374)->elements[0], ((closureN)self_732374)->elements[1]));
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73683_73686_731063, obj_int2obj(4))) ){ 
  
complex_num_type local_735118; 
return_direct_with_clo1(data,  ((closureN)self_732374)->elements[2], (((closure)  ((closureN)self_732374)->elements[2])->fn),  ((inline_function_type)
                   ((closure)__glo_fast_91string_123_127_191_191inline_191_191_scheme_base)->fn)(data,&local_735118, ((closureN)self_732374)->elements[0], ((closureN)self_732374)->elements[1]));
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73683_73686_731063, obj_int2obj(5))) ){ 
  return_direct_with_clo3(data,  __glo_symbol_123_127_scheme_base, (((closure)  __glo_symbol_123_127_scheme_base)->fn),  ((closureN)self_732374)->elements[2], ((closureN)self_732374)->elements[0], ((closureN)self_732374)->elements[1]);
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73683_73686_731063, obj_int2obj(6))) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_732374)->elements[2], (((closure)  ((closureN)self_732374)->elements[2])->fn),  Cyc_num_fast_eq_op(data, ((closureN)self_732374)->elements[0], ((closureN)self_732374)->elements[1]));
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73683_73686_731063, obj_int2obj(7))) ){ 
  
closureN_type c_735138;
object e_735146 [3];
c_735138.hdr.mark = gc_color_red;
 c_735138.hdr.grayed = 0;
c_735138.tag = closureN_tag;
 c_735138.fn = (function_type)__lambda_381;
c_735138.num_args = 1;
c_735138.num_elements = 3;
c_735138.elements = (object *)e_735146;
c_735138.elements[0] = ((closureN)self_732374)->elements[0];
c_735138.elements[1] = ((closureN)self_732374)->elements[1];
c_735138.elements[2] = ((closureN)self_732374)->elements[2];

return_direct_with_clo1(data,  __glo_make_91default_91comparator_srfi_128, (((closure)  __glo_make_91default_91comparator_srfi_128)->fn),  &c_735138);
} else { 
    
if( (boolean_f != Cyc_eqv(tmp_73683_73686_731063, obj_int2obj(8))) ){ 
  
closureN_type c_735150;
object e_735158 [3];
c_735150.hdr.mark = gc_color_red;
 c_735150.hdr.grayed = 0;
c_735150.tag = closureN_tag;
 c_735150.fn = (function_type)__lambda_383;
c_735150.num_args = 1;
c_735150.num_elements = 3;
c_735150.elements = (object *)e_735158;
c_735150.elements[0] = ((closureN)self_732374)->elements[0];
c_735150.elements[1] = ((closureN)self_732374)->elements[1];
c_735150.elements[2] = ((closureN)self_732374)->elements[2];

return_direct_with_clo5(data,  __glo_make_91comparator_srfi_128, (((closure)  __glo_make_91comparator_srfi_128)->fn),  &c_735150, __glo_exact_91integer_127_scheme_base, primitive__123, primitive__121, __glo_default_91hash_srfi_128);
} else { 
  
closureN_type c_735160;
object e_735165 [3];
c_735160.hdr.mark = gc_color_red;
 c_735160.hdr.grayed = 0;
c_735160.tag = closureN_tag;
 c_735160.fn = (function_type)__lambda_385;
c_735160.num_args = 1;
c_735160.num_elements = 3;
c_735160.elements = (object *)e_735165;
c_735160.elements[0] = ((closureN)self_732374)->elements[0];
c_735160.elements[1] = ((closureN)self_732374)->elements[1];
c_735160.elements[2] = ((closureN)self_732374)->elements[2];


complex_num_type local_735168; 
return_direct_with_clo3(data,  __glo_list_91ref_scheme_base, (((closure)  __glo_list_91ref_scheme_base)->fn),  &c_735160, __glo__85registered_91comparators_85_srfi_128, Cyc_fast_sub(data,&local_735168, ((closureN)self_732374)->elements[3], __glo_first_91comparator_91index_srfi_128));}
;}
;}
;}
;}
;}
;}
;}
;}
;; 
}

static void __lambda_385(void *data, object self_732382, int argc, object *args) /* object self_732382, object r_731785_732032 */
 {
 object r_731785_732032 = args[0];
  return_direct_with_clo4(data,  __glo_binary_123_127_srfi_128, (((closure)  __glo_binary_123_127_srfi_128)->fn),  ((closureN)self_732382)->elements[2], r_731785_732032, ((closureN)self_732382)->elements[0], ((closureN)self_732382)->elements[1]);; 
}

static void __lambda_383(void *data, object self_732380, int argc, object *args) /* object self_732380, object r_731784 */
 {
 object r_731784 = args[0];
  
closureN_type c_735152;
object e_735157 [3];
c_735152.hdr.mark = gc_color_red;
 c_735152.hdr.grayed = 0;
c_735152.tag = closureN_tag;
 c_735152.fn = (function_type)__lambda_384;
c_735152.num_args = 1;
c_735152.num_elements = 3;
c_735152.elements = (object *)e_735157;
c_735152.elements[0] = ((closureN)self_732380)->elements[0];
c_735152.elements[1] = ((closureN)self_732380)->elements[1];
c_735152.elements[2] = ((closureN)self_732380)->elements[2];

return_direct_with_clo5(data,  __glo_make_91vector_123_127_srfi_128, (((closure)  __glo_make_91vector_123_127_srfi_128)->fn),  &c_735152, r_731784, primitive_bytevector_127, primitive_bytevector_91length, primitive_bytevector_91u8_91ref);; 
}

static void __lambda_384(void *data, object self_732381, int argc, object *args) /* object self_732381, object r_731783 */
 {
 object r_731783 = args[0];
  return_closcall3(data,  r_731783,  ((closureN)self_732381)->elements[2], ((closureN)self_732381)->elements[0], ((closureN)self_732381)->elements[1]);; 
}

static void __lambda_381(void *data, object self_732378, int argc, object *args) /* object self_732378, object r_731781 */
 {
 object r_731781 = args[0];
  
closureN_type c_735140;
object e_735145 [3];
c_735140.hdr.mark = gc_color_red;
 c_735140.hdr.grayed = 0;
c_735140.tag = closureN_tag;
 c_735140.fn = (function_type)__lambda_382;
c_735140.num_args = 1;
c_735140.num_elements = 3;
c_735140.elements = (object *)e_735145;
c_735140.elements[0] = ((closureN)self_732378)->elements[0];
c_735140.elements[1] = ((closureN)self_732378)->elements[1];
c_735140.elements[2] = ((closureN)self_732378)->elements[2];

return_direct_with_clo5(data,  __glo_make_91vector_123_127_srfi_128, (((closure)  __glo_make_91vector_123_127_srfi_128)->fn),  &c_735140, r_731781, primitive_vector_127, primitive_vector_91length, primitive_vector_91ref);; 
}

static void __lambda_382(void *data, object self_732379, int argc, object *args) /* object self_732379, object r_731780 */
 {
 object r_731780 = args[0];
  return_closcall3(data,  r_731780,  ((closureN)self_732379)->elements[2], ((closureN)self_732379)->elements[0], ((closureN)self_732379)->elements[1]);; 
}

static void __lambda_378(void *data, object self_732375, int argc, object *args) /* object self_732375, object r_731772 */
 {
 object r_731772 = args[0];
  
closureN_type c_735087;
object e_735096 [4];
c_735087.hdr.mark = gc_color_red;
 c_735087.hdr.grayed = 0;
c_735087.tag = closureN_tag;
 c_735087.fn = (function_type)__lambda_379;
c_735087.num_args = 1;
c_735087.num_elements = 4;
c_735087.elements = (object *)e_735096;
c_735087.elements[0] = ((closureN)self_732375)->elements[0];
c_735087.elements[1] = ((closureN)self_732375)->elements[1];
c_735087.elements[2] = ((closureN)self_732375)->elements[2];
c_735087.elements[3] = r_731772;

return_direct_with_clo1(data,  __glo_make_91default_91comparator_srfi_128, (((closure)  __glo_make_91default_91comparator_srfi_128)->fn),  &c_735087);; 
}

static void __lambda_379(void *data, object self_732376, int argc, object *args) /* object self_732376, object r_731773 */
 {
 object r_731773 = args[0];
  
closureN_type c_735089;
object e_735094 [3];
c_735089.hdr.mark = gc_color_red;
 c_735089.hdr.grayed = 0;
c_735089.tag = closureN_tag;
 c_735089.fn = (function_type)__lambda_380;
c_735089.num_args = 1;
c_735089.num_elements = 3;
c_735089.elements = (object *)e_735094;
c_735089.elements[0] = ((closureN)self_732376)->elements[0];
c_735089.elements[1] = ((closureN)self_732376)->elements[1];
c_735089.elements[2] = ((closureN)self_732376)->elements[2];

return_direct_with_clo3(data,  __glo_make_91pair_123_127_srfi_128, (((closure)  __glo_make_91pair_123_127_srfi_128)->fn),  &c_735089, ((closureN)self_732376)->elements[3], r_731773);; 
}

static void __lambda_380(void *data, object self_732377, int argc, object *args) /* object self_732377, object r_731771 */
 {
 object r_731771 = args[0];
  return_closcall3(data,  r_731771,  ((closureN)self_732377)->elements[2], ((closureN)self_732377)->elements[0], ((closureN)self_732377)->elements[1]);; 
}

static void __lambda_375(void *data, object _, int argc, object *args) /* closure _,object k_731764, object i_73679_731059 */
 {
object k_731764 = args[0]; object i_73679_731059 = args[1];
  Cyc_st_add(data, "srfi/128.sld:registered-comparator");

complex_num_type local_735074; 
return_direct_with_clo3(data,  __glo_list_91ref_scheme_base, (((closure)  __glo_list_91ref_scheme_base)->fn),  k_731764, __glo__85registered_91comparators_85_srfi_128, Cyc_fast_sub(data,&local_735074, i_73679_731059, __glo_first_91comparator_91index_srfi_128));; 
}

static void __lambda_368(void *data, object _, int argc, object *args) /* closure _,object k_731753, object obj_73665_731053 */
 {
object k_731753 = args[0]; object obj_73665_731053 = args[1];
  Cyc_st_add(data, "srfi/128.sld:registered-index");

closureN_type c_735012;
object e_735069 [2];
c_735012.hdr.mark = gc_color_red;
 c_735012.hdr.grayed = 0;
c_735012.tag = closureN_tag;
 c_735012.fn = (function_type)__lambda_369;
c_735012.num_args = 1;
c_735012.num_elements = 2;
c_735012.elements = (object *)e_735069;
c_735012.elements[0] = k_731753;
c_735012.elements[1] = obj_73665_731053;

return_direct_with_clo1(data,(closure)&c_735012,__lambda_369,  __glo__85registered_91comparators_85_srfi_128);; 
}

static void __lambda_369(void *data, object self_732367, int argc, object *args) /* object self_732367, object registry_73668_731055 */
 {
 object registry_73668_731055 = args[0];
  
closureN_type c_735014;
object e_735068 [3];
c_735014.hdr.mark = gc_color_red;
 c_735014.hdr.grayed = 0;
c_735014.tag = closureN_tag;
 c_735014.fn = (function_type)__lambda_370;
c_735014.num_args = 1;
c_735014.num_elements = 3;
c_735014.elements = (object *)e_735068;
c_735014.elements[0] = ((closureN)self_732367)->elements[0];
c_735014.elements[1] = ((closureN)self_732367)->elements[1];
c_735014.elements[2] = registry_73668_731055;

return_direct_with_clo1(data,(closure)&c_735014,__lambda_370,  boolean_f);; 
}

static void __lambda_370(void *data, object self_732368, int argc, object *args) /* object self_732368, object loop_73669_731056 */
 {
 object loop_73669_731056 = args[0];
  
closureN_type c_735016;
object e_735064 [3];
c_735016.hdr.mark = gc_color_red;
 c_735016.hdr.grayed = 0;
c_735016.tag = closureN_tag;
 c_735016.fn = (function_type)__lambda_519;
c_735016.num_args = 1;
c_735016.num_elements = 3;
c_735016.elements = (object *)e_735064;
c_735016.elements[0] = ((closureN)self_732368)->elements[0];
c_735016.elements[1] = ((closureN)self_732368)->elements[1];
c_735016.elements[2] = ((closureN)self_732368)->elements[2];


pair_type local_735067; 
return_direct_with_clo1(data,(closure)&c_735016,__lambda_519,  set_cell_as_expr(&local_735067, loop_73669_731056));; 
}

static void __lambda_519(void *data, object self_732369, int argc, object *args) /* object self_732369, object loop_73669_731056 */
 {
 object loop_73669_731056 = args[0];
  
closureN_type c_735018;
object e_735031 [3];
c_735018.hdr.mark = gc_color_red;
 c_735018.hdr.grayed = 0;
c_735018.tag = closureN_tag;
 c_735018.fn = (function_type)__lambda_371;
c_735018.num_args = 1;
c_735018.num_elements = 3;
c_735018.elements = (object *)e_735031;
c_735018.elements[0] = ((closureN)self_732369)->elements[0];
c_735018.elements[1] = loop_73669_731056;
c_735018.elements[2] = ((closureN)self_732369)->elements[2];


closureN_type c_735032;
object e_735063 [2];
c_735032.hdr.mark = gc_color_red;
 c_735032.hdr.grayed = 0;
c_735032.tag = closureN_tag;
 c_735032.fn = (function_type)__lambda_373;
c_735032.num_args = 2;
c_735032.num_elements = 2;
c_735032.elements = (object *)e_735063;
c_735032.elements[0] = loop_73669_731056;
c_735032.elements[1] = ((closureN)self_732369)->elements[1];

return_direct_with_clo1(data,(closure)&c_735018,__lambda_371,  &c_735032);; 
}

static void __lambda_373(void *data, object self_732370, int argc, object *args) /* object self_732370, object k_731756, object i_73670_731057, object registry_73671_731058 */
 {
 object k_731756 = args[0]; object i_73670_731057 = args[1]; object registry_73671_731058 = args[2];
    
if( (boolean_f != Cyc_is_null(registry_73671_731058)) ){ 
  
complex_num_type local_735038; 
return_direct_with_clo1(data,  k_731756, (((closure)  k_731756)->fn),  Cyc_fast_sum(data,&local_735038, __glo_first_91comparator_91index_srfi_128, i_73670_731057));
} else { 
  
closureN_type c_735040;
object e_735059 [4];
c_735040.hdr.mark = gc_color_red;
 c_735040.hdr.grayed = 0;
c_735040.tag = closureN_tag;
 c_735040.fn = (function_type)__lambda_374;
c_735040.num_args = 1;
c_735040.num_elements = 4;
c_735040.elements = (object *)e_735059;
c_735040.elements[0] = i_73670_731057;
c_735040.elements[1] = k_731756;
c_735040.elements[2] = ((closureN)self_732370)->elements[0];
c_735040.elements[3] = registry_73671_731058;



return_direct_with_clo3(data,  __glo_comparator_91test_91type_srfi_128, (((closure)  __glo_comparator_91test_91type_srfi_128)->fn),  &c_735040, Cyc_car(data, registry_73671_731058), ((closureN)self_732370)->elements[1]);}
;; 
}

static void __lambda_374(void *data, object self_732371, int argc, object *args) /* object self_732371, object r_731758 */
 {
 object r_731758 = args[0];
  if( (boolean_f != r_731758) ){ 
  
complex_num_type local_735045; 
return_direct_with_clo1(data,  ((closureN)self_732371)->elements[1], (((closure)  ((closureN)self_732371)->elements[1])->fn),  Cyc_fast_sum(data,&local_735045, __glo_first_91comparator_91index_srfi_128, ((closureN)self_732371)->elements[0]));
} else { 
  


complex_num_type local_735054; 


return_closcall3(data,  car(((closureN)self_732371)->elements[2]),  ((closureN)self_732371)->elements[1], Cyc_fast_sum(data,&local_735054, ((closureN)self_732371)->elements[0], obj_int2obj(1)), Cyc_cdr(data, ((closureN)self_732371)->elements[3]));}
;; 
}

static void __lambda_371(void *data, object self_732372, int argc, object *args) /* object self_732372, object r_731755 */
 {
 object r_731755 = args[0];
  
closureN_type c_735020;
object e_735027 [3];
c_735020.hdr.mark = gc_color_red;
 c_735020.hdr.grayed = 0;
c_735020.tag = closureN_tag;
 c_735020.fn = (function_type)__lambda_372;
c_735020.num_args = 1;
c_735020.num_elements = 3;
c_735020.elements = (object *)e_735027;
c_735020.elements[0] = ((closureN)self_732372)->elements[0];
c_735020.elements[1] = ((closureN)self_732372)->elements[1];
c_735020.elements[2] = ((closureN)self_732372)->elements[2];



return_direct_with_clo1(data,(closure)&c_735020,__lambda_372,  Cyc_set_cell(data, ((closureN)self_732372)->elements[1], r_731755));; 
}

static void __lambda_372(void *data, object self_732373, int argc, object *args) /* object self_732373, object r_731754 */
 {

  

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

static void __lambda_366(void *data, object _, int argc, object *args) /* closure _,object k_731741, object obj_73636_731052 */
 {
object k_731741 = args[0]; object obj_73636_731052 = args[1];
  Cyc_st_add(data, "srfi/128.sld:object-type");
  
if( (boolean_f != Cyc_is_null(obj_73636_731052)) ){ 
  return_direct_with_clo1(data,  k_731741, (((closure)  k_731741)->fn),  obj_int2obj(0));
} else { 
    
if( (boolean_f != Cyc_is_pair(obj_73636_731052)) ){ 
  return_direct_with_clo1(data,  k_731741, (((closure)  k_731741)->fn),  obj_int2obj(1));
} else { 
    
if( (boolean_f != Cyc_is_boolean(obj_73636_731052)) ){ 
  return_direct_with_clo1(data,  k_731741, (((closure)  k_731741)->fn),  obj_int2obj(2));
} else { 
    
if( (boolean_f != Cyc_is_char(obj_73636_731052)) ){ 
  return_direct_with_clo1(data,  k_731741, (((closure)  k_731741)->fn),  obj_int2obj(3));
} else { 
    
if( (boolean_f != Cyc_is_string(obj_73636_731052)) ){ 
  return_direct_with_clo1(data,  k_731741, (((closure)  k_731741)->fn),  obj_int2obj(4));
} else { 
    
if( (boolean_f != Cyc_is_symbol(obj_73636_731052)) ){ 
  return_direct_with_clo1(data,  k_731741, (((closure)  k_731741)->fn),  obj_int2obj(5));
} else { 
    
if( (boolean_f != Cyc_is_number(obj_73636_731052)) ){ 
  return_direct_with_clo1(data,  k_731741, (((closure)  k_731741)->fn),  obj_int2obj(6));
} else { 
    
if( (boolean_f != Cyc_is_vector_not_record_type(obj_73636_731052)) ){ 
  return_direct_with_clo1(data,  k_731741, (((closure)  k_731741)->fn),  obj_int2obj(7));
} else { 
  
closureN_type c_735001;
object e_735007 [2];
c_735001.hdr.mark = gc_color_red;
 c_735001.hdr.grayed = 0;
c_735001.tag = closureN_tag;
 c_735001.fn = (function_type)__lambda_367;
c_735001.num_args = 1;
c_735001.num_elements = 2;
c_735001.elements = (object *)e_735007;
c_735001.elements[0] = k_731741;
c_735001.elements[1] = obj_73636_731052;



return_direct_with_clo1(data,(closure)&c_735001,__lambda_367,  Cyc_is_bytevector(obj_73636_731052));}
;}
;}
;}
;}
;}
;}
;}
;; 
}

static void __lambda_367(void *data, object self_732366, int argc, object *args) /* object self_732366, object r_731750 */
 {
 object r_731750 = args[0];
  if( (boolean_f != r_731750) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732366)->elements[0], (((closure)  ((closureN)self_732366)->elements[0])->fn),  obj_int2obj(8));
} else { 
  return_direct_with_clo2(data,  __glo_registered_91index_srfi_128, (((closure)  __glo_registered_91index_srfi_128)->fn),  ((closureN)self_732366)->elements[0], ((closureN)self_732366)->elements[1]);}
;; 
}

static void __lambda_362(void *data, object _, int argc, object *args) /* closure _,object k_731735, object comparator_73635_731051 */
 {
object k_731735 = args[0]; object comparator_73635_731051 = args[1];
  Cyc_st_add(data, "srfi/128.sld:comparator-register-default!");

closureN_type c_734953;
object e_734971 [1];
c_734953.hdr.mark = gc_color_red;
 c_734953.hdr.grayed = 0;
c_734953.tag = closureN_tag;
 c_734953.fn = (function_type)__lambda_363;
c_734953.num_args = 1;
c_734953.num_elements = 1;
c_734953.elements = (object *)e_734971;
c_734953.elements[0] = k_731735;


pair_type local_734974; 
return_direct_with_clo1(data,(closure)&c_734953,__lambda_363,  set_pair_as_expr(&local_734974, comparator_73635_731051, __glo__85registered_91comparators_85_srfi_128));; 
}

static void __lambda_363(void *data, object self_732363, int argc, object *args) /* object self_732363, object r_731738 */
 {
 object r_731738 = args[0];
  
closureN_type c_734955;
object e_734967 [1];
c_734955.hdr.mark = gc_color_red;
 c_734955.hdr.grayed = 0;
c_734955.tag = closureN_tag;
 c_734955.fn = (function_type)__lambda_364;
c_734955.num_args = 1;
c_734955.num_elements = 1;
c_734955.elements = (object *)e_734967;
c_734955.elements[0] = ((closureN)self_732363)->elements[0];


object c_734970 = global_set_cps_id(data,(closure)&c_734955,"__glo__85registered_91comparators_85_srfi_128", __glo__85registered_91comparators_85_srfi_128, r_731738);
return_closcall1(data,(closure)&c_734955,  c_734970);; 
}

static void __lambda_364(void *data, object self_732364, int argc, object *args) /* object self_732364, object r_731736 */
 {

  
closureN_type c_734957;
object e_734963 [1];
c_734957.hdr.mark = gc_color_red;
 c_734957.hdr.grayed = 0;
c_734957.tag = closureN_tag;
 c_734957.fn = (function_type)__lambda_365;
c_734957.num_args = 1;
c_734957.num_elements = 1;
c_734957.elements = (object *)e_734963;
c_734957.elements[0] = ((closureN)self_732364)->elements[0];


complex_num_type local_734966; 
return_direct_with_clo1(data,(closure)&c_734957,__lambda_365,  Cyc_fast_sum(data,&local_734966, __glo__85next_91comparator_91index_85_srfi_128, obj_int2obj(1)));; 
}

static void __lambda_365(void *data, object self_732365, int argc, object *args) /* object self_732365, object r_731737 */
 {
 object r_731737 = args[0];
  
object c_734962 = global_set_cps_id(data,  ((closureN)self_732365)->elements[0],"__glo__85next_91comparator_91index_85_srfi_128", __glo__85next_91comparator_91index_85_srfi_128, r_731737);
return_direct_with_clo1(data,  ((closureN)self_732365)->elements[0], (((closure)  ((closureN)self_732365)->elements[0])->fn),  c_734962);; 
}

static void __lambda_354(void *data, object _, int argc, object *args) /* closure _,object k_731714, object obj_73618_731045 */
 {
object k_731714 = args[0]; object obj_73618_731045 = args[1];
  Cyc_st_add(data, "srfi/128.sld:string-hash");

closureN_type c_734895;
object e_734950 [2];
c_734895.hdr.mark = gc_color_red;
 c_734895.hdr.grayed = 0;
c_734895.tag = closureN_tag;
 c_734895.fn = (function_type)__lambda_355;
c_734895.num_args = 1;
c_734895.num_elements = 2;
c_734895.elements = (object *)e_734950;
c_734895.elements[0] = k_731714;
c_734895.elements[1] = obj_73618_731045;

return_direct_with_clo1(data,  __glo_make_91hasher_srfi_128, (((closure)  __glo_make_91hasher_srfi_128)->fn),  &c_734895);; 
}

static void __lambda_355(void *data, object self_732355, int argc, object *args) /* object self_732355, object r_731715 */
 {
 object r_731715 = args[0];
  
closureN_type c_734897;
object e_734946 [2];
c_734897.hdr.mark = gc_color_red;
 c_734897.hdr.grayed = 0;
c_734897.tag = closureN_tag;
 c_734897.fn = (function_type)__lambda_356;
c_734897.num_args = 2;
c_734897.num_elements = 2;
c_734897.elements = (object *)e_734946;
c_734897.elements[0] = ((closureN)self_732355)->elements[0];
c_734897.elements[1] = ((closureN)self_732355)->elements[1];



return_direct_with_clo2(data,(closure)&c_734897,__lambda_356,  r_731715, Cyc_string_length(data, ((closureN)self_732355)->elements[1]));; 
}

static void __lambda_356(void *data, object self_732356, int argc, object *args) /* object self_732356, object acc_73619_731046, object len_73620_731047 */
 {
 object acc_73619_731046 = args[0]; object len_73620_731047 = args[1];
  
closureN_type c_734899;
object e_734945 [4];
c_734899.hdr.mark = gc_color_red;
 c_734899.hdr.grayed = 0;
c_734899.tag = closureN_tag;
 c_734899.fn = (function_type)__lambda_357;
c_734899.num_args = 1;
c_734899.num_elements = 4;
c_734899.elements = (object *)e_734945;
c_734899.elements[0] = acc_73619_731046;
c_734899.elements[1] = ((closureN)self_732356)->elements[0];
c_734899.elements[2] = len_73620_731047;
c_734899.elements[3] = ((closureN)self_732356)->elements[1];

return_direct_with_clo1(data,(closure)&c_734899,__lambda_357,  boolean_f);; 
}

static void __lambda_357(void *data, object self_732357, int argc, object *args) /* object self_732357, object loop_73623_731049 */
 {
 object loop_73623_731049 = args[0];
  
closureN_type c_734901;
object e_734941 [4];
c_734901.hdr.mark = gc_color_red;
 c_734901.hdr.grayed = 0;
c_734901.tag = closureN_tag;
 c_734901.fn = (function_type)__lambda_518;
c_734901.num_args = 1;
c_734901.num_elements = 4;
c_734901.elements = (object *)e_734941;
c_734901.elements[0] = ((closureN)self_732357)->elements[0];
c_734901.elements[1] = ((closureN)self_732357)->elements[1];
c_734901.elements[2] = ((closureN)self_732357)->elements[2];
c_734901.elements[3] = ((closureN)self_732357)->elements[3];


pair_type local_734944; 
return_direct_with_clo1(data,(closure)&c_734901,__lambda_518,  set_cell_as_expr(&local_734944, loop_73623_731049));; 
}

static void __lambda_518(void *data, object self_732358, int argc, object *args) /* object self_732358, object loop_73623_731049 */
 {
 object loop_73623_731049 = args[0];
  
closureN_type c_734903;
object e_734915 [2];
c_734903.hdr.mark = gc_color_red;
 c_734903.hdr.grayed = 0;
c_734903.tag = closureN_tag;
 c_734903.fn = (function_type)__lambda_358;
c_734903.num_args = 1;
c_734903.num_elements = 2;
c_734903.elements = (object *)e_734915;
c_734903.elements[0] = ((closureN)self_732358)->elements[1];
c_734903.elements[1] = loop_73623_731049;


closureN_type c_734916;
object e_734940 [4];
c_734916.hdr.mark = gc_color_red;
 c_734916.hdr.grayed = 0;
c_734916.tag = closureN_tag;
 c_734916.fn = (function_type)__lambda_360;
c_734916.num_args = 1;
c_734916.num_elements = 4;
c_734916.elements = (object *)e_734940;
c_734916.elements[0] = ((closureN)self_732358)->elements[0];
c_734916.elements[1] = ((closureN)self_732358)->elements[2];
c_734916.elements[2] = loop_73623_731049;
c_734916.elements[3] = ((closureN)self_732358)->elements[3];

return_direct_with_clo1(data,(closure)&c_734903,__lambda_358,  &c_734916);; 
}

static void __lambda_360(void *data, object self_732359, int argc, object *args) /* object self_732359, object k_731719, object n_73624_731050 */
 {
 object k_731719 = args[0]; object n_73624_731050 = args[1];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, n_73624_731050, ((closureN)self_732359)->elements[1])) ){ 
  return_closcall1(data,  ((closureN)self_732359)->elements[0],  k_731719);
} else { 
  
closureN_type c_734924;
object e_734934 [3];
c_734924.hdr.mark = gc_color_red;
 c_734924.hdr.grayed = 0;
c_734924.tag = closureN_tag;
 c_734924.fn = (function_type)__lambda_361;
c_734924.num_args = 1;
c_734924.num_elements = 3;
c_734924.elements = (object *)e_734934;
c_734924.elements[0] = k_731719;
c_734924.elements[1] = ((closureN)self_732359)->elements[2];
c_734924.elements[2] = n_73624_731050;





return_closcall2(data,  ((closureN)self_732359)->elements[0],  &c_734924, Cyc_char2integer(Cyc_string_ref(data, ((closureN)self_732359)->elements[3], n_73624_731050)));}
;; 
}

static void __lambda_361(void *data, object self_732360, int argc, object *args) /* object self_732360, object r_731721 */
 {

  


complex_num_type local_734932; 
return_closcall2(data,  car(((closureN)self_732360)->elements[1]),  ((closureN)self_732360)->elements[0], Cyc_fast_sum(data,&local_734932, ((closureN)self_732360)->elements[2], obj_int2obj(1)));; 
}

static void __lambda_358(void *data, object self_732361, int argc, object *args) /* object self_732361, object r_731718 */
 {
 object r_731718 = args[0];
  
closureN_type c_734905;
object e_734911 [2];
c_734905.hdr.mark = gc_color_red;
 c_734905.hdr.grayed = 0;
c_734905.tag = closureN_tag;
 c_734905.fn = (function_type)__lambda_359;
c_734905.num_args = 1;
c_734905.num_elements = 2;
c_734905.elements = (object *)e_734911;
c_734905.elements[0] = ((closureN)self_732361)->elements[0];
c_734905.elements[1] = ((closureN)self_732361)->elements[1];



return_direct_with_clo1(data,(closure)&c_734905,__lambda_359,  Cyc_set_cell(data, ((closureN)self_732361)->elements[1], r_731718));; 
}

static void __lambda_359(void *data, object self_732362, int argc, object *args) /* object self_732362, object r_731717 */
 {

  

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

static void __lambda_340(void *data, object _, int argc, object *args) /* closure _,object k_731699, object element_91comparator_73602_731034, object type_91test_73603_731035, object length_73604_731036, object ref_73605_731037 */
 {
object k_731699 = args[0]; object element_91comparator_73602_731034 = args[1]; object length_73604_731036 = args[3]; object ref_73605_731037 = args[4];
  Cyc_st_add(data, "srfi/128.sld:make-vector-hash");

closureN_type c_734819;
object e_734892 [3];
c_734819.hdr.mark = gc_color_red;
 c_734819.hdr.grayed = 0;
c_734819.tag = closureN_tag;
 c_734819.fn = (function_type)__lambda_341;
c_734819.num_args = 1;
c_734819.num_elements = 3;
c_734819.elements = (object *)e_734892;
c_734819.elements[0] = element_91comparator_73602_731034;
c_734819.elements[1] = length_73604_731036;
c_734819.elements[2] = ref_73605_731037;

return_direct_with_clo1(data,  k_731699, (((closure)  k_731699)->fn),  &c_734819);; 
}

static void __lambda_341(void *data, object self_732341, int argc, object *args) /* object self_732341, object k_731700, object obj_73606_731038 */
 {
 object k_731700 = args[0]; object obj_73606_731038 = args[1];
  
closureN_type c_734821;
object e_734890 [4];
c_734821.hdr.mark = gc_color_red;
 c_734821.hdr.grayed = 0;
c_734821.tag = closureN_tag;
 c_734821.fn = (function_type)__lambda_342;
c_734821.num_args = 1;
c_734821.num_elements = 4;
c_734821.elements = (object *)e_734890;
c_734821.elements[0] = k_731700;
c_734821.elements[1] = ((closureN)self_732341)->elements[1];
c_734821.elements[2] = obj_73606_731038;
c_734821.elements[3] = ((closureN)self_732341)->elements[2];

return_direct_with_clo2(data,  __glo_comparator_91hash_91function_srfi_128, (((closure)  __glo_comparator_91hash_91function_srfi_128)->fn),  &c_734821, ((closureN)self_732341)->elements[0]);; 
}

static void __lambda_342(void *data, object self_732342, int argc, object *args) /* object self_732342, object r_731701 */
 {
 object r_731701 = args[0];
  
closureN_type c_734823;
object e_734889 [5];
c_734823.hdr.mark = gc_color_red;
 c_734823.hdr.grayed = 0;
c_734823.tag = closureN_tag;
 c_734823.fn = (function_type)__lambda_343;
c_734823.num_args = 1;
c_734823.num_elements = 5;
c_734823.elements = (object *)e_734889;
c_734823.elements[0] = ((closureN)self_732342)->elements[0];
c_734823.elements[1] = ((closureN)self_732342)->elements[1];
c_734823.elements[2] = ((closureN)self_732342)->elements[2];
c_734823.elements[3] = r_731701;
c_734823.elements[4] = ((closureN)self_732342)->elements[3];

return_direct_with_clo1(data,  __glo_make_91hasher_srfi_128, (((closure)  __glo_make_91hasher_srfi_128)->fn),  &c_734823);; 
}

static void __lambda_343(void *data, object self_732343, int argc, object *args) /* object self_732343, object r_731702 */
 {
 object r_731702 = args[0];
  
closureN_type c_734826;
object e_734887 [5];
c_734826.hdr.mark = gc_color_red;
 c_734826.hdr.grayed = 0;
c_734826.tag = closureN_tag;
 c_734826.fn = (function_type)__lambda_344;
c_734826.num_args = 1;
c_734826.num_elements = 5;
c_734826.elements = (object *)e_734887;
c_734826.elements[0] = ((closureN)self_732343)->elements[0];
c_734826.elements[1] = ((closureN)self_732343)->elements[2];
c_734826.elements[2] = ((closureN)self_732343)->elements[3];
c_734826.elements[3] = r_731702;
c_734826.elements[4] = ((closureN)self_732343)->elements[4];

return_closcall2(data,  ((closureN)self_732343)->elements[1],  &c_734826, ((closureN)self_732343)->elements[2]);; 
}

static void __lambda_344(void *data, object self_732344, int argc, object *args) /* object self_732344, object r_731703 */
 {
 object r_731703 = args[0];
  
closureN_type c_734828;
object e_734884 [3];
c_734828.hdr.mark = gc_color_red;
 c_734828.hdr.grayed = 0;
c_734828.tag = closureN_tag;
 c_734828.fn = (function_type)__lambda_345;
c_734828.num_args = 3;
c_734828.num_elements = 3;
c_734828.elements = (object *)e_734884;
c_734828.elements[0] = ((closureN)self_732344)->elements[0];
c_734828.elements[1] = ((closureN)self_732344)->elements[1];
c_734828.elements[2] = ((closureN)self_732344)->elements[4];

return_direct_with_clo3(data,(closure)&c_734828,__lambda_345,  ((closureN)self_732344)->elements[2], ((closureN)self_732344)->elements[3], r_731703);; 
}

static void __lambda_345(void *data, object self_732345, int argc, object *args) /* object self_732345, object elem_91hash_73607_731039, object acc_73608_731040, object len_73609_731041 */
 {
 object elem_91hash_73607_731039 = args[0]; object acc_73608_731040 = args[1]; object len_73609_731041 = args[2];
  
closureN_type c_734830;
object e_734883 [6];
c_734830.hdr.mark = gc_color_red;
 c_734830.hdr.grayed = 0;
c_734830.tag = closureN_tag;
 c_734830.fn = (function_type)__lambda_346;
c_734830.num_args = 1;
c_734830.num_elements = 6;
c_734830.elements = (object *)e_734883;
c_734830.elements[0] = acc_73608_731040;
c_734830.elements[1] = elem_91hash_73607_731039;
c_734830.elements[2] = ((closureN)self_732345)->elements[0];
c_734830.elements[3] = len_73609_731041;
c_734830.elements[4] = ((closureN)self_732345)->elements[1];
c_734830.elements[5] = ((closureN)self_732345)->elements[2];

return_direct_with_clo1(data,(closure)&c_734830,__lambda_346,  boolean_f);; 
}

static void __lambda_346(void *data, object self_732346, int argc, object *args) /* object self_732346, object loop_73612_731043 */
 {
 object loop_73612_731043 = args[0];
  
closureN_type c_734832;
object e_734879 [6];
c_734832.hdr.mark = gc_color_red;
 c_734832.hdr.grayed = 0;
c_734832.tag = closureN_tag;
 c_734832.fn = (function_type)__lambda_517;
c_734832.num_args = 1;
c_734832.num_elements = 6;
c_734832.elements = (object *)e_734879;
c_734832.elements[0] = ((closureN)self_732346)->elements[0];
c_734832.elements[1] = ((closureN)self_732346)->elements[1];
c_734832.elements[2] = ((closureN)self_732346)->elements[2];
c_734832.elements[3] = ((closureN)self_732346)->elements[3];
c_734832.elements[4] = ((closureN)self_732346)->elements[4];
c_734832.elements[5] = ((closureN)self_732346)->elements[5];


pair_type local_734882; 
return_direct_with_clo1(data,(closure)&c_734832,__lambda_517,  set_cell_as_expr(&local_734882, loop_73612_731043));; 
}

static void __lambda_517(void *data, object self_732347, int argc, object *args) /* object self_732347, object loop_73612_731043 */
 {
 object loop_73612_731043 = args[0];
  
closureN_type c_734834;
object e_734846 [2];
c_734834.hdr.mark = gc_color_red;
 c_734834.hdr.grayed = 0;
c_734834.tag = closureN_tag;
 c_734834.fn = (function_type)__lambda_347;
c_734834.num_args = 1;
c_734834.num_elements = 2;
c_734834.elements = (object *)e_734846;
c_734834.elements[0] = ((closureN)self_732347)->elements[2];
c_734834.elements[1] = loop_73612_731043;


closureN_type c_734847;
object e_734878 [6];
c_734847.hdr.mark = gc_color_red;
 c_734847.hdr.grayed = 0;
c_734847.tag = closureN_tag;
 c_734847.fn = (function_type)__lambda_349;
c_734847.num_args = 1;
c_734847.num_elements = 6;
c_734847.elements = (object *)e_734878;
c_734847.elements[0] = ((closureN)self_732347)->elements[0];
c_734847.elements[1] = ((closureN)self_732347)->elements[1];
c_734847.elements[2] = ((closureN)self_732347)->elements[3];
c_734847.elements[3] = loop_73612_731043;
c_734847.elements[4] = ((closureN)self_732347)->elements[4];
c_734847.elements[5] = ((closureN)self_732347)->elements[5];

return_direct_with_clo1(data,(closure)&c_734834,__lambda_347,  &c_734847);; 
}

static void __lambda_349(void *data, object self_732348, int argc, object *args) /* object self_732348, object k_731706, object n_73613_731044 */
 {
 object k_731706 = args[0]; object n_73613_731044 = args[1];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, n_73613_731044, ((closureN)self_732348)->elements[2])) ){ 
  return_closcall1(data,  ((closureN)self_732348)->elements[0],  k_731706);
} else { 
  
closureN_type c_734855;
object e_734876 [5];
c_734855.hdr.mark = gc_color_red;
 c_734855.hdr.grayed = 0;
c_734855.tag = closureN_tag;
 c_734855.fn = (function_type)__lambda_350;
c_734855.num_args = 1;
c_734855.num_elements = 5;
c_734855.elements = (object *)e_734876;
c_734855.elements[0] = ((closureN)self_732348)->elements[0];
c_734855.elements[1] = ((closureN)self_732348)->elements[1];
c_734855.elements[2] = k_731706;
c_734855.elements[3] = ((closureN)self_732348)->elements[3];
c_734855.elements[4] = n_73613_731044;

return_closcall3(data,  ((closureN)self_732348)->elements[5],  &c_734855, ((closureN)self_732348)->elements[4], n_73613_731044);}
;; 
}

static void __lambda_350(void *data, object self_732349, int argc, object *args) /* object self_732349, object r_731711 */
 {
 object r_731711 = args[0];
  
closureN_type c_734858;
object e_734875 [4];
c_734858.hdr.mark = gc_color_red;
 c_734858.hdr.grayed = 0;
c_734858.tag = closureN_tag;
 c_734858.fn = (function_type)__lambda_351;
c_734858.num_args = 1;
c_734858.num_elements = 4;
c_734858.elements = (object *)e_734875;
c_734858.elements[0] = ((closureN)self_732349)->elements[0];
c_734858.elements[1] = ((closureN)self_732349)->elements[2];
c_734858.elements[2] = ((closureN)self_732349)->elements[3];
c_734858.elements[3] = ((closureN)self_732349)->elements[4];

return_closcall2(data,  ((closureN)self_732349)->elements[1],  &c_734858, r_731711);; 
}

static void __lambda_351(void *data, object self_732350, int argc, object *args) /* object self_732350, object r_731710 */
 {
 object r_731710 = args[0];
  
closureN_type c_734861;
object e_734874 [3];
c_734861.hdr.mark = gc_color_red;
 c_734861.hdr.grayed = 0;
c_734861.tag = closureN_tag;
 c_734861.fn = (function_type)__lambda_352;
c_734861.num_args = 1;
c_734861.num_elements = 3;
c_734861.elements = (object *)e_734874;
c_734861.elements[0] = ((closureN)self_732350)->elements[1];
c_734861.elements[1] = ((closureN)self_732350)->elements[2];
c_734861.elements[2] = ((closureN)self_732350)->elements[3];

return_closcall2(data,  ((closureN)self_732350)->elements[0],  &c_734861, r_731710);; 
}

static void __lambda_352(void *data, object self_732351, int argc, object *args) /* object self_732351, object r_731708 */
 {

  
closureN_type c_734863;
object e_734869 [2];
c_734863.hdr.mark = gc_color_red;
 c_734863.hdr.grayed = 0;
c_734863.tag = closureN_tag;
 c_734863.fn = (function_type)__lambda_353;
c_734863.num_args = 1;
c_734863.num_elements = 2;
c_734863.elements = (object *)e_734869;
c_734863.elements[0] = ((closureN)self_732351)->elements[0];
c_734863.elements[1] = ((closureN)self_732351)->elements[1];


complex_num_type local_734872; 
return_direct_with_clo1(data,(closure)&c_734863,__lambda_353,  Cyc_fast_sum(data,&local_734872, ((closureN)self_732351)->elements[2], obj_int2obj(1)));; 
}

static void __lambda_353(void *data, object self_732352, int argc, object *args) /* object self_732352, object r_731709 */
 {
 object r_731709 = args[0];
  

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

static void __lambda_347(void *data, object self_732353, int argc, object *args) /* object self_732353, object r_731705 */
 {
 object r_731705 = args[0];
  
closureN_type c_734836;
object e_734842 [2];
c_734836.hdr.mark = gc_color_red;
 c_734836.hdr.grayed = 0;
c_734836.tag = closureN_tag;
 c_734836.fn = (function_type)__lambda_348;
c_734836.num_args = 1;
c_734836.num_elements = 2;
c_734836.elements = (object *)e_734842;
c_734836.elements[0] = ((closureN)self_732353)->elements[0];
c_734836.elements[1] = ((closureN)self_732353)->elements[1];



return_direct_with_clo1(data,(closure)&c_734836,__lambda_348,  Cyc_set_cell(data, ((closureN)self_732353)->elements[1], r_731705));; 
}

static void __lambda_348(void *data, object self_732354, int argc, object *args) /* object self_732354, object r_731704 */
 {

  

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

static void __lambda_320(void *data, object _, int argc, object *args) /* closure _,object k_731675, object element_91comparator_73572_731022, object type_91test_73573_731023, object length_73574_731024, object ref_73575_731025 */
 {
object k_731675 = args[0]; object element_91comparator_73572_731022 = args[1]; object length_73574_731024 = args[3]; object ref_73575_731025 = args[4];
  Cyc_st_add(data, "srfi/128.sld:make-vector<?");

closureN_type c_734693;
object e_734816 [3];
c_734693.hdr.mark = gc_color_red;
 c_734693.hdr.grayed = 0;
c_734693.tag = closureN_tag;
 c_734693.fn = (function_type)__lambda_321;
c_734693.num_args = 2;
c_734693.num_elements = 3;
c_734693.elements = (object *)e_734816;
c_734693.elements[0] = element_91comparator_73572_731022;
c_734693.elements[1] = length_73574_731024;
c_734693.elements[2] = ref_73575_731025;

return_direct_with_clo1(data,  k_731675, (((closure)  k_731675)->fn),  &c_734693);; 
}

static void __lambda_321(void *data, object self_732321, int argc, object *args) /* object self_732321, object k_731676, object a_73576_731026, object b_73577_731027 */
 {
 object k_731676 = args[0]; object a_73576_731026 = args[1]; object b_73577_731027 = args[2];
  
closureN_type c_734696;
object e_734815 [6];
c_734696.hdr.mark = gc_color_red;
 c_734696.hdr.grayed = 0;
c_734696.tag = closureN_tag;
 c_734696.fn = (function_type)__lambda_322;
c_734696.num_args = 1;
c_734696.num_elements = 6;
c_734696.elements = (object *)e_734815;
c_734696.elements[0] = a_73576_731026;
c_734696.elements[1] = b_73577_731027;
c_734696.elements[2] = ((closureN)self_732321)->elements[0];
c_734696.elements[3] = k_731676;
c_734696.elements[4] = ((closureN)self_732321)->elements[1];
c_734696.elements[5] = ((closureN)self_732321)->elements[2];

return_closcall2(data,  ((closureN)self_732321)->elements[1],  &c_734696, a_73576_731026);; 
}

static void __lambda_322(void *data, object self_732322, int argc, object *args) /* object self_732322, object r_731695 */
 {
 object r_731695 = args[0];
  
closureN_type c_734699;
object e_734813 [7];
c_734699.hdr.mark = gc_color_red;
 c_734699.hdr.grayed = 0;
c_734699.tag = closureN_tag;
 c_734699.fn = (function_type)__lambda_323;
c_734699.num_args = 1;
c_734699.num_elements = 7;
c_734699.elements = (object *)e_734813;
c_734699.elements[0] = ((closureN)self_732322)->elements[0];
c_734699.elements[1] = ((closureN)self_732322)->elements[1];
c_734699.elements[2] = ((closureN)self_732322)->elements[2];
c_734699.elements[3] = ((closureN)self_732322)->elements[3];
c_734699.elements[4] = ((closureN)self_732322)->elements[4];
c_734699.elements[5] = r_731695;
c_734699.elements[6] = ((closureN)self_732322)->elements[5];

return_closcall2(data,  ((closureN)self_732322)->elements[4],  &c_734699, ((closureN)self_732322)->elements[1]);; 
}

static void __lambda_323(void *data, object self_732323, int argc, object *args) /* object self_732323, object r_731696 */
 {
 object r_731696 = args[0];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_732323)->elements[5], r_731696)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732323)->elements[3], (((closure)  ((closureN)self_732323)->elements[3])->fn),  boolean_t);
} else { 
  
closureN_type c_734707;
object e_734811 [6];
c_734707.hdr.mark = gc_color_red;
 c_734707.hdr.grayed = 0;
c_734707.tag = closureN_tag;
 c_734707.fn = (function_type)__lambda_324;
c_734707.num_args = 1;
c_734707.num_elements = 6;
c_734707.elements = (object *)e_734811;
c_734707.elements[0] = ((closureN)self_732323)->elements[0];
c_734707.elements[1] = ((closureN)self_732323)->elements[1];
c_734707.elements[2] = ((closureN)self_732323)->elements[2];
c_734707.elements[3] = ((closureN)self_732323)->elements[3];
c_734707.elements[4] = ((closureN)self_732323)->elements[4];
c_734707.elements[5] = ((closureN)self_732323)->elements[6];

return_closcall2(data,  ((closureN)self_732323)->elements[4],  &c_734707, ((closureN)self_732323)->elements[0]);}
;; 
}

static void __lambda_324(void *data, object self_732324, int argc, object *args) /* object self_732324, object r_731693 */
 {
 object r_731693 = args[0];
  
closureN_type c_734710;
object e_734809 [7];
c_734710.hdr.mark = gc_color_red;
 c_734710.hdr.grayed = 0;
c_734710.tag = closureN_tag;
 c_734710.fn = (function_type)__lambda_325;
c_734710.num_args = 1;
c_734710.num_elements = 7;
c_734710.elements = (object *)e_734809;
c_734710.elements[0] = ((closureN)self_732324)->elements[0];
c_734710.elements[1] = ((closureN)self_732324)->elements[1];
c_734710.elements[2] = ((closureN)self_732324)->elements[2];
c_734710.elements[3] = ((closureN)self_732324)->elements[3];
c_734710.elements[4] = ((closureN)self_732324)->elements[4];
c_734710.elements[5] = r_731693;
c_734710.elements[6] = ((closureN)self_732324)->elements[5];

return_closcall2(data,  ((closureN)self_732324)->elements[4],  &c_734710, ((closureN)self_732324)->elements[1]);; 
}

static void __lambda_325(void *data, object self_732325, int argc, object *args) /* object self_732325, object r_731694 */
 {
 object r_731694 = args[0];
    
if( (boolean_f != Cyc_num_fast_gt_op(data, ((closureN)self_732325)->elements[5], r_731694)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732325)->elements[3], (((closure)  ((closureN)self_732325)->elements[3])->fn),  boolean_f);
} else { 
  
closureN_type c_734717;
object e_734807 [6];
c_734717.hdr.mark = gc_color_red;
 c_734717.hdr.grayed = 0;
c_734717.tag = closureN_tag;
 c_734717.fn = (function_type)__lambda_326;
c_734717.num_args = 1;
c_734717.num_elements = 6;
c_734717.elements = (object *)e_734807;
c_734717.elements[0] = ((closureN)self_732325)->elements[0];
c_734717.elements[1] = ((closureN)self_732325)->elements[1];
c_734717.elements[2] = ((closureN)self_732325)->elements[2];
c_734717.elements[3] = ((closureN)self_732325)->elements[3];
c_734717.elements[4] = ((closureN)self_732325)->elements[4];
c_734717.elements[5] = ((closureN)self_732325)->elements[6];

return_direct_with_clo2(data,  __glo_comparator_91equality_91predicate_srfi_128, (((closure)  __glo_comparator_91equality_91predicate_srfi_128)->fn),  &c_734717, ((closureN)self_732325)->elements[2]);}
;; 
}

static void __lambda_326(void *data, object self_732326, int argc, object *args) /* object self_732326, object r_731679 */
 {
 object r_731679 = args[0];
  
closureN_type c_734719;
object e_734805 [6];
c_734719.hdr.mark = gc_color_red;
 c_734719.hdr.grayed = 0;
c_734719.tag = closureN_tag;
 c_734719.fn = (function_type)__lambda_327;
c_734719.num_args = 1;
c_734719.num_elements = 6;
c_734719.elements = (object *)e_734805;
c_734719.elements[0] = ((closureN)self_732326)->elements[0];
c_734719.elements[1] = ((closureN)self_732326)->elements[1];
c_734719.elements[2] = ((closureN)self_732326)->elements[3];
c_734719.elements[3] = ((closureN)self_732326)->elements[4];
c_734719.elements[4] = r_731679;
c_734719.elements[5] = ((closureN)self_732326)->elements[5];

return_direct_with_clo2(data,  __glo_comparator_91ordering_91predicate_srfi_128, (((closure)  __glo_comparator_91ordering_91predicate_srfi_128)->fn),  &c_734719, ((closureN)self_732326)->elements[2]);; 
}

static void __lambda_327(void *data, object self_732327, int argc, object *args) /* object self_732327, object r_731680 */
 {
 object r_731680 = args[0];
  
closureN_type c_734722;
object e_734803 [6];
c_734722.hdr.mark = gc_color_red;
 c_734722.hdr.grayed = 0;
c_734722.tag = closureN_tag;
 c_734722.fn = (function_type)__lambda_328;
c_734722.num_args = 1;
c_734722.num_elements = 6;
c_734722.elements = (object *)e_734803;
c_734722.elements[0] = ((closureN)self_732327)->elements[0];
c_734722.elements[1] = ((closureN)self_732327)->elements[1];
c_734722.elements[2] = ((closureN)self_732327)->elements[2];
c_734722.elements[3] = ((closureN)self_732327)->elements[4];
c_734722.elements[4] = r_731680;
c_734722.elements[5] = ((closureN)self_732327)->elements[5];

return_closcall2(data,  ((closureN)self_732327)->elements[3],  &c_734722, ((closureN)self_732327)->elements[0]);; 
}

static void __lambda_328(void *data, object self_732328, int argc, object *args) /* object self_732328, object r_731681 */
 {
 object r_731681 = args[0];
  
closureN_type c_734724;
object e_734800 [4];
c_734724.hdr.mark = gc_color_red;
 c_734724.hdr.grayed = 0;
c_734724.tag = closureN_tag;
 c_734724.fn = (function_type)__lambda_329;
c_734724.num_args = 3;
c_734724.num_elements = 4;
c_734724.elements = (object *)e_734800;
c_734724.elements[0] = ((closureN)self_732328)->elements[0];
c_734724.elements[1] = ((closureN)self_732328)->elements[1];
c_734724.elements[2] = ((closureN)self_732328)->elements[2];
c_734724.elements[3] = ((closureN)self_732328)->elements[5];

return_direct_with_clo3(data,(closure)&c_734724,__lambda_329,  ((closureN)self_732328)->elements[3], ((closureN)self_732328)->elements[4], r_731681);; 
}

static void __lambda_329(void *data, object self_732329, int argc, object *args) /* object self_732329, object elem_123_127_73585_731028, object elem_121_127_73586_731029, object len_73587_731030 */
 {
 object elem_123_127_73585_731028 = args[0]; object elem_121_127_73586_731029 = args[1]; object len_73587_731030 = args[2];
  
closureN_type c_734726;
object e_734799 [7];
c_734726.hdr.mark = gc_color_red;
 c_734726.hdr.grayed = 0;
c_734726.tag = closureN_tag;
 c_734726.fn = (function_type)__lambda_330;
c_734726.num_args = 1;
c_734726.num_elements = 7;
c_734726.elements = (object *)e_734799;
c_734726.elements[0] = ((closureN)self_732329)->elements[0];
c_734726.elements[1] = ((closureN)self_732329)->elements[1];
c_734726.elements[2] = elem_121_127_73586_731029;
c_734726.elements[3] = elem_123_127_73585_731028;
c_734726.elements[4] = ((closureN)self_732329)->elements[2];
c_734726.elements[5] = len_73587_731030;
c_734726.elements[6] = ((closureN)self_732329)->elements[3];

return_direct_with_clo1(data,(closure)&c_734726,__lambda_330,  boolean_f);; 
}

static void __lambda_330(void *data, object self_732330, int argc, object *args) /* object self_732330, object loop_73590_731032 */
 {
 object loop_73590_731032 = args[0];
  
closureN_type c_734728;
object e_734795 [7];
c_734728.hdr.mark = gc_color_red;
 c_734728.hdr.grayed = 0;
c_734728.tag = closureN_tag;
 c_734728.fn = (function_type)__lambda_516;
c_734728.num_args = 1;
c_734728.num_elements = 7;
c_734728.elements = (object *)e_734795;
c_734728.elements[0] = ((closureN)self_732330)->elements[0];
c_734728.elements[1] = ((closureN)self_732330)->elements[1];
c_734728.elements[2] = ((closureN)self_732330)->elements[2];
c_734728.elements[3] = ((closureN)self_732330)->elements[3];
c_734728.elements[4] = ((closureN)self_732330)->elements[4];
c_734728.elements[5] = ((closureN)self_732330)->elements[5];
c_734728.elements[6] = ((closureN)self_732330)->elements[6];


pair_type local_734798; 
return_direct_with_clo1(data,(closure)&c_734728,__lambda_516,  set_cell_as_expr(&local_734798, loop_73590_731032));; 
}

static void __lambda_516(void *data, object self_732331, int argc, object *args) /* object self_732331, object loop_73590_731032 */
 {
 object loop_73590_731032 = args[0];
  
closureN_type c_734730;
object e_734742 [2];
c_734730.hdr.mark = gc_color_red;
 c_734730.hdr.grayed = 0;
c_734730.tag = closureN_tag;
 c_734730.fn = (function_type)__lambda_331;
c_734730.num_args = 1;
c_734730.num_elements = 2;
c_734730.elements = (object *)e_734742;
c_734730.elements[0] = ((closureN)self_732331)->elements[4];
c_734730.elements[1] = loop_73590_731032;


closureN_type c_734743;
object e_734794 [7];
c_734743.hdr.mark = gc_color_red;
 c_734743.hdr.grayed = 0;
c_734743.tag = closureN_tag;
 c_734743.fn = (function_type)__lambda_333;
c_734743.num_args = 1;
c_734743.num_elements = 7;
c_734743.elements = (object *)e_734794;
c_734743.elements[0] = ((closureN)self_732331)->elements[0];
c_734743.elements[1] = ((closureN)self_732331)->elements[1];
c_734743.elements[2] = ((closureN)self_732331)->elements[2];
c_734743.elements[3] = ((closureN)self_732331)->elements[3];
c_734743.elements[4] = ((closureN)self_732331)->elements[5];
c_734743.elements[5] = loop_73590_731032;
c_734743.elements[6] = ((closureN)self_732331)->elements[6];

return_direct_with_clo1(data,(closure)&c_734730,__lambda_331,  &c_734743);; 
}

static void __lambda_333(void *data, object self_732332, int argc, object *args) /* object self_732332, object k_731684, object n_73591_731033 */
 {
 object k_731684 = args[0]; object n_73591_731033 = args[1];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, n_73591_731033, ((closureN)self_732332)->elements[4])) ){ 
  return_direct_with_clo1(data,  k_731684, (((closure)  k_731684)->fn),  boolean_f);
} else { 
  
closureN_type c_734750;
object e_734792 [8];
c_734750.hdr.mark = gc_color_red;
 c_734750.hdr.grayed = 0;
c_734750.tag = closureN_tag;
 c_734750.fn = (function_type)__lambda_334;
c_734750.num_args = 1;
c_734750.num_elements = 8;
c_734750.elements = (object *)e_734792;
c_734750.elements[0] = ((closureN)self_732332)->elements[0];
c_734750.elements[1] = ((closureN)self_732332)->elements[1];
c_734750.elements[2] = ((closureN)self_732332)->elements[2];
c_734750.elements[3] = ((closureN)self_732332)->elements[3];
c_734750.elements[4] = k_731684;
c_734750.elements[5] = ((closureN)self_732332)->elements[5];
c_734750.elements[6] = n_73591_731033;
c_734750.elements[7] = ((closureN)self_732332)->elements[6];

return_closcall3(data,  ((closureN)self_732332)->elements[6],  &c_734750, ((closureN)self_732332)->elements[0], n_73591_731033);}
;; 
}

static void __lambda_334(void *data, object self_732333, int argc, object *args) /* object self_732333, object r_731691 */
 {
 object r_731691 = args[0];
  
closureN_type c_734753;
object e_734789 [9];
c_734753.hdr.mark = gc_color_red;
 c_734753.hdr.grayed = 0;
c_734753.tag = closureN_tag;
 c_734753.fn = (function_type)__lambda_335;
c_734753.num_args = 1;
c_734753.num_elements = 9;
c_734753.elements = (object *)e_734789;
c_734753.elements[0] = ((closureN)self_732333)->elements[0];
c_734753.elements[1] = ((closureN)self_732333)->elements[1];
c_734753.elements[2] = ((closureN)self_732333)->elements[2];
c_734753.elements[3] = ((closureN)self_732333)->elements[3];
c_734753.elements[4] = ((closureN)self_732333)->elements[4];
c_734753.elements[5] = ((closureN)self_732333)->elements[5];
c_734753.elements[6] = ((closureN)self_732333)->elements[6];
c_734753.elements[7] = r_731691;
c_734753.elements[8] = ((closureN)self_732333)->elements[7];

return_closcall3(data,  ((closureN)self_732333)->elements[7],  &c_734753, ((closureN)self_732333)->elements[1], ((closureN)self_732333)->elements[6]);; 
}

static void __lambda_335(void *data, object self_732334, int argc, object *args) /* object self_732334, object r_731692 */
 {
 object r_731692 = args[0];
  
closureN_type c_734756;
object e_734787 [7];
c_734756.hdr.mark = gc_color_red;
 c_734756.hdr.grayed = 0;
c_734756.tag = closureN_tag;
 c_734756.fn = (function_type)__lambda_336;
c_734756.num_args = 1;
c_734756.num_elements = 7;
c_734756.elements = (object *)e_734787;
c_734756.elements[0] = ((closureN)self_732334)->elements[0];
c_734756.elements[1] = ((closureN)self_732334)->elements[1];
c_734756.elements[2] = ((closureN)self_732334)->elements[2];
c_734756.elements[3] = ((closureN)self_732334)->elements[4];
c_734756.elements[4] = ((closureN)self_732334)->elements[5];
c_734756.elements[5] = ((closureN)self_732334)->elements[6];
c_734756.elements[6] = ((closureN)self_732334)->elements[8];

return_closcall3(data,  ((closureN)self_732334)->elements[3],  &c_734756, ((closureN)self_732334)->elements[7], r_731692);; 
}

static void __lambda_336(void *data, object self_732335, int argc, object *args) /* object self_732335, object r_731686 */
 {
 object r_731686 = args[0];
  if( (boolean_f != r_731686) ){ 
  


complex_num_type local_734764; 
return_closcall2(data,  car(((closureN)self_732335)->elements[4]),  ((closureN)self_732335)->elements[3], Cyc_fast_sum(data,&local_734764, ((closureN)self_732335)->elements[5], obj_int2obj(1)));
} else { 
  
closureN_type c_734768;
object e_734784 [5];
c_734768.hdr.mark = gc_color_red;
 c_734768.hdr.grayed = 0;
c_734768.tag = closureN_tag;
 c_734768.fn = (function_type)__lambda_337;
c_734768.num_args = 1;
c_734768.num_elements = 5;
c_734768.elements = (object *)e_734784;
c_734768.elements[0] = ((closureN)self_732335)->elements[1];
c_734768.elements[1] = ((closureN)self_732335)->elements[2];
c_734768.elements[2] = ((closureN)self_732335)->elements[3];
c_734768.elements[3] = ((closureN)self_732335)->elements[5];
c_734768.elements[4] = ((closureN)self_732335)->elements[6];

return_closcall3(data,  ((closureN)self_732335)->elements[6],  &c_734768, ((closureN)self_732335)->elements[0], ((closureN)self_732335)->elements[5]);}
;; 
}

static void __lambda_337(void *data, object self_732336, int argc, object *args) /* object self_732336, object r_731689 */
 {
 object r_731689 = args[0];
  
closureN_type c_734771;
object e_734781 [3];
c_734771.hdr.mark = gc_color_red;
 c_734771.hdr.grayed = 0;
c_734771.tag = closureN_tag;
 c_734771.fn = (function_type)__lambda_338;
c_734771.num_args = 1;
c_734771.num_elements = 3;
c_734771.elements = (object *)e_734781;
c_734771.elements[0] = ((closureN)self_732336)->elements[1];
c_734771.elements[1] = ((closureN)self_732336)->elements[2];
c_734771.elements[2] = r_731689;

return_closcall3(data,  ((closureN)self_732336)->elements[4],  &c_734771, ((closureN)self_732336)->elements[0], ((closureN)self_732336)->elements[3]);; 
}

static void __lambda_338(void *data, object self_732337, int argc, object *args) /* object self_732337, object r_731690 */
 {
 object r_731690 = args[0];
  
closureN_type c_734774;
object e_734779 [1];
c_734774.hdr.mark = gc_color_red;
 c_734774.hdr.grayed = 0;
c_734774.tag = closureN_tag;
 c_734774.fn = (function_type)__lambda_339;
c_734774.num_args = 1;
c_734774.num_elements = 1;
c_734774.elements = (object *)e_734779;
c_734774.elements[0] = ((closureN)self_732337)->elements[1];

return_closcall3(data,  ((closureN)self_732337)->elements[0],  &c_734774, ((closureN)self_732337)->elements[2], r_731690);; 
}

static void __lambda_339(void *data, object self_732338, int argc, object *args) /* object self_732338, object r_731688 */
 {
 object r_731688 = args[0];
  if( (boolean_f != r_731688) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732338)->elements[0], (((closure)  ((closureN)self_732338)->elements[0])->fn),  boolean_t);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732338)->elements[0], (((closure)  ((closureN)self_732338)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_331(void *data, object self_732339, int argc, object *args) /* object self_732339, object r_731683 */
 {
 object r_731683 = args[0];
  
closureN_type c_734732;
object e_734738 [2];
c_734732.hdr.mark = gc_color_red;
 c_734732.hdr.grayed = 0;
c_734732.tag = closureN_tag;
 c_734732.fn = (function_type)__lambda_332;
c_734732.num_args = 1;
c_734732.num_elements = 2;
c_734732.elements = (object *)e_734738;
c_734732.elements[0] = ((closureN)self_732339)->elements[0];
c_734732.elements[1] = ((closureN)self_732339)->elements[1];



return_direct_with_clo1(data,(closure)&c_734732,__lambda_332,  Cyc_set_cell(data, ((closureN)self_732339)->elements[1], r_731683));; 
}

static void __lambda_332(void *data, object self_732340, int argc, object *args) /* object self_732340, object r_731682 */
 {

  

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

static void __lambda_306(void *data, object _, int argc, object *args) /* closure _,object k_731658, object element_91comparator_73552_731011, object type_91test_73553_731012, object length_73554_731013, object ref_73555_731014 */
 {
object k_731658 = args[0]; object element_91comparator_73552_731011 = args[1]; object length_73554_731013 = args[3]; object ref_73555_731014 = args[4];
  Cyc_st_add(data, "srfi/128.sld:make-vector=?");

closureN_type c_734606;
object e_734690 [3];
c_734606.hdr.mark = gc_color_red;
 c_734606.hdr.grayed = 0;
c_734606.tag = closureN_tag;
 c_734606.fn = (function_type)__lambda_307;
c_734606.num_args = 2;
c_734606.num_elements = 3;
c_734606.elements = (object *)e_734690;
c_734606.elements[0] = element_91comparator_73552_731011;
c_734606.elements[1] = length_73554_731013;
c_734606.elements[2] = ref_73555_731014;

return_direct_with_clo1(data,  k_731658, (((closure)  k_731658)->fn),  &c_734606);; 
}

static void __lambda_307(void *data, object self_732307, int argc, object *args) /* object self_732307, object k_731659, object a_73556_731015, object b_73557_731016 */
 {
 object k_731659 = args[0]; object a_73556_731015 = args[1]; object b_73557_731016 = args[2];
  
closureN_type c_734609;
object e_734689 [6];
c_734609.hdr.mark = gc_color_red;
 c_734609.hdr.grayed = 0;
c_734609.tag = closureN_tag;
 c_734609.fn = (function_type)__lambda_308;
c_734609.num_args = 1;
c_734609.num_elements = 6;
c_734609.elements = (object *)e_734689;
c_734609.elements[0] = a_73556_731015;
c_734609.elements[1] = b_73557_731016;
c_734609.elements[2] = ((closureN)self_732307)->elements[0];
c_734609.elements[3] = k_731659;
c_734609.elements[4] = ((closureN)self_732307)->elements[1];
c_734609.elements[5] = ((closureN)self_732307)->elements[2];

return_closcall2(data,  ((closureN)self_732307)->elements[1],  &c_734609, a_73556_731015);; 
}

static void __lambda_308(void *data, object self_732308, int argc, object *args) /* object self_732308, object r_731671 */
 {
 object r_731671 = args[0];
  
closureN_type c_734612;
object e_734687 [7];
c_734612.hdr.mark = gc_color_red;
 c_734612.hdr.grayed = 0;
c_734612.tag = closureN_tag;
 c_734612.fn = (function_type)__lambda_309;
c_734612.num_args = 1;
c_734612.num_elements = 7;
c_734612.elements = (object *)e_734687;
c_734612.elements[0] = ((closureN)self_732308)->elements[0];
c_734612.elements[1] = ((closureN)self_732308)->elements[1];
c_734612.elements[2] = ((closureN)self_732308)->elements[2];
c_734612.elements[3] = ((closureN)self_732308)->elements[3];
c_734612.elements[4] = ((closureN)self_732308)->elements[4];
c_734612.elements[5] = r_731671;
c_734612.elements[6] = ((closureN)self_732308)->elements[5];

return_closcall2(data,  ((closureN)self_732308)->elements[4],  &c_734612, ((closureN)self_732308)->elements[1]);; 
}

static void __lambda_309(void *data, object self_732309, int argc, object *args) /* object self_732309, object r_731672 */
 {
 object r_731672 = args[0];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, ((closureN)self_732309)->elements[5], r_731672)) ){ 
  
closureN_type c_734617;
object e_734683 [5];
c_734617.hdr.mark = gc_color_red;
 c_734617.hdr.grayed = 0;
c_734617.tag = closureN_tag;
 c_734617.fn = (function_type)__lambda_310;
c_734617.num_args = 1;
c_734617.num_elements = 5;
c_734617.elements = (object *)e_734683;
c_734617.elements[0] = ((closureN)self_732309)->elements[0];
c_734617.elements[1] = ((closureN)self_732309)->elements[1];
c_734617.elements[2] = ((closureN)self_732309)->elements[3];
c_734617.elements[3] = ((closureN)self_732309)->elements[4];
c_734617.elements[4] = ((closureN)self_732309)->elements[6];

return_direct_with_clo2(data,  __glo_comparator_91equality_91predicate_srfi_128, (((closure)  __glo_comparator_91equality_91predicate_srfi_128)->fn),  &c_734617, ((closureN)self_732309)->elements[2]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732309)->elements[3], (((closure)  ((closureN)self_732309)->elements[3])->fn),  boolean_f);}
;; 
}

static void __lambda_310(void *data, object self_732310, int argc, object *args) /* object self_732310, object r_731661 */
 {
 object r_731661 = args[0];
  
closureN_type c_734620;
object e_734681 [5];
c_734620.hdr.mark = gc_color_red;
 c_734620.hdr.grayed = 0;
c_734620.tag = closureN_tag;
 c_734620.fn = (function_type)__lambda_311;
c_734620.num_args = 1;
c_734620.num_elements = 5;
c_734620.elements = (object *)e_734681;
c_734620.elements[0] = ((closureN)self_732310)->elements[0];
c_734620.elements[1] = ((closureN)self_732310)->elements[1];
c_734620.elements[2] = ((closureN)self_732310)->elements[2];
c_734620.elements[3] = r_731661;
c_734620.elements[4] = ((closureN)self_732310)->elements[4];

return_closcall2(data,  ((closureN)self_732310)->elements[3],  &c_734620, ((closureN)self_732310)->elements[1]);; 
}

static void __lambda_311(void *data, object self_732311, int argc, object *args) /* object self_732311, object r_731662 */
 {
 object r_731662 = args[0];
  
closureN_type c_734622;
object e_734679 [4];
c_734622.hdr.mark = gc_color_red;
 c_734622.hdr.grayed = 0;
c_734622.tag = closureN_tag;
 c_734622.fn = (function_type)__lambda_312;
c_734622.num_args = 2;
c_734622.num_elements = 4;
c_734622.elements = (object *)e_734679;
c_734622.elements[0] = ((closureN)self_732311)->elements[0];
c_734622.elements[1] = ((closureN)self_732311)->elements[1];
c_734622.elements[2] = ((closureN)self_732311)->elements[2];
c_734622.elements[3] = ((closureN)self_732311)->elements[4];

return_direct_with_clo2(data,(closure)&c_734622,__lambda_312,  ((closureN)self_732311)->elements[3], r_731662);; 
}

static void __lambda_312(void *data, object self_732312, int argc, object *args) /* object self_732312, object elem_123_127_73559_731017, object len_73560_731018 */
 {
 object elem_123_127_73559_731017 = args[0]; object len_73560_731018 = args[1];
  
closureN_type c_734624;
object e_734678 [6];
c_734624.hdr.mark = gc_color_red;
 c_734624.hdr.grayed = 0;
c_734624.tag = closureN_tag;
 c_734624.fn = (function_type)__lambda_313;
c_734624.num_args = 1;
c_734624.num_elements = 6;
c_734624.elements = (object *)e_734678;
c_734624.elements[0] = ((closureN)self_732312)->elements[0];
c_734624.elements[1] = ((closureN)self_732312)->elements[1];
c_734624.elements[2] = elem_123_127_73559_731017;
c_734624.elements[3] = ((closureN)self_732312)->elements[2];
c_734624.elements[4] = len_73560_731018;
c_734624.elements[5] = ((closureN)self_732312)->elements[3];

return_direct_with_clo1(data,(closure)&c_734624,__lambda_313,  boolean_f);; 
}

static void __lambda_313(void *data, object self_732313, int argc, object *args) /* object self_732313, object loop_73563_731020 */
 {
 object loop_73563_731020 = args[0];
  
closureN_type c_734626;
object e_734674 [6];
c_734626.hdr.mark = gc_color_red;
 c_734626.hdr.grayed = 0;
c_734626.tag = closureN_tag;
 c_734626.fn = (function_type)__lambda_515;
c_734626.num_args = 1;
c_734626.num_elements = 6;
c_734626.elements = (object *)e_734674;
c_734626.elements[0] = ((closureN)self_732313)->elements[0];
c_734626.elements[1] = ((closureN)self_732313)->elements[1];
c_734626.elements[2] = ((closureN)self_732313)->elements[2];
c_734626.elements[3] = ((closureN)self_732313)->elements[3];
c_734626.elements[4] = ((closureN)self_732313)->elements[4];
c_734626.elements[5] = ((closureN)self_732313)->elements[5];


pair_type local_734677; 
return_direct_with_clo1(data,(closure)&c_734626,__lambda_515,  set_cell_as_expr(&local_734677, loop_73563_731020));; 
}

static void __lambda_515(void *data, object self_732314, int argc, object *args) /* object self_732314, object loop_73563_731020 */
 {
 object loop_73563_731020 = args[0];
  
closureN_type c_734628;
object e_734640 [2];
c_734628.hdr.mark = gc_color_red;
 c_734628.hdr.grayed = 0;
c_734628.tag = closureN_tag;
 c_734628.fn = (function_type)__lambda_314;
c_734628.num_args = 1;
c_734628.num_elements = 2;
c_734628.elements = (object *)e_734640;
c_734628.elements[0] = ((closureN)self_732314)->elements[3];
c_734628.elements[1] = loop_73563_731020;


closureN_type c_734641;
object e_734673 [6];
c_734641.hdr.mark = gc_color_red;
 c_734641.hdr.grayed = 0;
c_734641.tag = closureN_tag;
 c_734641.fn = (function_type)__lambda_316;
c_734641.num_args = 1;
c_734641.num_elements = 6;
c_734641.elements = (object *)e_734673;
c_734641.elements[0] = ((closureN)self_732314)->elements[0];
c_734641.elements[1] = ((closureN)self_732314)->elements[1];
c_734641.elements[2] = ((closureN)self_732314)->elements[2];
c_734641.elements[3] = ((closureN)self_732314)->elements[4];
c_734641.elements[4] = loop_73563_731020;
c_734641.elements[5] = ((closureN)self_732314)->elements[5];

return_direct_with_clo1(data,(closure)&c_734628,__lambda_314,  &c_734641);; 
}

static void __lambda_316(void *data, object self_732315, int argc, object *args) /* object self_732315, object k_731665, object n_73564_731021 */
 {
 object k_731665 = args[0]; object n_73564_731021 = args[1];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, n_73564_731021, ((closureN)self_732315)->elements[3])) ){ 
  return_direct_with_clo1(data,  k_731665, (((closure)  k_731665)->fn),  boolean_t);
} else { 
  
closureN_type c_734648;
object e_734671 [6];
c_734648.hdr.mark = gc_color_red;
 c_734648.hdr.grayed = 0;
c_734648.tag = closureN_tag;
 c_734648.fn = (function_type)__lambda_317;
c_734648.num_args = 1;
c_734648.num_elements = 6;
c_734648.elements = (object *)e_734671;
c_734648.elements[0] = ((closureN)self_732315)->elements[1];
c_734648.elements[1] = ((closureN)self_732315)->elements[2];
c_734648.elements[2] = k_731665;
c_734648.elements[3] = ((closureN)self_732315)->elements[4];
c_734648.elements[4] = n_73564_731021;
c_734648.elements[5] = ((closureN)self_732315)->elements[5];

return_closcall3(data,  ((closureN)self_732315)->elements[5],  &c_734648, ((closureN)self_732315)->elements[0], n_73564_731021);}
;; 
}

static void __lambda_317(void *data, object self_732316, int argc, object *args) /* object self_732316, object r_731669 */
 {
 object r_731669 = args[0];
  
closureN_type c_734651;
object e_734668 [5];
c_734651.hdr.mark = gc_color_red;
 c_734651.hdr.grayed = 0;
c_734651.tag = closureN_tag;
 c_734651.fn = (function_type)__lambda_318;
c_734651.num_args = 1;
c_734651.num_elements = 5;
c_734651.elements = (object *)e_734668;
c_734651.elements[0] = ((closureN)self_732316)->elements[1];
c_734651.elements[1] = ((closureN)self_732316)->elements[2];
c_734651.elements[2] = ((closureN)self_732316)->elements[3];
c_734651.elements[3] = ((closureN)self_732316)->elements[4];
c_734651.elements[4] = r_731669;

return_closcall3(data,  ((closureN)self_732316)->elements[5],  &c_734651, ((closureN)self_732316)->elements[0], ((closureN)self_732316)->elements[4]);; 
}

static void __lambda_318(void *data, object self_732317, int argc, object *args) /* object self_732317, object r_731670 */
 {
 object r_731670 = args[0];
  
closureN_type c_734654;
object e_734666 [3];
c_734654.hdr.mark = gc_color_red;
 c_734654.hdr.grayed = 0;
c_734654.tag = closureN_tag;
 c_734654.fn = (function_type)__lambda_319;
c_734654.num_args = 1;
c_734654.num_elements = 3;
c_734654.elements = (object *)e_734666;
c_734654.elements[0] = ((closureN)self_732317)->elements[1];
c_734654.elements[1] = ((closureN)self_732317)->elements[2];
c_734654.elements[2] = ((closureN)self_732317)->elements[3];

return_closcall3(data,  ((closureN)self_732317)->elements[0],  &c_734654, ((closureN)self_732317)->elements[4], r_731670);; 
}

static void __lambda_319(void *data, object self_732318, int argc, object *args) /* object self_732318, object r_731667 */
 {
 object r_731667 = args[0];
  if( (boolean_f != r_731667) ){ 
  


complex_num_type local_734662; 
return_closcall2(data,  car(((closureN)self_732318)->elements[1]),  ((closureN)self_732318)->elements[0], Cyc_fast_sum(data,&local_734662, ((closureN)self_732318)->elements[2], obj_int2obj(1)));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732318)->elements[0], (((closure)  ((closureN)self_732318)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_314(void *data, object self_732319, int argc, object *args) /* object self_732319, object r_731664 */
 {
 object r_731664 = args[0];
  
closureN_type c_734630;
object e_734636 [2];
c_734630.hdr.mark = gc_color_red;
 c_734630.hdr.grayed = 0;
c_734630.tag = closureN_tag;
 c_734630.fn = (function_type)__lambda_315;
c_734630.num_args = 1;
c_734630.num_elements = 2;
c_734630.elements = (object *)e_734636;
c_734630.elements[0] = ((closureN)self_732319)->elements[0];
c_734630.elements[1] = ((closureN)self_732319)->elements[1];



return_direct_with_clo1(data,(closure)&c_734630,__lambda_315,  Cyc_set_cell(data, ((closureN)self_732319)->elements[1], r_731664));; 
}

static void __lambda_315(void *data, object self_732320, int argc, object *args) /* object self_732320, object r_731663 */
 {

  

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

static void __lambda_294(void *data, object _, int argc, object *args) /* closure _,object k_731644, object element_91comparator_73533_731001, object type_91test_73534_731002, object length_73535_731003, object ref_73536_731004 */
 {
object k_731644 = args[0]; object element_91comparator_73533_731001 = args[1]; object type_91test_73534_731002 = args[2]; object length_73535_731003 = args[3]; object ref_73536_731004 = args[4];
  Cyc_st_add(data, "srfi/128.sld:make-vector-type-test");

closureN_type c_734534;
object e_734603 [4];
c_734534.hdr.mark = gc_color_red;
 c_734534.hdr.grayed = 0;
c_734534.tag = closureN_tag;
 c_734534.fn = (function_type)__lambda_295;
c_734534.num_args = 1;
c_734534.num_elements = 4;
c_734534.elements = (object *)e_734603;
c_734534.elements[0] = element_91comparator_73533_731001;
c_734534.elements[1] = length_73535_731003;
c_734534.elements[2] = ref_73536_731004;
c_734534.elements[3] = type_91test_73534_731002;

return_direct_with_clo1(data,  k_731644, (((closure)  k_731644)->fn),  &c_734534);; 
}

static void __lambda_295(void *data, object self_732295, int argc, object *args) /* object self_732295, object k_731645, object obj_73537_731005 */
 {
 object k_731645 = args[0]; object obj_73537_731005 = args[1];
  
closureN_type c_734537;
object e_734602 [5];
c_734537.hdr.mark = gc_color_red;
 c_734537.hdr.grayed = 0;
c_734537.tag = closureN_tag;
 c_734537.fn = (function_type)__lambda_296;
c_734537.num_args = 1;
c_734537.num_elements = 5;
c_734537.elements = (object *)e_734602;
c_734537.elements[0] = ((closureN)self_732295)->elements[0];
c_734537.elements[1] = k_731645;
c_734537.elements[2] = ((closureN)self_732295)->elements[1];
c_734537.elements[3] = obj_73537_731005;
c_734537.elements[4] = ((closureN)self_732295)->elements[2];

return_closcall2(data,  ((closureN)self_732295)->elements[3],  &c_734537, obj_73537_731005);; 
}

static void __lambda_296(void *data, object self_732296, int argc, object *args) /* object self_732296, object r_731646 */
 {
 object r_731646 = args[0];
  if( (boolean_f != r_731646) ){ 
  
closureN_type c_734539;
object e_734598 [4];
c_734539.hdr.mark = gc_color_red;
 c_734539.hdr.grayed = 0;
c_734539.tag = closureN_tag;
 c_734539.fn = (function_type)__lambda_297;
c_734539.num_args = 1;
c_734539.num_elements = 4;
c_734539.elements = (object *)e_734598;
c_734539.elements[0] = ((closureN)self_732296)->elements[1];
c_734539.elements[1] = ((closureN)self_732296)->elements[2];
c_734539.elements[2] = ((closureN)self_732296)->elements[3];
c_734539.elements[3] = ((closureN)self_732296)->elements[4];

return_direct_with_clo2(data,  __glo_comparator_91type_91test_91predicate_srfi_128, (((closure)  __glo_comparator_91type_91test_91predicate_srfi_128)->fn),  &c_734539, ((closureN)self_732296)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732296)->elements[1], (((closure)  ((closureN)self_732296)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_297(void *data, object self_732297, int argc, object *args) /* object self_732297, object r_731647 */
 {
 object r_731647 = args[0];
  
closureN_type c_734542;
object e_734596 [4];
c_734542.hdr.mark = gc_color_red;
 c_734542.hdr.grayed = 0;
c_734542.tag = closureN_tag;
 c_734542.fn = (function_type)__lambda_298;
c_734542.num_args = 1;
c_734542.num_elements = 4;
c_734542.elements = (object *)e_734596;
c_734542.elements[0] = ((closureN)self_732297)->elements[0];
c_734542.elements[1] = ((closureN)self_732297)->elements[2];
c_734542.elements[2] = r_731647;
c_734542.elements[3] = ((closureN)self_732297)->elements[3];

return_closcall2(data,  ((closureN)self_732297)->elements[1],  &c_734542, ((closureN)self_732297)->elements[2]);; 
}

static void __lambda_298(void *data, object self_732298, int argc, object *args) /* object self_732298, object r_731648 */
 {
 object r_731648 = args[0];
  
closureN_type c_734544;
object e_734594 [3];
c_734544.hdr.mark = gc_color_red;
 c_734544.hdr.grayed = 0;
c_734544.tag = closureN_tag;
 c_734544.fn = (function_type)__lambda_299;
c_734544.num_args = 2;
c_734544.num_elements = 3;
c_734544.elements = (object *)e_734594;
c_734544.elements[0] = ((closureN)self_732298)->elements[0];
c_734544.elements[1] = ((closureN)self_732298)->elements[1];
c_734544.elements[2] = ((closureN)self_732298)->elements[3];

return_direct_with_clo2(data,(closure)&c_734544,__lambda_299,  ((closureN)self_732298)->elements[2], r_731648);; 
}

static void __lambda_299(void *data, object self_732299, int argc, object *args) /* object self_732299, object elem_91type_91test_73539_731006, object len_73540_731007 */
 {
 object elem_91type_91test_73539_731006 = args[0]; object len_73540_731007 = args[1];
  
closureN_type c_734546;
object e_734593 [5];
c_734546.hdr.mark = gc_color_red;
 c_734546.hdr.grayed = 0;
c_734546.tag = closureN_tag;
 c_734546.fn = (function_type)__lambda_300;
c_734546.num_args = 1;
c_734546.num_elements = 5;
c_734546.elements = (object *)e_734593;
c_734546.elements[0] = elem_91type_91test_73539_731006;
c_734546.elements[1] = ((closureN)self_732299)->elements[0];
c_734546.elements[2] = len_73540_731007;
c_734546.elements[3] = ((closureN)self_732299)->elements[1];
c_734546.elements[4] = ((closureN)self_732299)->elements[2];

return_direct_with_clo1(data,(closure)&c_734546,__lambda_300,  boolean_f);; 
}

static void __lambda_300(void *data, object self_732300, int argc, object *args) /* object self_732300, object loop_73543_731009 */
 {
 object loop_73543_731009 = args[0];
  
closureN_type c_734548;
object e_734589 [5];
c_734548.hdr.mark = gc_color_red;
 c_734548.hdr.grayed = 0;
c_734548.tag = closureN_tag;
 c_734548.fn = (function_type)__lambda_514;
c_734548.num_args = 1;
c_734548.num_elements = 5;
c_734548.elements = (object *)e_734589;
c_734548.elements[0] = ((closureN)self_732300)->elements[0];
c_734548.elements[1] = ((closureN)self_732300)->elements[1];
c_734548.elements[2] = ((closureN)self_732300)->elements[2];
c_734548.elements[3] = ((closureN)self_732300)->elements[3];
c_734548.elements[4] = ((closureN)self_732300)->elements[4];


pair_type local_734592; 
return_direct_with_clo1(data,(closure)&c_734548,__lambda_514,  set_cell_as_expr(&local_734592, loop_73543_731009));; 
}

static void __lambda_514(void *data, object self_732301, int argc, object *args) /* object self_732301, object loop_73543_731009 */
 {
 object loop_73543_731009 = args[0];
  
closureN_type c_734550;
object e_734562 [2];
c_734550.hdr.mark = gc_color_red;
 c_734550.hdr.grayed = 0;
c_734550.tag = closureN_tag;
 c_734550.fn = (function_type)__lambda_301;
c_734550.num_args = 1;
c_734550.num_elements = 2;
c_734550.elements = (object *)e_734562;
c_734550.elements[0] = ((closureN)self_732301)->elements[1];
c_734550.elements[1] = loop_73543_731009;


closureN_type c_734563;
object e_734588 [5];
c_734563.hdr.mark = gc_color_red;
 c_734563.hdr.grayed = 0;
c_734563.tag = closureN_tag;
 c_734563.fn = (function_type)__lambda_303;
c_734563.num_args = 1;
c_734563.num_elements = 5;
c_734563.elements = (object *)e_734588;
c_734563.elements[0] = ((closureN)self_732301)->elements[0];
c_734563.elements[1] = ((closureN)self_732301)->elements[2];
c_734563.elements[2] = loop_73543_731009;
c_734563.elements[3] = ((closureN)self_732301)->elements[3];
c_734563.elements[4] = ((closureN)self_732301)->elements[4];

return_direct_with_clo1(data,(closure)&c_734550,__lambda_301,  &c_734563);; 
}

static void __lambda_303(void *data, object self_732302, int argc, object *args) /* object self_732302, object k_731651, object n_73544_731010 */
 {
 object k_731651 = args[0]; object n_73544_731010 = args[1];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, n_73544_731010, ((closureN)self_732302)->elements[1])) ){ 
  return_direct_with_clo1(data,  k_731651, (((closure)  k_731651)->fn),  boolean_t);
} else { 
  
closureN_type c_734570;
object e_734586 [4];
c_734570.hdr.mark = gc_color_red;
 c_734570.hdr.grayed = 0;
c_734570.tag = closureN_tag;
 c_734570.fn = (function_type)__lambda_304;
c_734570.num_args = 1;
c_734570.num_elements = 4;
c_734570.elements = (object *)e_734586;
c_734570.elements[0] = ((closureN)self_732302)->elements[0];
c_734570.elements[1] = k_731651;
c_734570.elements[2] = ((closureN)self_732302)->elements[2];
c_734570.elements[3] = n_73544_731010;

return_closcall3(data,  ((closureN)self_732302)->elements[4],  &c_734570, ((closureN)self_732302)->elements[3], n_73544_731010);}
;; 
}

static void __lambda_304(void *data, object self_732303, int argc, object *args) /* object self_732303, object r_731655 */
 {
 object r_731655 = args[0];
  
closureN_type c_734573;
object e_734585 [3];
c_734573.hdr.mark = gc_color_red;
 c_734573.hdr.grayed = 0;
c_734573.tag = closureN_tag;
 c_734573.fn = (function_type)__lambda_305;
c_734573.num_args = 1;
c_734573.num_elements = 3;
c_734573.elements = (object *)e_734585;
c_734573.elements[0] = ((closureN)self_732303)->elements[1];
c_734573.elements[1] = ((closureN)self_732303)->elements[2];
c_734573.elements[2] = ((closureN)self_732303)->elements[3];

return_closcall2(data,  ((closureN)self_732303)->elements[0],  &c_734573, r_731655);; 
}

static void __lambda_305(void *data, object self_732304, int argc, object *args) /* object self_732304, object r_731653 */
 {
 object r_731653 = args[0];
  if( (boolean_f != r_731653) ){ 
  


complex_num_type local_734581; 
return_closcall2(data,  car(((closureN)self_732304)->elements[1]),  ((closureN)self_732304)->elements[0], Cyc_fast_sum(data,&local_734581, ((closureN)self_732304)->elements[2], obj_int2obj(1)));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732304)->elements[0], (((closure)  ((closureN)self_732304)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_301(void *data, object self_732305, int argc, object *args) /* object self_732305, object r_731650 */
 {
 object r_731650 = args[0];
  
closureN_type c_734552;
object e_734558 [2];
c_734552.hdr.mark = gc_color_red;
 c_734552.hdr.grayed = 0;
c_734552.tag = closureN_tag;
 c_734552.fn = (function_type)__lambda_302;
c_734552.num_args = 1;
c_734552.num_elements = 2;
c_734552.elements = (object *)e_734558;
c_734552.elements[0] = ((closureN)self_732305)->elements[0];
c_734552.elements[1] = ((closureN)self_732305)->elements[1];



return_direct_with_clo1(data,(closure)&c_734552,__lambda_302,  Cyc_set_cell(data, ((closureN)self_732305)->elements[1], r_731650));; 
}

static void __lambda_302(void *data, object self_732306, int argc, object *args) /* object self_732306, object r_731649 */
 {

  

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

static void __lambda_289(void *data, object _, int argc, object *args) /* closure _,object k_731637, object element_91comparator_73529_73997, object type_91test_73530_73998, object length_73531_73999, object ref_73532_731000 */
 {
object k_731637 = args[0]; object element_91comparator_73529_73997 = args[1]; object type_91test_73530_73998 = args[2]; object length_73531_73999 = args[3]; object ref_73532_731000 = args[4];
  Cyc_st_add(data, "srfi/128.sld:make-vector-comparator");

closureN_type c_734504;
object e_734531 [5];
c_734504.hdr.mark = gc_color_red;
 c_734504.hdr.grayed = 0;
c_734504.tag = closureN_tag;
 c_734504.fn = (function_type)__lambda_290;
c_734504.num_args = 1;
c_734504.num_elements = 5;
c_734504.elements = (object *)e_734531;
c_734504.elements[0] = element_91comparator_73529_73997;
c_734504.elements[1] = k_731637;
c_734504.elements[2] = length_73531_73999;
c_734504.elements[3] = ref_73532_731000;
c_734504.elements[4] = type_91test_73530_73998;

return_direct_with_clo5(data,  __glo_make_91vector_91type_91test_srfi_128, (((closure)  __glo_make_91vector_91type_91test_srfi_128)->fn),  &c_734504, element_91comparator_73529_73997, type_91test_73530_73998, length_73531_73999, ref_73532_731000);; 
}

static void __lambda_290(void *data, object self_732291, int argc, object *args) /* object self_732291, object r_731638 */
 {
 object r_731638 = args[0];
  
closureN_type c_734506;
object e_734526 [6];
c_734506.hdr.mark = gc_color_red;
 c_734506.hdr.grayed = 0;
c_734506.tag = closureN_tag;
 c_734506.fn = (function_type)__lambda_291;
c_734506.num_args = 1;
c_734506.num_elements = 6;
c_734506.elements = (object *)e_734526;
c_734506.elements[0] = ((closureN)self_732291)->elements[0];
c_734506.elements[1] = ((closureN)self_732291)->elements[1];
c_734506.elements[2] = ((closureN)self_732291)->elements[2];
c_734506.elements[3] = r_731638;
c_734506.elements[4] = ((closureN)self_732291)->elements[3];
c_734506.elements[5] = ((closureN)self_732291)->elements[4];

return_direct_with_clo5(data,  __glo_make_91vector_123_127_srfi_128, (((closure)  __glo_make_91vector_123_127_srfi_128)->fn),  &c_734506, ((closureN)self_732291)->elements[0], ((closureN)self_732291)->elements[4], ((closureN)self_732291)->elements[2], ((closureN)self_732291)->elements[3]);; 
}

static void __lambda_291(void *data, object self_732292, int argc, object *args) /* object self_732292, object r_731639 */
 {
 object r_731639 = args[0];
  
closureN_type c_734508;
object e_734521 [7];
c_734508.hdr.mark = gc_color_red;
 c_734508.hdr.grayed = 0;
c_734508.tag = closureN_tag;
 c_734508.fn = (function_type)__lambda_292;
c_734508.num_args = 1;
c_734508.num_elements = 7;
c_734508.elements = (object *)e_734521;
c_734508.elements[0] = ((closureN)self_732292)->elements[0];
c_734508.elements[1] = ((closureN)self_732292)->elements[1];
c_734508.elements[2] = ((closureN)self_732292)->elements[2];
c_734508.elements[3] = ((closureN)self_732292)->elements[3];
c_734508.elements[4] = r_731639;
c_734508.elements[5] = ((closureN)self_732292)->elements[4];
c_734508.elements[6] = ((closureN)self_732292)->elements[5];

return_direct_with_clo5(data,  __glo_make_91vector_121_127_srfi_128, (((closure)  __glo_make_91vector_121_127_srfi_128)->fn),  &c_734508, ((closureN)self_732292)->elements[0], ((closureN)self_732292)->elements[5], ((closureN)self_732292)->elements[2], ((closureN)self_732292)->elements[4]);; 
}

static void __lambda_292(void *data, object self_732293, int argc, object *args) /* object self_732293, object r_731640 */
 {
 object r_731640 = args[0];
  
closureN_type c_734510;
object e_734516 [4];
c_734510.hdr.mark = gc_color_red;
 c_734510.hdr.grayed = 0;
c_734510.tag = closureN_tag;
 c_734510.fn = (function_type)__lambda_293;
c_734510.num_args = 1;
c_734510.num_elements = 4;
c_734510.elements = (object *)e_734516;
c_734510.elements[0] = ((closureN)self_732293)->elements[1];
c_734510.elements[1] = ((closureN)self_732293)->elements[3];
c_734510.elements[2] = ((closureN)self_732293)->elements[4];
c_734510.elements[3] = r_731640;

return_direct_with_clo5(data,  __glo_make_91vector_91hash_srfi_128, (((closure)  __glo_make_91vector_91hash_srfi_128)->fn),  &c_734510, ((closureN)self_732293)->elements[0], ((closureN)self_732293)->elements[6], ((closureN)self_732293)->elements[2], ((closureN)self_732293)->elements[5]);; 
}

static void __lambda_293(void *data, object self_732294, int argc, object *args) /* object self_732294, object r_731641 */
 {
 object r_731641 = args[0];
  return_direct_with_clo5(data,  __glo_make_91comparator_srfi_128, (((closure)  __glo_make_91comparator_srfi_128)->fn),  ((closureN)self_732294)->elements[0], ((closureN)self_732294)->elements[1], ((closureN)self_732294)->elements[2], ((closureN)self_732294)->elements[3], r_731641);; 
}

static void __lambda_274(void *data, object _, int argc, object *args) /* closure _,object k_731623, object element_91comparator_73513_73986, object type_91test_73514_73987, object empty_127_73515_73988, object head_73516_73989, object tail_73517_73990 */
 {
object k_731623 = args[0]; object element_91comparator_73513_73986 = args[1]; object empty_127_73515_73988 = args[3]; object head_73516_73989 = args[4]; object tail_73517_73990 = args[5];
  Cyc_st_add(data, "srfi/128.sld:make-list-hash");

closureN_type c_734429;
object e_734501 [4];
c_734429.hdr.mark = gc_color_red;
 c_734429.hdr.grayed = 0;
c_734429.tag = closureN_tag;
 c_734429.fn = (function_type)__lambda_275;
c_734429.num_args = 1;
c_734429.num_elements = 4;
c_734429.elements = (object *)e_734501;
c_734429.elements[0] = element_91comparator_73513_73986;
c_734429.elements[1] = empty_127_73515_73988;
c_734429.elements[2] = head_73516_73989;
c_734429.elements[3] = tail_73517_73990;

return_direct_with_clo1(data,  k_731623, (((closure)  k_731623)->fn),  &c_734429);; 
}

static void __lambda_275(void *data, object self_732276, int argc, object *args) /* object self_732276, object k_731624, object obj_73518_73991 */
 {
 object k_731624 = args[0]; object obj_73518_73991 = args[1];
  
closureN_type c_734431;
object e_734499 [5];
c_734431.hdr.mark = gc_color_red;
 c_734431.hdr.grayed = 0;
c_734431.tag = closureN_tag;
 c_734431.fn = (function_type)__lambda_276;
c_734431.num_args = 1;
c_734431.num_elements = 5;
c_734431.elements = (object *)e_734499;
c_734431.elements[0] = ((closureN)self_732276)->elements[1];
c_734431.elements[1] = ((closureN)self_732276)->elements[2];
c_734431.elements[2] = k_731624;
c_734431.elements[3] = obj_73518_73991;
c_734431.elements[4] = ((closureN)self_732276)->elements[3];

return_direct_with_clo2(data,  __glo_comparator_91hash_91function_srfi_128, (((closure)  __glo_comparator_91hash_91function_srfi_128)->fn),  &c_734431, ((closureN)self_732276)->elements[0]);; 
}

static void __lambda_276(void *data, object self_732277, int argc, object *args) /* object self_732277, object r_731625 */
 {
 object r_731625 = args[0];
  
closureN_type c_734433;
object e_734498 [6];
c_734433.hdr.mark = gc_color_red;
 c_734433.hdr.grayed = 0;
c_734433.tag = closureN_tag;
 c_734433.fn = (function_type)__lambda_277;
c_734433.num_args = 1;
c_734433.num_elements = 6;
c_734433.elements = (object *)e_734498;
c_734433.elements[0] = ((closureN)self_732277)->elements[0];
c_734433.elements[1] = ((closureN)self_732277)->elements[1];
c_734433.elements[2] = ((closureN)self_732277)->elements[2];
c_734433.elements[3] = ((closureN)self_732277)->elements[3];
c_734433.elements[4] = r_731625;
c_734433.elements[5] = ((closureN)self_732277)->elements[4];

return_direct_with_clo1(data,  __glo_make_91hasher_srfi_128, (((closure)  __glo_make_91hasher_srfi_128)->fn),  &c_734433);; 
}

static void __lambda_277(void *data, object self_732278, int argc, object *args) /* object self_732278, object r_731626 */
 {
 object r_731626 = args[0];
  
closureN_type c_734435;
object e_734496 [5];
c_734435.hdr.mark = gc_color_red;
 c_734435.hdr.grayed = 0;
c_734435.tag = closureN_tag;
 c_734435.fn = (function_type)__lambda_278;
c_734435.num_args = 2;
c_734435.num_elements = 5;
c_734435.elements = (object *)e_734496;
c_734435.elements[0] = ((closureN)self_732278)->elements[0];
c_734435.elements[1] = ((closureN)self_732278)->elements[1];
c_734435.elements[2] = ((closureN)self_732278)->elements[2];
c_734435.elements[3] = ((closureN)self_732278)->elements[3];
c_734435.elements[4] = ((closureN)self_732278)->elements[5];

return_direct_with_clo2(data,(closure)&c_734435,__lambda_278,  ((closureN)self_732278)->elements[4], r_731626);; 
}

static void __lambda_278(void *data, object self_732279, int argc, object *args) /* object self_732279, object elem_91hash_73519_73992, object acc_73520_73993 */
 {
 object elem_91hash_73519_73992 = args[0]; object acc_73520_73993 = args[1];
  
closureN_type c_734437;
object e_734494 [6];
c_734437.hdr.mark = gc_color_red;
 c_734437.hdr.grayed = 0;
c_734437.tag = closureN_tag;
 c_734437.fn = (function_type)__lambda_279;
c_734437.num_args = 1;
c_734437.num_elements = 6;
c_734437.elements = (object *)e_734494;
c_734437.elements[0] = acc_73520_73993;
c_734437.elements[1] = elem_91hash_73519_73992;
c_734437.elements[2] = ((closureN)self_732279)->elements[0];
c_734437.elements[3] = ((closureN)self_732279)->elements[1];
c_734437.elements[4] = ((closureN)self_732279)->elements[2];
c_734437.elements[5] = ((closureN)self_732279)->elements[4];

return_direct_with_clo1(data,(closure)&c_734437,__lambda_279,  ((closureN)self_732279)->elements[3]);; 
}

static void __lambda_279(void *data, object self_732280, int argc, object *args) /* object self_732280, object obj_73522_73994 */
 {
 object obj_73522_73994 = args[0];
  
closureN_type c_734439;
object e_734493 [7];
c_734439.hdr.mark = gc_color_red;
 c_734439.hdr.grayed = 0;
c_734439.tag = closureN_tag;
 c_734439.fn = (function_type)__lambda_280;
c_734439.num_args = 1;
c_734439.num_elements = 7;
c_734439.elements = (object *)e_734493;
c_734439.elements[0] = ((closureN)self_732280)->elements[0];
c_734439.elements[1] = ((closureN)self_732280)->elements[1];
c_734439.elements[2] = ((closureN)self_732280)->elements[2];
c_734439.elements[3] = ((closureN)self_732280)->elements[3];
c_734439.elements[4] = ((closureN)self_732280)->elements[4];
c_734439.elements[5] = obj_73522_73994;
c_734439.elements[6] = ((closureN)self_732280)->elements[5];

return_direct_with_clo1(data,(closure)&c_734439,__lambda_280,  boolean_f);; 
}

static void __lambda_280(void *data, object self_732281, int argc, object *args) /* object self_732281, object loop_73523_73995 */
 {
 object loop_73523_73995 = args[0];
  
closureN_type c_734441;
object e_734489 [7];
c_734441.hdr.mark = gc_color_red;
 c_734441.hdr.grayed = 0;
c_734441.tag = closureN_tag;
 c_734441.fn = (function_type)__lambda_513;
c_734441.num_args = 1;
c_734441.num_elements = 7;
c_734441.elements = (object *)e_734489;
c_734441.elements[0] = ((closureN)self_732281)->elements[0];
c_734441.elements[1] = ((closureN)self_732281)->elements[1];
c_734441.elements[2] = ((closureN)self_732281)->elements[2];
c_734441.elements[3] = ((closureN)self_732281)->elements[3];
c_734441.elements[4] = ((closureN)self_732281)->elements[4];
c_734441.elements[5] = ((closureN)self_732281)->elements[5];
c_734441.elements[6] = ((closureN)self_732281)->elements[6];


pair_type local_734492; 
return_direct_with_clo1(data,(closure)&c_734441,__lambda_513,  set_cell_as_expr(&local_734492, loop_73523_73995));; 
}

static void __lambda_513(void *data, object self_732282, int argc, object *args) /* object self_732282, object loop_73523_73995 */
 {
 object loop_73523_73995 = args[0];
  
closureN_type c_734443;
object e_734456 [3];
c_734443.hdr.mark = gc_color_red;
 c_734443.hdr.grayed = 0;
c_734443.tag = closureN_tag;
 c_734443.fn = (function_type)__lambda_281;
c_734443.num_args = 1;
c_734443.num_elements = 3;
c_734443.elements = (object *)e_734456;
c_734443.elements[0] = ((closureN)self_732282)->elements[4];
c_734443.elements[1] = loop_73523_73995;
c_734443.elements[2] = ((closureN)self_732282)->elements[5];


closureN_type c_734457;
object e_734488 [6];
c_734457.hdr.mark = gc_color_red;
 c_734457.hdr.grayed = 0;
c_734457.tag = closureN_tag;
 c_734457.fn = (function_type)__lambda_283;
c_734457.num_args = 1;
c_734457.num_elements = 6;
c_734457.elements = (object *)e_734488;
c_734457.elements[0] = ((closureN)self_732282)->elements[0];
c_734457.elements[1] = ((closureN)self_732282)->elements[1];
c_734457.elements[2] = ((closureN)self_732282)->elements[2];
c_734457.elements[3] = ((closureN)self_732282)->elements[3];
c_734457.elements[4] = loop_73523_73995;
c_734457.elements[5] = ((closureN)self_732282)->elements[6];

return_direct_with_clo1(data,(closure)&c_734443,__lambda_281,  &c_734457);; 
}

static void __lambda_283(void *data, object self_732283, int argc, object *args) /* object self_732283, object k_731629, object obj_73524_73996 */
 {
 object k_731629 = args[0]; object obj_73524_73996 = args[1];
  
closureN_type c_734460;
object e_734487 [7];
c_734460.hdr.mark = gc_color_red;
 c_734460.hdr.grayed = 0;
c_734460.tag = closureN_tag;
 c_734460.fn = (function_type)__lambda_284;
c_734460.num_args = 1;
c_734460.num_elements = 7;
c_734460.elements = (object *)e_734487;
c_734460.elements[0] = ((closureN)self_732283)->elements[0];
c_734460.elements[1] = ((closureN)self_732283)->elements[1];
c_734460.elements[2] = ((closureN)self_732283)->elements[3];
c_734460.elements[3] = k_731629;
c_734460.elements[4] = ((closureN)self_732283)->elements[4];
c_734460.elements[5] = obj_73524_73996;
c_734460.elements[6] = ((closureN)self_732283)->elements[5];

return_closcall2(data,  ((closureN)self_732283)->elements[2],  &c_734460, obj_73524_73996);; 
}

static void __lambda_284(void *data, object self_732284, int argc, object *args) /* object self_732284, object r_731630 */
 {
 object r_731630 = args[0];
  if( (boolean_f != r_731630) ){ 
  return_closcall1(data,  ((closureN)self_732284)->elements[0],  ((closureN)self_732284)->elements[3]);
} else { 
  
closureN_type c_734466;
object e_734485 [6];
c_734466.hdr.mark = gc_color_red;
 c_734466.hdr.grayed = 0;
c_734466.tag = closureN_tag;
 c_734466.fn = (function_type)__lambda_285;
c_734466.num_args = 1;
c_734466.num_elements = 6;
c_734466.elements = (object *)e_734485;
c_734466.elements[0] = ((closureN)self_732284)->elements[0];
c_734466.elements[1] = ((closureN)self_732284)->elements[1];
c_734466.elements[2] = ((closureN)self_732284)->elements[3];
c_734466.elements[3] = ((closureN)self_732284)->elements[4];
c_734466.elements[4] = ((closureN)self_732284)->elements[5];
c_734466.elements[5] = ((closureN)self_732284)->elements[6];

return_closcall2(data,  ((closureN)self_732284)->elements[2],  &c_734466, ((closureN)self_732284)->elements[5]);}
;; 
}

static void __lambda_285(void *data, object self_732285, int argc, object *args) /* object self_732285, object r_731634 */
 {
 object r_731634 = args[0];
  
closureN_type c_734469;
object e_734484 [5];
c_734469.hdr.mark = gc_color_red;
 c_734469.hdr.grayed = 0;
c_734469.tag = closureN_tag;
 c_734469.fn = (function_type)__lambda_286;
c_734469.num_args = 1;
c_734469.num_elements = 5;
c_734469.elements = (object *)e_734484;
c_734469.elements[0] = ((closureN)self_732285)->elements[0];
c_734469.elements[1] = ((closureN)self_732285)->elements[2];
c_734469.elements[2] = ((closureN)self_732285)->elements[3];
c_734469.elements[3] = ((closureN)self_732285)->elements[4];
c_734469.elements[4] = ((closureN)self_732285)->elements[5];

return_closcall2(data,  ((closureN)self_732285)->elements[1],  &c_734469, r_731634);; 
}

static void __lambda_286(void *data, object self_732286, int argc, object *args) /* object self_732286, object r_731633 */
 {
 object r_731633 = args[0];
  
closureN_type c_734472;
object e_734483 [4];
c_734472.hdr.mark = gc_color_red;
 c_734472.hdr.grayed = 0;
c_734472.tag = closureN_tag;
 c_734472.fn = (function_type)__lambda_287;
c_734472.num_args = 1;
c_734472.num_elements = 4;
c_734472.elements = (object *)e_734483;
c_734472.elements[0] = ((closureN)self_732286)->elements[1];
c_734472.elements[1] = ((closureN)self_732286)->elements[2];
c_734472.elements[2] = ((closureN)self_732286)->elements[3];
c_734472.elements[3] = ((closureN)self_732286)->elements[4];

return_closcall2(data,  ((closureN)self_732286)->elements[0],  &c_734472, r_731633);; 
}

static void __lambda_287(void *data, object self_732287, int argc, object *args) /* object self_732287, object r_731631 */
 {

  
closureN_type c_734475;
object e_734481 [2];
c_734475.hdr.mark = gc_color_red;
 c_734475.hdr.grayed = 0;
c_734475.tag = closureN_tag;
 c_734475.fn = (function_type)__lambda_288;
c_734475.num_args = 1;
c_734475.num_elements = 2;
c_734475.elements = (object *)e_734481;
c_734475.elements[0] = ((closureN)self_732287)->elements[0];
c_734475.elements[1] = ((closureN)self_732287)->elements[1];

return_closcall2(data,  ((closureN)self_732287)->elements[3],  &c_734475, ((closureN)self_732287)->elements[2]);; 
}

static void __lambda_288(void *data, object self_732288, int argc, object *args) /* object self_732288, object r_731632 */
 {
 object r_731632 = args[0];
  

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

static void __lambda_281(void *data, object self_732289, int argc, object *args) /* object self_732289, object r_731628 */
 {
 object r_731628 = args[0];
  
closureN_type c_734445;
object e_734452 [3];
c_734445.hdr.mark = gc_color_red;
 c_734445.hdr.grayed = 0;
c_734445.tag = closureN_tag;
 c_734445.fn = (function_type)__lambda_282;
c_734445.num_args = 1;
c_734445.num_elements = 3;
c_734445.elements = (object *)e_734452;
c_734445.elements[0] = ((closureN)self_732289)->elements[0];
c_734445.elements[1] = ((closureN)self_732289)->elements[1];
c_734445.elements[2] = ((closureN)self_732289)->elements[2];



return_direct_with_clo1(data,(closure)&c_734445,__lambda_282,  Cyc_set_cell(data, ((closureN)self_732289)->elements[1], r_731628));; 
}

static void __lambda_282(void *data, object self_732290, int argc, object *args) /* object self_732290, object r_731627 */
 {

  

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

static void __lambda_250(void *data, object _, int argc, object *args) /* closure _,object k_731600, object element_91comparator_73479_73971, object type_91test_73480_73972, object empty_127_73481_73973, object head_73482_73974, object tail_73483_73975 */
 {
object k_731600 = args[0]; object element_91comparator_73479_73971 = args[1]; object empty_127_73481_73973 = args[3]; object head_73482_73974 = args[4]; object tail_73483_73975 = args[5];
  Cyc_st_add(data, "srfi/128.sld:make-list<?");

closureN_type c_734294;
object e_734426 [4];
c_734294.hdr.mark = gc_color_red;
 c_734294.hdr.grayed = 0;
c_734294.tag = closureN_tag;
 c_734294.fn = (function_type)__lambda_251;
c_734294.num_args = 2;
c_734294.num_elements = 4;
c_734294.elements = (object *)e_734426;
c_734294.elements[0] = element_91comparator_73479_73971;
c_734294.elements[1] = empty_127_73481_73973;
c_734294.elements[2] = head_73482_73974;
c_734294.elements[3] = tail_73483_73975;

return_direct_with_clo1(data,  k_731600, (((closure)  k_731600)->fn),  &c_734294);; 
}

static void __lambda_251(void *data, object self_732252, int argc, object *args) /* object self_732252, object k_731601, object a_73484_73976, object b_73485_73977 */
 {
 object k_731601 = args[0]; object a_73484_73976 = args[1]; object b_73485_73977 = args[2];
  
closureN_type c_734296;
object e_734424 [7];
c_734296.hdr.mark = gc_color_red;
 c_734296.hdr.grayed = 0;
c_734296.tag = closureN_tag;
 c_734296.fn = (function_type)__lambda_252;
c_734296.num_args = 1;
c_734296.num_elements = 7;
c_734296.elements = (object *)e_734424;
c_734296.elements[0] = a_73484_73976;
c_734296.elements[1] = b_73485_73977;
c_734296.elements[2] = ((closureN)self_732252)->elements[0];
c_734296.elements[3] = ((closureN)self_732252)->elements[1];
c_734296.elements[4] = ((closureN)self_732252)->elements[2];
c_734296.elements[5] = k_731601;
c_734296.elements[6] = ((closureN)self_732252)->elements[3];

return_direct_with_clo2(data,  __glo_comparator_91equality_91predicate_srfi_128, (((closure)  __glo_comparator_91equality_91predicate_srfi_128)->fn),  &c_734296, ((closureN)self_732252)->elements[0]);; 
}

static void __lambda_252(void *data, object self_732253, int argc, object *args) /* object self_732253, object r_731602 */
 {
 object r_731602 = args[0];
  
closureN_type c_734298;
object e_734422 [7];
c_734298.hdr.mark = gc_color_red;
 c_734298.hdr.grayed = 0;
c_734298.tag = closureN_tag;
 c_734298.fn = (function_type)__lambda_253;
c_734298.num_args = 1;
c_734298.num_elements = 7;
c_734298.elements = (object *)e_734422;
c_734298.elements[0] = ((closureN)self_732253)->elements[0];
c_734298.elements[1] = ((closureN)self_732253)->elements[1];
c_734298.elements[2] = ((closureN)self_732253)->elements[3];
c_734298.elements[3] = ((closureN)self_732253)->elements[4];
c_734298.elements[4] = ((closureN)self_732253)->elements[5];
c_734298.elements[5] = r_731602;
c_734298.elements[6] = ((closureN)self_732253)->elements[6];

return_direct_with_clo2(data,  __glo_comparator_91ordering_91predicate_srfi_128, (((closure)  __glo_comparator_91ordering_91predicate_srfi_128)->fn),  &c_734298, ((closureN)self_732253)->elements[2]);; 
}

static void __lambda_253(void *data, object self_732254, int argc, object *args) /* object self_732254, object r_731603 */
 {
 object r_731603 = args[0];
  
closureN_type c_734300;
object e_734420 [6];
c_734300.hdr.mark = gc_color_red;
 c_734300.hdr.grayed = 0;
c_734300.tag = closureN_tag;
 c_734300.fn = (function_type)__lambda_254;
c_734300.num_args = 2;
c_734300.num_elements = 6;
c_734300.elements = (object *)e_734420;
c_734300.elements[0] = ((closureN)self_732254)->elements[0];
c_734300.elements[1] = ((closureN)self_732254)->elements[1];
c_734300.elements[2] = ((closureN)self_732254)->elements[2];
c_734300.elements[3] = ((closureN)self_732254)->elements[3];
c_734300.elements[4] = ((closureN)self_732254)->elements[4];
c_734300.elements[5] = ((closureN)self_732254)->elements[6];

return_direct_with_clo2(data,(closure)&c_734300,__lambda_254,  ((closureN)self_732254)->elements[5], r_731603);; 
}

static void __lambda_254(void *data, object self_732255, int argc, object *args) /* object self_732255, object elem_123_127_73486_73978, object elem_121_127_73487_73979 */
 {
 object elem_123_127_73486_73978 = args[0]; object elem_121_127_73487_73979 = args[1];
  
closureN_type c_734302;
object e_734417 [6];
c_734302.hdr.mark = gc_color_red;
 c_734302.hdr.grayed = 0;
c_734302.tag = closureN_tag;
 c_734302.fn = (function_type)__lambda_255;
c_734302.num_args = 2;
c_734302.num_elements = 6;
c_734302.elements = (object *)e_734417;
c_734302.elements[0] = elem_121_127_73487_73979;
c_734302.elements[1] = elem_123_127_73486_73978;
c_734302.elements[2] = ((closureN)self_732255)->elements[2];
c_734302.elements[3] = ((closureN)self_732255)->elements[3];
c_734302.elements[4] = ((closureN)self_732255)->elements[4];
c_734302.elements[5] = ((closureN)self_732255)->elements[5];

return_direct_with_clo2(data,(closure)&c_734302,__lambda_255,  ((closureN)self_732255)->elements[0], ((closureN)self_732255)->elements[1]);; 
}

static void __lambda_255(void *data, object self_732256, int argc, object *args) /* object self_732256, object a_73489_73980, object b_73490_73981 */
 {
 object a_73489_73980 = args[0]; object b_73490_73981 = args[1];
  
closureN_type c_734304;
object e_734416 [8];
c_734304.hdr.mark = gc_color_red;
 c_734304.hdr.grayed = 0;
c_734304.tag = closureN_tag;
 c_734304.fn = (function_type)__lambda_256;
c_734304.num_args = 1;
c_734304.num_elements = 8;
c_734304.elements = (object *)e_734416;
c_734304.elements[0] = a_73489_73980;
c_734304.elements[1] = b_73490_73981;
c_734304.elements[2] = ((closureN)self_732256)->elements[0];
c_734304.elements[3] = ((closureN)self_732256)->elements[1];
c_734304.elements[4] = ((closureN)self_732256)->elements[2];
c_734304.elements[5] = ((closureN)self_732256)->elements[3];
c_734304.elements[6] = ((closureN)self_732256)->elements[4];
c_734304.elements[7] = ((closureN)self_732256)->elements[5];

return_direct_with_clo1(data,(closure)&c_734304,__lambda_256,  boolean_f);; 
}

static void __lambda_256(void *data, object self_732257, int argc, object *args) /* object self_732257, object loop_73491_73982 */
 {
 object loop_73491_73982 = args[0];
  
closureN_type c_734306;
object e_734412 [8];
c_734306.hdr.mark = gc_color_red;
 c_734306.hdr.grayed = 0;
c_734306.tag = closureN_tag;
 c_734306.fn = (function_type)__lambda_512;
c_734306.num_args = 1;
c_734306.num_elements = 8;
c_734306.elements = (object *)e_734412;
c_734306.elements[0] = ((closureN)self_732257)->elements[0];
c_734306.elements[1] = ((closureN)self_732257)->elements[1];
c_734306.elements[2] = ((closureN)self_732257)->elements[2];
c_734306.elements[3] = ((closureN)self_732257)->elements[3];
c_734306.elements[4] = ((closureN)self_732257)->elements[4];
c_734306.elements[5] = ((closureN)self_732257)->elements[5];
c_734306.elements[6] = ((closureN)self_732257)->elements[6];
c_734306.elements[7] = ((closureN)self_732257)->elements[7];


pair_type local_734415; 
return_direct_with_clo1(data,(closure)&c_734306,__lambda_512,  set_cell_as_expr(&local_734415, loop_73491_73982));; 
}

static void __lambda_512(void *data, object self_732258, int argc, object *args) /* object self_732258, object loop_73491_73982 */
 {
 object loop_73491_73982 = args[0];
  
closureN_type c_734308;
object e_734322 [4];
c_734308.hdr.mark = gc_color_red;
 c_734308.hdr.grayed = 0;
c_734308.tag = closureN_tag;
 c_734308.fn = (function_type)__lambda_257;
c_734308.num_args = 1;
c_734308.num_elements = 4;
c_734308.elements = (object *)e_734322;
c_734308.elements[0] = ((closureN)self_732258)->elements[0];
c_734308.elements[1] = ((closureN)self_732258)->elements[1];
c_734308.elements[2] = ((closureN)self_732258)->elements[6];
c_734308.elements[3] = loop_73491_73982;


closureN_type c_734323;
object e_734411 [6];
c_734323.hdr.mark = gc_color_red;
 c_734323.hdr.grayed = 0;
c_734323.tag = closureN_tag;
 c_734323.fn = (function_type)__lambda_259;
c_734323.num_args = 2;
c_734323.num_elements = 6;
c_734323.elements = (object *)e_734411;
c_734323.elements[0] = ((closureN)self_732258)->elements[2];
c_734323.elements[1] = ((closureN)self_732258)->elements[3];
c_734323.elements[2] = ((closureN)self_732258)->elements[4];
c_734323.elements[3] = ((closureN)self_732258)->elements[5];
c_734323.elements[4] = loop_73491_73982;
c_734323.elements[5] = ((closureN)self_732258)->elements[7];

return_direct_with_clo1(data,(closure)&c_734308,__lambda_257,  &c_734323);; 
}

static void __lambda_259(void *data, object self_732259, int argc, object *args) /* object self_732259, object k_731606, object a_73492_73983, object b_73493_73984 */
 {
 object k_731606 = args[0]; object a_73492_73983 = args[1]; object b_73493_73984 = args[2];
  
closureN_type c_734325;
object e_734342 [3];
c_734325.hdr.mark = gc_color_red;
 c_734325.hdr.grayed = 0;
c_734325.tag = closureN_tag;
 c_734325.fn = (function_type)__lambda_260;
c_734325.num_args = 0;
c_734325.num_elements = 3;
c_734325.elements = (object *)e_734342;
c_734325.elements[0] = a_73492_73983;
c_734325.elements[1] = b_73493_73984;
c_734325.elements[2] = ((closureN)self_732259)->elements[2];


closureN_type c_734343;
object e_734410 [9];
c_734343.hdr.mark = gc_color_red;
 c_734343.hdr.grayed = 0;
c_734343.tag = closureN_tag;
 c_734343.fn = (function_type)__lambda_263;
c_734343.num_args = 1;
c_734343.num_elements = 9;
c_734343.elements = (object *)e_734410;
c_734343.elements[0] = a_73492_73983;
c_734343.elements[1] = b_73493_73984;
c_734343.elements[2] = ((closureN)self_732259)->elements[0];
c_734343.elements[3] = ((closureN)self_732259)->elements[1];
c_734343.elements[4] = ((closureN)self_732259)->elements[2];
c_734343.elements[5] = ((closureN)self_732259)->elements[3];
c_734343.elements[6] = k_731606;
c_734343.elements[7] = ((closureN)self_732259)->elements[4];
c_734343.elements[8] = ((closureN)self_732259)->elements[5];

return_direct_with_clo1(data,(closure)&c_734325,__lambda_260,  &c_734343);; 
}

static void __lambda_263(void *data, object self_732260, int argc, object *args) /* object self_732260, object tmp_73495_73497_73985 */
 {
 object tmp_73495_73497_73985 = args[0];
  if( (boolean_f != tmp_73495_73497_73985) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732260)->elements[6], (((closure)  ((closureN)self_732260)->elements[6])->fn),  tmp_73495_73497_73985);
} else { 
  
closureN_type c_734348;
object e_734408 [9];
c_734348.hdr.mark = gc_color_red;
 c_734348.hdr.grayed = 0;
c_734348.tag = closureN_tag;
 c_734348.fn = (function_type)__lambda_264;
c_734348.num_args = 1;
c_734348.num_elements = 9;
c_734348.elements = (object *)e_734408;
c_734348.elements[0] = ((closureN)self_732260)->elements[0];
c_734348.elements[1] = ((closureN)self_732260)->elements[1];
c_734348.elements[2] = ((closureN)self_732260)->elements[2];
c_734348.elements[3] = ((closureN)self_732260)->elements[3];
c_734348.elements[4] = ((closureN)self_732260)->elements[4];
c_734348.elements[5] = ((closureN)self_732260)->elements[5];
c_734348.elements[6] = ((closureN)self_732260)->elements[6];
c_734348.elements[7] = ((closureN)self_732260)->elements[7];
c_734348.elements[8] = ((closureN)self_732260)->elements[8];

return_closcall2(data,  ((closureN)self_732260)->elements[4],  &c_734348, ((closureN)self_732260)->elements[0]);}
;; 
}

static void __lambda_264(void *data, object self_732261, int argc, object *args) /* object self_732261, object r_731608 */
 {
 object r_731608 = args[0];
  if( (boolean_f != r_731608) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732261)->elements[6], (((closure)  ((closureN)self_732261)->elements[6])->fn),  boolean_t);
} else { 
  
closureN_type c_734353;
object e_734406 [8];
c_734353.hdr.mark = gc_color_red;
 c_734353.hdr.grayed = 0;
c_734353.tag = closureN_tag;
 c_734353.fn = (function_type)__lambda_265;
c_734353.num_args = 1;
c_734353.num_elements = 8;
c_734353.elements = (object *)e_734406;
c_734353.elements[0] = ((closureN)self_732261)->elements[0];
c_734353.elements[1] = ((closureN)self_732261)->elements[1];
c_734353.elements[2] = ((closureN)self_732261)->elements[2];
c_734353.elements[3] = ((closureN)self_732261)->elements[3];
c_734353.elements[4] = ((closureN)self_732261)->elements[5];
c_734353.elements[5] = ((closureN)self_732261)->elements[6];
c_734353.elements[6] = ((closureN)self_732261)->elements[7];
c_734353.elements[7] = ((closureN)self_732261)->elements[8];

return_closcall2(data,  ((closureN)self_732261)->elements[4],  &c_734353, ((closureN)self_732261)->elements[1]);}
;; 
}

static void __lambda_265(void *data, object self_732262, int argc, object *args) /* object self_732262, object r_731609 */
 {
 object r_731609 = args[0];
  if( (boolean_f != r_731609) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732262)->elements[5], (((closure)  ((closureN)self_732262)->elements[5])->fn),  boolean_f);
} else { 
  
closureN_type c_734358;
object e_734404 [8];
c_734358.hdr.mark = gc_color_red;
 c_734358.hdr.grayed = 0;
c_734358.tag = closureN_tag;
 c_734358.fn = (function_type)__lambda_266;
c_734358.num_args = 1;
c_734358.num_elements = 8;
c_734358.elements = (object *)e_734404;
c_734358.elements[0] = ((closureN)self_732262)->elements[0];
c_734358.elements[1] = ((closureN)self_732262)->elements[1];
c_734358.elements[2] = ((closureN)self_732262)->elements[2];
c_734358.elements[3] = ((closureN)self_732262)->elements[3];
c_734358.elements[4] = ((closureN)self_732262)->elements[4];
c_734358.elements[5] = ((closureN)self_732262)->elements[5];
c_734358.elements[6] = ((closureN)self_732262)->elements[6];
c_734358.elements[7] = ((closureN)self_732262)->elements[7];

return_closcall2(data,  ((closureN)self_732262)->elements[4],  &c_734358, ((closureN)self_732262)->elements[0]);}
;; 
}

static void __lambda_266(void *data, object self_732263, int argc, object *args) /* object self_732263, object r_731616 */
 {
 object r_731616 = args[0];
  
closureN_type c_734361;
object e_734402 [9];
c_734361.hdr.mark = gc_color_red;
 c_734361.hdr.grayed = 0;
c_734361.tag = closureN_tag;
 c_734361.fn = (function_type)__lambda_267;
c_734361.num_args = 1;
c_734361.num_elements = 9;
c_734361.elements = (object *)e_734402;
c_734361.elements[0] = ((closureN)self_732263)->elements[0];
c_734361.elements[1] = ((closureN)self_732263)->elements[1];
c_734361.elements[2] = ((closureN)self_732263)->elements[2];
c_734361.elements[3] = ((closureN)self_732263)->elements[3];
c_734361.elements[4] = ((closureN)self_732263)->elements[4];
c_734361.elements[5] = ((closureN)self_732263)->elements[5];
c_734361.elements[6] = ((closureN)self_732263)->elements[6];
c_734361.elements[7] = r_731616;
c_734361.elements[8] = ((closureN)self_732263)->elements[7];

return_closcall2(data,  ((closureN)self_732263)->elements[4],  &c_734361, ((closureN)self_732263)->elements[1]);; 
}

static void __lambda_267(void *data, object self_732264, int argc, object *args) /* object self_732264, object r_731617 */
 {
 object r_731617 = args[0];
  
closureN_type c_734364;
object e_734400 [7];
c_734364.hdr.mark = gc_color_red;
 c_734364.hdr.grayed = 0;
c_734364.tag = closureN_tag;
 c_734364.fn = (function_type)__lambda_268;
c_734364.num_args = 1;
c_734364.num_elements = 7;
c_734364.elements = (object *)e_734400;
c_734364.elements[0] = ((closureN)self_732264)->elements[0];
c_734364.elements[1] = ((closureN)self_732264)->elements[1];
c_734364.elements[2] = ((closureN)self_732264)->elements[2];
c_734364.elements[3] = ((closureN)self_732264)->elements[4];
c_734364.elements[4] = ((closureN)self_732264)->elements[5];
c_734364.elements[5] = ((closureN)self_732264)->elements[6];
c_734364.elements[6] = ((closureN)self_732264)->elements[8];

return_closcall3(data,  ((closureN)self_732264)->elements[3],  &c_734364, ((closureN)self_732264)->elements[7], r_731617);; 
}

static void __lambda_268(void *data, object self_732265, int argc, object *args) /* object self_732265, object r_731610 */
 {
 object r_731610 = args[0];
  if( (boolean_f != r_731610) ){ 
  
closureN_type c_734367;
object e_734379 [4];
c_734367.hdr.mark = gc_color_red;
 c_734367.hdr.grayed = 0;
c_734367.tag = closureN_tag;
 c_734367.fn = (function_type)__lambda_269;
c_734367.num_args = 1;
c_734367.num_elements = 4;
c_734367.elements = (object *)e_734379;
c_734367.elements[0] = ((closureN)self_732265)->elements[1];
c_734367.elements[1] = ((closureN)self_732265)->elements[4];
c_734367.elements[2] = ((closureN)self_732265)->elements[5];
c_734367.elements[3] = ((closureN)self_732265)->elements[6];

return_closcall2(data,  ((closureN)self_732265)->elements[6],  &c_734367, ((closureN)self_732265)->elements[0]);
} else { 
  
closureN_type c_734383;
object e_734398 [4];
c_734383.hdr.mark = gc_color_red;
 c_734383.hdr.grayed = 0;
c_734383.tag = closureN_tag;
 c_734383.fn = (function_type)__lambda_271;
c_734383.num_args = 1;
c_734383.num_elements = 4;
c_734383.elements = (object *)e_734398;
c_734383.elements[0] = ((closureN)self_732265)->elements[1];
c_734383.elements[1] = ((closureN)self_732265)->elements[2];
c_734383.elements[2] = ((closureN)self_732265)->elements[3];
c_734383.elements[3] = ((closureN)self_732265)->elements[4];

return_closcall2(data,  ((closureN)self_732265)->elements[3],  &c_734383, ((closureN)self_732265)->elements[0]);}
;; 
}

static void __lambda_271(void *data, object self_732268, int argc, object *args) /* object self_732268, object r_731614 */
 {
 object r_731614 = args[0];
  
closureN_type c_734386;
object e_734396 [3];
c_734386.hdr.mark = gc_color_red;
 c_734386.hdr.grayed = 0;
c_734386.tag = closureN_tag;
 c_734386.fn = (function_type)__lambda_272;
c_734386.num_args = 1;
c_734386.num_elements = 3;
c_734386.elements = (object *)e_734396;
c_734386.elements[0] = ((closureN)self_732268)->elements[1];
c_734386.elements[1] = ((closureN)self_732268)->elements[3];
c_734386.elements[2] = r_731614;

return_closcall2(data,  ((closureN)self_732268)->elements[2],  &c_734386, ((closureN)self_732268)->elements[0]);; 
}

static void __lambda_272(void *data, object self_732269, int argc, object *args) /* object self_732269, object r_731615 */
 {
 object r_731615 = args[0];
  
closureN_type c_734389;
object e_734394 [1];
c_734389.hdr.mark = gc_color_red;
 c_734389.hdr.grayed = 0;
c_734389.tag = closureN_tag;
 c_734389.fn = (function_type)__lambda_273;
c_734389.num_args = 1;
c_734389.num_elements = 1;
c_734389.elements = (object *)e_734394;
c_734389.elements[0] = ((closureN)self_732269)->elements[1];

return_closcall3(data,  ((closureN)self_732269)->elements[0],  &c_734389, ((closureN)self_732269)->elements[2], r_731615);; 
}

static void __lambda_273(void *data, object self_732270, int argc, object *args) /* object self_732270, object r_731613 */
 {
 object r_731613 = args[0];
  if( (boolean_f != r_731613) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732270)->elements[0], (((closure)  ((closureN)self_732270)->elements[0])->fn),  boolean_t);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732270)->elements[0], (((closure)  ((closureN)self_732270)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_269(void *data, object self_732266, int argc, object *args) /* object self_732266, object r_731611 */
 {
 object r_731611 = args[0];
  
closureN_type c_734370;
object e_734377 [3];
c_734370.hdr.mark = gc_color_red;
 c_734370.hdr.grayed = 0;
c_734370.tag = closureN_tag;
 c_734370.fn = (function_type)__lambda_270;
c_734370.num_args = 1;
c_734370.num_elements = 3;
c_734370.elements = (object *)e_734377;
c_734370.elements[0] = ((closureN)self_732266)->elements[1];
c_734370.elements[1] = ((closureN)self_732266)->elements[2];
c_734370.elements[2] = r_731611;

return_closcall2(data,  ((closureN)self_732266)->elements[3],  &c_734370, ((closureN)self_732266)->elements[0]);; 
}

static void __lambda_270(void *data, object self_732267, int argc, object *args) /* object self_732267, object r_731612 */
 {
 object r_731612 = args[0];
  

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

static void __lambda_260(void *data, object self_732271, int argc, object *args) /* object self_732271, object k_731618 */
 {
 object k_731618 = args[0];
  
closureN_type c_734328;
object e_734340 [3];
c_734328.hdr.mark = gc_color_red;
 c_734328.hdr.grayed = 0;
c_734328.tag = closureN_tag;
 c_734328.fn = (function_type)__lambda_261;
c_734328.num_args = 1;
c_734328.num_elements = 3;
c_734328.elements = (object *)e_734340;
c_734328.elements[0] = ((closureN)self_732271)->elements[1];
c_734328.elements[1] = ((closureN)self_732271)->elements[2];
c_734328.elements[2] = k_731618;

return_closcall2(data,  ((closureN)self_732271)->elements[2],  &c_734328, ((closureN)self_732271)->elements[0]);; 
}

static void __lambda_261(void *data, object self_732272, int argc, object *args) /* object self_732272, object r_731619 */
 {
 object r_731619 = args[0];
  if( (boolean_f != r_731619) ){ 
  
closureN_type c_734331;
object e_734336 [1];
c_734331.hdr.mark = gc_color_red;
 c_734331.hdr.grayed = 0;
c_734331.tag = closureN_tag;
 c_734331.fn = (function_type)__lambda_262;
c_734331.num_args = 1;
c_734331.num_elements = 1;
c_734331.elements = (object *)e_734336;
c_734331.elements[0] = ((closureN)self_732272)->elements[2];

return_closcall2(data,  ((closureN)self_732272)->elements[1],  &c_734331, ((closureN)self_732272)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732272)->elements[2], (((closure)  ((closureN)self_732272)->elements[2])->fn),  boolean_f);}
;; 
}

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

static void __lambda_257(void *data, object self_732274, int argc, object *args) /* object self_732274, object r_731605 */
 {
 object r_731605 = args[0];
  
closureN_type c_734310;
object e_734318 [4];
c_734310.hdr.mark = gc_color_red;
 c_734310.hdr.grayed = 0;
c_734310.tag = closureN_tag;
 c_734310.fn = (function_type)__lambda_258;
c_734310.num_args = 1;
c_734310.num_elements = 4;
c_734310.elements = (object *)e_734318;
c_734310.elements[0] = ((closureN)self_732274)->elements[0];
c_734310.elements[1] = ((closureN)self_732274)->elements[1];
c_734310.elements[2] = ((closureN)self_732274)->elements[2];
c_734310.elements[3] = ((closureN)self_732274)->elements[3];



return_direct_with_clo1(data,(closure)&c_734310,__lambda_258,  Cyc_set_cell(data, ((closureN)self_732274)->elements[3], r_731605));; 
}

static void __lambda_258(void *data, object self_732275, int argc, object *args) /* object self_732275, object r_731604 */
 {

  

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

static void __lambda_231(void *data, object _, int argc, object *args) /* closure _,object k_731581, object element_91comparator_73449_73957, object type_91test_73450_73958, object empty_127_73451_73959, object head_73452_73960, object tail_73453_73961 */
 {
object k_731581 = args[0]; object element_91comparator_73449_73957 = args[1]; object empty_127_73451_73959 = args[3]; object head_73452_73960 = args[4]; object tail_73453_73961 = args[5];
  Cyc_st_add(data, "srfi/128.sld:make-list=?");

closureN_type c_734184;
object e_734291 [4];
c_734184.hdr.mark = gc_color_red;
 c_734184.hdr.grayed = 0;
c_734184.tag = closureN_tag;
 c_734184.fn = (function_type)__lambda_232;
c_734184.num_args = 2;
c_734184.num_elements = 4;
c_734184.elements = (object *)e_734291;
c_734184.elements[0] = element_91comparator_73449_73957;
c_734184.elements[1] = empty_127_73451_73959;
c_734184.elements[2] = head_73452_73960;
c_734184.elements[3] = tail_73453_73961;

return_direct_with_clo1(data,  k_731581, (((closure)  k_731581)->fn),  &c_734184);; 
}

static void __lambda_232(void *data, object self_732233, int argc, object *args) /* object self_732233, object k_731582, object a_73454_73962, object b_73455_73963 */
 {
 object k_731582 = args[0]; object a_73454_73962 = args[1]; object b_73455_73963 = args[2];
  
closureN_type c_734186;
object e_734289 [6];
c_734186.hdr.mark = gc_color_red;
 c_734186.hdr.grayed = 0;
c_734186.tag = closureN_tag;
 c_734186.fn = (function_type)__lambda_233;
c_734186.num_args = 1;
c_734186.num_elements = 6;
c_734186.elements = (object *)e_734289;
c_734186.elements[0] = a_73454_73962;
c_734186.elements[1] = b_73455_73963;
c_734186.elements[2] = ((closureN)self_732233)->elements[1];
c_734186.elements[3] = ((closureN)self_732233)->elements[2];
c_734186.elements[4] = k_731582;
c_734186.elements[5] = ((closureN)self_732233)->elements[3];

return_direct_with_clo2(data,  __glo_comparator_91equality_91predicate_srfi_128, (((closure)  __glo_comparator_91equality_91predicate_srfi_128)->fn),  &c_734186, ((closureN)self_732233)->elements[0]);; 
}

static void __lambda_233(void *data, object self_732234, int argc, object *args) /* object self_732234, object elem_123_127_73456_73964 */
 {
 object elem_123_127_73456_73964 = args[0];
  
closureN_type c_734188;
object e_734286 [5];
c_734188.hdr.mark = gc_color_red;
 c_734188.hdr.grayed = 0;
c_734188.tag = closureN_tag;
 c_734188.fn = (function_type)__lambda_234;
c_734188.num_args = 2;
c_734188.num_elements = 5;
c_734188.elements = (object *)e_734286;
c_734188.elements[0] = elem_123_127_73456_73964;
c_734188.elements[1] = ((closureN)self_732234)->elements[2];
c_734188.elements[2] = ((closureN)self_732234)->elements[3];
c_734188.elements[3] = ((closureN)self_732234)->elements[4];
c_734188.elements[4] = ((closureN)self_732234)->elements[5];

return_direct_with_clo2(data,(closure)&c_734188,__lambda_234,  ((closureN)self_732234)->elements[0], ((closureN)self_732234)->elements[1]);; 
}

static void __lambda_234(void *data, object self_732235, int argc, object *args) /* object self_732235, object a_73458_73965, object b_73459_73966 */
 {
 object a_73458_73965 = args[0]; object b_73459_73966 = args[1];
  
closureN_type c_734190;
object e_734285 [7];
c_734190.hdr.mark = gc_color_red;
 c_734190.hdr.grayed = 0;
c_734190.tag = closureN_tag;
 c_734190.fn = (function_type)__lambda_235;
c_734190.num_args = 1;
c_734190.num_elements = 7;
c_734190.elements = (object *)e_734285;
c_734190.elements[0] = a_73458_73965;
c_734190.elements[1] = b_73459_73966;
c_734190.elements[2] = ((closureN)self_732235)->elements[0];
c_734190.elements[3] = ((closureN)self_732235)->elements[1];
c_734190.elements[4] = ((closureN)self_732235)->elements[2];
c_734190.elements[5] = ((closureN)self_732235)->elements[3];
c_734190.elements[6] = ((closureN)self_732235)->elements[4];

return_direct_with_clo1(data,(closure)&c_734190,__lambda_235,  boolean_f);; 
}

static void __lambda_235(void *data, object self_732236, int argc, object *args) /* object self_732236, object loop_73460_73967 */
 {
 object loop_73460_73967 = args[0];
  
closureN_type c_734192;
object e_734281 [7];
c_734192.hdr.mark = gc_color_red;
 c_734192.hdr.grayed = 0;
c_734192.tag = closureN_tag;
 c_734192.fn = (function_type)__lambda_511;
c_734192.num_args = 1;
c_734192.num_elements = 7;
c_734192.elements = (object *)e_734281;
c_734192.elements[0] = ((closureN)self_732236)->elements[0];
c_734192.elements[1] = ((closureN)self_732236)->elements[1];
c_734192.elements[2] = ((closureN)self_732236)->elements[2];
c_734192.elements[3] = ((closureN)self_732236)->elements[3];
c_734192.elements[4] = ((closureN)self_732236)->elements[4];
c_734192.elements[5] = ((closureN)self_732236)->elements[5];
c_734192.elements[6] = ((closureN)self_732236)->elements[6];


pair_type local_734284; 
return_direct_with_clo1(data,(closure)&c_734192,__lambda_511,  set_cell_as_expr(&local_734284, loop_73460_73967));; 
}

static void __lambda_511(void *data, object self_732237, int argc, object *args) /* object self_732237, object loop_73460_73967 */
 {
 object loop_73460_73967 = args[0];
  
closureN_type c_734194;
object e_734208 [4];
c_734194.hdr.mark = gc_color_red;
 c_734194.hdr.grayed = 0;
c_734194.tag = closureN_tag;
 c_734194.fn = (function_type)__lambda_236;
c_734194.num_args = 1;
c_734194.num_elements = 4;
c_734194.elements = (object *)e_734208;
c_734194.elements[0] = ((closureN)self_732237)->elements[0];
c_734194.elements[1] = ((closureN)self_732237)->elements[1];
c_734194.elements[2] = ((closureN)self_732237)->elements[5];
c_734194.elements[3] = loop_73460_73967;


closureN_type c_734209;
object e_734280 [5];
c_734209.hdr.mark = gc_color_red;
 c_734209.hdr.grayed = 0;
c_734209.tag = closureN_tag;
 c_734209.fn = (function_type)__lambda_238;
c_734209.num_args = 2;
c_734209.num_elements = 5;
c_734209.elements = (object *)e_734280;
c_734209.elements[0] = ((closureN)self_732237)->elements[2];
c_734209.elements[1] = ((closureN)self_732237)->elements[3];
c_734209.elements[2] = ((closureN)self_732237)->elements[4];
c_734209.elements[3] = loop_73460_73967;
c_734209.elements[4] = ((closureN)self_732237)->elements[6];

return_direct_with_clo1(data,(closure)&c_734194,__lambda_236,  &c_734209);; 
}

static void __lambda_238(void *data, object self_732238, int argc, object *args) /* object self_732238, object k_731586, object a_73461_73968, object b_73462_73969 */
 {
 object k_731586 = args[0]; object a_73461_73968 = args[1]; object b_73462_73969 = args[2];
  
closureN_type c_734211;
object e_734228 [3];
c_734211.hdr.mark = gc_color_red;
 c_734211.hdr.grayed = 0;
c_734211.tag = closureN_tag;
 c_734211.fn = (function_type)__lambda_239;
c_734211.num_args = 0;
c_734211.num_elements = 3;
c_734211.elements = (object *)e_734228;
c_734211.elements[0] = a_73461_73968;
c_734211.elements[1] = b_73462_73969;
c_734211.elements[2] = ((closureN)self_732238)->elements[1];


closureN_type c_734229;
object e_734279 [8];
c_734229.hdr.mark = gc_color_red;
 c_734229.hdr.grayed = 0;
c_734229.tag = closureN_tag;
 c_734229.fn = (function_type)__lambda_242;
c_734229.num_args = 1;
c_734229.num_elements = 8;
c_734229.elements = (object *)e_734279;
c_734229.elements[0] = a_73461_73968;
c_734229.elements[1] = b_73462_73969;
c_734229.elements[2] = ((closureN)self_732238)->elements[0];
c_734229.elements[3] = ((closureN)self_732238)->elements[1];
c_734229.elements[4] = ((closureN)self_732238)->elements[2];
c_734229.elements[5] = k_731586;
c_734229.elements[6] = ((closureN)self_732238)->elements[3];
c_734229.elements[7] = ((closureN)self_732238)->elements[4];

return_direct_with_clo1(data,(closure)&c_734211,__lambda_239,  &c_734229);; 
}

static void __lambda_242(void *data, object self_732239, int argc, object *args) /* object self_732239, object tmp_73464_73466_73970 */
 {
 object tmp_73464_73466_73970 = args[0];
  if( (boolean_f != tmp_73464_73466_73970) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732239)->elements[5], (((closure)  ((closureN)self_732239)->elements[5])->fn),  tmp_73464_73466_73970);
} else { 
  
closureN_type c_734234;
object e_734277 [8];
c_734234.hdr.mark = gc_color_red;
 c_734234.hdr.grayed = 0;
c_734234.tag = closureN_tag;
 c_734234.fn = (function_type)__lambda_243;
c_734234.num_args = 1;
c_734234.num_elements = 8;
c_734234.elements = (object *)e_734277;
c_734234.elements[0] = ((closureN)self_732239)->elements[0];
c_734234.elements[1] = ((closureN)self_732239)->elements[1];
c_734234.elements[2] = ((closureN)self_732239)->elements[2];
c_734234.elements[3] = ((closureN)self_732239)->elements[3];
c_734234.elements[4] = ((closureN)self_732239)->elements[4];
c_734234.elements[5] = ((closureN)self_732239)->elements[5];
c_734234.elements[6] = ((closureN)self_732239)->elements[6];
c_734234.elements[7] = ((closureN)self_732239)->elements[7];

return_closcall2(data,  ((closureN)self_732239)->elements[3],  &c_734234, ((closureN)self_732239)->elements[0]);}
;; 
}

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

return_closcall2(data,  ((closureN)self_732240)->elements[3],  &c_734239, ((closureN)self_732240)->elements[1]);}
;; 
}

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

return_closcall2(data,  ((closureN)self_732241)->elements[3],  &c_734244, ((closureN)self_732241)->elements[0]);}
;; 
}

static void __lambda_245(void *data, object self_732242, int argc, object *args) /* object self_732242, object r_731593 */
 {
 object r_731593 = args[0];
  
closureN_type c_734247;
object e_734271 [7];
c_734247.hdr.mark = gc_color_red;
 c_734247.hdr.grayed = 0;
c_734247.tag = closureN_tag;
 c_734247.fn = (function_type)__lambda_246;
c_734247.num_args = 1;
c_734247.num_elements = 7;
c_734247.elements = (object *)e_734271;
c_734247.elements[0] = ((closureN)self_732242)->elements[0];
c_734247.elements[1] = ((closureN)self_732242)->elements[1];
c_734247.elements[2] = ((closureN)self_732242)->elements[2];
c_734247.elements[3] = ((closureN)self_732242)->elements[4];
c_734247.elements[4] = ((closureN)self_732242)->elements[5];
c_734247.elements[5] = r_731593;
c_734247.elements[6] = ((closureN)self_732242)->elements[6];

return_closcall2(data,  ((closureN)self_732242)->elements[3],  &c_734247, ((closureN)self_732242)->elements[1]);; 
}

static void __lambda_246(void *data, object self_732243, int argc, object *args) /* object self_732243, object r_731594 */
 {
 object r_731594 = args[0];
  
closureN_type c_734250;
object e_734269 [5];
c_734250.hdr.mark = gc_color_red;
 c_734250.hdr.grayed = 0;
c_734250.tag = closureN_tag;
 c_734250.fn = (function_type)__lambda_247;
c_734250.num_args = 1;
c_734250.num_elements = 5;
c_734250.elements = (object *)e_734269;
c_734250.elements[0] = ((closureN)self_732243)->elements[0];
c_734250.elements[1] = ((closureN)self_732243)->elements[1];
c_734250.elements[2] = ((closureN)self_732243)->elements[3];
c_734250.elements[3] = ((closureN)self_732243)->elements[4];
c_734250.elements[4] = ((closureN)self_732243)->elements[6];

return_closcall3(data,  ((closureN)self_732243)->elements[2],  &c_734250, ((closureN)self_732243)->elements[5], r_731594);; 
}

static void __lambda_247(void *data, object self_732244, int argc, object *args) /* object self_732244, object r_731590 */
 {
 object r_731590 = args[0];
  if( (boolean_f != r_731590) ){ 
  
closureN_type c_734253;
object e_734265 [4];
c_734253.hdr.mark = gc_color_red;
 c_734253.hdr.grayed = 0;
c_734253.tag = closureN_tag;
 c_734253.fn = (function_type)__lambda_248;
c_734253.num_args = 1;
c_734253.num_elements = 4;
c_734253.elements = (object *)e_734265;
c_734253.elements[0] = ((closureN)self_732244)->elements[1];
c_734253.elements[1] = ((closureN)self_732244)->elements[2];
c_734253.elements[2] = ((closureN)self_732244)->elements[3];
c_734253.elements[3] = ((closureN)self_732244)->elements[4];

return_closcall2(data,  ((closureN)self_732244)->elements[4],  &c_734253, ((closureN)self_732244)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732244)->elements[2], (((closure)  ((closureN)self_732244)->elements[2])->fn),  boolean_f);}
;; 
}

static void __lambda_248(void *data, object self_732245, int argc, object *args) /* object self_732245, object r_731591 */
 {
 object r_731591 = args[0];
  
closureN_type c_734256;
object e_734263 [3];
c_734256.hdr.mark = gc_color_red;
 c_734256.hdr.grayed = 0;
c_734256.tag = closureN_tag;
 c_734256.fn = (function_type)__lambda_249;
c_734256.num_args = 1;
c_734256.num_elements = 3;
c_734256.elements = (object *)e_734263;
c_734256.elements[0] = ((closureN)self_732245)->elements[1];
c_734256.elements[1] = ((closureN)self_732245)->elements[2];
c_734256.elements[2] = r_731591;

return_closcall2(data,  ((closureN)self_732245)->elements[3],  &c_734256, ((closureN)self_732245)->elements[0]);; 
}

static void __lambda_249(void *data, object self_732246, int argc, object *args) /* object self_732246, object r_731592 */
 {
 object r_731592 = args[0];
  

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

static void __lambda_239(void *data, object self_732247, int argc, object *args) /* object self_732247, object k_731595 */
 {
 object k_731595 = args[0];
  
closureN_type c_734214;
object e_734226 [3];
c_734214.hdr.mark = gc_color_red;
 c_734214.hdr.grayed = 0;
c_734214.tag = closureN_tag;
 c_734214.fn = (function_type)__lambda_240;
c_734214.num_args = 1;
c_734214.num_elements = 3;
c_734214.elements = (object *)e_734226;
c_734214.elements[0] = ((closureN)self_732247)->elements[1];
c_734214.elements[1] = ((closureN)self_732247)->elements[2];
c_734214.elements[2] = k_731595;

return_closcall2(data,  ((closureN)self_732247)->elements[2],  &c_734214, ((closureN)self_732247)->elements[0]);; 
}

static void __lambda_240(void *data, object self_732248, int argc, object *args) /* object self_732248, object r_731596 */
 {
 object r_731596 = args[0];
  if( (boolean_f != r_731596) ){ 
  
closureN_type c_734217;
object e_734222 [1];
c_734217.hdr.mark = gc_color_red;
 c_734217.hdr.grayed = 0;
c_734217.tag = closureN_tag;
 c_734217.fn = (function_type)__lambda_241;
c_734217.num_args = 1;
c_734217.num_elements = 1;
c_734217.elements = (object *)e_734222;
c_734217.elements[0] = ((closureN)self_732248)->elements[2];

return_closcall2(data,  ((closureN)self_732248)->elements[1],  &c_734217, ((closureN)self_732248)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732248)->elements[2], (((closure)  ((closureN)self_732248)->elements[2])->fn),  boolean_f);}
;; 
}

static void __lambda_241(void *data, object self_732249, int argc, object *args) /* object self_732249, object r_731597 */
 {
 object r_731597 = args[0];
  if( (boolean_f != r_731597) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732249)->elements[0], (((closure)  ((closureN)self_732249)->elements[0])->fn),  boolean_t);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732249)->elements[0], (((closure)  ((closureN)self_732249)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_236(void *data, object self_732250, int argc, object *args) /* object self_732250, object r_731585 */
 {
 object r_731585 = args[0];
  
closureN_type c_734196;
object e_734204 [4];
c_734196.hdr.mark = gc_color_red;
 c_734196.hdr.grayed = 0;
c_734196.tag = closureN_tag;
 c_734196.fn = (function_type)__lambda_237;
c_734196.num_args = 1;
c_734196.num_elements = 4;
c_734196.elements = (object *)e_734204;
c_734196.elements[0] = ((closureN)self_732250)->elements[0];
c_734196.elements[1] = ((closureN)self_732250)->elements[1];
c_734196.elements[2] = ((closureN)self_732250)->elements[2];
c_734196.elements[3] = ((closureN)self_732250)->elements[3];



return_direct_with_clo1(data,(closure)&c_734196,__lambda_237,  Cyc_set_cell(data, ((closureN)self_732250)->elements[3], r_731585));; 
}

static void __lambda_237(void *data, object self_732251, int argc, object *args) /* object self_732251, object r_731584 */
 {

  

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

static void __lambda_218(void *data, object _, int argc, object *args) /* closure _,object k_731568, object element_91comparator_73430_73947, object type_91test_73431_73948, object empty_127_73432_73949, object head_73433_73950, object tail_73434_73951 */
 {
object k_731568 = args[0]; object element_91comparator_73430_73947 = args[1]; object type_91test_73431_73948 = args[2]; object empty_127_73432_73949 = args[3]; object head_73433_73950 = args[4]; object tail_73434_73951 = args[5];
  Cyc_st_add(data, "srfi/128.sld:make-list-type-test");

closureN_type c_734113;
object e_734181 [5];
c_734113.hdr.mark = gc_color_red;
 c_734113.hdr.grayed = 0;
c_734113.tag = closureN_tag;
 c_734113.fn = (function_type)__lambda_219;
c_734113.num_args = 1;
c_734113.num_elements = 5;
c_734113.elements = (object *)e_734181;
c_734113.elements[0] = element_91comparator_73430_73947;
c_734113.elements[1] = empty_127_73432_73949;
c_734113.elements[2] = head_73433_73950;
c_734113.elements[3] = tail_73434_73951;
c_734113.elements[4] = type_91test_73431_73948;

return_direct_with_clo1(data,  k_731568, (((closure)  k_731568)->fn),  &c_734113);; 
}

static void __lambda_219(void *data, object self_732220, int argc, object *args) /* object self_732220, object k_731569, object obj_73435_73952 */
 {
 object k_731569 = args[0]; object obj_73435_73952 = args[1];
  
closureN_type c_734116;
object e_734180 [6];
c_734116.hdr.mark = gc_color_red;
 c_734116.hdr.grayed = 0;
c_734116.tag = closureN_tag;
 c_734116.fn = (function_type)__lambda_220;
c_734116.num_args = 1;
c_734116.num_elements = 6;
c_734116.elements = (object *)e_734180;
c_734116.elements[0] = ((closureN)self_732220)->elements[0];
c_734116.elements[1] = ((closureN)self_732220)->elements[1];
c_734116.elements[2] = ((closureN)self_732220)->elements[2];
c_734116.elements[3] = k_731569;
c_734116.elements[4] = obj_73435_73952;
c_734116.elements[5] = ((closureN)self_732220)->elements[3];

return_closcall2(data,  ((closureN)self_732220)->elements[4],  &c_734116, obj_73435_73952);; 
}

static void __lambda_220(void *data, object self_732221, int argc, object *args) /* object self_732221, object r_731570 */
 {
 object r_731570 = args[0];
  if( (boolean_f != r_731570) ){ 
  
closureN_type c_734118;
object e_734176 [5];
c_734118.hdr.mark = gc_color_red;
 c_734118.hdr.grayed = 0;
c_734118.tag = closureN_tag;
 c_734118.fn = (function_type)__lambda_221;
c_734118.num_args = 1;
c_734118.num_elements = 5;
c_734118.elements = (object *)e_734176;
c_734118.elements[0] = ((closureN)self_732221)->elements[1];
c_734118.elements[1] = ((closureN)self_732221)->elements[2];
c_734118.elements[2] = ((closureN)self_732221)->elements[3];
c_734118.elements[3] = ((closureN)self_732221)->elements[4];
c_734118.elements[4] = ((closureN)self_732221)->elements[5];

return_direct_with_clo2(data,  __glo_comparator_91type_91test_91predicate_srfi_128, (((closure)  __glo_comparator_91type_91test_91predicate_srfi_128)->fn),  &c_734118, ((closureN)self_732221)->elements[0]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732221)->elements[3], (((closure)  ((closureN)self_732221)->elements[3])->fn),  boolean_f);}
;; 
}

static void __lambda_221(void *data, object self_732222, int argc, object *args) /* object self_732222, object elem_91type_91test_73437_73953 */
 {
 object elem_91type_91test_73437_73953 = args[0];
  
closureN_type c_734120;
object e_734174 [5];
c_734120.hdr.mark = gc_color_red;
 c_734120.hdr.grayed = 0;
c_734120.tag = closureN_tag;
 c_734120.fn = (function_type)__lambda_222;
c_734120.num_args = 1;
c_734120.num_elements = 5;
c_734120.elements = (object *)e_734174;
c_734120.elements[0] = elem_91type_91test_73437_73953;
c_734120.elements[1] = ((closureN)self_732222)->elements[0];
c_734120.elements[2] = ((closureN)self_732222)->elements[1];
c_734120.elements[3] = ((closureN)self_732222)->elements[2];
c_734120.elements[4] = ((closureN)self_732222)->elements[4];

return_direct_with_clo1(data,(closure)&c_734120,__lambda_222,  ((closureN)self_732222)->elements[3]);; 
}

static void __lambda_222(void *data, object self_732223, int argc, object *args) /* object self_732223, object obj_73439_73954 */
 {
 object obj_73439_73954 = args[0];
  
closureN_type c_734122;
object e_734173 [6];
c_734122.hdr.mark = gc_color_red;
 c_734122.hdr.grayed = 0;
c_734122.tag = closureN_tag;
 c_734122.fn = (function_type)__lambda_223;
c_734122.num_args = 1;
c_734122.num_elements = 6;
c_734122.elements = (object *)e_734173;
c_734122.elements[0] = ((closureN)self_732223)->elements[0];
c_734122.elements[1] = ((closureN)self_732223)->elements[1];
c_734122.elements[2] = ((closureN)self_732223)->elements[2];
c_734122.elements[3] = ((closureN)self_732223)->elements[3];
c_734122.elements[4] = obj_73439_73954;
c_734122.elements[5] = ((closureN)self_732223)->elements[4];

return_direct_with_clo1(data,(closure)&c_734122,__lambda_223,  boolean_f);; 
}

static void __lambda_223(void *data, object self_732224, int argc, object *args) /* object self_732224, object loop_73440_73955 */
 {
 object loop_73440_73955 = args[0];
  
closureN_type c_734124;
object e_734169 [6];
c_734124.hdr.mark = gc_color_red;
 c_734124.hdr.grayed = 0;
c_734124.tag = closureN_tag;
 c_734124.fn = (function_type)__lambda_510;
c_734124.num_args = 1;
c_734124.num_elements = 6;
c_734124.elements = (object *)e_734169;
c_734124.elements[0] = ((closureN)self_732224)->elements[0];
c_734124.elements[1] = ((closureN)self_732224)->elements[1];
c_734124.elements[2] = ((closureN)self_732224)->elements[2];
c_734124.elements[3] = ((closureN)self_732224)->elements[3];
c_734124.elements[4] = ((closureN)self_732224)->elements[4];
c_734124.elements[5] = ((closureN)self_732224)->elements[5];


pair_type local_734172; 
return_direct_with_clo1(data,(closure)&c_734124,__lambda_510,  set_cell_as_expr(&local_734172, loop_73440_73955));; 
}

static void __lambda_510(void *data, object self_732225, int argc, object *args) /* object self_732225, object loop_73440_73955 */
 {
 object loop_73440_73955 = args[0];
  
closureN_type c_734126;
object e_734139 [3];
c_734126.hdr.mark = gc_color_red;
 c_734126.hdr.grayed = 0;
c_734126.tag = closureN_tag;
 c_734126.fn = (function_type)__lambda_224;
c_734126.num_args = 1;
c_734126.num_elements = 3;
c_734126.elements = (object *)e_734139;
c_734126.elements[0] = ((closureN)self_732225)->elements[3];
c_734126.elements[1] = loop_73440_73955;
c_734126.elements[2] = ((closureN)self_732225)->elements[4];


closureN_type c_734140;
object e_734168 [5];
c_734140.hdr.mark = gc_color_red;
 c_734140.hdr.grayed = 0;
c_734140.tag = closureN_tag;
 c_734140.fn = (function_type)__lambda_226;
c_734140.num_args = 1;
c_734140.num_elements = 5;
c_734140.elements = (object *)e_734168;
c_734140.elements[0] = ((closureN)self_732225)->elements[0];
c_734140.elements[1] = ((closureN)self_732225)->elements[1];
c_734140.elements[2] = ((closureN)self_732225)->elements[2];
c_734140.elements[3] = loop_73440_73955;
c_734140.elements[4] = ((closureN)self_732225)->elements[5];

return_direct_with_clo1(data,(closure)&c_734126,__lambda_224,  &c_734140);; 
}

static void __lambda_226(void *data, object self_732226, int argc, object *args) /* object self_732226, object k_731574, object obj_73441_73956 */
 {
 object k_731574 = args[0]; object obj_73441_73956 = args[1];
  
closureN_type c_734143;
object e_734167 [6];
c_734143.hdr.mark = gc_color_red;
 c_734143.hdr.grayed = 0;
c_734143.tag = closureN_tag;
 c_734143.fn = (function_type)__lambda_227;
c_734143.num_args = 1;
c_734143.num_elements = 6;
c_734143.elements = (object *)e_734167;
c_734143.elements[0] = ((closureN)self_732226)->elements[0];
c_734143.elements[1] = ((closureN)self_732226)->elements[2];
c_734143.elements[2] = k_731574;
c_734143.elements[3] = ((closureN)self_732226)->elements[3];
c_734143.elements[4] = obj_73441_73956;
c_734143.elements[5] = ((closureN)self_732226)->elements[4];

return_closcall2(data,  ((closureN)self_732226)->elements[1],  &c_734143, obj_73441_73956);; 
}

static void __lambda_227(void *data, object self_732227, int argc, object *args) /* object self_732227, object r_731575 */
 {
 object r_731575 = args[0];
  if( (boolean_f != r_731575) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732227)->elements[2], (((closure)  ((closureN)self_732227)->elements[2])->fn),  boolean_t);
} else { 
  
closureN_type c_734148;
object e_734165 [5];
c_734148.hdr.mark = gc_color_red;
 c_734148.hdr.grayed = 0;
c_734148.tag = closureN_tag;
 c_734148.fn = (function_type)__lambda_228;
c_734148.num_args = 1;
c_734148.num_elements = 5;
c_734148.elements = (object *)e_734165;
c_734148.elements[0] = ((closureN)self_732227)->elements[0];
c_734148.elements[1] = ((closureN)self_732227)->elements[2];
c_734148.elements[2] = ((closureN)self_732227)->elements[3];
c_734148.elements[3] = ((closureN)self_732227)->elements[4];
c_734148.elements[4] = ((closureN)self_732227)->elements[5];

return_closcall2(data,  ((closureN)self_732227)->elements[1],  &c_734148, ((closureN)self_732227)->elements[4]);}
;; 
}

static void __lambda_228(void *data, object self_732228, int argc, object *args) /* object self_732228, object r_731578 */
 {
 object r_731578 = args[0];
  
closureN_type c_734151;
object e_734164 [4];
c_734151.hdr.mark = gc_color_red;
 c_734151.hdr.grayed = 0;
c_734151.tag = closureN_tag;
 c_734151.fn = (function_type)__lambda_229;
c_734151.num_args = 1;
c_734151.num_elements = 4;
c_734151.elements = (object *)e_734164;
c_734151.elements[0] = ((closureN)self_732228)->elements[1];
c_734151.elements[1] = ((closureN)self_732228)->elements[2];
c_734151.elements[2] = ((closureN)self_732228)->elements[3];
c_734151.elements[3] = ((closureN)self_732228)->elements[4];

return_closcall2(data,  ((closureN)self_732228)->elements[0],  &c_734151, r_731578);; 
}

static void __lambda_229(void *data, object self_732229, int argc, object *args) /* object self_732229, object r_731576 */
 {
 object r_731576 = args[0];
  if( (boolean_f != r_731576) ){ 
  
closureN_type c_734154;
object e_734160 [2];
c_734154.hdr.mark = gc_color_red;
 c_734154.hdr.grayed = 0;
c_734154.tag = closureN_tag;
 c_734154.fn = (function_type)__lambda_230;
c_734154.num_args = 1;
c_734154.num_elements = 2;
c_734154.elements = (object *)e_734160;
c_734154.elements[0] = ((closureN)self_732229)->elements[0];
c_734154.elements[1] = ((closureN)self_732229)->elements[1];

return_closcall2(data,  ((closureN)self_732229)->elements[3],  &c_734154, ((closureN)self_732229)->elements[2]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732229)->elements[0], (((closure)  ((closureN)self_732229)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_230(void *data, object self_732230, int argc, object *args) /* object self_732230, object r_731577 */
 {
 object r_731577 = args[0];
  

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

static void __lambda_224(void *data, object self_732231, int argc, object *args) /* object self_732231, object r_731573 */
 {
 object r_731573 = args[0];
  
closureN_type c_734128;
object e_734135 [3];
c_734128.hdr.mark = gc_color_red;
 c_734128.hdr.grayed = 0;
c_734128.tag = closureN_tag;
 c_734128.fn = (function_type)__lambda_225;
c_734128.num_args = 1;
c_734128.num_elements = 3;
c_734128.elements = (object *)e_734135;
c_734128.elements[0] = ((closureN)self_732231)->elements[0];
c_734128.elements[1] = ((closureN)self_732231)->elements[1];
c_734128.elements[2] = ((closureN)self_732231)->elements[2];



return_direct_with_clo1(data,(closure)&c_734128,__lambda_225,  Cyc_set_cell(data, ((closureN)self_732231)->elements[1], r_731573));; 
}

static void __lambda_225(void *data, object self_732232, int argc, object *args) /* object self_732232, object r_731572 */
 {

  

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

static void __lambda_213(void *data, object _, int argc, object *args) /* closure _,object k_731561, object element_91comparator_73425_73942, object type_91test_73426_73943, object empty_127_73427_73944, object head_73428_73945, object tail_73429_73946 */
 {
object k_731561 = args[0]; object element_91comparator_73425_73942 = args[1]; object type_91test_73426_73943 = args[2]; object empty_127_73427_73944 = args[3]; object head_73428_73945 = args[4]; object tail_73429_73946 = args[5];
  Cyc_st_add(data, "srfi/128.sld:make-list-comparator");

closureN_type c_734080;
object e_734110 [6];
c_734080.hdr.mark = gc_color_red;
 c_734080.hdr.grayed = 0;
c_734080.tag = closureN_tag;
 c_734080.fn = (function_type)__lambda_214;
c_734080.num_args = 1;
c_734080.num_elements = 6;
c_734080.elements = (object *)e_734110;
c_734080.elements[0] = element_91comparator_73425_73942;
c_734080.elements[1] = empty_127_73427_73944;
c_734080.elements[2] = head_73428_73945;
c_734080.elements[3] = k_731561;
c_734080.elements[4] = tail_73429_73946;
c_734080.elements[5] = type_91test_73426_73943;

return_direct_with_clo6(data,  __glo_make_91list_91type_91test_srfi_128, (((closure)  __glo_make_91list_91type_91test_srfi_128)->fn),  &c_734080, element_91comparator_73425_73942, type_91test_73426_73943, empty_127_73427_73944, head_73428_73945, tail_73429_73946);; 
}

static void __lambda_214(void *data, object self_732216, int argc, object *args) /* object self_732216, object r_731562 */
 {
 object r_731562 = args[0];
  
closureN_type c_734082;
object e_734104 [7];
c_734082.hdr.mark = gc_color_red;
 c_734082.hdr.grayed = 0;
c_734082.tag = closureN_tag;
 c_734082.fn = (function_type)__lambda_215;
c_734082.num_args = 1;
c_734082.num_elements = 7;
c_734082.elements = (object *)e_734104;
c_734082.elements[0] = ((closureN)self_732216)->elements[0];
c_734082.elements[1] = ((closureN)self_732216)->elements[1];
c_734082.elements[2] = ((closureN)self_732216)->elements[2];
c_734082.elements[3] = ((closureN)self_732216)->elements[3];
c_734082.elements[4] = r_731562;
c_734082.elements[5] = ((closureN)self_732216)->elements[4];
c_734082.elements[6] = ((closureN)self_732216)->elements[5];

return_direct_with_clo6(data,  __glo_make_91list_123_127_srfi_128, (((closure)  __glo_make_91list_123_127_srfi_128)->fn),  &c_734082, ((closureN)self_732216)->elements[0], ((closureN)self_732216)->elements[5], ((closureN)self_732216)->elements[1], ((closureN)self_732216)->elements[2], ((closureN)self_732216)->elements[4]);; 
}

static void __lambda_215(void *data, object self_732217, int argc, object *args) /* object self_732217, object r_731563 */
 {
 object r_731563 = args[0];
  
closureN_type c_734084;
object e_734098 [8];
c_734084.hdr.mark = gc_color_red;
 c_734084.hdr.grayed = 0;
c_734084.tag = closureN_tag;
 c_734084.fn = (function_type)__lambda_216;
c_734084.num_args = 1;
c_734084.num_elements = 8;
c_734084.elements = (object *)e_734098;
c_734084.elements[0] = ((closureN)self_732217)->elements[0];
c_734084.elements[1] = ((closureN)self_732217)->elements[1];
c_734084.elements[2] = ((closureN)self_732217)->elements[2];
c_734084.elements[3] = ((closureN)self_732217)->elements[3];
c_734084.elements[4] = ((closureN)self_732217)->elements[4];
c_734084.elements[5] = r_731563;
c_734084.elements[6] = ((closureN)self_732217)->elements[5];
c_734084.elements[7] = ((closureN)self_732217)->elements[6];

return_direct_with_clo6(data,  __glo_make_91list_121_127_srfi_128, (((closure)  __glo_make_91list_121_127_srfi_128)->fn),  &c_734084, ((closureN)self_732217)->elements[0], ((closureN)self_732217)->elements[6], ((closureN)self_732217)->elements[1], ((closureN)self_732217)->elements[2], ((closureN)self_732217)->elements[5]);; 
}

static void __lambda_216(void *data, object self_732218, int argc, object *args) /* object self_732218, object r_731564 */
 {
 object r_731564 = args[0];
  
closureN_type c_734086;
object e_734092 [4];
c_734086.hdr.mark = gc_color_red;
 c_734086.hdr.grayed = 0;
c_734086.tag = closureN_tag;
 c_734086.fn = (function_type)__lambda_217;
c_734086.num_args = 1;
c_734086.num_elements = 4;
c_734086.elements = (object *)e_734092;
c_734086.elements[0] = ((closureN)self_732218)->elements[3];
c_734086.elements[1] = ((closureN)self_732218)->elements[4];
c_734086.elements[2] = ((closureN)self_732218)->elements[5];
c_734086.elements[3] = r_731564;

return_direct_with_clo6(data,  __glo_make_91list_91hash_srfi_128, (((closure)  __glo_make_91list_91hash_srfi_128)->fn),  &c_734086, ((closureN)self_732218)->elements[0], ((closureN)self_732218)->elements[7], ((closureN)self_732218)->elements[1], ((closureN)self_732218)->elements[2], ((closureN)self_732218)->elements[6]);; 
}

static void __lambda_217(void *data, object self_732219, int argc, object *args) /* object self_732219, object r_731565 */
 {
 object r_731565 = args[0];
  return_direct_with_clo5(data,  __glo_make_91comparator_srfi_128, (((closure)  __glo_make_91comparator_srfi_128)->fn),  ((closureN)self_732219)->elements[0], ((closureN)self_732219)->elements[1], ((closureN)self_732219)->elements[2], ((closureN)self_732219)->elements[3], r_731565);; 
}

static void __lambda_206(void *data, object _, int argc, object *args) /* closure _,object k_731550, object car_91comparator_73416_73938, object cdr_91comparator_73417_73939 */
 {
object k_731550 = args[0]; object car_91comparator_73416_73938 = args[1]; object cdr_91comparator_73417_73939 = args[2];
  Cyc_st_add(data, "srfi/128.sld:make-pair-hash");

closureN_type c_734048;
object e_734077 [2];
c_734048.hdr.mark = gc_color_red;
 c_734048.hdr.grayed = 0;
c_734048.tag = closureN_tag;
 c_734048.fn = (function_type)__lambda_207;
c_734048.num_args = 1;
c_734048.num_elements = 2;
c_734048.elements = (object *)e_734077;
c_734048.elements[0] = car_91comparator_73416_73938;
c_734048.elements[1] = cdr_91comparator_73417_73939;

return_direct_with_clo1(data,  k_731550, (((closure)  k_731550)->fn),  &c_734048);; 
}

static void __lambda_207(void *data, object self_732210, int argc, object *args) /* object self_732210, object k_731551, object obj_73418_73940 */
 {
 object k_731551 = args[0]; object obj_73418_73940 = args[1];
  
closureN_type c_734050;
object e_734076 [4];
c_734050.hdr.mark = gc_color_red;
 c_734050.hdr.grayed = 0;
c_734050.tag = closureN_tag;
 c_734050.fn = (function_type)__lambda_208;
c_734050.num_args = 1;
c_734050.num_elements = 4;
c_734050.elements = (object *)e_734076;
c_734050.elements[0] = ((closureN)self_732210)->elements[0];
c_734050.elements[1] = ((closureN)self_732210)->elements[1];
c_734050.elements[2] = k_731551;
c_734050.elements[3] = obj_73418_73940;

return_direct_with_clo1(data,  __glo_make_91hasher_srfi_128, (((closure)  __glo_make_91hasher_srfi_128)->fn),  &c_734050);; 
}

static void __lambda_208(void *data, object self_732211, int argc, object *args) /* object self_732211, object acc_73419_73941 */
 {
 object acc_73419_73941 = args[0];
  
closureN_type c_734052;
object e_734071 [4];
c_734052.hdr.mark = gc_color_red;
 c_734052.hdr.grayed = 0;
c_734052.tag = closureN_tag;
 c_734052.fn = (function_type)__lambda_209;
c_734052.num_args = 1;
c_734052.num_elements = 4;
c_734052.elements = (object *)e_734071;
c_734052.elements[0] = acc_73419_73941;
c_734052.elements[1] = ((closureN)self_732211)->elements[1];
c_734052.elements[2] = ((closureN)self_732211)->elements[2];
c_734052.elements[3] = ((closureN)self_732211)->elements[3];



return_direct_with_clo3(data,  __glo_comparator_91hash_srfi_128, (((closure)  __glo_comparator_91hash_srfi_128)->fn),  &c_734052, ((closureN)self_732211)->elements[0], Cyc_car(data, ((closureN)self_732211)->elements[3]));; 
}

static void __lambda_209(void *data, object self_732212, int argc, object *args) /* object self_732212, object r_731557 */
 {
 object r_731557 = args[0];
  
closureN_type c_734055;
object e_734070 [4];
c_734055.hdr.mark = gc_color_red;
 c_734055.hdr.grayed = 0;
c_734055.tag = closureN_tag;
 c_734055.fn = (function_type)__lambda_210;
c_734055.num_args = 1;
c_734055.num_elements = 4;
c_734055.elements = (object *)e_734070;
c_734055.elements[0] = ((closureN)self_732212)->elements[0];
c_734055.elements[1] = ((closureN)self_732212)->elements[1];
c_734055.elements[2] = ((closureN)self_732212)->elements[2];
c_734055.elements[3] = ((closureN)self_732212)->elements[3];

return_closcall2(data,  ((closureN)self_732212)->elements[0],  &c_734055, r_731557);; 
}

static void __lambda_210(void *data, object self_732213, int argc, object *args) /* object self_732213, object r_731553 */
 {

  
closureN_type c_734057;
object e_734065 [2];
c_734057.hdr.mark = gc_color_red;
 c_734057.hdr.grayed = 0;
c_734057.tag = closureN_tag;
 c_734057.fn = (function_type)__lambda_211;
c_734057.num_args = 1;
c_734057.num_elements = 2;
c_734057.elements = (object *)e_734065;
c_734057.elements[0] = ((closureN)self_732213)->elements[0];
c_734057.elements[1] = ((closureN)self_732213)->elements[2];



return_direct_with_clo3(data,  __glo_comparator_91hash_srfi_128, (((closure)  __glo_comparator_91hash_srfi_128)->fn),  &c_734057, ((closureN)self_732213)->elements[1], Cyc_cdr(data, ((closureN)self_732213)->elements[3]));; 
}

static void __lambda_211(void *data, object self_732214, int argc, object *args) /* object self_732214, object r_731555 */
 {
 object r_731555 = args[0];
  
closureN_type c_734060;
object e_734064 [2];
c_734060.hdr.mark = gc_color_red;
 c_734060.hdr.grayed = 0;
c_734060.tag = closureN_tag;
 c_734060.fn = (function_type)__lambda_212;
c_734060.num_args = 1;
c_734060.num_elements = 2;
c_734060.elements = (object *)e_734064;
c_734060.elements[0] = ((closureN)self_732214)->elements[0];
c_734060.elements[1] = ((closureN)self_732214)->elements[1];

return_closcall2(data,  ((closureN)self_732214)->elements[0],  &c_734060, r_731555);; 
}

static void __lambda_212(void *data, object self_732215, int argc, object *args) /* object self_732215, object r_731554 */
 {

  return_closcall1(data,  ((closureN)self_732215)->elements[0],  ((closureN)self_732215)->elements[1]);; 
}

static void __lambda_203(void *data, object _, int argc, object *args) /* closure _,object k_731539, object car_91comparator_73412_73934, object cdr_91comparator_73413_73935 */
 {
object k_731539 = args[0]; object car_91comparator_73412_73934 = args[1]; object cdr_91comparator_73413_73935 = args[2];
  Cyc_st_add(data, "srfi/128.sld:make-pair<?");

closureN_type c_734018;
object e_734045 [2];
c_734018.hdr.mark = gc_color_red;
 c_734018.hdr.grayed = 0;
c_734018.tag = closureN_tag;
 c_734018.fn = (function_type)__lambda_204;
c_734018.num_args = 2;
c_734018.num_elements = 2;
c_734018.elements = (object *)e_734045;
c_734018.elements[0] = car_91comparator_73412_73934;
c_734018.elements[1] = cdr_91comparator_73413_73935;

return_direct_with_clo1(data,  k_731539, (((closure)  k_731539)->fn),  &c_734018);; 
}

static void __lambda_204(void *data, object self_732208, int argc, object *args) /* object self_732208, object k_731540, object a_73414_73936, object b_73415_73937 */
 {
 object k_731540 = args[0]; object a_73414_73936 = args[1]; object b_73415_73937 = args[2];
  
closureN_type c_734020;
object e_734039 [5];
c_734020.hdr.mark = gc_color_red;
 c_734020.hdr.grayed = 0;
c_734020.tag = closureN_tag;
 c_734020.fn = (function_type)__lambda_205;
c_734020.num_args = 1;
c_734020.num_elements = 5;
c_734020.elements = (object *)e_734039;
c_734020.elements[0] = a_73414_73936;
c_734020.elements[1] = b_73415_73937;
c_734020.elements[2] = ((closureN)self_732208)->elements[0];
c_734020.elements[3] = ((closureN)self_732208)->elements[1];
c_734020.elements[4] = k_731540;





return_direct_with_clo4(data,  __glo__123_127_srfi_128, (((closure)  __glo__123_127_srfi_128)->fn),  &c_734020, ((closureN)self_732208)->elements[0], Cyc_car(data, a_73414_73936), Cyc_car(data, b_73415_73937));; 
}

static void __lambda_205(void *data, object self_732209, int argc, object *args) /* object self_732209, object r_731541 */
 {
 object r_731541 = args[0];
  if( (boolean_f != r_731541) ){ 
  



return_direct_with_clo4(data,  __glo__121_127_srfi_128, (((closure)  __glo__121_127_srfi_128)->fn),  ((closureN)self_732209)->elements[4], ((closureN)self_732209)->elements[3], Cyc_cdr(data, ((closureN)self_732209)->elements[0]), Cyc_cdr(data, ((closureN)self_732209)->elements[1]));
} else { 
  



return_direct_with_clo4(data,  __glo__121_127_srfi_128, (((closure)  __glo__121_127_srfi_128)->fn),  ((closureN)self_732209)->elements[4], ((closureN)self_732209)->elements[2], Cyc_car(data, ((closureN)self_732209)->elements[0]), Cyc_car(data, ((closureN)self_732209)->elements[1]));}
;; 
}

static void __lambda_197(void *data, object _, int argc, object *args) /* closure _,object k_731528, object car_91comparator_73407_73930, object cdr_91comparator_73408_73931 */
 {
object k_731528 = args[0]; object car_91comparator_73407_73930 = args[1]; object cdr_91comparator_73408_73931 = args[2];
  Cyc_st_add(data, "srfi/128.sld:make-pair=?");

closureN_type c_733983;
object e_734015 [2];
c_733983.hdr.mark = gc_color_red;
 c_733983.hdr.grayed = 0;
c_733983.tag = closureN_tag;
 c_733983.fn = (function_type)__lambda_198;
c_733983.num_args = 2;
c_733983.num_elements = 2;
c_733983.elements = (object *)e_734015;
c_733983.elements[0] = car_91comparator_73407_73930;
c_733983.elements[1] = cdr_91comparator_73408_73931;

return_direct_with_clo1(data,  k_731528, (((closure)  k_731528)->fn),  &c_733983);; 
}

static void __lambda_198(void *data, object self_732203, int argc, object *args) /* object self_732203, object k_731529, object a_73409_73932, object b_73410_73933 */
 {
 object k_731529 = args[0]; object a_73409_73932 = args[1]; object b_73410_73933 = args[2];
  
closureN_type c_733985;
object e_734013 [4];
c_733985.hdr.mark = gc_color_red;
 c_733985.hdr.grayed = 0;
c_733985.tag = closureN_tag;
 c_733985.fn = (function_type)__lambda_199;
c_733985.num_args = 1;
c_733985.num_elements = 4;
c_733985.elements = (object *)e_734013;
c_733985.elements[0] = a_73409_73932;
c_733985.elements[1] = b_73410_73933;
c_733985.elements[2] = ((closureN)self_732203)->elements[1];
c_733985.elements[3] = k_731529;

return_direct_with_clo2(data,  __glo_comparator_91equality_91predicate_srfi_128, (((closure)  __glo_comparator_91equality_91predicate_srfi_128)->fn),  &c_733985, ((closureN)self_732203)->elements[0]);; 
}

static void __lambda_199(void *data, object self_732204, int argc, object *args) /* object self_732204, object r_731534 */
 {
 object r_731534 = args[0];
  
closureN_type c_733987;
object e_734006 [4];
c_733987.hdr.mark = gc_color_red;
 c_733987.hdr.grayed = 0;
c_733987.tag = closureN_tag;
 c_733987.fn = (function_type)__lambda_200;
c_733987.num_args = 1;
c_733987.num_elements = 4;
c_733987.elements = (object *)e_734006;
c_733987.elements[0] = ((closureN)self_732204)->elements[0];
c_733987.elements[1] = ((closureN)self_732204)->elements[1];
c_733987.elements[2] = ((closureN)self_732204)->elements[2];
c_733987.elements[3] = ((closureN)self_732204)->elements[3];





return_closcall3(data,  r_731534,  &c_733987, Cyc_car(data, ((closureN)self_732204)->elements[0]), Cyc_car(data, ((closureN)self_732204)->elements[1]));; 
}

static void __lambda_200(void *data, object self_732205, int argc, object *args) /* object self_732205, object r_731530 */
 {
 object r_731530 = args[0];
  if( (boolean_f != r_731530) ){ 
  
closureN_type c_733989;
object e_734002 [3];
c_733989.hdr.mark = gc_color_red;
 c_733989.hdr.grayed = 0;
c_733989.tag = closureN_tag;
 c_733989.fn = (function_type)__lambda_201;
c_733989.num_args = 1;
c_733989.num_elements = 3;
c_733989.elements = (object *)e_734002;
c_733989.elements[0] = ((closureN)self_732205)->elements[0];
c_733989.elements[1] = ((closureN)self_732205)->elements[1];
c_733989.elements[2] = ((closureN)self_732205)->elements[3];

return_direct_with_clo2(data,  __glo_comparator_91equality_91predicate_srfi_128, (((closure)  __glo_comparator_91equality_91predicate_srfi_128)->fn),  &c_733989, ((closureN)self_732205)->elements[2]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732205)->elements[3], (((closure)  ((closureN)self_732205)->elements[3])->fn),  boolean_f);}
;; 
}

static void __lambda_201(void *data, object self_732206, int argc, object *args) /* object self_732206, object r_731531 */
 {
 object r_731531 = args[0];
  
closureN_type c_733991;
object e_733998 [3];
c_733991.hdr.mark = gc_color_red;
 c_733991.hdr.grayed = 0;
c_733991.tag = closureN_tag;
 c_733991.fn = (function_type)__lambda_202;
c_733991.num_args = 1;
c_733991.num_elements = 3;
c_733991.elements = (object *)e_733998;
c_733991.elements[0] = ((closureN)self_732206)->elements[1];
c_733991.elements[1] = ((closureN)self_732206)->elements[2];
c_733991.elements[2] = r_731531;



return_direct_with_clo1(data,(closure)&c_733991,__lambda_202,  Cyc_cdr(data, ((closureN)self_732206)->elements[0]));; 
}

static void __lambda_202(void *data, object self_732207, int argc, object *args) /* object self_732207, object r_731532 */
 {
 object r_731532 = args[0];
  

return_closcall3(data,  ((closureN)self_732207)->elements[2],  ((closureN)self_732207)->elements[1], r_731532, Cyc_cdr(data, ((closureN)self_732207)->elements[0]));; 
}

static void __lambda_194(void *data, object _, int argc, object *args) /* closure _,object k_731520, object car_91comparator_73402_73927, object cdr_91comparator_73403_73928 */
 {
object k_731520 = args[0]; object car_91comparator_73402_73927 = args[1]; object cdr_91comparator_73403_73928 = args[2];
  Cyc_st_add(data, "srfi/128.sld:make-pair-type-test");

closureN_type c_733962;
object e_733980 [2];
c_733962.hdr.mark = gc_color_red;
 c_733962.hdr.grayed = 0;
c_733962.tag = closureN_tag;
 c_733962.fn = (function_type)__lambda_195;
c_733962.num_args = 1;
c_733962.num_elements = 2;
c_733962.elements = (object *)e_733980;
c_733962.elements[0] = car_91comparator_73402_73927;
c_733962.elements[1] = cdr_91comparator_73403_73928;

return_direct_with_clo1(data,  k_731520, (((closure)  k_731520)->fn),  &c_733962);; 
}

static void __lambda_195(void *data, object self_732201, int argc, object *args) /* object self_732201, object k_731521, object obj_73404_73929 */
 {
 object k_731521 = args[0]; object obj_73404_73929 = args[1];
    
if( (boolean_f != Cyc_is_pair(obj_73404_73929)) ){ 
  
closureN_type c_733966;
object e_733975 [3];
c_733966.hdr.mark = gc_color_red;
 c_733966.hdr.grayed = 0;
c_733966.tag = closureN_tag;
 c_733966.fn = (function_type)__lambda_196;
c_733966.num_args = 1;
c_733966.num_elements = 3;
c_733966.elements = (object *)e_733975;
c_733966.elements[0] = ((closureN)self_732201)->elements[1];
c_733966.elements[1] = k_731521;
c_733966.elements[2] = obj_73404_73929;



return_direct_with_clo3(data,  __glo_comparator_91test_91type_srfi_128, (((closure)  __glo_comparator_91test_91type_srfi_128)->fn),  &c_733966, ((closureN)self_732201)->elements[0], Cyc_car(data, obj_73404_73929));
} else { 
  return_direct_with_clo1(data,  k_731521, (((closure)  k_731521)->fn),  boolean_f);}
;; 
}

static void __lambda_196(void *data, object self_732202, int argc, object *args) /* object self_732202, object r_731523 */
 {
 object r_731523 = args[0];
  if( (boolean_f != r_731523) ){ 
  

return_direct_with_clo3(data,  __glo_comparator_91test_91type_srfi_128, (((closure)  __glo_comparator_91test_91type_srfi_128)->fn),  ((closureN)self_732202)->elements[1], ((closureN)self_732202)->elements[0], Cyc_cdr(data, ((closureN)self_732202)->elements[2]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732202)->elements[1], (((closure)  ((closureN)self_732202)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_189(void *data, object _, int argc, object *args) /* closure _,object k_731513, object car_91comparator_73400_73925, object cdr_91comparator_73401_73926 */
 {
object k_731513 = args[0]; object car_91comparator_73400_73925 = args[1]; object cdr_91comparator_73401_73926 = args[2];
  Cyc_st_add(data, "srfi/128.sld:make-pair-comparator");

closureN_type c_733938;
object e_733959 [3];
c_733938.hdr.mark = gc_color_red;
 c_733938.hdr.grayed = 0;
c_733938.tag = closureN_tag;
 c_733938.fn = (function_type)__lambda_190;
c_733938.num_args = 1;
c_733938.num_elements = 3;
c_733938.elements = (object *)e_733959;
c_733938.elements[0] = car_91comparator_73400_73925;
c_733938.elements[1] = cdr_91comparator_73401_73926;
c_733938.elements[2] = k_731513;

return_direct_with_clo3(data,  __glo_make_91pair_91type_91test_srfi_128, (((closure)  __glo_make_91pair_91type_91test_srfi_128)->fn),  &c_733938, car_91comparator_73400_73925, cdr_91comparator_73401_73926);; 
}

static void __lambda_190(void *data, object self_732197, int argc, object *args) /* object self_732197, object r_731514 */
 {
 object r_731514 = args[0];
  
closureN_type c_733940;
object e_733956 [4];
c_733940.hdr.mark = gc_color_red;
 c_733940.hdr.grayed = 0;
c_733940.tag = closureN_tag;
 c_733940.fn = (function_type)__lambda_191;
c_733940.num_args = 1;
c_733940.num_elements = 4;
c_733940.elements = (object *)e_733956;
c_733940.elements[0] = ((closureN)self_732197)->elements[0];
c_733940.elements[1] = ((closureN)self_732197)->elements[1];
c_733940.elements[2] = ((closureN)self_732197)->elements[2];
c_733940.elements[3] = r_731514;

return_direct_with_clo3(data,  __glo_make_91pair_123_127_srfi_128, (((closure)  __glo_make_91pair_123_127_srfi_128)->fn),  &c_733940, ((closureN)self_732197)->elements[0], ((closureN)self_732197)->elements[1]);; 
}

static void __lambda_191(void *data, object self_732198, int argc, object *args) /* object self_732198, object r_731515 */
 {
 object r_731515 = args[0];
  
closureN_type c_733942;
object e_733953 [5];
c_733942.hdr.mark = gc_color_red;
 c_733942.hdr.grayed = 0;
c_733942.tag = closureN_tag;
 c_733942.fn = (function_type)__lambda_192;
c_733942.num_args = 1;
c_733942.num_elements = 5;
c_733942.elements = (object *)e_733953;
c_733942.elements[0] = ((closureN)self_732198)->elements[0];
c_733942.elements[1] = ((closureN)self_732198)->elements[1];
c_733942.elements[2] = ((closureN)self_732198)->elements[2];
c_733942.elements[3] = ((closureN)self_732198)->elements[3];
c_733942.elements[4] = r_731515;

return_direct_with_clo3(data,  __glo_make_91pair_121_127_srfi_128, (((closure)  __glo_make_91pair_121_127_srfi_128)->fn),  &c_733942, ((closureN)self_732198)->elements[0], ((closureN)self_732198)->elements[1]);; 
}

static void __lambda_192(void *data, object self_732199, int argc, object *args) /* object self_732199, object r_731516 */
 {
 object r_731516 = args[0];
  
closureN_type c_733944;
object e_733950 [4];
c_733944.hdr.mark = gc_color_red;
 c_733944.hdr.grayed = 0;
c_733944.tag = closureN_tag;
 c_733944.fn = (function_type)__lambda_193;
c_733944.num_args = 1;
c_733944.num_elements = 4;
c_733944.elements = (object *)e_733950;
c_733944.elements[0] = ((closureN)self_732199)->elements[2];
c_733944.elements[1] = ((closureN)self_732199)->elements[3];
c_733944.elements[2] = ((closureN)self_732199)->elements[4];
c_733944.elements[3] = r_731516;

return_direct_with_clo3(data,  __glo_make_91pair_91hash_srfi_128, (((closure)  __glo_make_91pair_91hash_srfi_128)->fn),  &c_733944, ((closureN)self_732199)->elements[0], ((closureN)self_732199)->elements[1]);; 
}

static void __lambda_193(void *data, object self_732200, int argc, object *args) /* object self_732200, object r_731517 */
 {
 object r_731517 = args[0];
  return_direct_with_clo5(data,  __glo_make_91comparator_srfi_128, (((closure)  __glo_make_91comparator_srfi_128)->fn),  ((closureN)self_732200)->elements[0], ((closureN)self_732200)->elements[1], ((closureN)self_732200)->elements[2], ((closureN)self_732200)->elements[3], r_731517);; 
}

static void __lambda_179(void *data, object _, int argc, object *args) /* closure _,object k_731493 */
 {
object k_731493 = args[0];
  Cyc_st_add(data, "srfi/128.sld:make-hasher");

closureN_type c_733856;
object e_733935 [1];
c_733856.hdr.mark = gc_color_red;
 c_733856.hdr.grayed = 0;
c_733856.tag = closureN_tag;
 c_733856.fn = (function_type)__lambda_180;
c_733856.num_args = 1;
c_733856.num_elements = 1;
c_733856.elements = (object *)e_733935;
c_733856.elements[0] = k_731493;

return_direct_with_clo1(data,  __glo__75salt_75_srfi_128, (((closure)  __glo__75salt_75_srfi_128)->fn),  &c_733856);; 
}

static void __lambda_180(void *data, object self_732187, int argc, object *args) /* object self_732187, object result_73385_73921 */
 {
 object result_73385_73921 = args[0];
  
closureN_type c_733858;
object e_733931 [1];
c_733858.hdr.mark = gc_color_red;
 c_733858.hdr.grayed = 0;
c_733858.tag = closureN_tag;
 c_733858.fn = (function_type)__lambda_509;
c_733858.num_args = 1;
c_733858.num_elements = 1;
c_733858.elements = (object *)e_733931;
c_733858.elements[0] = ((closureN)self_732187)->elements[0];


pair_type local_733934; 
return_direct_with_clo1(data,(closure)&c_733858,__lambda_509,  set_cell_as_expr(&local_733934, result_73385_73921));; 
}

static void __lambda_509(void *data, object self_732188, int argc, object *args) /* object self_732188, object result_73385_73921 */
 {
 object result_73385_73921 = args[0];
  
closureN_type c_733861;
object e_733930 [1];
c_733861.hdr.mark = gc_color_red;
 c_733861.hdr.grayed = 0;
c_733861.tag = closureN_tag;
 c_733861.fn = (function_type)__lambda_181;
c_733861.num_args = 0;
c_733861.num_elements = 1;
c_733861.elements = (object *)e_733930;
c_733861.elements[0] = result_73385_73921;

return_direct_with_clo1(data,  ((closureN)self_732188)->elements[0], (((closure)  ((closureN)self_732188)->elements[0])->fn),  &c_733861);; 
}

static void __lambda_181(void *data, object self_732189, int argc, object *args) /* object self_732189, object k_731495, object args_73386_73390_73922_raw, ... */
 {
 object k_731495 = args[0];
load_varargs(args_73386_73390_73922, args, 1, argc - 1);
    
  
  
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_73386_73390_73922), Cyc_length(data, NULL))) ){ 
  
closureN_type c_733869;
object e_733876 [2];
c_733869.hdr.mark = gc_color_red;
 c_733869.hdr.grayed = 0;
c_733869.tag = closureN_tag;
 c_733869.fn = (function_type)__lambda_182;
c_733869.num_args = 1;
c_733869.num_elements = 2;
c_733869.elements = (object *)e_733876;
c_733869.elements[0] = args_73386_73390_73922;
c_733869.elements[1] = k_731495;


closureN_type c_733877;
object e_733882 [1];
c_733877.hdr.mark = gc_color_red;
 c_733877.hdr.grayed = 0;
c_733877.tag = closureN_tag;
 c_733877.fn = (function_type)__lambda_183;
c_733877.num_args = 0;
c_733877.num_elements = 1;
c_733877.elements = (object *)e_733882;
c_733877.elements[0] = ((closureN)self_732189)->elements[0];

return_direct_with_clo1(data,(closure)&c_733869,__lambda_182,  &c_733877);
} else { 
    
  
  
  make_pair(c_733889,quote_n,NULL);c_733889.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_73386_73390_73922), Cyc_length(data, &c_733889))) ){ 
  
closureN_type c_733891;
object e_733898 [2];
c_733891.hdr.mark = gc_color_red;
 c_733891.hdr.grayed = 0;
c_733891.tag = closureN_tag;
 c_733891.fn = (function_type)__lambda_184;
c_733891.num_args = 1;
c_733891.num_elements = 2;
c_733891.elements = (object *)e_733898;
c_733891.elements[0] = args_73386_73390_73922;
c_733891.elements[1] = k_731495;


closureN_type c_733899;
object e_733927 [1];
c_733899.hdr.mark = gc_color_red;
 c_733899.hdr.grayed = 0;
c_733899.tag = closureN_tag;
 c_733899.fn = (function_type)__lambda_185;
c_733899.num_args = 1;
c_733899.num_elements = 1;
c_733899.elements = (object *)e_733927;
c_733899.elements[0] = ((closureN)self_732189)->elements[0];

return_direct_with_clo1(data,(closure)&c_733891,__lambda_184,  &c_733899);
} else { 
  
make_utf8_string_with_len(c_733929, "case-lambda: no cases matched", 29, 29);
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_731495, &c_733929);}
;}
;; 
}

static void __lambda_185(void *data, object self_732192, int argc, object *args) /* object self_732192, object k_731502, object n_73394_73924 */
 {
 object k_731502 = args[0]; object n_73394_73924 = args[1];
  
closureN_type c_733901;
object e_733920 [3];
c_733901.hdr.mark = gc_color_red;
 c_733901.hdr.grayed = 0;
c_733901.tag = closureN_tag;
 c_733901.fn = (function_type)__lambda_186;
c_733901.num_args = 1;
c_733901.num_elements = 3;
c_733901.elements = (object *)e_733920;
c_733901.elements[0] = k_731502;
c_733901.elements[1] = n_73394_73924;
c_733901.elements[2] = ((closureN)self_732192)->elements[0];


complex_num_type local_733923; 


return_direct_with_clo1(data,(closure)&c_733901,__lambda_186,  Cyc_fast_mul(data,&local_733923, car(((closureN)self_732192)->elements[0]), obj_int2obj(33)));; 
}

static void __lambda_186(void *data, object self_732193, int argc, object *args) /* object self_732193, object r_731506 */
 {
 object r_731506 = args[0];
  
closureN_type c_733903;
object e_733919 [3];
c_733903.hdr.mark = gc_color_red;
 c_733903.hdr.grayed = 0;
c_733903.tag = closureN_tag;
 c_733903.fn = (function_type)__lambda_187;
c_733903.num_args = 1;
c_733903.num_elements = 3;
c_733903.elements = (object *)e_733919;
c_733903.elements[0] = ((closureN)self_732193)->elements[0];
c_733903.elements[1] = ((closureN)self_732193)->elements[1];
c_733903.elements[2] = ((closureN)self_732193)->elements[2];

return_direct_with_clo3(data,  __glo_modulo_scheme_base, (((closure)  __glo_modulo_scheme_base)->fn),  &c_733903, r_731506, obj_int2obj(33554432));; 
}

static void __lambda_187(void *data, object self_732194, int argc, object *args) /* object self_732194, object r_731505 */
 {
 object r_731505 = args[0];
  
closureN_type c_733905;
object e_733911 [2];
c_733905.hdr.mark = gc_color_red;
 c_733905.hdr.grayed = 0;
c_733905.tag = closureN_tag;
 c_733905.fn = (function_type)__lambda_188;
c_733905.num_args = 1;
c_733905.num_elements = 2;
c_733905.elements = (object *)e_733911;
c_733905.elements[0] = ((closureN)self_732194)->elements[0];
c_733905.elements[1] = ((closureN)self_732194)->elements[2];




complex_num_type local_733917; 
return_direct_with_clo1(data,(closure)&c_733905,__lambda_188,  Cyc_set_cell(data, ((closureN)self_732194)->elements[2], Cyc_fast_sum(data,&local_733917, r_731505, ((closureN)self_732194)->elements[1])));; 
}

static void __lambda_188(void *data, object self_732195, int argc, object *args) /* object self_732195, object r_731503 */
 {

  

return_direct_with_clo1(data,  ((closureN)self_732195)->elements[0], (((closure)  ((closureN)self_732195)->elements[0])->fn),  car(((closureN)self_732195)->elements[1]));; 
}

static void __lambda_184(void *data, object self_732196, int argc, object *args) /* object self_732196, object r_731501 */
 {
 object r_731501 = args[0];
  
object c_733896 = apply(data,  ((closureN)self_732196)->elements[1],r_731501, ((closureN)self_732196)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732196)->elements[1], (((closure)  ((closureN)self_732196)->elements[1])->fn),  c_733896);; 
}

static void __lambda_183(void *data, object self_732190, int argc, object *args) /* object self_732190, object k_731499 */
 {
 object k_731499 = args[0];
  

return_direct_with_clo1(data,  k_731499, (((closure)  k_731499)->fn),  car(((closureN)self_732190)->elements[0]));; 
}

static void __lambda_182(void *data, object self_732191, int argc, object *args) /* object self_732191, object r_731498 */
 {
 object r_731498 = args[0];
  
object c_733874 = apply(data,  ((closureN)self_732191)->elements[1],r_731498, ((closureN)self_732191)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_732191)->elements[1], (((closure)  ((closureN)self_732191)->elements[1])->fn),  c_733874);; 
}

static void __lambda_178(void *data, object _, int argc, object *args) /* closure _,object k_731490 */
 {
object k_731490 = args[0];
  Cyc_st_add(data, "srfi/128.sld:make-equal-comparator");
return_direct_with_clo5(data,  __glo_make_91comparator_srfi_128, (((closure)  __glo_make_91comparator_srfi_128)->fn),  k_731490, boolean_t, primitive_equal_127, boolean_f, __glo_default_91hash_srfi_128);; 
}

static void __lambda_177(void *data, object _, int argc, object *args) /* closure _,object k_731487 */
 {
object k_731487 = args[0];
  Cyc_st_add(data, "srfi/128.sld:make-eqv-comparator");
return_direct_with_clo5(data,  __glo_make_91comparator_srfi_128, (((closure)  __glo_make_91comparator_srfi_128)->fn),  k_731487, boolean_t, primitive_eqv_127, boolean_f, __glo_default_91hash_srfi_128);; 
}

static void __lambda_176(void *data, object _, int argc, object *args) /* closure _,object k_731484 */
 {
object k_731484 = args[0];
  Cyc_st_add(data, "srfi/128.sld:make-eq-comparator");
return_direct_with_clo5(data,  __glo_make_91comparator_srfi_128, (((closure)  __glo_make_91comparator_srfi_128)->fn),  k_731484, boolean_t, primitive_eq_127, boolean_f, __glo_default_91hash_srfi_128);; 
}

static void __lambda_174(void *data, object _, int argc, object *args) /* closure _,object k_731480, object obj_73384_73920 */
 {
object k_731480 = args[0]; object obj_73384_73920 = args[1];
  Cyc_st_add(data, "srfi/128.sld:symbol-hash");

closureN_type c_733841;
object e_733844 [1];
c_733841.hdr.mark = gc_color_red;
 c_733841.hdr.grayed = 0;
c_733841.tag = closureN_tag;
 c_733841.fn = (function_type)__lambda_175;
c_733841.num_args = 1;
c_733841.num_elements = 1;
c_733841.elements = (object *)e_733844;
c_733841.elements[0] = k_731480;


object c_733847 = Cyc_symbol2string(data,(closure)&c_733841,obj_73384_73920);
return_closcall1(data,(closure)&c_733841,  c_733847);; 
}

static void __lambda_175(void *data, object self_732186, int argc, object *args) /* object self_732186, object r_731481 */
 {
 object r_731481 = args[0];
  return_direct_with_clo2(data,  __glo_string_91hash_srfi_128, (((closure)  __glo_string_91hash_srfi_128)->fn),  ((closureN)self_732186)->elements[0], r_731481);; 
}

static void __lambda_171(void *data, object _, int argc, object *args) /* closure _,object k_731475, object a_73382_73918, object b_73383_73919 */
 {
object k_731475 = args[0]; object a_73382_73918 = args[1]; object b_73383_73919 = args[2];
  Cyc_st_add(data, "srfi/128.sld:symbol<?");

closureN_type c_733821;
object e_733835 [2];
c_733821.hdr.mark = gc_color_red;
 c_733821.hdr.grayed = 0;
c_733821.tag = closureN_tag;
 c_733821.fn = (function_type)__lambda_172;
c_733821.num_args = 1;
c_733821.num_elements = 2;
c_733821.elements = (object *)e_733835;
c_733821.elements[0] = b_73383_73919;
c_733821.elements[1] = k_731475;


object c_733838 = Cyc_symbol2string(data,(closure)&c_733821,a_73382_73918);
return_closcall1(data,(closure)&c_733821,  c_733838);; 
}

static void __lambda_172(void *data, object self_732184, int argc, object *args) /* object self_732184, object r_731476 */
 {
 object r_731476 = args[0];
  
closureN_type c_733823;
object e_733830 [2];
c_733823.hdr.mark = gc_color_red;
 c_733823.hdr.grayed = 0;
c_733823.tag = closureN_tag;
 c_733823.fn = (function_type)__lambda_173;
c_733823.num_args = 1;
c_733823.num_elements = 2;
c_733823.elements = (object *)e_733830;
c_733823.elements[0] = ((closureN)self_732184)->elements[1];
c_733823.elements[1] = r_731476;


object c_733833 = Cyc_symbol2string(data,(closure)&c_733823,((closureN)self_732184)->elements[0]);
return_closcall1(data,(closure)&c_733823,  c_733833);; 
}

static void __lambda_173(void *data, object self_732185, int argc, object *args) /* object self_732185, object r_731477 */
 {
 object r_731477 = args[0];
  
complex_num_type local_733828; 
return_direct_with_clo1(data,  ((closureN)self_732185)->elements[0], (((closure)  ((closureN)self_732185)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_fast_91string_121_127_191_191inline_191_191_scheme_base)->fn)(data,&local_733828, ((closureN)self_732185)->elements[1], r_731477));; 
}

static void __lambda_169(void *data, object _, int argc, object *args) /* closure _,object k_731471, object obj_73381_73917 */
 {
object k_731471 = args[0]; object obj_73381_73917 = args[1];
  Cyc_st_add(data, "srfi/128.sld:string-ci-hash");

closureN_type c_733815;
object e_733818 [1];
c_733815.hdr.mark = gc_color_red;
 c_733815.hdr.grayed = 0;
c_733815.tag = closureN_tag;
 c_733815.fn = (function_type)__lambda_170;
c_733815.num_args = 1;
c_733815.num_elements = 1;
c_733815.elements = (object *)e_733818;
c_733815.elements[0] = k_731471;

return_direct_with_clo2(data,  __glo_string_91foldcase_scheme__char, (((closure)  __glo_string_91foldcase_scheme__char)->fn),  &c_733815, obj_73381_73917);; 
}

static void __lambda_170(void *data, object self_732183, int argc, object *args) /* object self_732183, object r_731472 */
 {
 object r_731472 = args[0];
  return_direct_with_clo2(data,  __glo_string_91hash_srfi_128, (((closure)  __glo_string_91hash_srfi_128)->fn),  ((closureN)self_732183)->elements[0], r_731472);; 
}

static void __lambda_162(void *data, object _, int argc, object *args) /* closure _,object k_731461, object a_73379_73915, object b_73380_73916 */
 {
object k_731461 = args[0]; object a_73379_73915 = args[1]; object b_73380_73916 = args[2];
  Cyc_st_add(data, "srfi/128.sld:complex<?");

closureN_type c_733778;
object e_733812 [3];
c_733778.hdr.mark = gc_color_red;
 c_733778.hdr.grayed = 0;
c_733778.tag = closureN_tag;
 c_733778.fn = (function_type)__lambda_163;
c_733778.num_args = 1;
c_733778.num_elements = 3;
c_733778.elements = (object *)e_733812;
c_733778.elements[0] = a_73379_73915;
c_733778.elements[1] = b_73380_73916;
c_733778.elements[2] = k_731461;

return_direct_with_clo2(data,  __glo_real_91part_scheme_complex, (((closure)  __glo_real_91part_scheme_complex)->fn),  &c_733778, a_73379_73915);; 
}

static void __lambda_163(void *data, object self_732177, int argc, object *args) /* object self_732177, object r_731467 */
 {
 object r_731467 = args[0];
  
closureN_type c_733780;
object e_733810 [4];
c_733780.hdr.mark = gc_color_red;
 c_733780.hdr.grayed = 0;
c_733780.tag = closureN_tag;
 c_733780.fn = (function_type)__lambda_164;
c_733780.num_args = 1;
c_733780.num_elements = 4;
c_733780.elements = (object *)e_733810;
c_733780.elements[0] = ((closureN)self_732177)->elements[0];
c_733780.elements[1] = ((closureN)self_732177)->elements[1];
c_733780.elements[2] = ((closureN)self_732177)->elements[2];
c_733780.elements[3] = r_731467;

return_direct_with_clo2(data,  __glo_real_91part_scheme_complex, (((closure)  __glo_real_91part_scheme_complex)->fn),  &c_733780, ((closureN)self_732177)->elements[1]);; 
}

static void __lambda_164(void *data, object self_732178, int argc, object *args) /* object self_732178, object r_731468 */
 {
 object r_731468 = args[0];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, ((closureN)self_732178)->elements[3], r_731468)) ){ 
  
closureN_type c_733785;
object e_733795 [2];
c_733785.hdr.mark = gc_color_red;
 c_733785.hdr.grayed = 0;
c_733785.tag = closureN_tag;
 c_733785.fn = (function_type)__lambda_165;
c_733785.num_args = 1;
c_733785.num_elements = 2;
c_733785.elements = (object *)e_733795;
c_733785.elements[0] = ((closureN)self_732178)->elements[1];
c_733785.elements[1] = ((closureN)self_732178)->elements[2];

return_direct_with_clo2(data,  __glo_imag_91part_scheme_complex, (((closure)  __glo_imag_91part_scheme_complex)->fn),  &c_733785, ((closureN)self_732178)->elements[0]);
} else { 
  
closureN_type c_733798;
object e_733808 [2];
c_733798.hdr.mark = gc_color_red;
 c_733798.hdr.grayed = 0;
c_733798.tag = closureN_tag;
 c_733798.fn = (function_type)__lambda_167;
c_733798.num_args = 1;
c_733798.num_elements = 2;
c_733798.elements = (object *)e_733808;
c_733798.elements[0] = ((closureN)self_732178)->elements[1];
c_733798.elements[1] = ((closureN)self_732178)->elements[2];

return_direct_with_clo2(data,  __glo_real_91part_scheme_complex, (((closure)  __glo_real_91part_scheme_complex)->fn),  &c_733798, ((closureN)self_732178)->elements[0]);}
;; 
}

static void __lambda_167(void *data, object self_732181, int argc, object *args) /* object self_732181, object r_731465 */
 {
 object r_731465 = args[0];
  
closureN_type c_733800;
object e_733806 [2];
c_733800.hdr.mark = gc_color_red;
 c_733800.hdr.grayed = 0;
c_733800.tag = closureN_tag;
 c_733800.fn = (function_type)__lambda_168;
c_733800.num_args = 1;
c_733800.num_elements = 2;
c_733800.elements = (object *)e_733806;
c_733800.elements[0] = ((closureN)self_732181)->elements[1];
c_733800.elements[1] = r_731465;

return_direct_with_clo2(data,  __glo_real_91part_scheme_complex, (((closure)  __glo_real_91part_scheme_complex)->fn),  &c_733800, ((closureN)self_732181)->elements[0]);; 
}

static void __lambda_168(void *data, object self_732182, int argc, object *args) /* object self_732182, object r_731466 */
 {
 object r_731466 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_732182)->elements[0], (((closure)  ((closureN)self_732182)->elements[0])->fn),  Cyc_num_fast_lt_op(data, ((closureN)self_732182)->elements[1], r_731466));; 
}

static void __lambda_165(void *data, object self_732179, int argc, object *args) /* object self_732179, object r_731463 */
 {
 object r_731463 = args[0];
  
closureN_type c_733787;
object e_733793 [2];
c_733787.hdr.mark = gc_color_red;
 c_733787.hdr.grayed = 0;
c_733787.tag = closureN_tag;
 c_733787.fn = (function_type)__lambda_166;
c_733787.num_args = 1;
c_733787.num_elements = 2;
c_733787.elements = (object *)e_733793;
c_733787.elements[0] = ((closureN)self_732179)->elements[1];
c_733787.elements[1] = r_731463;

return_direct_with_clo2(data,  __glo_imag_91part_scheme_complex, (((closure)  __glo_imag_91part_scheme_complex)->fn),  &c_733787, ((closureN)self_732179)->elements[0]);; 
}

static void __lambda_166(void *data, object self_732180, int argc, object *args) /* object self_732180, object r_731464 */
 {
 object r_731464 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_732180)->elements[0], (((closure)  ((closureN)self_732180)->elements[0])->fn),  Cyc_num_fast_lt_op(data, ((closureN)self_732180)->elements[1], r_731464));; 
}

static void __lambda_150(void *data, object _, int argc, object *args) /* closure _,object k_731444, object obj_73364_73914 */
 {
object k_731444 = args[0]; object obj_73364_73914 = args[1];
  Cyc_st_add(data, "srfi/128.sld:number-hash");

closureN_type c_733703;
object e_733775 [2];
c_733703.hdr.mark = gc_color_red;
 c_733703.hdr.grayed = 0;
c_733703.tag = closureN_tag;
 c_733703.fn = (function_type)__lambda_151;
c_733703.num_args = 1;
c_733703.num_elements = 2;
c_733703.elements = (object *)e_733775;
c_733703.elements[0] = k_731444;
c_733703.elements[1] = obj_73364_73914;

return_direct_with_clo2(data,  __glo_nan_127_scheme_inexact, (((closure)  __glo_nan_127_scheme_inexact)->fn),  &c_733703, obj_73364_73914);; 
}

static void __lambda_151(void *data, object self_732166, int argc, object *args) /* object self_732166, object r_731445 */
 {
 object r_731445 = args[0];
  if( (boolean_f != r_731445) ){ 
  return_direct_with_clo1(data,  __glo__75salt_75_srfi_128, (((closure)  __glo__75salt_75_srfi_128)->fn),  ((closureN)self_732166)->elements[0]);
} else { 
  
closureN_type c_733707;
object e_733720 [1];
c_733707.hdr.mark = gc_color_red;
 c_733707.hdr.grayed = 0;
c_733707.tag = closureN_tag;
 c_733707.fn = (function_type)__lambda_152;
c_733707.num_args = 0;
c_733707.num_elements = 1;
c_733707.elements = (object *)e_733720;
c_733707.elements[0] = ((closureN)self_732166)->elements[1];


closureN_type c_733721;
object e_733774 [2];
c_733721.hdr.mark = gc_color_red;
 c_733721.hdr.grayed = 0;
c_733721.tag = closureN_tag;
 c_733721.fn = (function_type)__lambda_154;
c_733721.num_args = 1;
c_733721.num_elements = 2;
c_733721.elements = (object *)e_733774;
c_733721.elements[0] = ((closureN)self_732166)->elements[0];
c_733721.elements[1] = ((closureN)self_732166)->elements[1];

return_direct_with_clo1(data,(closure)&c_733707,__lambda_152,  &c_733721);}
;; 
}

static void __lambda_154(void *data, object self_732167, int argc, object *args) /* object self_732167, object r_731446 */
 {
 object r_731446 = args[0];
  if( (boolean_f != r_731446) ){ 
  
closureN_type c_733723;
object e_733729 [1];
c_733723.hdr.mark = gc_color_red;
 c_733723.hdr.grayed = 0;
c_733723.tag = closureN_tag;
 c_733723.fn = (function_type)__lambda_155;
c_733723.num_args = 1;
c_733723.num_elements = 1;
c_733723.elements = (object *)e_733729;
c_733723.elements[0] = ((closureN)self_732167)->elements[0];

return_direct_with_clo1(data,  __glo__75salt_75_srfi_128, (((closure)  __glo__75salt_75_srfi_128)->fn),  &c_733723);
} else { 
  
closureN_type c_733731;
object e_733772 [2];
c_733731.hdr.mark = gc_color_red;
 c_733731.hdr.grayed = 0;
c_733731.tag = closureN_tag;
 c_733731.fn = (function_type)__lambda_156;
c_733731.num_args = 1;
c_733731.num_elements = 2;
c_733731.elements = (object *)e_733772;
c_733731.elements[0] = ((closureN)self_732167)->elements[0];
c_733731.elements[1] = ((closureN)self_732167)->elements[1];

return_direct_with_clo2(data,  __glo_infinite_127_scheme_inexact, (((closure)  __glo_infinite_127_scheme_inexact)->fn),  &c_733731, ((closureN)self_732167)->elements[1]);}
;; 
}

static void __lambda_156(void *data, object self_732169, int argc, object *args) /* object self_732169, object r_731448 */
 {
 object r_731448 = args[0];
  if( (boolean_f != r_731448) ){ 
  
closureN_type c_733733;
object e_733739 [1];
c_733733.hdr.mark = gc_color_red;
 c_733733.hdr.grayed = 0;
c_733733.tag = closureN_tag;
 c_733733.fn = (function_type)__lambda_157;
c_733733.num_args = 1;
c_733733.num_elements = 1;
c_733733.elements = (object *)e_733739;
c_733733.elements[0] = ((closureN)self_732169)->elements[0];

return_direct_with_clo1(data,  __glo__75salt_75_srfi_128, (((closure)  __glo__75salt_75_srfi_128)->fn),  &c_733733);
} else { 
    
if( (boolean_f != Cyc_is_real(((closureN)self_732169)->elements[1])) ){ 
  
complex_num_type local_733747; 

complex_num_type local_733750; 
return_direct_with_clo2(data,  __glo_abs_scheme_base, (((closure)  __glo_abs_scheme_base)->fn),  ((closureN)self_732169)->elements[0], ((inline_function_type)
                   ((closure)__glo_exact_191_191inline_191_191_scheme_base)->fn)(data,&local_733747, ((inline_function_type)
                   ((closure)__glo_round_191_191inline_191_191_scheme_base)->fn)(data,&local_733750, ((closureN)self_732169)->elements[1])));
} else { 
  
closureN_type c_733753;
object e_733770 [2];
c_733753.hdr.mark = gc_color_red;
 c_733753.hdr.grayed = 0;
c_733753.tag = closureN_tag;
 c_733753.fn = (function_type)__lambda_158;
c_733753.num_args = 1;
c_733753.num_elements = 2;
c_733753.elements = (object *)e_733770;
c_733753.elements[0] = ((closureN)self_732169)->elements[0];
c_733753.elements[1] = ((closureN)self_732169)->elements[1];

return_direct_with_clo2(data,  __glo_real_91part_scheme_complex, (((closure)  __glo_real_91part_scheme_complex)->fn),  &c_733753, ((closureN)self_732169)->elements[1]);}
;}
;; 
}

static void __lambda_158(void *data, object self_732171, int argc, object *args) /* object self_732171, object r_731456 */
 {
 object r_731456 = args[0];
  
closureN_type c_733755;
object e_733769 [2];
c_733755.hdr.mark = gc_color_red;
 c_733755.hdr.grayed = 0;
c_733755.tag = closureN_tag;
 c_733755.fn = (function_type)__lambda_159;
c_733755.num_args = 1;
c_733755.num_elements = 2;
c_733755.elements = (object *)e_733769;
c_733755.elements[0] = ((closureN)self_732171)->elements[0];
c_733755.elements[1] = ((closureN)self_732171)->elements[1];

return_direct_with_clo2(data,  __glo_number_91hash_srfi_128, (((closure)  __glo_number_91hash_srfi_128)->fn),  &c_733755, r_731456);; 
}

static void __lambda_159(void *data, object self_732172, int argc, object *args) /* object self_732172, object r_731453 */
 {
 object r_731453 = args[0];
  
closureN_type c_733757;
object e_733767 [2];
c_733757.hdr.mark = gc_color_red;
 c_733757.hdr.grayed = 0;
c_733757.tag = closureN_tag;
 c_733757.fn = (function_type)__lambda_160;
c_733757.num_args = 1;
c_733757.num_elements = 2;
c_733757.elements = (object *)e_733767;
c_733757.elements[0] = ((closureN)self_732172)->elements[0];
c_733757.elements[1] = r_731453;

return_direct_with_clo2(data,  __glo_imag_91part_scheme_complex, (((closure)  __glo_imag_91part_scheme_complex)->fn),  &c_733757, ((closureN)self_732172)->elements[1]);; 
}

static void __lambda_160(void *data, object self_732173, int argc, object *args) /* object self_732173, object r_731455 */
 {
 object r_731455 = args[0];
  
closureN_type c_733759;
object e_733766 [2];
c_733759.hdr.mark = gc_color_red;
 c_733759.hdr.grayed = 0;
c_733759.tag = closureN_tag;
 c_733759.fn = (function_type)__lambda_161;
c_733759.num_args = 1;
c_733759.num_elements = 2;
c_733759.elements = (object *)e_733766;
c_733759.elements[0] = ((closureN)self_732173)->elements[0];
c_733759.elements[1] = ((closureN)self_732173)->elements[1];

return_direct_with_clo2(data,  __glo_number_91hash_srfi_128, (((closure)  __glo_number_91hash_srfi_128)->fn),  &c_733759, r_731455);; 
}

static void __lambda_161(void *data, object self_732174, int argc, object *args) /* object self_732174, object r_731454 */
 {
 object r_731454 = args[0];
  
complex_num_type local_733764; 
return_direct_with_clo1(data,  ((closureN)self_732174)->elements[0], (((closure)  ((closureN)self_732174)->elements[0])->fn),  Cyc_fast_sum(data,&local_733764, ((closureN)self_732174)->elements[1], r_731454));; 
}

static void __lambda_157(void *data, object self_732170, int argc, object *args) /* object self_732170, object r_731449 */
 {
 object r_731449 = args[0];
  
complex_num_type local_733738; 
return_direct_with_clo1(data,  ((closureN)self_732170)->elements[0], (((closure)  ((closureN)self_732170)->elements[0])->fn),  Cyc_fast_mul(data,&local_733738, r_731449, obj_int2obj(3)));; 
}

static void __lambda_155(void *data, object self_732168, int argc, object *args) /* object self_732168, object r_731447 */
 {
 object r_731447 = args[0];
  
complex_num_type local_733728; 
return_direct_with_clo1(data,  ((closureN)self_732168)->elements[0], (((closure)  ((closureN)self_732168)->elements[0])->fn),  Cyc_fast_mul(data,&local_733728, obj_int2obj(2), r_731447));; 
}

static void __lambda_152(void *data, object self_732175, int argc, object *args) /* object self_732175, object k_731457 */
 {
 object k_731457 = args[0];
  
closureN_type c_733709;
object e_733718 [2];
c_733709.hdr.mark = gc_color_red;
 c_733709.hdr.grayed = 0;
c_733709.tag = closureN_tag;
 c_733709.fn = (function_type)__lambda_153;
c_733709.num_args = 1;
c_733709.num_elements = 2;
c_733709.elements = (object *)e_733718;
c_733709.elements[0] = k_731457;
c_733709.elements[1] = ((closureN)self_732175)->elements[0];

return_direct_with_clo2(data,  __glo_infinite_127_scheme_inexact, (((closure)  __glo_infinite_127_scheme_inexact)->fn),  &c_733709, ((closureN)self_732175)->elements[0]);; 
}

static void __lambda_153(void *data, object self_732176, int argc, object *args) /* object self_732176, object r_731458 */
 {
 object r_731458 = args[0];
  if( (boolean_f != r_731458) ){ 
  
complex_num_type local_733714; 
return_direct_with_clo1(data,  ((closureN)self_732176)->elements[0], (((closure)  ((closureN)self_732176)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_positive_127_191_191inline_191_191_scheme_base)->fn)(data,&local_733714, ((closureN)self_732176)->elements[1]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732176)->elements[0], (((closure)  ((closureN)self_732176)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_147(void *data, object _, int argc, object *args) /* closure _,object k_731437, object obj_73358_73913 */
 {
object k_731437 = args[0]; object obj_73358_73913 = args[1];
  Cyc_st_add(data, "srfi/128.sld:char-ci-hash");

closureN_type c_733687;
object e_733700 [2];
c_733687.hdr.mark = gc_color_red;
 c_733687.hdr.grayed = 0;
c_733687.tag = closureN_tag;
 c_733687.fn = (function_type)__lambda_148;
c_733687.num_args = 1;
c_733687.num_elements = 2;
c_733687.elements = (object *)e_733700;
c_733687.elements[0] = k_731437;
c_733687.elements[1] = obj_73358_73913;

return_direct_with_clo1(data,  __glo__75salt_75_srfi_128, (((closure)  __glo__75salt_75_srfi_128)->fn),  &c_733687);; 
}

static void __lambda_148(void *data, object self_732164, int argc, object *args) /* object self_732164, object r_731439 */
 {
 object r_731439 = args[0];
  
closureN_type c_733689;
object e_733698 [2];
c_733689.hdr.mark = gc_color_red;
 c_733689.hdr.grayed = 0;
c_733689.tag = closureN_tag;
 c_733689.fn = (function_type)__lambda_149;
c_733689.num_args = 1;
c_733689.num_elements = 2;
c_733689.elements = (object *)e_733698;
c_733689.elements[0] = ((closureN)self_732164)->elements[0];
c_733689.elements[1] = r_731439;

return_direct_with_clo2(data,  __glo_char_91foldcase_scheme__char, (((closure)  __glo_char_91foldcase_scheme__char)->fn),  &c_733689, ((closureN)self_732164)->elements[1]);; 
}

static void __lambda_149(void *data, object self_732165, int argc, object *args) /* object self_732165, object r_731441 */
 {
 object r_731441 = args[0];
  
complex_num_type local_733694; 


return_direct_with_clo3(data,  __glo_modulo_scheme_base, (((closure)  __glo_modulo_scheme_base)->fn),  ((closureN)self_732165)->elements[0], Cyc_fast_mul(data,&local_733694, ((closureN)self_732165)->elements[1], Cyc_char2integer(r_731441)), obj_int2obj(33554432));; 
}

static void __lambda_145(void *data, object _, int argc, object *args) /* closure _,object k_731431, object obj_73352_73912 */
 {
object k_731431 = args[0]; object obj_73352_73912 = args[1];
  Cyc_st_add(data, "srfi/128.sld:char-hash");

closureN_type c_733675;
object e_733684 [2];
c_733675.hdr.mark = gc_color_red;
 c_733675.hdr.grayed = 0;
c_733675.tag = closureN_tag;
 c_733675.fn = (function_type)__lambda_146;
c_733675.num_args = 1;
c_733675.num_elements = 2;
c_733675.elements = (object *)e_733684;
c_733675.elements[0] = k_731431;
c_733675.elements[1] = obj_73352_73912;

return_direct_with_clo1(data,  __glo__75salt_75_srfi_128, (((closure)  __glo__75salt_75_srfi_128)->fn),  &c_733675);; 
}

static void __lambda_146(void *data, object self_732163, int argc, object *args) /* object self_732163, object r_731433 */
 {
 object r_731433 = args[0];
  
complex_num_type local_733680; 


return_direct_with_clo3(data,  __glo_modulo_scheme_base, (((closure)  __glo_modulo_scheme_base)->fn),  ((closureN)self_732163)->elements[0], Cyc_fast_mul(data,&local_733680, r_731433, Cyc_char2integer(((closureN)self_732163)->elements[1])), obj_int2obj(33554432));; 
}

static void __lambda_144(void *data, object _, int argc, object *args) /* closure _,object k_731428, object obj_73351_73911 */
 {
object k_731428 = args[0]; object obj_73351_73911 = args[1];
  Cyc_st_add(data, "srfi/128.sld:boolean-hash");
if( (boolean_f != obj_73351_73911) ){ 
  return_direct_with_clo1(data,  __glo__75salt_75_srfi_128, (((closure)  __glo__75salt_75_srfi_128)->fn),  k_731428);
} else { 
  return_direct_with_clo1(data,  k_731428, (((closure)  k_731428)->fn),  obj_int2obj(0));}
;; 
}

static object __lambda_522(void *data, object ptr,object a_73348_73909, object b_73349_73910) {

  Cyc_st_add(data, "srfi/128.sld:boolean<?");
if( (boolean_f != a_73348_73909) ){ 
  return_copy(ptr,  boolean_f);
} else { 
  return_copy(ptr,  b_73349_73910);}
;; 
}

static void __lambda_143(void *data, object _, int argc, object *args) /* closure _,object k_731425, object a_73348_73909, object b_73349_73910 */
 {
object k_731425 = args[0]; object a_73348_73909 = args[1]; object b_73349_73910 = args[2];
  Cyc_st_add(data, "srfi/128.sld:boolean<?");
if( (boolean_f != a_73348_73909) ){ 
  return_direct_with_clo1(data,  k_731425, (((closure)  k_731425)->fn),  boolean_f);
} else { 
  return_direct_with_clo1(data,  k_731425, (((closure)  k_731425)->fn),  b_73349_73910);}
;; 
}

static void __lambda_136(void *data, object _, int argc, object *args) /* closure _,object k_731415, object comparator_73335_73898, object a_73336_73899, object b_73337_73900, object objs_73338_73901_raw, ... */
 {
object k_731415 = args[0]; object comparator_73335_73898 = args[1]; object a_73336_73899 = args[2]; object b_73337_73900 = args[3];
load_varargs(objs_73338_73901, args, 4, argc - 4);
  Cyc_st_add(data, "srfi/128.sld:>=?");

closureN_type c_733611;
object e_733663 [2];
c_733611.hdr.mark = gc_color_red;
 c_733611.hdr.grayed = 0;
c_733611.tag = closureN_tag;
 c_733611.fn = (function_type)__lambda_137;
c_733611.num_args = 3;
c_733611.num_elements = 2;
c_733611.elements = (object *)e_733663;
c_733611.elements[0] = comparator_73335_73898;
c_733611.elements[1] = k_731415;

return_direct_with_clo3(data,(closure)&c_733611,__lambda_137,  a_73336_73899, b_73337_73900, objs_73338_73901);; 
}

static void __lambda_137(void *data, object self_732156, int argc, object *args) /* object self_732156, object a_73340_73902, object b_73341_73903, object objs_73342_73904 */
 {
 object a_73340_73902 = args[0]; object b_73341_73903 = args[1]; object objs_73342_73904 = args[2];
  
closureN_type c_733613;
object e_733662 [5];
c_733613.hdr.mark = gc_color_red;
 c_733613.hdr.grayed = 0;
c_733613.tag = closureN_tag;
 c_733613.fn = (function_type)__lambda_138;
c_733613.num_args = 1;
c_733613.num_elements = 5;
c_733613.elements = (object *)e_733662;
c_733613.elements[0] = a_73340_73902;
c_733613.elements[1] = b_73341_73903;
c_733613.elements[2] = ((closureN)self_732156)->elements[0];
c_733613.elements[3] = ((closureN)self_732156)->elements[1];
c_733613.elements[4] = objs_73342_73904;

return_direct_with_clo1(data,(closure)&c_733613,__lambda_138,  boolean_f);; 
}

static void __lambda_138(void *data, object self_732157, int argc, object *args) /* object self_732157, object loop_73343_73905 */
 {
 object loop_73343_73905 = args[0];
  
closureN_type c_733615;
object e_733658 [5];
c_733615.hdr.mark = gc_color_red;
 c_733615.hdr.grayed = 0;
c_733615.tag = closureN_tag;
 c_733615.fn = (function_type)__lambda_508;
c_733615.num_args = 1;
c_733615.num_elements = 5;
c_733615.elements = (object *)e_733658;
c_733615.elements[0] = ((closureN)self_732157)->elements[0];
c_733615.elements[1] = ((closureN)self_732157)->elements[1];
c_733615.elements[2] = ((closureN)self_732157)->elements[2];
c_733615.elements[3] = ((closureN)self_732157)->elements[3];
c_733615.elements[4] = ((closureN)self_732157)->elements[4];


pair_type local_733661; 
return_direct_with_clo1(data,(closure)&c_733615,__lambda_508,  set_cell_as_expr(&local_733661, loop_73343_73905));; 
}

static void __lambda_508(void *data, object self_732158, int argc, object *args) /* object self_732158, object loop_73343_73905 */
 {
 object loop_73343_73905 = args[0];
  
closureN_type c_733617;
object e_733632 [5];
c_733617.hdr.mark = gc_color_red;
 c_733617.hdr.grayed = 0;
c_733617.tag = closureN_tag;
 c_733617.fn = (function_type)__lambda_139;
c_733617.num_args = 1;
c_733617.num_elements = 5;
c_733617.elements = (object *)e_733632;
c_733617.elements[0] = ((closureN)self_732158)->elements[0];
c_733617.elements[1] = ((closureN)self_732158)->elements[1];
c_733617.elements[2] = ((closureN)self_732158)->elements[3];
c_733617.elements[3] = loop_73343_73905;
c_733617.elements[4] = ((closureN)self_732158)->elements[4];


closureN_type c_733633;
object e_733657 [2];
c_733633.hdr.mark = gc_color_red;
 c_733633.hdr.grayed = 0;
c_733633.tag = closureN_tag;
 c_733633.fn = (function_type)__lambda_141;
c_733633.num_args = 3;
c_733633.num_elements = 2;
c_733633.elements = (object *)e_733657;
c_733633.elements[0] = ((closureN)self_732158)->elements[2];
c_733633.elements[1] = loop_73343_73905;

return_direct_with_clo1(data,(closure)&c_733617,__lambda_139,  &c_733633);; 
}

static void __lambda_141(void *data, object self_732159, int argc, object *args) /* object self_732159, object k_731418, object a_73344_73906, object b_73345_73907, object objs_73346_73908 */
 {
 object k_731418 = args[0]; object a_73344_73906 = args[1]; object b_73345_73907 = args[2]; object objs_73346_73908 = args[3];
  
closureN_type c_733635;
object e_733655 [4];
c_733635.hdr.mark = gc_color_red;
 c_733635.hdr.grayed = 0;
c_733635.tag = closureN_tag;
 c_733635.fn = (function_type)__lambda_142;
c_733635.num_args = 1;
c_733635.num_elements = 4;
c_733635.elements = (object *)e_733655;
c_733635.elements[0] = b_73345_73907;
c_733635.elements[1] = k_731418;
c_733635.elements[2] = ((closureN)self_732159)->elements[1];
c_733635.elements[3] = objs_73346_73908;

return_direct_with_clo4(data,  __glo_binary_125_123_127_srfi_128, (((closure)  __glo_binary_125_123_127_srfi_128)->fn),  &c_733635, ((closureN)self_732159)->elements[0], a_73344_73906, b_73345_73907);; 
}

static void __lambda_142(void *data, object self_732160, int argc, object *args) /* object self_732160, object r_731419 */
 {
 object r_731419 = args[0];
  if( (boolean_f != r_731419) ){ 
    
if( (boolean_f != Cyc_is_null(((closureN)self_732160)->elements[3])) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732160)->elements[1], (((closure)  ((closureN)self_732160)->elements[1])->fn),  boolean_t);
} else { 
  





return_closcall4(data,  car(((closureN)self_732160)->elements[2]),  ((closureN)self_732160)->elements[1], ((closureN)self_732160)->elements[0], Cyc_car(data, ((closureN)self_732160)->elements[3]), Cyc_cdr(data, ((closureN)self_732160)->elements[3]));}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732160)->elements[1], (((closure)  ((closureN)self_732160)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_139(void *data, object self_732161, int argc, object *args) /* object self_732161, object r_731417 */
 {
 object r_731417 = args[0];
  
closureN_type c_733619;
object e_733628 [5];
c_733619.hdr.mark = gc_color_red;
 c_733619.hdr.grayed = 0;
c_733619.tag = closureN_tag;
 c_733619.fn = (function_type)__lambda_140;
c_733619.num_args = 1;
c_733619.num_elements = 5;
c_733619.elements = (object *)e_733628;
c_733619.elements[0] = ((closureN)self_732161)->elements[0];
c_733619.elements[1] = ((closureN)self_732161)->elements[1];
c_733619.elements[2] = ((closureN)self_732161)->elements[2];
c_733619.elements[3] = ((closureN)self_732161)->elements[3];
c_733619.elements[4] = ((closureN)self_732161)->elements[4];



return_direct_with_clo1(data,(closure)&c_733619,__lambda_140,  Cyc_set_cell(data, ((closureN)self_732161)->elements[3], r_731417));; 
}

static void __lambda_140(void *data, object self_732162, int argc, object *args) /* object self_732162, object r_731416 */
 {

  

return_closcall4(data,  car(((closureN)self_732162)->elements[3]),  ((closureN)self_732162)->elements[2], ((closureN)self_732162)->elements[0], ((closureN)self_732162)->elements[1], ((closureN)self_732162)->elements[4]);; 
}

static void __lambda_129(void *data, object _, int argc, object *args) /* closure _,object k_731405, object comparator_73322_73887, object a_73323_73888, object b_73324_73889, object objs_73325_73890_raw, ... */
 {
object k_731405 = args[0]; object comparator_73322_73887 = args[1]; object a_73323_73888 = args[2]; object b_73324_73889 = args[3];
load_varargs(objs_73325_73890, args, 4, argc - 4);
  Cyc_st_add(data, "srfi/128.sld:<=?");

closureN_type c_733556;
object e_733608 [2];
c_733556.hdr.mark = gc_color_red;
 c_733556.hdr.grayed = 0;
c_733556.tag = closureN_tag;
 c_733556.fn = (function_type)__lambda_130;
c_733556.num_args = 3;
c_733556.num_elements = 2;
c_733556.elements = (object *)e_733608;
c_733556.elements[0] = comparator_73322_73887;
c_733556.elements[1] = k_731405;

return_direct_with_clo3(data,(closure)&c_733556,__lambda_130,  a_73323_73888, b_73324_73889, objs_73325_73890);; 
}

static void __lambda_130(void *data, object self_732149, int argc, object *args) /* object self_732149, object a_73327_73891, object b_73328_73892, object objs_73329_73893 */
 {
 object a_73327_73891 = args[0]; object b_73328_73892 = args[1]; object objs_73329_73893 = args[2];
  
closureN_type c_733558;
object e_733607 [5];
c_733558.hdr.mark = gc_color_red;
 c_733558.hdr.grayed = 0;
c_733558.tag = closureN_tag;
 c_733558.fn = (function_type)__lambda_131;
c_733558.num_args = 1;
c_733558.num_elements = 5;
c_733558.elements = (object *)e_733607;
c_733558.elements[0] = a_73327_73891;
c_733558.elements[1] = b_73328_73892;
c_733558.elements[2] = ((closureN)self_732149)->elements[0];
c_733558.elements[3] = ((closureN)self_732149)->elements[1];
c_733558.elements[4] = objs_73329_73893;

return_direct_with_clo1(data,(closure)&c_733558,__lambda_131,  boolean_f);; 
}

static void __lambda_131(void *data, object self_732150, int argc, object *args) /* object self_732150, object loop_73330_73894 */
 {
 object loop_73330_73894 = args[0];
  
closureN_type c_733560;
object e_733603 [5];
c_733560.hdr.mark = gc_color_red;
 c_733560.hdr.grayed = 0;
c_733560.tag = closureN_tag;
 c_733560.fn = (function_type)__lambda_507;
c_733560.num_args = 1;
c_733560.num_elements = 5;
c_733560.elements = (object *)e_733603;
c_733560.elements[0] = ((closureN)self_732150)->elements[0];
c_733560.elements[1] = ((closureN)self_732150)->elements[1];
c_733560.elements[2] = ((closureN)self_732150)->elements[2];
c_733560.elements[3] = ((closureN)self_732150)->elements[3];
c_733560.elements[4] = ((closureN)self_732150)->elements[4];


pair_type local_733606; 
return_direct_with_clo1(data,(closure)&c_733560,__lambda_507,  set_cell_as_expr(&local_733606, loop_73330_73894));; 
}

static void __lambda_507(void *data, object self_732151, int argc, object *args) /* object self_732151, object loop_73330_73894 */
 {
 object loop_73330_73894 = args[0];
  
closureN_type c_733562;
object e_733577 [5];
c_733562.hdr.mark = gc_color_red;
 c_733562.hdr.grayed = 0;
c_733562.tag = closureN_tag;
 c_733562.fn = (function_type)__lambda_132;
c_733562.num_args = 1;
c_733562.num_elements = 5;
c_733562.elements = (object *)e_733577;
c_733562.elements[0] = ((closureN)self_732151)->elements[0];
c_733562.elements[1] = ((closureN)self_732151)->elements[1];
c_733562.elements[2] = ((closureN)self_732151)->elements[3];
c_733562.elements[3] = loop_73330_73894;
c_733562.elements[4] = ((closureN)self_732151)->elements[4];


closureN_type c_733578;
object e_733602 [2];
c_733578.hdr.mark = gc_color_red;
 c_733578.hdr.grayed = 0;
c_733578.tag = closureN_tag;
 c_733578.fn = (function_type)__lambda_134;
c_733578.num_args = 3;
c_733578.num_elements = 2;
c_733578.elements = (object *)e_733602;
c_733578.elements[0] = ((closureN)self_732151)->elements[2];
c_733578.elements[1] = loop_73330_73894;

return_direct_with_clo1(data,(closure)&c_733562,__lambda_132,  &c_733578);; 
}

static void __lambda_134(void *data, object self_732152, int argc, object *args) /* object self_732152, object k_731408, object a_73331_73895, object b_73332_73896, object objs_73333_73897 */
 {
 object k_731408 = args[0]; object a_73331_73895 = args[1]; object b_73332_73896 = args[2]; object objs_73333_73897 = args[3];
  
closureN_type c_733580;
object e_733600 [4];
c_733580.hdr.mark = gc_color_red;
 c_733580.hdr.grayed = 0;
c_733580.tag = closureN_tag;
 c_733580.fn = (function_type)__lambda_135;
c_733580.num_args = 1;
c_733580.num_elements = 4;
c_733580.elements = (object *)e_733600;
c_733580.elements[0] = b_73332_73896;
c_733580.elements[1] = k_731408;
c_733580.elements[2] = ((closureN)self_732152)->elements[1];
c_733580.elements[3] = objs_73333_73897;

return_direct_with_clo4(data,  __glo_binary_121_123_127_srfi_128, (((closure)  __glo_binary_121_123_127_srfi_128)->fn),  &c_733580, ((closureN)self_732152)->elements[0], a_73331_73895, b_73332_73896);; 
}

static void __lambda_135(void *data, object self_732153, int argc, object *args) /* object self_732153, object r_731409 */
 {
 object r_731409 = args[0];
  if( (boolean_f != r_731409) ){ 
    
if( (boolean_f != Cyc_is_null(((closureN)self_732153)->elements[3])) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732153)->elements[1], (((closure)  ((closureN)self_732153)->elements[1])->fn),  boolean_t);
} else { 
  





return_closcall4(data,  car(((closureN)self_732153)->elements[2]),  ((closureN)self_732153)->elements[1], ((closureN)self_732153)->elements[0], Cyc_car(data, ((closureN)self_732153)->elements[3]), Cyc_cdr(data, ((closureN)self_732153)->elements[3]));}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732153)->elements[1], (((closure)  ((closureN)self_732153)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_132(void *data, object self_732154, int argc, object *args) /* object self_732154, object r_731407 */
 {
 object r_731407 = args[0];
  
closureN_type c_733564;
object e_733573 [5];
c_733564.hdr.mark = gc_color_red;
 c_733564.hdr.grayed = 0;
c_733564.tag = closureN_tag;
 c_733564.fn = (function_type)__lambda_133;
c_733564.num_args = 1;
c_733564.num_elements = 5;
c_733564.elements = (object *)e_733573;
c_733564.elements[0] = ((closureN)self_732154)->elements[0];
c_733564.elements[1] = ((closureN)self_732154)->elements[1];
c_733564.elements[2] = ((closureN)self_732154)->elements[2];
c_733564.elements[3] = ((closureN)self_732154)->elements[3];
c_733564.elements[4] = ((closureN)self_732154)->elements[4];



return_direct_with_clo1(data,(closure)&c_733564,__lambda_133,  Cyc_set_cell(data, ((closureN)self_732154)->elements[3], r_731407));; 
}

static void __lambda_133(void *data, object self_732155, int argc, object *args) /* object self_732155, object r_731406 */
 {

  

return_closcall4(data,  car(((closureN)self_732155)->elements[3]),  ((closureN)self_732155)->elements[2], ((closureN)self_732155)->elements[0], ((closureN)self_732155)->elements[1], ((closureN)self_732155)->elements[4]);; 
}

static void __lambda_122(void *data, object _, int argc, object *args) /* closure _,object k_731395, object comparator_73309_73876, object a_73310_73877, object b_73311_73878, object objs_73312_73879_raw, ... */
 {
object k_731395 = args[0]; object comparator_73309_73876 = args[1]; object a_73310_73877 = args[2]; object b_73311_73878 = args[3];
load_varargs(objs_73312_73879, args, 4, argc - 4);
  Cyc_st_add(data, "srfi/128.sld:>?");

closureN_type c_733501;
object e_733553 [2];
c_733501.hdr.mark = gc_color_red;
 c_733501.hdr.grayed = 0;
c_733501.tag = closureN_tag;
 c_733501.fn = (function_type)__lambda_123;
c_733501.num_args = 3;
c_733501.num_elements = 2;
c_733501.elements = (object *)e_733553;
c_733501.elements[0] = comparator_73309_73876;
c_733501.elements[1] = k_731395;

return_direct_with_clo3(data,(closure)&c_733501,__lambda_123,  a_73310_73877, b_73311_73878, objs_73312_73879);; 
}

static void __lambda_123(void *data, object self_732142, int argc, object *args) /* object self_732142, object a_73314_73880, object b_73315_73881, object objs_73316_73882 */
 {
 object a_73314_73880 = args[0]; object b_73315_73881 = args[1]; object objs_73316_73882 = args[2];
  
closureN_type c_733503;
object e_733552 [5];
c_733503.hdr.mark = gc_color_red;
 c_733503.hdr.grayed = 0;
c_733503.tag = closureN_tag;
 c_733503.fn = (function_type)__lambda_124;
c_733503.num_args = 1;
c_733503.num_elements = 5;
c_733503.elements = (object *)e_733552;
c_733503.elements[0] = a_73314_73880;
c_733503.elements[1] = b_73315_73881;
c_733503.elements[2] = ((closureN)self_732142)->elements[0];
c_733503.elements[3] = ((closureN)self_732142)->elements[1];
c_733503.elements[4] = objs_73316_73882;

return_direct_with_clo1(data,(closure)&c_733503,__lambda_124,  boolean_f);; 
}

static void __lambda_124(void *data, object self_732143, int argc, object *args) /* object self_732143, object loop_73317_73883 */
 {
 object loop_73317_73883 = args[0];
  
closureN_type c_733505;
object e_733548 [5];
c_733505.hdr.mark = gc_color_red;
 c_733505.hdr.grayed = 0;
c_733505.tag = closureN_tag;
 c_733505.fn = (function_type)__lambda_506;
c_733505.num_args = 1;
c_733505.num_elements = 5;
c_733505.elements = (object *)e_733548;
c_733505.elements[0] = ((closureN)self_732143)->elements[0];
c_733505.elements[1] = ((closureN)self_732143)->elements[1];
c_733505.elements[2] = ((closureN)self_732143)->elements[2];
c_733505.elements[3] = ((closureN)self_732143)->elements[3];
c_733505.elements[4] = ((closureN)self_732143)->elements[4];


pair_type local_733551; 
return_direct_with_clo1(data,(closure)&c_733505,__lambda_506,  set_cell_as_expr(&local_733551, loop_73317_73883));; 
}

static void __lambda_506(void *data, object self_732144, int argc, object *args) /* object self_732144, object loop_73317_73883 */
 {
 object loop_73317_73883 = args[0];
  
closureN_type c_733507;
object e_733522 [5];
c_733507.hdr.mark = gc_color_red;
 c_733507.hdr.grayed = 0;
c_733507.tag = closureN_tag;
 c_733507.fn = (function_type)__lambda_125;
c_733507.num_args = 1;
c_733507.num_elements = 5;
c_733507.elements = (object *)e_733522;
c_733507.elements[0] = ((closureN)self_732144)->elements[0];
c_733507.elements[1] = ((closureN)self_732144)->elements[1];
c_733507.elements[2] = ((closureN)self_732144)->elements[3];
c_733507.elements[3] = loop_73317_73883;
c_733507.elements[4] = ((closureN)self_732144)->elements[4];


closureN_type c_733523;
object e_733547 [2];
c_733523.hdr.mark = gc_color_red;
 c_733523.hdr.grayed = 0;
c_733523.tag = closureN_tag;
 c_733523.fn = (function_type)__lambda_127;
c_733523.num_args = 3;
c_733523.num_elements = 2;
c_733523.elements = (object *)e_733547;
c_733523.elements[0] = ((closureN)self_732144)->elements[2];
c_733523.elements[1] = loop_73317_73883;

return_direct_with_clo1(data,(closure)&c_733507,__lambda_125,  &c_733523);; 
}

static void __lambda_127(void *data, object self_732145, int argc, object *args) /* object self_732145, object k_731398, object a_73318_73884, object b_73319_73885, object objs_73320_73886 */
 {
 object k_731398 = args[0]; object a_73318_73884 = args[1]; object b_73319_73885 = args[2]; object objs_73320_73886 = args[3];
  
closureN_type c_733525;
object e_733545 [4];
c_733525.hdr.mark = gc_color_red;
 c_733525.hdr.grayed = 0;
c_733525.tag = closureN_tag;
 c_733525.fn = (function_type)__lambda_128;
c_733525.num_args = 1;
c_733525.num_elements = 4;
c_733525.elements = (object *)e_733545;
c_733525.elements[0] = b_73319_73885;
c_733525.elements[1] = k_731398;
c_733525.elements[2] = ((closureN)self_732145)->elements[1];
c_733525.elements[3] = objs_73320_73886;

return_direct_with_clo4(data,  __glo_binary_121_127_srfi_128, (((closure)  __glo_binary_121_127_srfi_128)->fn),  &c_733525, ((closureN)self_732145)->elements[0], b_73319_73885, a_73318_73884);; 
}

static void __lambda_128(void *data, object self_732146, int argc, object *args) /* object self_732146, object r_731399_732031 */
 {
 object r_731399_732031 = args[0];
  if( (boolean_f != r_731399_732031) ){ 
    
if( (boolean_f != Cyc_is_null(((closureN)self_732146)->elements[3])) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732146)->elements[1], (((closure)  ((closureN)self_732146)->elements[1])->fn),  boolean_t);
} else { 
  





return_closcall4(data,  car(((closureN)self_732146)->elements[2]),  ((closureN)self_732146)->elements[1], ((closureN)self_732146)->elements[0], Cyc_car(data, ((closureN)self_732146)->elements[3]), Cyc_cdr(data, ((closureN)self_732146)->elements[3]));}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732146)->elements[1], (((closure)  ((closureN)self_732146)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_125(void *data, object self_732147, int argc, object *args) /* object self_732147, object r_731397 */
 {
 object r_731397 = args[0];
  
closureN_type c_733509;
object e_733518 [5];
c_733509.hdr.mark = gc_color_red;
 c_733509.hdr.grayed = 0;
c_733509.tag = closureN_tag;
 c_733509.fn = (function_type)__lambda_126;
c_733509.num_args = 1;
c_733509.num_elements = 5;
c_733509.elements = (object *)e_733518;
c_733509.elements[0] = ((closureN)self_732147)->elements[0];
c_733509.elements[1] = ((closureN)self_732147)->elements[1];
c_733509.elements[2] = ((closureN)self_732147)->elements[2];
c_733509.elements[3] = ((closureN)self_732147)->elements[3];
c_733509.elements[4] = ((closureN)self_732147)->elements[4];



return_direct_with_clo1(data,(closure)&c_733509,__lambda_126,  Cyc_set_cell(data, ((closureN)self_732147)->elements[3], r_731397));; 
}

static void __lambda_126(void *data, object self_732148, int argc, object *args) /* object self_732148, object r_731396 */
 {

  

return_closcall4(data,  car(((closureN)self_732148)->elements[3]),  ((closureN)self_732148)->elements[2], ((closureN)self_732148)->elements[0], ((closureN)self_732148)->elements[1], ((closureN)self_732148)->elements[4]);; 
}

static void __lambda_115(void *data, object _, int argc, object *args) /* closure _,object k_731385, object comparator_73296_73865, object a_73297_73866, object b_73298_73867, object objs_73299_73868_raw, ... */
 {
object k_731385 = args[0]; object comparator_73296_73865 = args[1]; object a_73297_73866 = args[2]; object b_73298_73867 = args[3];
load_varargs(objs_73299_73868, args, 4, argc - 4);
  Cyc_st_add(data, "srfi/128.sld:<?");

closureN_type c_733446;
object e_733498 [2];
c_733446.hdr.mark = gc_color_red;
 c_733446.hdr.grayed = 0;
c_733446.tag = closureN_tag;
 c_733446.fn = (function_type)__lambda_116;
c_733446.num_args = 3;
c_733446.num_elements = 2;
c_733446.elements = (object *)e_733498;
c_733446.elements[0] = comparator_73296_73865;
c_733446.elements[1] = k_731385;

return_direct_with_clo3(data,(closure)&c_733446,__lambda_116,  a_73297_73866, b_73298_73867, objs_73299_73868);; 
}

static void __lambda_116(void *data, object self_732135, int argc, object *args) /* object self_732135, object a_73301_73869, object b_73302_73870, object objs_73303_73871 */
 {
 object a_73301_73869 = args[0]; object b_73302_73870 = args[1]; object objs_73303_73871 = args[2];
  
closureN_type c_733448;
object e_733497 [5];
c_733448.hdr.mark = gc_color_red;
 c_733448.hdr.grayed = 0;
c_733448.tag = closureN_tag;
 c_733448.fn = (function_type)__lambda_117;
c_733448.num_args = 1;
c_733448.num_elements = 5;
c_733448.elements = (object *)e_733497;
c_733448.elements[0] = a_73301_73869;
c_733448.elements[1] = b_73302_73870;
c_733448.elements[2] = ((closureN)self_732135)->elements[0];
c_733448.elements[3] = ((closureN)self_732135)->elements[1];
c_733448.elements[4] = objs_73303_73871;

return_direct_with_clo1(data,(closure)&c_733448,__lambda_117,  boolean_f);; 
}

static void __lambda_117(void *data, object self_732136, int argc, object *args) /* object self_732136, object loop_73304_73872 */
 {
 object loop_73304_73872 = args[0];
  
closureN_type c_733450;
object e_733493 [5];
c_733450.hdr.mark = gc_color_red;
 c_733450.hdr.grayed = 0;
c_733450.tag = closureN_tag;
 c_733450.fn = (function_type)__lambda_505;
c_733450.num_args = 1;
c_733450.num_elements = 5;
c_733450.elements = (object *)e_733493;
c_733450.elements[0] = ((closureN)self_732136)->elements[0];
c_733450.elements[1] = ((closureN)self_732136)->elements[1];
c_733450.elements[2] = ((closureN)self_732136)->elements[2];
c_733450.elements[3] = ((closureN)self_732136)->elements[3];
c_733450.elements[4] = ((closureN)self_732136)->elements[4];


pair_type local_733496; 
return_direct_with_clo1(data,(closure)&c_733450,__lambda_505,  set_cell_as_expr(&local_733496, loop_73304_73872));; 
}

static void __lambda_505(void *data, object self_732137, int argc, object *args) /* object self_732137, object loop_73304_73872 */
 {
 object loop_73304_73872 = args[0];
  
closureN_type c_733452;
object e_733467 [5];
c_733452.hdr.mark = gc_color_red;
 c_733452.hdr.grayed = 0;
c_733452.tag = closureN_tag;
 c_733452.fn = (function_type)__lambda_118;
c_733452.num_args = 1;
c_733452.num_elements = 5;
c_733452.elements = (object *)e_733467;
c_733452.elements[0] = ((closureN)self_732137)->elements[0];
c_733452.elements[1] = ((closureN)self_732137)->elements[1];
c_733452.elements[2] = ((closureN)self_732137)->elements[3];
c_733452.elements[3] = loop_73304_73872;
c_733452.elements[4] = ((closureN)self_732137)->elements[4];


closureN_type c_733468;
object e_733492 [2];
c_733468.hdr.mark = gc_color_red;
 c_733468.hdr.grayed = 0;
c_733468.tag = closureN_tag;
 c_733468.fn = (function_type)__lambda_120;
c_733468.num_args = 3;
c_733468.num_elements = 2;
c_733468.elements = (object *)e_733492;
c_733468.elements[0] = ((closureN)self_732137)->elements[2];
c_733468.elements[1] = loop_73304_73872;

return_direct_with_clo1(data,(closure)&c_733452,__lambda_118,  &c_733468);; 
}

static void __lambda_120(void *data, object self_732138, int argc, object *args) /* object self_732138, object k_731388, object a_73305_73873, object b_73306_73874, object objs_73307_73875 */
 {
 object k_731388 = args[0]; object a_73305_73873 = args[1]; object b_73306_73874 = args[2]; object objs_73307_73875 = args[3];
  
closureN_type c_733470;
object e_733490 [4];
c_733470.hdr.mark = gc_color_red;
 c_733470.hdr.grayed = 0;
c_733470.tag = closureN_tag;
 c_733470.fn = (function_type)__lambda_121;
c_733470.num_args = 1;
c_733470.num_elements = 4;
c_733470.elements = (object *)e_733490;
c_733470.elements[0] = b_73306_73874;
c_733470.elements[1] = k_731388;
c_733470.elements[2] = ((closureN)self_732138)->elements[1];
c_733470.elements[3] = objs_73307_73875;

return_direct_with_clo4(data,  __glo_binary_121_127_srfi_128, (((closure)  __glo_binary_121_127_srfi_128)->fn),  &c_733470, ((closureN)self_732138)->elements[0], a_73305_73873, b_73306_73874);; 
}

static void __lambda_121(void *data, object self_732139, int argc, object *args) /* object self_732139, object r_731389 */
 {
 object r_731389 = args[0];
  if( (boolean_f != r_731389) ){ 
    
if( (boolean_f != Cyc_is_null(((closureN)self_732139)->elements[3])) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732139)->elements[1], (((closure)  ((closureN)self_732139)->elements[1])->fn),  boolean_t);
} else { 
  





return_closcall4(data,  car(((closureN)self_732139)->elements[2]),  ((closureN)self_732139)->elements[1], ((closureN)self_732139)->elements[0], Cyc_car(data, ((closureN)self_732139)->elements[3]), Cyc_cdr(data, ((closureN)self_732139)->elements[3]));}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732139)->elements[1], (((closure)  ((closureN)self_732139)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_118(void *data, object self_732140, int argc, object *args) /* object self_732140, object r_731387 */
 {
 object r_731387 = args[0];
  
closureN_type c_733454;
object e_733463 [5];
c_733454.hdr.mark = gc_color_red;
 c_733454.hdr.grayed = 0;
c_733454.tag = closureN_tag;
 c_733454.fn = (function_type)__lambda_119;
c_733454.num_args = 1;
c_733454.num_elements = 5;
c_733454.elements = (object *)e_733463;
c_733454.elements[0] = ((closureN)self_732140)->elements[0];
c_733454.elements[1] = ((closureN)self_732140)->elements[1];
c_733454.elements[2] = ((closureN)self_732140)->elements[2];
c_733454.elements[3] = ((closureN)self_732140)->elements[3];
c_733454.elements[4] = ((closureN)self_732140)->elements[4];



return_direct_with_clo1(data,(closure)&c_733454,__lambda_119,  Cyc_set_cell(data, ((closureN)self_732140)->elements[3], r_731387));; 
}

static void __lambda_119(void *data, object self_732141, int argc, object *args) /* object self_732141, object r_731386 */
 {

  

return_closcall4(data,  car(((closureN)self_732141)->elements[3]),  ((closureN)self_732141)->elements[2], ((closureN)self_732141)->elements[0], ((closureN)self_732141)->elements[1], ((closureN)self_732141)->elements[4]);; 
}

static void __lambda_108(void *data, object _, int argc, object *args) /* closure _,object k_731375, object comparator_73283_73854, object a_73284_73855, object b_73285_73856, object objs_73286_73857_raw, ... */
 {
object k_731375 = args[0]; object comparator_73283_73854 = args[1]; object a_73284_73855 = args[2]; object b_73285_73856 = args[3];
load_varargs(objs_73286_73857, args, 4, argc - 4);
  Cyc_st_add(data, "srfi/128.sld:=?");

closureN_type c_733391;
object e_733443 [2];
c_733391.hdr.mark = gc_color_red;
 c_733391.hdr.grayed = 0;
c_733391.tag = closureN_tag;
 c_733391.fn = (function_type)__lambda_109;
c_733391.num_args = 3;
c_733391.num_elements = 2;
c_733391.elements = (object *)e_733443;
c_733391.elements[0] = comparator_73283_73854;
c_733391.elements[1] = k_731375;

return_direct_with_clo3(data,(closure)&c_733391,__lambda_109,  a_73284_73855, b_73285_73856, objs_73286_73857);; 
}

static void __lambda_109(void *data, object self_732128, int argc, object *args) /* object self_732128, object a_73288_73858, object b_73289_73859, object objs_73290_73860 */
 {
 object a_73288_73858 = args[0]; object b_73289_73859 = args[1]; object objs_73290_73860 = args[2];
  
closureN_type c_733393;
object e_733442 [5];
c_733393.hdr.mark = gc_color_red;
 c_733393.hdr.grayed = 0;
c_733393.tag = closureN_tag;
 c_733393.fn = (function_type)__lambda_110;
c_733393.num_args = 1;
c_733393.num_elements = 5;
c_733393.elements = (object *)e_733442;
c_733393.elements[0] = a_73288_73858;
c_733393.elements[1] = b_73289_73859;
c_733393.elements[2] = ((closureN)self_732128)->elements[0];
c_733393.elements[3] = ((closureN)self_732128)->elements[1];
c_733393.elements[4] = objs_73290_73860;

return_direct_with_clo1(data,(closure)&c_733393,__lambda_110,  boolean_f);; 
}

static void __lambda_110(void *data, object self_732129, int argc, object *args) /* object self_732129, object loop_73291_73861 */
 {
 object loop_73291_73861 = args[0];
  
closureN_type c_733395;
object e_733438 [5];
c_733395.hdr.mark = gc_color_red;
 c_733395.hdr.grayed = 0;
c_733395.tag = closureN_tag;
 c_733395.fn = (function_type)__lambda_504;
c_733395.num_args = 1;
c_733395.num_elements = 5;
c_733395.elements = (object *)e_733438;
c_733395.elements[0] = ((closureN)self_732129)->elements[0];
c_733395.elements[1] = ((closureN)self_732129)->elements[1];
c_733395.elements[2] = ((closureN)self_732129)->elements[2];
c_733395.elements[3] = ((closureN)self_732129)->elements[3];
c_733395.elements[4] = ((closureN)self_732129)->elements[4];


pair_type local_733441; 
return_direct_with_clo1(data,(closure)&c_733395,__lambda_504,  set_cell_as_expr(&local_733441, loop_73291_73861));; 
}

static void __lambda_504(void *data, object self_732130, int argc, object *args) /* object self_732130, object loop_73291_73861 */
 {
 object loop_73291_73861 = args[0];
  
closureN_type c_733397;
object e_733412 [5];
c_733397.hdr.mark = gc_color_red;
 c_733397.hdr.grayed = 0;
c_733397.tag = closureN_tag;
 c_733397.fn = (function_type)__lambda_111;
c_733397.num_args = 1;
c_733397.num_elements = 5;
c_733397.elements = (object *)e_733412;
c_733397.elements[0] = ((closureN)self_732130)->elements[0];
c_733397.elements[1] = ((closureN)self_732130)->elements[1];
c_733397.elements[2] = ((closureN)self_732130)->elements[3];
c_733397.elements[3] = loop_73291_73861;
c_733397.elements[4] = ((closureN)self_732130)->elements[4];


closureN_type c_733413;
object e_733437 [2];
c_733413.hdr.mark = gc_color_red;
 c_733413.hdr.grayed = 0;
c_733413.tag = closureN_tag;
 c_733413.fn = (function_type)__lambda_113;
c_733413.num_args = 3;
c_733413.num_elements = 2;
c_733413.elements = (object *)e_733437;
c_733413.elements[0] = ((closureN)self_732130)->elements[2];
c_733413.elements[1] = loop_73291_73861;

return_direct_with_clo1(data,(closure)&c_733397,__lambda_111,  &c_733413);; 
}

static void __lambda_113(void *data, object self_732131, int argc, object *args) /* object self_732131, object k_731378, object a_73292_73862, object b_73293_73863, object objs_73294_73864 */
 {
 object k_731378 = args[0]; object a_73292_73862 = args[1]; object b_73293_73863 = args[2]; object objs_73294_73864 = args[3];
  
closureN_type c_733415;
object e_733435 [4];
c_733415.hdr.mark = gc_color_red;
 c_733415.hdr.grayed = 0;
c_733415.tag = closureN_tag;
 c_733415.fn = (function_type)__lambda_114;
c_733415.num_args = 1;
c_733415.num_elements = 4;
c_733415.elements = (object *)e_733435;
c_733415.elements[0] = b_73293_73863;
c_733415.elements[1] = k_731378;
c_733415.elements[2] = ((closureN)self_732131)->elements[1];
c_733415.elements[3] = objs_73294_73864;

return_direct_with_clo4(data,  __glo_binary_123_127_srfi_128, (((closure)  __glo_binary_123_127_srfi_128)->fn),  &c_733415, ((closureN)self_732131)->elements[0], a_73292_73862, b_73293_73863);; 
}

static void __lambda_114(void *data, object self_732132, int argc, object *args) /* object self_732132, object r_731379 */
 {
 object r_731379 = args[0];
  if( (boolean_f != r_731379) ){ 
    
if( (boolean_f != Cyc_is_null(((closureN)self_732132)->elements[3])) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732132)->elements[1], (((closure)  ((closureN)self_732132)->elements[1])->fn),  boolean_t);
} else { 
  





return_closcall4(data,  car(((closureN)self_732132)->elements[2]),  ((closureN)self_732132)->elements[1], ((closureN)self_732132)->elements[0], Cyc_car(data, ((closureN)self_732132)->elements[3]), Cyc_cdr(data, ((closureN)self_732132)->elements[3]));}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_732132)->elements[1], (((closure)  ((closureN)self_732132)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_111(void *data, object self_732133, int argc, object *args) /* object self_732133, object r_731377 */
 {
 object r_731377 = args[0];
  
closureN_type c_733399;
object e_733408 [5];
c_733399.hdr.mark = gc_color_red;
 c_733399.hdr.grayed = 0;
c_733399.tag = closureN_tag;
 c_733399.fn = (function_type)__lambda_112;
c_733399.num_args = 1;
c_733399.num_elements = 5;
c_733399.elements = (object *)e_733408;
c_733399.elements[0] = ((closureN)self_732133)->elements[0];
c_733399.elements[1] = ((closureN)self_732133)->elements[1];
c_733399.elements[2] = ((closureN)self_732133)->elements[2];
c_733399.elements[3] = ((closureN)self_732133)->elements[3];
c_733399.elements[4] = ((closureN)self_732133)->elements[4];



return_direct_with_clo1(data,(closure)&c_733399,__lambda_112,  Cyc_set_cell(data, ((closureN)self_732133)->elements[3], r_731377));; 
}

static void __lambda_112(void *data, object self_732134, int argc, object *args) /* object self_732134, object r_731376 */
 {

  

return_closcall4(data,  car(((closureN)self_732134)->elements[3]),  ((closureN)self_732134)->elements[2], ((closureN)self_732134)->elements[0], ((closureN)self_732134)->elements[1], ((closureN)self_732134)->elements[4]);; 
}

static void __lambda_106(void *data, object _, int argc, object *args) /* closure _,object k_731371, object comparator_73280_73851, object a_73281_73852, object b_73282_73853 */
 {
object k_731371 = args[0]; object comparator_73280_73851 = args[1]; object a_73281_73852 = args[2]; object b_73282_73853 = args[3];
  Cyc_st_add(data, "srfi/128.sld:binary>=?");

closureN_type c_733382;
object e_733388 [1];
c_733382.hdr.mark = gc_color_red;
 c_733382.hdr.grayed = 0;
c_733382.tag = closureN_tag;
 c_733382.fn = (function_type)__lambda_107;
c_733382.num_args = 1;
c_733382.num_elements = 1;
c_733382.elements = (object *)e_733388;
c_733382.elements[0] = k_731371;

return_direct_with_clo4(data,  __glo_binary_121_127_srfi_128, (((closure)  __glo_binary_121_127_srfi_128)->fn),  &c_733382, comparator_73280_73851, a_73281_73852, b_73282_73853);; 
}

static void __lambda_107(void *data, object self_732127, int argc, object *args) /* object self_732127, object r_731372 */
 {
 object r_731372 = args[0];
  
complex_num_type local_733387; 
return_direct_with_clo1(data,  ((closureN)self_732127)->elements[0], (((closure)  ((closureN)self_732127)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_733387, r_731372));; 
}

static void __lambda_104(void *data, object _, int argc, object *args) /* closure _,object k_731367, object comparator_73277_73848, object a_73278_73849, object b_73279_73850 */
 {
object k_731367 = args[0]; object comparator_73277_73848 = args[1]; object a_73278_73849 = args[2]; object b_73279_73850 = args[3];
  Cyc_st_add(data, "srfi/128.sld:binary<=?");

closureN_type c_733373;
object e_733379 [1];
c_733373.hdr.mark = gc_color_red;
 c_733373.hdr.grayed = 0;
c_733373.tag = closureN_tag;
 c_733373.fn = (function_type)__lambda_105;
c_733373.num_args = 1;
c_733373.num_elements = 1;
c_733373.elements = (object *)e_733379;
c_733373.elements[0] = k_731367;

return_direct_with_clo4(data,  __glo_binary_121_127_srfi_128, (((closure)  __glo_binary_121_127_srfi_128)->fn),  &c_733373, comparator_73277_73848, b_73279_73850, a_73278_73849);; 
}

static void __lambda_105(void *data, object self_732126, int argc, object *args) /* object self_732126, object r_731368_732030 */
 {
 object r_731368_732030 = args[0];
  
complex_num_type local_733378; 
return_direct_with_clo1(data,  ((closureN)self_732126)->elements[0], (((closure)  ((closureN)self_732126)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_733378, r_731368_732030));; 
}

static void __lambda_103(void *data, object _, int argc, object *args) /* closure _,object k_731364, object comparator_73274_73845, object a_73275_73846, object b_73276_73847 */
 {
object k_731364 = args[0]; object comparator_73274_73845 = args[1]; object a_73275_73846 = args[2]; object b_73276_73847 = args[3];
  Cyc_st_add(data, "srfi/128.sld:binary>?");
return_direct_with_clo4(data,  __glo_binary_121_127_srfi_128, (((closure)  __glo_binary_121_127_srfi_128)->fn),  k_731364, comparator_73274_73845, b_73276_73847, a_73275_73846);; 
}

static void __lambda_101(void *data, object _, int argc, object *args) /* closure _,object k_731360, object comparator_73271_73842, object a_73272_73843, object b_73273_73844 */
 {
object k_731360 = args[0]; object comparator_73271_73842 = args[1]; object a_73272_73843 = args[2]; object b_73273_73844 = args[3];
  Cyc_st_add(data, "srfi/128.sld:binary<?");

closureN_type c_733363;
object e_733368 [3];
c_733363.hdr.mark = gc_color_red;
 c_733363.hdr.grayed = 0;
c_733363.tag = closureN_tag;
 c_733363.fn = (function_type)__lambda_102;
c_733363.num_args = 1;
c_733363.num_elements = 3;
c_733363.elements = (object *)e_733368;
c_733363.elements[0] = a_73272_73843;
c_733363.elements[1] = b_73273_73844;
c_733363.elements[2] = k_731360;

return_direct_with_clo2(data,  __glo_comparator_91ordering_91predicate_srfi_128, (((closure)  __glo_comparator_91ordering_91predicate_srfi_128)->fn),  &c_733363, comparator_73271_73842);; 
}

static void __lambda_102(void *data, object self_732125, int argc, object *args) /* object self_732125, object r_731361 */
 {
 object r_731361 = args[0];
  return_closcall3(data,  r_731361,  ((closureN)self_732125)->elements[2], ((closureN)self_732125)->elements[0], ((closureN)self_732125)->elements[1]);; 
}

static void __lambda_99(void *data, object _, int argc, object *args) /* closure _,object k_731356, object comparator_73268_73839, object a_73269_73840, object b_73270_73841 */
 {
object k_731356 = args[0]; object comparator_73268_73839 = args[1]; object a_73269_73840 = args[2]; object b_73270_73841 = args[3];
  Cyc_st_add(data, "srfi/128.sld:binary=?");

closureN_type c_733355;
object e_733360 [3];
c_733355.hdr.mark = gc_color_red;
 c_733355.hdr.grayed = 0;
c_733355.tag = closureN_tag;
 c_733355.fn = (function_type)__lambda_100;
c_733355.num_args = 1;
c_733355.num_elements = 3;
c_733355.elements = (object *)e_733360;
c_733355.elements[0] = a_73269_73840;
c_733355.elements[1] = b_73270_73841;
c_733355.elements[2] = k_731356;

return_direct_with_clo2(data,  __glo_comparator_91equality_91predicate_srfi_128, (((closure)  __glo_comparator_91equality_91predicate_srfi_128)->fn),  &c_733355, comparator_73268_73839);; 
}

static void __lambda_100(void *data, object self_732124, int argc, object *args) /* object self_732124, object r_731357 */
 {
 object r_731357 = args[0];
  return_closcall3(data,  r_731357,  ((closureN)self_732124)->elements[2], ((closureN)self_732124)->elements[0], ((closureN)self_732124)->elements[1]);; 
}

static void __lambda_97(void *data, object _, int argc, object *args) /* closure _,object k_731352, object comparator_73266_73837, object obj_73267_73838 */
 {
object k_731352 = args[0]; object comparator_73266_73837 = args[1]; object obj_73267_73838 = args[2];
  Cyc_st_add(data, "srfi/128.sld:comparator-hash");

closureN_type c_733348;
object e_733352 [2];
c_733348.hdr.mark = gc_color_red;
 c_733348.hdr.grayed = 0;
c_733348.tag = closureN_tag;
 c_733348.fn = (function_type)__lambda_98;
c_733348.num_args = 1;
c_733348.num_elements = 2;
c_733348.elements = (object *)e_733352;
c_733348.elements[0] = k_731352;
c_733348.elements[1] = obj_73267_73838;

return_direct_with_clo2(data,  __glo_comparator_91hash_91function_srfi_128, (((closure)  __glo_comparator_91hash_91function_srfi_128)->fn),  &c_733348, comparator_73266_73837);; 
}

static void __lambda_98(void *data, object self_732123, int argc, object *args) /* object self_732123, object r_731353 */
 {
 object r_731353 = args[0];
  return_closcall2(data,  r_731353,  ((closureN)self_732123)->elements[0], ((closureN)self_732123)->elements[1]);; 
}

static void __lambda_95(void *data, object _, int argc, object *args) /* closure _,object k_731348, object comparator_73264_73835, object obj_73265_73836 */
 {
object k_731348 = args[0]; object comparator_73264_73835 = args[1]; object obj_73265_73836 = args[2];
  Cyc_st_add(data, "srfi/128.sld:comparator-check-type");

closureN_type c_733337;
object e_733345 [3];
c_733337.hdr.mark = gc_color_red;
 c_733337.hdr.grayed = 0;
c_733337.tag = closureN_tag;
 c_733337.fn = (function_type)__lambda_96;
c_733337.num_args = 1;
c_733337.num_elements = 3;
c_733337.elements = (object *)e_733345;
c_733337.elements[0] = comparator_73264_73835;
c_733337.elements[1] = k_731348;
c_733337.elements[2] = obj_73265_73836;

return_direct_with_clo3(data,  __glo_comparator_91test_91type_srfi_128, (((closure)  __glo_comparator_91test_91type_srfi_128)->fn),  &c_733337, comparator_73264_73835, obj_73265_73836);; 
}

static void __lambda_96(void *data, object self_732122, int argc, object *args) /* object self_732122, object r_731349 */
 {
 object r_731349 = args[0];
  if( (boolean_f != r_731349) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732122)->elements[1], (((closure)  ((closureN)self_732122)->elements[1])->fn),  boolean_t);
} else { 
  
make_utf8_string_with_len(c_733342, "comparator type check failed", 28, 28);
return_direct_with_clo4(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_732122)->elements[1], &c_733342, ((closureN)self_732122)->elements[0], ((closureN)self_732122)->elements[2]);}
;; 
}

static void __lambda_93(void *data, object _, int argc, object *args) /* closure _,object k_731344, object comparator_73262_73833, object obj_73263_73834 */
 {
object k_731344 = args[0]; object comparator_73262_73833 = args[1]; object obj_73263_73834 = args[2];
  Cyc_st_add(data, "srfi/128.sld:comparator-test-type");

closureN_type c_733330;
object e_733334 [2];
c_733330.hdr.mark = gc_color_red;
 c_733330.hdr.grayed = 0;
c_733330.tag = closureN_tag;
 c_733330.fn = (function_type)__lambda_94;
c_733330.num_args = 1;
c_733330.num_elements = 2;
c_733330.elements = (object *)e_733334;
c_733330.elements[0] = k_731344;
c_733330.elements[1] = obj_73263_73834;

return_direct_with_clo2(data,  __glo_comparator_91type_91test_91predicate_srfi_128, (((closure)  __glo_comparator_91type_91test_91predicate_srfi_128)->fn),  &c_733330, comparator_73262_73833);; 
}

static void __lambda_94(void *data, object self_732121, int argc, object *args) /* object self_732121, object r_731345 */
 {
 object r_731345 = args[0];
  return_closcall2(data,  r_731345,  ((closureN)self_732121)->elements[0], ((closureN)self_732121)->elements[1]);; 
}

static void __lambda_77(void *data, object _, int argc, object *args) /* closure _,object k_731322, object type_91test_73251_73822, object equality_73252_73823, object ordering_73253_73824, object hash_73254_73825 */
 {
object k_731322 = args[0]; object type_91test_73251_73822 = args[1]; object equality_73252_73823 = args[2]; object ordering_73253_73824 = args[3]; object hash_73254_73825 = args[4];
  Cyc_st_add(data, "srfi/128.sld:make-comparator");

closureN_type c_733252;
object e_733261 [1];
c_733252.hdr.mark = gc_color_red;
 c_733252.hdr.grayed = 0;
c_733252.tag = closureN_tag;
 c_733252.fn = (function_type)__lambda_78;
c_733252.num_args = 0;
c_733252.num_elements = 1;
c_733252.elements = (object *)e_733261;
c_733252.elements[0] = type_91test_73251_73822;


closureN_type c_733262;
object e_733327 [4];
c_733262.hdr.mark = gc_color_red;
 c_733262.hdr.grayed = 0;
c_733262.tag = closureN_tag;
 c_733262.fn = (function_type)__lambda_80;
c_733262.num_args = 1;
c_733262.num_elements = 4;
c_733262.elements = (object *)e_733327;
c_733262.elements[0] = equality_73252_73823;
c_733262.elements[1] = hash_73254_73825;
c_733262.elements[2] = k_731322;
c_733262.elements[3] = ordering_73253_73824;

return_direct_with_clo1(data,(closure)&c_733252,__lambda_78,  &c_733262);; 
}

static void __lambda_80(void *data, object self_732106, int argc, object *args) /* object self_732106, object r_731323 */
 {
 object r_731323 = args[0];
  
closureN_type c_733264;
object e_733281 [2];
c_733264.hdr.mark = gc_color_red;
 c_733264.hdr.grayed = 0;
c_733264.tag = closureN_tag;
 c_733264.fn = (function_type)__lambda_81;
c_733264.num_args = 0;
c_733264.num_elements = 2;
c_733264.elements = (object *)e_733281;
c_733264.elements[0] = ((closureN)self_732106)->elements[0];
c_733264.elements[1] = ((closureN)self_732106)->elements[3];


closureN_type c_733282;
object e_733326 [4];
c_733282.hdr.mark = gc_color_red;
 c_733282.hdr.grayed = 0;
c_733282.tag = closureN_tag;
 c_733282.fn = (function_type)__lambda_84;
c_733282.num_args = 1;
c_733282.num_elements = 4;
c_733282.elements = (object *)e_733326;
c_733282.elements[0] = ((closureN)self_732106)->elements[1];
c_733282.elements[1] = ((closureN)self_732106)->elements[2];
c_733282.elements[2] = ((closureN)self_732106)->elements[3];
c_733282.elements[3] = r_731323;

return_direct_with_clo1(data,(closure)&c_733264,__lambda_81,  &c_733282);; 
}

static void __lambda_84(void *data, object self_732107, int argc, object *args) /* object self_732107, object r_731324 */
 {
 object r_731324 = args[0];
  
closureN_type c_733284;
object e_733292 [1];
c_733284.hdr.mark = gc_color_red;
 c_733284.hdr.grayed = 0;
c_733284.tag = closureN_tag;
 c_733284.fn = (function_type)__lambda_85;
c_733284.num_args = 0;
c_733284.num_elements = 1;
c_733284.elements = (object *)e_733292;
c_733284.elements[0] = ((closureN)self_732107)->elements[2];


closureN_type c_733293;
object e_733325 [5];
c_733293.hdr.mark = gc_color_red;
 c_733293.hdr.grayed = 0;
c_733293.tag = closureN_tag;
 c_733293.fn = (function_type)__lambda_87;
c_733293.num_args = 1;
c_733293.num_elements = 5;
c_733293.elements = (object *)e_733325;
c_733293.elements[0] = ((closureN)self_732107)->elements[0];
c_733293.elements[1] = ((closureN)self_732107)->elements[1];
c_733293.elements[2] = ((closureN)self_732107)->elements[2];
c_733293.elements[3] = ((closureN)self_732107)->elements[3];
c_733293.elements[4] = r_731324;

return_direct_with_clo1(data,(closure)&c_733284,__lambda_85,  &c_733293);; 
}

static void __lambda_87(void *data, object self_732108, int argc, object *args) /* object self_732108, object r_731325 */
 {
 object r_731325 = args[0];
  
closureN_type c_733295;
object e_733303 [1];
c_733295.hdr.mark = gc_color_red;
 c_733295.hdr.grayed = 0;
c_733295.tag = closureN_tag;
 c_733295.fn = (function_type)__lambda_88;
c_733295.num_args = 0;
c_733295.num_elements = 1;
c_733295.elements = (object *)e_733303;
c_733295.elements[0] = ((closureN)self_732108)->elements[0];


closureN_type c_733304;
object e_733324 [6];
c_733304.hdr.mark = gc_color_red;
 c_733304.hdr.grayed = 0;
c_733304.tag = closureN_tag;
 c_733304.fn = (function_type)__lambda_90;
c_733304.num_args = 1;
c_733304.num_elements = 6;
c_733304.elements = (object *)e_733324;
c_733304.elements[0] = ((closureN)self_732108)->elements[0];
c_733304.elements[1] = ((closureN)self_732108)->elements[1];
c_733304.elements[2] = ((closureN)self_732108)->elements[2];
c_733304.elements[3] = ((closureN)self_732108)->elements[3];
c_733304.elements[4] = ((closureN)self_732108)->elements[4];
c_733304.elements[5] = r_731325;

return_direct_with_clo1(data,(closure)&c_733295,__lambda_88,  &c_733304);; 
}

static void __lambda_90(void *data, object self_732109, int argc, object *args) /* object self_732109, object r_731326 */
 {
 object r_731326 = args[0];
  object r_731327;
  if( (boolean_f != ((closureN)self_732109)->elements[2]) ){ 
  r_731327 = boolean_t;
} else { 
  r_731327 = boolean_f;}
;
closureN_type c_733310;
object e_733314 [1];
c_733310.hdr.mark = gc_color_red;
 c_733310.hdr.grayed = 0;
c_733310.tag = closureN_tag;
 c_733310.fn = (function_type)__lambda_91;
c_733310.num_args = 0;
c_733310.num_elements = 1;
c_733310.elements = (object *)e_733314;
c_733310.elements[0] = ((closureN)self_732109)->elements[0];


closureN_type c_733315;
object e_733323 [6];
c_733315.hdr.mark = gc_color_red;
 c_733315.hdr.grayed = 0;
c_733315.tag = closureN_tag;
 c_733315.fn = (function_type)__lambda_92;
c_733315.num_args = 1;
c_733315.num_elements = 6;
c_733315.elements = (object *)e_733323;
c_733315.elements[0] = ((closureN)self_732109)->elements[1];
c_733315.elements[1] = ((closureN)self_732109)->elements[3];
c_733315.elements[2] = ((closureN)self_732109)->elements[4];
c_733315.elements[3] = ((closureN)self_732109)->elements[5];
c_733315.elements[4] = r_731326;
c_733315.elements[5] = r_731327;

return_direct_with_clo1(data,(closure)&c_733310,__lambda_91,  &c_733315);; 
}

static void __lambda_92(void *data, object self_732110, int argc, object *args) /* object self_732110, object r_731328 */
 {
 object r_731328 = args[0];
  return_direct_with_clo7(data,  __glo_make_91raw_91comparator_srfi_128, (((closure)  __glo_make_91raw_91comparator_srfi_128)->fn),  ((closureN)self_732110)->elements[0], ((closureN)self_732110)->elements[1], ((closureN)self_732110)->elements[2], ((closureN)self_732110)->elements[3], ((closureN)self_732110)->elements[4], ((closureN)self_732110)->elements[5], r_731328);; 
}

static void __lambda_91(void *data, object self_732111, int argc, object *args) /* object self_732111, object k_731329 */
 {
 object k_731329 = args[0];
  if( (boolean_f != ((closureN)self_732111)->elements[0]) ){ 
  return_direct_with_clo1(data,  k_731329,__lambda_92,  boolean_t);
} else { 
  return_direct_with_clo1(data,  k_731329,__lambda_92,  boolean_f);}
;; 
}

static void __lambda_88(void *data, object self_732112, int argc, object *args) /* object self_732112, object k_731331 */
 {
 object k_731331 = args[0];
  if( (boolean_f != ((closureN)self_732112)->elements[0]) ){ 
  return_direct_with_clo1(data,  k_731331,__lambda_90,  ((closureN)self_732112)->elements[0]);
} else { 
  
mclosure0(c_733300, (function_type)__lambda_89);c_733300.num_args = 2;
return_direct_with_clo1(data,  k_731331,__lambda_90,  &c_733300);}
;; 
}

static void __lambda_89(void *data, object self_732113, int argc, object *args) /* object self_732113, object k_731332, object x_73260_73831, object y_73261_73832 */
 {
 object k_731332 = args[0];
  
make_utf8_string_with_len(c_733302, "hashing not supported", 21, 21);
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_731332, &c_733302);; 
}

static void __lambda_85(void *data, object self_732114, int argc, object *args) /* object self_732114, object k_731333 */
 {
 object k_731333 = args[0];
  if( (boolean_f != ((closureN)self_732114)->elements[0]) ){ 
  return_direct_with_clo1(data,  k_731333,__lambda_87,  ((closureN)self_732114)->elements[0]);
} else { 
  
mclosure0(c_733289, (function_type)__lambda_86);c_733289.num_args = 2;
return_direct_with_clo1(data,  k_731333,__lambda_87,  &c_733289);}
;; 
}

static void __lambda_86(void *data, object self_732115, int argc, object *args) /* object self_732115, object k_731334, object x_73258_73829, object y_73259_73830 */
 {
 object k_731334 = args[0];
  
make_utf8_string_with_len(c_733291, "ordering not supported", 22, 22);
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_731334, &c_733291);; 
}

static void __lambda_81(void *data, object self_732116, int argc, object *args) /* object self_732116, object k_731335 */
 {
 object k_731335 = args[0];
    
if( (boolean_f != Cyc_eq(((closureN)self_732116)->elements[0], boolean_t)) ){ 
  
closureN_type c_733269;
object e_733278 [1];
c_733269.hdr.mark = gc_color_red;
 c_733269.hdr.grayed = 0;
c_733269.tag = closureN_tag;
 c_733269.fn = (function_type)__lambda_82;
c_733269.num_args = 2;
c_733269.num_elements = 1;
c_733269.elements = (object *)e_733278;
c_733269.elements[0] = ((closureN)self_732116)->elements[1];

return_direct_with_clo1(data,  k_731335,__lambda_84,  &c_733269);
} else { 
  return_direct_with_clo1(data,  k_731335,__lambda_84,  ((closureN)self_732116)->elements[0]);}
;; 
}

static void __lambda_82(void *data, object self_732117, int argc, object *args) /* object self_732117, object k_731337, object x_73256_73827, object y_73257_73828 */
 {
 object k_731337 = args[0]; object x_73256_73827 = args[1]; object y_73257_73828 = args[2];
  
closureN_type c_733272;
object e_733277 [1];
c_733272.hdr.mark = gc_color_red;
 c_733272.hdr.grayed = 0;
c_733272.tag = closureN_tag;
 c_733272.fn = (function_type)__lambda_83;
c_733272.num_args = 1;
c_733272.num_elements = 1;
c_733272.elements = (object *)e_733277;
c_733272.elements[0] = k_731337;

return_closcall3(data,  ((closureN)self_732117)->elements[0],  &c_733272, x_73256_73827, y_73257_73828);; 
}

static void __lambda_83(void *data, object self_732118, int argc, object *args) /* object self_732118, object r_731338 */
 {
 object r_731338 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_732118)->elements[0], (((closure)  ((closureN)self_732118)->elements[0])->fn),  Cyc_eqv(r_731338, obj_int2obj(0)));; 
}

static void __lambda_78(void *data, object self_732119, int argc, object *args) /* object self_732119, object k_731339 */
 {
 object k_731339 = args[0];
    
if( (boolean_f != Cyc_eq(((closureN)self_732119)->elements[0], boolean_t)) ){ 
  
mclosure0(c_733257, (function_type)__lambda_79);c_733257.num_args = 1;
return_direct_with_clo1(data,  k_731339,__lambda_80,  &c_733257);
} else { 
  return_direct_with_clo1(data,  k_731339,__lambda_80,  ((closureN)self_732119)->elements[0]);}
;; 
}

static void __lambda_79(void *data, object self_732120, int argc, object *args) /* object self_732120, object k_731341, object x_73255_73826 */
 {
 object k_731341 = args[0];
  return_direct_with_clo1(data,  k_731341, (((closure)  k_731341)->fn),  boolean_t);; 
}

static void __lambda_74(void *data, object _, int argc, object *args) /* closure _,object k_731316, object type_91test_73245_73816, object equality_73246_73817, object ordering_73247_73818, object hash_73248_73819, object ordering_127_73249_73820, object hash_127_73250_73821 */
 {
object k_731316 = args[0]; object type_91test_73245_73816 = args[1]; object equality_73246_73817 = args[2]; object ordering_73247_73818 = args[3]; object hash_73248_73819 = args[4]; object ordering_127_73249_73820 = args[5]; object hash_127_73250_73821 = args[6];
  Cyc_st_add(data, "srfi/128.sld:make-raw-comparator");

closureN_type c_733230;
object e_733246 [7];
c_733230.hdr.mark = gc_color_red;
 c_733230.hdr.grayed = 0;
c_733230.tag = closureN_tag;
 c_733230.fn = (function_type)__lambda_75;
c_733230.num_args = 1;
c_733230.num_elements = 7;
c_733230.elements = (object *)e_733246;
c_733230.elements[0] = equality_73246_73817;
c_733230.elements[1] = hash_73248_73819;
c_733230.elements[2] = hash_127_73250_73821;
c_733230.elements[3] = k_731316;
c_733230.elements[4] = ordering_73247_73818;
c_733230.elements[5] = ordering_127_73249_73820;
c_733230.elements[6] = type_91test_73245_73816;


complex_num_type local_733249; 
return_direct_with_clo1(data,(closure)&c_733230,__lambda_75,  ((inline_function_type)
                   ((closure)__glo_make_91record_91marker_191_191inline_191_191_scheme_base)->fn)(data,&local_733249));; 
}

static void __lambda_75(void *data, object self_732104, int argc, object *args) /* object self_732104, object r_731317 */
 {
 object r_731317 = args[0];
  
closureN_type c_733232;
object e_733239 [2];
c_733232.hdr.mark = gc_color_red;
 c_733232.hdr.grayed = 0;
c_733232.tag = closureN_tag;
 c_733232.fn = (function_type)__lambda_76;
c_733232.num_args = 1;
c_733232.num_elements = 2;
c_733232.elements = (object *)e_733239;
c_733232.elements[0] = ((closureN)self_732104)->elements[3];
c_733232.elements[1] = r_731317;

return_direct_with_clo7(data,  __glo_vector_scheme_base, (((closure)  __glo_vector_scheme_base)->fn),  &c_733232, ((closureN)self_732104)->elements[6], ((closureN)self_732104)->elements[0], ((closureN)self_732104)->elements[4], ((closureN)self_732104)->elements[1], ((closureN)self_732104)->elements[5], ((closureN)self_732104)->elements[2]);; 
}

static void __lambda_76(void *data, object self_732105, int argc, object *args) /* object self_732105, object r_731319 */
 {
 object r_731319 = args[0];
  
vector_3_type local_733237; 
return_direct_with_clo1(data,  ((closureN)self_732105)->elements[0], (((closure)  ((closureN)self_732105)->elements[0])->fn),  Cyc_fast_vector_3(&local_733237, ((closureN)self_732105)->elements[1], quote_comparator, r_731319));; 
}

static void __lambda_57(void *data, object _, int argc, object *args) /* closure _,object k_731257, object expr_73194_73209_73230_73802, object rename_73195_73210_73231_73803, object compare_73196_73211_73232_73804 */
 {
object k_731257 = args[0]; object expr_73194_73209_73230_73802 = args[1]; object rename_73195_73210_73231_73803 = args[2];
  Cyc_st_add(data, "srfi/128.sld:with-hash-salt");

closureN_type c_733087;
object e_733225 [3];
c_733087.hdr.mark = gc_color_red;
 c_733087.hdr.grayed = 0;
c_733087.tag = closureN_tag;
 c_733087.fn = (function_type)__lambda_58;
c_733087.num_args = 1;
c_733087.num_elements = 3;
c_733087.elements = (object *)e_733225;
c_733087.elements[0] = expr_73194_73209_73230_73802;
c_733087.elements[1] = k_731257;
c_733087.elements[2] = rename_73195_73210_73231_73803;



return_direct_with_clo1(data,(closure)&c_733087,__lambda_58,  Cyc_cdr(data, expr_73194_73209_73230_73802));; 
}

static void __lambda_58(void *data, object self_732088, int argc, object *args) /* object self_732088, object v_931_73202_73216_73234_73806 */
 {
 object v_931_73202_73216_73234_73806 = args[0];
  
closureN_type c_733089;
object e_733200 [2];
c_733089.hdr.mark = gc_color_red;
 c_733089.hdr.grayed = 0;
c_733089.tag = closureN_tag;
 c_733089.fn = (function_type)__lambda_59;
c_733089.num_args = 0;
c_733089.num_elements = 2;
c_733089.elements = (object *)e_733200;
c_733089.elements[0] = ((closureN)self_732088)->elements[2];
c_733089.elements[1] = v_931_73202_73216_73234_73806;


closureN_type c_733201;
object e_733224 [2];
c_733201.hdr.mark = gc_color_red;
 c_733201.hdr.grayed = 0;
c_733201.tag = closureN_tag;
 c_733201.fn = (function_type)__lambda_70;
c_733201.num_args = 1;
c_733201.num_elements = 2;
c_733201.elements = (object *)e_733224;
c_733201.elements[0] = ((closureN)self_732088)->elements[0];
c_733201.elements[1] = ((closureN)self_732088)->elements[1];

return_direct_with_clo1(data,(closure)&c_733089,__lambda_59,  &c_733201);; 
}

static void __lambda_70(void *data, object self_732089, int argc, object *args) /* object self_732089, object tmp_73213_73215_73233_73805 */
 {
 object tmp_73213_73215_73233_73805 = args[0];
  
closureN_type c_733203;
object e_733217 [2];
c_733203.hdr.mark = gc_color_red;
 c_733203.hdr.grayed = 0;
c_733203.tag = closureN_tag;
 c_733203.fn = (function_type)__lambda_71;
c_733203.num_args = 0;
c_733203.num_elements = 2;
c_733203.elements = (object *)e_733217;
c_733203.elements[0] = ((closureN)self_732089)->elements[0];
c_733203.elements[1] = tmp_73213_73215_73233_73805;


closureN_type c_733218;
object e_733223 [1];
c_733218.hdr.mark = gc_color_red;
 c_733218.hdr.grayed = 0;
c_733218.tag = closureN_tag;
 c_733218.fn = (function_type)__lambda_73;
c_733218.num_args = 1;
c_733218.num_elements = 1;
c_733218.elements = (object *)e_733223;
c_733218.elements[0] = ((closureN)self_732089)->elements[1];

return_direct_with_clo1(data,(closure)&c_733203,__lambda_71,  &c_733218);; 
}

static void __lambda_73(void *data, object self_732090, int argc, object *args) /* object self_732090, object r_731258 */
 {
 object r_731258 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_732090)->elements[0], (((closure)  ((closureN)self_732090)->elements[0])->fn),  Cyc_car(data, r_731258));; 
}

static void __lambda_71(void *data, object self_732091, int argc, object *args) /* object self_732091, object k_731260 */
 {
 object k_731260 = args[0];
  if( (boolean_f != ((closureN)self_732091)->elements[1]) ){ 
  return_direct_with_clo1(data,  k_731260, (((closure)  k_731260)->fn),  ((closureN)self_732091)->elements[1]);
} else { 
  
closureN_type c_733208;
object e_733214 [1];
c_733208.hdr.mark = gc_color_red;
 c_733208.hdr.grayed = 0;
c_733208.tag = closureN_tag;
 c_733208.fn = (function_type)__lambda_72;
c_733208.num_args = 1;
c_733208.num_elements = 1;
c_733208.elements = (object *)e_733214;
c_733208.elements[0] = k_731260;


make_utf8_string_with_len(c_733215, "no expansion for", 16, 16);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_733208, &c_733215, ((closureN)self_732091)->elements[0]);}
;; 
}

static void __lambda_72(void *data, object self_732092, int argc, object *args) /* object self_732092, object r_731261 */
 {
 object r_731261 = args[0];
  
pair_type local_733213; 
return_direct_with_clo1(data,  ((closureN)self_732092)->elements[0], (((closure)  ((closureN)self_732092)->elements[0])->fn),  set_pair_as_expr(&local_733213, r_731261, boolean_f));; 
}

static void __lambda_59(void *data, object self_732093, int argc, object *args) /* object self_732093, object k_731263 */
 {
 object k_731263 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_732093)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_732093)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_732093)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_732093)->elements[1]))))) ){ 
  
closureN_type c_733116;
object e_733195 [3];
c_733116.hdr.mark = gc_color_red;
 c_733116.hdr.grayed = 0;
c_733116.tag = closureN_tag;
 c_733116.fn = (function_type)__lambda_60;
c_733116.num_args = 1;
c_733116.num_elements = 3;
c_733116.elements = (object *)e_733195;
c_733116.elements[0] = k_731263;
c_733116.elements[1] = ((closureN)self_732093)->elements[0];
c_733116.elements[2] = ((closureN)self_732093)->elements[1];

return_closcall2(data,  ((closureN)self_732093)->elements[0],  &c_733116, quote_parameterize);
} else { 
  return_direct_with_clo1(data,  k_731263, (((closure)  k_731263)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_731263, (((closure)  k_731263)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_731263, (((closure)  k_731263)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_731263, (((closure)  k_731263)->fn),  boolean_f);}
;; 
}

static void __lambda_60(void *data, object self_732094, int argc, object *args) /* object self_732094, object r_731275 */
 {
 object r_731275 = args[0];
  
closureN_type c_733119;
object e_733194 [3];
c_733119.hdr.mark = gc_color_red;
 c_733119.hdr.grayed = 0;
c_733119.tag = closureN_tag;
 c_733119.fn = (function_type)__lambda_61;
c_733119.num_args = 1;
c_733119.num_elements = 3;
c_733119.elements = (object *)e_733194;
c_733119.elements[0] = ((closureN)self_732094)->elements[0];
c_733119.elements[1] = r_731275;
c_733119.elements[2] = ((closureN)self_732094)->elements[2];

return_closcall2(data,  ((closureN)self_732094)->elements[1],  &c_733119, quote__75salt_75);; 
}

static void __lambda_61(void *data, object self_732095, int argc, object *args) /* object self_732095, object r_731291 */
 {
 object r_731291 = args[0];
  
closureN_type c_733121;
object e_733189 [4];
c_733121.hdr.mark = gc_color_red;
 c_733121.hdr.grayed = 0;
c_733121.tag = closureN_tag;
 c_733121.fn = (function_type)__lambda_62;
c_733121.num_args = 1;
c_733121.num_elements = 4;
c_733121.elements = (object *)e_733189;
c_733121.elements[0] = ((closureN)self_732095)->elements[0];
c_733121.elements[1] = ((closureN)self_732095)->elements[1];
c_733121.elements[2] = r_731291;
c_733121.elements[3] = ((closureN)self_732095)->elements[2];




make_pair(c_733193,quote_new_91salt,NULL);c_733193.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_733121, Cyc_car(data, ((closureN)self_732095)->elements[2]), NULL, &c_733193);; 
}

static void __lambda_62(void *data, object self_732096, int argc, object *args) /* object self_732096, object r_731292 */
 {
 object r_731292 = args[0];
  
closureN_type c_733123;
object e_733185 [3];
c_733123.hdr.mark = gc_color_red;
 c_733123.hdr.grayed = 0;
c_733123.tag = closureN_tag;
 c_733123.fn = (function_type)__lambda_63;
c_733123.num_args = 1;
c_733123.num_elements = 3;
c_733123.elements = (object *)e_733185;
c_733123.elements[0] = ((closureN)self_732096)->elements[0];
c_733123.elements[1] = ((closureN)self_732096)->elements[1];
c_733123.elements[2] = ((closureN)self_732096)->elements[3];


make_pair(c_733188,quote_new_91salt,NULL);c_733188.hdr.immutable = 1;

make_pair(c_733187,quote__75salt_75,&c_733188);c_733187.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_733123, ((closureN)self_732096)->elements[2], r_731292, &c_733187);; 
}

static void __lambda_63(void *data, object self_732097, int argc, object *args) /* object self_732097, object r_731288 */
 {
 object r_731288 = args[0];
  
closureN_type c_733125;
object e_733181 [3];
c_733125.hdr.mark = gc_color_red;
 c_733125.hdr.grayed = 0;
c_733125.tag = closureN_tag;
 c_733125.fn = (function_type)__lambda_64;
c_733125.num_args = 1;
c_733125.num_elements = 3;
c_733125.elements = (object *)e_733181;
c_733125.elements[0] = ((closureN)self_732097)->elements[0];
c_733125.elements[1] = ((closureN)self_732097)->elements[1];
c_733125.elements[2] = ((closureN)self_732097)->elements[2];


make_pair(c_733184,quote_new_91salt,NULL);c_733184.hdr.immutable = 1;

make_pair(c_733183,quote__75salt_75,&c_733184);c_733183.hdr.immutable = 1;

make_pair(c_733182,&c_733183,NULL);c_733182.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_733125, r_731288, NULL, &c_733182);; 
}

static void __lambda_64(void *data, object self_732098, int argc, object *args) /* object self_732098, object r_731278 */
 {
 object r_731278 = args[0];
  
closureN_type c_733127;
object e_733172 [4];
c_733127.hdr.mark = gc_color_red;
 c_733127.hdr.grayed = 0;
c_733127.tag = closureN_tag;
 c_733127.fn = (function_type)__lambda_65;
c_733127.num_args = 1;
c_733127.num_elements = 4;
c_733127.elements = (object *)e_733172;
c_733127.elements[0] = ((closureN)self_732098)->elements[0];
c_733127.elements[1] = ((closureN)self_732098)->elements[1];
c_733127.elements[2] = r_731278;
c_733127.elements[3] = ((closureN)self_732098)->elements[2];








make_pair(c_733180,quote_obj,NULL);c_733180.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_733127, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_732098)->elements[2]))), NULL, &c_733180);; 
}

static void __lambda_65(void *data, object self_732099, int argc, object *args) /* object self_732099, object r_731284 */
 {
 object r_731284 = args[0];
  
closureN_type c_733129;
object e_733164 [3];
c_733129.hdr.mark = gc_color_red;
 c_733129.hdr.grayed = 0;
c_733129.tag = closureN_tag;
 c_733129.fn = (function_type)__lambda_66;
c_733129.num_args = 1;
c_733129.num_elements = 3;
c_733129.elements = (object *)e_733164;
c_733129.elements[0] = ((closureN)self_732099)->elements[0];
c_733129.elements[1] = ((closureN)self_732099)->elements[1];
c_733129.elements[2] = ((closureN)self_732099)->elements[2];






make_pair(c_733171,quote_obj,NULL);c_733171.hdr.immutable = 1;

make_pair(c_733170,quote_hash_91func,&c_733171);c_733170.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_733129, Cyc_car(data, Cyc_cdr(data, ((closureN)self_732099)->elements[3])), r_731284, &c_733170);; 
}

static void __lambda_66(void *data, object self_732100, int argc, object *args) /* object self_732100, object r_731281 */
 {
 object r_731281 = args[0];
  
closureN_type c_733131;
object e_733160 [3];
c_733131.hdr.mark = gc_color_red;
 c_733131.hdr.grayed = 0;
c_733131.tag = closureN_tag;
 c_733131.fn = (function_type)__lambda_67;
c_733131.num_args = 1;
c_733131.num_elements = 3;
c_733131.elements = (object *)e_733160;
c_733131.elements[0] = ((closureN)self_732100)->elements[0];
c_733131.elements[1] = ((closureN)self_732100)->elements[1];
c_733131.elements[2] = ((closureN)self_732100)->elements[2];


make_pair(c_733163,quote_obj,NULL);c_733163.hdr.immutable = 1;

make_pair(c_733162,quote_hash_91func,&c_733163);c_733162.hdr.immutable = 1;

make_pair(c_733161,&c_733162,NULL);c_733161.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_733131, r_731281, NULL, &c_733161);; 
}

static void __lambda_67(void *data, object self_732101, int argc, object *args) /* object self_732101, object r_731279 */
 {
 object r_731279 = args[0];
  
closureN_type c_733133;
object e_733151 [2];
c_733133.hdr.mark = gc_color_red;
 c_733133.hdr.grayed = 0;
c_733133.tag = closureN_tag;
 c_733133.fn = (function_type)__lambda_68;
c_733133.num_args = 1;
c_733133.num_elements = 2;
c_733133.elements = (object *)e_733151;
c_733133.elements[0] = ((closureN)self_732101)->elements[0];
c_733133.elements[1] = ((closureN)self_732101)->elements[1];


make_pair(c_733156,quote_new_91salt,NULL);c_733156.hdr.immutable = 1;

make_pair(c_733155,quote__75salt_75,&c_733156);c_733155.hdr.immutable = 1;

make_pair(c_733154,&c_733155,NULL);c_733154.hdr.immutable = 1;

make_pair(c_733159,quote_obj,NULL);c_733159.hdr.immutable = 1;

make_pair(c_733158,quote_hash_91func,&c_733159);c_733158.hdr.immutable = 1;

make_pair(c_733157,&c_733158,NULL);c_733157.hdr.immutable = 1;

make_pair(c_733153,&c_733154,&c_733157);c_733153.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_733133, ((closureN)self_732101)->elements[2], r_731279, &c_733153);; 
}

static void __lambda_68(void *data, object self_732102, int argc, object *args) /* object self_732102, object r_731276 */
 {
 object r_731276 = args[0];
  
closureN_type c_733135;
object e_733141 [1];
c_733135.hdr.mark = gc_color_red;
 c_733135.hdr.grayed = 0;
c_733135.tag = closureN_tag;
 c_733135.fn = (function_type)__lambda_69;
c_733135.num_args = 1;
c_733135.num_elements = 1;
c_733135.elements = (object *)e_733141;
c_733135.elements[0] = ((closureN)self_732102)->elements[0];


make_pair(c_733147,quote_new_91salt,NULL);c_733147.hdr.immutable = 1;

make_pair(c_733146,quote__75salt_75,&c_733147);c_733146.hdr.immutable = 1;

make_pair(c_733145,&c_733146,NULL);c_733145.hdr.immutable = 1;

make_pair(c_733150,quote_obj,NULL);c_733150.hdr.immutable = 1;

make_pair(c_733149,quote_hash_91func,&c_733150);c_733149.hdr.immutable = 1;

make_pair(c_733148,&c_733149,NULL);c_733148.hdr.immutable = 1;

make_pair(c_733144,&c_733145,&c_733148);c_733144.hdr.immutable = 1;

make_pair(c_733143,quote_parameterize,&c_733144);c_733143.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_733135, ((closureN)self_732102)->elements[1], r_731276, &c_733143);; 
}

static void __lambda_69(void *data, object self_732103, int argc, object *args) /* object self_732103, object r_731274 */
 {
 object r_731274 = args[0];
  
pair_type local_733140; 
return_direct_with_clo1(data,  ((closureN)self_732103)->elements[0], (((closure)  ((closureN)self_732103)->elements[0])->fn),  set_pair_as_expr(&local_733140, r_731274, boolean_f));; 
}

static void __lambda_48(void *data, object _, int argc, object *args) /* closure _,object k_731242, object expr_73167_73176_73185_73797, object rename_73168_73177_73186_73798, object compare_73169_73178_73187_73799 */
 {
object k_731242 = args[0]; object expr_73167_73176_73185_73797 = args[1]; object rename_73168_73177_73186_73798 = args[2];
  Cyc_st_add(data, "srfi/128.sld:hash-salt");

closureN_type c_733037;
object e_733082 [3];
c_733037.hdr.mark = gc_color_red;
 c_733037.hdr.grayed = 0;
c_733037.tag = closureN_tag;
 c_733037.fn = (function_type)__lambda_49;
c_733037.num_args = 1;
c_733037.num_elements = 3;
c_733037.elements = (object *)e_733082;
c_733037.elements[0] = expr_73167_73176_73185_73797;
c_733037.elements[1] = k_731242;
c_733037.elements[2] = rename_73168_73177_73186_73798;



return_direct_with_clo1(data,(closure)&c_733037,__lambda_49,  Cyc_cdr(data, expr_73167_73176_73185_73797));; 
}

static void __lambda_49(void *data, object self_732080, int argc, object *args) /* object self_732080, object v_931_73175_73183_73189_73801 */
 {
 object v_931_73175_73183_73189_73801 = args[0];
  
closureN_type c_733039;
object e_733057 [2];
c_733039.hdr.mark = gc_color_red;
 c_733039.hdr.grayed = 0;
c_733039.tag = closureN_tag;
 c_733039.fn = (function_type)__lambda_50;
c_733039.num_args = 0;
c_733039.num_elements = 2;
c_733039.elements = (object *)e_733057;
c_733039.elements[0] = ((closureN)self_732080)->elements[2];
c_733039.elements[1] = v_931_73175_73183_73189_73801;


closureN_type c_733058;
object e_733081 [2];
c_733058.hdr.mark = gc_color_red;
 c_733058.hdr.grayed = 0;
c_733058.tag = closureN_tag;
 c_733058.fn = (function_type)__lambda_53;
c_733058.num_args = 1;
c_733058.num_elements = 2;
c_733058.elements = (object *)e_733081;
c_733058.elements[0] = ((closureN)self_732080)->elements[0];
c_733058.elements[1] = ((closureN)self_732080)->elements[1];

return_direct_with_clo1(data,(closure)&c_733039,__lambda_50,  &c_733058);; 
}

static void __lambda_53(void *data, object self_732081, int argc, object *args) /* object self_732081, object tmp_73180_73182_73188_73800 */
 {
 object tmp_73180_73182_73188_73800 = args[0];
  
closureN_type c_733060;
object e_733074 [2];
c_733060.hdr.mark = gc_color_red;
 c_733060.hdr.grayed = 0;
c_733060.tag = closureN_tag;
 c_733060.fn = (function_type)__lambda_54;
c_733060.num_args = 0;
c_733060.num_elements = 2;
c_733060.elements = (object *)e_733074;
c_733060.elements[0] = ((closureN)self_732081)->elements[0];
c_733060.elements[1] = tmp_73180_73182_73188_73800;


closureN_type c_733075;
object e_733080 [1];
c_733075.hdr.mark = gc_color_red;
 c_733075.hdr.grayed = 0;
c_733075.tag = closureN_tag;
 c_733075.fn = (function_type)__lambda_56;
c_733075.num_args = 1;
c_733075.num_elements = 1;
c_733075.elements = (object *)e_733080;
c_733075.elements[0] = ((closureN)self_732081)->elements[1];

return_direct_with_clo1(data,(closure)&c_733060,__lambda_54,  &c_733075);; 
}

static void __lambda_56(void *data, object self_732082, int argc, object *args) /* object self_732082, object r_731243 */
 {
 object r_731243 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_732082)->elements[0], (((closure)  ((closureN)self_732082)->elements[0])->fn),  Cyc_car(data, r_731243));; 
}

static void __lambda_54(void *data, object self_732083, int argc, object *args) /* object self_732083, object k_731245 */
 {
 object k_731245 = args[0];
  if( (boolean_f != ((closureN)self_732083)->elements[1]) ){ 
  return_direct_with_clo1(data,  k_731245, (((closure)  k_731245)->fn),  ((closureN)self_732083)->elements[1]);
} else { 
  
closureN_type c_733065;
object e_733071 [1];
c_733065.hdr.mark = gc_color_red;
 c_733065.hdr.grayed = 0;
c_733065.tag = closureN_tag;
 c_733065.fn = (function_type)__lambda_55;
c_733065.num_args = 1;
c_733065.num_elements = 1;
c_733065.elements = (object *)e_733071;
c_733065.elements[0] = k_731245;


make_utf8_string_with_len(c_733072, "no expansion for", 16, 16);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_733065, &c_733072, ((closureN)self_732083)->elements[0]);}
;; 
}

static void __lambda_55(void *data, object self_732084, int argc, object *args) /* object self_732084, object r_731246 */
 {
 object r_731246 = args[0];
  
pair_type local_733070; 
return_direct_with_clo1(data,  ((closureN)self_732084)->elements[0], (((closure)  ((closureN)self_732084)->elements[0])->fn),  set_pair_as_expr(&local_733070, r_731246, boolean_f));; 
}

static void __lambda_50(void *data, object self_732085, int argc, object *args) /* object self_732085, object k_731248 */
 {
 object k_731248 = args[0];
    
if( (boolean_f != Cyc_is_null(((closureN)self_732085)->elements[1])) ){ 
  
closureN_type c_733045;
object e_733055 [1];
c_733045.hdr.mark = gc_color_red;
 c_733045.hdr.grayed = 0;
c_733045.tag = closureN_tag;
 c_733045.fn = (function_type)__lambda_51;
c_733045.num_args = 1;
c_733045.num_elements = 1;
c_733045.elements = (object *)e_733055;
c_733045.elements[0] = k_731248;

return_closcall2(data,  ((closureN)self_732085)->elements[0],  &c_733045, quote__75salt_75);
} else { 
  return_direct_with_clo1(data,  k_731248, (((closure)  k_731248)->fn),  boolean_f);}
;; 
}

static void __lambda_51(void *data, object self_732086, int argc, object *args) /* object self_732086, object r_731251 */
 {
 object r_731251 = args[0];
  
closureN_type c_733047;
object e_733053 [1];
c_733047.hdr.mark = gc_color_red;
 c_733047.hdr.grayed = 0;
c_733047.tag = closureN_tag;
 c_733047.fn = (function_type)__lambda_52;
c_733047.num_args = 1;
c_733047.num_elements = 1;
c_733047.elements = (object *)e_733053;
c_733047.elements[0] = ((closureN)self_732086)->elements[0];


make_pair(c_733054,quote__75salt_75,NULL);c_733054.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_733047, r_731251, NULL, &c_733054);; 
}

static void __lambda_52(void *data, object self_732087, int argc, object *args) /* object self_732087, object r_731250 */
 {
 object r_731250 = args[0];
  
pair_type local_733052; 
return_direct_with_clo1(data,  ((closureN)self_732087)->elements[0], (((closure)  ((closureN)self_732087)->elements[0])->fn),  set_pair_as_expr(&local_733052, r_731250, boolean_f));; 
}

static void __lambda_43(void *data, object _, int argc, object *args) /* closure _,object k_731230, object expr_73140_73149_73158_73792, object rename_73141_73150_73159_73793, object compare_73142_73151_73160_73794 */
 {
object k_731230 = args[0]; object expr_73140_73149_73158_73792 = args[1];
  Cyc_st_add(data, "srfi/128.sld:hash-bound");

closureN_type c_733001;
object e_733032 [2];
c_733001.hdr.mark = gc_color_red;
 c_733001.hdr.grayed = 0;
c_733001.tag = closureN_tag;
 c_733001.fn = (function_type)__lambda_44;
c_733001.num_args = 1;
c_733001.num_elements = 2;
c_733001.elements = (object *)e_733032;
c_733001.elements[0] = expr_73140_73149_73158_73792;
c_733001.elements[1] = k_731230;



return_direct_with_clo1(data,(closure)&c_733001,__lambda_44,  Cyc_cdr(data, expr_73140_73149_73158_73792));; 
}

static void __lambda_44(void *data, object self_732076, int argc, object *args) /* object self_732076, object v_931_73148_73156_73162_73796 */
 {
 object v_931_73148_73156_73162_73796 = args[0];
  object tmp_73153_73155_73161_73795;
    
if( (boolean_f != Cyc_is_null(v_931_73148_73156_73162_73796)) ){ 
  object local_733008 = alloca(sizeof(pair_type)); 
  tmp_73153_73155_73161_73795 = set_pair_as_expr(local_733008, obj_int2obj(33554432), boolean_f);
} else { 
  tmp_73153_73155_73161_73795 = boolean_f;}
;
closureN_type c_733011;
object e_733025 [2];
c_733011.hdr.mark = gc_color_red;
 c_733011.hdr.grayed = 0;
c_733011.tag = closureN_tag;
 c_733011.fn = (function_type)__lambda_45;
c_733011.num_args = 0;
c_733011.num_elements = 2;
c_733011.elements = (object *)e_733025;
c_733011.elements[0] = ((closureN)self_732076)->elements[0];
c_733011.elements[1] = tmp_73153_73155_73161_73795;


closureN_type c_733026;
object e_733031 [1];
c_733026.hdr.mark = gc_color_red;
 c_733026.hdr.grayed = 0;
c_733026.tag = closureN_tag;
 c_733026.fn = (function_type)__lambda_47;
c_733026.num_args = 1;
c_733026.num_elements = 1;
c_733026.elements = (object *)e_733031;
c_733026.elements[0] = ((closureN)self_732076)->elements[1];

return_direct_with_clo1(data,(closure)&c_733011,__lambda_45,  &c_733026);; 
}

static void __lambda_47(void *data, object self_732077, int argc, object *args) /* object self_732077, object r_731231 */
 {
 object r_731231 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_732077)->elements[0], (((closure)  ((closureN)self_732077)->elements[0])->fn),  Cyc_car(data, r_731231));; 
}

static void __lambda_45(void *data, object self_732078, int argc, object *args) /* object self_732078, object k_731233 */
 {
 object k_731233 = args[0];
  if( (boolean_f != ((closureN)self_732078)->elements[1]) ){ 
  return_direct_with_clo1(data,  k_731233, (((closure)  k_731233)->fn),  ((closureN)self_732078)->elements[1]);
} else { 
  
closureN_type c_733016;
object e_733022 [1];
c_733016.hdr.mark = gc_color_red;
 c_733016.hdr.grayed = 0;
c_733016.tag = closureN_tag;
 c_733016.fn = (function_type)__lambda_46;
c_733016.num_args = 1;
c_733016.num_elements = 1;
c_733016.elements = (object *)e_733022;
c_733016.elements[0] = k_731233;


make_utf8_string_with_len(c_733023, "no expansion for", 16, 16);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_733016, &c_733023, ((closureN)self_732078)->elements[0]);}
;; 
}

static void __lambda_46(void *data, object self_732079, int argc, object *args) /* object self_732079, object r_731234 */
 {
 object r_731234 = args[0];
  
pair_type local_733021; 
return_direct_with_clo1(data,  ((closureN)self_732079)->elements[0], (((closure)  ((closureN)self_732079)->elements[0])->fn),  set_pair_as_expr(&local_733021, r_731234, boolean_f));; 
}

static void __lambda_1(void *data, object _, int argc, object *args) /* closure _,object k_731111, object expr_735_7337_7396_73752, object rename_736_7338_7397_73753, object compare_737_7339_7398_73754 */
 {
object k_731111 = args[0]; object expr_735_7337_7396_73752 = args[1]; object rename_736_7338_7397_73753 = args[2];
  Cyc_st_add(data, "srfi/128.sld:comparator-if<=>");

closureN_type c_732495;
object e_732996 [3];
c_732495.hdr.mark = gc_color_red;
 c_732495.hdr.grayed = 0;
c_732495.tag = closureN_tag;
 c_732495.fn = (function_type)__lambda_2;
c_732495.num_args = 1;
c_732495.num_elements = 3;
c_732495.elements = (object *)e_732996;
c_732495.elements[0] = expr_735_7337_7396_73752;
c_732495.elements[1] = k_731111;
c_732495.elements[2] = rename_736_7338_7397_73753;



return_direct_with_clo1(data,(closure)&c_732495,__lambda_2,  Cyc_cdr(data, expr_735_7337_7396_73752));; 
}

static void __lambda_2(void *data, object self_732035, int argc, object *args) /* object self_732035, object v_931_7313_7374_73120_73776 */
 {
 object v_931_7313_7374_73120_73776 = args[0];
  
closureN_type c_732497;
object e_732657 [2];
c_732497.hdr.mark = gc_color_red;
 c_732497.hdr.grayed = 0;
c_732497.tag = closureN_tag;
 c_732497.fn = (function_type)__lambda_3;
c_732497.num_args = 0;
c_732497.num_elements = 2;
c_732497.elements = (object *)e_732657;
c_732497.elements[0] = ((closureN)self_732035)->elements[2];
c_732497.elements[1] = v_931_7313_7374_73120_73776;


closureN_type c_732658;
object e_732995 [3];
c_732658.hdr.mark = gc_color_red;
 c_732658.hdr.grayed = 0;
c_732658.tag = closureN_tag;
 c_732658.fn = (function_type)__lambda_14;
c_732658.num_args = 1;
c_732658.num_elements = 3;
c_732658.elements = (object *)e_732995;
c_732658.elements[0] = ((closureN)self_732035)->elements[0];
c_732658.elements[1] = ((closureN)self_732035)->elements[1];
c_732658.elements[2] = ((closureN)self_732035)->elements[2];

return_direct_with_clo1(data,(closure)&c_732497,__lambda_3,  &c_732658);; 
}

static void __lambda_14(void *data, object self_732036, int argc, object *args) /* object self_732036, object tmp_7341_7343_7399_73755 */
 {
 object tmp_7341_7343_7399_73755 = args[0];
  
closureN_type c_732660;
object e_732988 [3];
c_732660.hdr.mark = gc_color_red;
 c_732660.hdr.grayed = 0;
c_732660.tag = closureN_tag;
 c_732660.fn = (function_type)__lambda_15;
c_732660.num_args = 0;
c_732660.num_elements = 3;
c_732660.elements = (object *)e_732988;
c_732660.elements[0] = ((closureN)self_732036)->elements[0];
c_732660.elements[1] = ((closureN)self_732036)->elements[2];
c_732660.elements[2] = tmp_7341_7343_7399_73755;


closureN_type c_732989;
object e_732994 [1];
c_732989.hdr.mark = gc_color_red;
 c_732989.hdr.grayed = 0;
c_732989.tag = closureN_tag;
 c_732989.fn = (function_type)__lambda_42;
c_732989.num_args = 1;
c_732989.num_elements = 1;
c_732989.elements = (object *)e_732994;
c_732989.elements[0] = ((closureN)self_732036)->elements[1];

return_direct_with_clo1(data,(closure)&c_732660,__lambda_15,  &c_732989);; 
}

static void __lambda_42(void *data, object self_732037, int argc, object *args) /* object self_732037, object r_731112 */
 {
 object r_731112 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_732037)->elements[0], (((closure)  ((closureN)self_732037)->elements[0])->fn),  Cyc_car(data, r_731112));; 
}

static void __lambda_15(void *data, object self_732038, int argc, object *args) /* object self_732038, object k_731114 */
 {
 object k_731114 = args[0];
  if( (boolean_f != ((closureN)self_732038)->elements[2]) ){ 
  return_direct_with_clo1(data,  k_731114, (((closure)  k_731114)->fn),  ((closureN)self_732038)->elements[2]);
} else { 
  
closureN_type c_732665;
object e_732984 [3];
c_732665.hdr.mark = gc_color_red;
 c_732665.hdr.grayed = 0;
c_732665.tag = closureN_tag;
 c_732665.fn = (function_type)__lambda_16;
c_732665.num_args = 1;
c_732665.num_elements = 3;
c_732665.elements = (object *)e_732984;
c_732665.elements[0] = ((closureN)self_732038)->elements[0];
c_732665.elements[1] = k_731114;
c_732665.elements[2] = ((closureN)self_732038)->elements[1];



return_direct_with_clo1(data,(closure)&c_732665,__lambda_16,  Cyc_cdr(data, ((closureN)self_732038)->elements[0]));}
;; 
}

static void __lambda_16(void *data, object self_732039, int argc, object *args) /* object self_732039, object v_9312_7324_7348_73101_73757 */
 {
 object v_9312_7324_7348_73101_73757 = args[0];
  
closureN_type c_732667;
object e_732969 [2];
c_732667.hdr.mark = gc_color_red;
 c_732667.hdr.grayed = 0;
c_732667.tag = closureN_tag;
 c_732667.fn = (function_type)__lambda_17;
c_732667.num_args = 0;
c_732667.num_elements = 2;
c_732667.elements = (object *)e_732969;
c_732667.elements[0] = ((closureN)self_732039)->elements[2];
c_732667.elements[1] = v_9312_7324_7348_73101_73757;


closureN_type c_732970;
object e_732983 [2];
c_732970.hdr.mark = gc_color_red;
 c_732970.hdr.grayed = 0;
c_732970.tag = closureN_tag;
 c_732970.fn = (function_type)__lambda_40;
c_732970.num_args = 1;
c_732970.num_elements = 2;
c_732970.elements = (object *)e_732983;
c_732970.elements[0] = ((closureN)self_732039)->elements[0];
c_732970.elements[1] = ((closureN)self_732039)->elements[1];

return_direct_with_clo1(data,(closure)&c_732667,__lambda_17,  &c_732970);; 
}

static void __lambda_40(void *data, object self_732040, int argc, object *args) /* object self_732040, object tmp_7345_7347_73100_73756 */
 {
 object tmp_7345_7347_73100_73756 = args[0];
  if( (boolean_f != tmp_7345_7347_73100_73756) ){ 
  return_direct_with_clo1(data,  ((closureN)self_732040)->elements[1], (((closure)  ((closureN)self_732040)->elements[1])->fn),  tmp_7345_7347_73100_73756);
} else { 
  
closureN_type c_732974;
object e_732980 [1];
c_732974.hdr.mark = gc_color_red;
 c_732974.hdr.grayed = 0;
c_732974.tag = closureN_tag;
 c_732974.fn = (function_type)__lambda_41;
c_732974.num_args = 1;
c_732974.num_elements = 1;
c_732974.elements = (object *)e_732980;
c_732974.elements[0] = ((closureN)self_732040)->elements[1];


make_utf8_string_with_len(c_732981, "no expansion for", 16, 16);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_732974, &c_732981, ((closureN)self_732040)->elements[0]);}
;; 
}

static void __lambda_41(void *data, object self_732041, int argc, object *args) /* object self_732041, object r_731116 */
 {
 object r_731116 = args[0];
  
pair_type local_732979; 
return_direct_with_clo1(data,  ((closureN)self_732041)->elements[0], (((closure)  ((closureN)self_732041)->elements[0])->fn),  set_pair_as_expr(&local_732979, r_731116, boolean_f));; 
}

static void __lambda_17(void *data, object self_732042, int argc, object *args) /* object self_732042, object k_731118 */
 {
 object k_731118 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_732042)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_732042)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_732042)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_732042)->elements[1]))))) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_732042)->elements[1])))))) ){ 
    
  
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_732042)->elements[1]))))))) ){ 
    
  
  
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_732042)->elements[1])))))))) ){ 
  
closureN_type c_732733;
object e_732961 [3];
c_732733.hdr.mark = gc_color_red;
 c_732733.hdr.grayed = 0;
c_732733.tag = closureN_tag;
 c_732733.fn = (function_type)__lambda_18;
c_732733.num_args = 1;
c_732733.num_elements = 3;
c_732733.elements = (object *)e_732961;
c_732733.elements[0] = k_731118;
c_732733.elements[1] = ((closureN)self_732042)->elements[0];
c_732733.elements[2] = ((closureN)self_732042)->elements[1];

return_closcall2(data,  ((closureN)self_732042)->elements[0],  &c_732733, quote_cond);
} else { 
  return_direct_with_clo1(data,  k_731118, (((closure)  k_731118)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_731118, (((closure)  k_731118)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_731118, (((closure)  k_731118)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_731118, (((closure)  k_731118)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_731118, (((closure)  k_731118)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_731118, (((closure)  k_731118)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_731118, (((closure)  k_731118)->fn),  boolean_f);}
;; 
}

static void __lambda_18(void *data, object self_732043, int argc, object *args) /* object self_732043, object r_731139 */
 {
 object r_731139 = args[0];
  
closureN_type c_732736;
object e_732960 [4];
c_732736.hdr.mark = gc_color_red;
 c_732736.hdr.grayed = 0;
c_732736.tag = closureN_tag;
 c_732736.fn = (function_type)__lambda_19;
c_732736.num_args = 1;
c_732736.num_elements = 4;
c_732736.elements = (object *)e_732960;
c_732736.elements[0] = ((closureN)self_732043)->elements[0];
c_732736.elements[1] = r_731139;
c_732736.elements[2] = ((closureN)self_732043)->elements[1];
c_732736.elements[3] = ((closureN)self_732043)->elements[2];

return_closcall2(data,  ((closureN)self_732043)->elements[1],  &c_732736, quote__123_127);; 
}

static void __lambda_19(void *data, object self_732044, int argc, object *args) /* object self_732044, object r_731177 */
 {
 object r_731177 = args[0];
  
closureN_type c_732738;
object e_732951 [5];
c_732738.hdr.mark = gc_color_red;
 c_732738.hdr.grayed = 0;
c_732738.tag = closureN_tag;
 c_732738.fn = (function_type)__lambda_20;
c_732738.num_args = 1;
c_732738.num_elements = 5;
c_732738.elements = (object *)e_732951;
c_732738.elements[0] = ((closureN)self_732044)->elements[0];
c_732738.elements[1] = ((closureN)self_732044)->elements[1];
c_732738.elements[2] = r_731177;
c_732738.elements[3] = ((closureN)self_732044)->elements[2];
c_732738.elements[4] = ((closureN)self_732044)->elements[3];








make_pair(c_732959,quote_b,NULL);c_732959.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732738, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_732044)->elements[3]))), NULL, &c_732959);; 
}

static void __lambda_20(void *data, object self_732045, int argc, object *args) /* object self_732045, object r_731182 */
 {
 object r_731182 = args[0];
  
closureN_type c_732740;
object e_732943 [5];
c_732740.hdr.mark = gc_color_red;
 c_732740.hdr.grayed = 0;
c_732740.tag = closureN_tag;
 c_732740.fn = (function_type)__lambda_21;
c_732740.num_args = 1;
c_732740.num_elements = 5;
c_732740.elements = (object *)e_732943;
c_732740.elements[0] = ((closureN)self_732045)->elements[0];
c_732740.elements[1] = ((closureN)self_732045)->elements[1];
c_732740.elements[2] = ((closureN)self_732045)->elements[2];
c_732740.elements[3] = ((closureN)self_732045)->elements[3];
c_732740.elements[4] = ((closureN)self_732045)->elements[4];






make_pair(c_732950,quote_b,NULL);c_732950.hdr.immutable = 1;

make_pair(c_732949,quote_a,&c_732950);c_732949.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732740, Cyc_car(data, Cyc_cdr(data, ((closureN)self_732045)->elements[4])), r_731182, &c_732949);; 
}

static void __lambda_21(void *data, object self_732046, int argc, object *args) /* object self_732046, object r_731180 */
 {
 object r_731180 = args[0];
  
closureN_type c_732742;
object e_732936 [5];
c_732742.hdr.mark = gc_color_red;
 c_732742.hdr.grayed = 0;
c_732742.tag = closureN_tag;
 c_732742.fn = (function_type)__lambda_22;
c_732742.num_args = 1;
c_732742.num_elements = 5;
c_732742.elements = (object *)e_732936;
c_732742.elements[0] = ((closureN)self_732046)->elements[0];
c_732742.elements[1] = ((closureN)self_732046)->elements[1];
c_732742.elements[2] = ((closureN)self_732046)->elements[2];
c_732742.elements[3] = ((closureN)self_732046)->elements[3];
c_732742.elements[4] = ((closureN)self_732046)->elements[4];




make_pair(c_732942,quote_b,NULL);c_732942.hdr.immutable = 1;

make_pair(c_732941,quote_a,&c_732942);c_732941.hdr.immutable = 1;

make_pair(c_732940,quote_comparator,&c_732941);c_732940.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732742, Cyc_car(data, ((closureN)self_732046)->elements[4]), r_731180, &c_732940);; 
}

static void __lambda_22(void *data, object self_732047, int argc, object *args) /* object self_732047, object r_731178 */
 {
 object r_731178 = args[0];
  
closureN_type c_732744;
object e_732930 [4];
c_732744.hdr.mark = gc_color_red;
 c_732744.hdr.grayed = 0;
c_732744.tag = closureN_tag;
 c_732744.fn = (function_type)__lambda_23;
c_732744.num_args = 1;
c_732744.num_elements = 4;
c_732744.elements = (object *)e_732930;
c_732744.elements[0] = ((closureN)self_732047)->elements[0];
c_732744.elements[1] = ((closureN)self_732047)->elements[1];
c_732744.elements[2] = ((closureN)self_732047)->elements[3];
c_732744.elements[3] = ((closureN)self_732047)->elements[4];


make_pair(c_732935,quote_b,NULL);c_732935.hdr.immutable = 1;

make_pair(c_732934,quote_a,&c_732935);c_732934.hdr.immutable = 1;

make_pair(c_732933,quote_comparator,&c_732934);c_732933.hdr.immutable = 1;

make_pair(c_732932,quote__123_127,&c_732933);c_732932.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732744, ((closureN)self_732047)->elements[2], r_731178, &c_732932);; 
}

static void __lambda_23(void *data, object self_732048, int argc, object *args) /* object self_732048, object r_731172 */
 {
 object r_731172 = args[0];
  
closureN_type c_732746;
object e_732917 [5];
c_732746.hdr.mark = gc_color_red;
 c_732746.hdr.grayed = 0;
c_732746.tag = closureN_tag;
 c_732746.fn = (function_type)__lambda_24;
c_732746.num_args = 1;
c_732746.num_elements = 5;
c_732746.elements = (object *)e_732917;
c_732746.elements[0] = ((closureN)self_732048)->elements[0];
c_732746.elements[1] = ((closureN)self_732048)->elements[1];
c_732746.elements[2] = r_731172;
c_732746.elements[3] = ((closureN)self_732048)->elements[2];
c_732746.elements[4] = ((closureN)self_732048)->elements[3];












make_pair(c_732929,quote_equal,NULL);c_732929.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732746, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_732048)->elements[3]))))), NULL, &c_732929);; 
}

static void __lambda_24(void *data, object self_732049, int argc, object *args) /* object self_732049, object r_731173 */
 {
 object r_731173 = args[0];
  
closureN_type c_732748;
object e_732909 [4];
c_732748.hdr.mark = gc_color_red;
 c_732748.hdr.grayed = 0;
c_732748.tag = closureN_tag;
 c_732748.fn = (function_type)__lambda_25;
c_732748.num_args = 1;
c_732748.num_elements = 4;
c_732748.elements = (object *)e_732909;
c_732748.elements[0] = ((closureN)self_732049)->elements[0];
c_732748.elements[1] = ((closureN)self_732049)->elements[1];
c_732748.elements[2] = ((closureN)self_732049)->elements[3];
c_732748.elements[3] = ((closureN)self_732049)->elements[4];


make_pair(c_732915,quote_b,NULL);c_732915.hdr.immutable = 1;

make_pair(c_732914,quote_a,&c_732915);c_732914.hdr.immutable = 1;

make_pair(c_732913,quote_comparator,&c_732914);c_732913.hdr.immutable = 1;

make_pair(c_732912,quote__123_127,&c_732913);c_732912.hdr.immutable = 1;

make_pair(c_732916,quote_equal,NULL);c_732916.hdr.immutable = 1;

make_pair(c_732911,&c_732912,&c_732916);c_732911.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732748, ((closureN)self_732049)->elements[2], r_731173, &c_732911);; 
}

static void __lambda_25(void *data, object self_732050, int argc, object *args) /* object self_732050, object r_731142 */
 {
 object r_731142 = args[0];
  
closureN_type c_732751;
object e_732908 [5];
c_732751.hdr.mark = gc_color_red;
 c_732751.hdr.grayed = 0;
c_732751.tag = closureN_tag;
 c_732751.fn = (function_type)__lambda_26;
c_732751.num_args = 1;
c_732751.num_elements = 5;
c_732751.elements = (object *)e_732908;
c_732751.elements[0] = ((closureN)self_732050)->elements[0];
c_732751.elements[1] = ((closureN)self_732050)->elements[1];
c_732751.elements[2] = r_731142;
c_732751.elements[3] = ((closureN)self_732050)->elements[2];
c_732751.elements[4] = ((closureN)self_732050)->elements[3];

return_closcall2(data,  ((closureN)self_732050)->elements[2],  &c_732751, quote__121_127);; 
}

static void __lambda_26(void *data, object self_732051, int argc, object *args) /* object self_732051, object r_731162 */
 {
 object r_731162 = args[0];
  
closureN_type c_732753;
object e_732899 [6];
c_732753.hdr.mark = gc_color_red;
 c_732753.hdr.grayed = 0;
c_732753.tag = closureN_tag;
 c_732753.fn = (function_type)__lambda_27;
c_732753.num_args = 1;
c_732753.num_elements = 6;
c_732753.elements = (object *)e_732899;
c_732753.elements[0] = ((closureN)self_732051)->elements[0];
c_732753.elements[1] = ((closureN)self_732051)->elements[1];
c_732753.elements[2] = ((closureN)self_732051)->elements[2];
c_732753.elements[3] = r_731162;
c_732753.elements[4] = ((closureN)self_732051)->elements[3];
c_732753.elements[5] = ((closureN)self_732051)->elements[4];








make_pair(c_732907,quote_b,NULL);c_732907.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732753, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_732051)->elements[4]))), NULL, &c_732907);; 
}

static void __lambda_27(void *data, object self_732052, int argc, object *args) /* object self_732052, object r_731167 */
 {
 object r_731167 = args[0];
  
closureN_type c_732755;
object e_732891 [6];
c_732755.hdr.mark = gc_color_red;
 c_732755.hdr.grayed = 0;
c_732755.tag = closureN_tag;
 c_732755.fn = (function_type)__lambda_28;
c_732755.num_args = 1;
c_732755.num_elements = 6;
c_732755.elements = (object *)e_732891;
c_732755.elements[0] = ((closureN)self_732052)->elements[0];
c_732755.elements[1] = ((closureN)self_732052)->elements[1];
c_732755.elements[2] = ((closureN)self_732052)->elements[2];
c_732755.elements[3] = ((closureN)self_732052)->elements[3];
c_732755.elements[4] = ((closureN)self_732052)->elements[4];
c_732755.elements[5] = ((closureN)self_732052)->elements[5];






make_pair(c_732898,quote_b,NULL);c_732898.hdr.immutable = 1;

make_pair(c_732897,quote_a,&c_732898);c_732897.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732755, Cyc_car(data, Cyc_cdr(data, ((closureN)self_732052)->elements[5])), r_731167, &c_732897);; 
}

static void __lambda_28(void *data, object self_732053, int argc, object *args) /* object self_732053, object r_731165 */
 {
 object r_731165 = args[0];
  
closureN_type c_732757;
object e_732884 [6];
c_732757.hdr.mark = gc_color_red;
 c_732757.hdr.grayed = 0;
c_732757.tag = closureN_tag;
 c_732757.fn = (function_type)__lambda_29;
c_732757.num_args = 1;
c_732757.num_elements = 6;
c_732757.elements = (object *)e_732884;
c_732757.elements[0] = ((closureN)self_732053)->elements[0];
c_732757.elements[1] = ((closureN)self_732053)->elements[1];
c_732757.elements[2] = ((closureN)self_732053)->elements[2];
c_732757.elements[3] = ((closureN)self_732053)->elements[3];
c_732757.elements[4] = ((closureN)self_732053)->elements[4];
c_732757.elements[5] = ((closureN)self_732053)->elements[5];




make_pair(c_732890,quote_b,NULL);c_732890.hdr.immutable = 1;

make_pair(c_732889,quote_a,&c_732890);c_732889.hdr.immutable = 1;

make_pair(c_732888,quote_comparator,&c_732889);c_732888.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732757, Cyc_car(data, ((closureN)self_732053)->elements[5]), r_731165, &c_732888);; 
}

static void __lambda_29(void *data, object self_732054, int argc, object *args) /* object self_732054, object r_731163 */
 {
 object r_731163 = args[0];
  
closureN_type c_732759;
object e_732878 [5];
c_732759.hdr.mark = gc_color_red;
 c_732759.hdr.grayed = 0;
c_732759.tag = closureN_tag;
 c_732759.fn = (function_type)__lambda_30;
c_732759.num_args = 1;
c_732759.num_elements = 5;
c_732759.elements = (object *)e_732878;
c_732759.elements[0] = ((closureN)self_732054)->elements[0];
c_732759.elements[1] = ((closureN)self_732054)->elements[1];
c_732759.elements[2] = ((closureN)self_732054)->elements[2];
c_732759.elements[3] = ((closureN)self_732054)->elements[4];
c_732759.elements[4] = ((closureN)self_732054)->elements[5];


make_pair(c_732883,quote_b,NULL);c_732883.hdr.immutable = 1;

make_pair(c_732882,quote_a,&c_732883);c_732882.hdr.immutable = 1;

make_pair(c_732881,quote_comparator,&c_732882);c_732881.hdr.immutable = 1;

make_pair(c_732880,quote__121_127,&c_732881);c_732880.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732759, ((closureN)self_732054)->elements[3], r_731163, &c_732880);; 
}

static void __lambda_30(void *data, object self_732055, int argc, object *args) /* object self_732055, object r_731157 */
 {
 object r_731157 = args[0];
  
closureN_type c_732761;
object e_732867 [6];
c_732761.hdr.mark = gc_color_red;
 c_732761.hdr.grayed = 0;
c_732761.tag = closureN_tag;
 c_732761.fn = (function_type)__lambda_31;
c_732761.num_args = 1;
c_732761.num_elements = 6;
c_732761.elements = (object *)e_732867;
c_732761.elements[0] = ((closureN)self_732055)->elements[0];
c_732761.elements[1] = ((closureN)self_732055)->elements[1];
c_732761.elements[2] = ((closureN)self_732055)->elements[2];
c_732761.elements[3] = r_731157;
c_732761.elements[4] = ((closureN)self_732055)->elements[3];
c_732761.elements[5] = ((closureN)self_732055)->elements[4];










make_pair(c_732877,quote_less,NULL);c_732877.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732761, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_732055)->elements[4])))), NULL, &c_732877);; 
}

static void __lambda_31(void *data, object self_732056, int argc, object *args) /* object self_732056, object r_731158 */
 {
 object r_731158 = args[0];
  
closureN_type c_732763;
object e_732859 [5];
c_732763.hdr.mark = gc_color_red;
 c_732763.hdr.grayed = 0;
c_732763.tag = closureN_tag;
 c_732763.fn = (function_type)__lambda_32;
c_732763.num_args = 1;
c_732763.num_elements = 5;
c_732763.elements = (object *)e_732859;
c_732763.elements[0] = ((closureN)self_732056)->elements[0];
c_732763.elements[1] = ((closureN)self_732056)->elements[1];
c_732763.elements[2] = ((closureN)self_732056)->elements[2];
c_732763.elements[3] = ((closureN)self_732056)->elements[4];
c_732763.elements[4] = ((closureN)self_732056)->elements[5];


make_pair(c_732865,quote_b,NULL);c_732865.hdr.immutable = 1;

make_pair(c_732864,quote_a,&c_732865);c_732864.hdr.immutable = 1;

make_pair(c_732863,quote_comparator,&c_732864);c_732863.hdr.immutable = 1;

make_pair(c_732862,quote__121_127,&c_732863);c_732862.hdr.immutable = 1;

make_pair(c_732866,quote_less,NULL);c_732866.hdr.immutable = 1;

make_pair(c_732861,&c_732862,&c_732866);c_732861.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732763, ((closureN)self_732056)->elements[3], r_731158, &c_732861);; 
}

static void __lambda_32(void *data, object self_732057, int argc, object *args) /* object self_732057, object r_731145 */
 {
 object r_731145 = args[0];
  
closureN_type c_732766;
object e_732858 [5];
c_732766.hdr.mark = gc_color_red;
 c_732766.hdr.grayed = 0;
c_732766.tag = closureN_tag;
 c_732766.fn = (function_type)__lambda_33;
c_732766.num_args = 1;
c_732766.num_elements = 5;
c_732766.elements = (object *)e_732858;
c_732766.elements[0] = ((closureN)self_732057)->elements[0];
c_732766.elements[1] = ((closureN)self_732057)->elements[1];
c_732766.elements[2] = ((closureN)self_732057)->elements[2];
c_732766.elements[3] = r_731145;
c_732766.elements[4] = ((closureN)self_732057)->elements[4];

return_closcall2(data,  ((closureN)self_732057)->elements[3],  &c_732766, quote__else);; 
}

static void __lambda_33(void *data, object self_732058, int argc, object *args) /* object self_732058, object r_731151 */
 {
 object r_731151 = args[0];
  
closureN_type c_732768;
object e_732843 [5];
c_732768.hdr.mark = gc_color_red;
 c_732768.hdr.grayed = 0;
c_732768.tag = closureN_tag;
 c_732768.fn = (function_type)__lambda_34;
c_732768.num_args = 1;
c_732768.num_elements = 5;
c_732768.elements = (object *)e_732843;
c_732768.elements[0] = ((closureN)self_732058)->elements[0];
c_732768.elements[1] = ((closureN)self_732058)->elements[1];
c_732768.elements[2] = ((closureN)self_732058)->elements[2];
c_732768.elements[3] = ((closureN)self_732058)->elements[3];
c_732768.elements[4] = r_731151;














make_pair(c_732857,quote_greater,NULL);c_732857.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732768, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_732058)->elements[4])))))), NULL, &c_732857);; 
}

static void __lambda_34(void *data, object self_732059, int argc, object *args) /* object self_732059, object r_731152 */
 {
 object r_731152 = args[0];
  
closureN_type c_732770;
object e_732839 [4];
c_732770.hdr.mark = gc_color_red;
 c_732770.hdr.grayed = 0;
c_732770.tag = closureN_tag;
 c_732770.fn = (function_type)__lambda_35;
c_732770.num_args = 1;
c_732770.num_elements = 4;
c_732770.elements = (object *)e_732839;
c_732770.elements[0] = ((closureN)self_732059)->elements[0];
c_732770.elements[1] = ((closureN)self_732059)->elements[1];
c_732770.elements[2] = ((closureN)self_732059)->elements[2];
c_732770.elements[3] = ((closureN)self_732059)->elements[3];


make_pair(c_732842,quote_greater,NULL);c_732842.hdr.immutable = 1;

make_pair(c_732841,quote__else,&c_732842);c_732841.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732770, ((closureN)self_732059)->elements[4], r_731152, &c_732841);; 
}

static void __lambda_35(void *data, object self_732060, int argc, object *args) /* object self_732060, object r_731148 */
 {
 object r_731148 = args[0];
  
closureN_type c_732772;
object e_732835 [4];
c_732772.hdr.mark = gc_color_red;
 c_732772.hdr.grayed = 0;
c_732772.tag = closureN_tag;
 c_732772.fn = (function_type)__lambda_36;
c_732772.num_args = 1;
c_732772.num_elements = 4;
c_732772.elements = (object *)e_732835;
c_732772.elements[0] = ((closureN)self_732060)->elements[0];
c_732772.elements[1] = ((closureN)self_732060)->elements[1];
c_732772.elements[2] = ((closureN)self_732060)->elements[2];
c_732772.elements[3] = ((closureN)self_732060)->elements[3];


make_pair(c_732838,quote_greater,NULL);c_732838.hdr.immutable = 1;

make_pair(c_732837,quote__else,&c_732838);c_732837.hdr.immutable = 1;

make_pair(c_732836,&c_732837,NULL);c_732836.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732772, r_731148, NULL, &c_732836);; 
}

static void __lambda_36(void *data, object self_732061, int argc, object *args) /* object self_732061, object r_731146 */
 {
 object r_731146 = args[0];
  
closureN_type c_732774;
object e_732823 [3];
c_732774.hdr.mark = gc_color_red;
 c_732774.hdr.grayed = 0;
c_732774.tag = closureN_tag;
 c_732774.fn = (function_type)__lambda_37;
c_732774.num_args = 1;
c_732774.num_elements = 3;
c_732774.elements = (object *)e_732823;
c_732774.elements[0] = ((closureN)self_732061)->elements[0];
c_732774.elements[1] = ((closureN)self_732061)->elements[1];
c_732774.elements[2] = ((closureN)self_732061)->elements[2];


make_pair(c_732830,quote_b,NULL);c_732830.hdr.immutable = 1;

make_pair(c_732829,quote_a,&c_732830);c_732829.hdr.immutable = 1;

make_pair(c_732828,quote_comparator,&c_732829);c_732828.hdr.immutable = 1;

make_pair(c_732827,quote__121_127,&c_732828);c_732827.hdr.immutable = 1;

make_pair(c_732831,quote_less,NULL);c_732831.hdr.immutable = 1;

make_pair(c_732826,&c_732827,&c_732831);c_732826.hdr.immutable = 1;

make_pair(c_732834,quote_greater,NULL);c_732834.hdr.immutable = 1;

make_pair(c_732833,quote__else,&c_732834);c_732833.hdr.immutable = 1;

make_pair(c_732832,&c_732833,NULL);c_732832.hdr.immutable = 1;

make_pair(c_732825,&c_732826,&c_732832);c_732825.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732774, ((closureN)self_732061)->elements[3], r_731146, &c_732825);; 
}

static void __lambda_37(void *data, object self_732062, int argc, object *args) /* object self_732062, object r_731143 */
 {
 object r_731143 = args[0];
  
closureN_type c_732776;
object e_732804 [2];
c_732776.hdr.mark = gc_color_red;
 c_732776.hdr.grayed = 0;
c_732776.tag = closureN_tag;
 c_732776.fn = (function_type)__lambda_38;
c_732776.num_args = 1;
c_732776.num_elements = 2;
c_732776.elements = (object *)e_732804;
c_732776.elements[0] = ((closureN)self_732062)->elements[0];
c_732776.elements[1] = ((closureN)self_732062)->elements[1];


make_pair(c_732811,quote_b,NULL);c_732811.hdr.immutable = 1;

make_pair(c_732810,quote_a,&c_732811);c_732810.hdr.immutable = 1;

make_pair(c_732809,quote_comparator,&c_732810);c_732809.hdr.immutable = 1;

make_pair(c_732808,quote__123_127,&c_732809);c_732808.hdr.immutable = 1;

make_pair(c_732812,quote_equal,NULL);c_732812.hdr.immutable = 1;

make_pair(c_732807,&c_732808,&c_732812);c_732807.hdr.immutable = 1;

make_pair(c_732818,quote_b,NULL);c_732818.hdr.immutable = 1;

make_pair(c_732817,quote_a,&c_732818);c_732817.hdr.immutable = 1;

make_pair(c_732816,quote_comparator,&c_732817);c_732816.hdr.immutable = 1;

make_pair(c_732815,quote__121_127,&c_732816);c_732815.hdr.immutable = 1;

make_pair(c_732819,quote_less,NULL);c_732819.hdr.immutable = 1;

make_pair(c_732814,&c_732815,&c_732819);c_732814.hdr.immutable = 1;

make_pair(c_732822,quote_greater,NULL);c_732822.hdr.immutable = 1;

make_pair(c_732821,quote__else,&c_732822);c_732821.hdr.immutable = 1;

make_pair(c_732820,&c_732821,NULL);c_732820.hdr.immutable = 1;

make_pair(c_732813,&c_732814,&c_732820);c_732813.hdr.immutable = 1;

make_pair(c_732806,&c_732807,&c_732813);c_732806.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732776, ((closureN)self_732062)->elements[2], r_731143, &c_732806);; 
}

static void __lambda_38(void *data, object self_732063, int argc, object *args) /* object self_732063, object r_731140 */
 {
 object r_731140 = args[0];
  
closureN_type c_732778;
object e_732784 [1];
c_732778.hdr.mark = gc_color_red;
 c_732778.hdr.grayed = 0;
c_732778.tag = closureN_tag;
 c_732778.fn = (function_type)__lambda_39;
c_732778.num_args = 1;
c_732778.num_elements = 1;
c_732778.elements = (object *)e_732784;
c_732778.elements[0] = ((closureN)self_732063)->elements[0];


make_pair(c_732792,quote_b,NULL);c_732792.hdr.immutable = 1;

make_pair(c_732791,quote_a,&c_732792);c_732791.hdr.immutable = 1;

make_pair(c_732790,quote_comparator,&c_732791);c_732790.hdr.immutable = 1;

make_pair(c_732789,quote__123_127,&c_732790);c_732789.hdr.immutable = 1;

make_pair(c_732793,quote_equal,NULL);c_732793.hdr.immutable = 1;

make_pair(c_732788,&c_732789,&c_732793);c_732788.hdr.immutable = 1;

make_pair(c_732799,quote_b,NULL);c_732799.hdr.immutable = 1;

make_pair(c_732798,quote_a,&c_732799);c_732798.hdr.immutable = 1;

make_pair(c_732797,quote_comparator,&c_732798);c_732797.hdr.immutable = 1;

make_pair(c_732796,quote__121_127,&c_732797);c_732796.hdr.immutable = 1;

make_pair(c_732800,quote_less,NULL);c_732800.hdr.immutable = 1;

make_pair(c_732795,&c_732796,&c_732800);c_732795.hdr.immutable = 1;

make_pair(c_732803,quote_greater,NULL);c_732803.hdr.immutable = 1;

make_pair(c_732802,quote__else,&c_732803);c_732802.hdr.immutable = 1;

make_pair(c_732801,&c_732802,NULL);c_732801.hdr.immutable = 1;

make_pair(c_732794,&c_732795,&c_732801);c_732794.hdr.immutable = 1;

make_pair(c_732787,&c_732788,&c_732794);c_732787.hdr.immutable = 1;

make_pair(c_732786,quote_cond,&c_732787);c_732786.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732778, ((closureN)self_732063)->elements[1], r_731140, &c_732786);; 
}

static void __lambda_39(void *data, object self_732064, int argc, object *args) /* object self_732064, object r_731138 */
 {
 object r_731138 = args[0];
  
pair_type local_732783; 
return_direct_with_clo1(data,  ((closureN)self_732064)->elements[0], (((closure)  ((closureN)self_732064)->elements[0])->fn),  set_pair_as_expr(&local_732783, r_731138, boolean_f));; 
}

static void __lambda_3(void *data, object self_732065, int argc, object *args) /* object self_732065, object k_731189 */
 {
 object k_731189 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_732065)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_732065)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_732065)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_732065)->elements[1]))))) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_732065)->elements[1])))))) ){ 
    
  
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_732065)->elements[1]))))))) ){ 
  
closureN_type c_732548;
object e_732650 [3];
c_732548.hdr.mark = gc_color_red;
 c_732548.hdr.grayed = 0;
c_732548.tag = closureN_tag;
 c_732548.fn = (function_type)__lambda_4;
c_732548.num_args = 1;
c_732548.num_elements = 3;
c_732548.elements = (object *)e_732650;
c_732548.elements[0] = k_731189;
c_732548.elements[1] = ((closureN)self_732065)->elements[0];
c_732548.elements[2] = ((closureN)self_732065)->elements[1];

return_closcall2(data,  ((closureN)self_732065)->elements[0],  &c_732548, quote_comparator_91if_121_123_125);
} else { 
  return_direct_with_clo1(data,  k_731189, (((closure)  k_731189)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_731189, (((closure)  k_731189)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_731189, (((closure)  k_731189)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_731189, (((closure)  k_731189)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_731189, (((closure)  k_731189)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_731189, (((closure)  k_731189)->fn),  boolean_f);}
;; 
}

static void __lambda_4(void *data, object self_732066, int argc, object *args) /* object self_732066, object r_731207 */
 {
 object r_731207 = args[0];
  
closureN_type c_732551;
object e_732649 [3];
c_732551.hdr.mark = gc_color_red;
 c_732551.hdr.grayed = 0;
c_732551.tag = closureN_tag;
 c_732551.fn = (function_type)__lambda_5;
c_732551.num_args = 1;
c_732551.num_elements = 3;
c_732551.elements = (object *)e_732649;
c_732551.elements[0] = ((closureN)self_732066)->elements[0];
c_732551.elements[1] = r_731207;
c_732551.elements[2] = ((closureN)self_732066)->elements[2];

return_closcall2(data,  ((closureN)self_732066)->elements[1],  &c_732551, quote_make_91default_91comparator);; 
}

static void __lambda_5(void *data, object self_732067, int argc, object *args) /* object self_732067, object r_731223 */
 {
 object r_731223 = args[0];
  
closureN_type c_732553;
object e_732647 [3];
c_732553.hdr.mark = gc_color_red;
 c_732553.hdr.grayed = 0;
c_732553.tag = closureN_tag;
 c_732553.fn = (function_type)__lambda_6;
c_732553.num_args = 1;
c_732553.num_elements = 3;
c_732553.elements = (object *)e_732647;
c_732553.elements[0] = ((closureN)self_732067)->elements[0];
c_732553.elements[1] = ((closureN)self_732067)->elements[1];
c_732553.elements[2] = ((closureN)self_732067)->elements[2];


make_pair(c_732648,quote_make_91default_91comparator,NULL);c_732648.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732553, r_731223, NULL, &c_732648);; 
}

static void __lambda_6(void *data, object self_732068, int argc, object *args) /* object self_732068, object r_731210 */
 {
 object r_731210 = args[0];
  
closureN_type c_732555;
object e_732634 [4];
c_732555.hdr.mark = gc_color_red;
 c_732555.hdr.grayed = 0;
c_732555.tag = closureN_tag;
 c_732555.fn = (function_type)__lambda_7;
c_732555.num_args = 1;
c_732555.num_elements = 4;
c_732555.elements = (object *)e_732634;
c_732555.elements[0] = ((closureN)self_732068)->elements[0];
c_732555.elements[1] = ((closureN)self_732068)->elements[1];
c_732555.elements[2] = r_731210;
c_732555.elements[3] = ((closureN)self_732068)->elements[2];












make_pair(c_732646,quote_greater,NULL);c_732646.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732555, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_732068)->elements[2]))))), NULL, &c_732646);; 
}

static void __lambda_7(void *data, object self_732069, int argc, object *args) /* object self_732069, object r_731219 */
 {
 object r_731219 = args[0];
  
closureN_type c_732557;
object e_732622 [4];
c_732557.hdr.mark = gc_color_red;
 c_732557.hdr.grayed = 0;
c_732557.tag = closureN_tag;
 c_732557.fn = (function_type)__lambda_8;
c_732557.num_args = 1;
c_732557.num_elements = 4;
c_732557.elements = (object *)e_732622;
c_732557.elements[0] = ((closureN)self_732069)->elements[0];
c_732557.elements[1] = ((closureN)self_732069)->elements[1];
c_732557.elements[2] = ((closureN)self_732069)->elements[2];
c_732557.elements[3] = ((closureN)self_732069)->elements[3];










make_pair(c_732633,quote_greater,NULL);c_732633.hdr.immutable = 1;

make_pair(c_732632,quote_equal,&c_732633);c_732632.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732557, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_732069)->elements[3])))), r_731219, &c_732632);; 
}

static void __lambda_8(void *data, object self_732070, int argc, object *args) /* object self_732070, object r_731217 */
 {
 object r_731217 = args[0];
  
closureN_type c_732559;
object e_732611 [4];
c_732559.hdr.mark = gc_color_red;
 c_732559.hdr.grayed = 0;
c_732559.tag = closureN_tag;
 c_732559.fn = (function_type)__lambda_9;
c_732559.num_args = 1;
c_732559.num_elements = 4;
c_732559.elements = (object *)e_732611;
c_732559.elements[0] = ((closureN)self_732070)->elements[0];
c_732559.elements[1] = ((closureN)self_732070)->elements[1];
c_732559.elements[2] = ((closureN)self_732070)->elements[2];
c_732559.elements[3] = ((closureN)self_732070)->elements[3];








make_pair(c_732621,quote_greater,NULL);c_732621.hdr.immutable = 1;

make_pair(c_732620,quote_equal,&c_732621);c_732620.hdr.immutable = 1;

make_pair(c_732619,quote_less,&c_732620);c_732619.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732559, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_732070)->elements[3]))), r_731217, &c_732619);; 
}

static void __lambda_9(void *data, object self_732071, int argc, object *args) /* object self_732071, object r_731215 */
 {
 object r_731215 = args[0];
  
closureN_type c_732561;
object e_732601 [4];
c_732561.hdr.mark = gc_color_red;
 c_732561.hdr.grayed = 0;
c_732561.tag = closureN_tag;
 c_732561.fn = (function_type)__lambda_10;
c_732561.num_args = 1;
c_732561.num_elements = 4;
c_732561.elements = (object *)e_732601;
c_732561.elements[0] = ((closureN)self_732071)->elements[0];
c_732561.elements[1] = ((closureN)self_732071)->elements[1];
c_732561.elements[2] = ((closureN)self_732071)->elements[2];
c_732561.elements[3] = ((closureN)self_732071)->elements[3];






make_pair(c_732610,quote_greater,NULL);c_732610.hdr.immutable = 1;

make_pair(c_732609,quote_equal,&c_732610);c_732609.hdr.immutable = 1;

make_pair(c_732608,quote_less,&c_732609);c_732608.hdr.immutable = 1;

make_pair(c_732607,quote_b,&c_732608);c_732607.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732561, Cyc_car(data, Cyc_cdr(data, ((closureN)self_732071)->elements[3])), r_731215, &c_732607);; 
}

static void __lambda_10(void *data, object self_732072, int argc, object *args) /* object self_732072, object r_731213 */
 {
 object r_731213 = args[0];
  
closureN_type c_732563;
object e_732592 [3];
c_732563.hdr.mark = gc_color_red;
 c_732563.hdr.grayed = 0;
c_732563.tag = closureN_tag;
 c_732563.fn = (function_type)__lambda_11;
c_732563.num_args = 1;
c_732563.num_elements = 3;
c_732563.elements = (object *)e_732592;
c_732563.elements[0] = ((closureN)self_732072)->elements[0];
c_732563.elements[1] = ((closureN)self_732072)->elements[1];
c_732563.elements[2] = ((closureN)self_732072)->elements[2];




make_pair(c_732600,quote_greater,NULL);c_732600.hdr.immutable = 1;

make_pair(c_732599,quote_equal,&c_732600);c_732599.hdr.immutable = 1;

make_pair(c_732598,quote_less,&c_732599);c_732598.hdr.immutable = 1;

make_pair(c_732597,quote_b,&c_732598);c_732597.hdr.immutable = 1;

make_pair(c_732596,quote_a,&c_732597);c_732596.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732563, Cyc_car(data, ((closureN)self_732072)->elements[3]), r_731213, &c_732596);; 
}

static void __lambda_11(void *data, object self_732073, int argc, object *args) /* object self_732073, object r_731211 */
 {
 object r_731211 = args[0];
  
closureN_type c_732565;
object e_732583 [2];
c_732565.hdr.mark = gc_color_red;
 c_732565.hdr.grayed = 0;
c_732565.tag = closureN_tag;
 c_732565.fn = (function_type)__lambda_12;
c_732565.num_args = 1;
c_732565.num_elements = 2;
c_732565.elements = (object *)e_732583;
c_732565.elements[0] = ((closureN)self_732073)->elements[0];
c_732565.elements[1] = ((closureN)self_732073)->elements[1];


make_pair(c_732586,quote_make_91default_91comparator,NULL);c_732586.hdr.immutable = 1;

make_pair(c_732591,quote_greater,NULL);c_732591.hdr.immutable = 1;

make_pair(c_732590,quote_equal,&c_732591);c_732590.hdr.immutable = 1;

make_pair(c_732589,quote_less,&c_732590);c_732589.hdr.immutable = 1;

make_pair(c_732588,quote_b,&c_732589);c_732588.hdr.immutable = 1;

make_pair(c_732587,quote_a,&c_732588);c_732587.hdr.immutable = 1;

make_pair(c_732585,&c_732586,&c_732587);c_732585.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732565, ((closureN)self_732073)->elements[2], r_731211, &c_732585);; 
}

static void __lambda_12(void *data, object self_732074, int argc, object *args) /* object self_732074, object r_731208 */
 {
 object r_731208 = args[0];
  
closureN_type c_732567;
object e_732573 [1];
c_732567.hdr.mark = gc_color_red;
 c_732567.hdr.grayed = 0;
c_732567.tag = closureN_tag;
 c_732567.fn = (function_type)__lambda_13;
c_732567.num_args = 1;
c_732567.num_elements = 1;
c_732567.elements = (object *)e_732573;
c_732567.elements[0] = ((closureN)self_732074)->elements[0];


make_pair(c_732577,quote_make_91default_91comparator,NULL);c_732577.hdr.immutable = 1;

make_pair(c_732582,quote_greater,NULL);c_732582.hdr.immutable = 1;

make_pair(c_732581,quote_equal,&c_732582);c_732581.hdr.immutable = 1;

make_pair(c_732580,quote_less,&c_732581);c_732580.hdr.immutable = 1;

make_pair(c_732579,quote_b,&c_732580);c_732579.hdr.immutable = 1;

make_pair(c_732578,quote_a,&c_732579);c_732578.hdr.immutable = 1;

make_pair(c_732576,&c_732577,&c_732578);c_732576.hdr.immutable = 1;

make_pair(c_732575,quote_comparator_91if_121_123_125,&c_732576);c_732575.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_732567, ((closureN)self_732074)->elements[1], r_731208, &c_732575);; 
}

static void __lambda_13(void *data, object self_732075, int argc, object *args) /* object self_732075, object r_731206 */
 {
 object r_731206 = args[0];
  
pair_type local_732572; 
return_direct_with_clo1(data,  ((closureN)self_732075)->elements[0], (((closure)  ((closureN)self_732075)->elements[0])->fn),  set_pair_as_expr(&local_732572, r_731206, boolean_f));; 
}

void c_srfi128_inlinable_lambdas(void *data, object clo, int argc, object *args){ 
make_pair(pair_735839, find_or_add_symbol("boolean<?"), find_or_add_symbol("boolean<?__inline__"));
make_pair(c_735840, &pair_735839, NULL);
object buf[1]; object cont = args[0];
buf[0] = &c_735840; (((closure)cont)->fn)(data, cont, 1, buf);
 } 
void c_srfi128_entry_pt_first_lambda(void *data, object clo, int argc, object *args){ 
Cyc_set_globals_changed((gc_thread_data *)data);
  quote_comparator_127 = find_or_add_symbol("comparator?");
  quote_type_91test = find_or_add_symbol("type-test");
  quote_comparator_91type_91test_91predicate = find_or_add_symbol("comparator-type-test-predicate");
  quote_equality = find_or_add_symbol("equality");
  quote_comparator_91equality_91predicate = find_or_add_symbol("comparator-equality-predicate");
  quote_ordering = find_or_add_symbol("ordering");
  quote_comparator_91ordering_91predicate = find_or_add_symbol("comparator-ordering-predicate");
  quote_hash = find_or_add_symbol("hash");
  quote_comparator_91hash_91function = find_or_add_symbol("comparator-hash-function");
  quote_ordering_127 = find_or_add_symbol("ordering?");
  quote_comparator_91ordered_127 = find_or_add_symbol("comparator-ordered?");
  quote_hash_127 = find_or_add_symbol("hash?");
  quote_comparator_91hashable_127 = find_or_add_symbol("comparator-hashable?");
  quote_unknown_91object_91comparator = find_or_add_symbol("unknown-object-comparator");
  quote_default_91comparator = find_or_add_symbol("default-comparator");
  quote_boolean_91comparator = find_or_add_symbol("boolean-comparator");
  quote_real_91comparator = find_or_add_symbol("real-comparator");
  quote_char_91comparator = find_or_add_symbol("char-comparator");
  quote_char_91ci_91comparator = find_or_add_symbol("char-ci-comparator");
  quote_string_91comparator = find_or_add_symbol("string-comparator");
  quote_string_91ci_91comparator = find_or_add_symbol("string-ci-comparator");
  quote_pair_91comparator = find_or_add_symbol("pair-comparator");
  quote_list_91comparator = find_or_add_symbol("list-comparator");
  quote_vector_91comparator = find_or_add_symbol("vector-comparator");
  quote_eq_91comparator = find_or_add_symbol("eq-comparator");
  quote_eqv_91comparator = find_or_add_symbol("eqv-comparator");
  quote_equal_91comparator = find_or_add_symbol("equal-comparator");
  quote__85registered_91comparators_85 = find_or_add_symbol("*registered-comparators*");
  quote__85next_91comparator_91index_85 = find_or_add_symbol("*next-comparator-index*");
  quote_n = find_or_add_symbol("n");
  quote_obj = find_or_add_symbol("obj");
  quote_hash_91func = find_or_add_symbol("hash-func");
  quote_new_91salt = find_or_add_symbol("new-salt");
  quote_parameterize = find_or_add_symbol("parameterize");
  quote__75salt_75 = find_or_add_symbol("%salt%");
  quote__else = find_or_add_symbol("else");
  quote__121_127 = find_or_add_symbol("<?");
  quote_comparator = find_or_add_symbol("comparator");
  quote__123_127 = find_or_add_symbol("=?");
  quote_cond = find_or_add_symbol("cond");
  quote_greater = find_or_add_symbol("greater");
  quote_equal = find_or_add_symbol("equal");
  quote_less = find_or_add_symbol("less");
  quote_b = find_or_add_symbol("b");
  quote_a = find_or_add_symbol("a");
  quote_make_91default_91comparator = find_or_add_symbol("make-default-comparator");
  quote_comparator_91if_121_123_125 = find_or_add_symbol("comparator-if<=>");

  add_global("__glo_lib_91init_117srfi128_srfi_128", (object *) &__glo_lib_91init_117srfi128_srfi_128);
  add_global("__glo_equal_91comparator_srfi_128", (object *) &__glo_equal_91comparator_srfi_128);
  add_global("__glo_eqv_91comparator_srfi_128", (object *) &__glo_eqv_91comparator_srfi_128);
  add_global("__glo_eq_91comparator_srfi_128", (object *) &__glo_eq_91comparator_srfi_128);
  add_global("__glo_vector_91comparator_srfi_128", (object *) &__glo_vector_91comparator_srfi_128);
  add_global("__glo_list_91comparator_srfi_128", (object *) &__glo_list_91comparator_srfi_128);
  add_global("__glo_pair_91comparator_srfi_128", (object *) &__glo_pair_91comparator_srfi_128);
  add_global("__glo_string_91ci_91comparator_srfi_128", (object *) &__glo_string_91ci_91comparator_srfi_128);
  add_global("__glo_string_91comparator_srfi_128", (object *) &__glo_string_91comparator_srfi_128);
  add_global("__glo_char_91ci_91comparator_srfi_128", (object *) &__glo_char_91ci_91comparator_srfi_128);
  add_global("__glo_char_91comparator_srfi_128", (object *) &__glo_char_91comparator_srfi_128);
  add_global("__glo_real_91comparator_srfi_128", (object *) &__glo_real_91comparator_srfi_128);
  add_global("__glo_boolean_91comparator_srfi_128", (object *) &__glo_boolean_91comparator_srfi_128);
  add_global("__glo_default_91comparator_srfi_128", (object *) &__glo_default_91comparator_srfi_128);
  add_global("__glo_comparator_91min_srfi_128", (object *) &__glo_comparator_91min_srfi_128);
  add_global("__glo_comparator_91max_srfi_128", (object *) &__glo_comparator_91max_srfi_128);
  add_global("__glo_comparator_91min_91in_91list_srfi_128", (object *) &__glo_comparator_91min_91in_91list_srfi_128);
  add_global("__glo_comparator_91max_91in_91list_srfi_128", (object *) &__glo_comparator_91max_91in_91list_srfi_128);
  add_global("__glo_make_91default_91comparator_srfi_128", (object *) &__glo_make_91default_91comparator_srfi_128);
  add_global("__glo_default_91equality_srfi_128", (object *) &__glo_default_91equality_srfi_128);
  add_global("__glo_default_91ordering_srfi_128", (object *) &__glo_default_91ordering_srfi_128);
  add_global("__glo_default_91hash_srfi_128", (object *) &__glo_default_91hash_srfi_128);
  add_global("__glo_dispatch_91ordering_srfi_128", (object *) &__glo_dispatch_91ordering_srfi_128);
  add_global("__glo_dispatch_91equality_srfi_128", (object *) &__glo_dispatch_91equality_srfi_128);
  add_global("__glo_registered_91comparator_srfi_128", (object *) &__glo_registered_91comparator_srfi_128);
  add_global("__glo_registered_91index_srfi_128", (object *) &__glo_registered_91index_srfi_128);
  add_global("__glo_object_91type_srfi_128", (object *) &__glo_object_91type_srfi_128);
  add_global("__glo_comparator_91register_91default_67_srfi_128", (object *) &__glo_comparator_91register_91default_67_srfi_128);
  add_global("__glo__85registered_91comparators_85_srfi_128", (object *) &__glo__85registered_91comparators_85_srfi_128);
  add_global("__glo__85next_91comparator_91index_85_srfi_128", (object *) &__glo__85next_91comparator_91index_85_srfi_128);
  add_global("__glo_first_91comparator_91index_srfi_128", (object *) &__glo_first_91comparator_91index_srfi_128);
  add_global("__glo_unknown_91object_91comparator_srfi_128", (object *) &__glo_unknown_91object_91comparator_srfi_128);
  add_global("__glo_string_91hash_srfi_128", (object *) &__glo_string_91hash_srfi_128);
  add_global("__glo_make_91vector_91hash_srfi_128", (object *) &__glo_make_91vector_91hash_srfi_128);
  add_global("__glo_make_91vector_121_127_srfi_128", (object *) &__glo_make_91vector_121_127_srfi_128);
  add_global("__glo_make_91vector_123_127_srfi_128", (object *) &__glo_make_91vector_123_127_srfi_128);
  add_global("__glo_make_91vector_91type_91test_srfi_128", (object *) &__glo_make_91vector_91type_91test_srfi_128);
  add_global("__glo_make_91vector_91comparator_srfi_128", (object *) &__glo_make_91vector_91comparator_srfi_128);
  add_global("__glo_make_91list_91hash_srfi_128", (object *) &__glo_make_91list_91hash_srfi_128);
  add_global("__glo_make_91list_121_127_srfi_128", (object *) &__glo_make_91list_121_127_srfi_128);
  add_global("__glo_make_91list_123_127_srfi_128", (object *) &__glo_make_91list_123_127_srfi_128);
  add_global("__glo_make_91list_91type_91test_srfi_128", (object *) &__glo_make_91list_91type_91test_srfi_128);
  add_global("__glo_make_91list_91comparator_srfi_128", (object *) &__glo_make_91list_91comparator_srfi_128);
  add_global("__glo_make_91pair_91hash_srfi_128", (object *) &__glo_make_91pair_91hash_srfi_128);
  add_global("__glo_make_91pair_121_127_srfi_128", (object *) &__glo_make_91pair_121_127_srfi_128);
  add_global("__glo_make_91pair_123_127_srfi_128", (object *) &__glo_make_91pair_123_127_srfi_128);
  add_global("__glo_make_91pair_91type_91test_srfi_128", (object *) &__glo_make_91pair_91type_91test_srfi_128);
  add_global("__glo_make_91pair_91comparator_srfi_128", (object *) &__glo_make_91pair_91comparator_srfi_128);
  add_global("__glo_make_91hasher_srfi_128", (object *) &__glo_make_91hasher_srfi_128);
  add_global("__glo_make_91equal_91comparator_srfi_128", (object *) &__glo_make_91equal_91comparator_srfi_128);
  add_global("__glo_make_91eqv_91comparator_srfi_128", (object *) &__glo_make_91eqv_91comparator_srfi_128);
  add_global("__glo_make_91eq_91comparator_srfi_128", (object *) &__glo_make_91eq_91comparator_srfi_128);
  add_global("__glo_symbol_91hash_srfi_128", (object *) &__glo_symbol_91hash_srfi_128);
  add_global("__glo_symbol_121_127_srfi_128", (object *) &__glo_symbol_121_127_srfi_128);
  add_global("__glo_string_91ci_91hash_srfi_128", (object *) &__glo_string_91ci_91hash_srfi_128);
  add_global("__glo_complex_121_127_srfi_128", (object *) &__glo_complex_121_127_srfi_128);
  add_global("__glo_number_91hash_srfi_128", (object *) &__glo_number_91hash_srfi_128);
  add_global("__glo_char_91ci_91hash_srfi_128", (object *) &__glo_char_91ci_91hash_srfi_128);
  add_global("__glo_char_91hash_srfi_128", (object *) &__glo_char_91hash_srfi_128);
  add_global("__glo_boolean_91hash_srfi_128", (object *) &__glo_boolean_91hash_srfi_128);
  add_global("__glo_boolean_121_127_191_191inline_191_191_srfi_128", (object *) &__glo_boolean_121_127_191_191inline_191_191_srfi_128);
  add_global("__glo_boolean_121_127_srfi_128", (object *) &__glo_boolean_121_127_srfi_128);
  add_global("__glo__125_123_127_srfi_128", (object *) &__glo__125_123_127_srfi_128);
  add_global("__glo__121_123_127_srfi_128", (object *) &__glo__121_123_127_srfi_128);
  add_global("__glo__125_127_srfi_128", (object *) &__glo__125_127_srfi_128);
  add_global("__glo__121_127_srfi_128", (object *) &__glo__121_127_srfi_128);
  add_global("__glo__123_127_srfi_128", (object *) &__glo__123_127_srfi_128);
  add_global("__glo_binary_125_123_127_srfi_128", (object *) &__glo_binary_125_123_127_srfi_128);
  add_global("__glo_binary_121_123_127_srfi_128", (object *) &__glo_binary_121_123_127_srfi_128);
  add_global("__glo_binary_125_127_srfi_128", (object *) &__glo_binary_125_127_srfi_128);
  add_global("__glo_binary_121_127_srfi_128", (object *) &__glo_binary_121_127_srfi_128);
  add_global("__glo_binary_123_127_srfi_128", (object *) &__glo_binary_123_127_srfi_128);
  add_global("__glo_comparator_91hash_srfi_128", (object *) &__glo_comparator_91hash_srfi_128);
  add_global("__glo_comparator_91check_91type_srfi_128", (object *) &__glo_comparator_91check_91type_srfi_128);
  add_global("__glo_comparator_91test_91type_srfi_128", (object *) &__glo_comparator_91test_91type_srfi_128);
  add_global("__glo_make_91comparator_srfi_128", (object *) &__glo_make_91comparator_srfi_128);
  add_global("__glo_make_91raw_91comparator_srfi_128", (object *) &__glo_make_91raw_91comparator_srfi_128);
  add_global("__glo_comparator_91hashable_127_srfi_128", (object *) &__glo_comparator_91hashable_127_srfi_128);
  add_global("__glo_comparator_91ordered_127_srfi_128", (object *) &__glo_comparator_91ordered_127_srfi_128);
  add_global("__glo_comparator_91hash_91function_srfi_128", (object *) &__glo_comparator_91hash_91function_srfi_128);
  add_global("__glo_comparator_91ordering_91predicate_srfi_128", (object *) &__glo_comparator_91ordering_91predicate_srfi_128);
  add_global("__glo_comparator_91equality_91predicate_srfi_128", (object *) &__glo_comparator_91equality_91predicate_srfi_128);
  add_global("__glo_comparator_91type_91test_91predicate_srfi_128", (object *) &__glo_comparator_91type_91test_91predicate_srfi_128);
  add_global("__glo_comparator_127_srfi_128", (object *) &__glo_comparator_127_srfi_128);
  add_global("__glo_comparator_srfi_128", (object *) &__glo_comparator_srfi_128);
  add_global("__glo_with_91hash_91salt_srfi_128", (object *) &__glo_with_91hash_91salt_srfi_128);
  add_global("__glo_hash_91salt_srfi_128", (object *) &__glo_hash_91salt_srfi_128);
  add_global("__glo__75salt_75_srfi_128", (object *) &__glo__75salt_75_srfi_128);
  add_global("__glo_hash_91bound_srfi_128", (object *) &__glo_hash_91bound_srfi_128);
  add_global("__glo_comparator_91if_121_123_125_srfi_128", (object *) &__glo_comparator_91if_121_123_125_srfi_128);
  mclosure0(c_735546, (function_type)__lambda_436);c_735546.num_args = 0; 
  __glo_lib_91init_117srfi128_srfi_128 = &c_735546; 
  mclosure0(c_735544, (function_type)__lambda_435);c_735544.num_args = 1; 
  __glo_comparator_91min_srfi_128 = &c_735544; 
  mclosure0(c_735542, (function_type)__lambda_434);c_735542.num_args = 1; 
  __glo_comparator_91max_srfi_128 = &c_735542; 
  mclosure0(c_735473, (function_type)__lambda_426);c_735473.num_args = 2; 
  __glo_comparator_91min_91in_91list_srfi_128 = &c_735473; 
  mclosure0(c_735404, (function_type)__lambda_418);c_735404.num_args = 2; 
  __glo_comparator_91max_91in_91list_srfi_128 = &c_735404; 
  mclosure0(c_735396, (function_type)__lambda_415);c_735396.num_args = 0; 
  __glo_make_91default_91comparator_srfi_128 = &c_735396; 
  mclosure0(c_735376, (function_type)__lambda_411);c_735376.num_args = 2; 
  __glo_default_91equality_srfi_128 = &c_735376; 
  mclosure0(c_735352, (function_type)__lambda_407);c_735352.num_args = 2; 
  __glo_default_91ordering_srfi_128 = &c_735352; 
  mclosure0(c_735267, (function_type)__lambda_396);c_735267.num_args = 1; 
  __glo_default_91hash_srfi_128 = &c_735267; 
  mclosure0(c_735171, (function_type)__lambda_386);c_735171.num_args = 3; 
  __glo_dispatch_91ordering_srfi_128 = &c_735171; 
  mclosure0(c_735075, (function_type)__lambda_376);c_735075.num_args = 3; 
  __glo_dispatch_91equality_srfi_128 = &c_735075; 
  mclosure0(c_735070, (function_type)__lambda_375);c_735070.num_args = 1; 
  __glo_registered_91comparator_srfi_128 = &c_735070; 
  mclosure0(c_735010, (function_type)__lambda_368);c_735010.num_args = 1; 
  __glo_registered_91index_srfi_128 = &c_735010; 
  mclosure0(c_734975, (function_type)__lambda_366);c_734975.num_args = 1; 
  __glo_object_91type_srfi_128 = &c_734975; 
  mclosure0(c_734951, (function_type)__lambda_362);c_734951.num_args = 1; 
  __glo_comparator_91register_91default_67_srfi_128 = &c_734951; 
  mclosure0(c_734893, (function_type)__lambda_354);c_734893.num_args = 1; 
  __glo_string_91hash_srfi_128 = &c_734893; 
  mclosure0(c_734817, (function_type)__lambda_340);c_734817.num_args = 4; 
  __glo_make_91vector_91hash_srfi_128 = &c_734817; 
  mclosure0(c_734691, (function_type)__lambda_320);c_734691.num_args = 4; 
  __glo_make_91vector_121_127_srfi_128 = &c_734691; 
  mclosure0(c_734604, (function_type)__lambda_306);c_734604.num_args = 4; 
  __glo_make_91vector_123_127_srfi_128 = &c_734604; 
  mclosure0(c_734532, (function_type)__lambda_294);c_734532.num_args = 4; 
  __glo_make_91vector_91type_91test_srfi_128 = &c_734532; 
  mclosure0(c_734502, (function_type)__lambda_289);c_734502.num_args = 4; 
  __glo_make_91vector_91comparator_srfi_128 = &c_734502; 
  mclosure0(c_734427, (function_type)__lambda_274);c_734427.num_args = 5; 
  __glo_make_91list_91hash_srfi_128 = &c_734427; 
  mclosure0(c_734292, (function_type)__lambda_250);c_734292.num_args = 5; 
  __glo_make_91list_121_127_srfi_128 = &c_734292; 
  mclosure0(c_734182, (function_type)__lambda_231);c_734182.num_args = 5; 
  __glo_make_91list_123_127_srfi_128 = &c_734182; 
  mclosure0(c_734111, (function_type)__lambda_218);c_734111.num_args = 5; 
  __glo_make_91list_91type_91test_srfi_128 = &c_734111; 
  mclosure0(c_734078, (function_type)__lambda_213);c_734078.num_args = 5; 
  __glo_make_91list_91comparator_srfi_128 = &c_734078; 
  mclosure0(c_734046, (function_type)__lambda_206);c_734046.num_args = 2; 
  __glo_make_91pair_91hash_srfi_128 = &c_734046; 
  mclosure0(c_734016, (function_type)__lambda_203);c_734016.num_args = 2; 
  __glo_make_91pair_121_127_srfi_128 = &c_734016; 
  mclosure0(c_733981, (function_type)__lambda_197);c_733981.num_args = 2; 
  __glo_make_91pair_123_127_srfi_128 = &c_733981; 
  mclosure0(c_733960, (function_type)__lambda_194);c_733960.num_args = 2; 
  __glo_make_91pair_91type_91test_srfi_128 = &c_733960; 
  mclosure0(c_733936, (function_type)__lambda_189);c_733936.num_args = 2; 
  __glo_make_91pair_91comparator_srfi_128 = &c_733936; 
  mclosure0(c_733854, (function_type)__lambda_179);c_733854.num_args = 0; 
  __glo_make_91hasher_srfi_128 = &c_733854; 
  mclosure0(c_733852, (function_type)__lambda_178);c_733852.num_args = 0; 
  __glo_make_91equal_91comparator_srfi_128 = &c_733852; 
  mclosure0(c_733850, (function_type)__lambda_177);c_733850.num_args = 0; 
  __glo_make_91eqv_91comparator_srfi_128 = &c_733850; 
  mclosure0(c_733848, (function_type)__lambda_176);c_733848.num_args = 0; 
  __glo_make_91eq_91comparator_srfi_128 = &c_733848; 
  mclosure0(c_733839, (function_type)__lambda_174);c_733839.num_args = 1; 
  __glo_symbol_91hash_srfi_128 = &c_733839; 
  mclosure0(c_733819, (function_type)__lambda_171);c_733819.num_args = 2; 
  __glo_symbol_121_127_srfi_128 = &c_733819; 
  mclosure0(c_733813, (function_type)__lambda_169);c_733813.num_args = 1; 
  __glo_string_91ci_91hash_srfi_128 = &c_733813; 
  mclosure0(c_733776, (function_type)__lambda_162);c_733776.num_args = 2; 
  __glo_complex_121_127_srfi_128 = &c_733776; 
  mclosure0(c_733701, (function_type)__lambda_150);c_733701.num_args = 1; 
  __glo_number_91hash_srfi_128 = &c_733701; 
  mclosure0(c_733685, (function_type)__lambda_147);c_733685.num_args = 1; 
  __glo_char_91ci_91hash_srfi_128 = &c_733685; 
  mclosure0(c_733673, (function_type)__lambda_145);c_733673.num_args = 1; 
  __glo_char_91hash_srfi_128 = &c_733673; 
  mclosure0(c_733670, (function_type)__lambda_144);c_733670.num_args = 1; 
  __glo_boolean_91hash_srfi_128 = &c_733670; 
  mclosure0(c_733667, (function_type)__lambda_522);c_733667.num_args = 2; 
  __glo_boolean_121_127_191_191inline_191_191_srfi_128 = &c_733667; 
  mclosure0(c_733664, (function_type)__lambda_143);c_733664.num_args = 2; 
  __glo_boolean_121_127_srfi_128 = &c_733664; 
  mclosure0(c_733609, (function_type)__lambda_136);c_733609.num_args = 3; 
  __glo__125_123_127_srfi_128 = &c_733609; 
  mclosure0(c_733554, (function_type)__lambda_129);c_733554.num_args = 3; 
  __glo__121_123_127_srfi_128 = &c_733554; 
  mclosure0(c_733499, (function_type)__lambda_122);c_733499.num_args = 3; 
  __glo__125_127_srfi_128 = &c_733499; 
  mclosure0(c_733444, (function_type)__lambda_115);c_733444.num_args = 3; 
  __glo__121_127_srfi_128 = &c_733444; 
  mclosure0(c_733389, (function_type)__lambda_108);c_733389.num_args = 3; 
  __glo__123_127_srfi_128 = &c_733389; 
  mclosure0(c_733380, (function_type)__lambda_106);c_733380.num_args = 3; 
  __glo_binary_125_123_127_srfi_128 = &c_733380; 
  mclosure0(c_733371, (function_type)__lambda_104);c_733371.num_args = 3; 
  __glo_binary_121_123_127_srfi_128 = &c_733371; 
  mclosure0(c_733369, (function_type)__lambda_103);c_733369.num_args = 3; 
  __glo_binary_125_127_srfi_128 = &c_733369; 
  mclosure0(c_733361, (function_type)__lambda_101);c_733361.num_args = 3; 
  __glo_binary_121_127_srfi_128 = &c_733361; 
  mclosure0(c_733353, (function_type)__lambda_99);c_733353.num_args = 3; 
  __glo_binary_123_127_srfi_128 = &c_733353; 
  mclosure0(c_733346, (function_type)__lambda_97);c_733346.num_args = 2; 
  __glo_comparator_91hash_srfi_128 = &c_733346; 
  mclosure0(c_733335, (function_type)__lambda_95);c_733335.num_args = 2; 
  __glo_comparator_91check_91type_srfi_128 = &c_733335; 
  mclosure0(c_733328, (function_type)__lambda_93);c_733328.num_args = 2; 
  __glo_comparator_91test_91type_srfi_128 = &c_733328; 
  mclosure0(c_733250, (function_type)__lambda_77);c_733250.num_args = 4; 
  __glo_make_91comparator_srfi_128 = &c_733250; 
  mclosure0(c_733228, (function_type)__lambda_74);c_733228.num_args = 6; 
  __glo_make_91raw_91comparator_srfi_128 = &c_733228; 
  mmacro(c_733085, (function_type)__lambda_57);c_733085.num_args = 3; 
  __glo_with_91hash_91salt_srfi_128 = &c_733085; 
  mmacro(c_733035, (function_type)__lambda_48);c_733035.num_args = 3; 
  __glo_hash_91salt_srfi_128 = &c_733035; 
  mmacro(c_732999, (function_type)__lambda_43);c_732999.num_args = 3; 
  __glo_hash_91bound_srfi_128 = &c_732999; 
  mmacro(c_732493, (function_type)__lambda_1);c_732493.num_args = 3; 
  __glo_comparator_91if_121_123_125_srfi_128 = &c_732493; 
  __glo_equal_91comparator_srfi_128 = boolean_f; 
  __glo_eqv_91comparator_srfi_128 = boolean_f; 
  __glo_eq_91comparator_srfi_128 = boolean_f; 
  __glo_vector_91comparator_srfi_128 = boolean_f; 
  __glo_list_91comparator_srfi_128 = boolean_f; 
  __glo_pair_91comparator_srfi_128 = boolean_f; 
  __glo_string_91ci_91comparator_srfi_128 = boolean_f; 
  __glo_string_91comparator_srfi_128 = boolean_f; 
  __glo_char_91ci_91comparator_srfi_128 = boolean_f; 
  __glo_char_91comparator_srfi_128 = boolean_f; 
  __glo_real_91comparator_srfi_128 = boolean_f; 
  __glo_boolean_91comparator_srfi_128 = boolean_f; 
  __glo_default_91comparator_srfi_128 = boolean_f; 
  __glo__85registered_91comparators_85_srfi_128 = boolean_f; 
  __glo__85next_91comparator_91index_85_srfi_128 = obj_int2obj(9); 
  __glo_first_91comparator_91index_srfi_128 = obj_int2obj(9); 
  __glo_unknown_91object_91comparator_srfi_128 = boolean_f; 
  __glo_comparator_91hashable_127_srfi_128 = boolean_f; 
  __glo_comparator_91ordered_127_srfi_128 = boolean_f; 
  __glo_comparator_91hash_91function_srfi_128 = boolean_f; 
  __glo_comparator_91ordering_91predicate_srfi_128 = boolean_f; 
  __glo_comparator_91equality_91predicate_srfi_128 = boolean_f; 
  __glo_comparator_91type_91test_91predicate_srfi_128 = boolean_f; 
  __glo_comparator_127_srfi_128 = boolean_f; 
  __glo_comparator_srfi_128 = boolean_f; 
  __glo__75salt_75_srfi_128 = boolean_f; 

  mclosure0(clo_735842, c_srfi128_inlinable_lambdas); make_pair(pair_735841, find_or_add_symbol("c_srfi128_inlinable_lambdas"), &clo_735842);
  make_cvar(cvar_735843, (object *)&__glo_lib_91init_117srfi128_srfi_128);make_pair(pair_735844, find_or_add_symbol("lib-init:srfi128"), &cvar_735843);
  make_cvar(cvar_735845, (object *)&__glo_equal_91comparator_srfi_128);make_pair(pair_735846, find_or_add_symbol("equal-comparator"), &cvar_735845);
  make_cvar(cvar_735847, (object *)&__glo_eqv_91comparator_srfi_128);make_pair(pair_735848, find_or_add_symbol("eqv-comparator"), &cvar_735847);
  make_cvar(cvar_735849, (object *)&__glo_eq_91comparator_srfi_128);make_pair(pair_735850, find_or_add_symbol("eq-comparator"), &cvar_735849);
  make_cvar(cvar_735851, (object *)&__glo_vector_91comparator_srfi_128);make_pair(pair_735852, find_or_add_symbol("vector-comparator"), &cvar_735851);
  make_cvar(cvar_735853, (object *)&__glo_list_91comparator_srfi_128);make_pair(pair_735854, find_or_add_symbol("list-comparator"), &cvar_735853);
  make_cvar(cvar_735855, (object *)&__glo_pair_91comparator_srfi_128);make_pair(pair_735856, find_or_add_symbol("pair-comparator"), &cvar_735855);
  make_cvar(cvar_735857, (object *)&__glo_string_91ci_91comparator_srfi_128);make_pair(pair_735858, find_or_add_symbol("string-ci-comparator"), &cvar_735857);
  make_cvar(cvar_735859, (object *)&__glo_string_91comparator_srfi_128);make_pair(pair_735860, find_or_add_symbol("string-comparator"), &cvar_735859);
  make_cvar(cvar_735861, (object *)&__glo_char_91ci_91comparator_srfi_128);make_pair(pair_735862, find_or_add_symbol("char-ci-comparator"), &cvar_735861);
  make_cvar(cvar_735863, (object *)&__glo_char_91comparator_srfi_128);make_pair(pair_735864, find_or_add_symbol("char-comparator"), &cvar_735863);
  make_cvar(cvar_735865, (object *)&__glo_real_91comparator_srfi_128);make_pair(pair_735866, find_or_add_symbol("real-comparator"), &cvar_735865);
  make_cvar(cvar_735867, (object *)&__glo_boolean_91comparator_srfi_128);make_pair(pair_735868, find_or_add_symbol("boolean-comparator"), &cvar_735867);
  make_cvar(cvar_735869, (object *)&__glo_default_91comparator_srfi_128);make_pair(pair_735870, find_or_add_symbol("default-comparator"), &cvar_735869);
  make_cvar(cvar_735871, (object *)&__glo_comparator_91min_srfi_128);make_pair(pair_735872, find_or_add_symbol("comparator-min"), &cvar_735871);
  make_cvar(cvar_735873, (object *)&__glo_comparator_91max_srfi_128);make_pair(pair_735874, find_or_add_symbol("comparator-max"), &cvar_735873);
  make_cvar(cvar_735875, (object *)&__glo_comparator_91min_91in_91list_srfi_128);make_pair(pair_735876, find_or_add_symbol("comparator-min-in-list"), &cvar_735875);
  make_cvar(cvar_735877, (object *)&__glo_comparator_91max_91in_91list_srfi_128);make_pair(pair_735878, find_or_add_symbol("comparator-max-in-list"), &cvar_735877);
  make_cvar(cvar_735879, (object *)&__glo_make_91default_91comparator_srfi_128);make_pair(pair_735880, find_or_add_symbol("make-default-comparator"), &cvar_735879);
  make_cvar(cvar_735881, (object *)&__glo_default_91equality_srfi_128);make_pair(pair_735882, find_or_add_symbol("default-equality"), &cvar_735881);
  make_cvar(cvar_735883, (object *)&__glo_default_91ordering_srfi_128);make_pair(pair_735884, find_or_add_symbol("default-ordering"), &cvar_735883);
  make_cvar(cvar_735885, (object *)&__glo_default_91hash_srfi_128);make_pair(pair_735886, find_or_add_symbol("default-hash"), &cvar_735885);
  make_cvar(cvar_735887, (object *)&__glo_dispatch_91ordering_srfi_128);make_pair(pair_735888, find_or_add_symbol("dispatch-ordering"), &cvar_735887);
  make_cvar(cvar_735889, (object *)&__glo_dispatch_91equality_srfi_128);make_pair(pair_735890, find_or_add_symbol("dispatch-equality"), &cvar_735889);
  make_cvar(cvar_735891, (object *)&__glo_registered_91comparator_srfi_128);make_pair(pair_735892, find_or_add_symbol("registered-comparator"), &cvar_735891);
  make_cvar(cvar_735893, (object *)&__glo_registered_91index_srfi_128);make_pair(pair_735894, find_or_add_symbol("registered-index"), &cvar_735893);
  make_cvar(cvar_735895, (object *)&__glo_object_91type_srfi_128);make_pair(pair_735896, find_or_add_symbol("object-type"), &cvar_735895);
  make_cvar(cvar_735897, (object *)&__glo_comparator_91register_91default_67_srfi_128);make_pair(pair_735898, find_or_add_symbol("comparator-register-default!"), &cvar_735897);
  make_cvar(cvar_735899, (object *)&__glo__85registered_91comparators_85_srfi_128);make_pair(pair_735900, find_or_add_symbol("*registered-comparators*"), &cvar_735899);
  make_cvar(cvar_735901, (object *)&__glo__85next_91comparator_91index_85_srfi_128);make_pair(pair_735902, find_or_add_symbol("*next-comparator-index*"), &cvar_735901);
  make_cvar(cvar_735903, (object *)&__glo_first_91comparator_91index_srfi_128);make_pair(pair_735904, find_or_add_symbol("first-comparator-index"), &cvar_735903);
  make_cvar(cvar_735905, (object *)&__glo_unknown_91object_91comparator_srfi_128);make_pair(pair_735906, find_or_add_symbol("unknown-object-comparator"), &cvar_735905);
  make_cvar(cvar_735907, (object *)&__glo_string_91hash_srfi_128);make_pair(pair_735908, find_or_add_symbol("string-hash"), &cvar_735907);
  make_cvar(cvar_735909, (object *)&__glo_make_91vector_91hash_srfi_128);make_pair(pair_735910, find_or_add_symbol("make-vector-hash"), &cvar_735909);
  make_cvar(cvar_735911, (object *)&__glo_make_91vector_121_127_srfi_128);make_pair(pair_735912, find_or_add_symbol("make-vector<?"), &cvar_735911);
  make_cvar(cvar_735913, (object *)&__glo_make_91vector_123_127_srfi_128);make_pair(pair_735914, find_or_add_symbol("make-vector=?"), &cvar_735913);
  make_cvar(cvar_735915, (object *)&__glo_make_91vector_91type_91test_srfi_128);make_pair(pair_735916, find_or_add_symbol("make-vector-type-test"), &cvar_735915);
  make_cvar(cvar_735917, (object *)&__glo_make_91vector_91comparator_srfi_128);make_pair(pair_735918, find_or_add_symbol("make-vector-comparator"), &cvar_735917);
  make_cvar(cvar_735919, (object *)&__glo_make_91list_91hash_srfi_128);make_pair(pair_735920, find_or_add_symbol("make-list-hash"), &cvar_735919);
  make_cvar(cvar_735921, (object *)&__glo_make_91list_121_127_srfi_128);make_pair(pair_735922, find_or_add_symbol("make-list<?"), &cvar_735921);
  make_cvar(cvar_735923, (object *)&__glo_make_91list_123_127_srfi_128);make_pair(pair_735924, find_or_add_symbol("make-list=?"), &cvar_735923);
  make_cvar(cvar_735925, (object *)&__glo_make_91list_91type_91test_srfi_128);make_pair(pair_735926, find_or_add_symbol("make-list-type-test"), &cvar_735925);
  make_cvar(cvar_735927, (object *)&__glo_make_91list_91comparator_srfi_128);make_pair(pair_735928, find_or_add_symbol("make-list-comparator"), &cvar_735927);
  make_cvar(cvar_735929, (object *)&__glo_make_91pair_91hash_srfi_128);make_pair(pair_735930, find_or_add_symbol("make-pair-hash"), &cvar_735929);
  make_cvar(cvar_735931, (object *)&__glo_make_91pair_121_127_srfi_128);make_pair(pair_735932, find_or_add_symbol("make-pair<?"), &cvar_735931);
  make_cvar(cvar_735933, (object *)&__glo_make_91pair_123_127_srfi_128);make_pair(pair_735934, find_or_add_symbol("make-pair=?"), &cvar_735933);
  make_cvar(cvar_735935, (object *)&__glo_make_91pair_91type_91test_srfi_128);make_pair(pair_735936, find_or_add_symbol("make-pair-type-test"), &cvar_735935);
  make_cvar(cvar_735937, (object *)&__glo_make_91pair_91comparator_srfi_128);make_pair(pair_735938, find_or_add_symbol("make-pair-comparator"), &cvar_735937);
  make_cvar(cvar_735939, (object *)&__glo_make_91hasher_srfi_128);make_pair(pair_735940, find_or_add_symbol("make-hasher"), &cvar_735939);
  make_cvar(cvar_735941, (object *)&__glo_make_91equal_91comparator_srfi_128);make_pair(pair_735942, find_or_add_symbol("make-equal-comparator"), &cvar_735941);
  make_cvar(cvar_735943, (object *)&__glo_make_91eqv_91comparator_srfi_128);make_pair(pair_735944, find_or_add_symbol("make-eqv-comparator"), &cvar_735943);
  make_cvar(cvar_735945, (object *)&__glo_make_91eq_91comparator_srfi_128);make_pair(pair_735946, find_or_add_symbol("make-eq-comparator"), &cvar_735945);
  make_cvar(cvar_735947, (object *)&__glo_symbol_91hash_srfi_128);make_pair(pair_735948, find_or_add_symbol("symbol-hash"), &cvar_735947);
  make_cvar(cvar_735949, (object *)&__glo_symbol_121_127_srfi_128);make_pair(pair_735950, find_or_add_symbol("symbol<?"), &cvar_735949);
  make_cvar(cvar_735951, (object *)&__glo_string_91ci_91hash_srfi_128);make_pair(pair_735952, find_or_add_symbol("string-ci-hash"), &cvar_735951);
  make_cvar(cvar_735953, (object *)&__glo_complex_121_127_srfi_128);make_pair(pair_735954, find_or_add_symbol("complex<?"), &cvar_735953);
  make_cvar(cvar_735955, (object *)&__glo_number_91hash_srfi_128);make_pair(pair_735956, find_or_add_symbol("number-hash"), &cvar_735955);
  make_cvar(cvar_735957, (object *)&__glo_char_91ci_91hash_srfi_128);make_pair(pair_735958, find_or_add_symbol("char-ci-hash"), &cvar_735957);
  make_cvar(cvar_735959, (object *)&__glo_char_91hash_srfi_128);make_pair(pair_735960, find_or_add_symbol("char-hash"), &cvar_735959);
  make_cvar(cvar_735961, (object *)&__glo_boolean_91hash_srfi_128);make_pair(pair_735962, find_or_add_symbol("boolean-hash"), &cvar_735961);
  make_cvar(cvar_735963, (object *)&__glo_boolean_121_127_191_191inline_191_191_srfi_128);make_pair(pair_735964, find_or_add_symbol("boolean<?__inline__"), &cvar_735963);
  make_cvar(cvar_735965, (object *)&__glo_boolean_121_127_srfi_128);make_pair(pair_735966, find_or_add_symbol("boolean<?"), &cvar_735965);
  make_cvar(cvar_735967, (object *)&__glo__125_123_127_srfi_128);make_pair(pair_735968, find_or_add_symbol(">=?"), &cvar_735967);
  make_cvar(cvar_735969, (object *)&__glo__121_123_127_srfi_128);make_pair(pair_735970, find_or_add_symbol("<=?"), &cvar_735969);
  make_cvar(cvar_735971, (object *)&__glo__125_127_srfi_128);make_pair(pair_735972, find_or_add_symbol(">?"), &cvar_735971);
  make_cvar(cvar_735973, (object *)&__glo__121_127_srfi_128);make_pair(pair_735974, find_or_add_symbol("<?"), &cvar_735973);
  make_cvar(cvar_735975, (object *)&__glo__123_127_srfi_128);make_pair(pair_735976, find_or_add_symbol("=?"), &cvar_735975);
  make_cvar(cvar_735977, (object *)&__glo_binary_125_123_127_srfi_128);make_pair(pair_735978, find_or_add_symbol("binary>=?"), &cvar_735977);
  make_cvar(cvar_735979, (object *)&__glo_binary_121_123_127_srfi_128);make_pair(pair_735980, find_or_add_symbol("binary<=?"), &cvar_735979);
  make_cvar(cvar_735981, (object *)&__glo_binary_125_127_srfi_128);make_pair(pair_735982, find_or_add_symbol("binary>?"), &cvar_735981);
  make_cvar(cvar_735983, (object *)&__glo_binary_121_127_srfi_128);make_pair(pair_735984, find_or_add_symbol("binary<?"), &cvar_735983);
  make_cvar(cvar_735985, (object *)&__glo_binary_123_127_srfi_128);make_pair(pair_735986, find_or_add_symbol("binary=?"), &cvar_735985);
  make_cvar(cvar_735987, (object *)&__glo_comparator_91hash_srfi_128);make_pair(pair_735988, find_or_add_symbol("comparator-hash"), &cvar_735987);
  make_cvar(cvar_735989, (object *)&__glo_comparator_91check_91type_srfi_128);make_pair(pair_735990, find_or_add_symbol("comparator-check-type"), &cvar_735989);
  make_cvar(cvar_735991, (object *)&__glo_comparator_91test_91type_srfi_128);make_pair(pair_735992, find_or_add_symbol("comparator-test-type"), &cvar_735991);
  make_cvar(cvar_735993, (object *)&__glo_make_91comparator_srfi_128);make_pair(pair_735994, find_or_add_symbol("make-comparator"), &cvar_735993);
  make_cvar(cvar_735995, (object *)&__glo_make_91raw_91comparator_srfi_128);make_pair(pair_735996, find_or_add_symbol("make-raw-comparator"), &cvar_735995);
  make_cvar(cvar_735997, (object *)&__glo_comparator_91hashable_127_srfi_128);make_pair(pair_735998, find_or_add_symbol("comparator-hashable?"), &cvar_735997);
  make_cvar(cvar_735999, (object *)&__glo_comparator_91ordered_127_srfi_128);make_pair(pair_736000, find_or_add_symbol("comparator-ordered?"), &cvar_735999);
  make_cvar(cvar_736001, (object *)&__glo_comparator_91hash_91function_srfi_128);make_pair(pair_736002, find_or_add_symbol("comparator-hash-function"), &cvar_736001);
  make_cvar(cvar_736003, (object *)&__glo_comparator_91ordering_91predicate_srfi_128);make_pair(pair_736004, find_or_add_symbol("comparator-ordering-predicate"), &cvar_736003);
  make_cvar(cvar_736005, (object *)&__glo_comparator_91equality_91predicate_srfi_128);make_pair(pair_736006, find_or_add_symbol("comparator-equality-predicate"), &cvar_736005);
  make_cvar(cvar_736007, (object *)&__glo_comparator_91type_91test_91predicate_srfi_128);make_pair(pair_736008, find_or_add_symbol("comparator-type-test-predicate"), &cvar_736007);
  make_cvar(cvar_736009, (object *)&__glo_comparator_127_srfi_128);make_pair(pair_736010, find_or_add_symbol("comparator?"), &cvar_736009);
  make_cvar(cvar_736011, (object *)&__glo_comparator_srfi_128);make_pair(pair_736012, find_or_add_symbol("comparator"), &cvar_736011);
  make_cvar(cvar_736013, (object *)&__glo_with_91hash_91salt_srfi_128);make_pair(pair_736014, find_or_add_symbol("with-hash-salt"), &cvar_736013);
  make_cvar(cvar_736015, (object *)&__glo_hash_91salt_srfi_128);make_pair(pair_736016, find_or_add_symbol("hash-salt"), &cvar_736015);
  make_cvar(cvar_736017, (object *)&__glo__75salt_75_srfi_128);make_pair(pair_736018, find_or_add_symbol("%salt%"), &cvar_736017);
  make_cvar(cvar_736019, (object *)&__glo_hash_91bound_srfi_128);make_pair(pair_736020, find_or_add_symbol("hash-bound"), &cvar_736019);
  make_cvar(cvar_736021, (object *)&__glo_comparator_91if_121_123_125_srfi_128);make_pair(pair_736022, find_or_add_symbol("comparator-if<=>"), &cvar_736021);
make_pair(c_736113, &pair_735841,Cyc_global_variables);
make_pair(c_736112, &pair_735844, &c_736113);
make_pair(c_736111, &pair_735846, &c_736112);
make_pair(c_736110, &pair_735848, &c_736111);
make_pair(c_736109, &pair_735850, &c_736110);
make_pair(c_736108, &pair_735852, &c_736109);
make_pair(c_736107, &pair_735854, &c_736108);
make_pair(c_736106, &pair_735856, &c_736107);
make_pair(c_736105, &pair_735858, &c_736106);
make_pair(c_736104, &pair_735860, &c_736105);
make_pair(c_736103, &pair_735862, &c_736104);
make_pair(c_736102, &pair_735864, &c_736103);
make_pair(c_736101, &pair_735866, &c_736102);
make_pair(c_736100, &pair_735868, &c_736101);
make_pair(c_736099, &pair_735870, &c_736100);
make_pair(c_736098, &pair_735872, &c_736099);
make_pair(c_736097, &pair_735874, &c_736098);
make_pair(c_736096, &pair_735876, &c_736097);
make_pair(c_736095, &pair_735878, &c_736096);
make_pair(c_736094, &pair_735880, &c_736095);
make_pair(c_736093, &pair_735882, &c_736094);
make_pair(c_736092, &pair_735884, &c_736093);
make_pair(c_736091, &pair_735886, &c_736092);
make_pair(c_736090, &pair_735888, &c_736091);
make_pair(c_736089, &pair_735890, &c_736090);
make_pair(c_736088, &pair_735892, &c_736089);
make_pair(c_736087, &pair_735894, &c_736088);
make_pair(c_736086, &pair_735896, &c_736087);
make_pair(c_736085, &pair_735898, &c_736086);
make_pair(c_736084, &pair_735900, &c_736085);
make_pair(c_736083, &pair_735902, &c_736084);
make_pair(c_736082, &pair_735904, &c_736083);
make_pair(c_736081, &pair_735906, &c_736082);
make_pair(c_736080, &pair_735908, &c_736081);
make_pair(c_736079, &pair_735910, &c_736080);
make_pair(c_736078, &pair_735912, &c_736079);
make_pair(c_736077, &pair_735914, &c_736078);
make_pair(c_736076, &pair_735916, &c_736077);
make_pair(c_736075, &pair_735918, &c_736076);
make_pair(c_736074, &pair_735920, &c_736075);
make_pair(c_736073, &pair_735922, &c_736074);
make_pair(c_736072, &pair_735924, &c_736073);
make_pair(c_736071, &pair_735926, &c_736072);
make_pair(c_736070, &pair_735928, &c_736071);
make_pair(c_736069, &pair_735930, &c_736070);
make_pair(c_736068, &pair_735932, &c_736069);
make_pair(c_736067, &pair_735934, &c_736068);
make_pair(c_736066, &pair_735936, &c_736067);
make_pair(c_736065, &pair_735938, &c_736066);
make_pair(c_736064, &pair_735940, &c_736065);
make_pair(c_736063, &pair_735942, &c_736064);
make_pair(c_736062, &pair_735944, &c_736063);
make_pair(c_736061, &pair_735946, &c_736062);
make_pair(c_736060, &pair_735948, &c_736061);
make_pair(c_736059, &pair_735950, &c_736060);
make_pair(c_736058, &pair_735952, &c_736059);
make_pair(c_736057, &pair_735954, &c_736058);
make_pair(c_736056, &pair_735956, &c_736057);
make_pair(c_736055, &pair_735958, &c_736056);
make_pair(c_736054, &pair_735960, &c_736055);
make_pair(c_736053, &pair_735962, &c_736054);
make_pair(c_736052, &pair_735964, &c_736053);
make_pair(c_736051, &pair_735966, &c_736052);
make_pair(c_736050, &pair_735968, &c_736051);
make_pair(c_736049, &pair_735970, &c_736050);
make_pair(c_736048, &pair_735972, &c_736049);
make_pair(c_736047, &pair_735974, &c_736048);
make_pair(c_736046, &pair_735976, &c_736047);
make_pair(c_736045, &pair_735978, &c_736046);
make_pair(c_736044, &pair_735980, &c_736045);
make_pair(c_736043, &pair_735982, &c_736044);
make_pair(c_736042, &pair_735984, &c_736043);
make_pair(c_736041, &pair_735986, &c_736042);
make_pair(c_736040, &pair_735988, &c_736041);
make_pair(c_736039, &pair_735990, &c_736040);
make_pair(c_736038, &pair_735992, &c_736039);
make_pair(c_736037, &pair_735994, &c_736038);
make_pair(c_736036, &pair_735996, &c_736037);
make_pair(c_736035, &pair_735998, &c_736036);
make_pair(c_736034, &pair_736000, &c_736035);
make_pair(c_736033, &pair_736002, &c_736034);
make_pair(c_736032, &pair_736004, &c_736033);
make_pair(c_736031, &pair_736006, &c_736032);
make_pair(c_736030, &pair_736008, &c_736031);
make_pair(c_736029, &pair_736010, &c_736030);
make_pair(c_736028, &pair_736012, &c_736029);
make_pair(c_736027, &pair_736014, &c_736028);
make_pair(c_736026, &pair_736016, &c_736027);
make_pair(c_736025, &pair_736018, &c_736026);
make_pair(c_736024, &pair_736020, &c_736025);
make_pair(c_736023, &pair_736022, &c_736024);
Cyc_global_variables = &c_736023;
object buf[1]; buf[0] = ((closure1_type *)clo)->element;
(((closure)__glo_lib_91init_117srfi128_srfi_128)->fn)(data, buf[0], 1, buf);
}
void c_srfi128_entry_pt(void *data, object cont, int argc, object value){ 
  register_library("srfi_128");
  c_srfi128_entry_pt_first_lambda(data, cont, argc, value);
}
