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

#include "cyclone/types.h"
object __glo_lib_91init_117srfi117_srfi_117 = NULL;
object __glo_list_91queue_91set_91list_67_srfi_117 = NULL;
object __glo_list_91queue_91first_91last_srfi_117 = NULL;
object __glo_list_91queue_91list_srfi_117 = NULL;
object __glo_list_91queue_91for_91each_srfi_117 = NULL;
object __glo_list_91queue_91map_67_srfi_117 = NULL;
object __glo_list_91queue_91unfold_91right_85_srfi_117 = NULL;
object __glo_list_91queue_91unfold_91right_srfi_117 = NULL;
object __glo_list_91queue_91unfold_85_srfi_117 = NULL;
object __glo_list_91queue_91unfold_srfi_117 = NULL;
object __glo_list_91queue_91map_srfi_117 = NULL;
object __glo_list_91queue_91join_67_srfi_117 = NULL;
object __glo_list_91queue_91append_67_srfi_117 = NULL;
object __glo_list_91queue_91concatenate_srfi_117 = NULL;
object __glo_list_91queue_91append_srfi_117 = NULL;
object __glo_penult_91pair_srfi_117 = NULL;
object __glo_list_91queue_91remove_91all_67_srfi_117 = NULL;
object __glo_list_91queue_91remove_91back_67_srfi_117 = NULL;
object __glo_list_91queue_91remove_91front_67_srfi_117 = NULL;
object __glo_list_91queue_91add_91back_67_srfi_117 = NULL;
object __glo_list_91queue_91add_91front_67_srfi_117 = NULL;
object __glo_list_91queue_91back_srfi_117 = NULL;
object __glo_list_91queue_91front_srfi_117 = NULL;
object __glo_list_91queue_91empty_127_srfi_117 = NULL;
object __glo_list_91queue_91copy_srfi_117 = NULL;
object __glo_list_91queue_srfi_117 = NULL;
object __glo_make_91list_91queue_srfi_117 = NULL;
object __glo_raw_91make_91list_91queue_srfi_117 = NULL;
object __glo_set_91last_67_srfi_117 = NULL;
object __glo_set_91first_67_srfi_117 = NULL;
object __glo_get_91last_srfi_117 = NULL;
object __glo_get_91first_srfi_117 = NULL;
object __glo_list_91queue_127_srfi_117 = NULL;
object __glo__121list_91queue_125_srfi_117 = NULL;
object __glo_map_67_srfi_117 = NULL;
object __glo_last_91pair_srfi_117 = 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_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(list_91queue_127);
defsymbol(get_91first);
defsymbol(get_91last);
defsymbol(set_91first_67);
defsymbol(set_91last_67);
defsymbol(first);
defsymbol(list_91queue);
defsymbol(seed);
defsymbol(successor);
defsymbol(mapper);
defsymbol(stop_127);
defsymbol(queue);
defsymbol(last);
defsymbol(_list);
defsymbol(_121list_91queue_125);
static void __lambda_149(void *data, object clo, int argc, object *args) ;/*closure _,object k_73540*/
static void __lambda_150(void *data, object clo, int argc, object *args) ;/*object self_73691, object r_73565*/
static void __lambda_151(void *data, object clo, int argc, object *args) ;/*object self_73692, object r_73542*/
static void __lambda_152(void *data, object clo, int argc, object *args) ;/*object self_73693, object r_73563*/
static void __lambda_153(void *data, object clo, int argc, object *args) ;/*object self_73694, object r_73543*/
static void __lambda_154(void *data, object clo, int argc, object *args) ;/*object self_73695, object r_73561*/
static void __lambda_155(void *data, object clo, int argc, object *args) ;/*object self_73696, object r_73559*/
static void __lambda_156(void *data, object clo, int argc, object *args) ;/*object self_73697, object r_73544*/
static void __lambda_157(void *data, object clo, int argc, object *args) ;/*object self_73698, object r_73557*/
static void __lambda_158(void *data, object clo, int argc, object *args) ;/*object self_73699, object r_73555*/
static void __lambda_159(void *data, object clo, int argc, object *args) ;/*object self_73700, object r_73545*/
static void __lambda_160(void *data, object clo, int argc, object *args) ;/*object self_73701, object r_73553*/
static void __lambda_161(void *data, object clo, int argc, object *args) ;/*object self_73702, object r_73551*/
static void __lambda_162(void *data, object clo, int argc, object *args) ;/*object self_73703, object r_73546*/
static void __lambda_163(void *data, object clo, int argc, object *args) ;/*object self_73704, object r_73549*/
static void __lambda_164(void *data, object clo, int argc, object *args) ;/*object self_73705, object r_73547*/
static void __lambda_141(void *data, object clo, int argc, object *args) ;/*closure _,object k_73521, object args_73148_73152_73257_raw, ...*/
static void __lambda_147(void *data, object clo, int argc, object *args) ;/*object self_73688, object k_73532, object list_91queue_73158_73261, object first_73159_73262, object last_73160_73263*/
static void __lambda_148(void *data, object clo, int argc, object *args) ;/*object self_73689, object r_73533*/
static void __lambda_146(void *data, object clo, int argc, object *args) ;/*object self_73690, object r_73531*/
static void __lambda_143(void *data, object clo, int argc, object *args) ;/*object self_73684, object k_73525, object list_91queue_73155_73259, object first_73156_73260*/
static void __lambda_144(void *data, object clo, int argc, object *args) ;/*object self_73685, object r_73526*/
static void __lambda_145(void *data, object clo, int argc, object *args) ;/*object self_73686, object r_73529*/
static void __lambda_142(void *data, object clo, int argc, object *args) ;/*object self_73687, object r_73524*/
static void __lambda_138(void *data, object clo, int argc, object *args) ;/*closure _,object k_73516, object list_91queue_73147_73256*/
static void __lambda_139(void *data, object clo, int argc, object *args) ;/*object self_73682, object r_73517*/
static void __lambda_140(void *data, object clo, int argc, object *args) ;/*object self_73683, object r_73518*/
static void __lambda_137(void *data, object clo, int argc, object *args) ;/*closure _,object k_73513, object list_91queue_73146_73255*/
static void __lambda_135(void *data, object clo, int argc, object *args) ;/*closure _,object k_73509, object proc_73144_73253, object list_91queue_73145_73254*/
static void __lambda_136(void *data, object clo, int argc, object *args) ;/*object self_73681, object r_73510*/
static void __lambda_133(void *data, object clo, int argc, object *args) ;/*closure _,object k_73505, object proc_73142_73251, object list_91queue_73143_73252*/
static void __lambda_134(void *data, object clo, int argc, object *args) ;/*object self_73680, object r_73506*/
static void __lambda_121(void *data, object clo, int argc, object *args) ;/*closure _,object k_73493, object stop_127_73133_73243, object mapper_73134_73244, object successor_73135_73245, object seed_73136_73246, object queue_73137_73247*/
static void __lambda_122(void *data, object clo, int argc, object *args) ;/*object self_73668, object seed_73139_73248*/
static void __lambda_123(void *data, object clo, int argc, object *args) ;/*object self_73669, object loop_73140_73249*/
static void __lambda_168(void *data, object clo, int argc, object *args) ;/*object self_73670, object loop_73140_73249*/
static void __lambda_126(void *data, object clo, int argc, object *args) ;/*object self_73671, object k_73496, object seed_73141_73250*/
static void __lambda_132(void *data, object clo, int argc, object *args) ;/*object self_73672, object r_73497*/
static void __lambda_127(void *data, object clo, int argc, object *args) ;/*object self_73673, object k_73498*/
static void __lambda_128(void *data, object clo, int argc, object *args) ;/*object self_73674, object r_73499*/
static void __lambda_129(void *data, object clo, int argc, object *args) ;/*object self_73675, object r_73502*/
static void __lambda_130(void *data, object clo, int argc, object *args) ;/*object self_73676, object r_73500*/
static void __lambda_131(void *data, object clo, int argc, object *args) ;/*object self_73677, object r_73501*/
static void __lambda_124(void *data, object clo, int argc, object *args) ;/*object self_73678, object r_73495*/
static void __lambda_125(void *data, object clo, int argc, object *args) ;/*object self_73679, object r_73494*/
static void __lambda_115(void *data, object clo, int argc, object *args) ;/*closure _,object k_73478, object args_73116_73120_73232_raw, ...*/
static void __lambda_119(void *data, object clo, int argc, object *args) ;/*object self_73665, object k_73485, object stop_127_73129_73239, object mapper_73130_73240, object successor_73131_73241, object seed_73132_73242*/
static void __lambda_120(void *data, object clo, int argc, object *args) ;/*object self_73666, object r_73486*/
static void __lambda_118(void *data, object clo, int argc, object *args) ;/*object self_73667, object r_73484*/
static void __lambda_117(void *data, object clo, int argc, object *args) ;/*object self_73663, object k_73482, object stop_127_73123_73234, object mapper_73124_73235, object successor_73125_73236, object seed_73126_73237, object queue_73127_73238*/
static void __lambda_116(void *data, object clo, int argc, object *args) ;/*object self_73664, object r_73481*/
static void __lambda_103(void *data, object clo, int argc, object *args) ;/*closure _,object k_73466, object stop_127_73107_73224, object mapper_73108_73225, object successor_73109_73226, object seed_73110_73227, object queue_73111_73228*/
static void __lambda_104(void *data, object clo, int argc, object *args) ;/*object self_73651, object seed_73113_73229*/
static void __lambda_105(void *data, object clo, int argc, object *args) ;/*object self_73652, object loop_73114_73230*/
static void __lambda_167(void *data, object clo, int argc, object *args) ;/*object self_73653, object loop_73114_73230*/
static void __lambda_108(void *data, object clo, int argc, object *args) ;/*object self_73654, object k_73469, object seed_73115_73231*/
static void __lambda_114(void *data, object clo, int argc, object *args) ;/*object self_73655, object r_73470*/
static void __lambda_109(void *data, object clo, int argc, object *args) ;/*object self_73656, object k_73471*/
static void __lambda_110(void *data, object clo, int argc, object *args) ;/*object self_73657, object r_73472*/
static void __lambda_111(void *data, object clo, int argc, object *args) ;/*object self_73658, object r_73475*/
static void __lambda_112(void *data, object clo, int argc, object *args) ;/*object self_73659, object r_73473*/
static void __lambda_113(void *data, object clo, int argc, object *args) ;/*object self_73660, object r_73474*/
static void __lambda_106(void *data, object clo, int argc, object *args) ;/*object self_73661, object r_73468*/
static void __lambda_107(void *data, object clo, int argc, object *args) ;/*object self_73662, object r_73467*/
static void __lambda_97(void *data, object clo, int argc, object *args) ;/*closure _,object k_73451, object args_7390_7394_73213_raw, ...*/
static void __lambda_101(void *data, object clo, int argc, object *args) ;/*object self_73648, object k_73458, object stop_127_73103_73220, object mapper_73104_73221, object successor_73105_73222, object seed_73106_73223*/
static void __lambda_102(void *data, object clo, int argc, object *args) ;/*object self_73649, object r_73459*/
static void __lambda_100(void *data, object clo, int argc, object *args) ;/*object self_73650, object r_73457*/
static void __lambda_99(void *data, object clo, int argc, object *args) ;/*object self_73646, object k_73455, object stop_127_7397_73215, object mapper_7398_73216, object successor_7399_73217, object seed_73100_73218, object queue_73101_73219*/
static void __lambda_98(void *data, object clo, int argc, object *args) ;/*object self_73647, object r_73454*/
static void __lambda_94(void *data, object clo, int argc, object *args) ;/*closure _,object k_73446, object proc_7388_73211, object list_91queue_7389_73212*/
static void __lambda_95(void *data, object clo, int argc, object *args) ;/*object self_73644, object r_73448*/
static void __lambda_96(void *data, object clo, int argc, object *args) ;/*object self_73645, object r_73447*/
static void __lambda_91(void *data, object clo, int argc, object *args) ;/*closure _,object k_73441, object queue1_7386_73209, object queue2_7387_73210*/
static void __lambda_92(void *data, object clo, int argc, object *args) ;/*object self_73642, object r_73442*/
static void __lambda_93(void *data, object clo, int argc, object *args) ;/*object self_73643, object r_73443*/
static void __lambda_81(void *data, object clo, int argc, object *args) ;/*closure _,object k_73419, object args_7374_7378_73204_raw, ...*/
static void __lambda_87(void *data, object clo, int argc, object *args) ;/*object self_73637, object k_73429, object queues_7384_73207_raw, ...*/
static void __lambda_90(void *data, object clo, int argc, object *args) ;/*object self_73638, object k_73433, object queue_7385_73208*/
static void __lambda_88(void *data, object clo, int argc, object *args) ;/*object self_73639, object r_73431*/
static void __lambda_89(void *data, object clo, int argc, object *args) ;/*object self_73640, object r_73430*/
static void __lambda_86(void *data, object clo, int argc, object *args) ;/*object self_73641, object r_73428*/
static void __lambda_85(void *data, object clo, int argc, object *args) ;/*object self_73635, object k_73426, object queue_7382_73206*/
static void __lambda_84(void *data, object clo, int argc, object *args) ;/*object self_73636, object r_73425*/
static void __lambda_83(void *data, object clo, int argc, object *args) ;/*object self_73633, object k_73423*/
static void __lambda_82(void *data, object clo, int argc, object *args) ;/*object self_73634, object r_73422*/
static void __lambda_73(void *data, object clo, int argc, object *args) ;/*closure _,object k_73409, object list_91queues_7370_73200*/
static void __lambda_74(void *data, object clo, int argc, object *args) ;/*object self_73626, object result_7371_73201*/
static void __lambda_77(void *data, object clo, int argc, object *args) ;/*object self_73627, object k_73413, object list_91queue_7372_73202*/
static void __lambda_80(void *data, object clo, int argc, object *args) ;/*object self_73628, object k_73416, object elem_7373_73203*/
static void __lambda_78(void *data, object clo, int argc, object *args) ;/*object self_73629, object r_73414*/
static void __lambda_79(void *data, object clo, int argc, object *args) ;/*object self_73630, object r_73415*/
static void __lambda_75(void *data, object clo, int argc, object *args) ;/*object self_73631, object r_73412*/
static void __lambda_76(void *data, object clo, int argc, object *args) ;/*object self_73632, object r_73411*/
static void __lambda_72(void *data, object clo, int argc, object *args) ;/*closure _,object k_73406, object list_91queues_7369_73199_raw, ...*/
static void __lambda_66(void *data, object clo, int argc, object *args) ;/*closure _,object k_73395, object lis_7357_73195*/
static void __lambda_67(void *data, object clo, int argc, object *args) ;/*object self_73620, object lis_7359_73196*/
static void __lambda_68(void *data, object clo, int argc, object *args) ;/*object self_73621, object lp_7360_73197*/
static void __lambda_166(void *data, object clo, int argc, object *args) ;/*object self_73622, object lp_7360_73197*/
static void __lambda_71(void *data, object clo, int argc, object *args) ;/*object self_73623, object k_73398, object lis_7361_73198*/
static void __lambda_69(void *data, object clo, int argc, object *args) ;/*object self_73624, object r_73397*/
static void __lambda_70(void *data, object clo, int argc, object *args) ;/*object self_73625, object r_73396*/
static void __lambda_62(void *data, object clo, int argc, object *args) ;/*closure _,object k_73387, object list_91queue_7355_73193*/
static void __lambda_63(void *data, object clo, int argc, object *args) ;/*object self_73617, object result_7356_73194*/
static void __lambda_64(void *data, object clo, int argc, object *args) ;/*object self_73618, object r_73389*/
static void __lambda_65(void *data, object clo, int argc, object *args) ;/*object self_73619, object r_73390*/
static void __lambda_51(void *data, object clo, int argc, object *args) ;/*closure _,object k_73371, object list_91queue_7344_73189*/
static void __lambda_54(void *data, object clo, int argc, object *args) ;/*object self_73607, object r_73372*/
static void __lambda_55(void *data, object clo, int argc, object *args) ;/*object self_73608, object old_91last_7347_73190*/
static void __lambda_56(void *data, object clo, int argc, object *args) ;/*object self_73609, object elem_7350_73191*/
static void __lambda_57(void *data, object clo, int argc, object *args) ;/*object self_73610, object r_73382*/
static void __lambda_58(void *data, object clo, int argc, object *args) ;/*object self_73611, object new_91last_7353_73192*/
static void __lambda_60(void *data, object clo, int argc, object *args) ;/*object self_73612, object r_73376*/
static void __lambda_61(void *data, object clo, int argc, object *args) ;/*object self_73613, object r_73377*/
static void __lambda_59(void *data, object clo, int argc, object *args) ;/*object self_73614, object k_73378*/
static void __lambda_52(void *data, object clo, int argc, object *args) ;/*object self_73615, object k_73383*/
static void __lambda_53(void *data, object clo, int argc, object *args) ;/*object self_73616, object r_73384*/
static void __lambda_43(void *data, object clo, int argc, object *args) ;/*closure _,object k_73357, object list_91queue_7333_73185*/
static void __lambda_46(void *data, object clo, int argc, object *args) ;/*object self_73600, object r_73358*/
static void __lambda_47(void *data, object clo, int argc, object *args) ;/*object self_73601, object old_91first_7336_73186*/
static void __lambda_49(void *data, object clo, int argc, object *args) ;/*object self_73602, object r_73362*/
static void __lambda_50(void *data, object clo, int argc, object *args) ;/*object self_73603, object r_73363*/
static void __lambda_48(void *data, object clo, int argc, object *args) ;/*object self_73604, object k_73364*/
static void __lambda_44(void *data, object clo, int argc, object *args) ;/*object self_73605, object k_73367*/
static void __lambda_45(void *data, object clo, int argc, object *args) ;/*object self_73606, object r_73368*/
static void __lambda_37(void *data, object clo, int argc, object *args) ;/*closure _,object k_73349, object list_91queue_7330_73182, object elem_7331_73183*/
static void __lambda_38(void *data, object clo, int argc, object *args) ;/*object self_73595, object new_91last_7332_73184*/
static void __lambda_42(void *data, object clo, int argc, object *args) ;/*object self_73596, object r_73351*/
static void __lambda_39(void *data, object clo, int argc, object *args) ;/*object self_73597, object k_73352*/
static void __lambda_40(void *data, object clo, int argc, object *args) ;/*object self_73598, object r_73353*/
static void __lambda_41(void *data, object clo, int argc, object *args) ;/*object self_73599, object r_73354*/
static void __lambda_31(void *data, object clo, int argc, object *args) ;/*closure _,object k_73341, object list_91queue_7327_73179, object elem_7328_73180*/
static void __lambda_32(void *data, object clo, int argc, object *args) ;/*object self_73590, object r_73346*/
static void __lambda_33(void *data, object clo, int argc, object *args) ;/*object self_73591, object new_91first_7329_73181*/
static void __lambda_36(void *data, object clo, int argc, object *args) ;/*object self_73592, object r_73343*/
static void __lambda_34(void *data, object clo, int argc, object *args) ;/*object self_73593, object k_73344*/
static void __lambda_35(void *data, object clo, int argc, object *args) ;/*object self_73594, object r_73345*/
static void __lambda_28(void *data, object clo, int argc, object *args) ;/*closure _,object k_73336, object list_91queue_7326_73178*/
static void __lambda_29(void *data, object clo, int argc, object *args) ;/*object self_73588, object r_73337*/
static void __lambda_30(void *data, object clo, int argc, object *args) ;/*object self_73589, object r_73338*/
static void __lambda_25(void *data, object clo, int argc, object *args) ;/*closure _,object k_73331, object list_91queue_7325_73177*/
static void __lambda_26(void *data, object clo, int argc, object *args) ;/*object self_73586, object r_73332*/
static void __lambda_27(void *data, object clo, int argc, object *args) ;/*object self_73587, object r_73333*/
static void __lambda_23(void *data, object clo, int argc, object *args) ;/*closure _,object k_73327, object list_91queue_7324_73176*/
static void __lambda_24(void *data, object clo, int argc, object *args) ;/*object self_73585, object r_73328*/
static void __lambda_20(void *data, object clo, int argc, object *args) ;/*closure _,object k_73322, object list_91queue_7323_73175*/
static void __lambda_21(void *data, object clo, int argc, object *args) ;/*object self_73583, object r_73324*/
static void __lambda_22(void *data, object clo, int argc, object *args) ;/*object self_73584, object r_73323*/
static void __lambda_19(void *data, object clo, int argc, object *args) ;/*closure _,object k_73319, object objs_7322_73174_raw, ...*/
static void __lambda_13(void *data, object clo, int argc, object *args) ;/*closure _,object k_73301, object args_7311_7315_73169_raw, ...*/
static void __lambda_18(void *data, object clo, int argc, object *args) ;/*object self_73581, object k_73312, object list_7320_73172, object last_7321_73173*/
static void __lambda_17(void *data, object clo, int argc, object *args) ;/*object self_73582, object r_73311*/
static void __lambda_15(void *data, object clo, int argc, object *args) ;/*object self_73578, object k_73305, object list_7318_73171*/
static void __lambda_16(void *data, object clo, int argc, object *args) ;/*object self_73579, object r_73309*/
static void __lambda_14(void *data, object clo, int argc, object *args) ;/*object self_73580, object r_73304*/
static void __lambda_12(void *data, object clo, int argc, object *args) ;/*closure _,object k_73295, object first_739_73167, object last_7310_73168*/
static void __lambda_2(void *data, object clo, int argc, object *args) ;/*closure _,object k_73272, object f_732_73162, object lis_733_73163*/
static void __lambda_3(void *data, object clo, int argc, object *args) ;/*object self_73568, object lis_735_73164*/
static void __lambda_4(void *data, object clo, int argc, object *args) ;/*object self_73569, object lp_736_73165*/
static void __lambda_165(void *data, object clo, int argc, object *args) ;/*object self_73570, object lp_736_73165*/
static void __lambda_7(void *data, object clo, int argc, object *args) ;/*object self_73571, object k_73275, object lis_737_73166*/
static void __lambda_8(void *data, object clo, int argc, object *args) ;/*object self_73572, object r_73280*/
static void __lambda_9(void *data, object clo, int argc, object *args) ;/*object self_73573, object r_73279*/
static void __lambda_10(void *data, object clo, int argc, object *args) ;/*object self_73574, object r_73277*/
static void __lambda_11(void *data, object clo, int argc, object *args) ;/*object self_73575, object r_73278*/
static void __lambda_5(void *data, object clo, int argc, object *args) ;/*object self_73576, object r_73274*/
static void __lambda_6(void *data, object clo, int argc, object *args) ;/*object self_73577, object r_73273*/
static void __lambda_1(void *data, object clo, int argc, object *args) ;/*closure _,object k_73266, object ls_731_73161*/

static void __lambda_149(void *data, object _, int argc, object *args) /* closure _,object k_73540 */
 {
object k_73540 = args[0];
  Cyc_st_add(data, "srfi/117.sld:lib-init:srfi117");

closureN_type c_731562;
object e_731629 [1];
c_731562.hdr.mark = gc_color_red;
 c_731562.hdr.grayed = 0;
c_731562.tag = closureN_tag;
 c_731562.fn = (function_type)__lambda_150;
c_731562.num_args = 1;
c_731562.num_elements = 1;
c_731562.elements = (object *)e_731629;
c_731562.elements[0] = k_73540;


make_pair(c_731631,quote_last,NULL);c_731631.hdr.immutable = 1;

make_pair(c_731630,quote_first,&c_731631);c_731630.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_register_91simple_91type_scheme_base, (((closure)  __glo_register_91simple_91type_scheme_base)->fn),  &c_731562, quote__121list_91queue_125, boolean_f, &c_731630);; 
}

static void __lambda_150(void *data, object self_73691, int argc, object *args) /* object self_73691, object r_73565 */
 {
 object r_73565 = args[0];
  
closureN_type c_731564;
object e_731625 [1];
c_731564.hdr.mark = gc_color_red;
 c_731564.hdr.grayed = 0;
c_731564.tag = closureN_tag;
 c_731564.fn = (function_type)__lambda_151;
c_731564.num_args = 1;
c_731564.num_elements = 1;
c_731564.elements = (object *)e_731625;
c_731564.elements[0] = ((closureN)self_73691)->elements[0];


object c_731628 = global_set_cps_id(data,(closure)&c_731564,"__glo__121list_91queue_125_srfi_117", __glo__121list_91queue_125_srfi_117, r_73565);
return_closcall1(data,(closure)&c_731564,  c_731628);; 
}

static void __lambda_151(void *data, object self_73692, int argc, object *args) /* object self_73692, object r_73542 */
 {

  
closureN_type c_731566;
object e_731624 [1];
c_731566.hdr.mark = gc_color_red;
 c_731566.hdr.grayed = 0;
c_731566.tag = closureN_tag;
 c_731566.fn = (function_type)__lambda_152;
c_731566.num_args = 1;
c_731566.num_elements = 1;
c_731566.elements = (object *)e_731624;
c_731566.elements[0] = ((closureN)self_73692)->elements[0];

return_direct_with_clo3(data,  __glo_make_91type_91predicate_scheme_base, (((closure)  __glo_make_91type_91predicate_scheme_base)->fn),  &c_731566, obj_int2obj(0), quote__121list_91queue_125);; 
}

static void __lambda_152(void *data, object self_73693, int argc, object *args) /* object self_73693, object r_73563 */
 {
 object r_73563 = args[0];
  
closureN_type c_731568;
object e_731620 [1];
c_731568.hdr.mark = gc_color_red;
 c_731568.hdr.grayed = 0;
c_731568.tag = closureN_tag;
 c_731568.fn = (function_type)__lambda_153;
c_731568.num_args = 1;
c_731568.num_elements = 1;
c_731568.elements = (object *)e_731620;
c_731568.elements[0] = ((closureN)self_73693)->elements[0];


object c_731623 = global_set_cps_id(data,(closure)&c_731568,"__glo_list_91queue_127_srfi_117", __glo_list_91queue_127_srfi_117, r_73563);
return_closcall1(data,(closure)&c_731568,  c_731623);; 
}

static void __lambda_153(void *data, object self_73694, int argc, object *args) /* object self_73694, object r_73543 */
 {

  
closureN_type c_731570;
object e_731619 [1];
c_731570.hdr.mark = gc_color_red;
 c_731570.hdr.grayed = 0;
c_731570.tag = closureN_tag;
 c_731570.fn = (function_type)__lambda_154;
c_731570.num_args = 1;
c_731570.num_elements = 1;
c_731570.elements = (object *)e_731619;
c_731570.elements[0] = ((closureN)self_73694)->elements[0];

return_direct_with_clo3(data,  __glo_type_91slot_91offset_scheme_base, (((closure)  __glo_type_91slot_91offset_scheme_base)->fn),  &c_731570, __glo__121list_91queue_125_srfi_117, quote_first);; 
}

static void __lambda_154(void *data, object self_73695, int argc, object *args) /* object self_73695, object r_73561 */
 {
 object r_73561 = args[0];
  
closureN_type c_731572;
object e_731617 [1];
c_731572.hdr.mark = gc_color_red;
 c_731572.hdr.grayed = 0;
c_731572.tag = closureN_tag;
 c_731572.fn = (function_type)__lambda_155;
c_731572.num_args = 1;
c_731572.num_elements = 1;
c_731572.elements = (object *)e_731617;
c_731572.elements[0] = ((closureN)self_73695)->elements[0];


make_utf8_string_with_len(c_731618, "get-first", 9, 9);
return_direct_with_clo4(data,  __glo_make_91getter_scheme_base, (((closure)  __glo_make_91getter_scheme_base)->fn),  &c_731572, &c_731618, quote__121list_91queue_125, r_73561);; 
}

static void __lambda_155(void *data, object self_73696, int argc, object *args) /* object self_73696, object r_73559 */
 {
 object r_73559 = args[0];
  
closureN_type c_731574;
object e_731613 [1];
c_731574.hdr.mark = gc_color_red;
 c_731574.hdr.grayed = 0;
c_731574.tag = closureN_tag;
 c_731574.fn = (function_type)__lambda_156;
c_731574.num_args = 1;
c_731574.num_elements = 1;
c_731574.elements = (object *)e_731613;
c_731574.elements[0] = ((closureN)self_73696)->elements[0];


object c_731616 = global_set_cps_id(data,(closure)&c_731574,"__glo_get_91first_srfi_117", __glo_get_91first_srfi_117, r_73559);
return_closcall1(data,(closure)&c_731574,  c_731616);; 
}

static void __lambda_156(void *data, object self_73697, int argc, object *args) /* object self_73697, object r_73544 */
 {

  
closureN_type c_731576;
object e_731612 [1];
c_731576.hdr.mark = gc_color_red;
 c_731576.hdr.grayed = 0;
c_731576.tag = closureN_tag;
 c_731576.fn = (function_type)__lambda_157;
c_731576.num_args = 1;
c_731576.num_elements = 1;
c_731576.elements = (object *)e_731612;
c_731576.elements[0] = ((closureN)self_73697)->elements[0];

return_direct_with_clo3(data,  __glo_type_91slot_91offset_scheme_base, (((closure)  __glo_type_91slot_91offset_scheme_base)->fn),  &c_731576, __glo__121list_91queue_125_srfi_117, quote_last);; 
}

static void __lambda_157(void *data, object self_73698, int argc, object *args) /* object self_73698, object r_73557 */
 {
 object r_73557 = args[0];
  
closureN_type c_731578;
object e_731610 [1];
c_731578.hdr.mark = gc_color_red;
 c_731578.hdr.grayed = 0;
c_731578.tag = closureN_tag;
 c_731578.fn = (function_type)__lambda_158;
c_731578.num_args = 1;
c_731578.num_elements = 1;
c_731578.elements = (object *)e_731610;
c_731578.elements[0] = ((closureN)self_73698)->elements[0];


make_utf8_string_with_len(c_731611, "get-last", 8, 8);
return_direct_with_clo4(data,  __glo_make_91getter_scheme_base, (((closure)  __glo_make_91getter_scheme_base)->fn),  &c_731578, &c_731611, quote__121list_91queue_125, r_73557);; 
}

static void __lambda_158(void *data, object self_73699, int argc, object *args) /* object self_73699, object r_73555 */
 {
 object r_73555 = args[0];
  
closureN_type c_731580;
object e_731606 [1];
c_731580.hdr.mark = gc_color_red;
 c_731580.hdr.grayed = 0;
c_731580.tag = closureN_tag;
 c_731580.fn = (function_type)__lambda_159;
c_731580.num_args = 1;
c_731580.num_elements = 1;
c_731580.elements = (object *)e_731606;
c_731580.elements[0] = ((closureN)self_73699)->elements[0];


object c_731609 = global_set_cps_id(data,(closure)&c_731580,"__glo_get_91last_srfi_117", __glo_get_91last_srfi_117, r_73555);
return_closcall1(data,(closure)&c_731580,  c_731609);; 
}

static void __lambda_159(void *data, object self_73700, int argc, object *args) /* object self_73700, object r_73545 */
 {

  
closureN_type c_731582;
object e_731605 [1];
c_731582.hdr.mark = gc_color_red;
 c_731582.hdr.grayed = 0;
c_731582.tag = closureN_tag;
 c_731582.fn = (function_type)__lambda_160;
c_731582.num_args = 1;
c_731582.num_elements = 1;
c_731582.elements = (object *)e_731605;
c_731582.elements[0] = ((closureN)self_73700)->elements[0];

return_direct_with_clo3(data,  __glo_type_91slot_91offset_scheme_base, (((closure)  __glo_type_91slot_91offset_scheme_base)->fn),  &c_731582, __glo__121list_91queue_125_srfi_117, quote_first);; 
}

static void __lambda_160(void *data, object self_73701, int argc, object *args) /* object self_73701, object r_73553 */
 {
 object r_73553 = args[0];
  
closureN_type c_731584;
object e_731603 [1];
c_731584.hdr.mark = gc_color_red;
 c_731584.hdr.grayed = 0;
c_731584.tag = closureN_tag;
 c_731584.fn = (function_type)__lambda_161;
c_731584.num_args = 1;
c_731584.num_elements = 1;
c_731584.elements = (object *)e_731603;
c_731584.elements[0] = ((closureN)self_73701)->elements[0];


make_utf8_string_with_len(c_731604, "set-first!", 10, 10);
return_direct_with_clo4(data,  __glo_make_91setter_scheme_base, (((closure)  __glo_make_91setter_scheme_base)->fn),  &c_731584, &c_731604, quote__121list_91queue_125, r_73553);; 
}

static void __lambda_161(void *data, object self_73702, int argc, object *args) /* object self_73702, object r_73551 */
 {
 object r_73551 = args[0];
  
closureN_type c_731586;
object e_731599 [1];
c_731586.hdr.mark = gc_color_red;
 c_731586.hdr.grayed = 0;
c_731586.tag = closureN_tag;
 c_731586.fn = (function_type)__lambda_162;
c_731586.num_args = 1;
c_731586.num_elements = 1;
c_731586.elements = (object *)e_731599;
c_731586.elements[0] = ((closureN)self_73702)->elements[0];


object c_731602 = global_set_cps_id(data,(closure)&c_731586,"__glo_set_91first_67_srfi_117", __glo_set_91first_67_srfi_117, r_73551);
return_closcall1(data,(closure)&c_731586,  c_731602);; 
}

static void __lambda_162(void *data, object self_73703, int argc, object *args) /* object self_73703, object r_73546 */
 {

  
closureN_type c_731588;
object e_731598 [1];
c_731588.hdr.mark = gc_color_red;
 c_731588.hdr.grayed = 0;
c_731588.tag = closureN_tag;
 c_731588.fn = (function_type)__lambda_163;
c_731588.num_args = 1;
c_731588.num_elements = 1;
c_731588.elements = (object *)e_731598;
c_731588.elements[0] = ((closureN)self_73703)->elements[0];

return_direct_with_clo3(data,  __glo_type_91slot_91offset_scheme_base, (((closure)  __glo_type_91slot_91offset_scheme_base)->fn),  &c_731588, __glo__121list_91queue_125_srfi_117, quote_last);; 
}

static void __lambda_163(void *data, object self_73704, int argc, object *args) /* object self_73704, object r_73549 */
 {
 object r_73549 = args[0];
  
closureN_type c_731590;
object e_731596 [1];
c_731590.hdr.mark = gc_color_red;
 c_731590.hdr.grayed = 0;
c_731590.tag = closureN_tag;
 c_731590.fn = (function_type)__lambda_164;
c_731590.num_args = 1;
c_731590.num_elements = 1;
c_731590.elements = (object *)e_731596;
c_731590.elements[0] = ((closureN)self_73704)->elements[0];


make_utf8_string_with_len(c_731597, "set-last!", 9, 9);
return_direct_with_clo4(data,  __glo_make_91setter_scheme_base, (((closure)  __glo_make_91setter_scheme_base)->fn),  &c_731590, &c_731597, quote__121list_91queue_125, r_73549);; 
}

static void __lambda_164(void *data, object self_73705, int argc, object *args) /* object self_73705, object r_73547 */
 {
 object r_73547 = args[0];
  
object c_731595 = global_set_cps_id(data,  ((closureN)self_73705)->elements[0],"__glo_set_91last_67_srfi_117", __glo_set_91last_67_srfi_117, r_73547);
return_direct_with_clo1(data,  ((closureN)self_73705)->elements[0], (((closure)  ((closureN)self_73705)->elements[0])->fn),  c_731595);; 
}

static void __lambda_141(void *data, object _, int argc, object *args) /* closure _,object k_73521, object args_73148_73152_73257_raw, ... */
 {
object k_73521 = args[0];
load_varargs(args_73148_73152_73257, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/117.sld:list-queue-set-list!");
  
  
  
  make_pair(c_731505,quote_first,NULL);c_731505.hdr.immutable = 1;
  make_pair(c_731504,quote_list_91queue,&c_731505);c_731504.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_73148_73152_73257), Cyc_length(data, &c_731504))) ){ 
  
closureN_type c_731507;
object e_731514 [2];
c_731507.hdr.mark = gc_color_red;
 c_731507.hdr.grayed = 0;
c_731507.tag = closureN_tag;
 c_731507.fn = (function_type)__lambda_142;
c_731507.num_args = 1;
c_731507.num_elements = 2;
c_731507.elements = (object *)e_731514;
c_731507.elements[0] = args_73148_73152_73257;
c_731507.elements[1] = k_73521;


mclosure0(c_731515, (function_type)__lambda_143);c_731515.num_args = 2;
return_direct_with_clo1(data,(closure)&c_731507,__lambda_142,  &c_731515);
} else { 
    
  
  
  make_pair(c_731540,quote_last,NULL);c_731540.hdr.immutable = 1;
  make_pair(c_731539,quote_first,&c_731540);c_731539.hdr.immutable = 1;
  make_pair(c_731538,quote_list_91queue,&c_731539);c_731538.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_73148_73152_73257), Cyc_length(data, &c_731538))) ){ 
  
closureN_type c_731542;
object e_731549 [2];
c_731542.hdr.mark = gc_color_red;
 c_731542.hdr.grayed = 0;
c_731542.tag = closureN_tag;
 c_731542.fn = (function_type)__lambda_146;
c_731542.num_args = 1;
c_731542.num_elements = 2;
c_731542.elements = (object *)e_731549;
c_731542.elements[0] = args_73148_73152_73257;
c_731542.elements[1] = k_73521;


mclosure0(c_731550, (function_type)__lambda_147);c_731550.num_args = 3;
return_direct_with_clo1(data,(closure)&c_731542,__lambda_146,  &c_731550);
} else { 
  
make_utf8_string_with_len(c_731559, "case-lambda: no cases matched", 29, 29);
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_73521, &c_731559);}
;}
;; 
}

static void __lambda_147(void *data, object self_73688, int argc, object *args) /* object self_73688, object k_73532, object list_91queue_73158_73261, object first_73159_73262, object last_73160_73263 */
 {
 object k_73532 = args[0]; object list_91queue_73158_73261 = args[1]; object first_73159_73262 = args[2]; object last_73160_73263 = args[3];
  
closureN_type c_731552;
object e_731557 [3];
c_731552.hdr.mark = gc_color_red;
 c_731552.hdr.grayed = 0;
c_731552.tag = closureN_tag;
 c_731552.fn = (function_type)__lambda_148;
c_731552.num_args = 1;
c_731552.num_elements = 3;
c_731552.elements = (object *)e_731557;
c_731552.elements[0] = k_73532;
c_731552.elements[1] = last_73160_73263;
c_731552.elements[2] = list_91queue_73158_73261;

return_direct_with_clo3(data,  __glo_set_91first_67_srfi_117, (((closure)  __glo_set_91first_67_srfi_117)->fn),  &c_731552, list_91queue_73158_73261, first_73159_73262);; 
}

static void __lambda_148(void *data, object self_73689, int argc, object *args) /* object self_73689, object r_73533 */
 {

  return_direct_with_clo3(data,  __glo_set_91last_67_srfi_117, (((closure)  __glo_set_91last_67_srfi_117)->fn),  ((closureN)self_73689)->elements[0], ((closureN)self_73689)->elements[2], ((closureN)self_73689)->elements[1]);; 
}

static void __lambda_146(void *data, object self_73690, int argc, object *args) /* object self_73690, object r_73531 */
 {
 object r_73531 = args[0];
  
object c_731547 = apply(data,  ((closureN)self_73690)->elements[1],r_73531, ((closureN)self_73690)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_73690)->elements[1], (((closure)  ((closureN)self_73690)->elements[1])->fn),  c_731547);; 
}

static void __lambda_143(void *data, object self_73684, int argc, object *args) /* object self_73684, object k_73525, object list_91queue_73155_73259, object first_73156_73260 */
 {
 object k_73525 = args[0]; object list_91queue_73155_73259 = args[1]; object first_73156_73260 = args[2];
  
closureN_type c_731517;
object e_731531 [3];
c_731517.hdr.mark = gc_color_red;
 c_731517.hdr.grayed = 0;
c_731517.tag = closureN_tag;
 c_731517.fn = (function_type)__lambda_144;
c_731517.num_args = 1;
c_731517.num_elements = 3;
c_731517.elements = (object *)e_731531;
c_731517.elements[0] = first_73156_73260;
c_731517.elements[1] = k_73525;
c_731517.elements[2] = list_91queue_73155_73259;

return_direct_with_clo3(data,  __glo_set_91first_67_srfi_117, (((closure)  __glo_set_91first_67_srfi_117)->fn),  &c_731517, list_91queue_73155_73259, first_73156_73260);; 
}

static void __lambda_144(void *data, object self_73685, int argc, object *args) /* object self_73685, object r_73526 */
 {

    
if( (boolean_f != Cyc_is_null(((closureN)self_73685)->elements[0])) ){ 
  return_direct_with_clo3(data,  __glo_set_91last_67_srfi_117, (((closure)  __glo_set_91last_67_srfi_117)->fn),  ((closureN)self_73685)->elements[1], ((closureN)self_73685)->elements[2], NULL);
} else { 
  
closureN_type c_731525;
object e_731529 [2];
c_731525.hdr.mark = gc_color_red;
 c_731525.hdr.grayed = 0;
c_731525.tag = closureN_tag;
 c_731525.fn = (function_type)__lambda_145;
c_731525.num_args = 1;
c_731525.num_elements = 2;
c_731525.elements = (object *)e_731529;
c_731525.elements[0] = ((closureN)self_73685)->elements[1];
c_731525.elements[1] = ((closureN)self_73685)->elements[2];

return_direct_with_clo2(data,  __glo_last_91pair_srfi_117, (((closure)  __glo_last_91pair_srfi_117)->fn),  &c_731525, ((closureN)self_73685)->elements[0]);}
;; 
}

static void __lambda_145(void *data, object self_73686, int argc, object *args) /* object self_73686, object r_73529 */
 {
 object r_73529 = args[0];
  return_direct_with_clo3(data,  __glo_set_91last_67_srfi_117, (((closure)  __glo_set_91last_67_srfi_117)->fn),  ((closureN)self_73686)->elements[0], ((closureN)self_73686)->elements[1], r_73529);; 
}

static void __lambda_142(void *data, object self_73687, int argc, object *args) /* object self_73687, object r_73524 */
 {
 object r_73524 = args[0];
  
object c_731512 = apply(data,  ((closureN)self_73687)->elements[1],r_73524, ((closureN)self_73687)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_73687)->elements[1], (((closure)  ((closureN)self_73687)->elements[1])->fn),  c_731512);; 
}

static void __lambda_138(void *data, object _, int argc, object *args) /* closure _,object k_73516, object list_91queue_73147_73256 */
 {
object k_73516 = args[0]; object list_91queue_73147_73256 = args[1];
  Cyc_st_add(data, "srfi/117.sld:list-queue-first-last");

closureN_type c_731488;
object e_731496 [2];
c_731488.hdr.mark = gc_color_red;
 c_731488.hdr.grayed = 0;
c_731488.tag = closureN_tag;
 c_731488.fn = (function_type)__lambda_139;
c_731488.num_args = 1;
c_731488.num_elements = 2;
c_731488.elements = (object *)e_731496;
c_731488.elements[0] = k_73516;
c_731488.elements[1] = list_91queue_73147_73256;

return_direct_with_clo2(data,  __glo_get_91first_srfi_117, (((closure)  __glo_get_91first_srfi_117)->fn),  &c_731488, list_91queue_73147_73256);; 
}

static void __lambda_139(void *data, object self_73682, int argc, object *args) /* object self_73682, object r_73517 */
 {
 object r_73517 = args[0];
  
closureN_type c_731490;
object e_731494 [2];
c_731490.hdr.mark = gc_color_red;
 c_731490.hdr.grayed = 0;
c_731490.tag = closureN_tag;
 c_731490.fn = (function_type)__lambda_140;
c_731490.num_args = 1;
c_731490.num_elements = 2;
c_731490.elements = (object *)e_731494;
c_731490.elements[0] = ((closureN)self_73682)->elements[0];
c_731490.elements[1] = r_73517;

return_direct_with_clo2(data,  __glo_get_91last_srfi_117, (((closure)  __glo_get_91last_srfi_117)->fn),  &c_731490, ((closureN)self_73682)->elements[1]);; 
}

static void __lambda_140(void *data, object self_73683, int argc, object *args) /* object self_73683, object r_73518 */
 {
 object r_73518 = args[0];
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_73683)->elements[0], ((closureN)self_73683)->elements[1], r_73518);; 
}

static void __lambda_137(void *data, object _, int argc, object *args) /* closure _,object k_73513, object list_91queue_73146_73255 */
 {
object k_73513 = args[0]; object list_91queue_73146_73255 = args[1];
  Cyc_st_add(data, "srfi/117.sld:list-queue-list");
return_direct_with_clo2(data,  __glo_get_91first_srfi_117, (((closure)  __glo_get_91first_srfi_117)->fn),  k_73513, list_91queue_73146_73255);; 
}

static void __lambda_135(void *data, object _, int argc, object *args) /* closure _,object k_73509, object proc_73144_73253, object list_91queue_73145_73254 */
 {
object k_73509 = args[0]; object proc_73144_73253 = args[1]; object list_91queue_73145_73254 = args[2];
  Cyc_st_add(data, "srfi/117.sld:list-queue-for-each");

closureN_type c_731479;
object e_731483 [2];
c_731479.hdr.mark = gc_color_red;
 c_731479.hdr.grayed = 0;
c_731479.tag = closureN_tag;
 c_731479.fn = (function_type)__lambda_136;
c_731479.num_args = 1;
c_731479.num_elements = 2;
c_731479.elements = (object *)e_731483;
c_731479.elements[0] = k_73509;
c_731479.elements[1] = proc_73144_73253;

return_direct_with_clo2(data,  __glo_get_91first_srfi_117, (((closure)  __glo_get_91first_srfi_117)->fn),  &c_731479, list_91queue_73145_73254);; 
}

static void __lambda_136(void *data, object self_73681, int argc, object *args) /* object self_73681, object r_73510 */
 {
 object r_73510 = args[0];
  return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  ((closureN)self_73681)->elements[0], ((closureN)self_73681)->elements[1], r_73510);; 
}

static void __lambda_133(void *data, object _, int argc, object *args) /* closure _,object k_73505, object proc_73142_73251, object list_91queue_73143_73252 */
 {
object k_73505 = args[0]; object proc_73142_73251 = args[1]; object list_91queue_73143_73252 = args[2];
  Cyc_st_add(data, "srfi/117.sld:list-queue-map!");

closureN_type c_731472;
object e_731476 [2];
c_731472.hdr.mark = gc_color_red;
 c_731472.hdr.grayed = 0;
c_731472.tag = closureN_tag;
 c_731472.fn = (function_type)__lambda_134;
c_731472.num_args = 1;
c_731472.num_elements = 2;
c_731472.elements = (object *)e_731476;
c_731472.elements[0] = k_73505;
c_731472.elements[1] = proc_73142_73251;

return_direct_with_clo2(data,  __glo_get_91first_srfi_117, (((closure)  __glo_get_91first_srfi_117)->fn),  &c_731472, list_91queue_73143_73252);; 
}

static void __lambda_134(void *data, object self_73680, int argc, object *args) /* object self_73680, object r_73506 */
 {
 object r_73506 = args[0];
  return_direct_with_clo3(data,  __glo_map_67_srfi_117, (((closure)  __glo_map_67_srfi_117)->fn),  ((closureN)self_73680)->elements[0], ((closureN)self_73680)->elements[1], r_73506);; 
}

static void __lambda_121(void *data, object _, int argc, object *args) /* closure _,object k_73493, object stop_127_73133_73243, object mapper_73134_73244, object successor_73135_73245, object seed_73136_73246, object queue_73137_73247 */
 {
object k_73493 = args[0]; object stop_127_73133_73243 = args[1]; object mapper_73134_73244 = args[2]; object successor_73135_73245 = args[3]; object seed_73136_73246 = args[4]; object queue_73137_73247 = args[5];
  Cyc_st_add(data, "srfi/117.sld:list-queue-unfold-right*");

closureN_type c_731408;
object e_731469 [5];
c_731408.hdr.mark = gc_color_red;
 c_731408.hdr.grayed = 0;
c_731408.tag = closureN_tag;
 c_731408.fn = (function_type)__lambda_122;
c_731408.num_args = 1;
c_731408.num_elements = 5;
c_731408.elements = (object *)e_731469;
c_731408.elements[0] = k_73493;
c_731408.elements[1] = mapper_73134_73244;
c_731408.elements[2] = queue_73137_73247;
c_731408.elements[3] = stop_127_73133_73243;
c_731408.elements[4] = successor_73135_73245;

return_direct_with_clo1(data,(closure)&c_731408,__lambda_122,  seed_73136_73246);; 
}

static void __lambda_122(void *data, object self_73668, int argc, object *args) /* object self_73668, object seed_73139_73248 */
 {
 object seed_73139_73248 = args[0];
  
closureN_type c_731410;
object e_731468 [6];
c_731410.hdr.mark = gc_color_red;
 c_731410.hdr.grayed = 0;
c_731410.tag = closureN_tag;
 c_731410.fn = (function_type)__lambda_123;
c_731410.num_args = 1;
c_731410.num_elements = 6;
c_731410.elements = (object *)e_731468;
c_731410.elements[0] = ((closureN)self_73668)->elements[0];
c_731410.elements[1] = ((closureN)self_73668)->elements[1];
c_731410.elements[2] = ((closureN)self_73668)->elements[2];
c_731410.elements[3] = seed_73139_73248;
c_731410.elements[4] = ((closureN)self_73668)->elements[3];
c_731410.elements[5] = ((closureN)self_73668)->elements[4];

return_direct_with_clo1(data,(closure)&c_731410,__lambda_123,  boolean_f);; 
}

static void __lambda_123(void *data, object self_73669, int argc, object *args) /* object self_73669, object loop_73140_73249 */
 {
 object loop_73140_73249 = args[0];
  
closureN_type c_731412;
object e_731464 [6];
c_731412.hdr.mark = gc_color_red;
 c_731412.hdr.grayed = 0;
c_731412.tag = closureN_tag;
 c_731412.fn = (function_type)__lambda_168;
c_731412.num_args = 1;
c_731412.num_elements = 6;
c_731412.elements = (object *)e_731464;
c_731412.elements[0] = ((closureN)self_73669)->elements[0];
c_731412.elements[1] = ((closureN)self_73669)->elements[1];
c_731412.elements[2] = ((closureN)self_73669)->elements[2];
c_731412.elements[3] = ((closureN)self_73669)->elements[3];
c_731412.elements[4] = ((closureN)self_73669)->elements[4];
c_731412.elements[5] = ((closureN)self_73669)->elements[5];


pair_type local_731467; 
return_direct_with_clo1(data,(closure)&c_731412,__lambda_168,  set_cell_as_expr(&local_731467, loop_73140_73249));; 
}

static void __lambda_168(void *data, object self_73670, int argc, object *args) /* object self_73670, object loop_73140_73249 */
 {
 object loop_73140_73249 = args[0];
  
closureN_type c_731414;
object e_731427 [3];
c_731414.hdr.mark = gc_color_red;
 c_731414.hdr.grayed = 0;
c_731414.tag = closureN_tag;
 c_731414.fn = (function_type)__lambda_124;
c_731414.num_args = 1;
c_731414.num_elements = 3;
c_731414.elements = (object *)e_731427;
c_731414.elements[0] = ((closureN)self_73670)->elements[0];
c_731414.elements[1] = loop_73140_73249;
c_731414.elements[2] = ((closureN)self_73670)->elements[3];


closureN_type c_731428;
object e_731463 [5];
c_731428.hdr.mark = gc_color_red;
 c_731428.hdr.grayed = 0;
c_731428.tag = closureN_tag;
 c_731428.fn = (function_type)__lambda_126;
c_731428.num_args = 1;
c_731428.num_elements = 5;
c_731428.elements = (object *)e_731463;
c_731428.elements[0] = loop_73140_73249;
c_731428.elements[1] = ((closureN)self_73670)->elements[1];
c_731428.elements[2] = ((closureN)self_73670)->elements[2];
c_731428.elements[3] = ((closureN)self_73670)->elements[4];
c_731428.elements[4] = ((closureN)self_73670)->elements[5];

return_direct_with_clo1(data,(closure)&c_731414,__lambda_124,  &c_731428);; 
}

static void __lambda_126(void *data, object self_73671, int argc, object *args) /* object self_73671, object k_73496, object seed_73141_73250 */
 {
 object k_73496 = args[0]; object seed_73141_73250 = args[1];
  
closureN_type c_731430;
object e_731457 [5];
c_731430.hdr.mark = gc_color_red;
 c_731430.hdr.grayed = 0;
c_731430.tag = closureN_tag;
 c_731430.fn = (function_type)__lambda_127;
c_731430.num_args = 0;
c_731430.num_elements = 5;
c_731430.elements = (object *)e_731457;
c_731430.elements[0] = ((closureN)self_73671)->elements[0];
c_731430.elements[1] = ((closureN)self_73671)->elements[1];
c_731430.elements[2] = seed_73141_73250;
c_731430.elements[3] = ((closureN)self_73671)->elements[3];
c_731430.elements[4] = ((closureN)self_73671)->elements[4];


closureN_type c_731458;
object e_731462 [2];
c_731458.hdr.mark = gc_color_red;
 c_731458.hdr.grayed = 0;
c_731458.tag = closureN_tag;
 c_731458.fn = (function_type)__lambda_132;
c_731458.num_args = 1;
c_731458.num_elements = 2;
c_731458.elements = (object *)e_731462;
c_731458.elements[0] = k_73496;
c_731458.elements[1] = ((closureN)self_73671)->elements[2];

return_direct_with_clo1(data,(closure)&c_731430,__lambda_127,  &c_731458);; 
}

static void __lambda_132(void *data, object self_73672, int argc, object *args) /* object self_73672, object r_73497 */
 {

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

static void __lambda_127(void *data, object self_73673, int argc, object *args) /* object self_73673, object k_73498 */
 {
 object k_73498 = args[0];
  
closureN_type c_731433;
object e_731455 [5];
c_731433.hdr.mark = gc_color_red;
 c_731433.hdr.grayed = 0;
c_731433.tag = closureN_tag;
 c_731433.fn = (function_type)__lambda_128;
c_731433.num_args = 1;
c_731433.num_elements = 5;
c_731433.elements = (object *)e_731455;
c_731433.elements[0] = k_73498;
c_731433.elements[1] = ((closureN)self_73673)->elements[0];
c_731433.elements[2] = ((closureN)self_73673)->elements[1];
c_731433.elements[3] = ((closureN)self_73673)->elements[2];
c_731433.elements[4] = ((closureN)self_73673)->elements[4];

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

static void __lambda_128(void *data, object self_73674, int argc, object *args) /* object self_73674, object r_73499 */
 {
 object r_73499 = args[0];
  if( (boolean_f != r_73499) ){ 
  return_direct_with_clo1(data,  ((closureN)self_73674)->elements[0], (((closure)  ((closureN)self_73674)->elements[0])->fn),  Cyc_VOID);
} else { 
  
closureN_type c_731438;
object e_731453 [4];
c_731438.hdr.mark = gc_color_red;
 c_731438.hdr.grayed = 0;
c_731438.tag = closureN_tag;
 c_731438.fn = (function_type)__lambda_129;
c_731438.num_args = 1;
c_731438.num_elements = 4;
c_731438.elements = (object *)e_731453;
c_731438.elements[0] = ((closureN)self_73674)->elements[0];
c_731438.elements[1] = ((closureN)self_73674)->elements[1];
c_731438.elements[2] = ((closureN)self_73674)->elements[2];
c_731438.elements[3] = ((closureN)self_73674)->elements[3];

return_closcall2(data,  ((closureN)self_73674)->elements[4],  &c_731438, ((closureN)self_73674)->elements[3]);}
;; 
}

static void __lambda_129(void *data, object self_73675, int argc, object *args) /* object self_73675, object r_73502 */
 {
 object r_73502 = args[0];
  


closureN_type c_731443;
object e_731452 [3];
c_731443.hdr.mark = gc_color_red;
 c_731443.hdr.grayed = 0;
c_731443.tag = closureN_tag;
 c_731443.fn = (function_type)__lambda_130;
c_731443.num_args = 1;
c_731443.num_elements = 3;
c_731443.elements = (object *)e_731452;
c_731443.elements[0] = ((closureN)self_73675)->elements[0];
c_731443.elements[1] = ((closureN)self_73675)->elements[2];
c_731443.elements[2] = ((closureN)self_73675)->elements[3];

return_closcall2(data,  car(((closureN)self_73675)->elements[1]),  &c_731443, r_73502);; 
}

static void __lambda_130(void *data, object self_73676, int argc, object *args) /* object self_73676, object r_73500 */
 {
 object r_73500 = args[0];
  
closureN_type c_731446;
object e_731450 [2];
c_731446.hdr.mark = gc_color_red;
 c_731446.hdr.grayed = 0;
c_731446.tag = closureN_tag;
 c_731446.fn = (function_type)__lambda_131;
c_731446.num_args = 1;
c_731446.num_elements = 2;
c_731446.elements = (object *)e_731450;
c_731446.elements[0] = ((closureN)self_73676)->elements[0];
c_731446.elements[1] = r_73500;

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

static void __lambda_131(void *data, object self_73677, int argc, object *args) /* object self_73677, object r_73501 */
 {
 object r_73501 = args[0];
  return_direct_with_clo3(data,  __glo_list_91queue_91add_91back_67_srfi_117, (((closure)  __glo_list_91queue_91add_91back_67_srfi_117)->fn),  ((closureN)self_73677)->elements[0], ((closureN)self_73677)->elements[1], r_73501);; 
}

static void __lambda_124(void *data, object self_73678, int argc, object *args) /* object self_73678, object r_73495 */
 {
 object r_73495 = args[0];
  
closureN_type c_731416;
object e_731423 [3];
c_731416.hdr.mark = gc_color_red;
 c_731416.hdr.grayed = 0;
c_731416.tag = closureN_tag;
 c_731416.fn = (function_type)__lambda_125;
c_731416.num_args = 1;
c_731416.num_elements = 3;
c_731416.elements = (object *)e_731423;
c_731416.elements[0] = ((closureN)self_73678)->elements[0];
c_731416.elements[1] = ((closureN)self_73678)->elements[1];
c_731416.elements[2] = ((closureN)self_73678)->elements[2];



return_direct_with_clo1(data,(closure)&c_731416,__lambda_125,  Cyc_set_cell(data, ((closureN)self_73678)->elements[1], r_73495));; 
}

static void __lambda_125(void *data, object self_73679, int argc, object *args) /* object self_73679, object r_73494 */
 {

  

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

static void __lambda_115(void *data, object _, int argc, object *args) /* closure _,object k_73478, object args_73116_73120_73232_raw, ... */
 {
object k_73478 = args[0];
load_varargs(args_73116_73120_73232, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/117.sld:list-queue-unfold-right");
  
  
  
  make_pair(c_731363,quote_queue,NULL);c_731363.hdr.immutable = 1;
  make_pair(c_731362,quote_seed,&c_731363);c_731362.hdr.immutable = 1;
  make_pair(c_731361,quote_successor,&c_731362);c_731361.hdr.immutable = 1;
  make_pair(c_731360,quote_mapper,&c_731361);c_731360.hdr.immutable = 1;
  make_pair(c_731359,quote_stop_127,&c_731360);c_731359.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_73116_73120_73232), Cyc_length(data, &c_731359))) ){ 
  
closureN_type c_731365;
object e_731372 [2];
c_731365.hdr.mark = gc_color_red;
 c_731365.hdr.grayed = 0;
c_731365.tag = closureN_tag;
 c_731365.fn = (function_type)__lambda_116;
c_731365.num_args = 1;
c_731365.num_elements = 2;
c_731365.elements = (object *)e_731372;
c_731365.elements[0] = args_73116_73120_73232;
c_731365.elements[1] = k_73478;


mclosure0(c_731373, (function_type)__lambda_117);c_731373.num_args = 5;
return_direct_with_clo1(data,(closure)&c_731365,__lambda_116,  &c_731373);
} else { 
    
  
  
  make_pair(c_731384,quote_seed,NULL);c_731384.hdr.immutable = 1;
  make_pair(c_731383,quote_successor,&c_731384);c_731383.hdr.immutable = 1;
  make_pair(c_731382,quote_mapper,&c_731383);c_731382.hdr.immutable = 1;
  make_pair(c_731381,quote_stop_127,&c_731382);c_731381.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_73116_73120_73232), Cyc_length(data, &c_731381))) ){ 
  
closureN_type c_731386;
object e_731393 [2];
c_731386.hdr.mark = gc_color_red;
 c_731386.hdr.grayed = 0;
c_731386.tag = closureN_tag;
 c_731386.fn = (function_type)__lambda_118;
c_731386.num_args = 1;
c_731386.num_elements = 2;
c_731386.elements = (object *)e_731393;
c_731386.elements[0] = args_73116_73120_73232;
c_731386.elements[1] = k_73478;


mclosure0(c_731394, (function_type)__lambda_119);c_731394.num_args = 4;
return_direct_with_clo1(data,(closure)&c_731386,__lambda_118,  &c_731394);
} else { 
  
make_utf8_string_with_len(c_731405, "case-lambda: no cases matched", 29, 29);
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_73478, &c_731405);}
;}
;; 
}

static void __lambda_119(void *data, object self_73665, int argc, object *args) /* object self_73665, object k_73485, object stop_127_73129_73239, object mapper_73130_73240, object successor_73131_73241, object seed_73132_73242 */
 {
 object k_73485 = args[0]; object stop_127_73129_73239 = args[1]; object mapper_73130_73240 = args[2]; object successor_73131_73241 = args[3]; object seed_73132_73242 = args[4];
  
closureN_type c_731396;
object e_731403 [5];
c_731396.hdr.mark = gc_color_red;
 c_731396.hdr.grayed = 0;
c_731396.tag = closureN_tag;
 c_731396.fn = (function_type)__lambda_120;
c_731396.num_args = 1;
c_731396.num_elements = 5;
c_731396.elements = (object *)e_731403;
c_731396.elements[0] = k_73485;
c_731396.elements[1] = mapper_73130_73240;
c_731396.elements[2] = seed_73132_73242;
c_731396.elements[3] = stop_127_73129_73239;
c_731396.elements[4] = successor_73131_73241;

return_direct_with_clo1(data,  __glo_list_91queue_srfi_117, (((closure)  __glo_list_91queue_srfi_117)->fn),  &c_731396);; 
}

static void __lambda_120(void *data, object self_73666, int argc, object *args) /* object self_73666, object r_73486 */
 {
 object r_73486 = args[0];
  return_direct_with_clo6(data,  __glo_list_91queue_91unfold_91right_85_srfi_117, (((closure)  __glo_list_91queue_91unfold_91right_85_srfi_117)->fn),  ((closureN)self_73666)->elements[0], ((closureN)self_73666)->elements[3], ((closureN)self_73666)->elements[1], ((closureN)self_73666)->elements[4], ((closureN)self_73666)->elements[2], r_73486);; 
}

static void __lambda_118(void *data, object self_73667, int argc, object *args) /* object self_73667, object r_73484 */
 {
 object r_73484 = args[0];
  
object c_731391 = apply(data,  ((closureN)self_73667)->elements[1],r_73484, ((closureN)self_73667)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_73667)->elements[1], (((closure)  ((closureN)self_73667)->elements[1])->fn),  c_731391);; 
}

static void __lambda_117(void *data, object self_73663, int argc, object *args) /* object self_73663, object k_73482, object stop_127_73123_73234, object mapper_73124_73235, object successor_73125_73236, object seed_73126_73237, object queue_73127_73238 */
 {
 object k_73482 = args[0]; object stop_127_73123_73234 = args[1]; object mapper_73124_73235 = args[2]; object successor_73125_73236 = args[3]; object seed_73126_73237 = args[4]; object queue_73127_73238 = args[5];
  return_direct_with_clo6(data,  __glo_list_91queue_91unfold_91right_85_srfi_117, (((closure)  __glo_list_91queue_91unfold_91right_85_srfi_117)->fn),  k_73482, stop_127_73123_73234, mapper_73124_73235, successor_73125_73236, seed_73126_73237, queue_73127_73238);; 
}

static void __lambda_116(void *data, object self_73664, int argc, object *args) /* object self_73664, object r_73481 */
 {
 object r_73481 = args[0];
  
object c_731370 = apply(data,  ((closureN)self_73664)->elements[1],r_73481, ((closureN)self_73664)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_73664)->elements[1], (((closure)  ((closureN)self_73664)->elements[1])->fn),  c_731370);; 
}

static void __lambda_103(void *data, object _, int argc, object *args) /* closure _,object k_73466, object stop_127_73107_73224, object mapper_73108_73225, object successor_73109_73226, object seed_73110_73227, object queue_73111_73228 */
 {
object k_73466 = args[0]; object stop_127_73107_73224 = args[1]; object mapper_73108_73225 = args[2]; object successor_73109_73226 = args[3]; object seed_73110_73227 = args[4]; object queue_73111_73228 = args[5];
  Cyc_st_add(data, "srfi/117.sld:list-queue-unfold*");

closureN_type c_731290;
object e_731351 [5];
c_731290.hdr.mark = gc_color_red;
 c_731290.hdr.grayed = 0;
c_731290.tag = closureN_tag;
 c_731290.fn = (function_type)__lambda_104;
c_731290.num_args = 1;
c_731290.num_elements = 5;
c_731290.elements = (object *)e_731351;
c_731290.elements[0] = k_73466;
c_731290.elements[1] = mapper_73108_73225;
c_731290.elements[2] = queue_73111_73228;
c_731290.elements[3] = stop_127_73107_73224;
c_731290.elements[4] = successor_73109_73226;

return_direct_with_clo1(data,(closure)&c_731290,__lambda_104,  seed_73110_73227);; 
}

static void __lambda_104(void *data, object self_73651, int argc, object *args) /* object self_73651, object seed_73113_73229 */
 {
 object seed_73113_73229 = args[0];
  
closureN_type c_731292;
object e_731350 [6];
c_731292.hdr.mark = gc_color_red;
 c_731292.hdr.grayed = 0;
c_731292.tag = closureN_tag;
 c_731292.fn = (function_type)__lambda_105;
c_731292.num_args = 1;
c_731292.num_elements = 6;
c_731292.elements = (object *)e_731350;
c_731292.elements[0] = ((closureN)self_73651)->elements[0];
c_731292.elements[1] = ((closureN)self_73651)->elements[1];
c_731292.elements[2] = ((closureN)self_73651)->elements[2];
c_731292.elements[3] = seed_73113_73229;
c_731292.elements[4] = ((closureN)self_73651)->elements[3];
c_731292.elements[5] = ((closureN)self_73651)->elements[4];

return_direct_with_clo1(data,(closure)&c_731292,__lambda_105,  boolean_f);; 
}

static void __lambda_105(void *data, object self_73652, int argc, object *args) /* object self_73652, object loop_73114_73230 */
 {
 object loop_73114_73230 = args[0];
  
closureN_type c_731294;
object e_731346 [6];
c_731294.hdr.mark = gc_color_red;
 c_731294.hdr.grayed = 0;
c_731294.tag = closureN_tag;
 c_731294.fn = (function_type)__lambda_167;
c_731294.num_args = 1;
c_731294.num_elements = 6;
c_731294.elements = (object *)e_731346;
c_731294.elements[0] = ((closureN)self_73652)->elements[0];
c_731294.elements[1] = ((closureN)self_73652)->elements[1];
c_731294.elements[2] = ((closureN)self_73652)->elements[2];
c_731294.elements[3] = ((closureN)self_73652)->elements[3];
c_731294.elements[4] = ((closureN)self_73652)->elements[4];
c_731294.elements[5] = ((closureN)self_73652)->elements[5];


pair_type local_731349; 
return_direct_with_clo1(data,(closure)&c_731294,__lambda_167,  set_cell_as_expr(&local_731349, loop_73114_73230));; 
}

static void __lambda_167(void *data, object self_73653, int argc, object *args) /* object self_73653, object loop_73114_73230 */
 {
 object loop_73114_73230 = args[0];
  
closureN_type c_731296;
object e_731309 [3];
c_731296.hdr.mark = gc_color_red;
 c_731296.hdr.grayed = 0;
c_731296.tag = closureN_tag;
 c_731296.fn = (function_type)__lambda_106;
c_731296.num_args = 1;
c_731296.num_elements = 3;
c_731296.elements = (object *)e_731309;
c_731296.elements[0] = ((closureN)self_73653)->elements[0];
c_731296.elements[1] = loop_73114_73230;
c_731296.elements[2] = ((closureN)self_73653)->elements[3];


closureN_type c_731310;
object e_731345 [5];
c_731310.hdr.mark = gc_color_red;
 c_731310.hdr.grayed = 0;
c_731310.tag = closureN_tag;
 c_731310.fn = (function_type)__lambda_108;
c_731310.num_args = 1;
c_731310.num_elements = 5;
c_731310.elements = (object *)e_731345;
c_731310.elements[0] = loop_73114_73230;
c_731310.elements[1] = ((closureN)self_73653)->elements[1];
c_731310.elements[2] = ((closureN)self_73653)->elements[2];
c_731310.elements[3] = ((closureN)self_73653)->elements[4];
c_731310.elements[4] = ((closureN)self_73653)->elements[5];

return_direct_with_clo1(data,(closure)&c_731296,__lambda_106,  &c_731310);; 
}

static void __lambda_108(void *data, object self_73654, int argc, object *args) /* object self_73654, object k_73469, object seed_73115_73231 */
 {
 object k_73469 = args[0]; object seed_73115_73231 = args[1];
  
closureN_type c_731312;
object e_731339 [5];
c_731312.hdr.mark = gc_color_red;
 c_731312.hdr.grayed = 0;
c_731312.tag = closureN_tag;
 c_731312.fn = (function_type)__lambda_109;
c_731312.num_args = 0;
c_731312.num_elements = 5;
c_731312.elements = (object *)e_731339;
c_731312.elements[0] = ((closureN)self_73654)->elements[0];
c_731312.elements[1] = ((closureN)self_73654)->elements[1];
c_731312.elements[2] = seed_73115_73231;
c_731312.elements[3] = ((closureN)self_73654)->elements[3];
c_731312.elements[4] = ((closureN)self_73654)->elements[4];


closureN_type c_731340;
object e_731344 [2];
c_731340.hdr.mark = gc_color_red;
 c_731340.hdr.grayed = 0;
c_731340.tag = closureN_tag;
 c_731340.fn = (function_type)__lambda_114;
c_731340.num_args = 1;
c_731340.num_elements = 2;
c_731340.elements = (object *)e_731344;
c_731340.elements[0] = k_73469;
c_731340.elements[1] = ((closureN)self_73654)->elements[2];

return_direct_with_clo1(data,(closure)&c_731312,__lambda_109,  &c_731340);; 
}

static void __lambda_114(void *data, object self_73655, int argc, object *args) /* object self_73655, object r_73470 */
 {

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

static void __lambda_109(void *data, object self_73656, int argc, object *args) /* object self_73656, object k_73471 */
 {
 object k_73471 = args[0];
  
closureN_type c_731315;
object e_731337 [5];
c_731315.hdr.mark = gc_color_red;
 c_731315.hdr.grayed = 0;
c_731315.tag = closureN_tag;
 c_731315.fn = (function_type)__lambda_110;
c_731315.num_args = 1;
c_731315.num_elements = 5;
c_731315.elements = (object *)e_731337;
c_731315.elements[0] = k_73471;
c_731315.elements[1] = ((closureN)self_73656)->elements[0];
c_731315.elements[2] = ((closureN)self_73656)->elements[1];
c_731315.elements[3] = ((closureN)self_73656)->elements[2];
c_731315.elements[4] = ((closureN)self_73656)->elements[4];

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

static void __lambda_110(void *data, object self_73657, int argc, object *args) /* object self_73657, object r_73472 */
 {
 object r_73472 = args[0];
  if( (boolean_f != r_73472) ){ 
  return_direct_with_clo1(data,  ((closureN)self_73657)->elements[0], (((closure)  ((closureN)self_73657)->elements[0])->fn),  Cyc_VOID);
} else { 
  
closureN_type c_731320;
object e_731335 [4];
c_731320.hdr.mark = gc_color_red;
 c_731320.hdr.grayed = 0;
c_731320.tag = closureN_tag;
 c_731320.fn = (function_type)__lambda_111;
c_731320.num_args = 1;
c_731320.num_elements = 4;
c_731320.elements = (object *)e_731335;
c_731320.elements[0] = ((closureN)self_73657)->elements[0];
c_731320.elements[1] = ((closureN)self_73657)->elements[1];
c_731320.elements[2] = ((closureN)self_73657)->elements[2];
c_731320.elements[3] = ((closureN)self_73657)->elements[3];

return_closcall2(data,  ((closureN)self_73657)->elements[4],  &c_731320, ((closureN)self_73657)->elements[3]);}
;; 
}

static void __lambda_111(void *data, object self_73658, int argc, object *args) /* object self_73658, object r_73475 */
 {
 object r_73475 = args[0];
  


closureN_type c_731325;
object e_731334 [3];
c_731325.hdr.mark = gc_color_red;
 c_731325.hdr.grayed = 0;
c_731325.tag = closureN_tag;
 c_731325.fn = (function_type)__lambda_112;
c_731325.num_args = 1;
c_731325.num_elements = 3;
c_731325.elements = (object *)e_731334;
c_731325.elements[0] = ((closureN)self_73658)->elements[0];
c_731325.elements[1] = ((closureN)self_73658)->elements[2];
c_731325.elements[2] = ((closureN)self_73658)->elements[3];

return_closcall2(data,  car(((closureN)self_73658)->elements[1]),  &c_731325, r_73475);; 
}

static void __lambda_112(void *data, object self_73659, int argc, object *args) /* object self_73659, object r_73473 */
 {
 object r_73473 = args[0];
  
closureN_type c_731328;
object e_731332 [2];
c_731328.hdr.mark = gc_color_red;
 c_731328.hdr.grayed = 0;
c_731328.tag = closureN_tag;
 c_731328.fn = (function_type)__lambda_113;
c_731328.num_args = 1;
c_731328.num_elements = 2;
c_731328.elements = (object *)e_731332;
c_731328.elements[0] = ((closureN)self_73659)->elements[0];
c_731328.elements[1] = r_73473;

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

static void __lambda_113(void *data, object self_73660, int argc, object *args) /* object self_73660, object r_73474 */
 {
 object r_73474 = args[0];
  return_direct_with_clo3(data,  __glo_list_91queue_91add_91front_67_srfi_117, (((closure)  __glo_list_91queue_91add_91front_67_srfi_117)->fn),  ((closureN)self_73660)->elements[0], ((closureN)self_73660)->elements[1], r_73474);; 
}

static void __lambda_106(void *data, object self_73661, int argc, object *args) /* object self_73661, object r_73468 */
 {
 object r_73468 = args[0];
  
closureN_type c_731298;
object e_731305 [3];
c_731298.hdr.mark = gc_color_red;
 c_731298.hdr.grayed = 0;
c_731298.tag = closureN_tag;
 c_731298.fn = (function_type)__lambda_107;
c_731298.num_args = 1;
c_731298.num_elements = 3;
c_731298.elements = (object *)e_731305;
c_731298.elements[0] = ((closureN)self_73661)->elements[0];
c_731298.elements[1] = ((closureN)self_73661)->elements[1];
c_731298.elements[2] = ((closureN)self_73661)->elements[2];



return_direct_with_clo1(data,(closure)&c_731298,__lambda_107,  Cyc_set_cell(data, ((closureN)self_73661)->elements[1], r_73468));; 
}

static void __lambda_107(void *data, object self_73662, int argc, object *args) /* object self_73662, object r_73467 */
 {

  

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

static void __lambda_97(void *data, object _, int argc, object *args) /* closure _,object k_73451, object args_7390_7394_73213_raw, ... */
 {
object k_73451 = args[0];
load_varargs(args_7390_7394_73213, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/117.sld:list-queue-unfold");
  
  
  
  make_pair(c_731245,quote_queue,NULL);c_731245.hdr.immutable = 1;
  make_pair(c_731244,quote_seed,&c_731245);c_731244.hdr.immutable = 1;
  make_pair(c_731243,quote_successor,&c_731244);c_731243.hdr.immutable = 1;
  make_pair(c_731242,quote_mapper,&c_731243);c_731242.hdr.immutable = 1;
  make_pair(c_731241,quote_stop_127,&c_731242);c_731241.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_7390_7394_73213), Cyc_length(data, &c_731241))) ){ 
  
closureN_type c_731247;
object e_731254 [2];
c_731247.hdr.mark = gc_color_red;
 c_731247.hdr.grayed = 0;
c_731247.tag = closureN_tag;
 c_731247.fn = (function_type)__lambda_98;
c_731247.num_args = 1;
c_731247.num_elements = 2;
c_731247.elements = (object *)e_731254;
c_731247.elements[0] = args_7390_7394_73213;
c_731247.elements[1] = k_73451;


mclosure0(c_731255, (function_type)__lambda_99);c_731255.num_args = 5;
return_direct_with_clo1(data,(closure)&c_731247,__lambda_98,  &c_731255);
} else { 
    
  
  
  make_pair(c_731266,quote_seed,NULL);c_731266.hdr.immutable = 1;
  make_pair(c_731265,quote_successor,&c_731266);c_731265.hdr.immutable = 1;
  make_pair(c_731264,quote_mapper,&c_731265);c_731264.hdr.immutable = 1;
  make_pair(c_731263,quote_stop_127,&c_731264);c_731263.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_7390_7394_73213), Cyc_length(data, &c_731263))) ){ 
  
closureN_type c_731268;
object e_731275 [2];
c_731268.hdr.mark = gc_color_red;
 c_731268.hdr.grayed = 0;
c_731268.tag = closureN_tag;
 c_731268.fn = (function_type)__lambda_100;
c_731268.num_args = 1;
c_731268.num_elements = 2;
c_731268.elements = (object *)e_731275;
c_731268.elements[0] = args_7390_7394_73213;
c_731268.elements[1] = k_73451;


mclosure0(c_731276, (function_type)__lambda_101);c_731276.num_args = 4;
return_direct_with_clo1(data,(closure)&c_731268,__lambda_100,  &c_731276);
} else { 
  
make_utf8_string_with_len(c_731287, "case-lambda: no cases matched", 29, 29);
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_73451, &c_731287);}
;}
;; 
}

static void __lambda_101(void *data, object self_73648, int argc, object *args) /* object self_73648, object k_73458, object stop_127_73103_73220, object mapper_73104_73221, object successor_73105_73222, object seed_73106_73223 */
 {
 object k_73458 = args[0]; object stop_127_73103_73220 = args[1]; object mapper_73104_73221 = args[2]; object successor_73105_73222 = args[3]; object seed_73106_73223 = args[4];
  
closureN_type c_731278;
object e_731285 [5];
c_731278.hdr.mark = gc_color_red;
 c_731278.hdr.grayed = 0;
c_731278.tag = closureN_tag;
 c_731278.fn = (function_type)__lambda_102;
c_731278.num_args = 1;
c_731278.num_elements = 5;
c_731278.elements = (object *)e_731285;
c_731278.elements[0] = k_73458;
c_731278.elements[1] = mapper_73104_73221;
c_731278.elements[2] = seed_73106_73223;
c_731278.elements[3] = stop_127_73103_73220;
c_731278.elements[4] = successor_73105_73222;

return_direct_with_clo1(data,  __glo_list_91queue_srfi_117, (((closure)  __glo_list_91queue_srfi_117)->fn),  &c_731278);; 
}

static void __lambda_102(void *data, object self_73649, int argc, object *args) /* object self_73649, object r_73459 */
 {
 object r_73459 = args[0];
  return_direct_with_clo6(data,  __glo_list_91queue_91unfold_85_srfi_117, (((closure)  __glo_list_91queue_91unfold_85_srfi_117)->fn),  ((closureN)self_73649)->elements[0], ((closureN)self_73649)->elements[3], ((closureN)self_73649)->elements[1], ((closureN)self_73649)->elements[4], ((closureN)self_73649)->elements[2], r_73459);; 
}

static void __lambda_100(void *data, object self_73650, int argc, object *args) /* object self_73650, object r_73457 */
 {
 object r_73457 = args[0];
  
object c_731273 = apply(data,  ((closureN)self_73650)->elements[1],r_73457, ((closureN)self_73650)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_73650)->elements[1], (((closure)  ((closureN)self_73650)->elements[1])->fn),  c_731273);; 
}

static void __lambda_99(void *data, object self_73646, int argc, object *args) /* object self_73646, object k_73455, object stop_127_7397_73215, object mapper_7398_73216, object successor_7399_73217, object seed_73100_73218, object queue_73101_73219 */
 {
 object k_73455 = args[0]; object stop_127_7397_73215 = args[1]; object mapper_7398_73216 = args[2]; object successor_7399_73217 = args[3]; object seed_73100_73218 = args[4]; object queue_73101_73219 = args[5];
  return_direct_with_clo6(data,  __glo_list_91queue_91unfold_85_srfi_117, (((closure)  __glo_list_91queue_91unfold_85_srfi_117)->fn),  k_73455, stop_127_7397_73215, mapper_7398_73216, successor_7399_73217, seed_73100_73218, queue_73101_73219);; 
}

static void __lambda_98(void *data, object self_73647, int argc, object *args) /* object self_73647, object r_73454 */
 {
 object r_73454 = args[0];
  
object c_731252 = apply(data,  ((closureN)self_73647)->elements[1],r_73454, ((closureN)self_73647)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_73647)->elements[1], (((closure)  ((closureN)self_73647)->elements[1])->fn),  c_731252);; 
}

static void __lambda_94(void *data, object _, int argc, object *args) /* closure _,object k_73446, object proc_7388_73211, object list_91queue_7389_73212 */
 {
object k_73446 = args[0]; object proc_7388_73211 = args[1]; object list_91queue_7389_73212 = args[2];
  Cyc_st_add(data, "srfi/117.sld:list-queue-map");

closureN_type c_731226;
object e_731233 [2];
c_731226.hdr.mark = gc_color_red;
 c_731226.hdr.grayed = 0;
c_731226.tag = closureN_tag;
 c_731226.fn = (function_type)__lambda_95;
c_731226.num_args = 1;
c_731226.num_elements = 2;
c_731226.elements = (object *)e_731233;
c_731226.elements[0] = k_73446;
c_731226.elements[1] = proc_7388_73211;

return_direct_with_clo2(data,  __glo_get_91first_srfi_117, (((closure)  __glo_get_91first_srfi_117)->fn),  &c_731226, list_91queue_7389_73212);; 
}

static void __lambda_95(void *data, object self_73644, int argc, object *args) /* object self_73644, object r_73448 */
 {
 object r_73448 = args[0];
  
closureN_type c_731228;
object e_731231 [1];
c_731228.hdr.mark = gc_color_red;
 c_731228.hdr.grayed = 0;
c_731228.tag = closureN_tag;
 c_731228.fn = (function_type)__lambda_96;
c_731228.num_args = 1;
c_731228.num_elements = 1;
c_731228.elements = (object *)e_731231;
c_731228.elements[0] = ((closureN)self_73644)->elements[0];

return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_731228, ((closureN)self_73644)->elements[1], r_73448);; 
}

static void __lambda_96(void *data, object self_73645, int argc, object *args) /* object self_73645, object r_73447 */
 {
 object r_73447 = args[0];
  return_direct_with_clo2(data,  __glo_make_91list_91queue_srfi_117, (((closure)  __glo_make_91list_91queue_srfi_117)->fn),  ((closureN)self_73645)->elements[0], r_73447);; 
}

static void __lambda_91(void *data, object _, int argc, object *args) /* closure _,object k_73441, object queue1_7386_73209, object queue2_7387_73210 */
 {
object k_73441 = args[0]; object queue1_7386_73209 = args[1]; object queue2_7387_73210 = args[2];
  Cyc_st_add(data, "srfi/117.sld:list-queue-join!");

closureN_type c_731212;
object e_731223 [2];
c_731212.hdr.mark = gc_color_red;
 c_731212.hdr.grayed = 0;
c_731212.tag = closureN_tag;
 c_731212.fn = (function_type)__lambda_92;
c_731212.num_args = 1;
c_731212.num_elements = 2;
c_731212.elements = (object *)e_731223;
c_731212.elements[0] = k_73441;
c_731212.elements[1] = queue2_7387_73210;

return_direct_with_clo2(data,  __glo_get_91last_srfi_117, (((closure)  __glo_get_91last_srfi_117)->fn),  &c_731212, queue1_7386_73209);; 
}

static void __lambda_92(void *data, object self_73642, int argc, object *args) /* object self_73642, object r_73442 */
 {
 object r_73442 = args[0];
  
closureN_type c_731214;
object e_731221 [2];
c_731214.hdr.mark = gc_color_red;
 c_731214.hdr.grayed = 0;
c_731214.tag = closureN_tag;
 c_731214.fn = (function_type)__lambda_93;
c_731214.num_args = 1;
c_731214.num_elements = 2;
c_731214.elements = (object *)e_731221;
c_731214.elements[0] = ((closureN)self_73642)->elements[0];
c_731214.elements[1] = r_73442;

return_direct_with_clo2(data,  __glo_get_91first_srfi_117, (((closure)  __glo_get_91first_srfi_117)->fn),  &c_731214, ((closureN)self_73642)->elements[1]);; 
}

static void __lambda_93(void *data, object self_73643, int argc, object *args) /* object self_73643, object r_73443 */
 {
 object r_73443 = args[0];
  
object c_731219 = Cyc_set_cdr_cps(data,  ((closureN)self_73643)->elements[0],((closureN)self_73643)->elements[1], r_73443);
return_direct_with_clo1(data,  ((closureN)self_73643)->elements[0], (((closure)  ((closureN)self_73643)->elements[0])->fn),  c_731219);; 
}

static void __lambda_81(void *data, object _, int argc, object *args) /* closure _,object k_73419, object args_7374_7378_73204_raw, ... */
 {
object k_73419 = args[0];
load_varargs(args_7374_7378_73204, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/117.sld:list-queue-append!");
  
  
  
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_7374_7378_73204), Cyc_length(data, NULL))) ){ 
  
closureN_type c_731146;
object e_731153 [2];
c_731146.hdr.mark = gc_color_red;
 c_731146.hdr.grayed = 0;
c_731146.tag = closureN_tag;
 c_731146.fn = (function_type)__lambda_82;
c_731146.num_args = 1;
c_731146.num_elements = 2;
c_731146.elements = (object *)e_731153;
c_731146.elements[0] = args_7374_7378_73204;
c_731146.elements[1] = k_73419;


mclosure0(c_731154, (function_type)__lambda_83);c_731154.num_args = 0;
return_direct_with_clo1(data,(closure)&c_731146,__lambda_82,  &c_731154);
} else { 
    
  
  
  make_pair(c_731162,quote_queue,NULL);c_731162.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_7374_7378_73204), Cyc_length(data, &c_731162))) ){ 
  
closureN_type c_731164;
object e_731171 [2];
c_731164.hdr.mark = gc_color_red;
 c_731164.hdr.grayed = 0;
c_731164.tag = closureN_tag;
 c_731164.fn = (function_type)__lambda_84;
c_731164.num_args = 1;
c_731164.num_elements = 2;
c_731164.elements = (object *)e_731171;
c_731164.elements[0] = args_7374_7378_73204;
c_731164.elements[1] = k_73419;


mclosure0(c_731172, (function_type)__lambda_85);c_731172.num_args = 1;
return_direct_with_clo1(data,(closure)&c_731164,__lambda_84,  &c_731172);
} else { 
    
  
if( (boolean_f != Cyc_num_fast_gte_op(data, Cyc_length(data, args_7374_7378_73204), obj_int2obj(0))) ){ 
  
closureN_type c_731179;
object e_731186 [2];
c_731179.hdr.mark = gc_color_red;
 c_731179.hdr.grayed = 0;
c_731179.tag = closureN_tag;
 c_731179.fn = (function_type)__lambda_86;
c_731179.num_args = 1;
c_731179.num_elements = 2;
c_731179.elements = (object *)e_731186;
c_731179.elements[0] = args_7374_7378_73204;
c_731179.elements[1] = k_73419;


mclosure0(c_731187, (function_type)__lambda_87);c_731187.num_args = 0;
return_direct_with_clo1(data,(closure)&c_731179,__lambda_86,  &c_731187);
} else { 
  
make_utf8_string_with_len(c_731209, "case-lambda: no cases matched", 29, 29);
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_73419, &c_731209);}
;}
;}
;; 
}

static void __lambda_87(void *data, object self_73637, int argc, object *args) /* object self_73637, object k_73429, object queues_7384_73207_raw, ... */
 {
 object k_73429 = args[0];
load_varargs(queues_7384_73207, args, 1, argc - 1);
  
closureN_type c_731189;
object e_731201 [2];
c_731189.hdr.mark = gc_color_red;
 c_731189.hdr.grayed = 0;
c_731189.tag = closureN_tag;
 c_731189.fn = (function_type)__lambda_88;
c_731189.num_args = 1;
c_731189.num_elements = 2;
c_731189.elements = (object *)e_731201;
c_731189.elements[0] = k_73429;
c_731189.elements[1] = queues_7384_73207;


closureN_type c_731202;
object e_731207 [1];
c_731202.hdr.mark = gc_color_red;
 c_731202.hdr.grayed = 0;
c_731202.tag = closureN_tag;
 c_731202.fn = (function_type)__lambda_90;
c_731202.num_args = 1;
c_731202.num_elements = 1;
c_731202.elements = (object *)e_731207;
c_731202.elements[0] = queues_7384_73207;

return_direct_with_clo1(data,(closure)&c_731189,__lambda_88,  &c_731202);; 
}

static void __lambda_90(void *data, object self_73638, int argc, object *args) /* object self_73638, object k_73433, object queue_7385_73208 */
 {
 object k_73433 = args[0]; object queue_7385_73208 = args[1];
  

return_direct_with_clo3(data,  __glo_list_91queue_91join_67_srfi_117, (((closure)  __glo_list_91queue_91join_67_srfi_117)->fn),  k_73433, Cyc_car(data, ((closureN)self_73638)->elements[0]), queue_7385_73208);; 
}

static void __lambda_88(void *data, object self_73639, int argc, object *args) /* object self_73639, object r_73431 */
 {
 object r_73431 = args[0];
  
closureN_type c_731191;
object e_731197 [2];
c_731191.hdr.mark = gc_color_red;
 c_731191.hdr.grayed = 0;
c_731191.tag = closureN_tag;
 c_731191.fn = (function_type)__lambda_89;
c_731191.num_args = 1;
c_731191.num_elements = 2;
c_731191.elements = (object *)e_731197;
c_731191.elements[0] = ((closureN)self_73639)->elements[0];
c_731191.elements[1] = ((closureN)self_73639)->elements[1];



return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_731191, r_73431, Cyc_cdr(data, ((closureN)self_73639)->elements[1]));; 
}

static void __lambda_89(void *data, object self_73640, int argc, object *args) /* object self_73640, object r_73430 */
 {

  

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

static void __lambda_86(void *data, object self_73641, int argc, object *args) /* object self_73641, object r_73428 */
 {
 object r_73428 = args[0];
  
object c_731184 = apply(data,  ((closureN)self_73641)->elements[1],r_73428, ((closureN)self_73641)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_73641)->elements[1], (((closure)  ((closureN)self_73641)->elements[1])->fn),  c_731184);; 
}

static void __lambda_85(void *data, object self_73635, int argc, object *args) /* object self_73635, object k_73426, object queue_7382_73206 */
 {
 object k_73426 = args[0]; object queue_7382_73206 = args[1];
  return_direct_with_clo1(data,  k_73426, (((closure)  k_73426)->fn),  queue_7382_73206);; 
}

static void __lambda_84(void *data, object self_73636, int argc, object *args) /* object self_73636, object r_73425 */
 {
 object r_73425 = args[0];
  
object c_731169 = apply(data,  ((closureN)self_73636)->elements[1],r_73425, ((closureN)self_73636)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_73636)->elements[1], (((closure)  ((closureN)self_73636)->elements[1])->fn),  c_731169);; 
}

static void __lambda_83(void *data, object self_73633, int argc, object *args) /* object self_73633, object k_73423 */
 {
 object k_73423 = args[0];
  return_direct_with_clo1(data,  __glo_list_91queue_srfi_117, (((closure)  __glo_list_91queue_srfi_117)->fn),  k_73423);; 
}

static void __lambda_82(void *data, object self_73634, int argc, object *args) /* object self_73634, object r_73422 */
 {
 object r_73422 = args[0];
  
object c_731151 = apply(data,  ((closureN)self_73634)->elements[1],r_73422, ((closureN)self_73634)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_73634)->elements[1], (((closure)  ((closureN)self_73634)->elements[1])->fn),  c_731151);; 
}

static void __lambda_73(void *data, object _, int argc, object *args) /* closure _,object k_73409, object list_91queues_7370_73200 */
 {
object k_73409 = args[0]; object list_91queues_7370_73200 = args[1];
  Cyc_st_add(data, "srfi/117.sld:list-queue-concatenate");

closureN_type c_731110;
object e_731137 [2];
c_731110.hdr.mark = gc_color_red;
 c_731110.hdr.grayed = 0;
c_731110.tag = closureN_tag;
 c_731110.fn = (function_type)__lambda_74;
c_731110.num_args = 1;
c_731110.num_elements = 2;
c_731110.elements = (object *)e_731137;
c_731110.elements[0] = k_73409;
c_731110.elements[1] = list_91queues_7370_73200;

return_direct_with_clo1(data,  __glo_list_91queue_srfi_117, (((closure)  __glo_list_91queue_srfi_117)->fn),  &c_731110);; 
}

static void __lambda_74(void *data, object self_73626, int argc, object *args) /* object self_73626, object result_7371_73201 */
 {
 object result_7371_73201 = args[0];
  
closureN_type c_731112;
object e_731120 [3];
c_731112.hdr.mark = gc_color_red;
 c_731112.hdr.grayed = 0;
c_731112.tag = closureN_tag;
 c_731112.fn = (function_type)__lambda_75;
c_731112.num_args = 1;
c_731112.num_elements = 3;
c_731112.elements = (object *)e_731120;
c_731112.elements[0] = ((closureN)self_73626)->elements[0];
c_731112.elements[1] = ((closureN)self_73626)->elements[1];
c_731112.elements[2] = result_7371_73201;


closureN_type c_731121;
object e_731136 [1];
c_731121.hdr.mark = gc_color_red;
 c_731121.hdr.grayed = 0;
c_731121.tag = closureN_tag;
 c_731121.fn = (function_type)__lambda_77;
c_731121.num_args = 1;
c_731121.num_elements = 1;
c_731121.elements = (object *)e_731136;
c_731121.elements[0] = result_7371_73201;

return_direct_with_clo1(data,(closure)&c_731112,__lambda_75,  &c_731121);; 
}

static void __lambda_77(void *data, object self_73627, int argc, object *args) /* object self_73627, object k_73413, object list_91queue_7372_73202 */
 {
 object k_73413 = args[0]; object list_91queue_7372_73202 = args[1];
  
closureN_type c_731123;
object e_731131 [2];
c_731123.hdr.mark = gc_color_red;
 c_731123.hdr.grayed = 0;
c_731123.tag = closureN_tag;
 c_731123.fn = (function_type)__lambda_78;
c_731123.num_args = 1;
c_731123.num_elements = 2;
c_731123.elements = (object *)e_731131;
c_731123.elements[0] = k_73413;
c_731123.elements[1] = list_91queue_7372_73202;


closureN_type c_731132;
object e_731135 [1];
c_731132.hdr.mark = gc_color_red;
 c_731132.hdr.grayed = 0;
c_731132.tag = closureN_tag;
 c_731132.fn = (function_type)__lambda_80;
c_731132.num_args = 1;
c_731132.num_elements = 1;
c_731132.elements = (object *)e_731135;
c_731132.elements[0] = ((closureN)self_73627)->elements[0];

return_direct_with_clo1(data,(closure)&c_731123,__lambda_78,  &c_731132);; 
}

static void __lambda_80(void *data, object self_73628, int argc, object *args) /* object self_73628, object k_73416, object elem_7373_73203 */
 {
 object k_73416 = args[0]; object elem_7373_73203 = args[1];
  return_direct_with_clo3(data,  __glo_list_91queue_91add_91back_67_srfi_117, (((closure)  __glo_list_91queue_91add_91back_67_srfi_117)->fn),  k_73416, ((closureN)self_73628)->elements[0], elem_7373_73203);; 
}

static void __lambda_78(void *data, object self_73629, int argc, object *args) /* object self_73629, object r_73414 */
 {
 object r_73414 = args[0];
  
closureN_type c_731125;
object e_731129 [2];
c_731125.hdr.mark = gc_color_red;
 c_731125.hdr.grayed = 0;
c_731125.tag = closureN_tag;
 c_731125.fn = (function_type)__lambda_79;
c_731125.num_args = 1;
c_731125.num_elements = 2;
c_731125.elements = (object *)e_731129;
c_731125.elements[0] = ((closureN)self_73629)->elements[0];
c_731125.elements[1] = r_73414;

return_direct_with_clo2(data,  __glo_get_91first_srfi_117, (((closure)  __glo_get_91first_srfi_117)->fn),  &c_731125, ((closureN)self_73629)->elements[1]);; 
}

static void __lambda_79(void *data, object self_73630, int argc, object *args) /* object self_73630, object r_73415 */
 {
 object r_73415 = args[0];
  return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  ((closureN)self_73630)->elements[0], ((closureN)self_73630)->elements[1], r_73415);; 
}

static void __lambda_75(void *data, object self_73631, int argc, object *args) /* object self_73631, object r_73412 */
 {
 object r_73412 = args[0];
  
closureN_type c_731114;
object e_731118 [2];
c_731114.hdr.mark = gc_color_red;
 c_731114.hdr.grayed = 0;
c_731114.tag = closureN_tag;
 c_731114.fn = (function_type)__lambda_76;
c_731114.num_args = 1;
c_731114.num_elements = 2;
c_731114.elements = (object *)e_731118;
c_731114.elements[0] = ((closureN)self_73631)->elements[0];
c_731114.elements[1] = ((closureN)self_73631)->elements[2];

return_direct_with_clo3(data,  __glo_Cyc_91for_91each_91loop_911_scheme_base, (((closure)  __glo_Cyc_91for_91each_91loop_911_scheme_base)->fn),  &c_731114, r_73412, ((closureN)self_73631)->elements[1]);; 
}

static void __lambda_76(void *data, object self_73632, int argc, object *args) /* object self_73632, object r_73411 */
 {

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

static void __lambda_72(void *data, object _, int argc, object *args) /* closure _,object k_73406, object list_91queues_7369_73199_raw, ... */
 {
object k_73406 = args[0];
load_varargs(list_91queues_7369_73199, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/117.sld:list-queue-append");
return_direct_with_clo2(data,  __glo_list_91queue_91concatenate_srfi_117, (((closure)  __glo_list_91queue_91concatenate_srfi_117)->fn),  k_73406, list_91queues_7369_73199);; 
}

static void __lambda_66(void *data, object _, int argc, object *args) /* closure _,object k_73395, object lis_7357_73195 */
 {
object k_73395 = args[0]; object lis_7357_73195 = args[1];
  Cyc_st_add(data, "srfi/117.sld:penult-pair");

closureN_type c_731062;
object e_731105 [1];
c_731062.hdr.mark = gc_color_red;
 c_731062.hdr.grayed = 0;
c_731062.tag = closureN_tag;
 c_731062.fn = (function_type)__lambda_67;
c_731062.num_args = 1;
c_731062.num_elements = 1;
c_731062.elements = (object *)e_731105;
c_731062.elements[0] = k_73395;

return_direct_with_clo1(data,(closure)&c_731062,__lambda_67,  lis_7357_73195);; 
}

static void __lambda_67(void *data, object self_73620, int argc, object *args) /* object self_73620, object lis_7359_73196 */
 {
 object lis_7359_73196 = args[0];
  
closureN_type c_731064;
object e_731104 [2];
c_731064.hdr.mark = gc_color_red;
 c_731064.hdr.grayed = 0;
c_731064.tag = closureN_tag;
 c_731064.fn = (function_type)__lambda_68;
c_731064.num_args = 1;
c_731064.num_elements = 2;
c_731064.elements = (object *)e_731104;
c_731064.elements[0] = ((closureN)self_73620)->elements[0];
c_731064.elements[1] = lis_7359_73196;

return_direct_with_clo1(data,(closure)&c_731064,__lambda_68,  boolean_f);; 
}

static void __lambda_68(void *data, object self_73621, int argc, object *args) /* object self_73621, object lp_7360_73197 */
 {
 object lp_7360_73197 = args[0];
  
closureN_type c_731066;
object e_731100 [2];
c_731066.hdr.mark = gc_color_red;
 c_731066.hdr.grayed = 0;
c_731066.tag = closureN_tag;
 c_731066.fn = (function_type)__lambda_166;
c_731066.num_args = 1;
c_731066.num_elements = 2;
c_731066.elements = (object *)e_731100;
c_731066.elements[0] = ((closureN)self_73621)->elements[0];
c_731066.elements[1] = ((closureN)self_73621)->elements[1];


pair_type local_731103; 
return_direct_with_clo1(data,(closure)&c_731066,__lambda_166,  set_cell_as_expr(&local_731103, lp_7360_73197));; 
}

static void __lambda_166(void *data, object self_73622, int argc, object *args) /* object self_73622, object lp_7360_73197 */
 {
 object lp_7360_73197 = args[0];
  
closureN_type c_731068;
object e_731081 [3];
c_731068.hdr.mark = gc_color_red;
 c_731068.hdr.grayed = 0;
c_731068.tag = closureN_tag;
 c_731068.fn = (function_type)__lambda_69;
c_731068.num_args = 1;
c_731068.num_elements = 3;
c_731068.elements = (object *)e_731081;
c_731068.elements[0] = ((closureN)self_73622)->elements[0];
c_731068.elements[1] = ((closureN)self_73622)->elements[1];
c_731068.elements[2] = lp_7360_73197;


closureN_type c_731082;
object e_731099 [1];
c_731082.hdr.mark = gc_color_red;
 c_731082.hdr.grayed = 0;
c_731082.tag = closureN_tag;
 c_731082.fn = (function_type)__lambda_71;
c_731082.num_args = 1;
c_731082.num_elements = 1;
c_731082.elements = (object *)e_731099;
c_731082.elements[0] = lp_7360_73197;

return_direct_with_clo1(data,(closure)&c_731068,__lambda_69,  &c_731082);; 
}

static void __lambda_71(void *data, object self_73623, int argc, object *args) /* object self_73623, object k_73398, object lis_7361_73198 */
 {
 object k_73398 = args[0]; object lis_7361_73198 = args[1];
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, lis_7361_73198))) ){ 
  return_direct_with_clo1(data,  k_73398, (((closure)  k_73398)->fn),  NULL);
} else { 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cddr(data, lis_7361_73198))) ){ 
  return_direct_with_clo1(data,  k_73398, (((closure)  k_73398)->fn),  lis_7361_73198);
} else { 
  



return_closcall2(data,  car(((closureN)self_73623)->elements[0]),  k_73398, Cyc_cdr(data, lis_7361_73198));}
;}
;; 
}

static void __lambda_69(void *data, object self_73624, int argc, object *args) /* object self_73624, object r_73397 */
 {
 object r_73397 = args[0];
  
closureN_type c_731070;
object e_731077 [3];
c_731070.hdr.mark = gc_color_red;
 c_731070.hdr.grayed = 0;
c_731070.tag = closureN_tag;
 c_731070.fn = (function_type)__lambda_70;
c_731070.num_args = 1;
c_731070.num_elements = 3;
c_731070.elements = (object *)e_731077;
c_731070.elements[0] = ((closureN)self_73624)->elements[0];
c_731070.elements[1] = ((closureN)self_73624)->elements[1];
c_731070.elements[2] = ((closureN)self_73624)->elements[2];



return_direct_with_clo1(data,(closure)&c_731070,__lambda_70,  Cyc_set_cell(data, ((closureN)self_73624)->elements[2], r_73397));; 
}

static void __lambda_70(void *data, object self_73625, int argc, object *args) /* object self_73625, object r_73396 */
 {

  

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

static void __lambda_62(void *data, object _, int argc, object *args) /* closure _,object k_73387, object list_91queue_7355_73193 */
 {
object k_73387 = args[0]; object list_91queue_7355_73193 = args[1];
  Cyc_st_add(data, "srfi/117.sld:list-queue-remove-all!");

closureN_type c_731047;
object e_731059 [2];
c_731047.hdr.mark = gc_color_red;
 c_731047.hdr.grayed = 0;
c_731047.tag = closureN_tag;
 c_731047.fn = (function_type)__lambda_63;
c_731047.num_args = 1;
c_731047.num_elements = 2;
c_731047.elements = (object *)e_731059;
c_731047.elements[0] = k_73387;
c_731047.elements[1] = list_91queue_7355_73193;

return_direct_with_clo2(data,  __glo_get_91first_srfi_117, (((closure)  __glo_get_91first_srfi_117)->fn),  &c_731047, list_91queue_7355_73193);; 
}

static void __lambda_63(void *data, object self_73617, int argc, object *args) /* object self_73617, object result_7356_73194 */
 {
 object result_7356_73194 = args[0];
  
closureN_type c_731049;
object e_731057 [3];
c_731049.hdr.mark = gc_color_red;
 c_731049.hdr.grayed = 0;
c_731049.tag = closureN_tag;
 c_731049.fn = (function_type)__lambda_64;
c_731049.num_args = 1;
c_731049.num_elements = 3;
c_731049.elements = (object *)e_731057;
c_731049.elements[0] = ((closureN)self_73617)->elements[0];
c_731049.elements[1] = ((closureN)self_73617)->elements[1];
c_731049.elements[2] = result_7356_73194;

return_direct_with_clo3(data,  __glo_set_91first_67_srfi_117, (((closure)  __glo_set_91first_67_srfi_117)->fn),  &c_731049, ((closureN)self_73617)->elements[1], NULL);; 
}

static void __lambda_64(void *data, object self_73618, int argc, object *args) /* object self_73618, object r_73389 */
 {

  
closureN_type c_731051;
object e_731055 [2];
c_731051.hdr.mark = gc_color_red;
 c_731051.hdr.grayed = 0;
c_731051.tag = closureN_tag;
 c_731051.fn = (function_type)__lambda_65;
c_731051.num_args = 1;
c_731051.num_elements = 2;
c_731051.elements = (object *)e_731055;
c_731051.elements[0] = ((closureN)self_73618)->elements[0];
c_731051.elements[1] = ((closureN)self_73618)->elements[2];

return_direct_with_clo3(data,  __glo_set_91last_67_srfi_117, (((closure)  __glo_set_91last_67_srfi_117)->fn),  &c_731051, ((closureN)self_73618)->elements[1], NULL);; 
}

static void __lambda_65(void *data, object self_73619, int argc, object *args) /* object self_73619, object r_73390 */
 {

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

static void __lambda_51(void *data, object _, int argc, object *args) /* closure _,object k_73371, object list_91queue_7344_73189 */
 {
object k_73371 = args[0]; object list_91queue_7344_73189 = args[1];
  Cyc_st_add(data, "srfi/117.sld:list-queue-remove-back!");

closureN_type c_73993;
object e_731003 [1];
c_73993.hdr.mark = gc_color_red;
 c_73993.hdr.grayed = 0;
c_73993.tag = closureN_tag;
 c_73993.fn = (function_type)__lambda_52;
c_73993.num_args = 0;
c_73993.num_elements = 1;
c_73993.elements = (object *)e_731003;
c_73993.elements[0] = list_91queue_7344_73189;


closureN_type c_731004;
object e_731044 [2];
c_731004.hdr.mark = gc_color_red;
 c_731004.hdr.grayed = 0;
c_731004.tag = closureN_tag;
 c_731004.fn = (function_type)__lambda_54;
c_731004.num_args = 1;
c_731004.num_elements = 2;
c_731004.elements = (object *)e_731044;
c_731004.elements[0] = k_73371;
c_731004.elements[1] = list_91queue_7344_73189;

return_direct_with_clo1(data,(closure)&c_73993,__lambda_52,  &c_731004);; 
}

static void __lambda_54(void *data, object self_73607, int argc, object *args) /* object self_73607, object r_73372 */
 {

  
closureN_type c_731006;
object e_731042 [2];
c_731006.hdr.mark = gc_color_red;
 c_731006.hdr.grayed = 0;
c_731006.tag = closureN_tag;
 c_731006.fn = (function_type)__lambda_55;
c_731006.num_args = 1;
c_731006.num_elements = 2;
c_731006.elements = (object *)e_731042;
c_731006.elements[0] = ((closureN)self_73607)->elements[0];
c_731006.elements[1] = ((closureN)self_73607)->elements[1];

return_direct_with_clo2(data,  __glo_get_91last_srfi_117, (((closure)  __glo_get_91last_srfi_117)->fn),  &c_731006, ((closureN)self_73607)->elements[1]);; 
}

static void __lambda_55(void *data, object self_73608, int argc, object *args) /* object self_73608, object old_91last_7347_73190 */
 {
 object old_91last_7347_73190 = args[0];
  
closureN_type c_731008;
object e_731039 [2];
c_731008.hdr.mark = gc_color_red;
 c_731008.hdr.grayed = 0;
c_731008.tag = closureN_tag;
 c_731008.fn = (function_type)__lambda_56;
c_731008.num_args = 1;
c_731008.num_elements = 2;
c_731008.elements = (object *)e_731039;
c_731008.elements[0] = ((closureN)self_73608)->elements[0];
c_731008.elements[1] = ((closureN)self_73608)->elements[1];



return_direct_with_clo1(data,(closure)&c_731008,__lambda_56,  Cyc_car(data, old_91last_7347_73190));; 
}

static void __lambda_56(void *data, object self_73609, int argc, object *args) /* object self_73609, object elem_7350_73191 */
 {
 object elem_7350_73191 = args[0];
  
closureN_type c_731010;
object e_731037 [3];
c_731010.hdr.mark = gc_color_red;
 c_731010.hdr.grayed = 0;
c_731010.tag = closureN_tag;
 c_731010.fn = (function_type)__lambda_57;
c_731010.num_args = 1;
c_731010.num_elements = 3;
c_731010.elements = (object *)e_731037;
c_731010.elements[0] = elem_7350_73191;
c_731010.elements[1] = ((closureN)self_73609)->elements[0];
c_731010.elements[2] = ((closureN)self_73609)->elements[1];

return_direct_with_clo2(data,  __glo_get_91first_srfi_117, (((closure)  __glo_get_91first_srfi_117)->fn),  &c_731010, ((closureN)self_73609)->elements[1]);; 
}

static void __lambda_57(void *data, object self_73610, int argc, object *args) /* object self_73610, object r_73382 */
 {
 object r_73382 = args[0];
  
closureN_type c_731012;
object e_731036 [3];
c_731012.hdr.mark = gc_color_red;
 c_731012.hdr.grayed = 0;
c_731012.tag = closureN_tag;
 c_731012.fn = (function_type)__lambda_58;
c_731012.num_args = 1;
c_731012.num_elements = 3;
c_731012.elements = (object *)e_731036;
c_731012.elements[0] = ((closureN)self_73610)->elements[0];
c_731012.elements[1] = ((closureN)self_73610)->elements[1];
c_731012.elements[2] = ((closureN)self_73610)->elements[2];

return_direct_with_clo2(data,  __glo_penult_91pair_srfi_117, (((closure)  __glo_penult_91pair_srfi_117)->fn),  &c_731012, r_73382);; 
}

static void __lambda_58(void *data, object self_73611, int argc, object *args) /* object self_73611, object new_91last_7353_73192 */
 {
 object new_91last_7353_73192 = args[0];
  
closureN_type c_731014;
object e_731025 [2];
c_731014.hdr.mark = gc_color_red;
 c_731014.hdr.grayed = 0;
c_731014.tag = closureN_tag;
 c_731014.fn = (function_type)__lambda_59;
c_731014.num_args = 0;
c_731014.num_elements = 2;
c_731014.elements = (object *)e_731025;
c_731014.elements[0] = ((closureN)self_73611)->elements[2];
c_731014.elements[1] = new_91last_7353_73192;


closureN_type c_731026;
object e_731035 [4];
c_731026.hdr.mark = gc_color_red;
 c_731026.hdr.grayed = 0;
c_731026.tag = closureN_tag;
 c_731026.fn = (function_type)__lambda_60;
c_731026.num_args = 1;
c_731026.num_elements = 4;
c_731026.elements = (object *)e_731035;
c_731026.elements[0] = ((closureN)self_73611)->elements[0];
c_731026.elements[1] = ((closureN)self_73611)->elements[1];
c_731026.elements[2] = ((closureN)self_73611)->elements[2];
c_731026.elements[3] = new_91last_7353_73192;

return_direct_with_clo1(data,(closure)&c_731014,__lambda_59,  &c_731026);; 
}

static void __lambda_60(void *data, object self_73612, int argc, object *args) /* object self_73612, object r_73376 */
 {

  
closureN_type c_731028;
object e_731032 [2];
c_731028.hdr.mark = gc_color_red;
 c_731028.hdr.grayed = 0;
c_731028.tag = closureN_tag;
 c_731028.fn = (function_type)__lambda_61;
c_731028.num_args = 1;
c_731028.num_elements = 2;
c_731028.elements = (object *)e_731032;
c_731028.elements[0] = ((closureN)self_73612)->elements[0];
c_731028.elements[1] = ((closureN)self_73612)->elements[1];

return_direct_with_clo3(data,  __glo_set_91last_67_srfi_117, (((closure)  __glo_set_91last_67_srfi_117)->fn),  &c_731028, ((closureN)self_73612)->elements[2], ((closureN)self_73612)->elements[3]);; 
}

static void __lambda_61(void *data, object self_73613, int argc, object *args) /* object self_73613, object r_73377 */
 {

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

static void __lambda_59(void *data, object self_73614, int argc, object *args) /* object self_73614, object k_73378 */
 {
 object k_73378 = args[0];
    
if( (boolean_f != Cyc_is_null(((closureN)self_73614)->elements[1])) ){ 
  return_direct_with_clo3(data,  __glo_set_91first_67_srfi_117, (((closure)  __glo_set_91first_67_srfi_117)->fn),  k_73378, ((closureN)self_73614)->elements[0], NULL);
} else { 
  
object c_731023 = Cyc_set_cdr_cps(data,  k_73378,((closureN)self_73614)->elements[1], NULL);
return_direct_with_clo1(data,  k_73378, (((closure)  k_73378)->fn),  c_731023);}
;; 
}

static void __lambda_52(void *data, object self_73615, int argc, object *args) /* object self_73615, object k_73383 */
 {
 object k_73383 = args[0];
  
closureN_type c_73995;
object e_731001 [1];
c_73995.hdr.mark = gc_color_red;
 c_73995.hdr.grayed = 0;
c_73995.tag = closureN_tag;
 c_73995.fn = (function_type)__lambda_53;
c_73995.num_args = 1;
c_73995.num_elements = 1;
c_73995.elements = (object *)e_731001;
c_73995.elements[0] = k_73383;

return_direct_with_clo2(data,  __glo_list_91queue_91empty_127_srfi_117, (((closure)  __glo_list_91queue_91empty_127_srfi_117)->fn),  &c_73995, ((closureN)self_73615)->elements[0]);; 
}

static void __lambda_53(void *data, object self_73616, int argc, object *args) /* object self_73616, object r_73384 */
 {
 object r_73384 = args[0];
  if( (boolean_f != r_73384) ){ 
  
make_utf8_string_with_len(c_73998, "Empty list-queue", 16, 16);
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_73616)->elements[0], &c_73998);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_73616)->elements[0], (((closure)  ((closureN)self_73616)->elements[0])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_43(void *data, object _, int argc, object *args) /* closure _,object k_73357, object list_91queue_7333_73185 */
 {
object k_73357 = args[0]; object list_91queue_7333_73185 = args[1];
  Cyc_st_add(data, "srfi/117.sld:list-queue-remove-front!");

closureN_type c_73949;
object e_73959 [1];
c_73949.hdr.mark = gc_color_red;
 c_73949.hdr.grayed = 0;
c_73949.tag = closureN_tag;
 c_73949.fn = (function_type)__lambda_44;
c_73949.num_args = 0;
c_73949.num_elements = 1;
c_73949.elements = (object *)e_73959;
c_73949.elements[0] = list_91queue_7333_73185;


closureN_type c_73960;
object e_73990 [2];
c_73960.hdr.mark = gc_color_red;
 c_73960.hdr.grayed = 0;
c_73960.tag = closureN_tag;
 c_73960.fn = (function_type)__lambda_46;
c_73960.num_args = 1;
c_73960.num_elements = 2;
c_73960.elements = (object *)e_73990;
c_73960.elements[0] = k_73357;
c_73960.elements[1] = list_91queue_7333_73185;

return_direct_with_clo1(data,(closure)&c_73949,__lambda_44,  &c_73960);; 
}

static void __lambda_46(void *data, object self_73600, int argc, object *args) /* object self_73600, object r_73358 */
 {

  
closureN_type c_73962;
object e_73988 [2];
c_73962.hdr.mark = gc_color_red;
 c_73962.hdr.grayed = 0;
c_73962.tag = closureN_tag;
 c_73962.fn = (function_type)__lambda_47;
c_73962.num_args = 1;
c_73962.num_elements = 2;
c_73962.elements = (object *)e_73988;
c_73962.elements[0] = ((closureN)self_73600)->elements[0];
c_73962.elements[1] = ((closureN)self_73600)->elements[1];

return_direct_with_clo2(data,  __glo_get_91first_srfi_117, (((closure)  __glo_get_91first_srfi_117)->fn),  &c_73962, ((closureN)self_73600)->elements[1]);; 
}

static void __lambda_47(void *data, object self_73601, int argc, object *args) /* object self_73601, object old_91first_7336_73186 */
 {
 object old_91first_7336_73186 = args[0];
  
closureN_type c_73964;
object e_73973 [2];
c_73964.hdr.mark = gc_color_red;
 c_73964.hdr.grayed = 0;
c_73964.tag = closureN_tag;
 c_73964.fn = (function_type)__lambda_48;
c_73964.num_args = 0;
c_73964.num_elements = 2;
c_73964.elements = (object *)e_73973;
c_73964.elements[0] = ((closureN)self_73601)->elements[1];
c_73964.elements[1] = old_91first_7336_73186;


closureN_type c_73974;
object e_73987 [3];
c_73974.hdr.mark = gc_color_red;
 c_73974.hdr.grayed = 0;
c_73974.tag = closureN_tag;
 c_73974.fn = (function_type)__lambda_49;
c_73974.num_args = 1;
c_73974.num_elements = 3;
c_73974.elements = (object *)e_73987;
c_73974.elements[0] = ((closureN)self_73601)->elements[0];
c_73974.elements[1] = ((closureN)self_73601)->elements[1];
c_73974.elements[2] = old_91first_7336_73186;

return_direct_with_clo1(data,(closure)&c_73964,__lambda_48,  &c_73974);; 
}

static void __lambda_49(void *data, object self_73602, int argc, object *args) /* object self_73602, object r_73362 */
 {

  
closureN_type c_73976;
object e_73982 [2];
c_73976.hdr.mark = gc_color_red;
 c_73976.hdr.grayed = 0;
c_73976.tag = closureN_tag;
 c_73976.fn = (function_type)__lambda_50;
c_73976.num_args = 1;
c_73976.num_elements = 2;
c_73976.elements = (object *)e_73982;
c_73976.elements[0] = ((closureN)self_73602)->elements[0];
c_73976.elements[1] = ((closureN)self_73602)->elements[2];



return_direct_with_clo3(data,  __glo_set_91first_67_srfi_117, (((closure)  __glo_set_91first_67_srfi_117)->fn),  &c_73976, ((closureN)self_73602)->elements[1], Cyc_cdr(data, ((closureN)self_73602)->elements[2]));; 
}

static void __lambda_50(void *data, object self_73603, int argc, object *args) /* object self_73603, object r_73363 */
 {

  

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

static void __lambda_48(void *data, object self_73604, int argc, object *args) /* object self_73604, object k_73364 */
 {
 object k_73364 = args[0];
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_73604)->elements[1]))) ){ 
  return_direct_with_clo3(data,  __glo_set_91last_67_srfi_117, (((closure)  __glo_set_91last_67_srfi_117)->fn),  k_73364, ((closureN)self_73604)->elements[0], NULL);
} else { 
  return_direct_with_clo1(data,  k_73364, (((closure)  k_73364)->fn),  Cyc_VOID);}
;; 
}

static void __lambda_44(void *data, object self_73605, int argc, object *args) /* object self_73605, object k_73367 */
 {
 object k_73367 = args[0];
  
closureN_type c_73951;
object e_73957 [1];
c_73951.hdr.mark = gc_color_red;
 c_73951.hdr.grayed = 0;
c_73951.tag = closureN_tag;
 c_73951.fn = (function_type)__lambda_45;
c_73951.num_args = 1;
c_73951.num_elements = 1;
c_73951.elements = (object *)e_73957;
c_73951.elements[0] = k_73367;

return_direct_with_clo2(data,  __glo_list_91queue_91empty_127_srfi_117, (((closure)  __glo_list_91queue_91empty_127_srfi_117)->fn),  &c_73951, ((closureN)self_73605)->elements[0]);; 
}

static void __lambda_45(void *data, object self_73606, int argc, object *args) /* object self_73606, object r_73368 */
 {
 object r_73368 = args[0];
  if( (boolean_f != r_73368) ){ 
  
make_utf8_string_with_len(c_73954, "Empty list-queue", 16, 16);
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_73606)->elements[0], &c_73954);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_73606)->elements[0], (((closure)  ((closureN)self_73606)->elements[0])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_37(void *data, object _, int argc, object *args) /* closure _,object k_73349, object list_91queue_7330_73182, object elem_7331_73183 */
 {
object k_73349 = args[0]; object list_91queue_7330_73182 = args[1]; object elem_7331_73183 = args[2];
  Cyc_st_add(data, "srfi/117.sld:list-queue-add-back!");

closureN_type c_73915;
object e_73943 [2];
c_73915.hdr.mark = gc_color_red;
 c_73915.hdr.grayed = 0;
c_73915.tag = closureN_tag;
 c_73915.fn = (function_type)__lambda_38;
c_73915.num_args = 1;
c_73915.num_elements = 2;
c_73915.elements = (object *)e_73943;
c_73915.elements[0] = k_73349;
c_73915.elements[1] = list_91queue_7330_73182;


pair_type local_73946; 
return_direct_with_clo1(data,(closure)&c_73915,__lambda_38,  set_cell_as_expr(&local_73946, elem_7331_73183));; 
}

static void __lambda_38(void *data, object self_73595, int argc, object *args) /* object self_73595, object new_91last_7332_73184 */
 {
 object new_91last_7332_73184 = args[0];
  
closureN_type c_73917;
object e_73936 [2];
c_73917.hdr.mark = gc_color_red;
 c_73917.hdr.grayed = 0;
c_73917.tag = closureN_tag;
 c_73917.fn = (function_type)__lambda_39;
c_73917.num_args = 0;
c_73917.num_elements = 2;
c_73917.elements = (object *)e_73936;
c_73917.elements[0] = ((closureN)self_73595)->elements[1];
c_73917.elements[1] = new_91last_7332_73184;


closureN_type c_73937;
object e_73942 [3];
c_73937.hdr.mark = gc_color_red;
 c_73937.hdr.grayed = 0;
c_73937.tag = closureN_tag;
 c_73937.fn = (function_type)__lambda_42;
c_73937.num_args = 1;
c_73937.num_elements = 3;
c_73937.elements = (object *)e_73942;
c_73937.elements[0] = ((closureN)self_73595)->elements[0];
c_73937.elements[1] = ((closureN)self_73595)->elements[1];
c_73937.elements[2] = new_91last_7332_73184;

return_direct_with_clo1(data,(closure)&c_73917,__lambda_39,  &c_73937);; 
}

static void __lambda_42(void *data, object self_73596, int argc, object *args) /* object self_73596, object r_73351 */
 {

  return_direct_with_clo3(data,  __glo_set_91last_67_srfi_117, (((closure)  __glo_set_91last_67_srfi_117)->fn),  ((closureN)self_73596)->elements[0], ((closureN)self_73596)->elements[1], ((closureN)self_73596)->elements[2]);; 
}

static void __lambda_39(void *data, object self_73597, int argc, object *args) /* object self_73597, object k_73352 */
 {
 object k_73352 = args[0];
  
closureN_type c_73919;
object e_73934 [3];
c_73919.hdr.mark = gc_color_red;
 c_73919.hdr.grayed = 0;
c_73919.tag = closureN_tag;
 c_73919.fn = (function_type)__lambda_40;
c_73919.num_args = 1;
c_73919.num_elements = 3;
c_73919.elements = (object *)e_73934;
c_73919.elements[0] = k_73352;
c_73919.elements[1] = ((closureN)self_73597)->elements[0];
c_73919.elements[2] = ((closureN)self_73597)->elements[1];

return_direct_with_clo2(data,  __glo_list_91queue_91empty_127_srfi_117, (((closure)  __glo_list_91queue_91empty_127_srfi_117)->fn),  &c_73919, ((closureN)self_73597)->elements[0]);; 
}

static void __lambda_40(void *data, object self_73598, int argc, object *args) /* object self_73598, object r_73353 */
 {
 object r_73353 = args[0];
  if( (boolean_f != r_73353) ){ 
  return_direct_with_clo3(data,  __glo_set_91first_67_srfi_117, (((closure)  __glo_set_91first_67_srfi_117)->fn),  ((closureN)self_73598)->elements[0], ((closureN)self_73598)->elements[1], ((closureN)self_73598)->elements[2]);
} else { 
  
closureN_type c_73925;
object e_73932 [2];
c_73925.hdr.mark = gc_color_red;
 c_73925.hdr.grayed = 0;
c_73925.tag = closureN_tag;
 c_73925.fn = (function_type)__lambda_41;
c_73925.num_args = 1;
c_73925.num_elements = 2;
c_73925.elements = (object *)e_73932;
c_73925.elements[0] = ((closureN)self_73598)->elements[0];
c_73925.elements[1] = ((closureN)self_73598)->elements[2];

return_direct_with_clo2(data,  __glo_get_91last_srfi_117, (((closure)  __glo_get_91last_srfi_117)->fn),  &c_73925, ((closureN)self_73598)->elements[1]);}
;; 
}

static void __lambda_41(void *data, object self_73599, int argc, object *args) /* object self_73599, object r_73354 */
 {
 object r_73354 = args[0];
  
object c_73930 = Cyc_set_cdr_cps(data,  ((closureN)self_73599)->elements[0],r_73354, ((closureN)self_73599)->elements[1]);
return_direct_with_clo1(data,  ((closureN)self_73599)->elements[0], (((closure)  ((closureN)self_73599)->elements[0])->fn),  c_73930);; 
}

static void __lambda_31(void *data, object _, int argc, object *args) /* closure _,object k_73341, object list_91queue_7327_73179, object elem_7328_73180 */
 {
object k_73341 = args[0]; object list_91queue_7327_73179 = args[1]; object elem_7328_73180 = args[2];
  Cyc_st_add(data, "srfi/117.sld:list-queue-add-front!");

closureN_type c_73885;
object e_73912 [3];
c_73885.hdr.mark = gc_color_red;
 c_73885.hdr.grayed = 0;
c_73885.tag = closureN_tag;
 c_73885.fn = (function_type)__lambda_32;
c_73885.num_args = 1;
c_73885.num_elements = 3;
c_73885.elements = (object *)e_73912;
c_73885.elements[0] = elem_7328_73180;
c_73885.elements[1] = k_73341;
c_73885.elements[2] = list_91queue_7327_73179;

return_direct_with_clo2(data,  __glo_get_91first_srfi_117, (((closure)  __glo_get_91first_srfi_117)->fn),  &c_73885, list_91queue_7327_73179);; 
}

static void __lambda_32(void *data, object self_73590, int argc, object *args) /* object self_73590, object r_73346 */
 {
 object r_73346 = args[0];
  
closureN_type c_73887;
object e_73907 [2];
c_73887.hdr.mark = gc_color_red;
 c_73887.hdr.grayed = 0;
c_73887.tag = closureN_tag;
 c_73887.fn = (function_type)__lambda_33;
c_73887.num_args = 1;
c_73887.num_elements = 2;
c_73887.elements = (object *)e_73907;
c_73887.elements[0] = ((closureN)self_73590)->elements[1];
c_73887.elements[1] = ((closureN)self_73590)->elements[2];


pair_type local_73910; 
return_direct_with_clo1(data,(closure)&c_73887,__lambda_33,  set_pair_as_expr(&local_73910, ((closureN)self_73590)->elements[0], r_73346));; 
}

static void __lambda_33(void *data, object self_73591, int argc, object *args) /* object self_73591, object new_91first_7329_73181 */
 {
 object new_91first_7329_73181 = args[0];
  
closureN_type c_73889;
object e_73900 [2];
c_73889.hdr.mark = gc_color_red;
 c_73889.hdr.grayed = 0;
c_73889.tag = closureN_tag;
 c_73889.fn = (function_type)__lambda_34;
c_73889.num_args = 0;
c_73889.num_elements = 2;
c_73889.elements = (object *)e_73900;
c_73889.elements[0] = ((closureN)self_73591)->elements[1];
c_73889.elements[1] = new_91first_7329_73181;


closureN_type c_73901;
object e_73906 [3];
c_73901.hdr.mark = gc_color_red;
 c_73901.hdr.grayed = 0;
c_73901.tag = closureN_tag;
 c_73901.fn = (function_type)__lambda_36;
c_73901.num_args = 1;
c_73901.num_elements = 3;
c_73901.elements = (object *)e_73906;
c_73901.elements[0] = ((closureN)self_73591)->elements[0];
c_73901.elements[1] = ((closureN)self_73591)->elements[1];
c_73901.elements[2] = new_91first_7329_73181;

return_direct_with_clo1(data,(closure)&c_73889,__lambda_34,  &c_73901);; 
}

static void __lambda_36(void *data, object self_73592, int argc, object *args) /* object self_73592, object r_73343 */
 {

  return_direct_with_clo3(data,  __glo_set_91first_67_srfi_117, (((closure)  __glo_set_91first_67_srfi_117)->fn),  ((closureN)self_73592)->elements[0], ((closureN)self_73592)->elements[1], ((closureN)self_73592)->elements[2]);; 
}

static void __lambda_34(void *data, object self_73593, int argc, object *args) /* object self_73593, object k_73344 */
 {
 object k_73344 = args[0];
  
closureN_type c_73891;
object e_73898 [3];
c_73891.hdr.mark = gc_color_red;
 c_73891.hdr.grayed = 0;
c_73891.tag = closureN_tag;
 c_73891.fn = (function_type)__lambda_35;
c_73891.num_args = 1;
c_73891.num_elements = 3;
c_73891.elements = (object *)e_73898;
c_73891.elements[0] = k_73344;
c_73891.elements[1] = ((closureN)self_73593)->elements[0];
c_73891.elements[2] = ((closureN)self_73593)->elements[1];

return_direct_with_clo2(data,  __glo_list_91queue_91empty_127_srfi_117, (((closure)  __glo_list_91queue_91empty_127_srfi_117)->fn),  &c_73891, ((closureN)self_73593)->elements[0]);; 
}

static void __lambda_35(void *data, object self_73594, int argc, object *args) /* object self_73594, object r_73345 */
 {
 object r_73345 = args[0];
  if( (boolean_f != r_73345) ){ 
  return_direct_with_clo3(data,  __glo_set_91last_67_srfi_117, (((closure)  __glo_set_91last_67_srfi_117)->fn),  ((closureN)self_73594)->elements[0], ((closureN)self_73594)->elements[1], ((closureN)self_73594)->elements[2]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_73594)->elements[0], (((closure)  ((closureN)self_73594)->elements[0])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_28(void *data, object _, int argc, object *args) /* closure _,object k_73336, object list_91queue_7326_73178 */
 {
object k_73336 = args[0]; object list_91queue_7326_73178 = args[1];
  Cyc_st_add(data, "srfi/117.sld:list-queue-back");

closureN_type c_73870;
object e_73882 [2];
c_73870.hdr.mark = gc_color_red;
 c_73870.hdr.grayed = 0;
c_73870.tag = closureN_tag;
 c_73870.fn = (function_type)__lambda_29;
c_73870.num_args = 1;
c_73870.num_elements = 2;
c_73870.elements = (object *)e_73882;
c_73870.elements[0] = k_73336;
c_73870.elements[1] = list_91queue_7326_73178;

return_direct_with_clo2(data,  __glo_list_91queue_91empty_127_srfi_117, (((closure)  __glo_list_91queue_91empty_127_srfi_117)->fn),  &c_73870, list_91queue_7326_73178);; 
}

static void __lambda_29(void *data, object self_73588, int argc, object *args) /* object self_73588, object r_73337 */
 {
 object r_73337 = args[0];
  if( (boolean_f != r_73337) ){ 
  
make_utf8_string_with_len(c_73873, "Empty list-queue", 16, 16);
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_73588)->elements[0], &c_73873);
} else { 
  
closureN_type c_73875;
object e_73880 [1];
c_73875.hdr.mark = gc_color_red;
 c_73875.hdr.grayed = 0;
c_73875.tag = closureN_tag;
 c_73875.fn = (function_type)__lambda_30;
c_73875.num_args = 1;
c_73875.num_elements = 1;
c_73875.elements = (object *)e_73880;
c_73875.elements[0] = ((closureN)self_73588)->elements[0];

return_direct_with_clo2(data,  __glo_get_91last_srfi_117, (((closure)  __glo_get_91last_srfi_117)->fn),  &c_73875, ((closureN)self_73588)->elements[1]);}
;; 
}

static void __lambda_30(void *data, object self_73589, int argc, object *args) /* object self_73589, object r_73338 */
 {
 object r_73338 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_73589)->elements[0], (((closure)  ((closureN)self_73589)->elements[0])->fn),  Cyc_car(data, r_73338));; 
}

static void __lambda_25(void *data, object _, int argc, object *args) /* closure _,object k_73331, object list_91queue_7325_73177 */
 {
object k_73331 = args[0]; object list_91queue_7325_73177 = args[1];
  Cyc_st_add(data, "srfi/117.sld:list-queue-front");

closureN_type c_73855;
object e_73867 [2];
c_73855.hdr.mark = gc_color_red;
 c_73855.hdr.grayed = 0;
c_73855.tag = closureN_tag;
 c_73855.fn = (function_type)__lambda_26;
c_73855.num_args = 1;
c_73855.num_elements = 2;
c_73855.elements = (object *)e_73867;
c_73855.elements[0] = k_73331;
c_73855.elements[1] = list_91queue_7325_73177;

return_direct_with_clo2(data,  __glo_list_91queue_91empty_127_srfi_117, (((closure)  __glo_list_91queue_91empty_127_srfi_117)->fn),  &c_73855, list_91queue_7325_73177);; 
}

static void __lambda_26(void *data, object self_73586, int argc, object *args) /* object self_73586, object r_73332 */
 {
 object r_73332 = args[0];
  if( (boolean_f != r_73332) ){ 
  
make_utf8_string_with_len(c_73858, "Empty list-queue", 16, 16);
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_73586)->elements[0], &c_73858);
} else { 
  
closureN_type c_73860;
object e_73865 [1];
c_73860.hdr.mark = gc_color_red;
 c_73860.hdr.grayed = 0;
c_73860.tag = closureN_tag;
 c_73860.fn = (function_type)__lambda_27;
c_73860.num_args = 1;
c_73860.num_elements = 1;
c_73860.elements = (object *)e_73865;
c_73860.elements[0] = ((closureN)self_73586)->elements[0];

return_direct_with_clo2(data,  __glo_get_91first_srfi_117, (((closure)  __glo_get_91first_srfi_117)->fn),  &c_73860, ((closureN)self_73586)->elements[1]);}
;; 
}

static void __lambda_27(void *data, object self_73587, int argc, object *args) /* object self_73587, object r_73333 */
 {
 object r_73333 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_73587)->elements[0], (((closure)  ((closureN)self_73587)->elements[0])->fn),  Cyc_car(data, r_73333));; 
}

static void __lambda_23(void *data, object _, int argc, object *args) /* closure _,object k_73327, object list_91queue_7324_73176 */
 {
object k_73327 = args[0]; object list_91queue_7324_73176 = args[1];
  Cyc_st_add(data, "srfi/117.sld:list-queue-empty?");

closureN_type c_73847;
object e_73852 [1];
c_73847.hdr.mark = gc_color_red;
 c_73847.hdr.grayed = 0;
c_73847.tag = closureN_tag;
 c_73847.fn = (function_type)__lambda_24;
c_73847.num_args = 1;
c_73847.num_elements = 1;
c_73847.elements = (object *)e_73852;
c_73847.elements[0] = k_73327;

return_direct_with_clo2(data,  __glo_get_91first_srfi_117, (((closure)  __glo_get_91first_srfi_117)->fn),  &c_73847, list_91queue_7324_73176);; 
}

static void __lambda_24(void *data, object self_73585, int argc, object *args) /* object self_73585, object r_73328 */
 {
 object r_73328 = args[0];
  

return_direct_with_clo1(data,  ((closureN)self_73585)->elements[0], (((closure)  ((closureN)self_73585)->elements[0])->fn),  Cyc_is_null(r_73328));; 
}

static void __lambda_20(void *data, object _, int argc, object *args) /* closure _,object k_73322, object list_91queue_7323_73175 */
 {
object k_73322 = args[0]; object list_91queue_7323_73175 = args[1];
  Cyc_st_add(data, "srfi/117.sld:list-queue-copy");

closureN_type c_73838;
object e_73844 [1];
c_73838.hdr.mark = gc_color_red;
 c_73838.hdr.grayed = 0;
c_73838.tag = closureN_tag;
 c_73838.fn = (function_type)__lambda_21;
c_73838.num_args = 1;
c_73838.num_elements = 1;
c_73838.elements = (object *)e_73844;
c_73838.elements[0] = k_73322;

return_direct_with_clo2(data,  __glo_get_91first_srfi_117, (((closure)  __glo_get_91first_srfi_117)->fn),  &c_73838, list_91queue_7323_73175);; 
}

static void __lambda_21(void *data, object self_73583, int argc, object *args) /* object self_73583, object r_73324 */
 {
 object r_73324 = args[0];
  
closureN_type c_73840;
object e_73843 [1];
c_73840.hdr.mark = gc_color_red;
 c_73840.hdr.grayed = 0;
c_73840.tag = closureN_tag;
 c_73840.fn = (function_type)__lambda_22;
c_73840.num_args = 1;
c_73840.num_elements = 1;
c_73840.elements = (object *)e_73843;
c_73840.elements[0] = ((closureN)self_73583)->elements[0];

return_direct_with_clo2(data,  __glo_list_91copy_scheme_base, (((closure)  __glo_list_91copy_scheme_base)->fn),  &c_73840, r_73324);; 
}

static void __lambda_22(void *data, object self_73584, int argc, object *args) /* object self_73584, object r_73323 */
 {
 object r_73323 = args[0];
  return_direct_with_clo2(data,  __glo_make_91list_91queue_srfi_117, (((closure)  __glo_make_91list_91queue_srfi_117)->fn),  ((closureN)self_73584)->elements[0], r_73323);; 
}

static void __lambda_19(void *data, object _, int argc, object *args) /* closure _,object k_73319, object objs_7322_73174_raw, ... */
 {
object k_73319 = args[0];
load_varargs(objs_7322_73174, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/117.sld:list-queue");
return_direct_with_clo2(data,  __glo_make_91list_91queue_srfi_117, (((closure)  __glo_make_91list_91queue_srfi_117)->fn),  k_73319, objs_7322_73174);; 
}

static void __lambda_13(void *data, object _, int argc, object *args) /* closure _,object k_73301, object args_7311_7315_73169_raw, ... */
 {
object k_73301 = args[0];
load_varargs(args_7311_7315_73169, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/117.sld:make-list-queue");
  
  
  
  make_pair(c_73793,quote__list,NULL);c_73793.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_7311_7315_73169), Cyc_length(data, &c_73793))) ){ 
  
closureN_type c_73795;
object e_73802 [2];
c_73795.hdr.mark = gc_color_red;
 c_73795.hdr.grayed = 0;
c_73795.tag = closureN_tag;
 c_73795.fn = (function_type)__lambda_14;
c_73795.num_args = 1;
c_73795.num_elements = 2;
c_73795.elements = (object *)e_73802;
c_73795.elements[0] = args_7311_7315_73169;
c_73795.elements[1] = k_73301;


mclosure0(c_73803, (function_type)__lambda_15);c_73803.num_args = 1;
return_direct_with_clo1(data,(closure)&c_73795,__lambda_14,  &c_73803);
} else { 
    
  
  
  make_pair(c_73820,quote_last,NULL);c_73820.hdr.immutable = 1;
  make_pair(c_73819,quote__list,&c_73820);c_73819.hdr.immutable = 1;
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_length(data, args_7311_7315_73169), Cyc_length(data, &c_73819))) ){ 
  
closureN_type c_73822;
object e_73829 [2];
c_73822.hdr.mark = gc_color_red;
 c_73822.hdr.grayed = 0;
c_73822.tag = closureN_tag;
 c_73822.fn = (function_type)__lambda_17;
c_73822.num_args = 1;
c_73822.num_elements = 2;
c_73822.elements = (object *)e_73829;
c_73822.elements[0] = args_7311_7315_73169;
c_73822.elements[1] = k_73301;


mclosure0(c_73830, (function_type)__lambda_18);c_73830.num_args = 2;
return_direct_with_clo1(data,(closure)&c_73822,__lambda_17,  &c_73830);
} else { 
  
make_utf8_string_with_len(c_73833, "case-lambda: no cases matched", 29, 29);
return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_73301, &c_73833);}
;}
;; 
}

static void __lambda_18(void *data, object self_73581, int argc, object *args) /* object self_73581, object k_73312, object list_7320_73172, object last_7321_73173 */
 {
 object k_73312 = args[0]; object list_7320_73172 = args[1]; object last_7321_73173 = args[2];
  return_direct_with_clo3(data,  __glo_raw_91make_91list_91queue_srfi_117, (((closure)  __glo_raw_91make_91list_91queue_srfi_117)->fn),  k_73312, list_7320_73172, last_7321_73173);; 
}

static void __lambda_17(void *data, object self_73582, int argc, object *args) /* object self_73582, object r_73311 */
 {
 object r_73311 = args[0];
  
object c_73827 = apply(data,  ((closureN)self_73582)->elements[1],r_73311, ((closureN)self_73582)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_73582)->elements[1], (((closure)  ((closureN)self_73582)->elements[1])->fn),  c_73827);; 
}

static void __lambda_15(void *data, object self_73578, int argc, object *args) /* object self_73578, object k_73305, object list_7318_73171 */
 {
 object k_73305 = args[0]; object list_7318_73171 = args[1];
    
if( (boolean_f != Cyc_is_null(list_7318_73171)) ){ 
  return_direct_with_clo3(data,  __glo_raw_91make_91list_91queue_srfi_117, (((closure)  __glo_raw_91make_91list_91queue_srfi_117)->fn),  k_73305, NULL, NULL);
} else { 
  
closureN_type c_73808;
object e_73812 [2];
c_73808.hdr.mark = gc_color_red;
 c_73808.hdr.grayed = 0;
c_73808.tag = closureN_tag;
 c_73808.fn = (function_type)__lambda_16;
c_73808.num_args = 1;
c_73808.num_elements = 2;
c_73808.elements = (object *)e_73812;
c_73808.elements[0] = k_73305;
c_73808.elements[1] = list_7318_73171;

return_direct_with_clo2(data,  __glo_last_91pair_srfi_117, (((closure)  __glo_last_91pair_srfi_117)->fn),  &c_73808, list_7318_73171);}
;; 
}

static void __lambda_16(void *data, object self_73579, int argc, object *args) /* object self_73579, object r_73309 */
 {
 object r_73309 = args[0];
  return_direct_with_clo3(data,  __glo_raw_91make_91list_91queue_srfi_117, (((closure)  __glo_raw_91make_91list_91queue_srfi_117)->fn),  ((closureN)self_73579)->elements[0], ((closureN)self_73579)->elements[1], r_73309);; 
}

static void __lambda_14(void *data, object self_73580, int argc, object *args) /* object self_73580, object r_73304 */
 {
 object r_73304 = args[0];
  
object c_73800 = apply(data,  ((closureN)self_73580)->elements[1],r_73304, ((closureN)self_73580)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_73580)->elements[1], (((closure)  ((closureN)self_73580)->elements[1])->fn),  c_73800);; 
}

static void __lambda_12(void *data, object _, int argc, object *args) /* closure _,object k_73295, object first_739_73167, object last_7310_73168 */
 {
object k_73295 = args[0]; object first_739_73167 = args[1]; object last_7310_73168 = args[2];
  Cyc_st_add(data, "srfi/117.sld:raw-make-list-queue");

vector_3_type local_73779; 

complex_num_type local_73782; 

vector_2_type local_73785; 
return_direct_with_clo1(data,  k_73295, (((closure)  k_73295)->fn),  Cyc_fast_vector_3(&local_73779, ((inline_function_type)
                   ((closure)__glo_make_91record_91marker_191_191inline_191_191_scheme_base)->fn)(data,&local_73782), quote__121list_91queue_125, Cyc_fast_vector_2(&local_73785, first_739_73167, last_7310_73168)));; 
}

static void __lambda_2(void *data, object _, int argc, object *args) /* closure _,object k_73272, object f_732_73162, object lis_733_73163 */
 {
object k_73272 = args[0]; object f_732_73162 = args[1]; object lis_733_73163 = args[2];
  Cyc_st_add(data, "srfi/117.sld:map!");

closureN_type c_73717;
object e_73774 [2];
c_73717.hdr.mark = gc_color_red;
 c_73717.hdr.grayed = 0;
c_73717.tag = closureN_tag;
 c_73717.fn = (function_type)__lambda_3;
c_73717.num_args = 1;
c_73717.num_elements = 2;
c_73717.elements = (object *)e_73774;
c_73717.elements[0] = f_732_73162;
c_73717.elements[1] = k_73272;

return_direct_with_clo1(data,(closure)&c_73717,__lambda_3,  lis_733_73163);; 
}

static void __lambda_3(void *data, object self_73568, int argc, object *args) /* object self_73568, object lis_735_73164 */
 {
 object lis_735_73164 = args[0];
  
closureN_type c_73719;
object e_73773 [3];
c_73719.hdr.mark = gc_color_red;
 c_73719.hdr.grayed = 0;
c_73719.tag = closureN_tag;
 c_73719.fn = (function_type)__lambda_4;
c_73719.num_args = 1;
c_73719.num_elements = 3;
c_73719.elements = (object *)e_73773;
c_73719.elements[0] = ((closureN)self_73568)->elements[0];
c_73719.elements[1] = ((closureN)self_73568)->elements[1];
c_73719.elements[2] = lis_735_73164;

return_direct_with_clo1(data,(closure)&c_73719,__lambda_4,  boolean_f);; 
}

static void __lambda_4(void *data, object self_73569, int argc, object *args) /* object self_73569, object lp_736_73165 */
 {
 object lp_736_73165 = args[0];
  
closureN_type c_73721;
object e_73769 [3];
c_73721.hdr.mark = gc_color_red;
 c_73721.hdr.grayed = 0;
c_73721.tag = closureN_tag;
 c_73721.fn = (function_type)__lambda_165;
c_73721.num_args = 1;
c_73721.num_elements = 3;
c_73721.elements = (object *)e_73769;
c_73721.elements[0] = ((closureN)self_73569)->elements[0];
c_73721.elements[1] = ((closureN)self_73569)->elements[1];
c_73721.elements[2] = ((closureN)self_73569)->elements[2];


pair_type local_73772; 
return_direct_with_clo1(data,(closure)&c_73721,__lambda_165,  set_cell_as_expr(&local_73772, lp_736_73165));; 
}

static void __lambda_165(void *data, object self_73570, int argc, object *args) /* object self_73570, object lp_736_73165 */
 {
 object lp_736_73165 = args[0];
  
closureN_type c_73723;
object e_73736 [3];
c_73723.hdr.mark = gc_color_red;
 c_73723.hdr.grayed = 0;
c_73723.tag = closureN_tag;
 c_73723.fn = (function_type)__lambda_5;
c_73723.num_args = 1;
c_73723.num_elements = 3;
c_73723.elements = (object *)e_73736;
c_73723.elements[0] = ((closureN)self_73570)->elements[1];
c_73723.elements[1] = ((closureN)self_73570)->elements[2];
c_73723.elements[2] = lp_736_73165;


closureN_type c_73737;
object e_73768 [2];
c_73737.hdr.mark = gc_color_red;
 c_73737.hdr.grayed = 0;
c_73737.tag = closureN_tag;
 c_73737.fn = (function_type)__lambda_7;
c_73737.num_args = 1;
c_73737.num_elements = 2;
c_73737.elements = (object *)e_73768;
c_73737.elements[0] = ((closureN)self_73570)->elements[0];
c_73737.elements[1] = lp_736_73165;

return_direct_with_clo1(data,(closure)&c_73723,__lambda_5,  &c_73737);; 
}

static void __lambda_7(void *data, object self_73571, int argc, object *args) /* object self_73571, object k_73275, object lis_737_73166 */
 {
 object k_73275 = args[0]; object lis_737_73166 = args[1];
    
if( (boolean_f != Cyc_is_pair(lis_737_73166)) ){ 
  
closureN_type c_73741;
object e_73764 [4];
c_73741.hdr.mark = gc_color_red;
 c_73741.hdr.grayed = 0;
c_73741.tag = closureN_tag;
 c_73741.fn = (function_type)__lambda_8;
c_73741.num_args = 1;
c_73741.num_elements = 4;
c_73741.elements = (object *)e_73764;
c_73741.elements[0] = ((closureN)self_73571)->elements[0];
c_73741.elements[1] = k_73275;
c_73741.elements[2] = lis_737_73166;
c_73741.elements[3] = ((closureN)self_73571)->elements[1];



return_direct_with_clo1(data,(closure)&c_73741,__lambda_8,  Cyc_car(data, lis_737_73166));
} else { 
  return_direct_with_clo1(data,  k_73275, (((closure)  k_73275)->fn),  Cyc_VOID);}
;; 
}

static void __lambda_8(void *data, object self_73572, int argc, object *args) /* object self_73572, object r_73280 */
 {
 object r_73280 = args[0];
  
closureN_type c_73744;
object e_73763 [3];
c_73744.hdr.mark = gc_color_red;
 c_73744.hdr.grayed = 0;
c_73744.tag = closureN_tag;
 c_73744.fn = (function_type)__lambda_9;
c_73744.num_args = 1;
c_73744.num_elements = 3;
c_73744.elements = (object *)e_73763;
c_73744.elements[0] = ((closureN)self_73572)->elements[1];
c_73744.elements[1] = ((closureN)self_73572)->elements[2];
c_73744.elements[2] = ((closureN)self_73572)->elements[3];

return_closcall2(data,  ((closureN)self_73572)->elements[0],  &c_73744, r_73280);; 
}

static void __lambda_9(void *data, object self_73573, int argc, object *args) /* object self_73573, object r_73279 */
 {
 object r_73279 = args[0];
  
closureN_type c_73746;
object e_73758 [3];
c_73746.hdr.mark = gc_color_red;
 c_73746.hdr.grayed = 0;
c_73746.tag = closureN_tag;
 c_73746.fn = (function_type)__lambda_10;
c_73746.num_args = 1;
c_73746.num_elements = 3;
c_73746.elements = (object *)e_73758;
c_73746.elements[0] = ((closureN)self_73573)->elements[0];
c_73746.elements[1] = ((closureN)self_73573)->elements[1];
c_73746.elements[2] = ((closureN)self_73573)->elements[2];


object c_73761 = Cyc_set_car_cps(data,(closure)&c_73746,((closureN)self_73573)->elements[1], r_73279);
return_closcall1(data,(closure)&c_73746,  c_73761);; 
}

static void __lambda_10(void *data, object self_73574, int argc, object *args) /* object self_73574, object r_73277 */
 {

  
closureN_type c_73748;
object e_73754 [2];
c_73748.hdr.mark = gc_color_red;
 c_73748.hdr.grayed = 0;
c_73748.tag = closureN_tag;
 c_73748.fn = (function_type)__lambda_11;
c_73748.num_args = 1;
c_73748.num_elements = 2;
c_73748.elements = (object *)e_73754;
c_73748.elements[0] = ((closureN)self_73574)->elements[0];
c_73748.elements[1] = ((closureN)self_73574)->elements[2];



return_direct_with_clo1(data,(closure)&c_73748,__lambda_11,  Cyc_cdr(data, ((closureN)self_73574)->elements[1]));; 
}

static void __lambda_11(void *data, object self_73575, int argc, object *args) /* object self_73575, object r_73278 */
 {
 object r_73278 = args[0];
  

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

static void __lambda_5(void *data, object self_73576, int argc, object *args) /* object self_73576, object r_73274 */
 {
 object r_73274 = args[0];
  
closureN_type c_73725;
object e_73732 [3];
c_73725.hdr.mark = gc_color_red;
 c_73725.hdr.grayed = 0;
c_73725.tag = closureN_tag;
 c_73725.fn = (function_type)__lambda_6;
c_73725.num_args = 1;
c_73725.num_elements = 3;
c_73725.elements = (object *)e_73732;
c_73725.elements[0] = ((closureN)self_73576)->elements[0];
c_73725.elements[1] = ((closureN)self_73576)->elements[1];
c_73725.elements[2] = ((closureN)self_73576)->elements[2];



return_direct_with_clo1(data,(closure)&c_73725,__lambda_6,  Cyc_set_cell(data, ((closureN)self_73576)->elements[2], r_73274));; 
}

static void __lambda_6(void *data, object self_73577, int argc, object *args) /* object self_73577, object r_73273 */
 {

  

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

static void __lambda_1(void *data, object _, int argc, object *args) /* closure _,object k_73266, object ls_731_73161 */
 {
object k_73266 = args[0]; object ls_731_73161 = args[1];
  Cyc_st_add(data, "srfi/117.sld:last-pair");

 while(1) {
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ls_731_73161))) ){ 
  return_direct_with_clo1(data,  k_73266, (((closure)  k_73266)->fn),  ls_731_73161);
} else { 
  

ls_731_73161 = Cyc_cdr(data, ls_731_73161);
k_73266 = k_73266;continue;}
;; 
}
}

void c_srfi117_inlinable_lambdas(void *data, object clo, int argc, object *args){ 
object buf[1]; object cont = args[0];
buf[0] = NULL; (((closure)cont)->fn)(data, cont, 1, buf);
 } 
void c_srfi117_entry_pt_first_lambda(void *data, object clo, int argc, object *args){ 
Cyc_set_globals_changed((gc_thread_data *)data);
  quote_list_91queue_127 = find_or_add_symbol("list-queue?");
  quote_get_91first = find_or_add_symbol("get-first");
  quote_get_91last = find_or_add_symbol("get-last");
  quote_set_91first_67 = find_or_add_symbol("set-first!");
  quote_set_91last_67 = find_or_add_symbol("set-last!");
  quote_first = find_or_add_symbol("first");
  quote_list_91queue = find_or_add_symbol("list-queue");
  quote_seed = find_or_add_symbol("seed");
  quote_successor = find_or_add_symbol("successor");
  quote_mapper = find_or_add_symbol("mapper");
  quote_stop_127 = find_or_add_symbol("stop?");
  quote_queue = find_or_add_symbol("queue");
  quote_last = find_or_add_symbol("last");
  quote__list = find_or_add_symbol("list");
  quote__121list_91queue_125 = find_or_add_symbol("<list-queue>");

  add_global("__glo_lib_91init_117srfi117_srfi_117", (object *) &__glo_lib_91init_117srfi117_srfi_117);
  add_global("__glo_list_91queue_91set_91list_67_srfi_117", (object *) &__glo_list_91queue_91set_91list_67_srfi_117);
  add_global("__glo_list_91queue_91first_91last_srfi_117", (object *) &__glo_list_91queue_91first_91last_srfi_117);
  add_global("__glo_list_91queue_91list_srfi_117", (object *) &__glo_list_91queue_91list_srfi_117);
  add_global("__glo_list_91queue_91for_91each_srfi_117", (object *) &__glo_list_91queue_91for_91each_srfi_117);
  add_global("__glo_list_91queue_91map_67_srfi_117", (object *) &__glo_list_91queue_91map_67_srfi_117);
  add_global("__glo_list_91queue_91unfold_91right_85_srfi_117", (object *) &__glo_list_91queue_91unfold_91right_85_srfi_117);
  add_global("__glo_list_91queue_91unfold_91right_srfi_117", (object *) &__glo_list_91queue_91unfold_91right_srfi_117);
  add_global("__glo_list_91queue_91unfold_85_srfi_117", (object *) &__glo_list_91queue_91unfold_85_srfi_117);
  add_global("__glo_list_91queue_91unfold_srfi_117", (object *) &__glo_list_91queue_91unfold_srfi_117);
  add_global("__glo_list_91queue_91map_srfi_117", (object *) &__glo_list_91queue_91map_srfi_117);
  add_global("__glo_list_91queue_91join_67_srfi_117", (object *) &__glo_list_91queue_91join_67_srfi_117);
  add_global("__glo_list_91queue_91append_67_srfi_117", (object *) &__glo_list_91queue_91append_67_srfi_117);
  add_global("__glo_list_91queue_91concatenate_srfi_117", (object *) &__glo_list_91queue_91concatenate_srfi_117);
  add_global("__glo_list_91queue_91append_srfi_117", (object *) &__glo_list_91queue_91append_srfi_117);
  add_global("__glo_penult_91pair_srfi_117", (object *) &__glo_penult_91pair_srfi_117);
  add_global("__glo_list_91queue_91remove_91all_67_srfi_117", (object *) &__glo_list_91queue_91remove_91all_67_srfi_117);
  add_global("__glo_list_91queue_91remove_91back_67_srfi_117", (object *) &__glo_list_91queue_91remove_91back_67_srfi_117);
  add_global("__glo_list_91queue_91remove_91front_67_srfi_117", (object *) &__glo_list_91queue_91remove_91front_67_srfi_117);
  add_global("__glo_list_91queue_91add_91back_67_srfi_117", (object *) &__glo_list_91queue_91add_91back_67_srfi_117);
  add_global("__glo_list_91queue_91add_91front_67_srfi_117", (object *) &__glo_list_91queue_91add_91front_67_srfi_117);
  add_global("__glo_list_91queue_91back_srfi_117", (object *) &__glo_list_91queue_91back_srfi_117);
  add_global("__glo_list_91queue_91front_srfi_117", (object *) &__glo_list_91queue_91front_srfi_117);
  add_global("__glo_list_91queue_91empty_127_srfi_117", (object *) &__glo_list_91queue_91empty_127_srfi_117);
  add_global("__glo_list_91queue_91copy_srfi_117", (object *) &__glo_list_91queue_91copy_srfi_117);
  add_global("__glo_list_91queue_srfi_117", (object *) &__glo_list_91queue_srfi_117);
  add_global("__glo_make_91list_91queue_srfi_117", (object *) &__glo_make_91list_91queue_srfi_117);
  add_global("__glo_raw_91make_91list_91queue_srfi_117", (object *) &__glo_raw_91make_91list_91queue_srfi_117);
  add_global("__glo_set_91last_67_srfi_117", (object *) &__glo_set_91last_67_srfi_117);
  add_global("__glo_set_91first_67_srfi_117", (object *) &__glo_set_91first_67_srfi_117);
  add_global("__glo_get_91last_srfi_117", (object *) &__glo_get_91last_srfi_117);
  add_global("__glo_get_91first_srfi_117", (object *) &__glo_get_91first_srfi_117);
  add_global("__glo_list_91queue_127_srfi_117", (object *) &__glo_list_91queue_127_srfi_117);
  add_global("__glo__121list_91queue_125_srfi_117", (object *) &__glo__121list_91queue_125_srfi_117);
  add_global("__glo_map_67_srfi_117", (object *) &__glo_map_67_srfi_117);
  add_global("__glo_last_91pair_srfi_117", (object *) &__glo_last_91pair_srfi_117);
  mclosure0(c_731560, (function_type)__lambda_149);c_731560.num_args = 0; 
  __glo_lib_91init_117srfi117_srfi_117 = &c_731560; 
  mclosure0(c_731497, (function_type)__lambda_141);c_731497.num_args = 0; 
  __glo_list_91queue_91set_91list_67_srfi_117 = &c_731497; 
  mclosure0(c_731486, (function_type)__lambda_138);c_731486.num_args = 1; 
  __glo_list_91queue_91first_91last_srfi_117 = &c_731486; 
  mclosure0(c_731484, (function_type)__lambda_137);c_731484.num_args = 1; 
  __glo_list_91queue_91list_srfi_117 = &c_731484; 
  mclosure0(c_731477, (function_type)__lambda_135);c_731477.num_args = 2; 
  __glo_list_91queue_91for_91each_srfi_117 = &c_731477; 
  mclosure0(c_731470, (function_type)__lambda_133);c_731470.num_args = 2; 
  __glo_list_91queue_91map_67_srfi_117 = &c_731470; 
  mclosure0(c_731406, (function_type)__lambda_121);c_731406.num_args = 5; 
  __glo_list_91queue_91unfold_91right_85_srfi_117 = &c_731406; 
  mclosure0(c_731352, (function_type)__lambda_115);c_731352.num_args = 0; 
  __glo_list_91queue_91unfold_91right_srfi_117 = &c_731352; 
  mclosure0(c_731288, (function_type)__lambda_103);c_731288.num_args = 5; 
  __glo_list_91queue_91unfold_85_srfi_117 = &c_731288; 
  mclosure0(c_731234, (function_type)__lambda_97);c_731234.num_args = 0; 
  __glo_list_91queue_91unfold_srfi_117 = &c_731234; 
  mclosure0(c_731224, (function_type)__lambda_94);c_731224.num_args = 2; 
  __glo_list_91queue_91map_srfi_117 = &c_731224; 
  mclosure0(c_731210, (function_type)__lambda_91);c_731210.num_args = 2; 
  __glo_list_91queue_91join_67_srfi_117 = &c_731210; 
  mclosure0(c_731138, (function_type)__lambda_81);c_731138.num_args = 0; 
  __glo_list_91queue_91append_67_srfi_117 = &c_731138; 
  mclosure0(c_731108, (function_type)__lambda_73);c_731108.num_args = 1; 
  __glo_list_91queue_91concatenate_srfi_117 = &c_731108; 
  mclosure0(c_731106, (function_type)__lambda_72);c_731106.num_args = 0; 
  __glo_list_91queue_91append_srfi_117 = &c_731106; 
  mclosure0(c_731060, (function_type)__lambda_66);c_731060.num_args = 1; 
  __glo_penult_91pair_srfi_117 = &c_731060; 
  mclosure0(c_731045, (function_type)__lambda_62);c_731045.num_args = 1; 
  __glo_list_91queue_91remove_91all_67_srfi_117 = &c_731045; 
  mclosure0(c_73991, (function_type)__lambda_51);c_73991.num_args = 1; 
  __glo_list_91queue_91remove_91back_67_srfi_117 = &c_73991; 
  mclosure0(c_73947, (function_type)__lambda_43);c_73947.num_args = 1; 
  __glo_list_91queue_91remove_91front_67_srfi_117 = &c_73947; 
  mclosure0(c_73913, (function_type)__lambda_37);c_73913.num_args = 2; 
  __glo_list_91queue_91add_91back_67_srfi_117 = &c_73913; 
  mclosure0(c_73883, (function_type)__lambda_31);c_73883.num_args = 2; 
  __glo_list_91queue_91add_91front_67_srfi_117 = &c_73883; 
  mclosure0(c_73868, (function_type)__lambda_28);c_73868.num_args = 1; 
  __glo_list_91queue_91back_srfi_117 = &c_73868; 
  mclosure0(c_73853, (function_type)__lambda_25);c_73853.num_args = 1; 
  __glo_list_91queue_91front_srfi_117 = &c_73853; 
  mclosure0(c_73845, (function_type)__lambda_23);c_73845.num_args = 1; 
  __glo_list_91queue_91empty_127_srfi_117 = &c_73845; 
  mclosure0(c_73836, (function_type)__lambda_20);c_73836.num_args = 1; 
  __glo_list_91queue_91copy_srfi_117 = &c_73836; 
  mclosure0(c_73834, (function_type)__lambda_19);c_73834.num_args = 0; 
  __glo_list_91queue_srfi_117 = &c_73834; 
  mclosure0(c_73786, (function_type)__lambda_13);c_73786.num_args = 0; 
  __glo_make_91list_91queue_srfi_117 = &c_73786; 
  mclosure0(c_73775, (function_type)__lambda_12);c_73775.num_args = 2; 
  __glo_raw_91make_91list_91queue_srfi_117 = &c_73775; 
  mclosure0(c_73715, (function_type)__lambda_2);c_73715.num_args = 2; 
  __glo_map_67_srfi_117 = &c_73715; 
  mclosure0(c_73706, (function_type)__lambda_1);c_73706.num_args = 1; 
  __glo_last_91pair_srfi_117 = &c_73706; 
  __glo_set_91last_67_srfi_117 = boolean_f; 
  __glo_set_91first_67_srfi_117 = boolean_f; 
  __glo_get_91last_srfi_117 = boolean_f; 
  __glo_get_91first_srfi_117 = boolean_f; 
  __glo_list_91queue_127_srfi_117 = boolean_f; 
  __glo__121list_91queue_125_srfi_117 = boolean_f; 

  mclosure0(clo_731633, c_srfi117_inlinable_lambdas); make_pair(pair_731632, find_or_add_symbol("c_srfi117_inlinable_lambdas"), &clo_731633);
  make_cvar(cvar_731634, (object *)&__glo_lib_91init_117srfi117_srfi_117);make_pair(pair_731635, find_or_add_symbol("lib-init:srfi117"), &cvar_731634);
  make_cvar(cvar_731636, (object *)&__glo_list_91queue_91set_91list_67_srfi_117);make_pair(pair_731637, find_or_add_symbol("list-queue-set-list!"), &cvar_731636);
  make_cvar(cvar_731638, (object *)&__glo_list_91queue_91first_91last_srfi_117);make_pair(pair_731639, find_or_add_symbol("list-queue-first-last"), &cvar_731638);
  make_cvar(cvar_731640, (object *)&__glo_list_91queue_91list_srfi_117);make_pair(pair_731641, find_or_add_symbol("list-queue-list"), &cvar_731640);
  make_cvar(cvar_731642, (object *)&__glo_list_91queue_91for_91each_srfi_117);make_pair(pair_731643, find_or_add_symbol("list-queue-for-each"), &cvar_731642);
  make_cvar(cvar_731644, (object *)&__glo_list_91queue_91map_67_srfi_117);make_pair(pair_731645, find_or_add_symbol("list-queue-map!"), &cvar_731644);
  make_cvar(cvar_731646, (object *)&__glo_list_91queue_91unfold_91right_85_srfi_117);make_pair(pair_731647, find_or_add_symbol("list-queue-unfold-right*"), &cvar_731646);
  make_cvar(cvar_731648, (object *)&__glo_list_91queue_91unfold_91right_srfi_117);make_pair(pair_731649, find_or_add_symbol("list-queue-unfold-right"), &cvar_731648);
  make_cvar(cvar_731650, (object *)&__glo_list_91queue_91unfold_85_srfi_117);make_pair(pair_731651, find_or_add_symbol("list-queue-unfold*"), &cvar_731650);
  make_cvar(cvar_731652, (object *)&__glo_list_91queue_91unfold_srfi_117);make_pair(pair_731653, find_or_add_symbol("list-queue-unfold"), &cvar_731652);
  make_cvar(cvar_731654, (object *)&__glo_list_91queue_91map_srfi_117);make_pair(pair_731655, find_or_add_symbol("list-queue-map"), &cvar_731654);
  make_cvar(cvar_731656, (object *)&__glo_list_91queue_91join_67_srfi_117);make_pair(pair_731657, find_or_add_symbol("list-queue-join!"), &cvar_731656);
  make_cvar(cvar_731658, (object *)&__glo_list_91queue_91append_67_srfi_117);make_pair(pair_731659, find_or_add_symbol("list-queue-append!"), &cvar_731658);
  make_cvar(cvar_731660, (object *)&__glo_list_91queue_91concatenate_srfi_117);make_pair(pair_731661, find_or_add_symbol("list-queue-concatenate"), &cvar_731660);
  make_cvar(cvar_731662, (object *)&__glo_list_91queue_91append_srfi_117);make_pair(pair_731663, find_or_add_symbol("list-queue-append"), &cvar_731662);
  make_cvar(cvar_731664, (object *)&__glo_penult_91pair_srfi_117);make_pair(pair_731665, find_or_add_symbol("penult-pair"), &cvar_731664);
  make_cvar(cvar_731666, (object *)&__glo_list_91queue_91remove_91all_67_srfi_117);make_pair(pair_731667, find_or_add_symbol("list-queue-remove-all!"), &cvar_731666);
  make_cvar(cvar_731668, (object *)&__glo_list_91queue_91remove_91back_67_srfi_117);make_pair(pair_731669, find_or_add_symbol("list-queue-remove-back!"), &cvar_731668);
  make_cvar(cvar_731670, (object *)&__glo_list_91queue_91remove_91front_67_srfi_117);make_pair(pair_731671, find_or_add_symbol("list-queue-remove-front!"), &cvar_731670);
  make_cvar(cvar_731672, (object *)&__glo_list_91queue_91add_91back_67_srfi_117);make_pair(pair_731673, find_or_add_symbol("list-queue-add-back!"), &cvar_731672);
  make_cvar(cvar_731674, (object *)&__glo_list_91queue_91add_91front_67_srfi_117);make_pair(pair_731675, find_or_add_symbol("list-queue-add-front!"), &cvar_731674);
  make_cvar(cvar_731676, (object *)&__glo_list_91queue_91back_srfi_117);make_pair(pair_731677, find_or_add_symbol("list-queue-back"), &cvar_731676);
  make_cvar(cvar_731678, (object *)&__glo_list_91queue_91front_srfi_117);make_pair(pair_731679, find_or_add_symbol("list-queue-front"), &cvar_731678);
  make_cvar(cvar_731680, (object *)&__glo_list_91queue_91empty_127_srfi_117);make_pair(pair_731681, find_or_add_symbol("list-queue-empty?"), &cvar_731680);
  make_cvar(cvar_731682, (object *)&__glo_list_91queue_91copy_srfi_117);make_pair(pair_731683, find_or_add_symbol("list-queue-copy"), &cvar_731682);
  make_cvar(cvar_731684, (object *)&__glo_list_91queue_srfi_117);make_pair(pair_731685, find_or_add_symbol("list-queue"), &cvar_731684);
  make_cvar(cvar_731686, (object *)&__glo_make_91list_91queue_srfi_117);make_pair(pair_731687, find_or_add_symbol("make-list-queue"), &cvar_731686);
  make_cvar(cvar_731688, (object *)&__glo_raw_91make_91list_91queue_srfi_117);make_pair(pair_731689, find_or_add_symbol("raw-make-list-queue"), &cvar_731688);
  make_cvar(cvar_731690, (object *)&__glo_set_91last_67_srfi_117);make_pair(pair_731691, find_or_add_symbol("set-last!"), &cvar_731690);
  make_cvar(cvar_731692, (object *)&__glo_set_91first_67_srfi_117);make_pair(pair_731693, find_or_add_symbol("set-first!"), &cvar_731692);
  make_cvar(cvar_731694, (object *)&__glo_get_91last_srfi_117);make_pair(pair_731695, find_or_add_symbol("get-last"), &cvar_731694);
  make_cvar(cvar_731696, (object *)&__glo_get_91first_srfi_117);make_pair(pair_731697, find_or_add_symbol("get-first"), &cvar_731696);
  make_cvar(cvar_731698, (object *)&__glo_list_91queue_127_srfi_117);make_pair(pair_731699, find_or_add_symbol("list-queue?"), &cvar_731698);
  make_cvar(cvar_731700, (object *)&__glo__121list_91queue_125_srfi_117);make_pair(pair_731701, find_or_add_symbol("<list-queue>"), &cvar_731700);
  make_cvar(cvar_731702, (object *)&__glo_map_67_srfi_117);make_pair(pair_731703, find_or_add_symbol("map!"), &cvar_731702);
  make_cvar(cvar_731704, (object *)&__glo_last_91pair_srfi_117);make_pair(pair_731705, find_or_add_symbol("last-pair"), &cvar_731704);
make_pair(c_731742, &pair_731632,Cyc_global_variables);
make_pair(c_731741, &pair_731635, &c_731742);
make_pair(c_731740, &pair_731637, &c_731741);
make_pair(c_731739, &pair_731639, &c_731740);
make_pair(c_731738, &pair_731641, &c_731739);
make_pair(c_731737, &pair_731643, &c_731738);
make_pair(c_731736, &pair_731645, &c_731737);
make_pair(c_731735, &pair_731647, &c_731736);
make_pair(c_731734, &pair_731649, &c_731735);
make_pair(c_731733, &pair_731651, &c_731734);
make_pair(c_731732, &pair_731653, &c_731733);
make_pair(c_731731, &pair_731655, &c_731732);
make_pair(c_731730, &pair_731657, &c_731731);
make_pair(c_731729, &pair_731659, &c_731730);
make_pair(c_731728, &pair_731661, &c_731729);
make_pair(c_731727, &pair_731663, &c_731728);
make_pair(c_731726, &pair_731665, &c_731727);
make_pair(c_731725, &pair_731667, &c_731726);
make_pair(c_731724, &pair_731669, &c_731725);
make_pair(c_731723, &pair_731671, &c_731724);
make_pair(c_731722, &pair_731673, &c_731723);
make_pair(c_731721, &pair_731675, &c_731722);
make_pair(c_731720, &pair_731677, &c_731721);
make_pair(c_731719, &pair_731679, &c_731720);
make_pair(c_731718, &pair_731681, &c_731719);
make_pair(c_731717, &pair_731683, &c_731718);
make_pair(c_731716, &pair_731685, &c_731717);
make_pair(c_731715, &pair_731687, &c_731716);
make_pair(c_731714, &pair_731689, &c_731715);
make_pair(c_731713, &pair_731691, &c_731714);
make_pair(c_731712, &pair_731693, &c_731713);
make_pair(c_731711, &pair_731695, &c_731712);
make_pair(c_731710, &pair_731697, &c_731711);
make_pair(c_731709, &pair_731699, &c_731710);
make_pair(c_731708, &pair_731701, &c_731709);
make_pair(c_731707, &pair_731703, &c_731708);
make_pair(c_731706, &pair_731705, &c_731707);
Cyc_global_variables = &c_731706;
object buf[1]; buf[0] = ((closure1_type *)clo)->element;
(((closure)__glo_lib_91init_117srfi117_srfi_117)->fn)(data, buf[0], 1, buf);
}
void c_srfi117_entry_pt(void *data, object cont, int argc, object value){ 
  register_library("srfi_117");
  c_srfi117_entry_pt_first_lambda(data, cont, argc, value);
}
