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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

#include "cyclone/types.h"
object __glo_lib_91init_117srfi1_srfi_1 = NULL;
object __glo_lset_91diff_87intersection_67_srfi_1 = NULL;
object __glo_lset_91diff_87intersection_srfi_1 = NULL;
object __glo_lset_91xor_67_srfi_1 = NULL;
object __glo_lset_91xor_srfi_1 = NULL;
object __glo_lset_91difference_67_srfi_1 = NULL;
object __glo_lset_91difference_srfi_1 = NULL;
object __glo_lset_91intersection_67_srfi_1 = NULL;
object __glo_lset_91intersection_srfi_1 = NULL;
object __glo_lset_91union_67_srfi_1 = NULL;
object __glo_lset_91union_srfi_1 = NULL;
object __glo_lset_91adjoin_srfi_1 = NULL;
object __glo_lset_123_srfi_1 = NULL;
object __glo_lset_121_123_srfi_1 = NULL;
object __glo__75lset2_121_123_srfi_1 = NULL;
object __glo_reverse_67_srfi_1 = NULL;
object __glo_list_91index_srfi_1 = NULL;
object __glo_every_srfi_1 = NULL;
object __glo_any_srfi_1 = NULL;
object __glo_break_67_srfi_1 = NULL;
object __glo__break_srfi_1 = NULL;
object __glo_span_67_srfi_1 = NULL;
object __glo_span_srfi_1 = NULL;
object __glo_take_91while_67_srfi_1 = NULL;
object __glo_drop_91while_srfi_1 = NULL;
object __glo_take_91while_srfi_1 = NULL;
object __glo_find_91tail_srfi_1 = NULL;
object __glo_find_srfi_1 = NULL;
object __glo_alist_91delete_67_srfi_1 = NULL;
object __glo_alist_91delete_srfi_1 = NULL;
object __glo_alist_91copy_srfi_1 = NULL;
object __glo_alist_91cons_srfi_1 = NULL;
object __glo_delete_91duplicates_67_srfi_1 = NULL;
object __glo_delete_91duplicates_srfi_1 = NULL;
object __glo_delete_67_srfi_1 = NULL;
object __glo_delete_srfi_1 = NULL;
object __glo_remove_67_srfi_1 = NULL;
object __glo_remove_srfi_1 = NULL;
object __glo_partition_67_srfi_1 = NULL;
object __glo_partition_srfi_1 = NULL;
object __glo_filter_67_srfi_1 = NULL;
object __glo_filter_srfi_1 = NULL;
object __glo_map_srfi_1 = NULL;
object __glo_map_91in_91order_srfi_1 = NULL;
object __glo_filter_91map_srfi_1 = NULL;
object __glo_map_67_srfi_1 = NULL;
object __glo_pair_91for_91each_srfi_1 = NULL;
object __glo_really_91append_91map_srfi_1 = NULL;
object __glo_append_91map_67_srfi_1 = NULL;
object __glo_append_91map_srfi_1 = NULL;
object __glo_reduce_91right_srfi_1 = NULL;
object __glo_reduce_srfi_1 = NULL;
object __glo_pair_91fold_srfi_1 = NULL;
object __glo_pair_91fold_91right_srfi_1 = NULL;
object __glo_fold_91right_srfi_1 = NULL;
object __glo_fold_srfi_1 = NULL;
object __glo_unfold_srfi_1 = NULL;
object __glo_unfold_91right_srfi_1 = NULL;
object __glo_count_srfi_1 = NULL;
object __glo__75cars_87cdrs_95no_91test_srfi_1 = NULL;
object __glo__75cars_87cdrs_87_srfi_1 = NULL;
object __glo__75cars_87cdrs_srfi_1 = NULL;
object __glo__75cars_87_srfi_1 = NULL;
object __glo__75cdrs_srfi_1 = NULL;
object __glo_concatenate_67_srfi_1 = NULL;
object __glo_concatenate_srfi_1 = NULL;
object __glo_append_91reverse_67_srfi_1 = NULL;
object __glo_append_91reverse_srfi_1 = NULL;
object __glo_append_67_srfi_1 = NULL;
object __glo_unzip5_srfi_1 = NULL;
object __glo_unzip4_srfi_1 = NULL;
object __glo_unzip3_srfi_1 = NULL;
object __glo_unzip2_srfi_1 = NULL;
object __glo_unzip1_srfi_1 = NULL;
object __glo_last_91pair_srfi_1 = NULL;
object __glo_last_srfi_1 = NULL;
object __glo_split_91at_67_srfi_1 = NULL;
object __glo_split_91at_srfi_1 = NULL;
object __glo_drop_91right_67_srfi_1 = NULL;
object __glo_drop_91right_srfi_1 = NULL;
object __glo_take_91right_srfi_1 = NULL;
object __glo_take_67_srfi_1 = NULL;
object __glo_drop_srfi_1 = NULL;
object __glo_take_srfi_1 = NULL;
object __glo_car_87cdr_srfi_1 = NULL;
object __glo_tenth_191_191inline_191_191_srfi_1 = NULL;
object __glo_tenth_srfi_1 = NULL;
object __glo_ninth_191_191inline_191_191_srfi_1 = NULL;
object __glo_ninth_srfi_1 = NULL;
object __glo_eighth_191_191inline_191_191_srfi_1 = NULL;
object __glo_eighth_srfi_1 = NULL;
object __glo_seventh_191_191inline_191_191_srfi_1 = NULL;
object __glo_seventh_srfi_1 = NULL;
object __glo_sixth_191_191inline_191_191_srfi_1 = NULL;
object __glo_sixth_srfi_1 = NULL;
object __glo_fifth_191_191inline_191_191_srfi_1 = NULL;
object __glo_fifth_srfi_1 = NULL;
object __glo_fourth_srfi_1 = NULL;
object __glo_third_srfi_1 = NULL;
object __glo_second_srfi_1 = NULL;
object __glo_first_srfi_1 = NULL;
object __glo_zip_srfi_1 = NULL;
object __glo_length_87_srfi_1 = NULL;
object __glo_list_123_srfi_1 = NULL;
object __glo_null_91list_127_srfi_1 = NULL;
object __glo_not_91pair_127_191_191inline_191_191_srfi_1 = NULL;
object __glo_not_91pair_127_srfi_1 = NULL;
object __glo_circular_91list_127_srfi_1 = NULL;
object __glo_dotted_91list_127_srfi_1 = NULL;
object __glo_proper_91list_127_srfi_1 = NULL;
object __glo_circular_91list_srfi_1 = NULL;
object __glo_iota_srfi_1 = NULL;
object __glo_list_91copy_srfi_1 = NULL;
object __glo_cons_85_srfi_1 = NULL;
object __glo_list_91tabulate_srfi_1 = NULL;
object __glo_make_91list_srfi_1 = NULL;
object __glo_xcons_srfi_1 = NULL;
object __glo__117optional_srfi_1 = NULL;
object __glo_check_91arg_srfi_1 = 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_srfi_1;
extern object __glo_list_91copy_srfi_1;
extern object __glo_map_srfi_1;
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_srfi_1;
extern object __glo_every_srfi_1;
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_caar_scheme_cxr;
extern object __glo_cadr_scheme_cxr;
extern object __glo_cdar_scheme_cxr;
extern object __glo_cddr_scheme_cxr;
extern object __glo_caaar_scheme_cxr;
extern object __glo_caadr_scheme_cxr;
extern object __glo_cadar_scheme_cxr;
extern object __glo_caddr_scheme_cxr;
extern object __glo_cdaar_scheme_cxr;
extern object __glo_cdadr_scheme_cxr;
extern object __glo_cddar_scheme_cxr;
extern object __glo_cdddr_scheme_cxr;
extern object __glo_caaaar_scheme_cxr;
extern object __glo_caaadr_scheme_cxr;
extern object __glo_caadar_scheme_cxr;
extern object __glo_caaddr_scheme_cxr;
extern object __glo_cadaar_scheme_cxr;
extern object __glo_cadadr_scheme_cxr;
extern object __glo_caddar_scheme_cxr;
extern object __glo_cadddr_scheme_cxr;
extern object __glo_cdaaar_scheme_cxr;
extern object __glo_cdaadr_scheme_cxr;
extern object __glo_cdadar_scheme_cxr;
extern object __glo_cdaddr_scheme_cxr;
extern object __glo_cddaar_scheme_cxr;
extern object __glo_cddadr_scheme_cxr;
extern object __glo_cdddar_scheme_cxr;
extern object __glo_cddddr_scheme_cxr;
extern object __glo_caaaaar_scheme_cxr;
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(first);
defsymbol(second);
defsymbol(third);
defsymbol(fourth);
defsymbol(map);
defsymbol(error);
defsymbol(_else);
defsymbol(car);
defsymbol(cdr);
defsymbol(default_91exp);
defsymbol(null_127);
defsymbol(cond);
defsymbol(rest);
defsymbol(maybe_91arg);
defsymbol(let);
static void __lambda_1121(void *data, object clo, int argc, object *args) ;/*closure _,object k_733699*/
static void __lambda_1122(void *data, object clo, int argc, object *args) ;/*object self_734805, object r_733701*/
static void __lambda_1123(void *data, object clo, int argc, object *args) ;/*object self_734806, object r_733702*/
static void __lambda_1124(void *data, object clo, int argc, object *args) ;/*object self_734807, object r_733703*/
static void __lambda_1125(void *data, object clo, int argc, object *args) ;/*object self_734808, object r_733704*/
static void __lambda_1112(void *data, object clo, int argc, object *args) ;/*closure _,object k_733686, object _123_731280_732093, object lis1_731281_732094, object lists_731282_732095_raw, ...*/
static void __lambda_1113(void *data, object clo, int argc, object *args) ;/*object self_734797, object r_733687*/
static void __lambda_1114(void *data, object clo, int argc, object *args) ;/*object self_734798, object r_733688*/
static void __lambda_1115(void *data, object clo, int argc, object *args) ;/*object self_734799, object r_733690*/
static void __lambda_1117(void *data, object clo, int argc, object *args) ;/*object self_734800, object k_733693, object elt_731290_732096*/
static void __lambda_1120(void *data, object clo, int argc, object *args) ;/*object self_734801, object k_733696, object lis_731291_732097*/
static void __lambda_1118(void *data, object clo, int argc, object *args) ;/*object self_734802, object r_733695*/
static void __lambda_1119(void *data, object clo, int argc, object *args) ;/*object self_734803, object r_733694*/
static void __lambda_1116(void *data, object clo, int argc, object *args) ;/*object self_734804, object r_733692*/
static void __lambda_1103(void *data, object clo, int argc, object *args) ;/*closure _,object k_733673, object _123_731268_732088, object lis1_731269_732089, object lists_731270_732090_raw, ...*/
static void __lambda_1104(void *data, object clo, int argc, object *args) ;/*object self_734789, object r_733674*/
static void __lambda_1105(void *data, object clo, int argc, object *args) ;/*object self_734790, object r_733675*/
static void __lambda_1106(void *data, object clo, int argc, object *args) ;/*object self_734791, object r_733677*/
static void __lambda_1108(void *data, object clo, int argc, object *args) ;/*object self_734792, object k_733680, object elt_731278_732091*/
static void __lambda_1111(void *data, object clo, int argc, object *args) ;/*object self_734793, object k_733683, object lis_731279_732092*/
static void __lambda_1109(void *data, object clo, int argc, object *args) ;/*object self_734794, object r_733682*/
static void __lambda_1110(void *data, object clo, int argc, object *args) ;/*object self_734795, object r_733681*/
static void __lambda_1107(void *data, object clo, int argc, object *args) ;/*object self_734796, object r_733679*/
static void __lambda_1090(void *data, object clo, int argc, object *args) ;/*closure _,object k_733655, object _123_731253_732080, object lists_731254_732081_raw, ...*/
static void __lambda_1091(void *data, object clo, int argc, object *args) ;/*object self_734777, object r_733656*/
static void __lambda_1093(void *data, object clo, int argc, object *args) ;/*object self_734778, object k_733659, object b_731255_732082, object a_731256_732083*/
static void __lambda_1102(void *data, object clo, int argc, object *args) ;/*object self_734779, object k_733670*/
static void __lambda_1094(void *data, object clo, int argc, object *args) ;/*object self_734780, object r_733660*/
static void __lambda_1096(void *data, object clo, int argc, object *args) ;/*object self_734781, object k_733662, object a_91b_731257_732084, object a_91int_91b_731258_732085*/
static void __lambda_1098(void *data, object clo, int argc, object *args) ;/*object self_734782, object k_733666, object b_91pair_731266_732086, object ans_731267_732087*/
static void __lambda_1099(void *data, object clo, int argc, object *args) ;/*object self_734783, object r_733669*/
static void __lambda_1100(void *data, object clo, int argc, object *args) ;/*object self_734784, object r_733667*/
static void __lambda_1101(void *data, object clo, int argc, object *args) ;/*object self_734785, object r_733668*/
static void __lambda_1097(void *data, object clo, int argc, object *args) ;/*object self_734786, object r_733665*/
static void __lambda_1095(void *data, object clo, int argc, object *args) ;/*object self_734787, object r_733661*/
static void __lambda_1092(void *data, object clo, int argc, object *args) ;/*object self_734788, object r_733657*/
static void __lambda_1079(void *data, object clo, int argc, object *args) ;/*closure _,object k_733639, object _123_731238_732072, object lists_731239_732073_raw, ...*/
static void __lambda_1080(void *data, object clo, int argc, object *args) ;/*object self_734767, object r_733640*/
static void __lambda_1082(void *data, object clo, int argc, object *args) ;/*object self_734768, object k_733643, object b_731240_732074, object a_731241_732075*/
static void __lambda_1089(void *data, object clo, int argc, object *args) ;/*object self_734769, object k_733652*/
static void __lambda_1083(void *data, object clo, int argc, object *args) ;/*object self_734770, object r_733644*/
static void __lambda_1085(void *data, object clo, int argc, object *args) ;/*object self_734771, object k_733646, object a_91b_731242_732076, object a_91int_91b_731243_732077*/
static void __lambda_1087(void *data, object clo, int argc, object *args) ;/*object self_734772, object k_733650, object xb_731251_732078, object ans_731252_732079*/
static void __lambda_1088(void *data, object clo, int argc, object *args) ;/*object self_734773, object r_733651*/
static void __lambda_1086(void *data, object clo, int argc, object *args) ;/*object self_734774, object r_733649*/
static void __lambda_1084(void *data, object clo, int argc, object *args) ;/*object self_734775, object r_733645*/
static void __lambda_1081(void *data, object clo, int argc, object *args) ;/*object self_734776, object r_733641*/
static void __lambda_1070(void *data, object clo, int argc, object *args) ;/*closure _,object k_733627, object _123_731225_732066, object lis1_731226_732067, object lists_731227_732068_raw, ...*/
static void __lambda_1071(void *data, object clo, int argc, object *args) ;/*object self_734759, object r_733628*/
static void __lambda_1072(void *data, object clo, int argc, object *args) ;/*object self_734760, object lists_731228_732069*/
static void __lambda_1073(void *data, object clo, int argc, object *args) ;/*object self_734761, object r_733631*/
static void __lambda_1075(void *data, object clo, int argc, object *args) ;/*object self_734762, object k_733633, object x_731236_732070*/
static void __lambda_1077(void *data, object clo, int argc, object *args) ;/*object self_734763, object k_733635, object lis_731237_732071*/
static void __lambda_1078(void *data, object clo, int argc, object *args) ;/*object self_734764, object r_733636*/
static void __lambda_1076(void *data, object clo, int argc, object *args) ;/*object self_734765, object r_733634*/
static void __lambda_1074(void *data, object clo, int argc, object *args) ;/*object self_734766, object r_733632*/
static void __lambda_1061(void *data, object clo, int argc, object *args) ;/*closure _,object k_733615, object _123_731212_732060, object lis1_731213_732061, object lists_731214_732062_raw, ...*/
static void __lambda_1062(void *data, object clo, int argc, object *args) ;/*object self_734751, object r_733616*/
static void __lambda_1063(void *data, object clo, int argc, object *args) ;/*object self_734752, object lists_731215_732063*/
static void __lambda_1064(void *data, object clo, int argc, object *args) ;/*object self_734753, object r_733619*/
static void __lambda_1066(void *data, object clo, int argc, object *args) ;/*object self_734754, object k_733621, object x_731223_732064*/
static void __lambda_1068(void *data, object clo, int argc, object *args) ;/*object self_734755, object k_733623, object lis_731224_732065*/
static void __lambda_1069(void *data, object clo, int argc, object *args) ;/*object self_734756, object r_733624*/
static void __lambda_1067(void *data, object clo, int argc, object *args) ;/*object self_734757, object r_733622*/
static void __lambda_1065(void *data, object clo, int argc, object *args) ;/*object self_734758, object r_733620*/
static void __lambda_1053(void *data, object clo, int argc, object *args) ;/*closure _,object k_733604, object _123_731199_732054, object lis1_731200_732055, object lists_731201_732056_raw, ...*/
static void __lambda_1054(void *data, object clo, int argc, object *args) ;/*object self_734744, object r_733605*/
static void __lambda_1055(void *data, object clo, int argc, object *args) ;/*object self_734745, object lists_731202_732057*/
static void __lambda_1056(void *data, object clo, int argc, object *args) ;/*object self_734746, object r_733607*/
static void __lambda_1058(void *data, object clo, int argc, object *args) ;/*object self_734747, object k_733610, object x_731210_732058*/
static void __lambda_1060(void *data, object clo, int argc, object *args) ;/*object self_734748, object k_733612, object lis_731211_732059*/
static void __lambda_1059(void *data, object clo, int argc, object *args) ;/*object self_734749, object r_733611*/
static void __lambda_1057(void *data, object clo, int argc, object *args) ;/*object self_734750, object r_733609*/
static void __lambda_1045(void *data, object clo, int argc, object *args) ;/*closure _,object k_733593, object _123_731186_732048, object lis1_731187_732049, object lists_731188_732050_raw, ...*/
static void __lambda_1046(void *data, object clo, int argc, object *args) ;/*object self_734737, object r_733594*/
static void __lambda_1047(void *data, object clo, int argc, object *args) ;/*object self_734738, object lists_731189_732051*/
static void __lambda_1048(void *data, object clo, int argc, object *args) ;/*object self_734739, object r_733596*/
static void __lambda_1050(void *data, object clo, int argc, object *args) ;/*object self_734740, object k_733599, object x_731197_732052*/
static void __lambda_1052(void *data, object clo, int argc, object *args) ;/*object self_734741, object k_733601, object lis_731198_732053*/
static void __lambda_1051(void *data, object clo, int argc, object *args) ;/*object self_734742, object r_733600*/
static void __lambda_1049(void *data, object clo, int argc, object *args) ;/*object self_734743, object r_733598*/
static void __lambda_1033(void *data, object clo, int argc, object *args) ;/*closure _,object k_733576, object _123_731168_732040, object lists_731169_732041_raw, ...*/
static void __lambda_1034(void *data, object clo, int argc, object *args) ;/*object self_734726, object r_733577*/
static void __lambda_1036(void *data, object clo, int argc, object *args) ;/*object self_734727, object k_733580, object lis_731170_732042, object ans_731171_732043*/
static void __lambda_1037(void *data, object clo, int argc, object *args) ;/*object self_734728, object r_733583*/
static void __lambda_1039(void *data, object clo, int argc, object *args) ;/*object self_734729, object k_733585, object pair_731182_732044, object ans_731183_732045*/
static void __lambda_1040(void *data, object clo, int argc, object *args) ;/*object self_734730, object elt_731184_732046*/
static void __lambda_1044(void *data, object clo, int argc, object *args) ;/*object self_734731, object k_733590, object x_731185_732047*/
static void __lambda_1041(void *data, object clo, int argc, object *args) ;/*object self_734732, object r_733589*/
static void __lambda_1042(void *data, object clo, int argc, object *args) ;/*object self_734733, object r_733587*/
static void __lambda_1043(void *data, object clo, int argc, object *args) ;/*object self_734734, object r_733588*/
static void __lambda_1038(void *data, object clo, int argc, object *args) ;/*object self_734735, object r_733584*/
static void __lambda_1035(void *data, object clo, int argc, object *args) ;/*object self_734736, object r_733578*/
static void __lambda_1023(void *data, object clo, int argc, object *args) ;/*closure _,object k_733561, object _123_731151_732033, object lists_731152_732034_raw, ...*/
static void __lambda_1024(void *data, object clo, int argc, object *args) ;/*object self_734717, object r_733562*/
static void __lambda_1026(void *data, object clo, int argc, object *args) ;/*object self_734718, object k_733565, object lis_731153_732035, object ans_731154_732036*/
static void __lambda_1027(void *data, object clo, int argc, object *args) ;/*object self_734719, object r_733568*/
static void __lambda_1029(void *data, object clo, int argc, object *args) ;/*object self_734720, object k_733570, object elt_731165_732037, object ans_731166_732038*/
static void __lambda_1032(void *data, object clo, int argc, object *args) ;/*object self_734721, object k_733573, object x_731167_732039*/
static void __lambda_1030(void *data, object clo, int argc, object *args) ;/*object self_734722, object r_733572*/
static void __lambda_1031(void *data, object clo, int argc, object *args) ;/*object self_734723, object r_733571*/
static void __lambda_1028(void *data, object clo, int argc, object *args) ;/*object self_734724, object r_733569*/
static void __lambda_1025(void *data, object clo, int argc, object *args) ;/*object self_734725, object r_733563*/
static void __lambda_1018(void *data, object clo, int argc, object *args) ;/*closure _,object k_733554, object _123_731146_732028, object lis_731147_732029, object elts_731148_732030_raw, ...*/
static void __lambda_1019(void *data, object clo, int argc, object *args) ;/*object self_734713, object r_733555*/
static void __lambda_1021(void *data, object clo, int argc, object *args) ;/*object self_734714, object k_733557, object elt_731149_732031, object ans_731150_732032*/
static void __lambda_1022(void *data, object clo, int argc, object *args) ;/*object self_734715, object r_733558*/
static void __lambda_1020(void *data, object clo, int argc, object *args) ;/*object self_734716, object r_733556*/
static void __lambda_1007(void *data, object clo, int argc, object *args) ;/*closure _,object k_733535, object _123_731122_732016, object lists_731123_732017_raw, ...*/
static void __lambda_1008(void *data, object clo, int argc, object *args) ;/*object self_734702, object r_733536*/
static void __lambda_1009(void *data, object clo, int argc, object *args) ;/*object self_734703, object s1_731129_732019, object rest_731130_732020*/
static void __lambda_1010(void *data, object clo, int argc, object *args) ;/*object self_734704, object lp_731131_732021*/
static void __lambda_1211(void *data, object clo, int argc, object *args) ;/*object self_734705, object lp_731131_732021*/
static void __lambda_1013(void *data, object clo, int argc, object *args) ;/*object self_734706, object k_733542, object s1_731132_732022, object rest_731133_732023*/
static void __lambda_1014(void *data, object clo, int argc, object *args) ;/*object self_734707, object tmp_731142_731144_732027*/
static void __lambda_1017(void *data, object clo, int argc, object *args) ;/*object self_734708, object r_733546*/
static void __lambda_1015(void *data, object clo, int argc, object *args) ;/*object self_734709, object k_733548*/
static void __lambda_1016(void *data, object clo, int argc, object *args) ;/*object self_734710, object r_733549*/
static void __lambda_1011(void *data, object clo, int argc, object *args) ;/*object self_734711, object r_733541*/
static void __lambda_1012(void *data, object clo, int argc, object *args) ;/*object self_734712, object r_733540*/
static void __lambda_997(void *data, object clo, int argc, object *args) ;/*closure _,object k_733517, object _123_731099_732004, object lists_731100_732005_raw, ...*/
static void __lambda_998(void *data, object clo, int argc, object *args) ;/*object self_734692, object r_733518*/
static void __lambda_999(void *data, object clo, int argc, object *args) ;/*object self_734693, object s1_731106_732007, object rest_731107_732008*/
static void __lambda_1000(void *data, object clo, int argc, object *args) ;/*object self_734694, object lp_731108_732009*/
static void __lambda_1210(void *data, object clo, int argc, object *args) ;/*object self_734695, object lp_731108_732009*/
static void __lambda_1003(void *data, object clo, int argc, object *args) ;/*object self_734696, object k_733524, object s1_731109_732010, object rest_731110_732011*/
static void __lambda_1004(void *data, object clo, int argc, object *args) ;/*object self_734697, object tmp_731119_731121_732015*/
static void __lambda_1006(void *data, object clo, int argc, object *args) ;/*object self_734698, object r_733528*/
static void __lambda_1005(void *data, object clo, int argc, object *args) ;/*object self_734699, object k_733530*/
static void __lambda_1001(void *data, object clo, int argc, object *args) ;/*object self_734700, object r_733523*/
static void __lambda_1002(void *data, object clo, int argc, object *args) ;/*object self_734701, object r_733522*/
static void __lambda_994(void *data, object clo, int argc, object *args) ;/*closure _,object k_733512, object _123_731095_732000, object lis1_731096_732001, object lis2_731097_732002*/
static void __lambda_996(void *data, object clo, int argc, object *args) ;/*object self_734690, object k_733514, object x_731098_732003*/
static void __lambda_995(void *data, object clo, int argc, object *args) ;/*object self_734691, object r_733513*/
static void __lambda_985(void *data, object clo, int argc, object *args) ;/*closure _,object k_733502, object lis_731087_731993*/
static void __lambda_986(void *data, object clo, int argc, object *args) ;/*object self_734681, object lis_731089_731994, object ans_731090_731995*/
static void __lambda_987(void *data, object clo, int argc, object *args) ;/*object self_734682, object lp_731091_731996*/
static void __lambda_1209(void *data, object clo, int argc, object *args) ;/*object self_734683, object lp_731091_731996*/
static void __lambda_990(void *data, object clo, int argc, object *args) ;/*object self_734684, object k_733506, object lis_731092_731997, object ans_731093_731998*/
static void __lambda_991(void *data, object clo, int argc, object *args) ;/*object self_734685, object r_733507*/
static void __lambda_992(void *data, object clo, int argc, object *args) ;/*object self_734686, object tail_731094_731999*/
static void __lambda_993(void *data, object clo, int argc, object *args) ;/*object self_734687, object r_733509*/
static void __lambda_988(void *data, object clo, int argc, object *args) ;/*object self_734688, object r_733505*/
static void __lambda_989(void *data, object clo, int argc, object *args) ;/*object self_734689, object r_733504*/
static void __lambda_966(void *data, object clo, int argc, object *args) ;/*closure _,object k_733478, object pred_731068_731978, object lis1_731069_731979, object lists_731070_731980_raw, ...*/
static void __lambda_967(void *data, object clo, int argc, object *args) ;/*object self_734661, object r_733479*/
static void __lambda_978(void *data, object clo, int argc, object *args) ;/*object self_734673, object lis_731081_731988*/
static void __lambda_979(void *data, object clo, int argc, object *args) ;/*object self_734674, object lp_731083_731990*/
static void __lambda_1208(void *data, object clo, int argc, object *args) ;/*object self_734675, object lp_731083_731990*/
static void __lambda_982(void *data, object clo, int argc, object *args) ;/*object self_734676, object k_733494, object lis_731084_731991, object n_731085_731992*/
static void __lambda_983(void *data, object clo, int argc, object *args) ;/*object self_734677, object r_733495*/
static void __lambda_984(void *data, object clo, int argc, object *args) ;/*object self_734678, object r_733496*/
static void __lambda_980(void *data, object clo, int argc, object *args) ;/*object self_734679, object r_733493*/
static void __lambda_981(void *data, object clo, int argc, object *args) ;/*object self_734680, object r_733492*/
static void __lambda_968(void *data, object clo, int argc, object *args) ;/*object self_734662, object lists_731072_731981*/
static void __lambda_969(void *data, object clo, int argc, object *args) ;/*object self_734663, object lp_731074_731983*/
static void __lambda_1207(void *data, object clo, int argc, object *args) ;/*object self_734664, object lp_731074_731983*/
static void __lambda_972(void *data, object clo, int argc, object *args) ;/*object self_734665, object k_733484, object lists_731075_731984, object n_731076_731985*/
static void __lambda_977(void *data, object clo, int argc, object *args) ;/*object self_734666, object k_733491*/
static void __lambda_973(void *data, object clo, int argc, object *args) ;/*object self_734667, object r_733485*/
static void __lambda_975(void *data, object clo, int argc, object *args) ;/*object self_734668, object k_733487, object heads_731077_731986, object tails_731078_731987*/
static void __lambda_976(void *data, object clo, int argc, object *args) ;/*object self_734669, object r_733489*/
static void __lambda_974(void *data, object clo, int argc, object *args) ;/*object self_734670, object r_733486*/
static void __lambda_970(void *data, object clo, int argc, object *args) ;/*object self_734671, object r_733483*/
static void __lambda_971(void *data, object clo, int argc, object *args) ;/*object self_734672, object r_733482*/
static void __lambda_942(void *data, object clo, int argc, object *args) ;/*closure _,object k_733447, object pred_731039_731959, object lis1_731040_731960, object lists_731041_731961_raw, ...*/
static void __lambda_943(void *data, object clo, int argc, object *args) ;/*object self_734636, object r_733448*/
static void __lambda_958(void *data, object clo, int argc, object *args) ;/*object self_734652, object tmp_731058_731060_731972*/
static void __lambda_959(void *data, object clo, int argc, object *args) ;/*object self_734653, object head_731062_731973, object tail_731063_731974*/
static void __lambda_960(void *data, object clo, int argc, object *args) ;/*object self_734654, object lp_731064_731975*/
static void __lambda_1206(void *data, object clo, int argc, object *args) ;/*object self_734655, object lp_731064_731975*/
static void __lambda_963(void *data, object clo, int argc, object *args) ;/*object self_734656, object k_733471, object head_731065_731976, object tail_731066_731977*/
static void __lambda_964(void *data, object clo, int argc, object *args) ;/*object self_734657, object r_733472*/
static void __lambda_965(void *data, object clo, int argc, object *args) ;/*object self_734658, object r_733473*/
static void __lambda_961(void *data, object clo, int argc, object *args) ;/*object self_734659, object r_733470*/
static void __lambda_962(void *data, object clo, int argc, object *args) ;/*object self_734660, object r_733469*/
static void __lambda_957(void *data, object clo, int argc, object *args) ;/*object self_734637, object k_733464*/
static void __lambda_944(void *data, object clo, int argc, object *args) ;/*object self_734638, object r_733450*/
static void __lambda_946(void *data, object clo, int argc, object *args) ;/*object self_734639, object k_733452, object heads_731042_731962, object tails_731043_731963*/
static void __lambda_947(void *data, object clo, int argc, object *args) ;/*object self_734640, object heads_731049_731965, object tails_731050_731966*/
static void __lambda_948(void *data, object clo, int argc, object *args) ;/*object self_734641, object lp_731051_731967*/
static void __lambda_1205(void *data, object clo, int argc, object *args) ;/*object self_734642, object lp_731051_731967*/
static void __lambda_951(void *data, object clo, int argc, object *args) ;/*object self_734643, object k_733456, object heads_731052_731968, object tails_731053_731969*/
static void __lambda_956(void *data, object clo, int argc, object *args) ;/*object self_734644, object k_733462*/
static void __lambda_952(void *data, object clo, int argc, object *args) ;/*object self_734645, object r_733457*/
static void __lambda_954(void *data, object clo, int argc, object *args) ;/*object self_734646, object k_733459, object next_91heads_731054_731970, object next_91tails_731055_731971*/
static void __lambda_955(void *data, object clo, int argc, object *args) ;/*object self_734647, object r_733461*/
static void __lambda_953(void *data, object clo, int argc, object *args) ;/*object self_734648, object r_733458*/
static void __lambda_949(void *data, object clo, int argc, object *args) ;/*object self_734649, object r_733455*/
static void __lambda_950(void *data, object clo, int argc, object *args) ;/*object self_734650, object r_733454*/
static void __lambda_945(void *data, object clo, int argc, object *args) ;/*object self_734651, object r_733451*/
static void __lambda_918(void *data, object clo, int argc, object *args) ;/*closure _,object k_733417, object pred_731010_731940, object lis1_731011_731941, object lists_731012_731942_raw, ...*/
static void __lambda_919(void *data, object clo, int argc, object *args) ;/*object self_734611, object r_733418*/
static void __lambda_934(void *data, object clo, int argc, object *args) ;/*object self_734627, object r_733435*/
static void __lambda_935(void *data, object clo, int argc, object *args) ;/*object self_734628, object head_731030_731953, object tail_731031_731954*/
static void __lambda_936(void *data, object clo, int argc, object *args) ;/*object self_734629, object lp_731032_731955*/
static void __lambda_1204(void *data, object clo, int argc, object *args) ;/*object self_734630, object lp_731032_731955*/
static void __lambda_939(void *data, object clo, int argc, object *args) ;/*object self_734631, object k_733440, object head_731033_731956, object tail_731034_731957*/
static void __lambda_940(void *data, object clo, int argc, object *args) ;/*object self_734632, object r_733441*/
static void __lambda_941(void *data, object clo, int argc, object *args) ;/*object self_734633, object tmp_731036_731038_731958*/
static void __lambda_937(void *data, object clo, int argc, object *args) ;/*object self_734634, object r_733439*/
static void __lambda_938(void *data, object clo, int argc, object *args) ;/*object self_734635, object r_733438*/
static void __lambda_933(void *data, object clo, int argc, object *args) ;/*object self_734612, object k_733433*/
static void __lambda_920(void *data, object clo, int argc, object *args) ;/*object self_734613, object r_733420*/
static void __lambda_922(void *data, object clo, int argc, object *args) ;/*object self_734614, object k_733422, object heads_731013_731943, object tails_731014_731944*/
static void __lambda_923(void *data, object clo, int argc, object *args) ;/*object self_734615, object heads_731017_731945, object tails_731018_731946*/
static void __lambda_924(void *data, object clo, int argc, object *args) ;/*object self_734616, object lp_731019_731947*/
static void __lambda_1203(void *data, object clo, int argc, object *args) ;/*object self_734617, object lp_731019_731947*/
static void __lambda_927(void *data, object clo, int argc, object *args) ;/*object self_734618, object k_733426, object heads_731020_731948, object tails_731021_731949*/
static void __lambda_932(void *data, object clo, int argc, object *args) ;/*object self_734619, object k_733432*/
static void __lambda_928(void *data, object clo, int argc, object *args) ;/*object self_734620, object r_733427*/
static void __lambda_930(void *data, object clo, int argc, object *args) ;/*object self_734621, object k_733429, object next_91heads_731022_731950, object next_91tails_731023_731951*/
static void __lambda_931(void *data, object clo, int argc, object *args) ;/*object self_734622, object tmp_731025_731027_731952*/
static void __lambda_929(void *data, object clo, int argc, object *args) ;/*object self_734623, object r_733428*/
static void __lambda_925(void *data, object clo, int argc, object *args) ;/*object self_734624, object r_733425*/
static void __lambda_926(void *data, object clo, int argc, object *args) ;/*object self_734625, object r_733424*/
static void __lambda_921(void *data, object clo, int argc, object *args) ;/*object self_734626, object r_733421*/
static void __lambda_914(void *data, object clo, int argc, object *args) ;/*closure _,object k_733411, object pred_731007_731937, object lis_731008_731938*/
static void __lambda_916(void *data, object clo, int argc, object *args) ;/*object self_734608, object k_733413, object x_731009_731939*/
static void __lambda_917(void *data, object clo, int argc, object *args) ;/*object self_734609, object r_733414*/
static void __lambda_915(void *data, object clo, int argc, object *args) ;/*object self_734610, object r_733412*/
static void __lambda_910(void *data, object clo, int argc, object *args) ;/*closure _,object k_733405, object pred_731004_731934, object lis_731005_731935*/
static void __lambda_912(void *data, object clo, int argc, object *args) ;/*object self_734605, object k_733407, object x_731006_731936*/
static void __lambda_913(void *data, object clo, int argc, object *args) ;/*object self_734606, object r_733408*/
static void __lambda_911(void *data, object clo, int argc, object *args) ;/*object self_734607, object r_733406*/
static void __lambda_892(void *data, object clo, int argc, object *args) ;/*closure _,object k_733384, object pred_73990_731924, object lis_73991_731925*/
static void __lambda_893(void *data, object clo, int argc, object *args) ;/*object self_734587, object r_733385*/
static void __lambda_894(void *data, object clo, int argc, object *args) ;/*object self_734588, object tmp_73993_73995_731926*/
static void __lambda_897(void *data, object clo, int argc, object *args) ;/*object self_734589, object r_733386*/
static void __lambda_898(void *data, object clo, int argc, object *args) ;/*object self_734590, object r_733389*/
static void __lambda_899(void *data, object clo, int argc, object *args) ;/*object self_734591, object prev_73998_731928, object rest_73999_731929*/
static void __lambda_900(void *data, object clo, int argc, object *args) ;/*object self_734592, object lp_731000_731930*/
static void __lambda_1202(void *data, object clo, int argc, object *args) ;/*object self_734593, object lp_731000_731930*/
static void __lambda_904(void *data, object clo, int argc, object *args) ;/*object self_734594, object k_733392, object prev_731001_731931, object rest_731002_731932*/
static void __lambda_905(void *data, object clo, int argc, object *args) ;/*object self_734595, object r_733393*/
static void __lambda_906(void *data, object clo, int argc, object *args) ;/*object self_734596, object x_731003_731933*/
static void __lambda_907(void *data, object clo, int argc, object *args) ;/*object self_734597, object r_733395*/
static void __lambda_909(void *data, object clo, int argc, object *args) ;/*object self_734599, object r_733397*/
static void __lambda_908(void *data, object clo, int argc, object *args) ;/*object self_734598, object r_733396*/
static void __lambda_901(void *data, object clo, int argc, object *args) ;/*object self_734600, object r_733391*/
static void __lambda_902(void *data, object clo, int argc, object *args) ;/*object self_734601, object r_733390*/
static void __lambda_903(void *data, object clo, int argc, object *args) ;/*object self_734602, object suffix_73996_731927*/
static void __lambda_895(void *data, object clo, int argc, object *args) ;/*object self_734603, object k_733400*/
static void __lambda_896(void *data, object clo, int argc, object *args) ;/*object self_734604, object r_733401*/
static void __lambda_878(void *data, object clo, int argc, object *args) ;/*closure _,object k_733365, object pred_73981_731916, object lis_73982_731917*/
static void __lambda_879(void *data, object clo, int argc, object *args) ;/*object self_734573, object r_733366*/
static void __lambda_880(void *data, object clo, int argc, object *args) ;/*object self_734574, object lis_73984_731918*/
static void __lambda_881(void *data, object clo, int argc, object *args) ;/*object self_734575, object recur_73985_731919*/
static void __lambda_1201(void *data, object clo, int argc, object *args) ;/*object self_734576, object recur_73985_731919*/
static void __lambda_884(void *data, object clo, int argc, object *args) ;/*object self_734577, object k_733369, object lis_73986_731920*/
static void __lambda_885(void *data, object clo, int argc, object *args) ;/*object self_734578, object r_733370*/
static void __lambda_886(void *data, object clo, int argc, object *args) ;/*object self_734579, object x_73987_731921*/
static void __lambda_887(void *data, object clo, int argc, object *args) ;/*object self_734580, object r_733374*/
static void __lambda_891(void *data, object clo, int argc, object *args) ;/*object self_734581, object k_733379*/
static void __lambda_888(void *data, object clo, int argc, object *args) ;/*object self_734582, object r_733375*/
static void __lambda_890(void *data, object clo, int argc, object *args) ;/*object self_734583, object k_733377, object prefix_73988_731922, object suffix_73989_731923*/
static void __lambda_889(void *data, object clo, int argc, object *args) ;/*object self_734584, object r_733376*/
static void __lambda_882(void *data, object clo, int argc, object *args) ;/*object self_734585, object r_733368*/
static void __lambda_883(void *data, object clo, int argc, object *args) ;/*object self_734586, object r_733367*/
static void __lambda_862(void *data, object clo, int argc, object *args) ;/*closure _,object k_733346, object pred_73968_731907, object lis_73969_731908*/
static void __lambda_863(void *data, object clo, int argc, object *args) ;/*object self_734557, object r_733347*/
static void __lambda_864(void *data, object clo, int argc, object *args) ;/*object self_734558, object tmp_73971_73973_731909*/
static void __lambda_867(void *data, object clo, int argc, object *args) ;/*object self_734559, object r_733348*/
static void __lambda_868(void *data, object clo, int argc, object *args) ;/*object self_734560, object r_733350*/
static void __lambda_869(void *data, object clo, int argc, object *args) ;/*object self_734561, object prev_73975_731910, object rest_73976_731911*/
static void __lambda_870(void *data, object clo, int argc, object *args) ;/*object self_734562, object lp_73977_731912*/
static void __lambda_1200(void *data, object clo, int argc, object *args) ;/*object self_734563, object lp_73977_731912*/
static void __lambda_874(void *data, object clo, int argc, object *args) ;/*object self_734564, object k_733353, object prev_73978_731913, object rest_73979_731914*/
static void __lambda_875(void *data, object clo, int argc, object *args) ;/*object self_734565, object x_73980_731915*/
static void __lambda_876(void *data, object clo, int argc, object *args) ;/*object self_734566, object r_733356*/
static void __lambda_877(void *data, object clo, int argc, object *args) ;/*object self_734567, object r_733357*/
static void __lambda_871(void *data, object clo, int argc, object *args) ;/*object self_734568, object r_733352*/
static void __lambda_872(void *data, object clo, int argc, object *args) ;/*object self_734569, object r_733351*/
static void __lambda_873(void *data, object clo, int argc, object *args) ;/*object self_734570, object r_733349*/
static void __lambda_865(void *data, object clo, int argc, object *args) ;/*object self_734571, object k_733360*/
static void __lambda_866(void *data, object clo, int argc, object *args) ;/*object self_734572, object r_733361*/
static void __lambda_853(void *data, object clo, int argc, object *args) ;/*closure _,object k_733335, object pred_73962_731902, object lis_73963_731903*/
static void __lambda_854(void *data, object clo, int argc, object *args) ;/*object self_734548, object r_733336*/
static void __lambda_855(void *data, object clo, int argc, object *args) ;/*object self_734549, object lis_73965_731904*/
static void __lambda_856(void *data, object clo, int argc, object *args) ;/*object self_734550, object lp_73966_731905*/
static void __lambda_1199(void *data, object clo, int argc, object *args) ;/*object self_734551, object lp_73966_731905*/
static void __lambda_859(void *data, object clo, int argc, object *args) ;/*object self_734552, object k_733339, object lis_73967_731906*/
static void __lambda_860(void *data, object clo, int argc, object *args) ;/*object self_734553, object r_733340*/
static void __lambda_861(void *data, object clo, int argc, object *args) ;/*object self_734554, object r_733341*/
static void __lambda_857(void *data, object clo, int argc, object *args) ;/*object self_734555, object r_733338*/
static void __lambda_858(void *data, object clo, int argc, object *args) ;/*object self_734556, object r_733337*/
static void __lambda_843(void *data, object clo, int argc, object *args) ;/*closure _,object k_733323, object pred_73955_731896, object lis_73956_731897*/
static void __lambda_844(void *data, object clo, int argc, object *args) ;/*object self_734538, object r_733324*/
static void __lambda_845(void *data, object clo, int argc, object *args) ;/*object self_734539, object lis_73958_731898*/
static void __lambda_846(void *data, object clo, int argc, object *args) ;/*object self_734540, object recur_73959_731899*/
static void __lambda_1198(void *data, object clo, int argc, object *args) ;/*object self_734541, object recur_73959_731899*/
static void __lambda_849(void *data, object clo, int argc, object *args) ;/*object self_734542, object k_733327, object lis_73960_731900*/
static void __lambda_850(void *data, object clo, int argc, object *args) ;/*object self_734543, object r_733328*/
static void __lambda_851(void *data, object clo, int argc, object *args) ;/*object self_734544, object r_733330*/
static void __lambda_852(void *data, object clo, int argc, object *args) ;/*object self_734545, object r_733331*/
static void __lambda_847(void *data, object clo, int argc, object *args) ;/*object self_734546, object r_733326*/
static void __lambda_848(void *data, object clo, int argc, object *args) ;/*object self_734547, object r_733325*/
static void __lambda_834(void *data, object clo, int argc, object *args) ;/*closure _,object k_733312, object pred_73948_731891, object list_73949_731892*/
static void __lambda_835(void *data, object clo, int argc, object *args) ;/*object self_734529, object r_733313*/
static void __lambda_836(void *data, object clo, int argc, object *args) ;/*object self_734530, object list_73951_731893*/
static void __lambda_837(void *data, object clo, int argc, object *args) ;/*object self_734531, object lp_73952_731894*/
static void __lambda_1197(void *data, object clo, int argc, object *args) ;/*object self_734532, object lp_73952_731894*/
static void __lambda_840(void *data, object clo, int argc, object *args) ;/*object self_734533, object k_733316, object list_73953_731895*/
static void __lambda_841(void *data, object clo, int argc, object *args) ;/*object self_734534, object r_733317*/
static void __lambda_842(void *data, object clo, int argc, object *args) ;/*object self_734535, object r_733318*/
static void __lambda_838(void *data, object clo, int argc, object *args) ;/*object self_734536, object r_733315*/
static void __lambda_839(void *data, object clo, int argc, object *args) ;/*object self_734537, object r_733314*/
static void __lambda_832(void *data, object clo, int argc, object *args) ;/*closure _,object k_733308, object pred_73940_731888, object list_73941_731889*/
static void __lambda_833(void *data, object clo, int argc, object *args) ;/*object self_734528, object tmp_73944_73946_731890*/
static void __lambda_824(void *data, object clo, int argc, object *args) ;/*closure _,object k_733296, object key_73912_731882, object alist_73913_731883, object maybe_91_123_73914_731884_raw, ...*/
static void __lambda_825(void *data, object clo, int argc, object *args) ;/*object self_734521, object maybe_91arg_73929_73932_731887*/
static void __lambda_828(void *data, object clo, int argc, object *args) ;/*object self_734522, object _123_73915_731885*/
static void __lambda_830(void *data, object clo, int argc, object *args) ;/*object self_734523, object k_733299, object elt_73916_731886*/
static void __lambda_831(void *data, object clo, int argc, object *args) ;/*object self_734524, object r_733300*/
static void __lambda_829(void *data, object clo, int argc, object *args) ;/*object self_734525, object r_733298*/
static void __lambda_826(void *data, object clo, int argc, object *args) ;/*object self_734526, object k_733302*/
static void __lambda_827(void *data, object clo, int argc, object *args) ;/*object self_734527, object r_733305*/
static void __lambda_816(void *data, object clo, int argc, object *args) ;/*closure _,object k_733284, object key_73884_731876, object alist_73885_731877, object maybe_91_123_73886_731878_raw, ...*/
static void __lambda_817(void *data, object clo, int argc, object *args) ;/*object self_734514, object maybe_91arg_73901_73904_731881*/
static void __lambda_820(void *data, object clo, int argc, object *args) ;/*object self_734515, object _123_73887_731879*/
static void __lambda_822(void *data, object clo, int argc, object *args) ;/*object self_734516, object k_733287, object elt_73888_731880*/
static void __lambda_823(void *data, object clo, int argc, object *args) ;/*object self_734517, object r_733288*/
static void __lambda_821(void *data, object clo, int argc, object *args) ;/*object self_734518, object r_733286*/
static void __lambda_818(void *data, object clo, int argc, object *args) ;/*object self_734519, object k_733290*/
static void __lambda_819(void *data, object clo, int argc, object *args) ;/*object self_734520, object r_733293*/
static void __lambda_813(void *data, object clo, int argc, object *args) ;/*closure _,object k_733277, object alist_73882_731874*/
static void __lambda_815(void *data, object clo, int argc, object *args) ;/*object self_734512, object k_733279, object elt_73883_731875*/
static void __lambda_814(void *data, object clo, int argc, object *args) ;/*object self_734513, object r_733278*/
static void __lambda_812(void *data, object clo, int argc, object *args) ;/*closure _,object k_733273, object key_73879_731871, object datum_73880_731872, object alist_73881_731873*/
static void __lambda_798(void *data, object clo, int argc, object *args) ;/*closure _,object k_733255, object lis_73839_731861, object maybe_91_123_73840_731862*/
static void __lambda_799(void *data, object clo, int argc, object *args) ;/*object self_734498, object maybe_91arg_73868_73871_731870*/
static void __lambda_802(void *data, object clo, int argc, object *args) ;/*object self_734499, object elt_123_73841_731863*/
static void __lambda_803(void *data, object clo, int argc, object *args) ;/*object self_734500, object r_733257*/
static void __lambda_804(void *data, object clo, int argc, object *args) ;/*object self_734501, object lis_73843_731864*/
static void __lambda_805(void *data, object clo, int argc, object *args) ;/*object self_734502, object recur_73844_731865*/
static void __lambda_1196(void *data, object clo, int argc, object *args) ;/*object self_734503, object recur_73844_731865*/
static void __lambda_808(void *data, object clo, int argc, object *args) ;/*object self_734504, object k_733260, object lis_73845_731866*/
static void __lambda_809(void *data, object clo, int argc, object *args) ;/*object self_734505, object r_733261*/
static void __lambda_810(void *data, object clo, int argc, object *args) ;/*object self_734506, object r_733266*/
static void __lambda_811(void *data, object clo, int argc, object *args) ;/*object self_734507, object new_91tail_73854_731869*/
static void __lambda_806(void *data, object clo, int argc, object *args) ;/*object self_734508, object r_733259*/
static void __lambda_807(void *data, object clo, int argc, object *args) ;/*object self_734509, object r_733258*/
static void __lambda_800(void *data, object clo, int argc, object *args) ;/*object self_734510, object k_733267*/
static void __lambda_801(void *data, object clo, int argc, object *args) ;/*object self_734511, object r_733270*/
static void __lambda_784(void *data, object clo, int argc, object *args) ;/*closure _,object k_733237, object lis_73799_731851, object maybe_91_123_73800_731852_raw, ...*/
static void __lambda_785(void *data, object clo, int argc, object *args) ;/*object self_734484, object maybe_91arg_73828_73831_731860*/
static void __lambda_788(void *data, object clo, int argc, object *args) ;/*object self_734485, object elt_123_73801_731853*/
static void __lambda_789(void *data, object clo, int argc, object *args) ;/*object self_734486, object r_733239*/
static void __lambda_790(void *data, object clo, int argc, object *args) ;/*object self_734487, object lis_73803_731854*/
static void __lambda_791(void *data, object clo, int argc, object *args) ;/*object self_734488, object recur_73804_731855*/
static void __lambda_1195(void *data, object clo, int argc, object *args) ;/*object self_734489, object recur_73804_731855*/
static void __lambda_794(void *data, object clo, int argc, object *args) ;/*object self_734490, object k_733242, object lis_73805_731856*/
static void __lambda_795(void *data, object clo, int argc, object *args) ;/*object self_734491, object r_733243*/
static void __lambda_796(void *data, object clo, int argc, object *args) ;/*object self_734492, object r_733248*/
static void __lambda_797(void *data, object clo, int argc, object *args) ;/*object self_734493, object new_91tail_73814_731859*/
static void __lambda_792(void *data, object clo, int argc, object *args) ;/*object self_734494, object r_733241*/
static void __lambda_793(void *data, object clo, int argc, object *args) ;/*object self_734495, object r_733240*/
static void __lambda_786(void *data, object clo, int argc, object *args) ;/*object self_734496, object k_733249*/
static void __lambda_787(void *data, object clo, int argc, object *args) ;/*object self_734497, object r_733252*/
static void __lambda_776(void *data, object clo, int argc, object *args) ;/*closure _,object k_733226, object x_73771_731845, object lis_73772_731846, object maybe_91_123_73773_731847_raw, ...*/
static void __lambda_777(void *data, object clo, int argc, object *args) ;/*object self_734477, object maybe_91arg_73788_73791_731850*/
static void __lambda_780(void *data, object clo, int argc, object *args) ;/*object self_734478, object _123_73774_731848*/
static void __lambda_782(void *data, object clo, int argc, object *args) ;/*object self_734479, object k_733229, object y_73775_731849*/
static void __lambda_783(void *data, object clo, int argc, object *args) ;/*object self_734480, object r_733230*/
static void __lambda_781(void *data, object clo, int argc, object *args) ;/*object self_734481, object r_733228*/
static void __lambda_778(void *data, object clo, int argc, object *args) ;/*object self_734482, object k_733231*/
static void __lambda_779(void *data, object clo, int argc, object *args) ;/*object self_734483, object r_733234*/
static void __lambda_768(void *data, object clo, int argc, object *args) ;/*closure _,object k_733215, object x_73743_731839, object lis_73744_731840, object maybe_91_123_73745_731841_raw, ...*/
static void __lambda_769(void *data, object clo, int argc, object *args) ;/*object self_734470, object maybe_91arg_73760_73763_731844*/
static void __lambda_772(void *data, object clo, int argc, object *args) ;/*object self_734471, object _123_73746_731842*/
static void __lambda_774(void *data, object clo, int argc, object *args) ;/*object self_734472, object k_733218, object y_73747_731843*/
static void __lambda_775(void *data, object clo, int argc, object *args) ;/*object self_734473, object r_733219*/
static void __lambda_773(void *data, object clo, int argc, object *args) ;/*object self_734474, object r_733217*/
static void __lambda_770(void *data, object clo, int argc, object *args) ;/*object self_734475, object k_733220*/
static void __lambda_771(void *data, object clo, int argc, object *args) ;/*object self_734476, object r_733223*/
static void __lambda_764(void *data, object clo, int argc, object *args) ;/*closure _,object k_733209, object pred_73740_731836, object l_73741_731837*/
static void __lambda_766(void *data, object clo, int argc, object *args) ;/*object self_734467, object k_733211, object x_73742_731838*/
static void __lambda_767(void *data, object clo, int argc, object *args) ;/*object self_734468, object r_733212*/
static void __lambda_765(void *data, object clo, int argc, object *args) ;/*object self_734469, object r_733210*/
static void __lambda_760(void *data, object clo, int argc, object *args) ;/*closure _,object k_733203, object pred_73737_731833, object l_73738_731834*/
static void __lambda_762(void *data, object clo, int argc, object *args) ;/*object self_734464, object k_733205, object x_73739_731835*/
static void __lambda_763(void *data, object clo, int argc, object *args) ;/*object self_734465, object r_733206*/
static void __lambda_761(void *data, object clo, int argc, object *args) ;/*object self_734466, object r_733204*/
static void __lambda_706(void *data, object clo, int argc, object *args) ;/*closure _,object k_733152, object pred_73689_731803, object lis_73690_731804*/
static void __lambda_707(void *data, object clo, int argc, object *args) ;/*object self_734405, object r_733153*/
static void __lambda_708(void *data, object clo, int argc, object *args) ;/*object self_734406, object r_733154*/
static void __lambda_709(void *data, object clo, int argc, object *args) ;/*object self_734407, object scan_91in_73691_731805, object scan_91out_73692_731806*/
static void __lambda_1194(void *data, object clo, int argc, object *args) ;/*object self_734408, object scan_91in_73691_731805*/
static void __lambda_1193(void *data, object clo, int argc, object *args) ;/*object self_734409, object scan_91out_73692_731806*/
static void __lambda_749(void *data, object clo, int argc, object *args) ;/*object self_734410, object k_733191, object in_91prev_73693_731807, object out_91prev_73694_731808, object lis_73695_731809*/
static void __lambda_750(void *data, object clo, int argc, object *args) ;/*object self_734411, object in_91prev_73697_731810, object lis_73698_731811*/
static void __lambda_751(void *data, object clo, int argc, object *args) ;/*object self_734412, object lp_73699_731812*/
static void __lambda_1192(void *data, object clo, int argc, object *args) ;/*object self_734413, object lp_73699_731812*/
static void __lambda_754(void *data, object clo, int argc, object *args) ;/*object self_734414, object k_733194, object in_91prev_73700_731813, object lis_73701_731814*/
static void __lambda_755(void *data, object clo, int argc, object *args) ;/*object self_734415, object r_733200*/
static void __lambda_756(void *data, object clo, int argc, object *args) ;/*object self_734416, object r_733196*/
static void __lambda_758(void *data, object clo, int argc, object *args) ;/*object self_734418, object r_733198*/
static void __lambda_759(void *data, object clo, int argc, object *args) ;/*object self_734419, object r_733199*/
static void __lambda_757(void *data, object clo, int argc, object *args) ;/*object self_734417, object r_733197*/
static void __lambda_752(void *data, object clo, int argc, object *args) ;/*object self_734420, object r_733193*/
static void __lambda_753(void *data, object clo, int argc, object *args) ;/*object self_734421, object r_733192*/
static void __lambda_710(void *data, object clo, int argc, object *args) ;/*object self_734422, object r_733190*/
static void __lambda_711(void *data, object clo, int argc, object *args) ;/*object self_734423, object r_733155*/
static void __lambda_738(void *data, object clo, int argc, object *args) ;/*object self_734424, object k_733180, object in_91prev_73702_731815, object out_91prev_73703_731816, object lis_73704_731817*/
static void __lambda_739(void *data, object clo, int argc, object *args) ;/*object self_734425, object out_91prev_73706_731818, object lis_73707_731819*/
static void __lambda_740(void *data, object clo, int argc, object *args) ;/*object self_734426, object lp_73708_731820*/
static void __lambda_1191(void *data, object clo, int argc, object *args) ;/*object self_734427, object lp_73708_731820*/
static void __lambda_743(void *data, object clo, int argc, object *args) ;/*object self_734428, object k_733183, object out_91prev_73709_731821, object lis_73710_731822*/
static void __lambda_744(void *data, object clo, int argc, object *args) ;/*object self_734429, object r_733189*/
static void __lambda_745(void *data, object clo, int argc, object *args) ;/*object self_734430, object r_733185*/
static void __lambda_748(void *data, object clo, int argc, object *args) ;/*object self_734433, object r_733188*/
static void __lambda_746(void *data, object clo, int argc, object *args) ;/*object self_734431, object r_733186*/
static void __lambda_747(void *data, object clo, int argc, object *args) ;/*object self_734432, object r_733187*/
static void __lambda_741(void *data, object clo, int argc, object *args) ;/*object self_734434, object r_733182*/
static void __lambda_742(void *data, object clo, int argc, object *args) ;/*object self_734435, object r_733181*/
static void __lambda_712(void *data, object clo, int argc, object *args) ;/*object self_734436, object r_733179*/
static void __lambda_713(void *data, object clo, int argc, object *args) ;/*object self_734437, object r_733156*/
static void __lambda_714(void *data, object clo, int argc, object *args) ;/*object self_734438, object r_733178*/
static void __lambda_715(void *data, object clo, int argc, object *args) ;/*object self_734439, object r_733157*/
static void __lambda_727(void *data, object clo, int argc, object *args) ;/*object self_734452, object r_733168*/
static void __lambda_728(void *data, object clo, int argc, object *args) ;/*object self_734453, object prev_91l_73725_731828, object l_73726_731829*/
static void __lambda_729(void *data, object clo, int argc, object *args) ;/*object self_734454, object lp_73727_731830*/
static void __lambda_1190(void *data, object clo, int argc, object *args) ;/*object self_734455, object lp_73727_731830*/
static void __lambda_732(void *data, object clo, int argc, object *args) ;/*object self_734456, object k_733171, object prev_91l_73728_731831, object l_73729_731832*/
static void __lambda_733(void *data, object clo, int argc, object *args) ;/*object self_734457, object r_733177*/
static void __lambda_734(void *data, object clo, int argc, object *args) ;/*object self_734458, object r_733173*/
static void __lambda_737(void *data, object clo, int argc, object *args) ;/*object self_734461, object r_733176*/
static void __lambda_735(void *data, object clo, int argc, object *args) ;/*object self_734459, object r_733175*/
static void __lambda_736(void *data, object clo, int argc, object *args) ;/*object self_734460, object r_733174*/
static void __lambda_730(void *data, object clo, int argc, object *args) ;/*object self_734462, object r_733170*/
static void __lambda_731(void *data, object clo, int argc, object *args) ;/*object self_734463, object r_733169*/
static void __lambda_716(void *data, object clo, int argc, object *args) ;/*object self_734440, object r_733158*/
static void __lambda_717(void *data, object clo, int argc, object *args) ;/*object self_734441, object prev_91l_73712_731823, object l_73713_731824*/
static void __lambda_718(void *data, object clo, int argc, object *args) ;/*object self_734442, object lp_73714_731825*/
static void __lambda_1189(void *data, object clo, int argc, object *args) ;/*object self_734443, object lp_73714_731825*/
static void __lambda_721(void *data, object clo, int argc, object *args) ;/*object self_734444, object k_733161, object prev_91l_73715_731826, object l_73716_731827*/
static void __lambda_722(void *data, object clo, int argc, object *args) ;/*object self_734445, object r_733167*/
static void __lambda_723(void *data, object clo, int argc, object *args) ;/*object self_734446, object r_733163*/
static void __lambda_725(void *data, object clo, int argc, object *args) ;/*object self_734448, object r_733166*/
static void __lambda_726(void *data, object clo, int argc, object *args) ;/*object self_734449, object r_733165*/
static void __lambda_724(void *data, object clo, int argc, object *args) ;/*object self_734447, object r_733164*/
static void __lambda_719(void *data, object clo, int argc, object *args) ;/*object self_734450, object r_733160*/
static void __lambda_720(void *data, object clo, int argc, object *args) ;/*object self_734451, object r_733159*/
static void __lambda_690(void *data, object clo, int argc, object *args) ;/*closure _,object k_733131, object pred_73679_731794, object lis_73680_731795*/
static void __lambda_691(void *data, object clo, int argc, object *args) ;/*object self_734389, object r_733132*/
static void __lambda_692(void *data, object clo, int argc, object *args) ;/*object self_734390, object lis_73682_731796*/
static void __lambda_693(void *data, object clo, int argc, object *args) ;/*object self_734391, object recur_73683_731797*/
static void __lambda_1188(void *data, object clo, int argc, object *args) ;/*object self_734392, object recur_73683_731797*/
static void __lambda_696(void *data, object clo, int argc, object *args) ;/*object self_734393, object k_733135, object lis_73684_731798*/
static void __lambda_697(void *data, object clo, int argc, object *args) ;/*object self_734394, object r_733136*/
static void __lambda_698(void *data, object clo, int argc, object *args) ;/*object self_734395, object r_733137*/
static void __lambda_699(void *data, object clo, int argc, object *args) ;/*object self_734396, object r_733138*/
static void __lambda_700(void *data, object clo, int argc, object *args) ;/*object self_734397, object elt_73685_731799, object tail_73686_731800*/
static void __lambda_705(void *data, object clo, int argc, object *args) ;/*object self_734398, object k_733149*/
static void __lambda_701(void *data, object clo, int argc, object *args) ;/*object self_734399, object r_733139*/
static void __lambda_703(void *data, object clo, int argc, object *args) ;/*object self_734400, object k_733141, object in_73687_731801, object out_73688_731802*/
static void __lambda_704(void *data, object clo, int argc, object *args) ;/*object self_734401, object r_733142*/
static void __lambda_702(void *data, object clo, int argc, object *args) ;/*object self_734402, object r_733140*/
static void __lambda_694(void *data, object clo, int argc, object *args) ;/*object self_734403, object r_733134*/
static void __lambda_695(void *data, object clo, int argc, object *args) ;/*object self_734404, object r_733133*/
static void __lambda_659(void *data, object clo, int argc, object *args) ;/*closure _,object k_733098, object pred_73656_731780, object lis_73657_731781*/
static void __lambda_660(void *data, object clo, int argc, object *args) ;/*object self_734355, object r_733099*/
static void __lambda_661(void *data, object clo, int argc, object *args) ;/*object self_734356, object ans_73659_731782*/
static void __lambda_662(void *data, object clo, int argc, object *args) ;/*object self_734357, object lp_73660_731783*/
static void __lambda_1187(void *data, object clo, int argc, object *args) ;/*object self_734358, object lp_73660_731783*/
static void __lambda_665(void *data, object clo, int argc, object *args) ;/*object self_734359, object k_733102, object ans_73661_731784*/
static void __lambda_666(void *data, object clo, int argc, object *args) ;/*object self_734360, object r_733103*/
static void __lambda_667(void *data, object clo, int argc, object *args) ;/*object self_734361, object r_733128*/
static void __lambda_668(void *data, object clo, int argc, object *args) ;/*object self_734362, object r_733104*/
static void __lambda_669(void *data, object clo, int argc, object *args) ;/*object self_734363, object scan_91in_73669_731785, object scan_91out_73670_731786*/
static void __lambda_1186(void *data, object clo, int argc, object *args) ;/*object self_734364, object scan_91in_73669_731785*/
static void __lambda_1185(void *data, object clo, int argc, object *args) ;/*object self_734365, object scan_91out_73670_731786*/
static void __lambda_686(void *data, object clo, int argc, object *args) ;/*object self_734366, object k_733121, object prev_73671_731787, object lis_73672_731788*/
static void __lambda_687(void *data, object clo, int argc, object *args) ;/*object self_734367, object r_733126*/
static void __lambda_688(void *data, object clo, int argc, object *args) ;/*object self_734368, object r_733123*/
static void __lambda_689(void *data, object clo, int argc, object *args) ;/*object self_734369, object r_733124*/
static void __lambda_670(void *data, object clo, int argc, object *args) ;/*object self_734370, object r_733120*/
static void __lambda_671(void *data, object clo, int argc, object *args) ;/*object self_734371, object r_733105*/
static void __lambda_676(void *data, object clo, int argc, object *args) ;/*object self_734372, object k_733110, object prev_73673_731789, object lis_73674_731790*/
static void __lambda_677(void *data, object clo, int argc, object *args) ;/*object self_734373, object lis_73676_731791*/
static void __lambda_678(void *data, object clo, int argc, object *args) ;/*object self_734374, object lp_73677_731792*/
static void __lambda_1184(void *data, object clo, int argc, object *args) ;/*object self_734375, object lp_73677_731792*/
static void __lambda_681(void *data, object clo, int argc, object *args) ;/*object self_734376, object k_733113, object lis_73678_731793*/
static void __lambda_682(void *data, object clo, int argc, object *args) ;/*object self_734377, object r_733119*/
static void __lambda_683(void *data, object clo, int argc, object *args) ;/*object self_734378, object r_733115*/
static void __lambda_684(void *data, object clo, int argc, object *args) ;/*object self_734379, object r_733116*/
static void __lambda_685(void *data, object clo, int argc, object *args) ;/*object self_734380, object r_733117*/
static void __lambda_679(void *data, object clo, int argc, object *args) ;/*object self_734381, object r_733112*/
static void __lambda_680(void *data, object clo, int argc, object *args) ;/*object self_734382, object r_733111*/
static void __lambda_672(void *data, object clo, int argc, object *args) ;/*object self_734383, object r_733109*/
static void __lambda_673(void *data, object clo, int argc, object *args) ;/*object self_734384, object r_733106*/
static void __lambda_674(void *data, object clo, int argc, object *args) ;/*object self_734385, object r_733108*/
static void __lambda_675(void *data, object clo, int argc, object *args) ;/*object self_734386, object r_733107*/
static void __lambda_663(void *data, object clo, int argc, object *args) ;/*object self_734387, object r_733101*/
static void __lambda_664(void *data, object clo, int argc, object *args) ;/*object self_734388, object r_733100*/
static void __lambda_648(void *data, object clo, int argc, object *args) ;/*closure _,object k_733085, object pred_73647_731772, object lis_73648_731773*/
static void __lambda_649(void *data, object clo, int argc, object *args) ;/*object self_734344, object r_733086*/
static void __lambda_650(void *data, object clo, int argc, object *args) ;/*object self_734345, object lis_73650_731774*/
static void __lambda_651(void *data, object clo, int argc, object *args) ;/*object self_734346, object recur_73651_731775*/
static void __lambda_1183(void *data, object clo, int argc, object *args) ;/*object self_734347, object recur_73651_731775*/
static void __lambda_654(void *data, object clo, int argc, object *args) ;/*object self_734348, object k_733089, object lis_73652_731776*/
static void __lambda_655(void *data, object clo, int argc, object *args) ;/*object self_734349, object r_733090*/
static void __lambda_656(void *data, object clo, int argc, object *args) ;/*object self_734350, object head_73653_731777, object tail_73654_731778*/
static void __lambda_657(void *data, object clo, int argc, object *args) ;/*object self_734351, object r_733093*/
static void __lambda_658(void *data, object clo, int argc, object *args) ;/*object self_734352, object new_91tail_73655_731779*/
static void __lambda_652(void *data, object clo, int argc, object *args) ;/*object self_734353, object r_733088*/
static void __lambda_653(void *data, object clo, int argc, object *args) ;/*object self_734354, object r_733087*/
static void __lambda_626(void *data, object clo, int argc, object *args) ;/*closure _,object k_733059, object f_73631_731758, object lis1_73632_731759, object lists_73633_731760_raw, ...*/
static void __lambda_627(void *data, object clo, int argc, object *args) ;/*object self_734321, object r_733060*/
static void __lambda_639(void *data, object clo, int argc, object *args) ;/*object self_734334, object lis_73642_731767*/
static void __lambda_640(void *data, object clo, int argc, object *args) ;/*object self_734335, object recur_73643_731768*/
static void __lambda_1182(void *data, object clo, int argc, object *args) ;/*object self_734336, object recur_73643_731768*/
static void __lambda_643(void *data, object clo, int argc, object *args) ;/*object self_734337, object k_733075, object lis_73644_731769*/
static void __lambda_644(void *data, object clo, int argc, object *args) ;/*object self_734338, object r_733076*/
static void __lambda_645(void *data, object clo, int argc, object *args) ;/*object self_734339, object r_733078*/
static void __lambda_646(void *data, object clo, int argc, object *args) ;/*object self_734340, object tail_73645_731770, object x_73646_731771*/
static void __lambda_647(void *data, object clo, int argc, object *args) ;/*object self_734341, object r_733079*/
static void __lambda_641(void *data, object clo, int argc, object *args) ;/*object self_734342, object r_733074*/
static void __lambda_642(void *data, object clo, int argc, object *args) ;/*object self_734343, object r_733073*/
static void __lambda_628(void *data, object clo, int argc, object *args) ;/*object self_734322, object lists_73635_731761*/
static void __lambda_629(void *data, object clo, int argc, object *args) ;/*object self_734323, object recur_73636_731762*/
static void __lambda_1181(void *data, object clo, int argc, object *args) ;/*object self_734324, object recur_73636_731762*/
static void __lambda_632(void *data, object clo, int argc, object *args) ;/*object self_734325, object k_733065, object lists_73637_731763*/
static void __lambda_638(void *data, object clo, int argc, object *args) ;/*object self_734326, object k_733072*/
static void __lambda_633(void *data, object clo, int argc, object *args) ;/*object self_734327, object r_733066*/
static void __lambda_635(void *data, object clo, int argc, object *args) ;/*object self_734328, object k_733068, object cars_73638_731764, object cdrs_73639_731765*/
static void __lambda_636(void *data, object clo, int argc, object *args) ;/*object self_734329, object x_73640_731766*/
static void __lambda_637(void *data, object clo, int argc, object *args) ;/*object self_734330, object r_733071*/
static void __lambda_634(void *data, object clo, int argc, object *args) ;/*object self_734331, object r_733067*/
static void __lambda_630(void *data, object clo, int argc, object *args) ;/*object self_734332, object r_733064*/
static void __lambda_631(void *data, object clo, int argc, object *args) ;/*object self_734333, object r_733063*/
static void __lambda_603(void *data, object clo, int argc, object *args) ;/*closure _,object k_733035, object f_73603_731742, object lis1_73604_731743, object lists_73605_731744_raw, ...*/
static void __lambda_604(void *data, object clo, int argc, object *args) ;/*object self_734297, object r_733036*/
static void __lambda_617(void *data, object clo, int argc, object *args) ;/*object self_734311, object lis_73620_731752*/
static void __lambda_618(void *data, object clo, int argc, object *args) ;/*object self_734312, object recur_73621_731753*/
static void __lambda_1180(void *data, object clo, int argc, object *args) ;/*object self_734313, object recur_73621_731753*/
static void __lambda_621(void *data, object clo, int argc, object *args) ;/*object self_734314, object k_733051, object lis_73622_731754*/
static void __lambda_622(void *data, object clo, int argc, object *args) ;/*object self_734315, object r_733052*/
static void __lambda_623(void *data, object clo, int argc, object *args) ;/*object self_734316, object tail_73623_731755*/
static void __lambda_624(void *data, object clo, int argc, object *args) ;/*object self_734317, object tmp_73626_73628_731756*/
static void __lambda_625(void *data, object clo, int argc, object *args) ;/*object self_734318, object x_73629_731757*/
static void __lambda_619(void *data, object clo, int argc, object *args) ;/*object self_734319, object r_733050*/
static void __lambda_620(void *data, object clo, int argc, object *args) ;/*object self_734320, object r_733049*/
static void __lambda_605(void *data, object clo, int argc, object *args) ;/*object self_734298, object lists_73607_731745*/
static void __lambda_606(void *data, object clo, int argc, object *args) ;/*object self_734299, object recur_73608_731746*/
static void __lambda_1179(void *data, object clo, int argc, object *args) ;/*object self_734300, object recur_73608_731746*/
static void __lambda_609(void *data, object clo, int argc, object *args) ;/*object self_734301, object k_733041, object lists_73609_731747*/
static void __lambda_616(void *data, object clo, int argc, object *args) ;/*object self_734302, object k_733048*/
static void __lambda_610(void *data, object clo, int argc, object *args) ;/*object self_734303, object r_733042*/
static void __lambda_612(void *data, object clo, int argc, object *args) ;/*object self_734304, object k_733044, object cars_73610_731748, object cdrs_73611_731749*/
static void __lambda_613(void *data, object clo, int argc, object *args) ;/*object self_734305, object tmp_73614_73616_731750*/
static void __lambda_614(void *data, object clo, int argc, object *args) ;/*object self_734306, object x_73617_731751*/
static void __lambda_615(void *data, object clo, int argc, object *args) ;/*object self_734307, object r_733047*/
static void __lambda_611(void *data, object clo, int argc, object *args) ;/*object self_734308, object r_733043*/
static void __lambda_607(void *data, object clo, int argc, object *args) ;/*object self_734309, object r_733040*/
static void __lambda_608(void *data, object clo, int argc, object *args) ;/*object self_734310, object r_733039*/
static void __lambda_581(void *data, object clo, int argc, object *args) ;/*closure _,object k_733012, object f_73591_731731, object lis1_73592_731732, object lists_73593_731733_raw, ...*/
static void __lambda_582(void *data, object clo, int argc, object *args) ;/*object self_734275, object r_733013*/
static void __lambda_602(void *data, object clo, int argc, object *args) ;/*object self_734276, object r_733014*/
static void __lambda_583(void *data, object clo, int argc, object *args) ;/*object self_734277, object k_733015*/
static void __lambda_599(void *data, object clo, int argc, object *args) ;/*object self_734293, object k_733030, object pair_73602_731741*/
static void __lambda_600(void *data, object clo, int argc, object *args) ;/*object self_734294, object r_733032*/
static void __lambda_601(void *data, object clo, int argc, object *args) ;/*object self_734295, object r_733031*/
static void __lambda_598(void *data, object clo, int argc, object *args) ;/*object self_734296, object r_733029*/
static void __lambda_584(void *data, object clo, int argc, object *args) ;/*object self_734278, object lis1_73595_731734, object lists_73596_731735*/
static void __lambda_585(void *data, object clo, int argc, object *args) ;/*object self_734279, object lp_73597_731736*/
static void __lambda_1178(void *data, object clo, int argc, object *args) ;/*object self_734280, object lp_73597_731736*/
static void __lambda_588(void *data, object clo, int argc, object *args) ;/*object self_734281, object k_733019, object lis1_73598_731737, object lists_73599_731738*/
static void __lambda_589(void *data, object clo, int argc, object *args) ;/*object self_734282, object r_733020*/
static void __lambda_597(void *data, object clo, int argc, object *args) ;/*object self_734283, object k_733028*/
static void __lambda_590(void *data, object clo, int argc, object *args) ;/*object self_734284, object r_733021*/
static void __lambda_592(void *data, object clo, int argc, object *args) ;/*object self_734285, object k_733023, object heads_73600_731739, object tails_73601_731740*/
static void __lambda_593(void *data, object clo, int argc, object *args) ;/*object self_734286, object r_733027*/
static void __lambda_594(void *data, object clo, int argc, object *args) ;/*object self_734287, object r_733026*/
static void __lambda_595(void *data, object clo, int argc, object *args) ;/*object self_734288, object r_733024*/
static void __lambda_596(void *data, object clo, int argc, object *args) ;/*object self_734289, object r_733025*/
static void __lambda_591(void *data, object clo, int argc, object *args) ;/*object self_734290, object r_733022*/
static void __lambda_586(void *data, object clo, int argc, object *args) ;/*object self_734291, object r_733018*/
static void __lambda_587(void *data, object clo, int argc, object *args) ;/*object self_734292, object r_733017*/
static void __lambda_564(void *data, object clo, int argc, object *args) ;/*closure _,object k_732994, object proc_73578_731720, object lis1_73579_731721, object lists_73580_731722_raw, ...*/
static void __lambda_565(void *data, object clo, int argc, object *args) ;/*object self_734257, object r_732995*/
static void __lambda_573(void *data, object clo, int argc, object *args) ;/*object self_734266, object lis_73587_731727*/
static void __lambda_574(void *data, object clo, int argc, object *args) ;/*object self_734267, object lp_73588_731728*/
static void __lambda_1177(void *data, object clo, int argc, object *args) ;/*object self_734268, object lp_73588_731728*/
static void __lambda_577(void *data, object clo, int argc, object *args) ;/*object self_734269, object k_733006, object lis_73589_731729*/
static void __lambda_578(void *data, object clo, int argc, object *args) ;/*object self_734270, object r_733007*/
static void __lambda_579(void *data, object clo, int argc, object *args) ;/*object self_734271, object tail_73590_731730*/
static void __lambda_580(void *data, object clo, int argc, object *args) ;/*object self_734272, object r_733009*/
static void __lambda_575(void *data, object clo, int argc, object *args) ;/*object self_734273, object r_733005*/
static void __lambda_576(void *data, object clo, int argc, object *args) ;/*object self_734274, object r_733004*/
static void __lambda_566(void *data, object clo, int argc, object *args) ;/*object self_734258, object lists_73582_731723*/
static void __lambda_567(void *data, object clo, int argc, object *args) ;/*object self_734259, object lp_73583_731724*/
static void __lambda_1176(void *data, object clo, int argc, object *args) ;/*object self_734260, object lp_73583_731724*/
static void __lambda_570(void *data, object clo, int argc, object *args) ;/*object self_734261, object k_733000, object lists_73584_731725*/
static void __lambda_571(void *data, object clo, int argc, object *args) ;/*object self_734262, object tails_73585_731726*/
static void __lambda_572(void *data, object clo, int argc, object *args) ;/*object self_734263, object r_733003*/
static void __lambda_568(void *data, object clo, int argc, object *args) ;/*object self_734264, object r_732999*/
static void __lambda_569(void *data, object clo, int argc, object *args) ;/*object self_734265, object r_732998*/
static void __lambda_538(void *data, object clo, int argc, object *args) ;/*closure _,object k_732962, object who_73555_731699, object appender_73556_731700, object f_73557_731701, object lis1_73558_731702, object lists_73559_731703*/
static void __lambda_539(void *data, object clo, int argc, object *args) ;/*object self_734230, object r_732963*/
static void __lambda_555(void *data, object clo, int argc, object *args) ;/*object self_734247, object r_732981*/
static void __lambda_556(void *data, object clo, int argc, object *args) ;/*object self_734248, object elt_73572_731714, object rest_73573_731715*/
static void __lambda_557(void *data, object clo, int argc, object *args) ;/*object self_734249, object recur_73574_731716*/
static void __lambda_1175(void *data, object clo, int argc, object *args) ;/*object self_734250, object recur_73574_731716*/
static void __lambda_560(void *data, object clo, int argc, object *args) ;/*object self_734251, object k_732986, object elt_73575_731717, object rest_73576_731718*/
static void __lambda_561(void *data, object clo, int argc, object *args) ;/*object self_734252, object vals_73577_731719*/
static void __lambda_562(void *data, object clo, int argc, object *args) ;/*object self_734253, object r_732988*/
static void __lambda_563(void *data, object clo, int argc, object *args) ;/*object self_734254, object r_732989*/
static void __lambda_558(void *data, object clo, int argc, object *args) ;/*object self_734255, object r_732985*/
static void __lambda_559(void *data, object clo, int argc, object *args) ;/*object self_734256, object r_732984*/
static void __lambda_554(void *data, object clo, int argc, object *args) ;/*object self_734231, object k_732979*/
static void __lambda_540(void *data, object clo, int argc, object *args) ;/*object self_734232, object r_732965*/
static void __lambda_542(void *data, object clo, int argc, object *args) ;/*object self_734233, object k_732967, object cars_73560_731704, object cdrs_73561_731705*/
static void __lambda_543(void *data, object clo, int argc, object *args) ;/*object self_734234, object cars_73563_731706, object cdrs_73564_731707*/
static void __lambda_544(void *data, object clo, int argc, object *args) ;/*object self_734235, object recur_73565_731708*/
static void __lambda_1174(void *data, object clo, int argc, object *args) ;/*object self_734236, object recur_73565_731708*/
static void __lambda_547(void *data, object clo, int argc, object *args) ;/*object self_734237, object k_732971, object cars_73566_731709, object cdrs_73567_731710*/
static void __lambda_548(void *data, object clo, int argc, object *args) ;/*object self_734238, object vals_73568_731711*/
static void __lambda_553(void *data, object clo, int argc, object *args) ;/*object self_734239, object k_732978*/
static void __lambda_549(void *data, object clo, int argc, object *args) ;/*object self_734240, object r_732973*/
static void __lambda_551(void *data, object clo, int argc, object *args) ;/*object self_734241, object k_732975, object cars2_73569_731712, object cdrs2_73570_731713*/
static void __lambda_552(void *data, object clo, int argc, object *args) ;/*object self_734242, object r_732977*/
static void __lambda_550(void *data, object clo, int argc, object *args) ;/*object self_734243, object r_732974*/
static void __lambda_545(void *data, object clo, int argc, object *args) ;/*object self_734244, object r_732970*/
static void __lambda_546(void *data, object clo, int argc, object *args) ;/*object self_734245, object r_732969*/
static void __lambda_541(void *data, object clo, int argc, object *args) ;/*object self_734246, object r_732966*/
static void __lambda_537(void *data, object clo, int argc, object *args) ;/*closure _,object k_732959, object f_73552_731696, object lis1_73553_731697, object lists_73554_731698_raw, ...*/
static void __lambda_536(void *data, object clo, int argc, object *args) ;/*closure _,object k_732956, object f_73549_731693, object lis1_73550_731694, object lists_73551_731695_raw, ...*/
static void __lambda_527(void *data, object clo, int argc, object *args) ;/*closure _,object k_732942, object f_73540_731685, object ridentity_73541_731686, object lis_73542_731687*/
static void __lambda_528(void *data, object clo, int argc, object *args) ;/*object self_734221, object r_732943*/
static void __lambda_529(void *data, object clo, int argc, object *args) ;/*object self_734222, object r_732944*/
static void __lambda_530(void *data, object clo, int argc, object *args) ;/*object self_734223, object head_73544_731688, object lis_73545_731689*/
static void __lambda_531(void *data, object clo, int argc, object *args) ;/*object self_734224, object recur_73546_731690*/
static void __lambda_1173(void *data, object clo, int argc, object *args) ;/*object self_734225, object recur_73546_731690*/
static void __lambda_534(void *data, object clo, int argc, object *args) ;/*object self_734226, object k_732949, object head_73547_731691, object lis_73548_731692*/
static void __lambda_535(void *data, object clo, int argc, object *args) ;/*object self_734227, object r_732951*/
static void __lambda_532(void *data, object clo, int argc, object *args) ;/*object self_734228, object r_732948*/
static void __lambda_533(void *data, object clo, int argc, object *args) ;/*object self_734229, object r_732947*/
static void __lambda_523(void *data, object clo, int argc, object *args) ;/*closure _,object k_732935, object f_73537_731682, object ridentity_73538_731683, object lis_73539_731684*/
static void __lambda_524(void *data, object clo, int argc, object *args) ;/*object self_734218, object r_732936*/
static void __lambda_525(void *data, object clo, int argc, object *args) ;/*object self_734219, object r_732937*/
static void __lambda_526(void *data, object clo, int argc, object *args) ;/*object self_734220, object r_732938*/
static void __lambda_505(void *data, object clo, int argc, object *args) ;/*closure _,object k_732915, object f_73519_731666, object zero_73520_731667, object lis1_73521_731668, object lists_73522_731669_raw, ...*/
static void __lambda_506(void *data, object clo, int argc, object *args) ;/*object self_734199, object r_732916*/
static void __lambda_515(void *data, object clo, int argc, object *args) ;/*object self_734209, object lis_73531_731676, object ans_73532_731677*/
static void __lambda_516(void *data, object clo, int argc, object *args) ;/*object self_734210, object lp_73533_731678*/
static void __lambda_1172(void *data, object clo, int argc, object *args) ;/*object self_734211, object lp_73533_731678*/
static void __lambda_519(void *data, object clo, int argc, object *args) ;/*object self_734212, object k_732929, object lis_73534_731679, object ans_73535_731680*/
static void __lambda_520(void *data, object clo, int argc, object *args) ;/*object self_734213, object r_732930*/
static void __lambda_521(void *data, object clo, int argc, object *args) ;/*object self_734214, object tail_73536_731681*/
static void __lambda_522(void *data, object clo, int argc, object *args) ;/*object self_734215, object r_732932*/
static void __lambda_517(void *data, object clo, int argc, object *args) ;/*object self_734216, object r_732928*/
static void __lambda_518(void *data, object clo, int argc, object *args) ;/*object self_734217, object r_732927*/
static void __lambda_507(void *data, object clo, int argc, object *args) ;/*object self_734200, object lists_73524_731670, object ans_73525_731671*/
static void __lambda_508(void *data, object clo, int argc, object *args) ;/*object self_734201, object lp_73526_731672*/
static void __lambda_1171(void *data, object clo, int argc, object *args) ;/*object self_734202, object lp_73526_731672*/
static void __lambda_511(void *data, object clo, int argc, object *args) ;/*object self_734203, object k_732921, object lists_73527_731673, object ans_73528_731674*/
static void __lambda_512(void *data, object clo, int argc, object *args) ;/*object self_734204, object tails_73529_731675*/
static void __lambda_513(void *data, object clo, int argc, object *args) ;/*object self_734205, object r_732925*/
static void __lambda_514(void *data, object clo, int argc, object *args) ;/*object self_734206, object r_732924*/
static void __lambda_509(void *data, object clo, int argc, object *args) ;/*object self_734207, object r_732920*/
static void __lambda_510(void *data, object clo, int argc, object *args) ;/*object self_734208, object r_732919*/
static void __lambda_487(void *data, object clo, int argc, object *args) ;/*closure _,object k_732895, object f_73506_731655, object zero_73507_731656, object lis1_73508_731657, object lists_73509_731658_raw, ...*/
static void __lambda_488(void *data, object clo, int argc, object *args) ;/*object self_734180, object r_732896*/
static void __lambda_497(void *data, object clo, int argc, object *args) ;/*object self_734190, object lis_73516_731663*/
static void __lambda_498(void *data, object clo, int argc, object *args) ;/*object self_734191, object recur_73517_731664*/
static void __lambda_1170(void *data, object clo, int argc, object *args) ;/*object self_734192, object recur_73517_731664*/
static void __lambda_501(void *data, object clo, int argc, object *args) ;/*object self_734193, object k_732909, object lis_73518_731665*/
static void __lambda_502(void *data, object clo, int argc, object *args) ;/*object self_734194, object r_732910*/
static void __lambda_503(void *data, object clo, int argc, object *args) ;/*object self_734195, object r_732912*/
static void __lambda_504(void *data, object clo, int argc, object *args) ;/*object self_734196, object r_732911*/
static void __lambda_499(void *data, object clo, int argc, object *args) ;/*object self_734197, object r_732908*/
static void __lambda_500(void *data, object clo, int argc, object *args) ;/*object self_734198, object r_732907*/
static void __lambda_489(void *data, object clo, int argc, object *args) ;/*object self_734181, object lists_73511_731659*/
static void __lambda_490(void *data, object clo, int argc, object *args) ;/*object self_734182, object recur_73512_731660*/
static void __lambda_1169(void *data, object clo, int argc, object *args) ;/*object self_734183, object recur_73512_731660*/
static void __lambda_493(void *data, object clo, int argc, object *args) ;/*object self_734184, object k_732901, object lists_73513_731661*/
static void __lambda_494(void *data, object clo, int argc, object *args) ;/*object self_734185, object cdrs_73514_731662*/
static void __lambda_495(void *data, object clo, int argc, object *args) ;/*object self_734186, object r_732906*/
static void __lambda_496(void *data, object clo, int argc, object *args) ;/*object self_734187, object r_732904*/
static void __lambda_491(void *data, object clo, int argc, object *args) ;/*object self_734188, object r_732900*/
static void __lambda_492(void *data, object clo, int argc, object *args) ;/*object self_734189, object r_732899*/
static void __lambda_470(void *data, object clo, int argc, object *args) ;/*closure _,object k_732875, object kons_73492_731643, object knil_73493_731644, object lis1_73494_731645, object lists_73495_731646_raw, ...*/
static void __lambda_471(void *data, object clo, int argc, object *args) ;/*object self_734162, object r_732876*/
static void __lambda_480(void *data, object clo, int argc, object *args) ;/*object self_734172, object lis_73502_731651*/
static void __lambda_481(void *data, object clo, int argc, object *args) ;/*object self_734173, object recur_73503_731652*/
static void __lambda_1168(void *data, object clo, int argc, object *args) ;/*object self_734174, object recur_73503_731652*/
static void __lambda_484(void *data, object clo, int argc, object *args) ;/*object self_734175, object k_732888, object lis_73504_731653*/
static void __lambda_485(void *data, object clo, int argc, object *args) ;/*object self_734176, object r_732889*/
static void __lambda_486(void *data, object clo, int argc, object *args) ;/*object self_734177, object r_732891*/
static void __lambda_482(void *data, object clo, int argc, object *args) ;/*object self_734178, object r_732887*/
static void __lambda_483(void *data, object clo, int argc, object *args) ;/*object self_734179, object r_732886*/
static void __lambda_472(void *data, object clo, int argc, object *args) ;/*object self_734163, object lists_73497_731647*/
static void __lambda_473(void *data, object clo, int argc, object *args) ;/*object self_734164, object recur_73498_731648*/
static void __lambda_1167(void *data, object clo, int argc, object *args) ;/*object self_734165, object recur_73498_731648*/
static void __lambda_476(void *data, object clo, int argc, object *args) ;/*object self_734166, object k_732881, object lists_73499_731649*/
static void __lambda_477(void *data, object clo, int argc, object *args) ;/*object self_734167, object cdrs_73500_731650*/
static void __lambda_478(void *data, object clo, int argc, object *args) ;/*object self_734168, object r_732885*/
static void __lambda_479(void *data, object clo, int argc, object *args) ;/*object self_734169, object r_732884*/
static void __lambda_474(void *data, object clo, int argc, object *args) ;/*object self_734170, object r_732880*/
static void __lambda_475(void *data, object clo, int argc, object *args) ;/*object self_734171, object r_732879*/
static void __lambda_451(void *data, object clo, int argc, object *args) ;/*closure _,object k_732853, object kons_73474_731627, object knil_73475_731628, object lis1_73476_731629, object lists_73477_731630_raw, ...*/
static void __lambda_452(void *data, object clo, int argc, object *args) ;/*object self_734142, object r_732854*/
static void __lambda_463(void *data, object clo, int argc, object *args) ;/*object self_734154, object lis_73487_731638, object ans_73488_731639*/
static void __lambda_464(void *data, object clo, int argc, object *args) ;/*object self_734155, object lp_73489_731640*/
static void __lambda_1166(void *data, object clo, int argc, object *args) ;/*object self_734156, object lp_73489_731640*/
static void __lambda_467(void *data, object clo, int argc, object *args) ;/*object self_734157, object k_732868, object lis_73490_731641, object ans_73491_731642*/
static void __lambda_468(void *data, object clo, int argc, object *args) ;/*object self_734158, object r_732869*/
static void __lambda_469(void *data, object clo, int argc, object *args) ;/*object self_734159, object r_732871*/
static void __lambda_465(void *data, object clo, int argc, object *args) ;/*object self_734160, object r_732867*/
static void __lambda_466(void *data, object clo, int argc, object *args) ;/*object self_734161, object r_732866*/
static void __lambda_453(void *data, object clo, int argc, object *args) ;/*object self_734143, object lists_73479_731631, object ans_73480_731632*/
static void __lambda_454(void *data, object clo, int argc, object *args) ;/*object self_734144, object lp_73481_731633*/
static void __lambda_1165(void *data, object clo, int argc, object *args) ;/*object self_734145, object lp_73481_731633*/
static void __lambda_457(void *data, object clo, int argc, object *args) ;/*object self_734146, object k_732859, object lists_73482_731634, object ans_73483_731635*/
static void __lambda_462(void *data, object clo, int argc, object *args) ;/*object self_734147, object k_732865*/
static void __lambda_458(void *data, object clo, int argc, object *args) ;/*object self_734148, object r_732860*/
static void __lambda_460(void *data, object clo, int argc, object *args) ;/*object self_734149, object k_732862, object cars_87ans_73484_731636, object cdrs_73485_731637*/
static void __lambda_461(void *data, object clo, int argc, object *args) ;/*object self_734150, object r_732864*/
static void __lambda_459(void *data, object clo, int argc, object *args) ;/*object self_734151, object r_732861*/
static void __lambda_455(void *data, object clo, int argc, object *args) ;/*object self_734152, object r_732858*/
static void __lambda_456(void *data, object clo, int argc, object *args) ;/*object self_734153, object r_732857*/
static void __lambda_428(void *data, object clo, int argc, object *args) ;/*closure _,object k_732829, object p_73460_731615, object f_73461_731616, object g_73462_731617, object seed_73463_731618, object maybe_91tail_91gen_73464_731619_raw, ...*/
static void __lambda_429(void *data, object clo, int argc, object *args) ;/*object self_734118, object r_732830*/
static void __lambda_430(void *data, object clo, int argc, object *args) ;/*object self_734119, object r_732831*/
static void __lambda_431(void *data, object clo, int argc, object *args) ;/*object self_734120, object r_732832*/
static void __lambda_442(void *data, object clo, int argc, object *args) ;/*object self_734132, object seed_73471_731624*/
static void __lambda_443(void *data, object clo, int argc, object *args) ;/*object self_734133, object recur_73472_731625*/
static void __lambda_1164(void *data, object clo, int argc, object *args) ;/*object self_734134, object recur_73472_731625*/
static void __lambda_446(void *data, object clo, int argc, object *args) ;/*object self_734135, object k_732846, object seed_73473_731626*/
static void __lambda_447(void *data, object clo, int argc, object *args) ;/*object self_734136, object r_732847*/
static void __lambda_448(void *data, object clo, int argc, object *args) ;/*object self_734137, object r_732848*/
static void __lambda_449(void *data, object clo, int argc, object *args) ;/*object self_734138, object r_732850*/
static void __lambda_450(void *data, object clo, int argc, object *args) ;/*object self_734139, object r_732849*/
static void __lambda_444(void *data, object clo, int argc, object *args) ;/*object self_734140, object r_732845*/
static void __lambda_445(void *data, object clo, int argc, object *args) ;/*object self_734141, object r_732844*/
static void __lambda_432(void *data, object clo, int argc, object *args) ;/*object self_734121, object tail_91gen_73465_731620*/
static void __lambda_433(void *data, object clo, int argc, object *args) ;/*object self_734122, object seed_73467_731621*/
static void __lambda_434(void *data, object clo, int argc, object *args) ;/*object self_734123, object recur_73468_731622*/
static void __lambda_1163(void *data, object clo, int argc, object *args) ;/*object self_734124, object recur_73468_731622*/
static void __lambda_437(void *data, object clo, int argc, object *args) ;/*object self_734125, object k_732838, object seed_73469_731623*/
static void __lambda_438(void *data, object clo, int argc, object *args) ;/*object self_734126, object r_732839*/
static void __lambda_439(void *data, object clo, int argc, object *args) ;/*object self_734127, object r_732840*/
static void __lambda_440(void *data, object clo, int argc, object *args) ;/*object self_734128, object r_732842*/
static void __lambda_441(void *data, object clo, int argc, object *args) ;/*object self_734129, object r_732841*/
static void __lambda_435(void *data, object clo, int argc, object *args) ;/*object self_734130, object r_732837*/
static void __lambda_436(void *data, object clo, int argc, object *args) ;/*object self_734131, object r_732836*/
static void __lambda_411(void *data, object clo, int argc, object *args) ;/*closure _,object k_732811, object p_73426_731604, object f_73427_731605, object g_73428_731606, object seed_73429_731607, object maybe_91tail_73430_731608_raw, ...*/
static void __lambda_412(void *data, object clo, int argc, object *args) ;/*object self_734101, object r_732812*/
static void __lambda_413(void *data, object clo, int argc, object *args) ;/*object self_734102, object r_732813*/
static void __lambda_414(void *data, object clo, int argc, object *args) ;/*object self_734103, object r_732814*/
static void __lambda_415(void *data, object clo, int argc, object *args) ;/*object self_734104, object maybe_91arg_73449_73452_731614*/
static void __lambda_418(void *data, object clo, int argc, object *args) ;/*object self_734105, object r_732815*/
static void __lambda_419(void *data, object clo, int argc, object *args) ;/*object self_734106, object seed_73432_731609, object ans_73433_731610*/
static void __lambda_420(void *data, object clo, int argc, object *args) ;/*object self_734107, object lp_73434_731611*/
static void __lambda_1162(void *data, object clo, int argc, object *args) ;/*object self_734108, object lp_73434_731611*/
static void __lambda_423(void *data, object clo, int argc, object *args) ;/*object self_734109, object k_732818, object seed_73435_731612, object ans_73436_731613*/
static void __lambda_424(void *data, object clo, int argc, object *args) ;/*object self_734110, object r_732819*/
static void __lambda_425(void *data, object clo, int argc, object *args) ;/*object self_734111, object r_732820*/
static void __lambda_426(void *data, object clo, int argc, object *args) ;/*object self_734112, object r_732822*/
static void __lambda_427(void *data, object clo, int argc, object *args) ;/*object self_734113, object r_732821*/
static void __lambda_421(void *data, object clo, int argc, object *args) ;/*object self_734114, object r_732817*/
static void __lambda_422(void *data, object clo, int argc, object *args) ;/*object self_734115, object r_732816*/
static void __lambda_416(void *data, object clo, int argc, object *args) ;/*object self_734116, object k_732823*/
static void __lambda_417(void *data, object clo, int argc, object *args) ;/*object self_734117, object r_732826*/
static void __lambda_387(void *data, object clo, int argc, object *args) ;/*closure _,object k_732783, object pred_73407_731587, object list1_73408_731588, object lists_73409_731589_raw, ...*/
static void __lambda_388(void *data, object clo, int argc, object *args) ;/*object self_734076, object r_732784*/
static void __lambda_402(void *data, object clo, int argc, object *args) ;/*object self_734091, object lis_73421_731599*/
static void __lambda_403(void *data, object clo, int argc, object *args) ;/*object self_734092, object lp_73423_731601*/
static void __lambda_1161(void *data, object clo, int argc, object *args) ;/*object self_734093, object lp_73423_731601*/
static void __lambda_406(void *data, object clo, int argc, object *args) ;/*object self_734094, object k_732802, object lis_73424_731602, object i_73425_731603*/
static void __lambda_407(void *data, object clo, int argc, object *args) ;/*object self_734095, object r_732803*/
static void __lambda_410(void *data, object clo, int argc, object *args) ;/*object self_734096, object r_732805*/
static void __lambda_408(void *data, object clo, int argc, object *args) ;/*object self_734097, object k_732806*/
static void __lambda_409(void *data, object clo, int argc, object *args) ;/*object self_734098, object r_732807*/
static void __lambda_404(void *data, object clo, int argc, object *args) ;/*object self_734099, object r_732801*/
static void __lambda_405(void *data, object clo, int argc, object *args) ;/*object self_734100, object r_732800*/
static void __lambda_389(void *data, object clo, int argc, object *args) ;/*object self_734077, object list1_73411_731590, object lists_73412_731591*/
static void __lambda_390(void *data, object clo, int argc, object *args) ;/*object self_734078, object lp_73414_731593*/
static void __lambda_1160(void *data, object clo, int argc, object *args) ;/*object self_734079, object lp_73414_731593*/
static void __lambda_393(void *data, object clo, int argc, object *args) ;/*object self_734080, object k_732788, object list1_73415_731594, object lists_73416_731595, object i_73417_731596*/
static void __lambda_394(void *data, object clo, int argc, object *args) ;/*object self_734081, object r_732789*/
static void __lambda_401(void *data, object clo, int argc, object *args) ;/*object self_734082, object k_732799*/
static void __lambda_395(void *data, object clo, int argc, object *args) ;/*object self_734083, object r_732790*/
static void __lambda_397(void *data, object clo, int argc, object *args) ;/*object self_734084, object k_732792, object as_73418_731597, object ds_73419_731598*/
static void __lambda_400(void *data, object clo, int argc, object *args) ;/*object self_734085, object r_732795*/
static void __lambda_398(void *data, object clo, int argc, object *args) ;/*object self_734086, object k_732796*/
static void __lambda_399(void *data, object clo, int argc, object *args) ;/*object self_734087, object r_732797*/
static void __lambda_396(void *data, object clo, int argc, object *args) ;/*object self_734088, object r_732791*/
static void __lambda_391(void *data, object clo, int argc, object *args) ;/*object self_734089, object r_732787*/
static void __lambda_392(void *data, object clo, int argc, object *args) ;/*object self_734090, object r_732786*/
static void __lambda_369(void *data, object clo, int argc, object *args) ;/*closure _,object k_732760, object lists_73396_731577*/
static void __lambda_370(void *data, object clo, int argc, object *args) ;/*object self_734058, object lists_73398_731578*/
static void __lambda_371(void *data, object clo, int argc, object *args) ;/*object self_734059, object recur_73399_731579*/
static void __lambda_1159(void *data, object clo, int argc, object *args) ;/*object self_734060, object recur_73399_731579*/
static void __lambda_374(void *data, object clo, int argc, object *args) ;/*object self_734061, object k_732763, object lists_73400_731580*/
static void __lambda_386(void *data, object clo, int argc, object *args) ;/*object self_734062, object k_732778*/
static void __lambda_375(void *data, object clo, int argc, object *args) ;/*object self_734063, object r_732765*/
static void __lambda_377(void *data, object clo, int argc, object *args) ;/*object self_734064, object k_732767, object list_73401_731581, object other_91lists_73402_731582*/
static void __lambda_385(void *data, object clo, int argc, object *args) ;/*object self_734065, object k_732777*/
static void __lambda_378(void *data, object clo, int argc, object *args) ;/*object self_734066, object r_732768*/
static void __lambda_380(void *data, object clo, int argc, object *args) ;/*object self_734067, object k_732770, object a_73403_731583, object d_73404_731584*/
static void __lambda_384(void *data, object clo, int argc, object *args) ;/*object self_734068, object k_732776*/
static void __lambda_381(void *data, object clo, int argc, object *args) ;/*object self_734069, object r_732771*/
static void __lambda_383(void *data, object clo, int argc, object *args) ;/*object self_734070, object k_732773, object cars_73405_731585, object cdrs_73406_731586*/
static void __lambda_382(void *data, object clo, int argc, object *args) ;/*object self_734071, object r_732772*/
static void __lambda_379(void *data, object clo, int argc, object *args) ;/*object self_734072, object r_732769*/
static void __lambda_376(void *data, object clo, int argc, object *args) ;/*object self_734073, object r_732766*/
static void __lambda_372(void *data, object clo, int argc, object *args) ;/*object self_734074, object r_732762*/
static void __lambda_373(void *data, object clo, int argc, object *args) ;/*object self_734075, object r_732761*/
static void __lambda_348(void *data, object clo, int argc, object *args) ;/*closure _,object k_732732, object lists_73383_731565, object cars_91final_73384_731566*/
static void __lambda_350(void *data, object clo, int argc, object *args) ;/*object self_734037, object k_732734, object abort_73385_731567*/
static void __lambda_351(void *data, object clo, int argc, object *args) ;/*object self_734038, object lists_73387_731568*/
static void __lambda_352(void *data, object clo, int argc, object *args) ;/*object self_734039, object recur_73388_731569*/
static void __lambda_1158(void *data, object clo, int argc, object *args) ;/*object self_734040, object recur_73388_731569*/
static void __lambda_355(void *data, object clo, int argc, object *args) ;/*object self_734041, object k_732737, object lists_73389_731570*/
static void __lambda_368(void *data, object clo, int argc, object *args) ;/*object self_734042, object k_732755*/
static void __lambda_356(void *data, object clo, int argc, object *args) ;/*object self_734043, object r_732739*/
static void __lambda_358(void *data, object clo, int argc, object *args) ;/*object self_734044, object k_732741, object list_73390_731571, object other_91lists_73391_731572*/
static void __lambda_359(void *data, object clo, int argc, object *args) ;/*object self_734045, object r_732742*/
static void __lambda_367(void *data, object clo, int argc, object *args) ;/*object self_734046, object k_732754*/
static void __lambda_360(void *data, object clo, int argc, object *args) ;/*object self_734047, object r_732745*/
static void __lambda_362(void *data, object clo, int argc, object *args) ;/*object self_734048, object k_732747, object a_73392_731573, object d_73393_731574*/
static void __lambda_366(void *data, object clo, int argc, object *args) ;/*object self_734049, object k_732753*/
static void __lambda_363(void *data, object clo, int argc, object *args) ;/*object self_734050, object r_732748*/
static void __lambda_365(void *data, object clo, int argc, object *args) ;/*object self_734051, object k_732750, object cars_73394_731575, object cdrs_73395_731576*/
static void __lambda_364(void *data, object clo, int argc, object *args) ;/*object self_734052, object r_732749*/
static void __lambda_361(void *data, object clo, int argc, object *args) ;/*object self_734053, object r_732746*/
static void __lambda_357(void *data, object clo, int argc, object *args) ;/*object self_734054, object r_732740*/
static void __lambda_353(void *data, object clo, int argc, object *args) ;/*object self_734055, object r_732736*/
static void __lambda_354(void *data, object clo, int argc, object *args) ;/*object self_734056, object r_732735*/
static void __lambda_349(void *data, object clo, int argc, object *args) ;/*object self_734057, object r_732733*/
static void __lambda_327(void *data, object clo, int argc, object *args) ;/*closure _,object k_732704, object lists_73371_731554*/
static void __lambda_329(void *data, object clo, int argc, object *args) ;/*object self_734016, object k_732706, object abort_73372_731555*/
static void __lambda_330(void *data, object clo, int argc, object *args) ;/*object self_734017, object lists_73374_731556*/
static void __lambda_331(void *data, object clo, int argc, object *args) ;/*object self_734018, object recur_73375_731557*/
static void __lambda_1157(void *data, object clo, int argc, object *args) ;/*object self_734019, object recur_73375_731557*/
static void __lambda_334(void *data, object clo, int argc, object *args) ;/*object self_734020, object k_732709, object lists_73376_731558*/
static void __lambda_347(void *data, object clo, int argc, object *args) ;/*object self_734021, object k_732727*/
static void __lambda_335(void *data, object clo, int argc, object *args) ;/*object self_734022, object r_732711*/
static void __lambda_337(void *data, object clo, int argc, object *args) ;/*object self_734023, object k_732713, object list_73377_731559, object other_91lists_73378_731560*/
static void __lambda_338(void *data, object clo, int argc, object *args) ;/*object self_734024, object r_732714*/
static void __lambda_346(void *data, object clo, int argc, object *args) ;/*object self_734025, object k_732726*/
static void __lambda_339(void *data, object clo, int argc, object *args) ;/*object self_734026, object r_732717*/
static void __lambda_341(void *data, object clo, int argc, object *args) ;/*object self_734027, object k_732719, object a_73379_731561, object d_73380_731562*/
static void __lambda_345(void *data, object clo, int argc, object *args) ;/*object self_734028, object k_732725*/
static void __lambda_342(void *data, object clo, int argc, object *args) ;/*object self_734029, object r_732720*/
static void __lambda_344(void *data, object clo, int argc, object *args) ;/*object self_734030, object k_732722, object cars_73381_731563, object cdrs_73382_731564*/
static void __lambda_343(void *data, object clo, int argc, object *args) ;/*object self_734031, object r_732721*/
static void __lambda_340(void *data, object clo, int argc, object *args) ;/*object self_734032, object r_732718*/
static void __lambda_336(void *data, object clo, int argc, object *args) ;/*object self_734033, object r_732712*/
static void __lambda_332(void *data, object clo, int argc, object *args) ;/*object self_734034, object r_732708*/
static void __lambda_333(void *data, object clo, int argc, object *args) ;/*object self_734035, object r_732707*/
static void __lambda_328(void *data, object clo, int argc, object *args) ;/*object self_734036, object r_732705*/
static void __lambda_320(void *data, object clo, int argc, object *args) ;/*closure _,object k_732694, object lists_73365_731549, object last_91elt_73366_731550*/
static void __lambda_321(void *data, object clo, int argc, object *args) ;/*object self_734009, object lists_73368_731551*/
static void __lambda_322(void *data, object clo, int argc, object *args) ;/*object self_734010, object recur_73369_731552*/
static void __lambda_1156(void *data, object clo, int argc, object *args) ;/*object self_734011, object recur_73369_731552*/
static void __lambda_325(void *data, object clo, int argc, object *args) ;/*object self_734012, object k_732697, object lists_73370_731553*/
static void __lambda_326(void *data, object clo, int argc, object *args) ;/*object self_734013, object r_732700*/
static void __lambda_323(void *data, object clo, int argc, object *args) ;/*object self_734014, object r_732696*/
static void __lambda_324(void *data, object clo, int argc, object *args) ;/*object self_734015, object r_732695*/
static void __lambda_310(void *data, object clo, int argc, object *args) ;/*closure _,object k_732679, object lists_73358_731543*/
static void __lambda_312(void *data, object clo, int argc, object *args) ;/*object self_733999, object k_732681, object abort_73359_731544*/
static void __lambda_313(void *data, object clo, int argc, object *args) ;/*object self_734000, object lists_73361_731545*/
static void __lambda_314(void *data, object clo, int argc, object *args) ;/*object self_734001, object recur_73362_731546*/
static void __lambda_1155(void *data, object clo, int argc, object *args) ;/*object self_734002, object recur_73362_731546*/
static void __lambda_317(void *data, object clo, int argc, object *args) ;/*object self_734003, object k_732684, object lists_73363_731547*/
static void __lambda_318(void *data, object clo, int argc, object *args) ;/*object self_734004, object r_732687*/
static void __lambda_319(void *data, object clo, int argc, object *args) ;/*object self_734005, object r_732690*/
static void __lambda_315(void *data, object clo, int argc, object *args) ;/*object self_734006, object r_732683*/
static void __lambda_316(void *data, object clo, int argc, object *args) ;/*object self_734007, object r_732682*/
static void __lambda_311(void *data, object clo, int argc, object *args) ;/*object self_734008, object r_732680*/
static void __lambda_309(void *data, object clo, int argc, object *args) ;/*closure _,object k_732675, object lists_73357_731542*/
static void __lambda_308(void *data, object clo, int argc, object *args) ;/*closure _,object k_732671, object lists_73356_731541*/
static void __lambda_299(void *data, object clo, int argc, object *args) ;/*closure _,object k_732662, object rev_91head_73347_731533, object tail_73348_731534*/
static void __lambda_300(void *data, object clo, int argc, object *args) ;/*object self_733990, object rev_91head_73350_731535, object tail_73351_731536*/
static void __lambda_301(void *data, object clo, int argc, object *args) ;/*object self_733991, object lp_73352_731537*/
static void __lambda_1154(void *data, object clo, int argc, object *args) ;/*object self_733992, object lp_73352_731537*/
static void __lambda_304(void *data, object clo, int argc, object *args) ;/*object self_733993, object k_732665, object rev_91head_73353_731538, object tail_73354_731539*/
static void __lambda_305(void *data, object clo, int argc, object *args) ;/*object self_733994, object r_732666*/
static void __lambda_306(void *data, object clo, int argc, object *args) ;/*object self_733995, object next_91rev_73355_731540*/
static void __lambda_307(void *data, object clo, int argc, object *args) ;/*object self_733996, object r_732668*/
static void __lambda_302(void *data, object clo, int argc, object *args) ;/*object self_733997, object r_732664*/
static void __lambda_303(void *data, object clo, int argc, object *args) ;/*object self_733998, object r_732663*/
static void __lambda_292(void *data, object clo, int argc, object *args) ;/*closure _,object k_732652, object rev_91head_73339_731526, object tail_73340_731527*/
static void __lambda_293(void *data, object clo, int argc, object *args) ;/*object self_733983, object rev_91head_73342_731528, object tail_73343_731529*/
static void __lambda_294(void *data, object clo, int argc, object *args) ;/*object self_733984, object lp_73344_731530*/
static void __lambda_1153(void *data, object clo, int argc, object *args) ;/*object self_733985, object lp_73344_731530*/
static void __lambda_297(void *data, object clo, int argc, object *args) ;/*object self_733986, object k_732655, object rev_91head_73345_731531, object tail_73346_731532*/
static void __lambda_298(void *data, object clo, int argc, object *args) ;/*object self_733987, object r_732656*/
static void __lambda_295(void *data, object clo, int argc, object *args) ;/*object self_733988, object r_732654*/
static void __lambda_296(void *data, object clo, int argc, object *args) ;/*object self_733989, object r_732653*/
static void __lambda_277(void *data, object clo, int argc, object *args) ;/*closure _,object k_732630, object lists_73322_731511_raw, ...*/
static void __lambda_278(void *data, object clo, int argc, object *args) ;/*object self_733967, object lists_73324_731512, object prev_73325_731513*/
static void __lambda_279(void *data, object clo, int argc, object *args) ;/*object self_733968, object lp_73326_731514*/
static void __lambda_1152(void *data, object clo, int argc, object *args) ;/*object self_733969, object lp_73326_731514*/
static void __lambda_282(void *data, object clo, int argc, object *args) ;/*object self_733970, object k_732634, object lists_73327_731515, object prev_73328_731516*/
static void __lambda_283(void *data, object clo, int argc, object *args) ;/*object self_733971, object r_732639*/
static void __lambda_284(void *data, object clo, int argc, object *args) ;/*object self_733972, object tail_91cons_73332_731519, object rest_73333_731520*/
static void __lambda_285(void *data, object clo, int argc, object *args) ;/*object self_733973, object lp2_73334_731521*/
static void __lambda_1151(void *data, object clo, int argc, object *args) ;/*object self_733974, object lp2_73334_731521*/
static void __lambda_288(void *data, object clo, int argc, object *args) ;/*object self_733975, object k_732642, object tail_91cons_73335_731522, object rest_73336_731523*/
static void __lambda_289(void *data, object clo, int argc, object *args) ;/*object self_733976, object r_732646*/
static void __lambda_291(void *data, object clo, int argc, object *args) ;/*object self_733977, object r_732647*/
static void __lambda_290(void *data, object clo, int argc, object *args) ;/*object self_733978, object k_732648*/
static void __lambda_286(void *data, object clo, int argc, object *args) ;/*object self_733979, object r_732641*/
static void __lambda_287(void *data, object clo, int argc, object *args) ;/*object self_733980, object r_732640*/
static void __lambda_280(void *data, object clo, int argc, object *args) ;/*object self_733981, object r_732633*/
static void __lambda_281(void *data, object clo, int argc, object *args) ;/*object self_733982, object r_732632*/
static void __lambda_266(void *data, object clo, int argc, object *args) ;/*closure _,object k_732606, object lis_73311_731501*/
static void __lambda_267(void *data, object clo, int argc, object *args) ;/*object self_733956, object lis_73313_731502*/
static void __lambda_268(void *data, object clo, int argc, object *args) ;/*object self_733957, object recur_73314_731503*/
static void __lambda_1150(void *data, object clo, int argc, object *args) ;/*object self_733958, object recur_73314_731503*/
static void __lambda_271(void *data, object clo, int argc, object *args) ;/*object self_733959, object k_732609, object lis_73315_731504*/
static void __lambda_272(void *data, object clo, int argc, object *args) ;/*object self_733960, object r_732610*/
static void __lambda_276(void *data, object clo, int argc, object *args) ;/*object self_733961, object k_732626*/
static void __lambda_273(void *data, object clo, int argc, object *args) ;/*object self_733962, object r_732612*/
static void __lambda_275(void *data, object clo, int argc, object *args) ;/*object self_733963, object k_732614, object a_73317_731506, object b_73318_731507, object c_73319_731508, object d_73320_731509, object e_73321_731510*/
static void __lambda_274(void *data, object clo, int argc, object *args) ;/*object self_733964, object r_732613*/
static void __lambda_269(void *data, object clo, int argc, object *args) ;/*object self_733965, object r_732608*/
static void __lambda_270(void *data, object clo, int argc, object *args) ;/*object self_733966, object r_732607*/
static void __lambda_255(void *data, object clo, int argc, object *args) ;/*closure _,object k_732585, object lis_73301_731492*/
static void __lambda_256(void *data, object clo, int argc, object *args) ;/*object self_733945, object lis_73303_731493*/
static void __lambda_257(void *data, object clo, int argc, object *args) ;/*object self_733946, object recur_73304_731494*/
static void __lambda_1149(void *data, object clo, int argc, object *args) ;/*object self_733947, object recur_73304_731494*/
static void __lambda_260(void *data, object clo, int argc, object *args) ;/*object self_733948, object k_732588, object lis_73305_731495*/
static void __lambda_261(void *data, object clo, int argc, object *args) ;/*object self_733949, object r_732589*/
static void __lambda_265(void *data, object clo, int argc, object *args) ;/*object self_733950, object k_732602*/
static void __lambda_262(void *data, object clo, int argc, object *args) ;/*object self_733951, object r_732591*/
static void __lambda_264(void *data, object clo, int argc, object *args) ;/*object self_733952, object k_732593, object a_73307_731497, object b_73308_731498, object c_73309_731499, object d_73310_731500*/
static void __lambda_263(void *data, object clo, int argc, object *args) ;/*object self_733953, object r_732592*/
static void __lambda_258(void *data, object clo, int argc, object *args) ;/*object self_733954, object r_732587*/
static void __lambda_259(void *data, object clo, int argc, object *args) ;/*object self_733955, object r_732586*/
static void __lambda_244(void *data, object clo, int argc, object *args) ;/*closure _,object k_732566, object lis_73292_731484*/
static void __lambda_245(void *data, object clo, int argc, object *args) ;/*object self_733934, object lis_73294_731485*/
static void __lambda_246(void *data, object clo, int argc, object *args) ;/*object self_733935, object recur_73295_731486*/
static void __lambda_1148(void *data, object clo, int argc, object *args) ;/*object self_733936, object recur_73295_731486*/
static void __lambda_249(void *data, object clo, int argc, object *args) ;/*object self_733937, object k_732569, object lis_73296_731487*/
static void __lambda_250(void *data, object clo, int argc, object *args) ;/*object self_733938, object r_732570*/
static void __lambda_254(void *data, object clo, int argc, object *args) ;/*object self_733939, object k_732581*/
static void __lambda_251(void *data, object clo, int argc, object *args) ;/*object self_733940, object r_732572*/
static void __lambda_253(void *data, object clo, int argc, object *args) ;/*object self_733941, object k_732574, object a_73298_731489, object b_73299_731490, object c_73300_731491*/
static void __lambda_252(void *data, object clo, int argc, object *args) ;/*object self_733942, object r_732573*/
static void __lambda_247(void *data, object clo, int argc, object *args) ;/*object self_733943, object r_732568*/
static void __lambda_248(void *data, object clo, int argc, object *args) ;/*object self_733944, object r_732567*/
static void __lambda_233(void *data, object clo, int argc, object *args) ;/*closure _,object k_732549, object lis_73284_731477*/
static void __lambda_234(void *data, object clo, int argc, object *args) ;/*object self_733923, object lis_73286_731478*/
static void __lambda_235(void *data, object clo, int argc, object *args) ;/*object self_733924, object recur_73287_731479*/
static void __lambda_1147(void *data, object clo, int argc, object *args) ;/*object self_733925, object recur_73287_731479*/
static void __lambda_238(void *data, object clo, int argc, object *args) ;/*object self_733926, object k_732552, object lis_73288_731480*/
static void __lambda_239(void *data, object clo, int argc, object *args) ;/*object self_733927, object r_732553*/
static void __lambda_243(void *data, object clo, int argc, object *args) ;/*object self_733928, object k_732562*/
static void __lambda_240(void *data, object clo, int argc, object *args) ;/*object self_733929, object r_732555*/
static void __lambda_242(void *data, object clo, int argc, object *args) ;/*object self_733930, object k_732557, object a_73290_731482, object b_73291_731483*/
static void __lambda_241(void *data, object clo, int argc, object *args) ;/*object self_733931, object r_732556*/
static void __lambda_236(void *data, object clo, int argc, object *args) ;/*object self_733932, object r_732551*/
static void __lambda_237(void *data, object clo, int argc, object *args) ;/*object self_733933, object r_732550*/
static void __lambda_232(void *data, object clo, int argc, object *args) ;/*closure _,object k_732546, object lis_73283_731476*/
static void __lambda_225(void *data, object clo, int argc, object *args) ;/*closure _,object k_732537, object lis_73277_731471*/
static void __lambda_226(void *data, object clo, int argc, object *args) ;/*object self_733916, object r_732538*/
static void __lambda_227(void *data, object clo, int argc, object *args) ;/*object self_733917, object lis_73279_731472*/
static void __lambda_228(void *data, object clo, int argc, object *args) ;/*object self_733918, object lp_73280_731473*/
static void __lambda_1146(void *data, object clo, int argc, object *args) ;/*object self_733919, object lp_73280_731473*/
static void __lambda_231(void *data, object clo, int argc, object *args) ;/*object self_733920, object k_732541, object lis_73281_731474*/
static void __lambda_229(void *data, object clo, int argc, object *args) ;/*object self_733921, object r_732540*/
static void __lambda_230(void *data, object clo, int argc, object *args) ;/*object self_733922, object r_732539*/
static void __lambda_223(void *data, object clo, int argc, object *args) ;/*closure _,object k_732533, object lis_73276_731470*/
static void __lambda_224(void *data, object clo, int argc, object *args) ;/*object self_733915, object r_732534*/
static void __lambda_218(void *data, object clo, int argc, object *args) ;/*closure _,object k_732522, object x_73267_731466, object k_73268_731467*/
static void __lambda_219(void *data, object clo, int argc, object *args) ;/*object self_733911, object r_732523*/
static void __lambda_220(void *data, object clo, int argc, object *args) ;/*object self_733912, object prev_73271_731468*/
static void __lambda_221(void *data, object clo, int argc, object *args) ;/*object self_733913, object suffix_73274_731469*/
static void __lambda_222(void *data, object clo, int argc, object *args) ;/*object self_733914, object r_732528*/
static void __lambda_207(void *data, object clo, int argc, object *args) ;/*closure _,object k_732505, object x_73257_731457, object k_73258_731458*/
static void __lambda_208(void *data, object clo, int argc, object *args) ;/*object self_733900, object r_732506*/
static void __lambda_209(void *data, object clo, int argc, object *args) ;/*object self_733901, object lis_73260_731459, object k_73261_731460*/
static void __lambda_210(void *data, object clo, int argc, object *args) ;/*object self_733902, object recur_73262_731461*/
static void __lambda_1145(void *data, object clo, int argc, object *args) ;/*object self_733903, object recur_73262_731461*/
static void __lambda_213(void *data, object clo, int argc, object *args) ;/*object self_733904, object k_732509, object lis_73263_731462, object k_73264_731463*/
static void __lambda_217(void *data, object clo, int argc, object *args) ;/*object self_733905, object k_732517*/
static void __lambda_214(void *data, object clo, int argc, object *args) ;/*object self_733906, object r_732512*/
static void __lambda_216(void *data, object clo, int argc, object *args) ;/*object self_733907, object k_732514, object prefix_73265_731464, object suffix_73266_731465*/
static void __lambda_215(void *data, object clo, int argc, object *args) ;/*object self_733908, object r_732513*/
static void __lambda_211(void *data, object clo, int argc, object *args) ;/*object self_733909, object r_732508*/
static void __lambda_212(void *data, object clo, int argc, object *args) ;/*object self_733910, object r_732507*/
static void __lambda_197(void *data, object clo, int argc, object *args) ;/*closure _,object k_732490, object lis_73248_731449, object k_73249_731450*/
static void __lambda_198(void *data, object clo, int argc, object *args) ;/*object self_733890, object r_732491*/
static void __lambda_199(void *data, object clo, int argc, object *args) ;/*object self_733891, object lead_73250_731451*/
static void __lambda_200(void *data, object clo, int argc, object *args) ;/*object self_733892, object lag_73252_731452, object lead_73253_731453*/
static void __lambda_201(void *data, object clo, int argc, object *args) ;/*object self_733893, object lp_73254_731454*/
static void __lambda_1144(void *data, object clo, int argc, object *args) ;/*object self_733894, object lp_73254_731454*/
static void __lambda_204(void *data, object clo, int argc, object *args) ;/*object self_733895, object k_732497, object lag_73255_731455, object lead_73256_731456*/
static void __lambda_206(void *data, object clo, int argc, object *args) ;/*object self_733897, object r_732501*/
static void __lambda_205(void *data, object clo, int argc, object *args) ;/*object self_733896, object r_732499*/
static void __lambda_202(void *data, object clo, int argc, object *args) ;/*object self_733898, object r_732496*/
static void __lambda_203(void *data, object clo, int argc, object *args) ;/*object self_733899, object r_732495*/
static void __lambda_188(void *data, object clo, int argc, object *args) ;/*closure _,object k_732477, object lis_73240_731442, object k_73241_731443*/
static void __lambda_189(void *data, object clo, int argc, object *args) ;/*object self_733881, object r_732478*/
static void __lambda_190(void *data, object clo, int argc, object *args) ;/*object self_733882, object r_732479*/
static void __lambda_191(void *data, object clo, int argc, object *args) ;/*object self_733883, object lag_73243_731444, object lead_73244_731445*/
static void __lambda_192(void *data, object clo, int argc, object *args) ;/*object self_733884, object recur_73245_731446*/
static void __lambda_1143(void *data, object clo, int argc, object *args) ;/*object self_733885, object recur_73245_731446*/
static void __lambda_195(void *data, object clo, int argc, object *args) ;/*object self_733886, object k_732482, object lag_73246_731447, object lead_73247_731448*/
static void __lambda_196(void *data, object clo, int argc, object *args) ;/*object self_733887, object r_732485*/
static void __lambda_193(void *data, object clo, int argc, object *args) ;/*object self_733888, object r_732481*/
static void __lambda_194(void *data, object clo, int argc, object *args) ;/*object self_733889, object r_732480*/
static void __lambda_180(void *data, object clo, int argc, object *args) ;/*closure _,object k_732466, object lis_73232_731435, object k_73233_731436*/
static void __lambda_181(void *data, object clo, int argc, object *args) ;/*object self_733873, object r_732467*/
static void __lambda_182(void *data, object clo, int argc, object *args) ;/*object self_733874, object r_732468*/
static void __lambda_183(void *data, object clo, int argc, object *args) ;/*object self_733875, object lag_73235_731437, object lead_73236_731438*/
static void __lambda_184(void *data, object clo, int argc, object *args) ;/*object self_733876, object lp_73237_731439*/
static void __lambda_1142(void *data, object clo, int argc, object *args) ;/*object self_733877, object lp_73237_731439*/
static void __lambda_187(void *data, object clo, int argc, object *args) ;/*object self_733878, object k_732471, object lag_73238_731440, object lead_73239_731441*/
static void __lambda_185(void *data, object clo, int argc, object *args) ;/*object self_733879, object r_732470*/
static void __lambda_186(void *data, object clo, int argc, object *args) ;/*object self_733880, object r_732469*/
static void __lambda_176(void *data, object clo, int argc, object *args) ;/*closure _,object k_732457, object lis_73230_731433, object k_73231_731434*/
static void __lambda_177(void *data, object clo, int argc, object *args) ;/*object self_733870, object r_732458*/
static void __lambda_178(void *data, object clo, int argc, object *args) ;/*object self_733871, object r_732461*/
static void __lambda_179(void *data, object clo, int argc, object *args) ;/*object self_733872, object r_732460*/
static void __lambda_169(void *data, object clo, int argc, object *args) ;/*closure _,object k_732447, object lis_73222_731426, object k_73223_731427*/
static void __lambda_170(void *data, object clo, int argc, object *args) ;/*object self_733863, object r_732448*/
static void __lambda_171(void *data, object clo, int argc, object *args) ;/*object self_733864, object lis_73225_731428, object k_73226_731429*/
static void __lambda_172(void *data, object clo, int argc, object *args) ;/*object self_733865, object iter_73227_731430*/
static void __lambda_1141(void *data, object clo, int argc, object *args) ;/*object self_733866, object iter_73227_731430*/
static void __lambda_175(void *data, object clo, int argc, object *args) ;/*object self_733867, object k_732451, object lis_73228_731431, object k_73229_731432*/
static void __lambda_173(void *data, object clo, int argc, object *args) ;/*object self_733868, object r_732450*/
static void __lambda_174(void *data, object clo, int argc, object *args) ;/*object self_733869, object r_732449*/
static void __lambda_161(void *data, object clo, int argc, object *args) ;/*closure _,object k_732435, object lis_73214_731419, object k_73215_731420*/
static void __lambda_162(void *data, object clo, int argc, object *args) ;/*object self_733855, object r_732436*/
static void __lambda_163(void *data, object clo, int argc, object *args) ;/*object self_733856, object lis_73217_731421, object k_73218_731422*/
static void __lambda_164(void *data, object clo, int argc, object *args) ;/*object self_733857, object recur_73219_731423*/
static void __lambda_1140(void *data, object clo, int argc, object *args) ;/*object self_733858, object recur_73219_731423*/
static void __lambda_167(void *data, object clo, int argc, object *args) ;/*object self_733859, object k_732439, object lis_73220_731424, object k_73221_731425*/
static void __lambda_168(void *data, object clo, int argc, object *args) ;/*object self_733860, object r_732442*/
static void __lambda_165(void *data, object clo, int argc, object *args) ;/*object self_733861, object r_732438*/
static void __lambda_166(void *data, object clo, int argc, object *args) ;/*object self_733862, object r_732437*/
static void __lambda_160(void *data, object clo, int argc, object *args) ;/*closure _,object k_732430, object pair_73213_731418*/
static object __lambda_1218(void *data, object ptr,object x_73212_731417) ;
static void __lambda_159(void *data, object clo, int argc, object *args) ;/*closure _,object k_732425, object x_73212_731417*/
static object __lambda_1217(void *data, object ptr,object x_73211_731416) ;
static void __lambda_158(void *data, object clo, int argc, object *args) ;/*closure _,object k_732420, object x_73211_731416*/
static object __lambda_1216(void *data, object ptr,object x_73210_731415) ;
static void __lambda_157(void *data, object clo, int argc, object *args) ;/*closure _,object k_732416, object x_73210_731415*/
static object __lambda_1215(void *data, object ptr,object x_73209_731414) ;
static void __lambda_156(void *data, object clo, int argc, object *args) ;/*closure _,object k_732412, object x_73209_731414*/
static object __lambda_1214(void *data, object ptr,object x_73208_731413) ;
static void __lambda_155(void *data, object clo, int argc, object *args) ;/*closure _,object k_732408, object x_73208_731413*/
static object __lambda_1213(void *data, object ptr,object x_73207_731412) ;
static void __lambda_154(void *data, object clo, int argc, object *args) ;/*closure _,object k_732404, object x_73207_731412*/
static void __lambda_153(void *data, object clo, int argc, object *args) ;/*closure _,object k_732393, object list1_73205_731410, object more_91lists_73206_731411_raw, ...*/
static void __lambda_147(void *data, object clo, int argc, object *args) ;/*closure _,object k_732379, object x_73190_731397*/
static void __lambda_148(void *data, object clo, int argc, object *args) ;/*object self_733849, object x_73192_731398, object lag_73193_731399*/
static void __lambda_149(void *data, object clo, int argc, object *args) ;/*object self_733850, object lp_73195_731401*/
static void __lambda_1139(void *data, object clo, int argc, object *args) ;/*object self_733851, object lp_73195_731401*/
static void __lambda_152(void *data, object clo, int argc, object *args) ;/*object self_733852, object k_732382, object x_73196_731402, object lag_73197_731403, object len_73198_731404*/
static void __lambda_150(void *data, object clo, int argc, object *args) ;/*object self_733853, object r_732381*/
static void __lambda_151(void *data, object clo, int argc, object *args) ;/*object self_733854, object r_732380*/
static void __lambda_131(void *data, object clo, int argc, object *args) ;/*closure _,object k_732355, object _123_73163_731381, object lists_73164_731382_raw, ...*/
static void __lambda_132(void *data, object clo, int argc, object *args) ;/*object self_733832, object list_91a_73170_731384, object others_73171_731385*/
static void __lambda_133(void *data, object clo, int argc, object *args) ;/*object self_733833, object lp1_73172_731386*/
static void __lambda_1138(void *data, object clo, int argc, object *args) ;/*object self_733834, object lp1_73172_731386*/
static void __lambda_136(void *data, object clo, int argc, object *args) ;/*object self_733835, object k_732361, object list_91a_73173_731387, object others_73174_731388*/
static void __lambda_137(void *data, object clo, int argc, object *args) ;/*object self_733836, object r_732365*/
static void __lambda_138(void *data, object clo, int argc, object *args) ;/*object self_733837, object list_91a_73182_731392, object list_91b_73183_731393*/
static void __lambda_139(void *data, object clo, int argc, object *args) ;/*object self_733838, object lp2_73184_731394*/
static void __lambda_1137(void *data, object clo, int argc, object *args) ;/*object self_733839, object lp2_73184_731394*/
static void __lambda_142(void *data, object clo, int argc, object *args) ;/*object self_733840, object k_732368, object list_91a_73185_731395, object list_91b_73186_731396*/
static void __lambda_143(void *data, object clo, int argc, object *args) ;/*object self_733841, object r_732369*/
static void __lambda_145(void *data, object clo, int argc, object *args) ;/*object self_733843, object r_732371*/
static void __lambda_146(void *data, object clo, int argc, object *args) ;/*object self_733844, object r_732372*/
static void __lambda_144(void *data, object clo, int argc, object *args) ;/*object self_733842, object r_732370*/
static void __lambda_140(void *data, object clo, int argc, object *args) ;/*object self_733845, object r_732367*/
static void __lambda_141(void *data, object clo, int argc, object *args) ;/*object self_733846, object r_732366*/
static void __lambda_134(void *data, object clo, int argc, object *args) ;/*object self_733847, object r_732360*/
static void __lambda_135(void *data, object clo, int argc, object *args) ;/*object self_733848, object r_732359*/
static void __lambda_130(void *data, object clo, int argc, object *args) ;/*closure _,object k_732350, object l_73155_731380*/
static object __lambda_1212(void *data, object ptr,object x_73154_731379) ;
static void __lambda_129(void *data, object clo, int argc, object *args) ;/*closure _,object k_732346, object x_73154_731379*/
static void __lambda_123(void *data, object clo, int argc, object *args) ;/*closure _,object k_732334, object x_73138_731369*/
static void __lambda_124(void *data, object clo, int argc, object *args) ;/*object self_733826, object x_73140_731370, object lag_73141_731371*/
static void __lambda_125(void *data, object clo, int argc, object *args) ;/*object self_733827, object lp_73142_731372*/
static void __lambda_1136(void *data, object clo, int argc, object *args) ;/*object self_733828, object lp_73142_731372*/
static void __lambda_128(void *data, object clo, int argc, object *args) ;/*object self_733829, object k_732337, object x_73143_731373, object lag_73144_731374*/
static void __lambda_126(void *data, object clo, int argc, object *args) ;/*object self_733830, object r_732336*/
static void __lambda_127(void *data, object clo, int argc, object *args) ;/*object self_733831, object r_732335*/
static void __lambda_117(void *data, object clo, int argc, object *args) ;/*closure _,object k_732320, object x_73127_731360*/
static void __lambda_118(void *data, object clo, int argc, object *args) ;/*object self_733820, object x_73129_731361, object lag_73130_731362*/
static void __lambda_119(void *data, object clo, int argc, object *args) ;/*object self_733821, object lp_73131_731363*/
static void __lambda_1135(void *data, object clo, int argc, object *args) ;/*object self_733822, object lp_73131_731363*/
static void __lambda_122(void *data, object clo, int argc, object *args) ;/*object self_733823, object k_732323, object x_73132_731364, object lag_73133_731365*/
static void __lambda_120(void *data, object clo, int argc, object *args) ;/*object self_733824, object r_732322*/
static void __lambda_121(void *data, object clo, int argc, object *args) ;/*object self_733825, object r_732321*/
static void __lambda_111(void *data, object clo, int argc, object *args) ;/*closure _,object k_732308, object x_73116_731351*/
static void __lambda_112(void *data, object clo, int argc, object *args) ;/*object self_733814, object x_73118_731352, object lag_73119_731353*/
static void __lambda_113(void *data, object clo, int argc, object *args) ;/*object self_733815, object lp_73120_731354*/
static void __lambda_1134(void *data, object clo, int argc, object *args) ;/*object self_733816, object lp_73120_731354*/
static void __lambda_116(void *data, object clo, int argc, object *args) ;/*object self_733817, object k_732311, object x_73121_731355, object lag_73122_731356*/
static void __lambda_114(void *data, object clo, int argc, object *args) ;/*object self_733818, object r_732310*/
static void __lambda_115(void *data, object clo, int argc, object *args) ;/*object self_733819, object r_732309*/
static void __lambda_107(void *data, object clo, int argc, object *args) ;/*closure _,object k_732302, object val1_73113_731348, object vals_73114_731349_raw, ...*/
static void __lambda_108(void *data, object clo, int argc, object *args) ;/*object self_733811, object ans_73115_731350*/
static void __lambda_109(void *data, object clo, int argc, object *args) ;/*object self_733812, object r_732305*/
static void __lambda_110(void *data, object clo, int argc, object *args) ;/*object self_733813, object r_732304*/
static void __lambda_93(void *data, object clo, int argc, object *args) ;/*closure _,object k_732276, object count_73100_731339, object maybe_91start_87step_73101_731340_raw, ...*/
static void __lambda_94(void *data, object clo, int argc, object *args) ;/*object self_733795, object r_732277*/
static void __lambda_96(void *data, object clo, int argc, object *args) ;/*object self_733796, object r_732278*/
static void __lambda_97(void *data, object clo, int argc, object *args) ;/*object self_733797, object start_73102_731341, object step_73103_731342*/
static void __lambda_1133(void *data, object clo, int argc, object *args) ;/*object self_733798, object start_73102_731341*/
static void __lambda_1132(void *data, object clo, int argc, object *args) ;/*object self_733799, object step_73103_731342*/
static void __lambda_100(void *data, object clo, int argc, object *args) ;/*object self_733800, object r_732279*/
static void __lambda_101(void *data, object clo, int argc, object *args) ;/*object self_733801, object r_732280*/
static void __lambda_102(void *data, object clo, int argc, object *args) ;/*object self_733802, object r_732281*/
static void __lambda_103(void *data, object clo, int argc, object *args) ;/*object self_733803, object loop_73110_731345*/
static void __lambda_1131(void *data, object clo, int argc, object *args) ;/*object self_733804, object loop_73110_731345*/
static void __lambda_106(void *data, object clo, int argc, object *args) ;/*object self_733805, object k_732285, object n_73111_731346, object r_73112_731347*/
static void __lambda_104(void *data, object clo, int argc, object *args) ;/*object self_733806, object r_732284*/
static void __lambda_105(void *data, object clo, int argc, object *args) ;/*object self_733807, object r_732283*/
static void __lambda_98(void *data, object clo, int argc, object *args) ;/*object self_733808, object k_732291*/
static void __lambda_99(void *data, object clo, int argc, object *args) ;/*object self_733809, object r_732293*/
static void __lambda_95(void *data, object clo, int argc, object *args) ;/*object self_733810, object k_732298*/
static void __lambda_86(void *data, object clo, int argc, object *args) ;/*closure _,object k_732266, object lis_7395_731335*/
static void __lambda_87(void *data, object clo, int argc, object *args) ;/*object self_733788, object lis_7397_731336*/
static void __lambda_88(void *data, object clo, int argc, object *args) ;/*object self_733789, object recur_7398_731337*/
static void __lambda_1130(void *data, object clo, int argc, object *args) ;/*object self_733790, object recur_7398_731337*/
static void __lambda_91(void *data, object clo, int argc, object *args) ;/*object self_733791, object k_732269, object lis_7399_731338*/
static void __lambda_92(void *data, object clo, int argc, object *args) ;/*object self_733792, object r_732272*/
static void __lambda_89(void *data, object clo, int argc, object *args) ;/*object self_733793, object r_732268*/
static void __lambda_90(void *data, object clo, int argc, object *args) ;/*object self_733794, object r_732267*/
static void __lambda_79(void *data, object clo, int argc, object *args) ;/*closure _,object k_732256, object first_7387_731328, object rest_7388_731329_raw, ...*/
static void __lambda_80(void *data, object clo, int argc, object *args) ;/*object self_733781, object x_7390_731330, object rest_7391_731331*/
static void __lambda_81(void *data, object clo, int argc, object *args) ;/*object self_733782, object recur_7392_731332*/
static void __lambda_1129(void *data, object clo, int argc, object *args) ;/*object self_733783, object recur_7392_731332*/
static void __lambda_84(void *data, object clo, int argc, object *args) ;/*object self_733784, object k_732259, object x_7393_731333, object rest_7394_731334*/
static void __lambda_85(void *data, object clo, int argc, object *args) ;/*object self_733785, object r_732261*/
static void __lambda_82(void *data, object clo, int argc, object *args) ;/*object self_733786, object r_732258*/
static void __lambda_83(void *data, object clo, int argc, object *args) ;/*object self_733787, object r_732257*/
static void __lambda_68(void *data, object clo, int argc, object *args) ;/*closure _,object k_732239, object len_7375_731320, object proc_7376_731321*/
static void __lambda_78(void *data, object clo, int argc, object *args) ;/*object self_733770, object k_732252, object n_7377_731322*/
static void __lambda_69(void *data, object clo, int argc, object *args) ;/*object self_733771, object r_732251*/
static void __lambda_70(void *data, object clo, int argc, object *args) ;/*object self_733772, object r_732240*/
static void __lambda_71(void *data, object clo, int argc, object *args) ;/*object self_733773, object r_732241*/
static void __lambda_72(void *data, object clo, int argc, object *args) ;/*object self_733774, object i_7382_731323, object ans_7383_731324*/
static void __lambda_73(void *data, object clo, int argc, object *args) ;/*object self_733775, object lp_7379_7384_731325*/
static void __lambda_1128(void *data, object clo, int argc, object *args) ;/*object self_733776, object lp_7379_7384_731325*/
static void __lambda_76(void *data, object clo, int argc, object *args) ;/*object self_733777, object k_732246, object i_7385_731326, object ans_7386_731327*/
static void __lambda_77(void *data, object clo, int argc, object *args) ;/*object self_733778, object r_732250*/
static void __lambda_74(void *data, object clo, int argc, object *args) ;/*object self_733779, object r_732245*/
static void __lambda_75(void *data, object clo, int argc, object *args) ;/*object self_733780, object r_732244*/
static void __lambda_57(void *data, object clo, int argc, object *args) ;/*closure _,object k_732219, object len_7355_731311, object maybe_91elt_7356_731312_raw, ...*/
static void __lambda_67(void *data, object clo, int argc, object *args) ;/*object self_733759, object k_732235, object n_7357_731313*/
static void __lambda_58(void *data, object clo, int argc, object *args) ;/*object self_733760, object r_732234*/
static void __lambda_59(void *data, object clo, int argc, object *args) ;/*object self_733761, object r_732220*/
static void __lambda_61(void *data, object clo, int argc, object *args) ;/*object self_733762, object elt_7359_731314*/
static void __lambda_62(void *data, object clo, int argc, object *args) ;/*object self_733763, object i_7363_731315, object ans_7364_731316*/
static void __lambda_63(void *data, object clo, int argc, object *args) ;/*object self_733764, object lp_7360_7365_731317*/
static void __lambda_1127(void *data, object clo, int argc, object *args) ;/*object self_733765, object lp_7360_7365_731317*/
static void __lambda_66(void *data, object clo, int argc, object *args) ;/*object self_733766, object k_732225, object i_7366_731318, object ans_7367_731319*/
static void __lambda_64(void *data, object clo, int argc, object *args) ;/*object self_733767, object r_732224*/
static void __lambda_65(void *data, object clo, int argc, object *args) ;/*object self_733768, object r_732223*/
static void __lambda_60(void *data, object clo, int argc, object *args) ;/*object self_733769, object k_732229*/
static void __lambda_56(void *data, object clo, int argc, object *args) ;/*closure _,object k_732216, object d_7353_731309, object a_7354_731310*/
static void __lambda_9(void *data, object clo, int argc, object *args) ;/*closure _,object k_732108, object expr_7312_7325_7342_731298, object rename_7313_7326_7343_731299, object compare_7314_7327_7344_731300*/
static void __lambda_10(void *data, object clo, int argc, object *args) ;/*object self_733713, object v_931_7320_7332_7346_731302*/
static void __lambda_52(void *data, object clo, int argc, object *args) ;/*object self_733714, object tmp_7329_7331_7345_731301*/
static void __lambda_55(void *data, object clo, int argc, object *args) ;/*object self_733715, object r_732109*/
static void __lambda_53(void *data, object clo, int argc, object *args) ;/*object self_733716, object k_732111*/
static void __lambda_54(void *data, object clo, int argc, object *args) ;/*object self_733717, object r_732112*/
static void __lambda_11(void *data, object clo, int argc, object *args) ;/*object self_733718, object k_732114*/
static void __lambda_12(void *data, object clo, int argc, object *args) ;/*object self_733719, object r_732123*/
static void __lambda_13(void *data, object clo, int argc, object *args) ;/*object self_733720, object r_732207*/
static void __lambda_14(void *data, object clo, int argc, object *args) ;/*object self_733721, object r_732208*/
static void __lambda_15(void *data, object clo, int argc, object *args) ;/*object self_733722, object r_732204*/
static void __lambda_16(void *data, object clo, int argc, object *args) ;/*object self_733723, object r_732126*/
static void __lambda_17(void *data, object clo, int argc, object *args) ;/*object self_733724, object r_732132*/
static void __lambda_18(void *data, object clo, int argc, object *args) ;/*object self_733725, object r_732195*/
static void __lambda_19(void *data, object clo, int argc, object *args) ;/*object self_733726, object r_732198*/
static void __lambda_20(void *data, object clo, int argc, object *args) ;/*object self_733727, object r_732196*/
static void __lambda_21(void *data, object clo, int argc, object *args) ;/*object self_733728, object r_732190*/
static void __lambda_22(void *data, object clo, int argc, object *args) ;/*object self_733729, object r_732191*/
static void __lambda_23(void *data, object clo, int argc, object *args) ;/*object self_733730, object r_732135*/
static void __lambda_24(void *data, object clo, int argc, object *args) ;/*object self_733731, object r_732175*/
static void __lambda_25(void *data, object clo, int argc, object *args) ;/*object self_733732, object r_732181*/
static void __lambda_26(void *data, object clo, int argc, object *args) ;/*object self_733733, object r_732184*/
static void __lambda_27(void *data, object clo, int argc, object *args) ;/*object self_733734, object r_732182*/
static void __lambda_28(void *data, object clo, int argc, object *args) ;/*object self_733735, object r_732178*/
static void __lambda_29(void *data, object clo, int argc, object *args) ;/*object self_733736, object r_732176*/
static void __lambda_30(void *data, object clo, int argc, object *args) ;/*object self_733737, object r_732161*/
static void __lambda_31(void *data, object clo, int argc, object *args) ;/*object self_733738, object r_732167*/
static void __lambda_32(void *data, object clo, int argc, object *args) ;/*object self_733739, object r_732170*/
static void __lambda_33(void *data, object clo, int argc, object *args) ;/*object self_733740, object r_732168*/
static void __lambda_34(void *data, object clo, int argc, object *args) ;/*object self_733741, object r_732164*/
static void __lambda_35(void *data, object clo, int argc, object *args) ;/*object self_733742, object r_732162*/
static void __lambda_36(void *data, object clo, int argc, object *args) ;/*object self_733743, object r_732138*/
static void __lambda_37(void *data, object clo, int argc, object *args) ;/*object self_733744, object r_732144*/
static void __lambda_38(void *data, object clo, int argc, object *args) ;/*object self_733745, object r_732150*/
static void __lambda_39(void *data, object clo, int argc, object *args) ;/*object self_733746, object r_732155*/
static void __lambda_40(void *data, object clo, int argc, object *args) ;/*object self_733747, object r_732153*/
static void __lambda_41(void *data, object clo, int argc, object *args) ;/*object self_733748, object r_732151*/
static void __lambda_42(void *data, object clo, int argc, object *args) ;/*object self_733749, object r_732147*/
static void __lambda_43(void *data, object clo, int argc, object *args) ;/*object self_733750, object r_732145*/
static void __lambda_44(void *data, object clo, int argc, object *args) ;/*object self_733751, object r_732141*/
static void __lambda_45(void *data, object clo, int argc, object *args) ;/*object self_733752, object r_732139*/
static void __lambda_46(void *data, object clo, int argc, object *args) ;/*object self_733753, object r_732136*/
static void __lambda_47(void *data, object clo, int argc, object *args) ;/*object self_733754, object r_732133*/
static void __lambda_48(void *data, object clo, int argc, object *args) ;/*object self_733755, object r_732129*/
static void __lambda_49(void *data, object clo, int argc, object *args) ;/*object self_733756, object r_732127*/
static void __lambda_50(void *data, object clo, int argc, object *args) ;/*object self_733757, object r_732124*/
static void __lambda_51(void *data, object clo, int argc, object *args) ;/*object self_733758, object r_732122*/
static void __lambda_1(void *data, object clo, int argc, object *args) ;/*closure _,object k_732100, object pred_731_731292, object val_732_731293, object caller_733_731294*/
static void __lambda_2(void *data, object clo, int argc, object *args) ;/*object self_733705, object val_735_731295*/
static void __lambda_3(void *data, object clo, int argc, object *args) ;/*object self_733706, object lp_736_731296*/
static void __lambda_1126(void *data, object clo, int argc, object *args) ;/*object self_733707, object lp_736_731296*/
static void __lambda_6(void *data, object clo, int argc, object *args) ;/*object self_733708, object k_732103, object val_737_731297*/
static void __lambda_7(void *data, object clo, int argc, object *args) ;/*object self_733709, object r_732104*/
static void __lambda_8(void *data, object clo, int argc, object *args) ;/*object self_733710, object r_732105*/
static void __lambda_4(void *data, object clo, int argc, object *args) ;/*object self_733711, object r_732102*/
static void __lambda_5(void *data, object clo, int argc, object *args) ;/*object self_733712, object r_732101*/

static void __lambda_1121(void *data, object _, int argc, object *args) /* closure _,object k_733699 */
 {
object k_733699 = args[0];
  Cyc_st_add(data, "srfi/1.sld:lib-init:srfi1");

closureN_type c_7312487;
object e_7312511 [1];
c_7312487.hdr.mark = gc_color_red;
 c_7312487.hdr.grayed = 0;
c_7312487.tag = closureN_tag;
 c_7312487.fn = (function_type)__lambda_1122;
c_7312487.num_args = 1;
c_7312487.num_elements = 1;
c_7312487.elements = (object *)e_7312511;
c_7312487.elements[0] = k_733699;


object c_7312514 = global_set_cps_id(data,(closure)&c_7312487,"__glo_first_srfi_1", __glo_first_srfi_1, primitive_car);
return_closcall1(data,(closure)&c_7312487,  c_7312514);; 
}

static void __lambda_1122(void *data, object self_734805, int argc, object *args) /* object self_734805, object r_733701 */
 {

  
closureN_type c_7312489;
object e_7312507 [1];
c_7312489.hdr.mark = gc_color_red;
 c_7312489.hdr.grayed = 0;
c_7312489.tag = closureN_tag;
 c_7312489.fn = (function_type)__lambda_1123;
c_7312489.num_args = 1;
c_7312489.num_elements = 1;
c_7312489.elements = (object *)e_7312507;
c_7312489.elements[0] = ((closureN)self_734805)->elements[0];


object c_7312510 = global_set_cps_id(data,(closure)&c_7312489,"__glo_second_srfi_1", __glo_second_srfi_1, primitive_cadr);
return_closcall1(data,(closure)&c_7312489,  c_7312510);; 
}

static void __lambda_1123(void *data, object self_734806, int argc, object *args) /* object self_734806, object r_733702 */
 {

  
closureN_type c_7312491;
object e_7312503 [1];
c_7312491.hdr.mark = gc_color_red;
 c_7312491.hdr.grayed = 0;
c_7312491.tag = closureN_tag;
 c_7312491.fn = (function_type)__lambda_1124;
c_7312491.num_args = 1;
c_7312491.num_elements = 1;
c_7312491.elements = (object *)e_7312503;
c_7312491.elements[0] = ((closureN)self_734806)->elements[0];


object c_7312506 = global_set_cps_id(data,(closure)&c_7312491,"__glo_third_srfi_1", __glo_third_srfi_1, primitive_caddr);
return_closcall1(data,(closure)&c_7312491,  c_7312506);; 
}

static void __lambda_1124(void *data, object self_734807, int argc, object *args) /* object self_734807, object r_733703 */
 {

  
closureN_type c_7312493;
object e_7312499 [1];
c_7312493.hdr.mark = gc_color_red;
 c_7312493.hdr.grayed = 0;
c_7312493.tag = closureN_tag;
 c_7312493.fn = (function_type)__lambda_1125;
c_7312493.num_args = 1;
c_7312493.num_elements = 1;
c_7312493.elements = (object *)e_7312499;
c_7312493.elements[0] = ((closureN)self_734807)->elements[0];


object c_7312502 = global_set_cps_id(data,(closure)&c_7312493,"__glo_fourth_srfi_1", __glo_fourth_srfi_1, primitive_cadddr);
return_closcall1(data,(closure)&c_7312493,  c_7312502);; 
}

static void __lambda_1125(void *data, object self_734808, int argc, object *args) /* object self_734808, object r_733704 */
 {

  
object c_7312498 = global_set_cps_id(data,  ((closureN)self_734808)->elements[0],"__glo_map_srfi_1", __glo_map_srfi_1, __glo_map_91in_91order_srfi_1);
return_direct_with_clo1(data,  ((closureN)self_734808)->elements[0], (((closure)  ((closureN)self_734808)->elements[0])->fn),  c_7312498);; 
}

static void __lambda_1112(void *data, object _, int argc, object *args) /* closure _,object k_733686, object _123_731280_732093, object lis1_731281_732094, object lists_731282_732095_raw, ... */
 {
object k_733686 = args[0]; object _123_731280_732093 = args[1]; object lis1_731281_732094 = args[2];
load_varargs(lists_731282_732095, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/1.sld:lset-diff+intersection!");

closureN_type c_7312441;
object e_7312484 [4];
c_7312441.hdr.mark = gc_color_red;
 c_7312441.hdr.grayed = 0;
c_7312441.tag = closureN_tag;
 c_7312441.fn = (function_type)__lambda_1113;
c_7312441.num_args = 1;
c_7312441.num_elements = 4;
c_7312441.elements = (object *)e_7312484;
c_7312441.elements[0] = _123_731280_732093;
c_7312441.elements[1] = k_733686;
c_7312441.elements[2] = lis1_731281_732094;
c_7312441.elements[3] = lists_731282_732095;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7312441, primitive_procedure_127, _123_731280_732093, __glo_lset_91diff_87intersection_67_srfi_1);; 
}

static void __lambda_1113(void *data, object self_734797, int argc, object *args) /* object self_734797, object r_733687 */
 {

  
closureN_type c_7312443;
object e_7312482 [4];
c_7312443.hdr.mark = gc_color_red;
 c_7312443.hdr.grayed = 0;
c_7312443.tag = closureN_tag;
 c_7312443.fn = (function_type)__lambda_1114;
c_7312443.num_args = 1;
c_7312443.num_elements = 4;
c_7312443.elements = (object *)e_7312482;
c_7312443.elements[0] = ((closureN)self_734797)->elements[0];
c_7312443.elements[1] = ((closureN)self_734797)->elements[1];
c_7312443.elements[2] = ((closureN)self_734797)->elements[2];
c_7312443.elements[3] = ((closureN)self_734797)->elements[3];

return_direct_with_clo3(data,  __glo_every_srfi_1, (((closure)  __glo_every_srfi_1)->fn),  &c_7312443, __glo_null_91list_127_srfi_1, ((closureN)self_734797)->elements[3]);; 
}

static void __lambda_1114(void *data, object self_734798, int argc, object *args) /* object self_734798, object r_733688 */
 {
 object r_733688 = args[0];
  if( (boolean_f != r_733688) ){ 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734798)->elements[1], ((closureN)self_734798)->elements[2], NULL);
} else { 
  
closureN_type c_7312448;
object e_7312477 [4];
c_7312448.hdr.mark = gc_color_red;
 c_7312448.hdr.grayed = 0;
c_7312448.tag = closureN_tag;
 c_7312448.fn = (function_type)__lambda_1115;
c_7312448.num_args = 1;
c_7312448.num_elements = 4;
c_7312448.elements = (object *)e_7312477;
c_7312448.elements[0] = ((closureN)self_734798)->elements[0];
c_7312448.elements[1] = ((closureN)self_734798)->elements[1];
c_7312448.elements[2] = ((closureN)self_734798)->elements[2];
c_7312448.elements[3] = ((closureN)self_734798)->elements[3];



return_direct_with_clo1(data,(closure)&c_7312448,__lambda_1115,  memqp(data, ((closureN)self_734798)->elements[2], ((closureN)self_734798)->elements[3]));}
;; 
}

static void __lambda_1115(void *data, object self_734799, int argc, object *args) /* object self_734799, object r_733690 */
 {
 object r_733690 = args[0];
  if( (boolean_f != r_733690) ){ 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734799)->elements[1], NULL, ((closureN)self_734799)->elements[2]);
} else { 
  
closureN_type c_7312453;
object e_7312457 [2];
c_7312453.hdr.mark = gc_color_red;
 c_7312453.hdr.grayed = 0;
c_7312453.tag = closureN_tag;
 c_7312453.fn = (function_type)__lambda_1116;
c_7312453.num_args = 1;
c_7312453.num_elements = 2;
c_7312453.elements = (object *)e_7312457;
c_7312453.elements[0] = ((closureN)self_734799)->elements[1];
c_7312453.elements[1] = ((closureN)self_734799)->elements[2];


closureN_type c_7312458;
object e_7312476 [2];
c_7312458.hdr.mark = gc_color_red;
 c_7312458.hdr.grayed = 0;
c_7312458.tag = closureN_tag;
 c_7312458.fn = (function_type)__lambda_1117;
c_7312458.num_args = 1;
c_7312458.num_elements = 2;
c_7312458.elements = (object *)e_7312476;
c_7312458.elements[0] = ((closureN)self_734799)->elements[0];
c_7312458.elements[1] = ((closureN)self_734799)->elements[3];

return_direct_with_clo1(data,(closure)&c_7312453,__lambda_1116,  &c_7312458);}
;; 
}

static void __lambda_1117(void *data, object self_734800, int argc, object *args) /* object self_734800, object k_733693, object elt_731290_732096 */
 {
 object k_733693 = args[0]; object elt_731290_732096 = args[1];
  
closureN_type c_7312460;
object e_7312470 [2];
c_7312460.hdr.mark = gc_color_red;
 c_7312460.hdr.grayed = 0;
c_7312460.tag = closureN_tag;
 c_7312460.fn = (function_type)__lambda_1118;
c_7312460.num_args = 1;
c_7312460.num_elements = 2;
c_7312460.elements = (object *)e_7312470;
c_7312460.elements[0] = k_733693;
c_7312460.elements[1] = ((closureN)self_734800)->elements[1];


closureN_type c_7312471;
object e_7312475 [2];
c_7312471.hdr.mark = gc_color_red;
 c_7312471.hdr.grayed = 0;
c_7312471.tag = closureN_tag;
 c_7312471.fn = (function_type)__lambda_1120;
c_7312471.num_args = 1;
c_7312471.num_elements = 2;
c_7312471.elements = (object *)e_7312475;
c_7312471.elements[0] = ((closureN)self_734800)->elements[0];
c_7312471.elements[1] = elt_731290_732096;

return_direct_with_clo1(data,(closure)&c_7312460,__lambda_1118,  &c_7312471);; 
}

static void __lambda_1120(void *data, object self_734801, int argc, object *args) /* object self_734801, object k_733696, object lis_731291_732097 */
 {
 object k_733696 = args[0]; object lis_731291_732097 = args[1];
  return_direct_with_clo4(data,  __glo_member_scheme_base, (((closure)  __glo_member_scheme_base)->fn),  k_733696, ((closureN)self_734801)->elements[1], lis_731291_732097, ((closureN)self_734801)->elements[0]);; 
}

static void __lambda_1118(void *data, object self_734802, int argc, object *args) /* object self_734802, object r_733695 */
 {
 object r_733695 = args[0];
  
closureN_type c_7312462;
object e_7312468 [1];
c_7312462.hdr.mark = gc_color_red;
 c_7312462.hdr.grayed = 0;
c_7312462.tag = closureN_tag;
 c_7312462.fn = (function_type)__lambda_1119;
c_7312462.num_args = 1;
c_7312462.num_elements = 1;
c_7312462.elements = (object *)e_7312468;
c_7312462.elements[0] = ((closureN)self_734802)->elements[0];

return_direct_with_clo3(data,  __glo_any_srfi_1, (((closure)  __glo_any_srfi_1)->fn),  &c_7312462, r_733695, ((closureN)self_734802)->elements[1]);; 
}

static void __lambda_1119(void *data, object self_734803, int argc, object *args) /* object self_734803, object r_733694 */
 {
 object r_733694 = args[0];
  
complex_num_type local_7312467; 
return_direct_with_clo1(data,  ((closureN)self_734803)->elements[0], (((closure)  ((closureN)self_734803)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7312467, r_733694));; 
}

static void __lambda_1116(void *data, object self_734804, int argc, object *args) /* object self_734804, object r_733692 */
 {
 object r_733692 = args[0];
  return_direct_with_clo3(data,  __glo_partition_67_srfi_1, (((closure)  __glo_partition_67_srfi_1)->fn),  ((closureN)self_734804)->elements[0], r_733692, ((closureN)self_734804)->elements[1]);; 
}

static void __lambda_1103(void *data, object _, int argc, object *args) /* closure _,object k_733673, object _123_731268_732088, object lis1_731269_732089, object lists_731270_732090_raw, ... */
 {
object k_733673 = args[0]; object _123_731268_732088 = args[1]; object lis1_731269_732089 = args[2];
load_varargs(lists_731270_732090, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/1.sld:lset-diff+intersection");

closureN_type c_7312395;
object e_7312438 [4];
c_7312395.hdr.mark = gc_color_red;
 c_7312395.hdr.grayed = 0;
c_7312395.tag = closureN_tag;
 c_7312395.fn = (function_type)__lambda_1104;
c_7312395.num_args = 1;
c_7312395.num_elements = 4;
c_7312395.elements = (object *)e_7312438;
c_7312395.elements[0] = _123_731268_732088;
c_7312395.elements[1] = k_733673;
c_7312395.elements[2] = lis1_731269_732089;
c_7312395.elements[3] = lists_731270_732090;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7312395, primitive_procedure_127, _123_731268_732088, __glo_lset_91diff_87intersection_srfi_1);; 
}

static void __lambda_1104(void *data, object self_734789, int argc, object *args) /* object self_734789, object r_733674 */
 {

  
closureN_type c_7312397;
object e_7312436 [4];
c_7312397.hdr.mark = gc_color_red;
 c_7312397.hdr.grayed = 0;
c_7312397.tag = closureN_tag;
 c_7312397.fn = (function_type)__lambda_1105;
c_7312397.num_args = 1;
c_7312397.num_elements = 4;
c_7312397.elements = (object *)e_7312436;
c_7312397.elements[0] = ((closureN)self_734789)->elements[0];
c_7312397.elements[1] = ((closureN)self_734789)->elements[1];
c_7312397.elements[2] = ((closureN)self_734789)->elements[2];
c_7312397.elements[3] = ((closureN)self_734789)->elements[3];

return_direct_with_clo3(data,  __glo_every_srfi_1, (((closure)  __glo_every_srfi_1)->fn),  &c_7312397, __glo_null_91list_127_srfi_1, ((closureN)self_734789)->elements[3]);; 
}

static void __lambda_1105(void *data, object self_734790, int argc, object *args) /* object self_734790, object r_733675 */
 {
 object r_733675 = args[0];
  if( (boolean_f != r_733675) ){ 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734790)->elements[1], ((closureN)self_734790)->elements[2], NULL);
} else { 
  
closureN_type c_7312402;
object e_7312431 [4];
c_7312402.hdr.mark = gc_color_red;
 c_7312402.hdr.grayed = 0;
c_7312402.tag = closureN_tag;
 c_7312402.fn = (function_type)__lambda_1106;
c_7312402.num_args = 1;
c_7312402.num_elements = 4;
c_7312402.elements = (object *)e_7312431;
c_7312402.elements[0] = ((closureN)self_734790)->elements[0];
c_7312402.elements[1] = ((closureN)self_734790)->elements[1];
c_7312402.elements[2] = ((closureN)self_734790)->elements[2];
c_7312402.elements[3] = ((closureN)self_734790)->elements[3];



return_direct_with_clo1(data,(closure)&c_7312402,__lambda_1106,  memqp(data, ((closureN)self_734790)->elements[2], ((closureN)self_734790)->elements[3]));}
;; 
}

static void __lambda_1106(void *data, object self_734791, int argc, object *args) /* object self_734791, object r_733677 */
 {
 object r_733677 = args[0];
  if( (boolean_f != r_733677) ){ 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734791)->elements[1], NULL, ((closureN)self_734791)->elements[2]);
} else { 
  
closureN_type c_7312407;
object e_7312411 [2];
c_7312407.hdr.mark = gc_color_red;
 c_7312407.hdr.grayed = 0;
c_7312407.tag = closureN_tag;
 c_7312407.fn = (function_type)__lambda_1107;
c_7312407.num_args = 1;
c_7312407.num_elements = 2;
c_7312407.elements = (object *)e_7312411;
c_7312407.elements[0] = ((closureN)self_734791)->elements[1];
c_7312407.elements[1] = ((closureN)self_734791)->elements[2];


closureN_type c_7312412;
object e_7312430 [2];
c_7312412.hdr.mark = gc_color_red;
 c_7312412.hdr.grayed = 0;
c_7312412.tag = closureN_tag;
 c_7312412.fn = (function_type)__lambda_1108;
c_7312412.num_args = 1;
c_7312412.num_elements = 2;
c_7312412.elements = (object *)e_7312430;
c_7312412.elements[0] = ((closureN)self_734791)->elements[0];
c_7312412.elements[1] = ((closureN)self_734791)->elements[3];

return_direct_with_clo1(data,(closure)&c_7312407,__lambda_1107,  &c_7312412);}
;; 
}

static void __lambda_1108(void *data, object self_734792, int argc, object *args) /* object self_734792, object k_733680, object elt_731278_732091 */
 {
 object k_733680 = args[0]; object elt_731278_732091 = args[1];
  
closureN_type c_7312414;
object e_7312424 [2];
c_7312414.hdr.mark = gc_color_red;
 c_7312414.hdr.grayed = 0;
c_7312414.tag = closureN_tag;
 c_7312414.fn = (function_type)__lambda_1109;
c_7312414.num_args = 1;
c_7312414.num_elements = 2;
c_7312414.elements = (object *)e_7312424;
c_7312414.elements[0] = k_733680;
c_7312414.elements[1] = ((closureN)self_734792)->elements[1];


closureN_type c_7312425;
object e_7312429 [2];
c_7312425.hdr.mark = gc_color_red;
 c_7312425.hdr.grayed = 0;
c_7312425.tag = closureN_tag;
 c_7312425.fn = (function_type)__lambda_1111;
c_7312425.num_args = 1;
c_7312425.num_elements = 2;
c_7312425.elements = (object *)e_7312429;
c_7312425.elements[0] = ((closureN)self_734792)->elements[0];
c_7312425.elements[1] = elt_731278_732091;

return_direct_with_clo1(data,(closure)&c_7312414,__lambda_1109,  &c_7312425);; 
}

static void __lambda_1111(void *data, object self_734793, int argc, object *args) /* object self_734793, object k_733683, object lis_731279_732092 */
 {
 object k_733683 = args[0]; object lis_731279_732092 = args[1];
  return_direct_with_clo4(data,  __glo_member_scheme_base, (((closure)  __glo_member_scheme_base)->fn),  k_733683, ((closureN)self_734793)->elements[1], lis_731279_732092, ((closureN)self_734793)->elements[0]);; 
}

static void __lambda_1109(void *data, object self_734794, int argc, object *args) /* object self_734794, object r_733682 */
 {
 object r_733682 = args[0];
  
closureN_type c_7312416;
object e_7312422 [1];
c_7312416.hdr.mark = gc_color_red;
 c_7312416.hdr.grayed = 0;
c_7312416.tag = closureN_tag;
 c_7312416.fn = (function_type)__lambda_1110;
c_7312416.num_args = 1;
c_7312416.num_elements = 1;
c_7312416.elements = (object *)e_7312422;
c_7312416.elements[0] = ((closureN)self_734794)->elements[0];

return_direct_with_clo3(data,  __glo_any_srfi_1, (((closure)  __glo_any_srfi_1)->fn),  &c_7312416, r_733682, ((closureN)self_734794)->elements[1]);; 
}

static void __lambda_1110(void *data, object self_734795, int argc, object *args) /* object self_734795, object r_733681 */
 {
 object r_733681 = args[0];
  
complex_num_type local_7312421; 
return_direct_with_clo1(data,  ((closureN)self_734795)->elements[0], (((closure)  ((closureN)self_734795)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7312421, r_733681));; 
}

static void __lambda_1107(void *data, object self_734796, int argc, object *args) /* object self_734796, object r_733679 */
 {
 object r_733679 = args[0];
  return_direct_with_clo3(data,  __glo_partition_srfi_1, (((closure)  __glo_partition_srfi_1)->fn),  ((closureN)self_734796)->elements[0], r_733679, ((closureN)self_734796)->elements[1]);; 
}

static void __lambda_1090(void *data, object _, int argc, object *args) /* closure _,object k_733655, object _123_731253_732080, object lists_731254_732081_raw, ... */
 {
object k_733655 = args[0]; object _123_731253_732080 = args[1];
load_varargs(lists_731254_732081, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/1.sld:lset-xor!");

closureN_type c_7312322;
object e_7312392 [3];
c_7312322.hdr.mark = gc_color_red;
 c_7312322.hdr.grayed = 0;
c_7312322.tag = closureN_tag;
 c_7312322.fn = (function_type)__lambda_1091;
c_7312322.num_args = 1;
c_7312322.num_elements = 3;
c_7312322.elements = (object *)e_7312392;
c_7312322.elements[0] = _123_731253_732080;
c_7312322.elements[1] = k_733655;
c_7312322.elements[2] = lists_731254_732081;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7312322, primitive_procedure_127, _123_731253_732080, __glo_lset_91xor_67_srfi_1);; 
}

static void __lambda_1091(void *data, object self_734777, int argc, object *args) /* object self_734777, object r_733656 */
 {

  
closureN_type c_7312324;
object e_7312328 [2];
c_7312324.hdr.mark = gc_color_red;
 c_7312324.hdr.grayed = 0;
c_7312324.tag = closureN_tag;
 c_7312324.fn = (function_type)__lambda_1092;
c_7312324.num_args = 1;
c_7312324.num_elements = 2;
c_7312324.elements = (object *)e_7312328;
c_7312324.elements[0] = ((closureN)self_734777)->elements[1];
c_7312324.elements[1] = ((closureN)self_734777)->elements[2];


closureN_type c_7312329;
object e_7312391 [1];
c_7312329.hdr.mark = gc_color_red;
 c_7312329.hdr.grayed = 0;
c_7312329.tag = closureN_tag;
 c_7312329.fn = (function_type)__lambda_1093;
c_7312329.num_args = 2;
c_7312329.num_elements = 1;
c_7312329.elements = (object *)e_7312391;
c_7312329.elements[0] = ((closureN)self_734777)->elements[0];

return_direct_with_clo1(data,(closure)&c_7312324,__lambda_1092,  &c_7312329);; 
}

static void __lambda_1093(void *data, object self_734778, int argc, object *args) /* object self_734778, object k_733659, object b_731255_732082, object a_731256_732083 */
 {
 object k_733659 = args[0]; object b_731255_732082 = args[1]; object a_731256_732083 = args[2];
  
closureN_type c_7312331;
object e_7312384 [4];
c_7312331.hdr.mark = gc_color_red;
 c_7312331.hdr.grayed = 0;
c_7312331.tag = closureN_tag;
 c_7312331.fn = (function_type)__lambda_1094;
c_7312331.num_args = 1;
c_7312331.num_elements = 4;
c_7312331.elements = (object *)e_7312384;
c_7312331.elements[0] = ((closureN)self_734778)->elements[0];
c_7312331.elements[1] = a_731256_732083;
c_7312331.elements[2] = b_731255_732082;
c_7312331.elements[3] = k_733659;


closureN_type c_7312385;
object e_7312390 [3];
c_7312385.hdr.mark = gc_color_red;
 c_7312385.hdr.grayed = 0;
c_7312385.tag = closureN_tag;
 c_7312385.fn = (function_type)__lambda_1102;
c_7312385.num_args = 0;
c_7312385.num_elements = 3;
c_7312385.elements = (object *)e_7312390;
c_7312385.elements[0] = ((closureN)self_734778)->elements[0];
c_7312385.elements[1] = a_731256_732083;
c_7312385.elements[2] = b_731255_732082;

return_direct_with_clo1(data,(closure)&c_7312331,__lambda_1094,  &c_7312385);; 
}

static void __lambda_1102(void *data, object self_734779, int argc, object *args) /* object self_734779, object k_733670 */
 {
 object k_733670 = args[0];
  return_direct_with_clo4(data,  __glo_lset_91diff_87intersection_67_srfi_1, (((closure)  __glo_lset_91diff_87intersection_67_srfi_1)->fn),  k_733670, ((closureN)self_734779)->elements[0], ((closureN)self_734779)->elements[1], ((closureN)self_734779)->elements[2]);; 
}

static void __lambda_1094(void *data, object self_734780, int argc, object *args) /* object self_734780, object r_733660 */
 {
 object r_733660 = args[0];
  
closureN_type c_7312333;
object e_7312337 [2];
c_7312333.hdr.mark = gc_color_red;
 c_7312333.hdr.grayed = 0;
c_7312333.tag = closureN_tag;
 c_7312333.fn = (function_type)__lambda_1095;
c_7312333.num_args = 1;
c_7312333.num_elements = 2;
c_7312333.elements = (object *)e_7312337;
c_7312333.elements[0] = ((closureN)self_734780)->elements[3];
c_7312333.elements[1] = r_733660;


closureN_type c_7312338;
object e_7312383 [3];
c_7312338.hdr.mark = gc_color_red;
 c_7312338.hdr.grayed = 0;
c_7312338.tag = closureN_tag;
 c_7312338.fn = (function_type)__lambda_1096;
c_7312338.num_args = 2;
c_7312338.num_elements = 3;
c_7312338.elements = (object *)e_7312383;
c_7312338.elements[0] = ((closureN)self_734780)->elements[0];
c_7312338.elements[1] = ((closureN)self_734780)->elements[1];
c_7312338.elements[2] = ((closureN)self_734780)->elements[2];

return_direct_with_clo1(data,(closure)&c_7312333,__lambda_1095,  &c_7312338);; 
}

static void __lambda_1096(void *data, object self_734781, int argc, object *args) /* object self_734781, object k_733662, object a_91b_731257_732084, object a_91int_91b_731258_732085 */
 {
 object k_733662 = args[0]; object a_91b_731257_732084 = args[1]; object a_91int_91b_731258_732085 = args[2];
    
if( (boolean_f != Cyc_is_null(a_91b_731257_732084)) ){ 
  return_direct_with_clo4(data,  __glo_lset_91difference_67_srfi_1, (((closure)  __glo_lset_91difference_67_srfi_1)->fn),  k_733662, ((closureN)self_734781)->elements[0], ((closureN)self_734781)->elements[2], ((closureN)self_734781)->elements[1]);
} else { 
    
if( (boolean_f != Cyc_is_null(a_91int_91b_731258_732085)) ){ 
  return_direct_with_clo3(data,  __glo_append_67_srfi_1, (((closure)  __glo_append_67_srfi_1)->fn),  k_733662, ((closureN)self_734781)->elements[2], ((closureN)self_734781)->elements[1]);
} else { 
  
closureN_type c_7312351;
object e_7312356 [3];
c_7312351.hdr.mark = gc_color_red;
 c_7312351.hdr.grayed = 0;
c_7312351.tag = closureN_tag;
 c_7312351.fn = (function_type)__lambda_1097;
c_7312351.num_args = 1;
c_7312351.num_elements = 3;
c_7312351.elements = (object *)e_7312356;
c_7312351.elements[0] = a_91b_731257_732084;
c_7312351.elements[1] = ((closureN)self_734781)->elements[2];
c_7312351.elements[2] = k_733662;


closureN_type c_7312357;
object e_7312382 [2];
c_7312357.hdr.mark = gc_color_red;
 c_7312357.hdr.grayed = 0;
c_7312357.tag = closureN_tag;
 c_7312357.fn = (function_type)__lambda_1098;
c_7312357.num_args = 2;
c_7312357.num_elements = 2;
c_7312357.elements = (object *)e_7312382;
c_7312357.elements[0] = ((closureN)self_734781)->elements[0];
c_7312357.elements[1] = a_91int_91b_731258_732085;

return_direct_with_clo1(data,(closure)&c_7312351,__lambda_1097,  &c_7312357);}
;}
;; 
}

static void __lambda_1098(void *data, object self_734782, int argc, object *args) /* object self_734782, object k_733666, object b_91pair_731266_732086, object ans_731267_732087 */
 {
 object k_733666 = args[0]; object b_91pair_731266_732086 = args[1]; object ans_731267_732087 = args[2];
  
closureN_type c_7312359;
object e_7312379 [5];
c_7312359.hdr.mark = gc_color_red;
 c_7312359.hdr.grayed = 0;
c_7312359.tag = closureN_tag;
 c_7312359.fn = (function_type)__lambda_1099;
c_7312359.num_args = 1;
c_7312359.num_elements = 5;
c_7312359.elements = (object *)e_7312379;
c_7312359.elements[0] = ((closureN)self_734782)->elements[0];
c_7312359.elements[1] = ((closureN)self_734782)->elements[1];
c_7312359.elements[2] = ans_731267_732087;
c_7312359.elements[3] = b_91pair_731266_732086;
c_7312359.elements[4] = k_733666;



return_direct_with_clo1(data,(closure)&c_7312359,__lambda_1099,  Cyc_car(data, b_91pair_731266_732086));; 
}

static void __lambda_1099(void *data, object self_734783, int argc, object *args) /* object self_734783, object r_733669 */
 {
 object r_733669 = args[0];
  
closureN_type c_7312361;
object e_7312376 [3];
c_7312361.hdr.mark = gc_color_red;
 c_7312361.hdr.grayed = 0;
c_7312361.tag = closureN_tag;
 c_7312361.fn = (function_type)__lambda_1100;
c_7312361.num_args = 1;
c_7312361.num_elements = 3;
c_7312361.elements = (object *)e_7312376;
c_7312361.elements[0] = ((closureN)self_734783)->elements[2];
c_7312361.elements[1] = ((closureN)self_734783)->elements[3];
c_7312361.elements[2] = ((closureN)self_734783)->elements[4];

return_direct_with_clo4(data,  __glo_member_scheme_base, (((closure)  __glo_member_scheme_base)->fn),  &c_7312361, r_733669, ((closureN)self_734783)->elements[1], ((closureN)self_734783)->elements[0]);; 
}

static void __lambda_1100(void *data, object self_734784, int argc, object *args) /* object self_734784, object r_733667 */
 {
 object r_733667 = args[0];
  if( (boolean_f != r_733667) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734784)->elements[2], (((closure)  ((closureN)self_734784)->elements[2])->fn),  ((closureN)self_734784)->elements[0]);
} else { 
  
closureN_type c_7312366;
object e_7312370 [2];
c_7312366.hdr.mark = gc_color_red;
 c_7312366.hdr.grayed = 0;
c_7312366.tag = closureN_tag;
 c_7312366.fn = (function_type)__lambda_1101;
c_7312366.num_args = 1;
c_7312366.num_elements = 2;
c_7312366.elements = (object *)e_7312370;
c_7312366.elements[0] = ((closureN)self_734784)->elements[1];
c_7312366.elements[1] = ((closureN)self_734784)->elements[2];


object c_7312373 = Cyc_set_cdr_cps(data,(closure)&c_7312366,((closureN)self_734784)->elements[1], ((closureN)self_734784)->elements[0]);
return_closcall1(data,(closure)&c_7312366,  c_7312373);}
;; 
}

static void __lambda_1101(void *data, object self_734785, int argc, object *args) /* object self_734785, object r_733668 */
 {

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

static void __lambda_1097(void *data, object self_734786, int argc, object *args) /* object self_734786, object r_733665 */
 {
 object r_733665 = args[0];
  return_direct_with_clo4(data,  __glo_pair_91fold_srfi_1, (((closure)  __glo_pair_91fold_srfi_1)->fn),  ((closureN)self_734786)->elements[2], r_733665, ((closureN)self_734786)->elements[0], ((closureN)self_734786)->elements[1]);; 
}

static void __lambda_1095(void *data, object self_734787, int argc, object *args) /* object self_734787, object r_733661 */
 {
 object r_733661 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734787)->elements[0], ((closureN)self_734787)->elements[1], r_733661);; 
}

static void __lambda_1092(void *data, object self_734788, int argc, object *args) /* object self_734788, object r_733657 */
 {
 object r_733657 = args[0];
  return_direct_with_clo4(data,  __glo_reduce_srfi_1, (((closure)  __glo_reduce_srfi_1)->fn),  ((closureN)self_734788)->elements[0], r_733657, NULL, ((closureN)self_734788)->elements[1]);; 
}

static void __lambda_1079(void *data, object _, int argc, object *args) /* closure _,object k_733639, object _123_731238_732072, object lists_731239_732073_raw, ... */
 {
object k_733639 = args[0]; object _123_731238_732072 = args[1];
load_varargs(lists_731239_732073, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/1.sld:lset-xor");

closureN_type c_7312258;
object e_7312319 [3];
c_7312258.hdr.mark = gc_color_red;
 c_7312258.hdr.grayed = 0;
c_7312258.tag = closureN_tag;
 c_7312258.fn = (function_type)__lambda_1080;
c_7312258.num_args = 1;
c_7312258.num_elements = 3;
c_7312258.elements = (object *)e_7312319;
c_7312258.elements[0] = _123_731238_732072;
c_7312258.elements[1] = k_733639;
c_7312258.elements[2] = lists_731239_732073;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7312258, primitive_procedure_127, _123_731238_732072, __glo_lset_91xor_srfi_1);; 
}

static void __lambda_1080(void *data, object self_734767, int argc, object *args) /* object self_734767, object r_733640 */
 {

  
closureN_type c_7312260;
object e_7312264 [2];
c_7312260.hdr.mark = gc_color_red;
 c_7312260.hdr.grayed = 0;
c_7312260.tag = closureN_tag;
 c_7312260.fn = (function_type)__lambda_1081;
c_7312260.num_args = 1;
c_7312260.num_elements = 2;
c_7312260.elements = (object *)e_7312264;
c_7312260.elements[0] = ((closureN)self_734767)->elements[1];
c_7312260.elements[1] = ((closureN)self_734767)->elements[2];


closureN_type c_7312265;
object e_7312318 [1];
c_7312265.hdr.mark = gc_color_red;
 c_7312265.hdr.grayed = 0;
c_7312265.tag = closureN_tag;
 c_7312265.fn = (function_type)__lambda_1082;
c_7312265.num_args = 2;
c_7312265.num_elements = 1;
c_7312265.elements = (object *)e_7312318;
c_7312265.elements[0] = ((closureN)self_734767)->elements[0];

return_direct_with_clo1(data,(closure)&c_7312260,__lambda_1081,  &c_7312265);; 
}

static void __lambda_1082(void *data, object self_734768, int argc, object *args) /* object self_734768, object k_733643, object b_731240_732074, object a_731241_732075 */
 {
 object k_733643 = args[0]; object b_731240_732074 = args[1]; object a_731241_732075 = args[2];
  
closureN_type c_7312267;
object e_7312311 [4];
c_7312267.hdr.mark = gc_color_red;
 c_7312267.hdr.grayed = 0;
c_7312267.tag = closureN_tag;
 c_7312267.fn = (function_type)__lambda_1083;
c_7312267.num_args = 1;
c_7312267.num_elements = 4;
c_7312267.elements = (object *)e_7312311;
c_7312267.elements[0] = ((closureN)self_734768)->elements[0];
c_7312267.elements[1] = a_731241_732075;
c_7312267.elements[2] = b_731240_732074;
c_7312267.elements[3] = k_733643;


closureN_type c_7312312;
object e_7312317 [3];
c_7312312.hdr.mark = gc_color_red;
 c_7312312.hdr.grayed = 0;
c_7312312.tag = closureN_tag;
 c_7312312.fn = (function_type)__lambda_1089;
c_7312312.num_args = 0;
c_7312312.num_elements = 3;
c_7312312.elements = (object *)e_7312317;
c_7312312.elements[0] = ((closureN)self_734768)->elements[0];
c_7312312.elements[1] = a_731241_732075;
c_7312312.elements[2] = b_731240_732074;

return_direct_with_clo1(data,(closure)&c_7312267,__lambda_1083,  &c_7312312);; 
}

static void __lambda_1089(void *data, object self_734769, int argc, object *args) /* object self_734769, object k_733652 */
 {
 object k_733652 = args[0];
  return_direct_with_clo4(data,  __glo_lset_91diff_87intersection_srfi_1, (((closure)  __glo_lset_91diff_87intersection_srfi_1)->fn),  k_733652, ((closureN)self_734769)->elements[0], ((closureN)self_734769)->elements[1], ((closureN)self_734769)->elements[2]);; 
}

static void __lambda_1083(void *data, object self_734770, int argc, object *args) /* object self_734770, object r_733644 */
 {
 object r_733644 = args[0];
  
closureN_type c_7312269;
object e_7312273 [2];
c_7312269.hdr.mark = gc_color_red;
 c_7312269.hdr.grayed = 0;
c_7312269.tag = closureN_tag;
 c_7312269.fn = (function_type)__lambda_1084;
c_7312269.num_args = 1;
c_7312269.num_elements = 2;
c_7312269.elements = (object *)e_7312273;
c_7312269.elements[0] = ((closureN)self_734770)->elements[3];
c_7312269.elements[1] = r_733644;


closureN_type c_7312274;
object e_7312310 [3];
c_7312274.hdr.mark = gc_color_red;
 c_7312274.hdr.grayed = 0;
c_7312274.tag = closureN_tag;
 c_7312274.fn = (function_type)__lambda_1085;
c_7312274.num_args = 2;
c_7312274.num_elements = 3;
c_7312274.elements = (object *)e_7312310;
c_7312274.elements[0] = ((closureN)self_734770)->elements[0];
c_7312274.elements[1] = ((closureN)self_734770)->elements[1];
c_7312274.elements[2] = ((closureN)self_734770)->elements[2];

return_direct_with_clo1(data,(closure)&c_7312269,__lambda_1084,  &c_7312274);; 
}

static void __lambda_1085(void *data, object self_734771, int argc, object *args) /* object self_734771, object k_733646, object a_91b_731242_732076, object a_91int_91b_731243_732077 */
 {
 object k_733646 = args[0]; object a_91b_731242_732076 = args[1]; object a_91int_91b_731243_732077 = args[2];
    
if( (boolean_f != Cyc_is_null(a_91b_731242_732076)) ){ 
  return_direct_with_clo4(data,  __glo_lset_91difference_srfi_1, (((closure)  __glo_lset_91difference_srfi_1)->fn),  k_733646, ((closureN)self_734771)->elements[0], ((closureN)self_734771)->elements[2], ((closureN)self_734771)->elements[1]);
} else { 
    
if( (boolean_f != Cyc_is_null(a_91int_91b_731243_732077)) ){ 
  return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  k_733646, ((closureN)self_734771)->elements[2], ((closureN)self_734771)->elements[1]);
} else { 
  
closureN_type c_7312287;
object e_7312292 [3];
c_7312287.hdr.mark = gc_color_red;
 c_7312287.hdr.grayed = 0;
c_7312287.tag = closureN_tag;
 c_7312287.fn = (function_type)__lambda_1086;
c_7312287.num_args = 1;
c_7312287.num_elements = 3;
c_7312287.elements = (object *)e_7312292;
c_7312287.elements[0] = a_91b_731242_732076;
c_7312287.elements[1] = ((closureN)self_734771)->elements[2];
c_7312287.elements[2] = k_733646;


closureN_type c_7312293;
object e_7312309 [2];
c_7312293.hdr.mark = gc_color_red;
 c_7312293.hdr.grayed = 0;
c_7312293.tag = closureN_tag;
 c_7312293.fn = (function_type)__lambda_1087;
c_7312293.num_args = 2;
c_7312293.num_elements = 2;
c_7312293.elements = (object *)e_7312309;
c_7312293.elements[0] = ((closureN)self_734771)->elements[0];
c_7312293.elements[1] = a_91int_91b_731243_732077;

return_direct_with_clo1(data,(closure)&c_7312287,__lambda_1086,  &c_7312293);}
;}
;; 
}

static void __lambda_1087(void *data, object self_734772, int argc, object *args) /* object self_734772, object k_733650, object xb_731251_732078, object ans_731252_732079 */
 {
 object k_733650 = args[0]; object xb_731251_732078 = args[1]; object ans_731252_732079 = args[2];
  
closureN_type c_7312295;
object e_7312306 [3];
c_7312295.hdr.mark = gc_color_red;
 c_7312295.hdr.grayed = 0;
c_7312295.tag = closureN_tag;
 c_7312295.fn = (function_type)__lambda_1088;
c_7312295.num_args = 1;
c_7312295.num_elements = 3;
c_7312295.elements = (object *)e_7312306;
c_7312295.elements[0] = ans_731252_732079;
c_7312295.elements[1] = k_733650;
c_7312295.elements[2] = xb_731251_732078;

return_direct_with_clo4(data,  __glo_member_scheme_base, (((closure)  __glo_member_scheme_base)->fn),  &c_7312295, xb_731251_732078, ((closureN)self_734772)->elements[1], ((closureN)self_734772)->elements[0]);; 
}

static void __lambda_1088(void *data, object self_734773, int argc, object *args) /* object self_734773, object r_733651 */
 {
 object r_733651 = args[0];
  if( (boolean_f != r_733651) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734773)->elements[1], (((closure)  ((closureN)self_734773)->elements[1])->fn),  ((closureN)self_734773)->elements[0]);
} else { 
  
pair_type local_7312303; 
return_direct_with_clo1(data,  ((closureN)self_734773)->elements[1], (((closure)  ((closureN)self_734773)->elements[1])->fn),  set_pair_as_expr(&local_7312303, ((closureN)self_734773)->elements[2], ((closureN)self_734773)->elements[0]));}
;; 
}

static void __lambda_1086(void *data, object self_734774, int argc, object *args) /* object self_734774, object r_733649 */
 {
 object r_733649 = args[0];
  return_direct_with_clo4(data,  __glo_fold_srfi_1, (((closure)  __glo_fold_srfi_1)->fn),  ((closureN)self_734774)->elements[2], r_733649, ((closureN)self_734774)->elements[0], ((closureN)self_734774)->elements[1]);; 
}

static void __lambda_1084(void *data, object self_734775, int argc, object *args) /* object self_734775, object r_733645 */
 {
 object r_733645 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734775)->elements[0], ((closureN)self_734775)->elements[1], r_733645);; 
}

static void __lambda_1081(void *data, object self_734776, int argc, object *args) /* object self_734776, object r_733641 */
 {
 object r_733641 = args[0];
  return_direct_with_clo4(data,  __glo_reduce_srfi_1, (((closure)  __glo_reduce_srfi_1)->fn),  ((closureN)self_734776)->elements[0], r_733641, NULL, ((closureN)self_734776)->elements[1]);; 
}

static void __lambda_1070(void *data, object _, int argc, object *args) /* closure _,object k_733627, object _123_731225_732066, object lis1_731226_732067, object lists_731227_732068_raw, ... */
 {
object k_733627 = args[0]; object _123_731225_732066 = args[1]; object lis1_731226_732067 = args[2];
load_varargs(lists_731227_732068, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/1.sld:lset-difference!");

closureN_type c_7312211;
object e_7312255 [4];
c_7312211.hdr.mark = gc_color_red;
 c_7312211.hdr.grayed = 0;
c_7312211.tag = closureN_tag;
 c_7312211.fn = (function_type)__lambda_1071;
c_7312211.num_args = 1;
c_7312211.num_elements = 4;
c_7312211.elements = (object *)e_7312255;
c_7312211.elements[0] = _123_731225_732066;
c_7312211.elements[1] = k_733627;
c_7312211.elements[2] = lis1_731226_732067;
c_7312211.elements[3] = lists_731227_732068;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7312211, primitive_procedure_127, _123_731225_732066, __glo_lset_91difference_67_srfi_1);; 
}

static void __lambda_1071(void *data, object self_734759, int argc, object *args) /* object self_734759, object r_733628 */
 {

  
closureN_type c_7312213;
object e_7312253 [3];
c_7312213.hdr.mark = gc_color_red;
 c_7312213.hdr.grayed = 0;
c_7312213.tag = closureN_tag;
 c_7312213.fn = (function_type)__lambda_1072;
c_7312213.num_args = 1;
c_7312213.num_elements = 3;
c_7312213.elements = (object *)e_7312253;
c_7312213.elements[0] = ((closureN)self_734759)->elements[0];
c_7312213.elements[1] = ((closureN)self_734759)->elements[1];
c_7312213.elements[2] = ((closureN)self_734759)->elements[2];

return_direct_with_clo3(data,  __glo_filter_srfi_1, (((closure)  __glo_filter_srfi_1)->fn),  &c_7312213, primitive_pair_127, ((closureN)self_734759)->elements[3]);; 
}

static void __lambda_1072(void *data, object self_734760, int argc, object *args) /* object self_734760, object lists_731228_732069 */
 {
 object lists_731228_732069 = args[0];
    
if( (boolean_f != Cyc_is_null(lists_731228_732069)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734760)->elements[1], (((closure)  ((closureN)self_734760)->elements[1])->fn),  ((closureN)self_734760)->elements[2]);
} else { 
  
closureN_type c_7312220;
object e_7312249 [4];
c_7312220.hdr.mark = gc_color_red;
 c_7312220.hdr.grayed = 0;
c_7312220.tag = closureN_tag;
 c_7312220.fn = (function_type)__lambda_1073;
c_7312220.num_args = 1;
c_7312220.num_elements = 4;
c_7312220.elements = (object *)e_7312249;
c_7312220.elements[0] = ((closureN)self_734760)->elements[0];
c_7312220.elements[1] = ((closureN)self_734760)->elements[1];
c_7312220.elements[2] = ((closureN)self_734760)->elements[2];
c_7312220.elements[3] = lists_731228_732069;



return_direct_with_clo1(data,(closure)&c_7312220,__lambda_1073,  memqp(data, ((closureN)self_734760)->elements[2], lists_731228_732069));}
;; 
}

static void __lambda_1073(void *data, object self_734761, int argc, object *args) /* object self_734761, object r_733631 */
 {
 object r_733631 = args[0];
  if( (boolean_f != r_733631) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734761)->elements[1], (((closure)  ((closureN)self_734761)->elements[1])->fn),  NULL);
} else { 
  
closureN_type c_7312224;
object e_7312228 [2];
c_7312224.hdr.mark = gc_color_red;
 c_7312224.hdr.grayed = 0;
c_7312224.tag = closureN_tag;
 c_7312224.fn = (function_type)__lambda_1074;
c_7312224.num_args = 1;
c_7312224.num_elements = 2;
c_7312224.elements = (object *)e_7312228;
c_7312224.elements[0] = ((closureN)self_734761)->elements[1];
c_7312224.elements[1] = ((closureN)self_734761)->elements[2];


closureN_type c_7312229;
object e_7312248 [2];
c_7312229.hdr.mark = gc_color_red;
 c_7312229.hdr.grayed = 0;
c_7312229.tag = closureN_tag;
 c_7312229.fn = (function_type)__lambda_1075;
c_7312229.num_args = 1;
c_7312229.num_elements = 2;
c_7312229.elements = (object *)e_7312248;
c_7312229.elements[0] = ((closureN)self_734761)->elements[0];
c_7312229.elements[1] = ((closureN)self_734761)->elements[3];

return_direct_with_clo1(data,(closure)&c_7312224,__lambda_1074,  &c_7312229);}
;; 
}

static void __lambda_1075(void *data, object self_734762, int argc, object *args) /* object self_734762, object k_733633, object x_731236_732070 */
 {
 object k_733633 = args[0]; object x_731236_732070 = args[1];
  
closureN_type c_7312231;
object e_7312235 [2];
c_7312231.hdr.mark = gc_color_red;
 c_7312231.hdr.grayed = 0;
c_7312231.tag = closureN_tag;
 c_7312231.fn = (function_type)__lambda_1076;
c_7312231.num_args = 1;
c_7312231.num_elements = 2;
c_7312231.elements = (object *)e_7312235;
c_7312231.elements[0] = k_733633;
c_7312231.elements[1] = ((closureN)self_734762)->elements[1];


closureN_type c_7312236;
object e_7312247 [2];
c_7312236.hdr.mark = gc_color_red;
 c_7312236.hdr.grayed = 0;
c_7312236.tag = closureN_tag;
 c_7312236.fn = (function_type)__lambda_1077;
c_7312236.num_args = 1;
c_7312236.num_elements = 2;
c_7312236.elements = (object *)e_7312247;
c_7312236.elements[0] = ((closureN)self_734762)->elements[0];
c_7312236.elements[1] = x_731236_732070;

return_direct_with_clo1(data,(closure)&c_7312231,__lambda_1076,  &c_7312236);; 
}

static void __lambda_1077(void *data, object self_734763, int argc, object *args) /* object self_734763, object k_733635, object lis_731237_732071 */
 {
 object k_733635 = args[0]; object lis_731237_732071 = args[1];
  
closureN_type c_7312238;
object e_7312244 [1];
c_7312238.hdr.mark = gc_color_red;
 c_7312238.hdr.grayed = 0;
c_7312238.tag = closureN_tag;
 c_7312238.fn = (function_type)__lambda_1078;
c_7312238.num_args = 1;
c_7312238.num_elements = 1;
c_7312238.elements = (object *)e_7312244;
c_7312238.elements[0] = k_733635;

return_direct_with_clo4(data,  __glo_member_scheme_base, (((closure)  __glo_member_scheme_base)->fn),  &c_7312238, ((closureN)self_734763)->elements[1], lis_731237_732071, ((closureN)self_734763)->elements[0]);; 
}

static void __lambda_1078(void *data, object self_734764, int argc, object *args) /* object self_734764, object r_733636 */
 {
 object r_733636 = args[0];
  
complex_num_type local_7312243; 
return_direct_with_clo1(data,  ((closureN)self_734764)->elements[0], (((closure)  ((closureN)self_734764)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7312243, r_733636));; 
}

static void __lambda_1076(void *data, object self_734765, int argc, object *args) /* object self_734765, object r_733634 */
 {
 object r_733634 = args[0];
  return_direct_with_clo3(data,  __glo_every_srfi_1, (((closure)  __glo_every_srfi_1)->fn),  ((closureN)self_734765)->elements[0], r_733634, ((closureN)self_734765)->elements[1]);; 
}

static void __lambda_1074(void *data, object self_734766, int argc, object *args) /* object self_734766, object r_733632 */
 {
 object r_733632 = args[0];
  return_direct_with_clo3(data,  __glo_filter_67_srfi_1, (((closure)  __glo_filter_67_srfi_1)->fn),  ((closureN)self_734766)->elements[0], r_733632, ((closureN)self_734766)->elements[1]);; 
}

static void __lambda_1061(void *data, object _, int argc, object *args) /* closure _,object k_733615, object _123_731212_732060, object lis1_731213_732061, object lists_731214_732062_raw, ... */
 {
object k_733615 = args[0]; object _123_731212_732060 = args[1]; object lis1_731213_732061 = args[2];
load_varargs(lists_731214_732062, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/1.sld:lset-difference");

closureN_type c_7312164;
object e_7312208 [4];
c_7312164.hdr.mark = gc_color_red;
 c_7312164.hdr.grayed = 0;
c_7312164.tag = closureN_tag;
 c_7312164.fn = (function_type)__lambda_1062;
c_7312164.num_args = 1;
c_7312164.num_elements = 4;
c_7312164.elements = (object *)e_7312208;
c_7312164.elements[0] = _123_731212_732060;
c_7312164.elements[1] = k_733615;
c_7312164.elements[2] = lis1_731213_732061;
c_7312164.elements[3] = lists_731214_732062;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7312164, primitive_procedure_127, _123_731212_732060, __glo_lset_91difference_srfi_1);; 
}

static void __lambda_1062(void *data, object self_734751, int argc, object *args) /* object self_734751, object r_733616 */
 {

  
closureN_type c_7312166;
object e_7312206 [3];
c_7312166.hdr.mark = gc_color_red;
 c_7312166.hdr.grayed = 0;
c_7312166.tag = closureN_tag;
 c_7312166.fn = (function_type)__lambda_1063;
c_7312166.num_args = 1;
c_7312166.num_elements = 3;
c_7312166.elements = (object *)e_7312206;
c_7312166.elements[0] = ((closureN)self_734751)->elements[0];
c_7312166.elements[1] = ((closureN)self_734751)->elements[1];
c_7312166.elements[2] = ((closureN)self_734751)->elements[2];

return_direct_with_clo3(data,  __glo_filter_srfi_1, (((closure)  __glo_filter_srfi_1)->fn),  &c_7312166, primitive_pair_127, ((closureN)self_734751)->elements[3]);; 
}

static void __lambda_1063(void *data, object self_734752, int argc, object *args) /* object self_734752, object lists_731215_732063 */
 {
 object lists_731215_732063 = args[0];
    
if( (boolean_f != Cyc_is_null(lists_731215_732063)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734752)->elements[1], (((closure)  ((closureN)self_734752)->elements[1])->fn),  ((closureN)self_734752)->elements[2]);
} else { 
  
closureN_type c_7312173;
object e_7312202 [4];
c_7312173.hdr.mark = gc_color_red;
 c_7312173.hdr.grayed = 0;
c_7312173.tag = closureN_tag;
 c_7312173.fn = (function_type)__lambda_1064;
c_7312173.num_args = 1;
c_7312173.num_elements = 4;
c_7312173.elements = (object *)e_7312202;
c_7312173.elements[0] = ((closureN)self_734752)->elements[0];
c_7312173.elements[1] = ((closureN)self_734752)->elements[1];
c_7312173.elements[2] = ((closureN)self_734752)->elements[2];
c_7312173.elements[3] = lists_731215_732063;



return_direct_with_clo1(data,(closure)&c_7312173,__lambda_1064,  memqp(data, ((closureN)self_734752)->elements[2], lists_731215_732063));}
;; 
}

static void __lambda_1064(void *data, object self_734753, int argc, object *args) /* object self_734753, object r_733619 */
 {
 object r_733619 = args[0];
  if( (boolean_f != r_733619) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734753)->elements[1], (((closure)  ((closureN)self_734753)->elements[1])->fn),  NULL);
} else { 
  
closureN_type c_7312177;
object e_7312181 [2];
c_7312177.hdr.mark = gc_color_red;
 c_7312177.hdr.grayed = 0;
c_7312177.tag = closureN_tag;
 c_7312177.fn = (function_type)__lambda_1065;
c_7312177.num_args = 1;
c_7312177.num_elements = 2;
c_7312177.elements = (object *)e_7312181;
c_7312177.elements[0] = ((closureN)self_734753)->elements[1];
c_7312177.elements[1] = ((closureN)self_734753)->elements[2];


closureN_type c_7312182;
object e_7312201 [2];
c_7312182.hdr.mark = gc_color_red;
 c_7312182.hdr.grayed = 0;
c_7312182.tag = closureN_tag;
 c_7312182.fn = (function_type)__lambda_1066;
c_7312182.num_args = 1;
c_7312182.num_elements = 2;
c_7312182.elements = (object *)e_7312201;
c_7312182.elements[0] = ((closureN)self_734753)->elements[0];
c_7312182.elements[1] = ((closureN)self_734753)->elements[3];

return_direct_with_clo1(data,(closure)&c_7312177,__lambda_1065,  &c_7312182);}
;; 
}

static void __lambda_1066(void *data, object self_734754, int argc, object *args) /* object self_734754, object k_733621, object x_731223_732064 */
 {
 object k_733621 = args[0]; object x_731223_732064 = args[1];
  
closureN_type c_7312184;
object e_7312188 [2];
c_7312184.hdr.mark = gc_color_red;
 c_7312184.hdr.grayed = 0;
c_7312184.tag = closureN_tag;
 c_7312184.fn = (function_type)__lambda_1067;
c_7312184.num_args = 1;
c_7312184.num_elements = 2;
c_7312184.elements = (object *)e_7312188;
c_7312184.elements[0] = k_733621;
c_7312184.elements[1] = ((closureN)self_734754)->elements[1];


closureN_type c_7312189;
object e_7312200 [2];
c_7312189.hdr.mark = gc_color_red;
 c_7312189.hdr.grayed = 0;
c_7312189.tag = closureN_tag;
 c_7312189.fn = (function_type)__lambda_1068;
c_7312189.num_args = 1;
c_7312189.num_elements = 2;
c_7312189.elements = (object *)e_7312200;
c_7312189.elements[0] = ((closureN)self_734754)->elements[0];
c_7312189.elements[1] = x_731223_732064;

return_direct_with_clo1(data,(closure)&c_7312184,__lambda_1067,  &c_7312189);; 
}

static void __lambda_1068(void *data, object self_734755, int argc, object *args) /* object self_734755, object k_733623, object lis_731224_732065 */
 {
 object k_733623 = args[0]; object lis_731224_732065 = args[1];
  
closureN_type c_7312191;
object e_7312197 [1];
c_7312191.hdr.mark = gc_color_red;
 c_7312191.hdr.grayed = 0;
c_7312191.tag = closureN_tag;
 c_7312191.fn = (function_type)__lambda_1069;
c_7312191.num_args = 1;
c_7312191.num_elements = 1;
c_7312191.elements = (object *)e_7312197;
c_7312191.elements[0] = k_733623;

return_direct_with_clo4(data,  __glo_member_scheme_base, (((closure)  __glo_member_scheme_base)->fn),  &c_7312191, ((closureN)self_734755)->elements[1], lis_731224_732065, ((closureN)self_734755)->elements[0]);; 
}

static void __lambda_1069(void *data, object self_734756, int argc, object *args) /* object self_734756, object r_733624 */
 {
 object r_733624 = args[0];
  
complex_num_type local_7312196; 
return_direct_with_clo1(data,  ((closureN)self_734756)->elements[0], (((closure)  ((closureN)self_734756)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7312196, r_733624));; 
}

static void __lambda_1067(void *data, object self_734757, int argc, object *args) /* object self_734757, object r_733622 */
 {
 object r_733622 = args[0];
  return_direct_with_clo3(data,  __glo_every_srfi_1, (((closure)  __glo_every_srfi_1)->fn),  ((closureN)self_734757)->elements[0], r_733622, ((closureN)self_734757)->elements[1]);; 
}

static void __lambda_1065(void *data, object self_734758, int argc, object *args) /* object self_734758, object r_733620 */
 {
 object r_733620 = args[0];
  return_direct_with_clo3(data,  __glo_filter_srfi_1, (((closure)  __glo_filter_srfi_1)->fn),  ((closureN)self_734758)->elements[0], r_733620, ((closureN)self_734758)->elements[1]);; 
}

static void __lambda_1053(void *data, object _, int argc, object *args) /* closure _,object k_733604, object _123_731199_732054, object lis1_731200_732055, object lists_731201_732056_raw, ... */
 {
object k_733604 = args[0]; object _123_731199_732054 = args[1]; object lis1_731200_732055 = args[2];
load_varargs(lists_731201_732056, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/1.sld:lset-intersection!");

closureN_type c_7312125;
object e_7312161 [4];
c_7312125.hdr.mark = gc_color_red;
 c_7312125.hdr.grayed = 0;
c_7312125.tag = closureN_tag;
 c_7312125.fn = (function_type)__lambda_1054;
c_7312125.num_args = 1;
c_7312125.num_elements = 4;
c_7312125.elements = (object *)e_7312161;
c_7312125.elements[0] = _123_731199_732054;
c_7312125.elements[1] = k_733604;
c_7312125.elements[2] = lis1_731200_732055;
c_7312125.elements[3] = lists_731201_732056;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7312125, primitive_procedure_127, _123_731199_732054, __glo_lset_91intersection_67_srfi_1);; 
}

static void __lambda_1054(void *data, object self_734744, int argc, object *args) /* object self_734744, object r_733605 */
 {

  
closureN_type c_7312127;
object e_7312158 [3];
c_7312127.hdr.mark = gc_color_red;
 c_7312127.hdr.grayed = 0;
c_7312127.tag = closureN_tag;
 c_7312127.fn = (function_type)__lambda_1055;
c_7312127.num_args = 1;
c_7312127.num_elements = 3;
c_7312127.elements = (object *)e_7312158;
c_7312127.elements[0] = ((closureN)self_734744)->elements[0];
c_7312127.elements[1] = ((closureN)self_734744)->elements[1];
c_7312127.elements[2] = ((closureN)self_734744)->elements[2];

return_direct_with_clo4(data,  __glo_delete_srfi_1, (((closure)  __glo_delete_srfi_1)->fn),  &c_7312127, ((closureN)self_734744)->elements[2], ((closureN)self_734744)->elements[3], primitive_eq_127);; 
}

static void __lambda_1055(void *data, object self_734745, int argc, object *args) /* object self_734745, object lists_731202_732057 */
 {
 object lists_731202_732057 = args[0];
  
closureN_type c_7312129;
object e_7312157 [4];
c_7312129.hdr.mark = gc_color_red;
 c_7312129.hdr.grayed = 0;
c_7312129.tag = closureN_tag;
 c_7312129.fn = (function_type)__lambda_1056;
c_7312129.num_args = 1;
c_7312129.num_elements = 4;
c_7312129.elements = (object *)e_7312157;
c_7312129.elements[0] = ((closureN)self_734745)->elements[0];
c_7312129.elements[1] = ((closureN)self_734745)->elements[1];
c_7312129.elements[2] = ((closureN)self_734745)->elements[2];
c_7312129.elements[3] = lists_731202_732057;

return_direct_with_clo3(data,  __glo_any_srfi_1, (((closure)  __glo_any_srfi_1)->fn),  &c_7312129, __glo_null_91list_127_srfi_1, lists_731202_732057);; 
}

static void __lambda_1056(void *data, object self_734746, int argc, object *args) /* object self_734746, object r_733607 */
 {
 object r_733607 = args[0];
  if( (boolean_f != r_733607) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734746)->elements[1], (((closure)  ((closureN)self_734746)->elements[1])->fn),  NULL);
} else { 
    
if( (boolean_f != Cyc_is_null(((closureN)self_734746)->elements[3])) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734746)->elements[1], (((closure)  ((closureN)self_734746)->elements[1])->fn),  ((closureN)self_734746)->elements[2]);
} else { 
  
closureN_type c_7312139;
object e_7312143 [2];
c_7312139.hdr.mark = gc_color_red;
 c_7312139.hdr.grayed = 0;
c_7312139.tag = closureN_tag;
 c_7312139.fn = (function_type)__lambda_1057;
c_7312139.num_args = 1;
c_7312139.num_elements = 2;
c_7312139.elements = (object *)e_7312143;
c_7312139.elements[0] = ((closureN)self_734746)->elements[1];
c_7312139.elements[1] = ((closureN)self_734746)->elements[2];


closureN_type c_7312144;
object e_7312156 [2];
c_7312144.hdr.mark = gc_color_red;
 c_7312144.hdr.grayed = 0;
c_7312144.tag = closureN_tag;
 c_7312144.fn = (function_type)__lambda_1058;
c_7312144.num_args = 1;
c_7312144.num_elements = 2;
c_7312144.elements = (object *)e_7312156;
c_7312144.elements[0] = ((closureN)self_734746)->elements[0];
c_7312144.elements[1] = ((closureN)self_734746)->elements[3];

return_direct_with_clo1(data,(closure)&c_7312139,__lambda_1057,  &c_7312144);}
;}
;; 
}

static void __lambda_1058(void *data, object self_734747, int argc, object *args) /* object self_734747, object k_733610, object x_731210_732058 */
 {
 object k_733610 = args[0]; object x_731210_732058 = args[1];
  
closureN_type c_7312146;
object e_7312150 [2];
c_7312146.hdr.mark = gc_color_red;
 c_7312146.hdr.grayed = 0;
c_7312146.tag = closureN_tag;
 c_7312146.fn = (function_type)__lambda_1059;
c_7312146.num_args = 1;
c_7312146.num_elements = 2;
c_7312146.elements = (object *)e_7312150;
c_7312146.elements[0] = k_733610;
c_7312146.elements[1] = ((closureN)self_734747)->elements[1];


closureN_type c_7312151;
object e_7312155 [2];
c_7312151.hdr.mark = gc_color_red;
 c_7312151.hdr.grayed = 0;
c_7312151.tag = closureN_tag;
 c_7312151.fn = (function_type)__lambda_1060;
c_7312151.num_args = 1;
c_7312151.num_elements = 2;
c_7312151.elements = (object *)e_7312155;
c_7312151.elements[0] = ((closureN)self_734747)->elements[0];
c_7312151.elements[1] = x_731210_732058;

return_direct_with_clo1(data,(closure)&c_7312146,__lambda_1059,  &c_7312151);; 
}

static void __lambda_1060(void *data, object self_734748, int argc, object *args) /* object self_734748, object k_733612, object lis_731211_732059 */
 {
 object k_733612 = args[0]; object lis_731211_732059 = args[1];
  return_direct_with_clo4(data,  __glo_member_scheme_base, (((closure)  __glo_member_scheme_base)->fn),  k_733612, ((closureN)self_734748)->elements[1], lis_731211_732059, ((closureN)self_734748)->elements[0]);; 
}

static void __lambda_1059(void *data, object self_734749, int argc, object *args) /* object self_734749, object r_733611 */
 {
 object r_733611 = args[0];
  return_direct_with_clo3(data,  __glo_every_srfi_1, (((closure)  __glo_every_srfi_1)->fn),  ((closureN)self_734749)->elements[0], r_733611, ((closureN)self_734749)->elements[1]);; 
}

static void __lambda_1057(void *data, object self_734750, int argc, object *args) /* object self_734750, object r_733609 */
 {
 object r_733609 = args[0];
  return_direct_with_clo3(data,  __glo_filter_67_srfi_1, (((closure)  __glo_filter_67_srfi_1)->fn),  ((closureN)self_734750)->elements[0], r_733609, ((closureN)self_734750)->elements[1]);; 
}

static void __lambda_1045(void *data, object _, int argc, object *args) /* closure _,object k_733593, object _123_731186_732048, object lis1_731187_732049, object lists_731188_732050_raw, ... */
 {
object k_733593 = args[0]; object _123_731186_732048 = args[1]; object lis1_731187_732049 = args[2];
load_varargs(lists_731188_732050, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/1.sld:lset-intersection");

closureN_type c_7312086;
object e_7312122 [4];
c_7312086.hdr.mark = gc_color_red;
 c_7312086.hdr.grayed = 0;
c_7312086.tag = closureN_tag;
 c_7312086.fn = (function_type)__lambda_1046;
c_7312086.num_args = 1;
c_7312086.num_elements = 4;
c_7312086.elements = (object *)e_7312122;
c_7312086.elements[0] = _123_731186_732048;
c_7312086.elements[1] = k_733593;
c_7312086.elements[2] = lis1_731187_732049;
c_7312086.elements[3] = lists_731188_732050;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7312086, primitive_procedure_127, _123_731186_732048, __glo_lset_91intersection_srfi_1);; 
}

static void __lambda_1046(void *data, object self_734737, int argc, object *args) /* object self_734737, object r_733594 */
 {

  
closureN_type c_7312088;
object e_7312119 [3];
c_7312088.hdr.mark = gc_color_red;
 c_7312088.hdr.grayed = 0;
c_7312088.tag = closureN_tag;
 c_7312088.fn = (function_type)__lambda_1047;
c_7312088.num_args = 1;
c_7312088.num_elements = 3;
c_7312088.elements = (object *)e_7312119;
c_7312088.elements[0] = ((closureN)self_734737)->elements[0];
c_7312088.elements[1] = ((closureN)self_734737)->elements[1];
c_7312088.elements[2] = ((closureN)self_734737)->elements[2];

return_direct_with_clo4(data,  __glo_delete_srfi_1, (((closure)  __glo_delete_srfi_1)->fn),  &c_7312088, ((closureN)self_734737)->elements[2], ((closureN)self_734737)->elements[3], primitive_eq_127);; 
}

static void __lambda_1047(void *data, object self_734738, int argc, object *args) /* object self_734738, object lists_731189_732051 */
 {
 object lists_731189_732051 = args[0];
  
closureN_type c_7312090;
object e_7312118 [4];
c_7312090.hdr.mark = gc_color_red;
 c_7312090.hdr.grayed = 0;
c_7312090.tag = closureN_tag;
 c_7312090.fn = (function_type)__lambda_1048;
c_7312090.num_args = 1;
c_7312090.num_elements = 4;
c_7312090.elements = (object *)e_7312118;
c_7312090.elements[0] = ((closureN)self_734738)->elements[0];
c_7312090.elements[1] = ((closureN)self_734738)->elements[1];
c_7312090.elements[2] = ((closureN)self_734738)->elements[2];
c_7312090.elements[3] = lists_731189_732051;

return_direct_with_clo3(data,  __glo_any_srfi_1, (((closure)  __glo_any_srfi_1)->fn),  &c_7312090, __glo_null_91list_127_srfi_1, lists_731189_732051);; 
}

static void __lambda_1048(void *data, object self_734739, int argc, object *args) /* object self_734739, object r_733596 */
 {
 object r_733596 = args[0];
  if( (boolean_f != r_733596) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734739)->elements[1], (((closure)  ((closureN)self_734739)->elements[1])->fn),  NULL);
} else { 
    
if( (boolean_f != Cyc_is_null(((closureN)self_734739)->elements[3])) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734739)->elements[1], (((closure)  ((closureN)self_734739)->elements[1])->fn),  ((closureN)self_734739)->elements[2]);
} else { 
  
closureN_type c_7312100;
object e_7312104 [2];
c_7312100.hdr.mark = gc_color_red;
 c_7312100.hdr.grayed = 0;
c_7312100.tag = closureN_tag;
 c_7312100.fn = (function_type)__lambda_1049;
c_7312100.num_args = 1;
c_7312100.num_elements = 2;
c_7312100.elements = (object *)e_7312104;
c_7312100.elements[0] = ((closureN)self_734739)->elements[1];
c_7312100.elements[1] = ((closureN)self_734739)->elements[2];


closureN_type c_7312105;
object e_7312117 [2];
c_7312105.hdr.mark = gc_color_red;
 c_7312105.hdr.grayed = 0;
c_7312105.tag = closureN_tag;
 c_7312105.fn = (function_type)__lambda_1050;
c_7312105.num_args = 1;
c_7312105.num_elements = 2;
c_7312105.elements = (object *)e_7312117;
c_7312105.elements[0] = ((closureN)self_734739)->elements[0];
c_7312105.elements[1] = ((closureN)self_734739)->elements[3];

return_direct_with_clo1(data,(closure)&c_7312100,__lambda_1049,  &c_7312105);}
;}
;; 
}

static void __lambda_1050(void *data, object self_734740, int argc, object *args) /* object self_734740, object k_733599, object x_731197_732052 */
 {
 object k_733599 = args[0]; object x_731197_732052 = args[1];
  
closureN_type c_7312107;
object e_7312111 [2];
c_7312107.hdr.mark = gc_color_red;
 c_7312107.hdr.grayed = 0;
c_7312107.tag = closureN_tag;
 c_7312107.fn = (function_type)__lambda_1051;
c_7312107.num_args = 1;
c_7312107.num_elements = 2;
c_7312107.elements = (object *)e_7312111;
c_7312107.elements[0] = k_733599;
c_7312107.elements[1] = ((closureN)self_734740)->elements[1];


closureN_type c_7312112;
object e_7312116 [2];
c_7312112.hdr.mark = gc_color_red;
 c_7312112.hdr.grayed = 0;
c_7312112.tag = closureN_tag;
 c_7312112.fn = (function_type)__lambda_1052;
c_7312112.num_args = 1;
c_7312112.num_elements = 2;
c_7312112.elements = (object *)e_7312116;
c_7312112.elements[0] = ((closureN)self_734740)->elements[0];
c_7312112.elements[1] = x_731197_732052;

return_direct_with_clo1(data,(closure)&c_7312107,__lambda_1051,  &c_7312112);; 
}

static void __lambda_1052(void *data, object self_734741, int argc, object *args) /* object self_734741, object k_733601, object lis_731198_732053 */
 {
 object k_733601 = args[0]; object lis_731198_732053 = args[1];
  return_direct_with_clo4(data,  __glo_member_scheme_base, (((closure)  __glo_member_scheme_base)->fn),  k_733601, ((closureN)self_734741)->elements[1], lis_731198_732053, ((closureN)self_734741)->elements[0]);; 
}

static void __lambda_1051(void *data, object self_734742, int argc, object *args) /* object self_734742, object r_733600 */
 {
 object r_733600 = args[0];
  return_direct_with_clo3(data,  __glo_every_srfi_1, (((closure)  __glo_every_srfi_1)->fn),  ((closureN)self_734742)->elements[0], r_733600, ((closureN)self_734742)->elements[1]);; 
}

static void __lambda_1049(void *data, object self_734743, int argc, object *args) /* object self_734743, object r_733598 */
 {
 object r_733598 = args[0];
  return_direct_with_clo3(data,  __glo_filter_srfi_1, (((closure)  __glo_filter_srfi_1)->fn),  ((closureN)self_734743)->elements[0], r_733598, ((closureN)self_734743)->elements[1]);; 
}

static void __lambda_1033(void *data, object _, int argc, object *args) /* closure _,object k_733576, object _123_731168_732040, object lists_731169_732041_raw, ... */
 {
object k_733576 = args[0]; object _123_731168_732040 = args[1];
load_varargs(lists_731169_732041, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/1.sld:lset-union!");

closureN_type c_7312020;
object e_7312083 [3];
c_7312020.hdr.mark = gc_color_red;
 c_7312020.hdr.grayed = 0;
c_7312020.tag = closureN_tag;
 c_7312020.fn = (function_type)__lambda_1034;
c_7312020.num_args = 1;
c_7312020.num_elements = 3;
c_7312020.elements = (object *)e_7312083;
c_7312020.elements[0] = _123_731168_732040;
c_7312020.elements[1] = k_733576;
c_7312020.elements[2] = lists_731169_732041;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7312020, primitive_procedure_127, _123_731168_732040, __glo_lset_91union_67_srfi_1);; 
}

static void __lambda_1034(void *data, object self_734726, int argc, object *args) /* object self_734726, object r_733577 */
 {

  
closureN_type c_7312022;
object e_7312026 [2];
c_7312022.hdr.mark = gc_color_red;
 c_7312022.hdr.grayed = 0;
c_7312022.tag = closureN_tag;
 c_7312022.fn = (function_type)__lambda_1035;
c_7312022.num_args = 1;
c_7312022.num_elements = 2;
c_7312022.elements = (object *)e_7312026;
c_7312022.elements[0] = ((closureN)self_734726)->elements[1];
c_7312022.elements[1] = ((closureN)self_734726)->elements[2];


closureN_type c_7312027;
object e_7312082 [1];
c_7312027.hdr.mark = gc_color_red;
 c_7312027.hdr.grayed = 0;
c_7312027.tag = closureN_tag;
 c_7312027.fn = (function_type)__lambda_1036;
c_7312027.num_args = 2;
c_7312027.num_elements = 1;
c_7312027.elements = (object *)e_7312082;
c_7312027.elements[0] = ((closureN)self_734726)->elements[0];

return_direct_with_clo1(data,(closure)&c_7312022,__lambda_1035,  &c_7312027);; 
}

static void __lambda_1036(void *data, object self_734727, int argc, object *args) /* object self_734727, object k_733580, object lis_731170_732042, object ans_731171_732043 */
 {
 object k_733580 = args[0]; object lis_731170_732042 = args[1]; object ans_731171_732043 = args[2];
    
if( (boolean_f != Cyc_is_null(lis_731170_732042)) ){ 
  return_direct_with_clo1(data,  k_733580, (((closure)  k_733580)->fn),  ans_731171_732043);
} else { 
    
if( (boolean_f != Cyc_is_null(ans_731171_732043)) ){ 
  return_direct_with_clo1(data,  k_733580, (((closure)  k_733580)->fn),  lis_731170_732042);
} else { 
  
closureN_type c_7312035;
object e_7312079 [4];
c_7312035.hdr.mark = gc_color_red;
 c_7312035.hdr.grayed = 0;
c_7312035.tag = closureN_tag;
 c_7312035.fn = (function_type)__lambda_1037;
c_7312035.num_args = 1;
c_7312035.num_elements = 4;
c_7312035.elements = (object *)e_7312079;
c_7312035.elements[0] = ((closureN)self_734727)->elements[0];
c_7312035.elements[1] = ans_731171_732043;
c_7312035.elements[2] = k_733580;
c_7312035.elements[3] = lis_731170_732042;



return_direct_with_clo1(data,(closure)&c_7312035,__lambda_1037,  Cyc_eq(lis_731170_732042, ans_731171_732043));}
;}
;; 
}

static void __lambda_1037(void *data, object self_734728, int argc, object *args) /* object self_734728, object r_733583 */
 {
 object r_733583 = args[0];
  if( (boolean_f != r_733583) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734728)->elements[2], (((closure)  ((closureN)self_734728)->elements[2])->fn),  ((closureN)self_734728)->elements[1]);
} else { 
  
closureN_type c_7312040;
object e_7312045 [3];
c_7312040.hdr.mark = gc_color_red;
 c_7312040.hdr.grayed = 0;
c_7312040.tag = closureN_tag;
 c_7312040.fn = (function_type)__lambda_1038;
c_7312040.num_args = 1;
c_7312040.num_elements = 3;
c_7312040.elements = (object *)e_7312045;
c_7312040.elements[0] = ((closureN)self_734728)->elements[1];
c_7312040.elements[1] = ((closureN)self_734728)->elements[2];
c_7312040.elements[2] = ((closureN)self_734728)->elements[3];


closureN_type c_7312046;
object e_7312078 [1];
c_7312046.hdr.mark = gc_color_red;
 c_7312046.hdr.grayed = 0;
c_7312046.tag = closureN_tag;
 c_7312046.fn = (function_type)__lambda_1039;
c_7312046.num_args = 2;
c_7312046.num_elements = 1;
c_7312046.elements = (object *)e_7312078;
c_7312046.elements[0] = ((closureN)self_734728)->elements[0];

return_direct_with_clo1(data,(closure)&c_7312040,__lambda_1038,  &c_7312046);}
;; 
}

static void __lambda_1039(void *data, object self_734729, int argc, object *args) /* object self_734729, object k_733585, object pair_731182_732044, object ans_731183_732045 */
 {
 object k_733585 = args[0]; object pair_731182_732044 = args[1]; object ans_731183_732045 = args[2];
  
closureN_type c_7312048;
object e_7312075 [4];
c_7312048.hdr.mark = gc_color_red;
 c_7312048.hdr.grayed = 0;
c_7312048.tag = closureN_tag;
 c_7312048.fn = (function_type)__lambda_1040;
c_7312048.num_args = 1;
c_7312048.num_elements = 4;
c_7312048.elements = (object *)e_7312075;
c_7312048.elements[0] = ((closureN)self_734729)->elements[0];
c_7312048.elements[1] = ans_731183_732045;
c_7312048.elements[2] = k_733585;
c_7312048.elements[3] = pair_731182_732044;



return_direct_with_clo1(data,(closure)&c_7312048,__lambda_1040,  Cyc_car(data, pair_731182_732044));; 
}

static void __lambda_1040(void *data, object self_734730, int argc, object *args) /* object self_734730, object elt_731184_732046 */
 {
 object elt_731184_732046 = args[0];
  
closureN_type c_7312050;
object e_7312069 [3];
c_7312050.hdr.mark = gc_color_red;
 c_7312050.hdr.grayed = 0;
c_7312050.tag = closureN_tag;
 c_7312050.fn = (function_type)__lambda_1041;
c_7312050.num_args = 1;
c_7312050.num_elements = 3;
c_7312050.elements = (object *)e_7312069;
c_7312050.elements[0] = ((closureN)self_734730)->elements[1];
c_7312050.elements[1] = ((closureN)self_734730)->elements[2];
c_7312050.elements[2] = ((closureN)self_734730)->elements[3];


closureN_type c_7312070;
object e_7312074 [2];
c_7312070.hdr.mark = gc_color_red;
 c_7312070.hdr.grayed = 0;
c_7312070.tag = closureN_tag;
 c_7312070.fn = (function_type)__lambda_1044;
c_7312070.num_args = 1;
c_7312070.num_elements = 2;
c_7312070.elements = (object *)e_7312074;
c_7312070.elements[0] = ((closureN)self_734730)->elements[0];
c_7312070.elements[1] = elt_731184_732046;

return_direct_with_clo1(data,(closure)&c_7312050,__lambda_1041,  &c_7312070);; 
}

static void __lambda_1044(void *data, object self_734731, int argc, object *args) /* object self_734731, object k_733590, object x_731185_732047 */
 {
 object k_733590 = args[0]; object x_731185_732047 = args[1];
  return_closcall3(data,  ((closureN)self_734731)->elements[0],  k_733590, x_731185_732047, ((closureN)self_734731)->elements[1]);; 
}

static void __lambda_1041(void *data, object self_734732, int argc, object *args) /* object self_734732, object r_733589 */
 {
 object r_733589 = args[0];
  
closureN_type c_7312052;
object e_7312067 [3];
c_7312052.hdr.mark = gc_color_red;
 c_7312052.hdr.grayed = 0;
c_7312052.tag = closureN_tag;
 c_7312052.fn = (function_type)__lambda_1042;
c_7312052.num_args = 1;
c_7312052.num_elements = 3;
c_7312052.elements = (object *)e_7312067;
c_7312052.elements[0] = ((closureN)self_734732)->elements[0];
c_7312052.elements[1] = ((closureN)self_734732)->elements[1];
c_7312052.elements[2] = ((closureN)self_734732)->elements[2];

return_direct_with_clo3(data,  __glo_any_srfi_1, (((closure)  __glo_any_srfi_1)->fn),  &c_7312052, r_733589, ((closureN)self_734732)->elements[0]);; 
}

static void __lambda_1042(void *data, object self_734733, int argc, object *args) /* object self_734733, object r_733587 */
 {
 object r_733587 = args[0];
  if( (boolean_f != r_733587) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734733)->elements[1], (((closure)  ((closureN)self_734733)->elements[1])->fn),  ((closureN)self_734733)->elements[0]);
} else { 
  
closureN_type c_7312057;
object e_7312061 [2];
c_7312057.hdr.mark = gc_color_red;
 c_7312057.hdr.grayed = 0;
c_7312057.tag = closureN_tag;
 c_7312057.fn = (function_type)__lambda_1043;
c_7312057.num_args = 1;
c_7312057.num_elements = 2;
c_7312057.elements = (object *)e_7312061;
c_7312057.elements[0] = ((closureN)self_734733)->elements[1];
c_7312057.elements[1] = ((closureN)self_734733)->elements[2];


object c_7312064 = Cyc_set_cdr_cps(data,(closure)&c_7312057,((closureN)self_734733)->elements[2], ((closureN)self_734733)->elements[0]);
return_closcall1(data,(closure)&c_7312057,  c_7312064);}
;; 
}

static void __lambda_1043(void *data, object self_734734, int argc, object *args) /* object self_734734, object r_733588 */
 {

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

static void __lambda_1038(void *data, object self_734735, int argc, object *args) /* object self_734735, object r_733584 */
 {
 object r_733584 = args[0];
  return_direct_with_clo4(data,  __glo_pair_91fold_srfi_1, (((closure)  __glo_pair_91fold_srfi_1)->fn),  ((closureN)self_734735)->elements[1], r_733584, ((closureN)self_734735)->elements[0], ((closureN)self_734735)->elements[2]);; 
}

static void __lambda_1035(void *data, object self_734736, int argc, object *args) /* object self_734736, object r_733578 */
 {
 object r_733578 = args[0];
  return_direct_with_clo4(data,  __glo_reduce_srfi_1, (((closure)  __glo_reduce_srfi_1)->fn),  ((closureN)self_734736)->elements[0], r_733578, NULL, ((closureN)self_734736)->elements[1]);; 
}

static void __lambda_1023(void *data, object _, int argc, object *args) /* closure _,object k_733561, object _123_731151_732033, object lists_731152_732034_raw, ... */
 {
object k_733561 = args[0]; object _123_731151_732033 = args[1];
load_varargs(lists_731152_732034, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/1.sld:lset-union");

closureN_type c_7311963;
object e_7312017 [3];
c_7311963.hdr.mark = gc_color_red;
 c_7311963.hdr.grayed = 0;
c_7311963.tag = closureN_tag;
 c_7311963.fn = (function_type)__lambda_1024;
c_7311963.num_args = 1;
c_7311963.num_elements = 3;
c_7311963.elements = (object *)e_7312017;
c_7311963.elements[0] = _123_731151_732033;
c_7311963.elements[1] = k_733561;
c_7311963.elements[2] = lists_731152_732034;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7311963, primitive_procedure_127, _123_731151_732033, __glo_lset_91union_srfi_1);; 
}

static void __lambda_1024(void *data, object self_734717, int argc, object *args) /* object self_734717, object r_733562 */
 {

  
closureN_type c_7311965;
object e_7311969 [2];
c_7311965.hdr.mark = gc_color_red;
 c_7311965.hdr.grayed = 0;
c_7311965.tag = closureN_tag;
 c_7311965.fn = (function_type)__lambda_1025;
c_7311965.num_args = 1;
c_7311965.num_elements = 2;
c_7311965.elements = (object *)e_7311969;
c_7311965.elements[0] = ((closureN)self_734717)->elements[1];
c_7311965.elements[1] = ((closureN)self_734717)->elements[2];


closureN_type c_7311970;
object e_7312016 [1];
c_7311970.hdr.mark = gc_color_red;
 c_7311970.hdr.grayed = 0;
c_7311970.tag = closureN_tag;
 c_7311970.fn = (function_type)__lambda_1026;
c_7311970.num_args = 2;
c_7311970.num_elements = 1;
c_7311970.elements = (object *)e_7312016;
c_7311970.elements[0] = ((closureN)self_734717)->elements[0];

return_direct_with_clo1(data,(closure)&c_7311965,__lambda_1025,  &c_7311970);; 
}

static void __lambda_1026(void *data, object self_734718, int argc, object *args) /* object self_734718, object k_733565, object lis_731153_732035, object ans_731154_732036 */
 {
 object k_733565 = args[0]; object lis_731153_732035 = args[1]; object ans_731154_732036 = args[2];
    
if( (boolean_f != Cyc_is_null(lis_731153_732035)) ){ 
  return_direct_with_clo1(data,  k_733565, (((closure)  k_733565)->fn),  ans_731154_732036);
} else { 
    
if( (boolean_f != Cyc_is_null(ans_731154_732036)) ){ 
  return_direct_with_clo1(data,  k_733565, (((closure)  k_733565)->fn),  lis_731153_732035);
} else { 
  
closureN_type c_7311978;
object e_7312013 [4];
c_7311978.hdr.mark = gc_color_red;
 c_7311978.hdr.grayed = 0;
c_7311978.tag = closureN_tag;
 c_7311978.fn = (function_type)__lambda_1027;
c_7311978.num_args = 1;
c_7311978.num_elements = 4;
c_7311978.elements = (object *)e_7312013;
c_7311978.elements[0] = ((closureN)self_734718)->elements[0];
c_7311978.elements[1] = ans_731154_732036;
c_7311978.elements[2] = k_733565;
c_7311978.elements[3] = lis_731153_732035;



return_direct_with_clo1(data,(closure)&c_7311978,__lambda_1027,  Cyc_eq(lis_731153_732035, ans_731154_732036));}
;}
;; 
}

static void __lambda_1027(void *data, object self_734719, int argc, object *args) /* object self_734719, object r_733568 */
 {
 object r_733568 = args[0];
  if( (boolean_f != r_733568) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734719)->elements[2], (((closure)  ((closureN)self_734719)->elements[2])->fn),  ((closureN)self_734719)->elements[1]);
} else { 
  
closureN_type c_7311983;
object e_7311988 [3];
c_7311983.hdr.mark = gc_color_red;
 c_7311983.hdr.grayed = 0;
c_7311983.tag = closureN_tag;
 c_7311983.fn = (function_type)__lambda_1028;
c_7311983.num_args = 1;
c_7311983.num_elements = 3;
c_7311983.elements = (object *)e_7311988;
c_7311983.elements[0] = ((closureN)self_734719)->elements[1];
c_7311983.elements[1] = ((closureN)self_734719)->elements[2];
c_7311983.elements[2] = ((closureN)self_734719)->elements[3];


closureN_type c_7311989;
object e_7312012 [1];
c_7311989.hdr.mark = gc_color_red;
 c_7311989.hdr.grayed = 0;
c_7311989.tag = closureN_tag;
 c_7311989.fn = (function_type)__lambda_1029;
c_7311989.num_args = 2;
c_7311989.num_elements = 1;
c_7311989.elements = (object *)e_7312012;
c_7311989.elements[0] = ((closureN)self_734719)->elements[0];

return_direct_with_clo1(data,(closure)&c_7311983,__lambda_1028,  &c_7311989);}
;; 
}

static void __lambda_1029(void *data, object self_734720, int argc, object *args) /* object self_734720, object k_733570, object elt_731165_732037, object ans_731166_732038 */
 {
 object k_733570 = args[0]; object elt_731165_732037 = args[1]; object ans_731166_732038 = args[2];
  
closureN_type c_7311991;
object e_7312006 [3];
c_7311991.hdr.mark = gc_color_red;
 c_7311991.hdr.grayed = 0;
c_7311991.tag = closureN_tag;
 c_7311991.fn = (function_type)__lambda_1030;
c_7311991.num_args = 1;
c_7311991.num_elements = 3;
c_7311991.elements = (object *)e_7312006;
c_7311991.elements[0] = ans_731166_732038;
c_7311991.elements[1] = elt_731165_732037;
c_7311991.elements[2] = k_733570;


closureN_type c_7312007;
object e_7312011 [2];
c_7312007.hdr.mark = gc_color_red;
 c_7312007.hdr.grayed = 0;
c_7312007.tag = closureN_tag;
 c_7312007.fn = (function_type)__lambda_1032;
c_7312007.num_args = 1;
c_7312007.num_elements = 2;
c_7312007.elements = (object *)e_7312011;
c_7312007.elements[0] = ((closureN)self_734720)->elements[0];
c_7312007.elements[1] = elt_731165_732037;

return_direct_with_clo1(data,(closure)&c_7311991,__lambda_1030,  &c_7312007);; 
}

static void __lambda_1032(void *data, object self_734721, int argc, object *args) /* object self_734721, object k_733573, object x_731167_732039 */
 {
 object k_733573 = args[0]; object x_731167_732039 = args[1];
  return_closcall3(data,  ((closureN)self_734721)->elements[0],  k_733573, x_731167_732039, ((closureN)self_734721)->elements[1]);; 
}

static void __lambda_1030(void *data, object self_734722, int argc, object *args) /* object self_734722, object r_733572 */
 {
 object r_733572 = args[0];
  
closureN_type c_7311993;
object e_7312004 [3];
c_7311993.hdr.mark = gc_color_red;
 c_7311993.hdr.grayed = 0;
c_7311993.tag = closureN_tag;
 c_7311993.fn = (function_type)__lambda_1031;
c_7311993.num_args = 1;
c_7311993.num_elements = 3;
c_7311993.elements = (object *)e_7312004;
c_7311993.elements[0] = ((closureN)self_734722)->elements[0];
c_7311993.elements[1] = ((closureN)self_734722)->elements[1];
c_7311993.elements[2] = ((closureN)self_734722)->elements[2];

return_direct_with_clo3(data,  __glo_any_srfi_1, (((closure)  __glo_any_srfi_1)->fn),  &c_7311993, r_733572, ((closureN)self_734722)->elements[0]);; 
}

static void __lambda_1031(void *data, object self_734723, int argc, object *args) /* object self_734723, object r_733571 */
 {
 object r_733571 = args[0];
  if( (boolean_f != r_733571) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734723)->elements[2], (((closure)  ((closureN)self_734723)->elements[2])->fn),  ((closureN)self_734723)->elements[0]);
} else { 
  
pair_type local_7312001; 
return_direct_with_clo1(data,  ((closureN)self_734723)->elements[2], (((closure)  ((closureN)self_734723)->elements[2])->fn),  set_pair_as_expr(&local_7312001, ((closureN)self_734723)->elements[1], ((closureN)self_734723)->elements[0]));}
;; 
}

static void __lambda_1028(void *data, object self_734724, int argc, object *args) /* object self_734724, object r_733569 */
 {
 object r_733569 = args[0];
  return_direct_with_clo4(data,  __glo_fold_srfi_1, (((closure)  __glo_fold_srfi_1)->fn),  ((closureN)self_734724)->elements[1], r_733569, ((closureN)self_734724)->elements[0], ((closureN)self_734724)->elements[2]);; 
}

static void __lambda_1025(void *data, object self_734725, int argc, object *args) /* object self_734725, object r_733563 */
 {
 object r_733563 = args[0];
  return_direct_with_clo4(data,  __glo_reduce_srfi_1, (((closure)  __glo_reduce_srfi_1)->fn),  ((closureN)self_734725)->elements[0], r_733563, NULL, ((closureN)self_734725)->elements[1]);; 
}

static void __lambda_1018(void *data, object _, int argc, object *args) /* closure _,object k_733554, object _123_731146_732028, object lis_731147_732029, object elts_731148_732030_raw, ... */
 {
object k_733554 = args[0]; object _123_731146_732028 = args[1]; object lis_731147_732029 = args[2];
load_varargs(elts_731148_732030, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/1.sld:lset-adjoin");

closureN_type c_7311936;
object e_7311960 [4];
c_7311936.hdr.mark = gc_color_red;
 c_7311936.hdr.grayed = 0;
c_7311936.tag = closureN_tag;
 c_7311936.fn = (function_type)__lambda_1019;
c_7311936.num_args = 1;
c_7311936.num_elements = 4;
c_7311936.elements = (object *)e_7311960;
c_7311936.elements[0] = _123_731146_732028;
c_7311936.elements[1] = elts_731148_732030;
c_7311936.elements[2] = k_733554;
c_7311936.elements[3] = lis_731147_732029;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7311936, primitive_procedure_127, _123_731146_732028, __glo_lset_91adjoin_srfi_1);; 
}

static void __lambda_1019(void *data, object self_734713, int argc, object *args) /* object self_734713, object r_733555 */
 {

  
closureN_type c_7311938;
object e_7311943 [3];
c_7311938.hdr.mark = gc_color_red;
 c_7311938.hdr.grayed = 0;
c_7311938.tag = closureN_tag;
 c_7311938.fn = (function_type)__lambda_1020;
c_7311938.num_args = 1;
c_7311938.num_elements = 3;
c_7311938.elements = (object *)e_7311943;
c_7311938.elements[0] = ((closureN)self_734713)->elements[1];
c_7311938.elements[1] = ((closureN)self_734713)->elements[2];
c_7311938.elements[2] = ((closureN)self_734713)->elements[3];


closureN_type c_7311944;
object e_7311959 [1];
c_7311944.hdr.mark = gc_color_red;
 c_7311944.hdr.grayed = 0;
c_7311944.tag = closureN_tag;
 c_7311944.fn = (function_type)__lambda_1021;
c_7311944.num_args = 2;
c_7311944.num_elements = 1;
c_7311944.elements = (object *)e_7311959;
c_7311944.elements[0] = ((closureN)self_734713)->elements[0];

return_direct_with_clo1(data,(closure)&c_7311938,__lambda_1020,  &c_7311944);; 
}

static void __lambda_1021(void *data, object self_734714, int argc, object *args) /* object self_734714, object k_733557, object elt_731149_732031, object ans_731150_732032 */
 {
 object k_733557 = args[0]; object elt_731149_732031 = args[1]; object ans_731150_732032 = args[2];
  
closureN_type c_7311946;
object e_7311957 [3];
c_7311946.hdr.mark = gc_color_red;
 c_7311946.hdr.grayed = 0;
c_7311946.tag = closureN_tag;
 c_7311946.fn = (function_type)__lambda_1022;
c_7311946.num_args = 1;
c_7311946.num_elements = 3;
c_7311946.elements = (object *)e_7311957;
c_7311946.elements[0] = ans_731150_732032;
c_7311946.elements[1] = elt_731149_732031;
c_7311946.elements[2] = k_733557;

return_direct_with_clo4(data,  __glo_member_scheme_base, (((closure)  __glo_member_scheme_base)->fn),  &c_7311946, elt_731149_732031, ans_731150_732032, ((closureN)self_734714)->elements[0]);; 
}

static void __lambda_1022(void *data, object self_734715, int argc, object *args) /* object self_734715, object r_733558 */
 {
 object r_733558 = args[0];
  if( (boolean_f != r_733558) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734715)->elements[2], (((closure)  ((closureN)self_734715)->elements[2])->fn),  ((closureN)self_734715)->elements[0]);
} else { 
  
pair_type local_7311954; 
return_direct_with_clo1(data,  ((closureN)self_734715)->elements[2], (((closure)  ((closureN)self_734715)->elements[2])->fn),  set_pair_as_expr(&local_7311954, ((closureN)self_734715)->elements[1], ((closureN)self_734715)->elements[0]));}
;; 
}

static void __lambda_1020(void *data, object self_734716, int argc, object *args) /* object self_734716, object r_733556 */
 {
 object r_733556 = args[0];
  return_direct_with_clo4(data,  __glo_fold_srfi_1, (((closure)  __glo_fold_srfi_1)->fn),  ((closureN)self_734716)->elements[1], r_733556, ((closureN)self_734716)->elements[2], ((closureN)self_734716)->elements[0]);; 
}

static void __lambda_1007(void *data, object _, int argc, object *args) /* closure _,object k_733535, object _123_731122_732016, object lists_731123_732017_raw, ... */
 {
object k_733535 = args[0]; object _123_731122_732016 = args[1];
load_varargs(lists_731123_732017, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/1.sld:lset=");

closureN_type c_7311826;
object e_7311933 [3];
c_7311826.hdr.mark = gc_color_red;
 c_7311826.hdr.grayed = 0;
c_7311826.tag = closureN_tag;
 c_7311826.fn = (function_type)__lambda_1008;
c_7311826.num_args = 1;
c_7311826.num_elements = 3;
c_7311826.elements = (object *)e_7311933;
c_7311826.elements[0] = _123_731122_732016;
c_7311826.elements[1] = k_733535;
c_7311826.elements[2] = lists_731123_732017;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7311826, primitive_procedure_127, _123_731122_732016, __glo_lset_123_srfi_1);; 
}

static void __lambda_1008(void *data, object self_734702, int argc, object *args) /* object self_734702, object r_733536 */
 {

    complex_num_type local_7311829; 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7311829, Cyc_is_pair(((closureN)self_734702)->elements[2]))) ){ 
  
complex_num_type local_7311837; 


return_direct_with_clo1(data,  ((closureN)self_734702)->elements[1], (((closure)  ((closureN)self_734702)->elements[1])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7311837, Cyc_is_pair(((closureN)self_734702)->elements[2])));
} else { 
  
closureN_type c_7311842;
object e_7311926 [2];
c_7311842.hdr.mark = gc_color_red;
 c_7311842.hdr.grayed = 0;
c_7311842.tag = closureN_tag;
 c_7311842.fn = (function_type)__lambda_1009;
c_7311842.num_args = 2;
c_7311842.num_elements = 2;
c_7311842.elements = (object *)e_7311926;
c_7311842.elements[0] = ((closureN)self_734702)->elements[0];
c_7311842.elements[1] = ((closureN)self_734702)->elements[1];





return_direct_with_clo2(data,(closure)&c_7311842,__lambda_1009,  Cyc_car(data, ((closureN)self_734702)->elements[2]), Cyc_cdr(data, ((closureN)self_734702)->elements[2]));}
;; 
}

static void __lambda_1009(void *data, object self_734703, int argc, object *args) /* object self_734703, object s1_731129_732019, object rest_731130_732020 */
 {
 object s1_731129_732019 = args[0]; object rest_731130_732020 = args[1];
  
closureN_type c_7311844;
object e_7311925 [4];
c_7311844.hdr.mark = gc_color_red;
 c_7311844.hdr.grayed = 0;
c_7311844.tag = closureN_tag;
 c_7311844.fn = (function_type)__lambda_1010;
c_7311844.num_args = 1;
c_7311844.num_elements = 4;
c_7311844.elements = (object *)e_7311925;
c_7311844.elements[0] = ((closureN)self_734703)->elements[0];
c_7311844.elements[1] = ((closureN)self_734703)->elements[1];
c_7311844.elements[2] = rest_731130_732020;
c_7311844.elements[3] = s1_731129_732019;

return_direct_with_clo1(data,(closure)&c_7311844,__lambda_1010,  boolean_f);; 
}

static void __lambda_1010(void *data, object self_734704, int argc, object *args) /* object self_734704, object lp_731131_732021 */
 {
 object lp_731131_732021 = args[0];
  
closureN_type c_7311846;
object e_7311921 [4];
c_7311846.hdr.mark = gc_color_red;
 c_7311846.hdr.grayed = 0;
c_7311846.tag = closureN_tag;
 c_7311846.fn = (function_type)__lambda_1211;
c_7311846.num_args = 1;
c_7311846.num_elements = 4;
c_7311846.elements = (object *)e_7311921;
c_7311846.elements[0] = ((closureN)self_734704)->elements[0];
c_7311846.elements[1] = ((closureN)self_734704)->elements[1];
c_7311846.elements[2] = ((closureN)self_734704)->elements[2];
c_7311846.elements[3] = ((closureN)self_734704)->elements[3];


pair_type local_7311924; 
return_direct_with_clo1(data,(closure)&c_7311846,__lambda_1211,  set_cell_as_expr(&local_7311924, lp_731131_732021));; 
}

static void __lambda_1211(void *data, object self_734705, int argc, object *args) /* object self_734705, object lp_731131_732021 */
 {
 object lp_731131_732021 = args[0];
  
closureN_type c_7311848;
object e_7311862 [4];
c_7311848.hdr.mark = gc_color_red;
 c_7311848.hdr.grayed = 0;
c_7311848.tag = closureN_tag;
 c_7311848.fn = (function_type)__lambda_1011;
c_7311848.num_args = 1;
c_7311848.num_elements = 4;
c_7311848.elements = (object *)e_7311862;
c_7311848.elements[0] = ((closureN)self_734705)->elements[1];
c_7311848.elements[1] = lp_731131_732021;
c_7311848.elements[2] = ((closureN)self_734705)->elements[2];
c_7311848.elements[3] = ((closureN)self_734705)->elements[3];


closureN_type c_7311863;
object e_7311920 [2];
c_7311863.hdr.mark = gc_color_red;
 c_7311863.hdr.grayed = 0;
c_7311863.tag = closureN_tag;
 c_7311863.fn = (function_type)__lambda_1013;
c_7311863.num_args = 2;
c_7311863.num_elements = 2;
c_7311863.elements = (object *)e_7311920;
c_7311863.elements[0] = ((closureN)self_734705)->elements[0];
c_7311863.elements[1] = lp_731131_732021;

return_direct_with_clo1(data,(closure)&c_7311848,__lambda_1011,  &c_7311863);; 
}

static void __lambda_1013(void *data, object self_734706, int argc, object *args) /* object self_734706, object k_733542, object s1_731132_732022, object rest_731133_732023 */
 {
 object k_733542 = args[0]; object s1_731132_732022 = args[1]; object rest_731133_732023 = args[2];
    complex_num_type local_7311866; 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7311866, Cyc_is_pair(rest_731133_732023))) ){ 
  
complex_num_type local_7311872; 


return_direct_with_clo1(data,  k_733542, (((closure)  k_733542)->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7311872, Cyc_is_pair(rest_731133_732023)));
} else { 
  
closureN_type c_7311876;
object e_7311915 [5];
c_7311876.hdr.mark = gc_color_red;
 c_7311876.hdr.grayed = 0;
c_7311876.tag = closureN_tag;
 c_7311876.fn = (function_type)__lambda_1014;
c_7311876.num_args = 1;
c_7311876.num_elements = 5;
c_7311876.elements = (object *)e_7311915;
c_7311876.elements[0] = ((closureN)self_734706)->elements[0];
c_7311876.elements[1] = k_733542;
c_7311876.elements[2] = ((closureN)self_734706)->elements[1];
c_7311876.elements[3] = rest_731133_732023;
c_7311876.elements[4] = s1_731132_732022;





return_direct_with_clo1(data,(closure)&c_7311876,__lambda_1014,  Cyc_eq(s1_731132_732022, Cyc_car(data, rest_731133_732023)));}
;; 
}

static void __lambda_1014(void *data, object self_734707, int argc, object *args) /* object self_734707, object tmp_731142_731144_732027 */
 {
 object tmp_731142_731144_732027 = args[0];
  
closureN_type c_7311878;
object e_7311899 [4];
c_7311878.hdr.mark = gc_color_red;
 c_7311878.hdr.grayed = 0;
c_7311878.tag = closureN_tag;
 c_7311878.fn = (function_type)__lambda_1015;
c_7311878.num_args = 0;
c_7311878.num_elements = 4;
c_7311878.elements = (object *)e_7311899;
c_7311878.elements[0] = ((closureN)self_734707)->elements[0];
c_7311878.elements[1] = ((closureN)self_734707)->elements[3];
c_7311878.elements[2] = ((closureN)self_734707)->elements[4];
c_7311878.elements[3] = tmp_731142_731144_732027;


closureN_type c_7311900;
object e_7311914 [3];
c_7311900.hdr.mark = gc_color_red;
 c_7311900.hdr.grayed = 0;
c_7311900.tag = closureN_tag;
 c_7311900.fn = (function_type)__lambda_1017;
c_7311900.num_args = 1;
c_7311900.num_elements = 3;
c_7311900.elements = (object *)e_7311914;
c_7311900.elements[0] = ((closureN)self_734707)->elements[1];
c_7311900.elements[1] = ((closureN)self_734707)->elements[2];
c_7311900.elements[2] = ((closureN)self_734707)->elements[3];

return_direct_with_clo1(data,(closure)&c_7311878,__lambda_1015,  &c_7311900);; 
}

static void __lambda_1017(void *data, object self_734708, int argc, object *args) /* object self_734708, object r_733546 */
 {
 object r_733546 = args[0];
  if( (boolean_f != r_733546) ){ 
  





return_closcall3(data,  car(((closureN)self_734708)->elements[1]),  ((closureN)self_734708)->elements[0], Cyc_car(data, ((closureN)self_734708)->elements[2]), Cyc_cdr(data, ((closureN)self_734708)->elements[2]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734708)->elements[0], (((closure)  ((closureN)self_734708)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_1015(void *data, object self_734709, int argc, object *args) /* object self_734709, object k_733548 */
 {
 object k_733548 = args[0];
  if( (boolean_f != ((closureN)self_734709)->elements[3]) ){ 
  return_direct_with_clo1(data,  k_733548, (((closure)  k_733548)->fn),  ((closureN)self_734709)->elements[3]);
} else { 
  
closureN_type c_7311883;
object e_7311893 [4];
c_7311883.hdr.mark = gc_color_red;
 c_7311883.hdr.grayed = 0;
c_7311883.tag = closureN_tag;
 c_7311883.fn = (function_type)__lambda_1016;
c_7311883.num_args = 1;
c_7311883.num_elements = 4;
c_7311883.elements = (object *)e_7311893;
c_7311883.elements[0] = ((closureN)self_734709)->elements[0];
c_7311883.elements[1] = k_733548;
c_7311883.elements[2] = ((closureN)self_734709)->elements[1];
c_7311883.elements[3] = ((closureN)self_734709)->elements[2];



return_direct_with_clo4(data,  __glo__75lset2_121_123_srfi_1, (((closure)  __glo__75lset2_121_123_srfi_1)->fn),  &c_7311883, ((closureN)self_734709)->elements[0], ((closureN)self_734709)->elements[2], Cyc_car(data, ((closureN)self_734709)->elements[1]));}
;; 
}

static void __lambda_1016(void *data, object self_734710, int argc, object *args) /* object self_734710, object r_733549 */
 {
 object r_733549 = args[0];
  if( (boolean_f != r_733549) ){ 
  

return_direct_with_clo4(data,  __glo__75lset2_121_123_srfi_1, (((closure)  __glo__75lset2_121_123_srfi_1)->fn),  ((closureN)self_734710)->elements[1], ((closureN)self_734710)->elements[0], Cyc_car(data, ((closureN)self_734710)->elements[2]), ((closureN)self_734710)->elements[3]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734710)->elements[1], (((closure)  ((closureN)self_734710)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_1011(void *data, object self_734711, int argc, object *args) /* object self_734711, object r_733541 */
 {
 object r_733541 = args[0];
  
closureN_type c_7311850;
object e_7311858 [4];
c_7311850.hdr.mark = gc_color_red;
 c_7311850.hdr.grayed = 0;
c_7311850.tag = closureN_tag;
 c_7311850.fn = (function_type)__lambda_1012;
c_7311850.num_args = 1;
c_7311850.num_elements = 4;
c_7311850.elements = (object *)e_7311858;
c_7311850.elements[0] = ((closureN)self_734711)->elements[0];
c_7311850.elements[1] = ((closureN)self_734711)->elements[1];
c_7311850.elements[2] = ((closureN)self_734711)->elements[2];
c_7311850.elements[3] = ((closureN)self_734711)->elements[3];



return_direct_with_clo1(data,(closure)&c_7311850,__lambda_1012,  Cyc_set_cell(data, ((closureN)self_734711)->elements[1], r_733541));; 
}

static void __lambda_1012(void *data, object self_734712, int argc, object *args) /* object self_734712, object r_733540 */
 {

  

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

static void __lambda_997(void *data, object _, int argc, object *args) /* closure _,object k_733517, object _123_731099_732004, object lists_731100_732005_raw, ... */
 {
object k_733517 = args[0]; object _123_731099_732004 = args[1];
load_varargs(lists_731100_732005, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/1.sld:lset<=");

closureN_type c_7311727;
object e_7311823 [3];
c_7311727.hdr.mark = gc_color_red;
 c_7311727.hdr.grayed = 0;
c_7311727.tag = closureN_tag;
 c_7311727.fn = (function_type)__lambda_998;
c_7311727.num_args = 1;
c_7311727.num_elements = 3;
c_7311727.elements = (object *)e_7311823;
c_7311727.elements[0] = _123_731099_732004;
c_7311727.elements[1] = k_733517;
c_7311727.elements[2] = lists_731100_732005;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7311727, primitive_procedure_127, _123_731099_732004, __glo_lset_121_123_srfi_1);; 
}

static void __lambda_998(void *data, object self_734692, int argc, object *args) /* object self_734692, object r_733518 */
 {

    complex_num_type local_7311730; 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7311730, Cyc_is_pair(((closureN)self_734692)->elements[2]))) ){ 
  
complex_num_type local_7311738; 


return_direct_with_clo1(data,  ((closureN)self_734692)->elements[1], (((closure)  ((closureN)self_734692)->elements[1])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7311738, Cyc_is_pair(((closureN)self_734692)->elements[2])));
} else { 
  
closureN_type c_7311743;
object e_7311816 [2];
c_7311743.hdr.mark = gc_color_red;
 c_7311743.hdr.grayed = 0;
c_7311743.tag = closureN_tag;
 c_7311743.fn = (function_type)__lambda_999;
c_7311743.num_args = 2;
c_7311743.num_elements = 2;
c_7311743.elements = (object *)e_7311816;
c_7311743.elements[0] = ((closureN)self_734692)->elements[0];
c_7311743.elements[1] = ((closureN)self_734692)->elements[1];





return_direct_with_clo2(data,(closure)&c_7311743,__lambda_999,  Cyc_car(data, ((closureN)self_734692)->elements[2]), Cyc_cdr(data, ((closureN)self_734692)->elements[2]));}
;; 
}

static void __lambda_999(void *data, object self_734693, int argc, object *args) /* object self_734693, object s1_731106_732007, object rest_731107_732008 */
 {
 object s1_731106_732007 = args[0]; object rest_731107_732008 = args[1];
  
closureN_type c_7311745;
object e_7311815 [4];
c_7311745.hdr.mark = gc_color_red;
 c_7311745.hdr.grayed = 0;
c_7311745.tag = closureN_tag;
 c_7311745.fn = (function_type)__lambda_1000;
c_7311745.num_args = 1;
c_7311745.num_elements = 4;
c_7311745.elements = (object *)e_7311815;
c_7311745.elements[0] = ((closureN)self_734693)->elements[0];
c_7311745.elements[1] = ((closureN)self_734693)->elements[1];
c_7311745.elements[2] = rest_731107_732008;
c_7311745.elements[3] = s1_731106_732007;

return_direct_with_clo1(data,(closure)&c_7311745,__lambda_1000,  boolean_f);; 
}

static void __lambda_1000(void *data, object self_734694, int argc, object *args) /* object self_734694, object lp_731108_732009 */
 {
 object lp_731108_732009 = args[0];
  
closureN_type c_7311747;
object e_7311811 [4];
c_7311747.hdr.mark = gc_color_red;
 c_7311747.hdr.grayed = 0;
c_7311747.tag = closureN_tag;
 c_7311747.fn = (function_type)__lambda_1210;
c_7311747.num_args = 1;
c_7311747.num_elements = 4;
c_7311747.elements = (object *)e_7311811;
c_7311747.elements[0] = ((closureN)self_734694)->elements[0];
c_7311747.elements[1] = ((closureN)self_734694)->elements[1];
c_7311747.elements[2] = ((closureN)self_734694)->elements[2];
c_7311747.elements[3] = ((closureN)self_734694)->elements[3];


pair_type local_7311814; 
return_direct_with_clo1(data,(closure)&c_7311747,__lambda_1210,  set_cell_as_expr(&local_7311814, lp_731108_732009));; 
}

static void __lambda_1210(void *data, object self_734695, int argc, object *args) /* object self_734695, object lp_731108_732009 */
 {
 object lp_731108_732009 = args[0];
  
closureN_type c_7311749;
object e_7311763 [4];
c_7311749.hdr.mark = gc_color_red;
 c_7311749.hdr.grayed = 0;
c_7311749.tag = closureN_tag;
 c_7311749.fn = (function_type)__lambda_1001;
c_7311749.num_args = 1;
c_7311749.num_elements = 4;
c_7311749.elements = (object *)e_7311763;
c_7311749.elements[0] = ((closureN)self_734695)->elements[1];
c_7311749.elements[1] = lp_731108_732009;
c_7311749.elements[2] = ((closureN)self_734695)->elements[2];
c_7311749.elements[3] = ((closureN)self_734695)->elements[3];


closureN_type c_7311764;
object e_7311810 [2];
c_7311764.hdr.mark = gc_color_red;
 c_7311764.hdr.grayed = 0;
c_7311764.tag = closureN_tag;
 c_7311764.fn = (function_type)__lambda_1003;
c_7311764.num_args = 2;
c_7311764.num_elements = 2;
c_7311764.elements = (object *)e_7311810;
c_7311764.elements[0] = ((closureN)self_734695)->elements[0];
c_7311764.elements[1] = lp_731108_732009;

return_direct_with_clo1(data,(closure)&c_7311749,__lambda_1001,  &c_7311764);; 
}

static void __lambda_1003(void *data, object self_734696, int argc, object *args) /* object self_734696, object k_733524, object s1_731109_732010, object rest_731110_732011 */
 {
 object k_733524 = args[0]; object s1_731109_732010 = args[1]; object rest_731110_732011 = args[2];
    complex_num_type local_7311767; 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7311767, Cyc_is_pair(rest_731110_732011))) ){ 
  
complex_num_type local_7311773; 


return_direct_with_clo1(data,  k_733524, (((closure)  k_733524)->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7311773, Cyc_is_pair(rest_731110_732011)));
} else { 
  
closureN_type c_7311777;
object e_7311805 [5];
c_7311777.hdr.mark = gc_color_red;
 c_7311777.hdr.grayed = 0;
c_7311777.tag = closureN_tag;
 c_7311777.fn = (function_type)__lambda_1004;
c_7311777.num_args = 1;
c_7311777.num_elements = 5;
c_7311777.elements = (object *)e_7311805;
c_7311777.elements[0] = ((closureN)self_734696)->elements[0];
c_7311777.elements[1] = k_733524;
c_7311777.elements[2] = ((closureN)self_734696)->elements[1];
c_7311777.elements[3] = rest_731110_732011;
c_7311777.elements[4] = s1_731109_732010;





return_direct_with_clo1(data,(closure)&c_7311777,__lambda_1004,  Cyc_eq(Cyc_car(data, rest_731110_732011), s1_731109_732010));}
;; 
}

static void __lambda_1004(void *data, object self_734697, int argc, object *args) /* object self_734697, object tmp_731119_731121_732015 */
 {
 object tmp_731119_731121_732015 = args[0];
  
closureN_type c_7311779;
object e_7311789 [4];
c_7311779.hdr.mark = gc_color_red;
 c_7311779.hdr.grayed = 0;
c_7311779.tag = closureN_tag;
 c_7311779.fn = (function_type)__lambda_1005;
c_7311779.num_args = 0;
c_7311779.num_elements = 4;
c_7311779.elements = (object *)e_7311789;
c_7311779.elements[0] = ((closureN)self_734697)->elements[0];
c_7311779.elements[1] = ((closureN)self_734697)->elements[3];
c_7311779.elements[2] = ((closureN)self_734697)->elements[4];
c_7311779.elements[3] = tmp_731119_731121_732015;


closureN_type c_7311790;
object e_7311804 [3];
c_7311790.hdr.mark = gc_color_red;
 c_7311790.hdr.grayed = 0;
c_7311790.tag = closureN_tag;
 c_7311790.fn = (function_type)__lambda_1006;
c_7311790.num_args = 1;
c_7311790.num_elements = 3;
c_7311790.elements = (object *)e_7311804;
c_7311790.elements[0] = ((closureN)self_734697)->elements[1];
c_7311790.elements[1] = ((closureN)self_734697)->elements[2];
c_7311790.elements[2] = ((closureN)self_734697)->elements[3];

return_direct_with_clo1(data,(closure)&c_7311779,__lambda_1005,  &c_7311790);; 
}

static void __lambda_1006(void *data, object self_734698, int argc, object *args) /* object self_734698, object r_733528 */
 {
 object r_733528 = args[0];
  if( (boolean_f != r_733528) ){ 
  





return_closcall3(data,  car(((closureN)self_734698)->elements[1]),  ((closureN)self_734698)->elements[0], Cyc_car(data, ((closureN)self_734698)->elements[2]), Cyc_cdr(data, ((closureN)self_734698)->elements[2]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734698)->elements[0], (((closure)  ((closureN)self_734698)->elements[0])->fn),  boolean_f);}
;; 
}

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

return_direct_with_clo4(data,  __glo__75lset2_121_123_srfi_1, (((closure)  __glo__75lset2_121_123_srfi_1)->fn),  k_733530, ((closureN)self_734699)->elements[0], ((closureN)self_734699)->elements[2], Cyc_car(data, ((closureN)self_734699)->elements[1]));}
;; 
}

static void __lambda_1001(void *data, object self_734700, int argc, object *args) /* object self_734700, object r_733523 */
 {
 object r_733523 = args[0];
  
closureN_type c_7311751;
object e_7311759 [4];
c_7311751.hdr.mark = gc_color_red;
 c_7311751.hdr.grayed = 0;
c_7311751.tag = closureN_tag;
 c_7311751.fn = (function_type)__lambda_1002;
c_7311751.num_args = 1;
c_7311751.num_elements = 4;
c_7311751.elements = (object *)e_7311759;
c_7311751.elements[0] = ((closureN)self_734700)->elements[0];
c_7311751.elements[1] = ((closureN)self_734700)->elements[1];
c_7311751.elements[2] = ((closureN)self_734700)->elements[2];
c_7311751.elements[3] = ((closureN)self_734700)->elements[3];



return_direct_with_clo1(data,(closure)&c_7311751,__lambda_1002,  Cyc_set_cell(data, ((closureN)self_734700)->elements[1], r_733523));; 
}

static void __lambda_1002(void *data, object self_734701, int argc, object *args) /* object self_734701, object r_733522 */
 {

  

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

static void __lambda_994(void *data, object _, int argc, object *args) /* closure _,object k_733512, object _123_731095_732000, object lis1_731096_732001, object lis2_731097_732002 */
 {
object k_733512 = args[0]; object _123_731095_732000 = args[1]; object lis1_731096_732001 = args[2]; object lis2_731097_732002 = args[3];
  Cyc_st_add(data, "srfi/1.sld:%lset2<=");

closureN_type c_7311715;
object e_7311719 [2];
c_7311715.hdr.mark = gc_color_red;
 c_7311715.hdr.grayed = 0;
c_7311715.tag = closureN_tag;
 c_7311715.fn = (function_type)__lambda_995;
c_7311715.num_args = 1;
c_7311715.num_elements = 2;
c_7311715.elements = (object *)e_7311719;
c_7311715.elements[0] = k_733512;
c_7311715.elements[1] = lis1_731096_732001;


closureN_type c_7311720;
object e_7311724 [2];
c_7311720.hdr.mark = gc_color_red;
 c_7311720.hdr.grayed = 0;
c_7311720.tag = closureN_tag;
 c_7311720.fn = (function_type)__lambda_996;
c_7311720.num_args = 1;
c_7311720.num_elements = 2;
c_7311720.elements = (object *)e_7311724;
c_7311720.elements[0] = _123_731095_732000;
c_7311720.elements[1] = lis2_731097_732002;

return_direct_with_clo1(data,(closure)&c_7311715,__lambda_995,  &c_7311720);; 
}

static void __lambda_996(void *data, object self_734690, int argc, object *args) /* object self_734690, object k_733514, object x_731098_732003 */
 {
 object k_733514 = args[0]; object x_731098_732003 = args[1];
  return_direct_with_clo4(data,  __glo_member_scheme_base, (((closure)  __glo_member_scheme_base)->fn),  k_733514, x_731098_732003, ((closureN)self_734690)->elements[1], ((closureN)self_734690)->elements[0]);; 
}

static void __lambda_995(void *data, object self_734691, int argc, object *args) /* object self_734691, object r_733513 */
 {
 object r_733513 = args[0];
  return_direct_with_clo3(data,  __glo_every_srfi_1, (((closure)  __glo_every_srfi_1)->fn),  ((closureN)self_734691)->elements[0], r_733513, ((closureN)self_734691)->elements[1]);; 
}

static void __lambda_985(void *data, object _, int argc, object *args) /* closure _,object k_733502, object lis_731087_731993 */
 {
object k_733502 = args[0]; object lis_731087_731993 = args[1];
  Cyc_st_add(data, "srfi/1.sld:reverse!");

closureN_type c_7311657;
object e_7311712 [1];
c_7311657.hdr.mark = gc_color_red;
 c_7311657.hdr.grayed = 0;
c_7311657.tag = closureN_tag;
 c_7311657.fn = (function_type)__lambda_986;
c_7311657.num_args = 2;
c_7311657.num_elements = 1;
c_7311657.elements = (object *)e_7311712;
c_7311657.elements[0] = k_733502;

return_direct_with_clo2(data,(closure)&c_7311657,__lambda_986,  lis_731087_731993, NULL);; 
}

static void __lambda_986(void *data, object self_734681, int argc, object *args) /* object self_734681, object lis_731089_731994, object ans_731090_731995 */
 {
 object lis_731089_731994 = args[0]; object ans_731090_731995 = args[1];
  
closureN_type c_7311659;
object e_7311711 [3];
c_7311659.hdr.mark = gc_color_red;
 c_7311659.hdr.grayed = 0;
c_7311659.tag = closureN_tag;
 c_7311659.fn = (function_type)__lambda_987;
c_7311659.num_args = 1;
c_7311659.num_elements = 3;
c_7311659.elements = (object *)e_7311711;
c_7311659.elements[0] = ans_731090_731995;
c_7311659.elements[1] = ((closureN)self_734681)->elements[0];
c_7311659.elements[2] = lis_731089_731994;

return_direct_with_clo1(data,(closure)&c_7311659,__lambda_987,  boolean_f);; 
}

static void __lambda_987(void *data, object self_734682, int argc, object *args) /* object self_734682, object lp_731091_731996 */
 {
 object lp_731091_731996 = args[0];
  
closureN_type c_7311661;
object e_7311707 [3];
c_7311661.hdr.mark = gc_color_red;
 c_7311661.hdr.grayed = 0;
c_7311661.tag = closureN_tag;
 c_7311661.fn = (function_type)__lambda_1209;
c_7311661.num_args = 1;
c_7311661.num_elements = 3;
c_7311661.elements = (object *)e_7311707;
c_7311661.elements[0] = ((closureN)self_734682)->elements[0];
c_7311661.elements[1] = ((closureN)self_734682)->elements[1];
c_7311661.elements[2] = ((closureN)self_734682)->elements[2];


pair_type local_7311710; 
return_direct_with_clo1(data,(closure)&c_7311661,__lambda_1209,  set_cell_as_expr(&local_7311710, lp_731091_731996));; 
}

static void __lambda_1209(void *data, object self_734683, int argc, object *args) /* object self_734683, object lp_731091_731996 */
 {
 object lp_731091_731996 = args[0];
  
closureN_type c_7311663;
object e_7311677 [4];
c_7311663.hdr.mark = gc_color_red;
 c_7311663.hdr.grayed = 0;
c_7311663.tag = closureN_tag;
 c_7311663.fn = (function_type)__lambda_988;
c_7311663.num_args = 1;
c_7311663.num_elements = 4;
c_7311663.elements = (object *)e_7311677;
c_7311663.elements[0] = ((closureN)self_734683)->elements[0];
c_7311663.elements[1] = ((closureN)self_734683)->elements[1];
c_7311663.elements[2] = ((closureN)self_734683)->elements[2];
c_7311663.elements[3] = lp_731091_731996;


closureN_type c_7311678;
object e_7311706 [1];
c_7311678.hdr.mark = gc_color_red;
 c_7311678.hdr.grayed = 0;
c_7311678.tag = closureN_tag;
 c_7311678.fn = (function_type)__lambda_990;
c_7311678.num_args = 2;
c_7311678.num_elements = 1;
c_7311678.elements = (object *)e_7311706;
c_7311678.elements[0] = lp_731091_731996;

return_direct_with_clo1(data,(closure)&c_7311663,__lambda_988,  &c_7311678);; 
}

static void __lambda_990(void *data, object self_734684, int argc, object *args) /* object self_734684, object k_733506, object lis_731092_731997, object ans_731093_731998 */
 {
 object k_733506 = args[0]; object lis_731092_731997 = args[1]; object ans_731093_731998 = args[2];
  
closureN_type c_7311680;
object e_7311705 [4];
c_7311680.hdr.mark = gc_color_red;
 c_7311680.hdr.grayed = 0;
c_7311680.tag = closureN_tag;
 c_7311680.fn = (function_type)__lambda_991;
c_7311680.num_args = 1;
c_7311680.num_elements = 4;
c_7311680.elements = (object *)e_7311705;
c_7311680.elements[0] = ans_731093_731998;
c_7311680.elements[1] = k_733506;
c_7311680.elements[2] = lis_731092_731997;
c_7311680.elements[3] = ((closureN)self_734684)->elements[0];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_7311680, lis_731092_731997);; 
}

static void __lambda_991(void *data, object self_734685, int argc, object *args) /* object self_734685, object r_733507 */
 {
 object r_733507 = args[0];
  if( (boolean_f != r_733507) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734685)->elements[1], (((closure)  ((closureN)self_734685)->elements[1])->fn),  ((closureN)self_734685)->elements[0]);
} else { 
  
closureN_type c_7311685;
object e_7311701 [4];
c_7311685.hdr.mark = gc_color_red;
 c_7311685.hdr.grayed = 0;
c_7311685.tag = closureN_tag;
 c_7311685.fn = (function_type)__lambda_992;
c_7311685.num_args = 1;
c_7311685.num_elements = 4;
c_7311685.elements = (object *)e_7311701;
c_7311685.elements[0] = ((closureN)self_734685)->elements[0];
c_7311685.elements[1] = ((closureN)self_734685)->elements[1];
c_7311685.elements[2] = ((closureN)self_734685)->elements[2];
c_7311685.elements[3] = ((closureN)self_734685)->elements[3];



return_direct_with_clo1(data,(closure)&c_7311685,__lambda_992,  Cyc_cdr(data, ((closureN)self_734685)->elements[2]));}
;; 
}

static void __lambda_992(void *data, object self_734686, int argc, object *args) /* object self_734686, object tail_731094_731999 */
 {
 object tail_731094_731999 = args[0];
  
closureN_type c_7311687;
object e_7311695 [4];
c_7311687.hdr.mark = gc_color_red;
 c_7311687.hdr.grayed = 0;
c_7311687.tag = closureN_tag;
 c_7311687.fn = (function_type)__lambda_993;
c_7311687.num_args = 1;
c_7311687.num_elements = 4;
c_7311687.elements = (object *)e_7311695;
c_7311687.elements[0] = ((closureN)self_734686)->elements[1];
c_7311687.elements[1] = ((closureN)self_734686)->elements[2];
c_7311687.elements[2] = ((closureN)self_734686)->elements[3];
c_7311687.elements[3] = tail_731094_731999;


object c_7311698 = Cyc_set_cdr_cps(data,(closure)&c_7311687,((closureN)self_734686)->elements[2], ((closureN)self_734686)->elements[0]);
return_closcall1(data,(closure)&c_7311687,  c_7311698);; 
}

static void __lambda_993(void *data, object self_734687, int argc, object *args) /* object self_734687, object r_733509 */
 {

  

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

static void __lambda_988(void *data, object self_734688, int argc, object *args) /* object self_734688, object r_733505 */
 {
 object r_733505 = args[0];
  
closureN_type c_7311665;
object e_7311673 [4];
c_7311665.hdr.mark = gc_color_red;
 c_7311665.hdr.grayed = 0;
c_7311665.tag = closureN_tag;
 c_7311665.fn = (function_type)__lambda_989;
c_7311665.num_args = 1;
c_7311665.num_elements = 4;
c_7311665.elements = (object *)e_7311673;
c_7311665.elements[0] = ((closureN)self_734688)->elements[0];
c_7311665.elements[1] = ((closureN)self_734688)->elements[1];
c_7311665.elements[2] = ((closureN)self_734688)->elements[2];
c_7311665.elements[3] = ((closureN)self_734688)->elements[3];



return_direct_with_clo1(data,(closure)&c_7311665,__lambda_989,  Cyc_set_cell(data, ((closureN)self_734688)->elements[3], r_733505));; 
}

static void __lambda_989(void *data, object self_734689, int argc, object *args) /* object self_734689, object r_733504 */
 {

  

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

static void __lambda_966(void *data, object _, int argc, object *args) /* closure _,object k_733478, object pred_731068_731978, object lis1_731069_731979, object lists_731070_731980_raw, ... */
 {
object k_733478 = args[0]; object pred_731068_731978 = args[1]; object lis1_731069_731979 = args[2];
load_varargs(lists_731070_731980, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/1.sld:list-index");

closureN_type c_7311521;
object e_7311654 [4];
c_7311521.hdr.mark = gc_color_red;
 c_7311521.hdr.grayed = 0;
c_7311521.tag = closureN_tag;
 c_7311521.fn = (function_type)__lambda_967;
c_7311521.num_args = 1;
c_7311521.num_elements = 4;
c_7311521.elements = (object *)e_7311654;
c_7311521.elements[0] = k_733478;
c_7311521.elements[1] = lis1_731069_731979;
c_7311521.elements[2] = lists_731070_731980;
c_7311521.elements[3] = pred_731068_731978;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7311521, primitive_procedure_127, pred_731068_731978, __glo_list_91index_srfi_1);; 
}

static void __lambda_967(void *data, object self_734661, int argc, object *args) /* object self_734661, object r_733479 */
 {

    
if( (boolean_f != Cyc_is_pair(((closureN)self_734661)->elements[2])) ){ 
  
closureN_type c_7311526;
object e_7311591 [2];
c_7311526.hdr.mark = gc_color_red;
 c_7311526.hdr.grayed = 0;
c_7311526.tag = closureN_tag;
 c_7311526.fn = (function_type)__lambda_968;
c_7311526.num_args = 1;
c_7311526.num_elements = 2;
c_7311526.elements = (object *)e_7311591;
c_7311526.elements[0] = ((closureN)self_734661)->elements[0];
c_7311526.elements[1] = ((closureN)self_734661)->elements[3];


pair_type local_7311594; 
return_direct_with_clo1(data,(closure)&c_7311526,__lambda_968,  set_pair_as_expr(&local_7311594, ((closureN)self_734661)->elements[1], ((closureN)self_734661)->elements[2]));
} else { 
  
closureN_type c_7311598;
object e_7311652 [2];
c_7311598.hdr.mark = gc_color_red;
 c_7311598.hdr.grayed = 0;
c_7311598.tag = closureN_tag;
 c_7311598.fn = (function_type)__lambda_978;
c_7311598.num_args = 1;
c_7311598.num_elements = 2;
c_7311598.elements = (object *)e_7311652;
c_7311598.elements[0] = ((closureN)self_734661)->elements[0];
c_7311598.elements[1] = ((closureN)self_734661)->elements[3];

return_direct_with_clo1(data,(closure)&c_7311598,__lambda_978,  ((closureN)self_734661)->elements[1]);}
;; 
}

static void __lambda_978(void *data, object self_734673, int argc, object *args) /* object self_734673, object lis_731081_731988 */
 {
 object lis_731081_731988 = args[0];
  
closureN_type c_7311600;
object e_7311651 [3];
c_7311600.hdr.mark = gc_color_red;
 c_7311600.hdr.grayed = 0;
c_7311600.tag = closureN_tag;
 c_7311600.fn = (function_type)__lambda_979;
c_7311600.num_args = 1;
c_7311600.num_elements = 3;
c_7311600.elements = (object *)e_7311651;
c_7311600.elements[0] = ((closureN)self_734673)->elements[0];
c_7311600.elements[1] = lis_731081_731988;
c_7311600.elements[2] = ((closureN)self_734673)->elements[1];

return_direct_with_clo1(data,(closure)&c_7311600,__lambda_979,  boolean_f);; 
}

static void __lambda_979(void *data, object self_734674, int argc, object *args) /* object self_734674, object lp_731083_731990 */
 {
 object lp_731083_731990 = args[0];
  
closureN_type c_7311602;
object e_7311647 [3];
c_7311602.hdr.mark = gc_color_red;
 c_7311602.hdr.grayed = 0;
c_7311602.tag = closureN_tag;
 c_7311602.fn = (function_type)__lambda_1208;
c_7311602.num_args = 1;
c_7311602.num_elements = 3;
c_7311602.elements = (object *)e_7311647;
c_7311602.elements[0] = ((closureN)self_734674)->elements[0];
c_7311602.elements[1] = ((closureN)self_734674)->elements[1];
c_7311602.elements[2] = ((closureN)self_734674)->elements[2];


pair_type local_7311650; 
return_direct_with_clo1(data,(closure)&c_7311602,__lambda_1208,  set_cell_as_expr(&local_7311650, lp_731083_731990));; 
}

static void __lambda_1208(void *data, object self_734675, int argc, object *args) /* object self_734675, object lp_731083_731990 */
 {
 object lp_731083_731990 = args[0];
  
closureN_type c_7311604;
object e_7311617 [3];
c_7311604.hdr.mark = gc_color_red;
 c_7311604.hdr.grayed = 0;
c_7311604.tag = closureN_tag;
 c_7311604.fn = (function_type)__lambda_980;
c_7311604.num_args = 1;
c_7311604.num_elements = 3;
c_7311604.elements = (object *)e_7311617;
c_7311604.elements[0] = ((closureN)self_734675)->elements[0];
c_7311604.elements[1] = ((closureN)self_734675)->elements[1];
c_7311604.elements[2] = lp_731083_731990;


closureN_type c_7311618;
object e_7311646 [2];
c_7311618.hdr.mark = gc_color_red;
 c_7311618.hdr.grayed = 0;
c_7311618.tag = closureN_tag;
 c_7311618.fn = (function_type)__lambda_982;
c_7311618.num_args = 2;
c_7311618.num_elements = 2;
c_7311618.elements = (object *)e_7311646;
c_7311618.elements[0] = lp_731083_731990;
c_7311618.elements[1] = ((closureN)self_734675)->elements[2];

return_direct_with_clo1(data,(closure)&c_7311604,__lambda_980,  &c_7311618);; 
}

static void __lambda_982(void *data, object self_734676, int argc, object *args) /* object self_734676, object k_733494, object lis_731084_731991, object n_731085_731992 */
 {
 object k_733494 = args[0]; object lis_731084_731991 = args[1]; object n_731085_731992 = args[2];
  
closureN_type c_7311620;
object e_7311645 [5];
c_7311620.hdr.mark = gc_color_red;
 c_7311620.hdr.grayed = 0;
c_7311620.tag = closureN_tag;
 c_7311620.fn = (function_type)__lambda_983;
c_7311620.num_args = 1;
c_7311620.num_elements = 5;
c_7311620.elements = (object *)e_7311645;
c_7311620.elements[0] = k_733494;
c_7311620.elements[1] = lis_731084_731991;
c_7311620.elements[2] = ((closureN)self_734676)->elements[0];
c_7311620.elements[3] = n_731085_731992;
c_7311620.elements[4] = ((closureN)self_734676)->elements[1];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_7311620, lis_731084_731991);; 
}

static void __lambda_983(void *data, object self_734677, int argc, object *args) /* object self_734677, object r_733495 */
 {
 object r_733495 = args[0];
  if( (boolean_f != r_733495) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734677)->elements[0], (((closure)  ((closureN)self_734677)->elements[0])->fn),  boolean_f);
} else { 
  
closureN_type c_7311625;
object e_7311641 [4];
c_7311625.hdr.mark = gc_color_red;
 c_7311625.hdr.grayed = 0;
c_7311625.tag = closureN_tag;
 c_7311625.fn = (function_type)__lambda_984;
c_7311625.num_args = 1;
c_7311625.num_elements = 4;
c_7311625.elements = (object *)e_7311641;
c_7311625.elements[0] = ((closureN)self_734677)->elements[0];
c_7311625.elements[1] = ((closureN)self_734677)->elements[1];
c_7311625.elements[2] = ((closureN)self_734677)->elements[2];
c_7311625.elements[3] = ((closureN)self_734677)->elements[3];



return_closcall2(data,  ((closureN)self_734677)->elements[4],  &c_7311625, Cyc_car(data, ((closureN)self_734677)->elements[1]));}
;; 
}

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




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

static void __lambda_980(void *data, object self_734679, int argc, object *args) /* object self_734679, object r_733493 */
 {
 object r_733493 = args[0];
  
closureN_type c_7311606;
object e_7311613 [3];
c_7311606.hdr.mark = gc_color_red;
 c_7311606.hdr.grayed = 0;
c_7311606.tag = closureN_tag;
 c_7311606.fn = (function_type)__lambda_981;
c_7311606.num_args = 1;
c_7311606.num_elements = 3;
c_7311606.elements = (object *)e_7311613;
c_7311606.elements[0] = ((closureN)self_734679)->elements[0];
c_7311606.elements[1] = ((closureN)self_734679)->elements[1];
c_7311606.elements[2] = ((closureN)self_734679)->elements[2];



return_direct_with_clo1(data,(closure)&c_7311606,__lambda_981,  Cyc_set_cell(data, ((closureN)self_734679)->elements[2], r_733493));; 
}

static void __lambda_981(void *data, object self_734680, int argc, object *args) /* object self_734680, object r_733492 */
 {

  

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

static void __lambda_968(void *data, object self_734662, int argc, object *args) /* object self_734662, object lists_731072_731981 */
 {
 object lists_731072_731981 = args[0];
  
closureN_type c_7311528;
object e_7311590 [3];
c_7311528.hdr.mark = gc_color_red;
 c_7311528.hdr.grayed = 0;
c_7311528.tag = closureN_tag;
 c_7311528.fn = (function_type)__lambda_969;
c_7311528.num_args = 1;
c_7311528.num_elements = 3;
c_7311528.elements = (object *)e_7311590;
c_7311528.elements[0] = ((closureN)self_734662)->elements[0];
c_7311528.elements[1] = lists_731072_731981;
c_7311528.elements[2] = ((closureN)self_734662)->elements[1];

return_direct_with_clo1(data,(closure)&c_7311528,__lambda_969,  boolean_f);; 
}

static void __lambda_969(void *data, object self_734663, int argc, object *args) /* object self_734663, object lp_731074_731983 */
 {
 object lp_731074_731983 = args[0];
  
closureN_type c_7311530;
object e_7311586 [3];
c_7311530.hdr.mark = gc_color_red;
 c_7311530.hdr.grayed = 0;
c_7311530.tag = closureN_tag;
 c_7311530.fn = (function_type)__lambda_1207;
c_7311530.num_args = 1;
c_7311530.num_elements = 3;
c_7311530.elements = (object *)e_7311586;
c_7311530.elements[0] = ((closureN)self_734663)->elements[0];
c_7311530.elements[1] = ((closureN)self_734663)->elements[1];
c_7311530.elements[2] = ((closureN)self_734663)->elements[2];


pair_type local_7311589; 
return_direct_with_clo1(data,(closure)&c_7311530,__lambda_1207,  set_cell_as_expr(&local_7311589, lp_731074_731983));; 
}

static void __lambda_1207(void *data, object self_734664, int argc, object *args) /* object self_734664, object lp_731074_731983 */
 {
 object lp_731074_731983 = args[0];
  
closureN_type c_7311532;
object e_7311545 [3];
c_7311532.hdr.mark = gc_color_red;
 c_7311532.hdr.grayed = 0;
c_7311532.tag = closureN_tag;
 c_7311532.fn = (function_type)__lambda_970;
c_7311532.num_args = 1;
c_7311532.num_elements = 3;
c_7311532.elements = (object *)e_7311545;
c_7311532.elements[0] = ((closureN)self_734664)->elements[0];
c_7311532.elements[1] = ((closureN)self_734664)->elements[1];
c_7311532.elements[2] = lp_731074_731983;


closureN_type c_7311546;
object e_7311585 [2];
c_7311546.hdr.mark = gc_color_red;
 c_7311546.hdr.grayed = 0;
c_7311546.tag = closureN_tag;
 c_7311546.fn = (function_type)__lambda_972;
c_7311546.num_args = 2;
c_7311546.num_elements = 2;
c_7311546.elements = (object *)e_7311585;
c_7311546.elements[0] = lp_731074_731983;
c_7311546.elements[1] = ((closureN)self_734664)->elements[2];

return_direct_with_clo1(data,(closure)&c_7311532,__lambda_970,  &c_7311546);; 
}

static void __lambda_972(void *data, object self_734665, int argc, object *args) /* object self_734665, object k_733484, object lists_731075_731984, object n_731076_731985 */
 {
 object k_733484 = args[0]; object lists_731075_731984 = args[1]; object n_731076_731985 = args[2];
  
closureN_type c_7311548;
object e_7311580 [4];
c_7311548.hdr.mark = gc_color_red;
 c_7311548.hdr.grayed = 0;
c_7311548.tag = closureN_tag;
 c_7311548.fn = (function_type)__lambda_973;
c_7311548.num_args = 1;
c_7311548.num_elements = 4;
c_7311548.elements = (object *)e_7311580;
c_7311548.elements[0] = k_733484;
c_7311548.elements[1] = ((closureN)self_734665)->elements[0];
c_7311548.elements[2] = n_731076_731985;
c_7311548.elements[3] = ((closureN)self_734665)->elements[1];


closureN_type c_7311581;
object e_7311584 [1];
c_7311581.hdr.mark = gc_color_red;
 c_7311581.hdr.grayed = 0;
c_7311581.tag = closureN_tag;
 c_7311581.fn = (function_type)__lambda_977;
c_7311581.num_args = 0;
c_7311581.num_elements = 1;
c_7311581.elements = (object *)e_7311584;
c_7311581.elements[0] = lists_731075_731984;

return_direct_with_clo1(data,(closure)&c_7311548,__lambda_973,  &c_7311581);; 
}

static void __lambda_977(void *data, object self_734666, int argc, object *args) /* object self_734666, object k_733491 */
 {
 object k_733491 = args[0];
  return_direct_with_clo2(data,  __glo__75cars_87cdrs_srfi_1, (((closure)  __glo__75cars_87cdrs_srfi_1)->fn),  k_733491, ((closureN)self_734666)->elements[0]);; 
}

static void __lambda_973(void *data, object self_734667, int argc, object *args) /* object self_734667, object r_733485 */
 {
 object r_733485 = args[0];
  
closureN_type c_7311550;
object e_7311554 [2];
c_7311550.hdr.mark = gc_color_red;
 c_7311550.hdr.grayed = 0;
c_7311550.tag = closureN_tag;
 c_7311550.fn = (function_type)__lambda_974;
c_7311550.num_args = 1;
c_7311550.num_elements = 2;
c_7311550.elements = (object *)e_7311554;
c_7311550.elements[0] = ((closureN)self_734667)->elements[0];
c_7311550.elements[1] = r_733485;


closureN_type c_7311555;
object e_7311579 [3];
c_7311555.hdr.mark = gc_color_red;
 c_7311555.hdr.grayed = 0;
c_7311555.tag = closureN_tag;
 c_7311555.fn = (function_type)__lambda_975;
c_7311555.num_args = 2;
c_7311555.num_elements = 3;
c_7311555.elements = (object *)e_7311579;
c_7311555.elements[0] = ((closureN)self_734667)->elements[1];
c_7311555.elements[1] = ((closureN)self_734667)->elements[2];
c_7311555.elements[2] = ((closureN)self_734667)->elements[3];

return_direct_with_clo1(data,(closure)&c_7311550,__lambda_974,  &c_7311555);; 
}

static void __lambda_975(void *data, object self_734668, int argc, object *args) /* object self_734668, object k_733487, object heads_731077_731986, object tails_731078_731987 */
 {
 object k_733487 = args[0]; object heads_731077_731986 = args[1]; object tails_731078_731987 = args[2];
    
if( (boolean_f != Cyc_is_pair(heads_731077_731986)) ){ 
  
closureN_type c_7311559;
object e_7311573 [4];
c_7311559.hdr.mark = gc_color_red;
 c_7311559.hdr.grayed = 0;
c_7311559.tag = closureN_tag;
 c_7311559.fn = (function_type)__lambda_976;
c_7311559.num_args = 1;
c_7311559.num_elements = 4;
c_7311559.elements = (object *)e_7311573;
c_7311559.elements[0] = k_733487;
c_7311559.elements[1] = ((closureN)self_734668)->elements[0];
c_7311559.elements[2] = ((closureN)self_734668)->elements[1];
c_7311559.elements[3] = tails_731078_731987;


object c_7311576 = apply(data,(closure)&c_7311559,((closureN)self_734668)->elements[2], heads_731077_731986);
return_closcall1(data,(closure)&c_7311559,  c_7311576);
} else { 
  return_direct_with_clo1(data,  k_733487, (((closure)  k_733487)->fn),  boolean_f);}
;; 
}

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


complex_num_type local_7311571; 
return_closcall3(data,  car(((closureN)self_734669)->elements[1]),  ((closureN)self_734669)->elements[0], ((closureN)self_734669)->elements[3], Cyc_fast_sum(data,&local_7311571, ((closureN)self_734669)->elements[2], obj_int2obj(1)));}
;; 
}

static void __lambda_974(void *data, object self_734670, int argc, object *args) /* object self_734670, object r_733486 */
 {
 object r_733486 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734670)->elements[0], ((closureN)self_734670)->elements[1], r_733486);; 
}

static void __lambda_970(void *data, object self_734671, int argc, object *args) /* object self_734671, object r_733483 */
 {
 object r_733483 = args[0];
  
closureN_type c_7311534;
object e_7311541 [3];
c_7311534.hdr.mark = gc_color_red;
 c_7311534.hdr.grayed = 0;
c_7311534.tag = closureN_tag;
 c_7311534.fn = (function_type)__lambda_971;
c_7311534.num_args = 1;
c_7311534.num_elements = 3;
c_7311534.elements = (object *)e_7311541;
c_7311534.elements[0] = ((closureN)self_734671)->elements[0];
c_7311534.elements[1] = ((closureN)self_734671)->elements[1];
c_7311534.elements[2] = ((closureN)self_734671)->elements[2];



return_direct_with_clo1(data,(closure)&c_7311534,__lambda_971,  Cyc_set_cell(data, ((closureN)self_734671)->elements[2], r_733483));; 
}

static void __lambda_971(void *data, object self_734672, int argc, object *args) /* object self_734672, object r_733482 */
 {

  

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

static void __lambda_942(void *data, object _, int argc, object *args) /* closure _,object k_733447, object pred_731039_731959, object lis1_731040_731960, object lists_731041_731961_raw, ... */
 {
object k_733447 = args[0]; object pred_731039_731959 = args[1]; object lis1_731040_731960 = args[2];
load_varargs(lists_731041_731961, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/1.sld:every");

closureN_type c_7311347;
object e_7311518 [4];
c_7311347.hdr.mark = gc_color_red;
 c_7311347.hdr.grayed = 0;
c_7311347.tag = closureN_tag;
 c_7311347.fn = (function_type)__lambda_943;
c_7311347.num_args = 1;
c_7311347.num_elements = 4;
c_7311347.elements = (object *)e_7311518;
c_7311347.elements[0] = k_733447;
c_7311347.elements[1] = lis1_731040_731960;
c_7311347.elements[2] = lists_731041_731961;
c_7311347.elements[3] = pred_731039_731959;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7311347, primitive_procedure_127, pred_731039_731959, __glo_every_srfi_1);; 
}

static void __lambda_943(void *data, object self_734636, int argc, object *args) /* object self_734636, object r_733448 */
 {

    
if( (boolean_f != Cyc_is_pair(((closureN)self_734636)->elements[2])) ){ 
  
closureN_type c_7311352;
object e_7311442 [2];
c_7311352.hdr.mark = gc_color_red;
 c_7311352.hdr.grayed = 0;
c_7311352.tag = closureN_tag;
 c_7311352.fn = (function_type)__lambda_944;
c_7311352.num_args = 1;
c_7311352.num_elements = 2;
c_7311352.elements = (object *)e_7311442;
c_7311352.elements[0] = ((closureN)self_734636)->elements[0];
c_7311352.elements[1] = ((closureN)self_734636)->elements[3];


closureN_type c_7311443;
object e_7311450 [2];
c_7311443.hdr.mark = gc_color_red;
 c_7311443.hdr.grayed = 0;
c_7311443.tag = closureN_tag;
 c_7311443.fn = (function_type)__lambda_957;
c_7311443.num_args = 0;
c_7311443.num_elements = 2;
c_7311443.elements = (object *)e_7311450;
c_7311443.elements[0] = ((closureN)self_734636)->elements[1];
c_7311443.elements[1] = ((closureN)self_734636)->elements[2];

return_direct_with_clo1(data,(closure)&c_7311352,__lambda_944,  &c_7311443);
} else { 
  
closureN_type c_7311452;
object e_7311516 [3];
c_7311452.hdr.mark = gc_color_red;
 c_7311452.hdr.grayed = 0;
c_7311452.tag = closureN_tag;
 c_7311452.fn = (function_type)__lambda_958;
c_7311452.num_args = 1;
c_7311452.num_elements = 3;
c_7311452.elements = (object *)e_7311516;
c_7311452.elements[0] = ((closureN)self_734636)->elements[0];
c_7311452.elements[1] = ((closureN)self_734636)->elements[1];
c_7311452.elements[2] = ((closureN)self_734636)->elements[3];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_7311452, ((closureN)self_734636)->elements[1]);}
;; 
}

static void __lambda_958(void *data, object self_734652, int argc, object *args) /* object self_734652, object tmp_731058_731060_731972 */
 {
 object tmp_731058_731060_731972 = args[0];
  if( (boolean_f != tmp_731058_731060_731972) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734652)->elements[0], (((closure)  ((closureN)self_734652)->elements[0])->fn),  tmp_731058_731060_731972);
} else { 
  
closureN_type c_7311456;
object e_7311509 [2];
c_7311456.hdr.mark = gc_color_red;
 c_7311456.hdr.grayed = 0;
c_7311456.tag = closureN_tag;
 c_7311456.fn = (function_type)__lambda_959;
c_7311456.num_args = 2;
c_7311456.num_elements = 2;
c_7311456.elements = (object *)e_7311509;
c_7311456.elements[0] = ((closureN)self_734652)->elements[0];
c_7311456.elements[1] = ((closureN)self_734652)->elements[2];





return_direct_with_clo2(data,(closure)&c_7311456,__lambda_959,  Cyc_car(data, ((closureN)self_734652)->elements[1]), Cyc_cdr(data, ((closureN)self_734652)->elements[1]));}
;; 
}

static void __lambda_959(void *data, object self_734653, int argc, object *args) /* object self_734653, object head_731062_731973, object tail_731063_731974 */
 {
 object head_731062_731973 = args[0]; object tail_731063_731974 = args[1];
  
closureN_type c_7311458;
object e_7311508 [4];
c_7311458.hdr.mark = gc_color_red;
 c_7311458.hdr.grayed = 0;
c_7311458.tag = closureN_tag;
 c_7311458.fn = (function_type)__lambda_960;
c_7311458.num_args = 1;
c_7311458.num_elements = 4;
c_7311458.elements = (object *)e_7311508;
c_7311458.elements[0] = head_731062_731973;
c_7311458.elements[1] = ((closureN)self_734653)->elements[0];
c_7311458.elements[2] = ((closureN)self_734653)->elements[1];
c_7311458.elements[3] = tail_731063_731974;

return_direct_with_clo1(data,(closure)&c_7311458,__lambda_960,  boolean_f);; 
}

static void __lambda_960(void *data, object self_734654, int argc, object *args) /* object self_734654, object lp_731064_731975 */
 {
 object lp_731064_731975 = args[0];
  
closureN_type c_7311460;
object e_7311504 [4];
c_7311460.hdr.mark = gc_color_red;
 c_7311460.hdr.grayed = 0;
c_7311460.tag = closureN_tag;
 c_7311460.fn = (function_type)__lambda_1206;
c_7311460.num_args = 1;
c_7311460.num_elements = 4;
c_7311460.elements = (object *)e_7311504;
c_7311460.elements[0] = ((closureN)self_734654)->elements[0];
c_7311460.elements[1] = ((closureN)self_734654)->elements[1];
c_7311460.elements[2] = ((closureN)self_734654)->elements[2];
c_7311460.elements[3] = ((closureN)self_734654)->elements[3];


pair_type local_7311507; 
return_direct_with_clo1(data,(closure)&c_7311460,__lambda_1206,  set_cell_as_expr(&local_7311507, lp_731064_731975));; 
}

static void __lambda_1206(void *data, object self_734655, int argc, object *args) /* object self_734655, object lp_731064_731975 */
 {
 object lp_731064_731975 = args[0];
  
closureN_type c_7311462;
object e_7311476 [4];
c_7311462.hdr.mark = gc_color_red;
 c_7311462.hdr.grayed = 0;
c_7311462.tag = closureN_tag;
 c_7311462.fn = (function_type)__lambda_961;
c_7311462.num_args = 1;
c_7311462.num_elements = 4;
c_7311462.elements = (object *)e_7311476;
c_7311462.elements[0] = ((closureN)self_734655)->elements[0];
c_7311462.elements[1] = ((closureN)self_734655)->elements[1];
c_7311462.elements[2] = lp_731064_731975;
c_7311462.elements[3] = ((closureN)self_734655)->elements[3];


closureN_type c_7311477;
object e_7311503 [2];
c_7311477.hdr.mark = gc_color_red;
 c_7311477.hdr.grayed = 0;
c_7311477.tag = closureN_tag;
 c_7311477.fn = (function_type)__lambda_963;
c_7311477.num_args = 2;
c_7311477.num_elements = 2;
c_7311477.elements = (object *)e_7311503;
c_7311477.elements[0] = lp_731064_731975;
c_7311477.elements[1] = ((closureN)self_734655)->elements[2];

return_direct_with_clo1(data,(closure)&c_7311462,__lambda_961,  &c_7311477);; 
}

static void __lambda_963(void *data, object self_734656, int argc, object *args) /* object self_734656, object k_733471, object head_731065_731976, object tail_731066_731977 */
 {
 object k_733471 = args[0]; object head_731065_731976 = args[1]; object tail_731066_731977 = args[2];
  
closureN_type c_7311479;
object e_7311502 [5];
c_7311479.hdr.mark = gc_color_red;
 c_7311479.hdr.grayed = 0;
c_7311479.tag = closureN_tag;
 c_7311479.fn = (function_type)__lambda_964;
c_7311479.num_args = 1;
c_7311479.num_elements = 5;
c_7311479.elements = (object *)e_7311502;
c_7311479.elements[0] = head_731065_731976;
c_7311479.elements[1] = k_733471;
c_7311479.elements[2] = ((closureN)self_734656)->elements[0];
c_7311479.elements[3] = ((closureN)self_734656)->elements[1];
c_7311479.elements[4] = tail_731066_731977;

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_7311479, tail_731066_731977);; 
}

static void __lambda_964(void *data, object self_734657, int argc, object *args) /* object self_734657, object r_733472 */
 {
 object r_733472 = args[0];
  if( (boolean_f != r_733472) ){ 
  return_closcall2(data,  ((closureN)self_734657)->elements[3],  ((closureN)self_734657)->elements[1], ((closureN)self_734657)->elements[0]);
} else { 
  
closureN_type c_7311486;
object e_7311500 [3];
c_7311486.hdr.mark = gc_color_red;
 c_7311486.hdr.grayed = 0;
c_7311486.tag = closureN_tag;
 c_7311486.fn = (function_type)__lambda_965;
c_7311486.num_args = 1;
c_7311486.num_elements = 3;
c_7311486.elements = (object *)e_7311500;
c_7311486.elements[0] = ((closureN)self_734657)->elements[1];
c_7311486.elements[1] = ((closureN)self_734657)->elements[2];
c_7311486.elements[2] = ((closureN)self_734657)->elements[4];

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

static void __lambda_965(void *data, object self_734658, int argc, object *args) /* object self_734658, object r_733473 */
 {
 object r_733473 = args[0];
  if( (boolean_f != r_733473) ){ 
  





return_closcall3(data,  car(((closureN)self_734658)->elements[1]),  ((closureN)self_734658)->elements[0], Cyc_car(data, ((closureN)self_734658)->elements[2]), Cyc_cdr(data, ((closureN)self_734658)->elements[2]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734658)->elements[0], (((closure)  ((closureN)self_734658)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_961(void *data, object self_734659, int argc, object *args) /* object self_734659, object r_733470 */
 {
 object r_733470 = args[0];
  
closureN_type c_7311464;
object e_7311472 [4];
c_7311464.hdr.mark = gc_color_red;
 c_7311464.hdr.grayed = 0;
c_7311464.tag = closureN_tag;
 c_7311464.fn = (function_type)__lambda_962;
c_7311464.num_args = 1;
c_7311464.num_elements = 4;
c_7311464.elements = (object *)e_7311472;
c_7311464.elements[0] = ((closureN)self_734659)->elements[0];
c_7311464.elements[1] = ((closureN)self_734659)->elements[1];
c_7311464.elements[2] = ((closureN)self_734659)->elements[2];
c_7311464.elements[3] = ((closureN)self_734659)->elements[3];



return_direct_with_clo1(data,(closure)&c_7311464,__lambda_962,  Cyc_set_cell(data, ((closureN)self_734659)->elements[2], r_733470));; 
}

static void __lambda_962(void *data, object self_734660, int argc, object *args) /* object self_734660, object r_733469 */
 {

  

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

static void __lambda_957(void *data, object self_734637, int argc, object *args) /* object self_734637, object k_733464 */
 {
 object k_733464 = args[0];
  
pair_type local_7311447; 
return_direct_with_clo2(data,  __glo__75cars_87cdrs_srfi_1, (((closure)  __glo__75cars_87cdrs_srfi_1)->fn),  k_733464, set_pair_as_expr(&local_7311447, ((closureN)self_734637)->elements[0], ((closureN)self_734637)->elements[1]));; 
}

static void __lambda_944(void *data, object self_734638, int argc, object *args) /* object self_734638, object r_733450 */
 {
 object r_733450 = args[0];
  
closureN_type c_7311354;
object e_7311358 [2];
c_7311354.hdr.mark = gc_color_red;
 c_7311354.hdr.grayed = 0;
c_7311354.tag = closureN_tag;
 c_7311354.fn = (function_type)__lambda_945;
c_7311354.num_args = 1;
c_7311354.num_elements = 2;
c_7311354.elements = (object *)e_7311358;
c_7311354.elements[0] = ((closureN)self_734638)->elements[0];
c_7311354.elements[1] = r_733450;


closureN_type c_7311359;
object e_7311441 [1];
c_7311359.hdr.mark = gc_color_red;
 c_7311359.hdr.grayed = 0;
c_7311359.tag = closureN_tag;
 c_7311359.fn = (function_type)__lambda_946;
c_7311359.num_args = 2;
c_7311359.num_elements = 1;
c_7311359.elements = (object *)e_7311441;
c_7311359.elements[0] = ((closureN)self_734638)->elements[1];

return_direct_with_clo1(data,(closure)&c_7311354,__lambda_945,  &c_7311359);; 
}

static void __lambda_946(void *data, object self_734639, int argc, object *args) /* object self_734639, object k_733452, object heads_731042_731962, object tails_731043_731963 */
 {
 object k_733452 = args[0]; object heads_731042_731962 = args[1]; object tails_731043_731963 = args[2];
    complex_num_type local_7311362; 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7311362, Cyc_is_pair(heads_731042_731962))) ){ 
  
complex_num_type local_7311368; 


return_direct_with_clo1(data,  k_733452, (((closure)  k_733452)->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7311368, Cyc_is_pair(heads_731042_731962)));
} else { 
  
closureN_type c_7311372;
object e_7311440 [2];
c_7311372.hdr.mark = gc_color_red;
 c_7311372.hdr.grayed = 0;
c_7311372.tag = closureN_tag;
 c_7311372.fn = (function_type)__lambda_947;
c_7311372.num_args = 2;
c_7311372.num_elements = 2;
c_7311372.elements = (object *)e_7311440;
c_7311372.elements[0] = k_733452;
c_7311372.elements[1] = ((closureN)self_734639)->elements[0];

return_direct_with_clo2(data,(closure)&c_7311372,__lambda_947,  heads_731042_731962, tails_731043_731963);}
;; 
}

static void __lambda_947(void *data, object self_734640, int argc, object *args) /* object self_734640, object heads_731049_731965, object tails_731050_731966 */
 {
 object heads_731049_731965 = args[0]; object tails_731050_731966 = args[1];
  
closureN_type c_7311374;
object e_7311439 [4];
c_7311374.hdr.mark = gc_color_red;
 c_7311374.hdr.grayed = 0;
c_7311374.tag = closureN_tag;
 c_7311374.fn = (function_type)__lambda_948;
c_7311374.num_args = 1;
c_7311374.num_elements = 4;
c_7311374.elements = (object *)e_7311439;
c_7311374.elements[0] = heads_731049_731965;
c_7311374.elements[1] = ((closureN)self_734640)->elements[0];
c_7311374.elements[2] = ((closureN)self_734640)->elements[1];
c_7311374.elements[3] = tails_731050_731966;

return_direct_with_clo1(data,(closure)&c_7311374,__lambda_948,  boolean_f);; 
}

static void __lambda_948(void *data, object self_734641, int argc, object *args) /* object self_734641, object lp_731051_731967 */
 {
 object lp_731051_731967 = args[0];
  
closureN_type c_7311376;
object e_7311435 [4];
c_7311376.hdr.mark = gc_color_red;
 c_7311376.hdr.grayed = 0;
c_7311376.tag = closureN_tag;
 c_7311376.fn = (function_type)__lambda_1205;
c_7311376.num_args = 1;
c_7311376.num_elements = 4;
c_7311376.elements = (object *)e_7311435;
c_7311376.elements[0] = ((closureN)self_734641)->elements[0];
c_7311376.elements[1] = ((closureN)self_734641)->elements[1];
c_7311376.elements[2] = ((closureN)self_734641)->elements[2];
c_7311376.elements[3] = ((closureN)self_734641)->elements[3];


pair_type local_7311438; 
return_direct_with_clo1(data,(closure)&c_7311376,__lambda_1205,  set_cell_as_expr(&local_7311438, lp_731051_731967));; 
}

static void __lambda_1205(void *data, object self_734642, int argc, object *args) /* object self_734642, object lp_731051_731967 */
 {
 object lp_731051_731967 = args[0];
  
closureN_type c_7311378;
object e_7311392 [4];
c_7311378.hdr.mark = gc_color_red;
 c_7311378.hdr.grayed = 0;
c_7311378.tag = closureN_tag;
 c_7311378.fn = (function_type)__lambda_949;
c_7311378.num_args = 1;
c_7311378.num_elements = 4;
c_7311378.elements = (object *)e_7311392;
c_7311378.elements[0] = ((closureN)self_734642)->elements[0];
c_7311378.elements[1] = ((closureN)self_734642)->elements[1];
c_7311378.elements[2] = lp_731051_731967;
c_7311378.elements[3] = ((closureN)self_734642)->elements[3];


closureN_type c_7311393;
object e_7311434 [2];
c_7311393.hdr.mark = gc_color_red;
 c_7311393.hdr.grayed = 0;
c_7311393.tag = closureN_tag;
 c_7311393.fn = (function_type)__lambda_951;
c_7311393.num_args = 2;
c_7311393.num_elements = 2;
c_7311393.elements = (object *)e_7311434;
c_7311393.elements[0] = lp_731051_731967;
c_7311393.elements[1] = ((closureN)self_734642)->elements[2];

return_direct_with_clo1(data,(closure)&c_7311378,__lambda_949,  &c_7311393);; 
}

static void __lambda_951(void *data, object self_734643, int argc, object *args) /* object self_734643, object k_733456, object heads_731052_731968, object tails_731053_731969 */
 {
 object k_733456 = args[0]; object heads_731052_731968 = args[1]; object tails_731053_731969 = args[2];
  
closureN_type c_7311395;
object e_7311429 [4];
c_7311395.hdr.mark = gc_color_red;
 c_7311395.hdr.grayed = 0;
c_7311395.tag = closureN_tag;
 c_7311395.fn = (function_type)__lambda_952;
c_7311395.num_args = 1;
c_7311395.num_elements = 4;
c_7311395.elements = (object *)e_7311429;
c_7311395.elements[0] = heads_731052_731968;
c_7311395.elements[1] = k_733456;
c_7311395.elements[2] = ((closureN)self_734643)->elements[0];
c_7311395.elements[3] = ((closureN)self_734643)->elements[1];


closureN_type c_7311430;
object e_7311433 [1];
c_7311430.hdr.mark = gc_color_red;
 c_7311430.hdr.grayed = 0;
c_7311430.tag = closureN_tag;
 c_7311430.fn = (function_type)__lambda_956;
c_7311430.num_args = 0;
c_7311430.num_elements = 1;
c_7311430.elements = (object *)e_7311433;
c_7311430.elements[0] = tails_731053_731969;

return_direct_with_clo1(data,(closure)&c_7311395,__lambda_952,  &c_7311430);; 
}

static void __lambda_956(void *data, object self_734644, int argc, object *args) /* object self_734644, object k_733462 */
 {
 object k_733462 = args[0];
  return_direct_with_clo2(data,  __glo__75cars_87cdrs_srfi_1, (((closure)  __glo__75cars_87cdrs_srfi_1)->fn),  k_733462, ((closureN)self_734644)->elements[0]);; 
}

static void __lambda_952(void *data, object self_734645, int argc, object *args) /* object self_734645, object r_733457 */
 {
 object r_733457 = args[0];
  
closureN_type c_7311397;
object e_7311401 [2];
c_7311397.hdr.mark = gc_color_red;
 c_7311397.hdr.grayed = 0;
c_7311397.tag = closureN_tag;
 c_7311397.fn = (function_type)__lambda_953;
c_7311397.num_args = 1;
c_7311397.num_elements = 2;
c_7311397.elements = (object *)e_7311401;
c_7311397.elements[0] = ((closureN)self_734645)->elements[1];
c_7311397.elements[1] = r_733457;


closureN_type c_7311402;
object e_7311428 [3];
c_7311402.hdr.mark = gc_color_red;
 c_7311402.hdr.grayed = 0;
c_7311402.tag = closureN_tag;
 c_7311402.fn = (function_type)__lambda_954;
c_7311402.num_args = 2;
c_7311402.num_elements = 3;
c_7311402.elements = (object *)e_7311428;
c_7311402.elements[0] = ((closureN)self_734645)->elements[0];
c_7311402.elements[1] = ((closureN)self_734645)->elements[2];
c_7311402.elements[2] = ((closureN)self_734645)->elements[3];

return_direct_with_clo1(data,(closure)&c_7311397,__lambda_953,  &c_7311402);; 
}

static void __lambda_954(void *data, object self_734646, int argc, object *args) /* object self_734646, object k_733459, object next_91heads_731054_731970, object next_91tails_731055_731971 */
 {
 object k_733459 = args[0]; object next_91heads_731054_731970 = args[1]; object next_91tails_731055_731971 = args[2];
    
if( (boolean_f != Cyc_is_pair(next_91heads_731054_731970)) ){ 
  
closureN_type c_7311406;
object e_7311416 [4];
c_7311406.hdr.mark = gc_color_red;
 c_7311406.hdr.grayed = 0;
c_7311406.tag = closureN_tag;
 c_7311406.fn = (function_type)__lambda_955;
c_7311406.num_args = 1;
c_7311406.num_elements = 4;
c_7311406.elements = (object *)e_7311416;
c_7311406.elements[0] = k_733459;
c_7311406.elements[1] = ((closureN)self_734646)->elements[1];
c_7311406.elements[2] = next_91heads_731054_731970;
c_7311406.elements[3] = next_91tails_731055_731971;


object c_7311419 = apply(data,(closure)&c_7311406,((closureN)self_734646)->elements[2], ((closureN)self_734646)->elements[0]);
return_closcall1(data,(closure)&c_7311406,  c_7311419);
} else { 
  
object c_7311425 = apply(data,  k_733459,((closureN)self_734646)->elements[2], ((closureN)self_734646)->elements[0]);
return_direct_with_clo1(data,  k_733459, (((closure)  k_733459)->fn),  c_7311425);}
;; 
}

static void __lambda_955(void *data, object self_734647, int argc, object *args) /* object self_734647, object r_733461 */
 {
 object r_733461 = args[0];
  if( (boolean_f != r_733461) ){ 
  

return_closcall3(data,  car(((closureN)self_734647)->elements[1]),  ((closureN)self_734647)->elements[0], ((closureN)self_734647)->elements[2], ((closureN)self_734647)->elements[3]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734647)->elements[0], (((closure)  ((closureN)self_734647)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_953(void *data, object self_734648, int argc, object *args) /* object self_734648, object r_733458 */
 {
 object r_733458 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734648)->elements[0], ((closureN)self_734648)->elements[1], r_733458);; 
}

static void __lambda_949(void *data, object self_734649, int argc, object *args) /* object self_734649, object r_733455 */
 {
 object r_733455 = args[0];
  
closureN_type c_7311380;
object e_7311388 [4];
c_7311380.hdr.mark = gc_color_red;
 c_7311380.hdr.grayed = 0;
c_7311380.tag = closureN_tag;
 c_7311380.fn = (function_type)__lambda_950;
c_7311380.num_args = 1;
c_7311380.num_elements = 4;
c_7311380.elements = (object *)e_7311388;
c_7311380.elements[0] = ((closureN)self_734649)->elements[0];
c_7311380.elements[1] = ((closureN)self_734649)->elements[1];
c_7311380.elements[2] = ((closureN)self_734649)->elements[2];
c_7311380.elements[3] = ((closureN)self_734649)->elements[3];



return_direct_with_clo1(data,(closure)&c_7311380,__lambda_950,  Cyc_set_cell(data, ((closureN)self_734649)->elements[2], r_733455));; 
}

static void __lambda_950(void *data, object self_734650, int argc, object *args) /* object self_734650, object r_733454 */
 {

  

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

static void __lambda_945(void *data, object self_734651, int argc, object *args) /* object self_734651, object r_733451 */
 {
 object r_733451 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734651)->elements[0], ((closureN)self_734651)->elements[1], r_733451);; 
}

static void __lambda_918(void *data, object _, int argc, object *args) /* closure _,object k_733417, object pred_731010_731940, object lis1_731011_731941, object lists_731012_731942_raw, ... */
 {
object k_733417 = args[0]; object pred_731010_731940 = args[1]; object lis1_731011_731941 = args[2];
load_varargs(lists_731012_731942, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/1.sld:any");

closureN_type c_7311181;
object e_7311344 [4];
c_7311181.hdr.mark = gc_color_red;
 c_7311181.hdr.grayed = 0;
c_7311181.tag = closureN_tag;
 c_7311181.fn = (function_type)__lambda_919;
c_7311181.num_args = 1;
c_7311181.num_elements = 4;
c_7311181.elements = (object *)e_7311344;
c_7311181.elements[0] = k_733417;
c_7311181.elements[1] = lis1_731011_731941;
c_7311181.elements[2] = lists_731012_731942;
c_7311181.elements[3] = pred_731010_731940;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7311181, primitive_procedure_127, pred_731010_731940, __glo_any_srfi_1);; 
}

static void __lambda_919(void *data, object self_734611, int argc, object *args) /* object self_734611, object r_733418 */
 {

    
if( (boolean_f != Cyc_is_pair(((closureN)self_734611)->elements[2])) ){ 
  
closureN_type c_7311186;
object e_7311268 [2];
c_7311186.hdr.mark = gc_color_red;
 c_7311186.hdr.grayed = 0;
c_7311186.tag = closureN_tag;
 c_7311186.fn = (function_type)__lambda_920;
c_7311186.num_args = 1;
c_7311186.num_elements = 2;
c_7311186.elements = (object *)e_7311268;
c_7311186.elements[0] = ((closureN)self_734611)->elements[0];
c_7311186.elements[1] = ((closureN)self_734611)->elements[3];


closureN_type c_7311269;
object e_7311276 [2];
c_7311269.hdr.mark = gc_color_red;
 c_7311269.hdr.grayed = 0;
c_7311269.tag = closureN_tag;
 c_7311269.fn = (function_type)__lambda_933;
c_7311269.num_args = 0;
c_7311269.num_elements = 2;
c_7311269.elements = (object *)e_7311276;
c_7311269.elements[0] = ((closureN)self_734611)->elements[1];
c_7311269.elements[1] = ((closureN)self_734611)->elements[2];

return_direct_with_clo1(data,(closure)&c_7311186,__lambda_920,  &c_7311269);
} else { 
  
closureN_type c_7311278;
object e_7311342 [3];
c_7311278.hdr.mark = gc_color_red;
 c_7311278.hdr.grayed = 0;
c_7311278.tag = closureN_tag;
 c_7311278.fn = (function_type)__lambda_934;
c_7311278.num_args = 1;
c_7311278.num_elements = 3;
c_7311278.elements = (object *)e_7311342;
c_7311278.elements[0] = ((closureN)self_734611)->elements[0];
c_7311278.elements[1] = ((closureN)self_734611)->elements[1];
c_7311278.elements[2] = ((closureN)self_734611)->elements[3];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_7311278, ((closureN)self_734611)->elements[1]);}
;; 
}

static void __lambda_934(void *data, object self_734627, int argc, object *args) /* object self_734627, object r_733435 */
 {
 object r_733435 = args[0];
  if( (boolean_f != r_733435) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734627)->elements[0], (((closure)  ((closureN)self_734627)->elements[0])->fn),  boolean_f);
} else { 
  
closureN_type c_7311282;
object e_7311335 [2];
c_7311282.hdr.mark = gc_color_red;
 c_7311282.hdr.grayed = 0;
c_7311282.tag = closureN_tag;
 c_7311282.fn = (function_type)__lambda_935;
c_7311282.num_args = 2;
c_7311282.num_elements = 2;
c_7311282.elements = (object *)e_7311335;
c_7311282.elements[0] = ((closureN)self_734627)->elements[0];
c_7311282.elements[1] = ((closureN)self_734627)->elements[2];





return_direct_with_clo2(data,(closure)&c_7311282,__lambda_935,  Cyc_car(data, ((closureN)self_734627)->elements[1]), Cyc_cdr(data, ((closureN)self_734627)->elements[1]));}
;; 
}

static void __lambda_935(void *data, object self_734628, int argc, object *args) /* object self_734628, object head_731030_731953, object tail_731031_731954 */
 {
 object head_731030_731953 = args[0]; object tail_731031_731954 = args[1];
  
closureN_type c_7311284;
object e_7311334 [4];
c_7311284.hdr.mark = gc_color_red;
 c_7311284.hdr.grayed = 0;
c_7311284.tag = closureN_tag;
 c_7311284.fn = (function_type)__lambda_936;
c_7311284.num_args = 1;
c_7311284.num_elements = 4;
c_7311284.elements = (object *)e_7311334;
c_7311284.elements[0] = head_731030_731953;
c_7311284.elements[1] = ((closureN)self_734628)->elements[0];
c_7311284.elements[2] = ((closureN)self_734628)->elements[1];
c_7311284.elements[3] = tail_731031_731954;

return_direct_with_clo1(data,(closure)&c_7311284,__lambda_936,  boolean_f);; 
}

static void __lambda_936(void *data, object self_734629, int argc, object *args) /* object self_734629, object lp_731032_731955 */
 {
 object lp_731032_731955 = args[0];
  
closureN_type c_7311286;
object e_7311330 [4];
c_7311286.hdr.mark = gc_color_red;
 c_7311286.hdr.grayed = 0;
c_7311286.tag = closureN_tag;
 c_7311286.fn = (function_type)__lambda_1204;
c_7311286.num_args = 1;
c_7311286.num_elements = 4;
c_7311286.elements = (object *)e_7311330;
c_7311286.elements[0] = ((closureN)self_734629)->elements[0];
c_7311286.elements[1] = ((closureN)self_734629)->elements[1];
c_7311286.elements[2] = ((closureN)self_734629)->elements[2];
c_7311286.elements[3] = ((closureN)self_734629)->elements[3];


pair_type local_7311333; 
return_direct_with_clo1(data,(closure)&c_7311286,__lambda_1204,  set_cell_as_expr(&local_7311333, lp_731032_731955));; 
}

static void __lambda_1204(void *data, object self_734630, int argc, object *args) /* object self_734630, object lp_731032_731955 */
 {
 object lp_731032_731955 = args[0];
  
closureN_type c_7311288;
object e_7311302 [4];
c_7311288.hdr.mark = gc_color_red;
 c_7311288.hdr.grayed = 0;
c_7311288.tag = closureN_tag;
 c_7311288.fn = (function_type)__lambda_937;
c_7311288.num_args = 1;
c_7311288.num_elements = 4;
c_7311288.elements = (object *)e_7311302;
c_7311288.elements[0] = ((closureN)self_734630)->elements[0];
c_7311288.elements[1] = ((closureN)self_734630)->elements[1];
c_7311288.elements[2] = lp_731032_731955;
c_7311288.elements[3] = ((closureN)self_734630)->elements[3];


closureN_type c_7311303;
object e_7311329 [2];
c_7311303.hdr.mark = gc_color_red;
 c_7311303.hdr.grayed = 0;
c_7311303.tag = closureN_tag;
 c_7311303.fn = (function_type)__lambda_939;
c_7311303.num_args = 2;
c_7311303.num_elements = 2;
c_7311303.elements = (object *)e_7311329;
c_7311303.elements[0] = lp_731032_731955;
c_7311303.elements[1] = ((closureN)self_734630)->elements[2];

return_direct_with_clo1(data,(closure)&c_7311288,__lambda_937,  &c_7311303);; 
}

static void __lambda_939(void *data, object self_734631, int argc, object *args) /* object self_734631, object k_733440, object head_731033_731956, object tail_731034_731957 */
 {
 object k_733440 = args[0]; object head_731033_731956 = args[1]; object tail_731034_731957 = args[2];
  
closureN_type c_7311305;
object e_7311328 [5];
c_7311305.hdr.mark = gc_color_red;
 c_7311305.hdr.grayed = 0;
c_7311305.tag = closureN_tag;
 c_7311305.fn = (function_type)__lambda_940;
c_7311305.num_args = 1;
c_7311305.num_elements = 5;
c_7311305.elements = (object *)e_7311328;
c_7311305.elements[0] = head_731033_731956;
c_7311305.elements[1] = k_733440;
c_7311305.elements[2] = ((closureN)self_734631)->elements[0];
c_7311305.elements[3] = ((closureN)self_734631)->elements[1];
c_7311305.elements[4] = tail_731034_731957;

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_7311305, tail_731034_731957);; 
}

static void __lambda_940(void *data, object self_734632, int argc, object *args) /* object self_734632, object r_733441 */
 {
 object r_733441 = args[0];
  if( (boolean_f != r_733441) ){ 
  return_closcall2(data,  ((closureN)self_734632)->elements[3],  ((closureN)self_734632)->elements[1], ((closureN)self_734632)->elements[0]);
} else { 
  
closureN_type c_7311312;
object e_7311326 [3];
c_7311312.hdr.mark = gc_color_red;
 c_7311312.hdr.grayed = 0;
c_7311312.tag = closureN_tag;
 c_7311312.fn = (function_type)__lambda_941;
c_7311312.num_args = 1;
c_7311312.num_elements = 3;
c_7311312.elements = (object *)e_7311326;
c_7311312.elements[0] = ((closureN)self_734632)->elements[1];
c_7311312.elements[1] = ((closureN)self_734632)->elements[2];
c_7311312.elements[2] = ((closureN)self_734632)->elements[4];

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

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





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

static void __lambda_937(void *data, object self_734634, int argc, object *args) /* object self_734634, object r_733439 */
 {
 object r_733439 = args[0];
  
closureN_type c_7311290;
object e_7311298 [4];
c_7311290.hdr.mark = gc_color_red;
 c_7311290.hdr.grayed = 0;
c_7311290.tag = closureN_tag;
 c_7311290.fn = (function_type)__lambda_938;
c_7311290.num_args = 1;
c_7311290.num_elements = 4;
c_7311290.elements = (object *)e_7311298;
c_7311290.elements[0] = ((closureN)self_734634)->elements[0];
c_7311290.elements[1] = ((closureN)self_734634)->elements[1];
c_7311290.elements[2] = ((closureN)self_734634)->elements[2];
c_7311290.elements[3] = ((closureN)self_734634)->elements[3];



return_direct_with_clo1(data,(closure)&c_7311290,__lambda_938,  Cyc_set_cell(data, ((closureN)self_734634)->elements[2], r_733439));; 
}

static void __lambda_938(void *data, object self_734635, int argc, object *args) /* object self_734635, object r_733438 */
 {

  

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

static void __lambda_933(void *data, object self_734612, int argc, object *args) /* object self_734612, object k_733433 */
 {
 object k_733433 = args[0];
  
pair_type local_7311273; 
return_direct_with_clo2(data,  __glo__75cars_87cdrs_srfi_1, (((closure)  __glo__75cars_87cdrs_srfi_1)->fn),  k_733433, set_pair_as_expr(&local_7311273, ((closureN)self_734612)->elements[0], ((closureN)self_734612)->elements[1]));; 
}

static void __lambda_920(void *data, object self_734613, int argc, object *args) /* object self_734613, object r_733420 */
 {
 object r_733420 = args[0];
  
closureN_type c_7311188;
object e_7311192 [2];
c_7311188.hdr.mark = gc_color_red;
 c_7311188.hdr.grayed = 0;
c_7311188.tag = closureN_tag;
 c_7311188.fn = (function_type)__lambda_921;
c_7311188.num_args = 1;
c_7311188.num_elements = 2;
c_7311188.elements = (object *)e_7311192;
c_7311188.elements[0] = ((closureN)self_734613)->elements[0];
c_7311188.elements[1] = r_733420;


closureN_type c_7311193;
object e_7311267 [1];
c_7311193.hdr.mark = gc_color_red;
 c_7311193.hdr.grayed = 0;
c_7311193.tag = closureN_tag;
 c_7311193.fn = (function_type)__lambda_922;
c_7311193.num_args = 2;
c_7311193.num_elements = 1;
c_7311193.elements = (object *)e_7311267;
c_7311193.elements[0] = ((closureN)self_734613)->elements[1];

return_direct_with_clo1(data,(closure)&c_7311188,__lambda_921,  &c_7311193);; 
}

static void __lambda_922(void *data, object self_734614, int argc, object *args) /* object self_734614, object k_733422, object heads_731013_731943, object tails_731014_731944 */
 {
 object k_733422 = args[0]; object heads_731013_731943 = args[1]; object tails_731014_731944 = args[2];
    
if( (boolean_f != Cyc_is_pair(heads_731013_731943)) ){ 
  
closureN_type c_7311197;
object e_7311265 [2];
c_7311197.hdr.mark = gc_color_red;
 c_7311197.hdr.grayed = 0;
c_7311197.tag = closureN_tag;
 c_7311197.fn = (function_type)__lambda_923;
c_7311197.num_args = 2;
c_7311197.num_elements = 2;
c_7311197.elements = (object *)e_7311265;
c_7311197.elements[0] = k_733422;
c_7311197.elements[1] = ((closureN)self_734614)->elements[0];

return_direct_with_clo2(data,(closure)&c_7311197,__lambda_923,  heads_731013_731943, tails_731014_731944);
} else { 
  return_direct_with_clo1(data,  k_733422, (((closure)  k_733422)->fn),  boolean_f);}
;; 
}

static void __lambda_923(void *data, object self_734615, int argc, object *args) /* object self_734615, object heads_731017_731945, object tails_731018_731946 */
 {
 object heads_731017_731945 = args[0]; object tails_731018_731946 = args[1];
  
closureN_type c_7311199;
object e_7311264 [4];
c_7311199.hdr.mark = gc_color_red;
 c_7311199.hdr.grayed = 0;
c_7311199.tag = closureN_tag;
 c_7311199.fn = (function_type)__lambda_924;
c_7311199.num_args = 1;
c_7311199.num_elements = 4;
c_7311199.elements = (object *)e_7311264;
c_7311199.elements[0] = heads_731017_731945;
c_7311199.elements[1] = ((closureN)self_734615)->elements[0];
c_7311199.elements[2] = ((closureN)self_734615)->elements[1];
c_7311199.elements[3] = tails_731018_731946;

return_direct_with_clo1(data,(closure)&c_7311199,__lambda_924,  boolean_f);; 
}

static void __lambda_924(void *data, object self_734616, int argc, object *args) /* object self_734616, object lp_731019_731947 */
 {
 object lp_731019_731947 = args[0];
  
closureN_type c_7311201;
object e_7311260 [4];
c_7311201.hdr.mark = gc_color_red;
 c_7311201.hdr.grayed = 0;
c_7311201.tag = closureN_tag;
 c_7311201.fn = (function_type)__lambda_1203;
c_7311201.num_args = 1;
c_7311201.num_elements = 4;
c_7311201.elements = (object *)e_7311260;
c_7311201.elements[0] = ((closureN)self_734616)->elements[0];
c_7311201.elements[1] = ((closureN)self_734616)->elements[1];
c_7311201.elements[2] = ((closureN)self_734616)->elements[2];
c_7311201.elements[3] = ((closureN)self_734616)->elements[3];


pair_type local_7311263; 
return_direct_with_clo1(data,(closure)&c_7311201,__lambda_1203,  set_cell_as_expr(&local_7311263, lp_731019_731947));; 
}

static void __lambda_1203(void *data, object self_734617, int argc, object *args) /* object self_734617, object lp_731019_731947 */
 {
 object lp_731019_731947 = args[0];
  
closureN_type c_7311203;
object e_7311217 [4];
c_7311203.hdr.mark = gc_color_red;
 c_7311203.hdr.grayed = 0;
c_7311203.tag = closureN_tag;
 c_7311203.fn = (function_type)__lambda_925;
c_7311203.num_args = 1;
c_7311203.num_elements = 4;
c_7311203.elements = (object *)e_7311217;
c_7311203.elements[0] = ((closureN)self_734617)->elements[0];
c_7311203.elements[1] = ((closureN)self_734617)->elements[1];
c_7311203.elements[2] = lp_731019_731947;
c_7311203.elements[3] = ((closureN)self_734617)->elements[3];


closureN_type c_7311218;
object e_7311259 [2];
c_7311218.hdr.mark = gc_color_red;
 c_7311218.hdr.grayed = 0;
c_7311218.tag = closureN_tag;
 c_7311218.fn = (function_type)__lambda_927;
c_7311218.num_args = 2;
c_7311218.num_elements = 2;
c_7311218.elements = (object *)e_7311259;
c_7311218.elements[0] = lp_731019_731947;
c_7311218.elements[1] = ((closureN)self_734617)->elements[2];

return_direct_with_clo1(data,(closure)&c_7311203,__lambda_925,  &c_7311218);; 
}

static void __lambda_927(void *data, object self_734618, int argc, object *args) /* object self_734618, object k_733426, object heads_731020_731948, object tails_731021_731949 */
 {
 object k_733426 = args[0]; object heads_731020_731948 = args[1]; object tails_731021_731949 = args[2];
  
closureN_type c_7311220;
object e_7311254 [4];
c_7311220.hdr.mark = gc_color_red;
 c_7311220.hdr.grayed = 0;
c_7311220.tag = closureN_tag;
 c_7311220.fn = (function_type)__lambda_928;
c_7311220.num_args = 1;
c_7311220.num_elements = 4;
c_7311220.elements = (object *)e_7311254;
c_7311220.elements[0] = heads_731020_731948;
c_7311220.elements[1] = k_733426;
c_7311220.elements[2] = ((closureN)self_734618)->elements[0];
c_7311220.elements[3] = ((closureN)self_734618)->elements[1];


closureN_type c_7311255;
object e_7311258 [1];
c_7311255.hdr.mark = gc_color_red;
 c_7311255.hdr.grayed = 0;
c_7311255.tag = closureN_tag;
 c_7311255.fn = (function_type)__lambda_932;
c_7311255.num_args = 0;
c_7311255.num_elements = 1;
c_7311255.elements = (object *)e_7311258;
c_7311255.elements[0] = tails_731021_731949;

return_direct_with_clo1(data,(closure)&c_7311220,__lambda_928,  &c_7311255);; 
}

static void __lambda_932(void *data, object self_734619, int argc, object *args) /* object self_734619, object k_733432 */
 {
 object k_733432 = args[0];
  return_direct_with_clo2(data,  __glo__75cars_87cdrs_srfi_1, (((closure)  __glo__75cars_87cdrs_srfi_1)->fn),  k_733432, ((closureN)self_734619)->elements[0]);; 
}

static void __lambda_928(void *data, object self_734620, int argc, object *args) /* object self_734620, object r_733427 */
 {
 object r_733427 = args[0];
  
closureN_type c_7311222;
object e_7311226 [2];
c_7311222.hdr.mark = gc_color_red;
 c_7311222.hdr.grayed = 0;
c_7311222.tag = closureN_tag;
 c_7311222.fn = (function_type)__lambda_929;
c_7311222.num_args = 1;
c_7311222.num_elements = 2;
c_7311222.elements = (object *)e_7311226;
c_7311222.elements[0] = ((closureN)self_734620)->elements[1];
c_7311222.elements[1] = r_733427;


closureN_type c_7311227;
object e_7311253 [3];
c_7311227.hdr.mark = gc_color_red;
 c_7311227.hdr.grayed = 0;
c_7311227.tag = closureN_tag;
 c_7311227.fn = (function_type)__lambda_930;
c_7311227.num_args = 2;
c_7311227.num_elements = 3;
c_7311227.elements = (object *)e_7311253;
c_7311227.elements[0] = ((closureN)self_734620)->elements[0];
c_7311227.elements[1] = ((closureN)self_734620)->elements[2];
c_7311227.elements[2] = ((closureN)self_734620)->elements[3];

return_direct_with_clo1(data,(closure)&c_7311222,__lambda_929,  &c_7311227);; 
}

static void __lambda_930(void *data, object self_734621, int argc, object *args) /* object self_734621, object k_733429, object next_91heads_731022_731950, object next_91tails_731023_731951 */
 {
 object k_733429 = args[0]; object next_91heads_731022_731950 = args[1]; object next_91tails_731023_731951 = args[2];
    
if( (boolean_f != Cyc_is_pair(next_91heads_731022_731950)) ){ 
  
closureN_type c_7311231;
object e_7311241 [4];
c_7311231.hdr.mark = gc_color_red;
 c_7311231.hdr.grayed = 0;
c_7311231.tag = closureN_tag;
 c_7311231.fn = (function_type)__lambda_931;
c_7311231.num_args = 1;
c_7311231.num_elements = 4;
c_7311231.elements = (object *)e_7311241;
c_7311231.elements[0] = k_733429;
c_7311231.elements[1] = ((closureN)self_734621)->elements[1];
c_7311231.elements[2] = next_91heads_731022_731950;
c_7311231.elements[3] = next_91tails_731023_731951;


object c_7311244 = apply(data,(closure)&c_7311231,((closureN)self_734621)->elements[2], ((closureN)self_734621)->elements[0]);
return_closcall1(data,(closure)&c_7311231,  c_7311244);
} else { 
  
object c_7311250 = apply(data,  k_733429,((closureN)self_734621)->elements[2], ((closureN)self_734621)->elements[0]);
return_direct_with_clo1(data,  k_733429, (((closure)  k_733429)->fn),  c_7311250);}
;; 
}

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

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

static void __lambda_929(void *data, object self_734623, int argc, object *args) /* object self_734623, object r_733428 */
 {
 object r_733428 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734623)->elements[0], ((closureN)self_734623)->elements[1], r_733428);; 
}

static void __lambda_925(void *data, object self_734624, int argc, object *args) /* object self_734624, object r_733425 */
 {
 object r_733425 = args[0];
  
closureN_type c_7311205;
object e_7311213 [4];
c_7311205.hdr.mark = gc_color_red;
 c_7311205.hdr.grayed = 0;
c_7311205.tag = closureN_tag;
 c_7311205.fn = (function_type)__lambda_926;
c_7311205.num_args = 1;
c_7311205.num_elements = 4;
c_7311205.elements = (object *)e_7311213;
c_7311205.elements[0] = ((closureN)self_734624)->elements[0];
c_7311205.elements[1] = ((closureN)self_734624)->elements[1];
c_7311205.elements[2] = ((closureN)self_734624)->elements[2];
c_7311205.elements[3] = ((closureN)self_734624)->elements[3];



return_direct_with_clo1(data,(closure)&c_7311205,__lambda_926,  Cyc_set_cell(data, ((closureN)self_734624)->elements[2], r_733425));; 
}

static void __lambda_926(void *data, object self_734625, int argc, object *args) /* object self_734625, object r_733424 */
 {

  

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

static void __lambda_921(void *data, object self_734626, int argc, object *args) /* object self_734626, object r_733421 */
 {
 object r_733421 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734626)->elements[0], ((closureN)self_734626)->elements[1], r_733421);; 
}

static void __lambda_914(void *data, object _, int argc, object *args) /* closure _,object k_733411, object pred_731007_731937, object lis_731008_731938 */
 {
object k_733411 = args[0]; object pred_731007_731937 = args[1]; object lis_731008_731938 = args[2];
  Cyc_st_add(data, "srfi/1.sld:break!");

closureN_type c_7311163;
object e_7311167 [2];
c_7311163.hdr.mark = gc_color_red;
 c_7311163.hdr.grayed = 0;
c_7311163.tag = closureN_tag;
 c_7311163.fn = (function_type)__lambda_915;
c_7311163.num_args = 1;
c_7311163.num_elements = 2;
c_7311163.elements = (object *)e_7311167;
c_7311163.elements[0] = k_733411;
c_7311163.elements[1] = lis_731008_731938;


closureN_type c_7311168;
object e_7311178 [1];
c_7311168.hdr.mark = gc_color_red;
 c_7311168.hdr.grayed = 0;
c_7311168.tag = closureN_tag;
 c_7311168.fn = (function_type)__lambda_916;
c_7311168.num_args = 1;
c_7311168.num_elements = 1;
c_7311168.elements = (object *)e_7311178;
c_7311168.elements[0] = pred_731007_731937;

return_direct_with_clo1(data,(closure)&c_7311163,__lambda_915,  &c_7311168);; 
}

static void __lambda_916(void *data, object self_734608, int argc, object *args) /* object self_734608, object k_733413, object x_731009_731939 */
 {
 object k_733413 = args[0]; object x_731009_731939 = args[1];
  
closureN_type c_7311171;
object e_7311177 [1];
c_7311171.hdr.mark = gc_color_red;
 c_7311171.hdr.grayed = 0;
c_7311171.tag = closureN_tag;
 c_7311171.fn = (function_type)__lambda_917;
c_7311171.num_args = 1;
c_7311171.num_elements = 1;
c_7311171.elements = (object *)e_7311177;
c_7311171.elements[0] = k_733413;

return_closcall2(data,  ((closureN)self_734608)->elements[0],  &c_7311171, x_731009_731939);; 
}

static void __lambda_917(void *data, object self_734609, int argc, object *args) /* object self_734609, object r_733414 */
 {
 object r_733414 = args[0];
  
complex_num_type local_7311176; 
return_direct_with_clo1(data,  ((closureN)self_734609)->elements[0], (((closure)  ((closureN)self_734609)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7311176, r_733414));; 
}

static void __lambda_915(void *data, object self_734610, int argc, object *args) /* object self_734610, object r_733412 */
 {
 object r_733412 = args[0];
  return_direct_with_clo3(data,  __glo_span_67_srfi_1, (((closure)  __glo_span_67_srfi_1)->fn),  ((closureN)self_734610)->elements[0], r_733412, ((closureN)self_734610)->elements[1]);; 
}

static void __lambda_910(void *data, object _, int argc, object *args) /* closure _,object k_733405, object pred_731004_731934, object lis_731005_731935 */
 {
object k_733405 = args[0]; object pred_731004_731934 = args[1]; object lis_731005_731935 = args[2];
  Cyc_st_add(data, "srfi/1.sld:break");

closureN_type c_7311145;
object e_7311149 [2];
c_7311145.hdr.mark = gc_color_red;
 c_7311145.hdr.grayed = 0;
c_7311145.tag = closureN_tag;
 c_7311145.fn = (function_type)__lambda_911;
c_7311145.num_args = 1;
c_7311145.num_elements = 2;
c_7311145.elements = (object *)e_7311149;
c_7311145.elements[0] = k_733405;
c_7311145.elements[1] = lis_731005_731935;


closureN_type c_7311150;
object e_7311160 [1];
c_7311150.hdr.mark = gc_color_red;
 c_7311150.hdr.grayed = 0;
c_7311150.tag = closureN_tag;
 c_7311150.fn = (function_type)__lambda_912;
c_7311150.num_args = 1;
c_7311150.num_elements = 1;
c_7311150.elements = (object *)e_7311160;
c_7311150.elements[0] = pred_731004_731934;

return_direct_with_clo1(data,(closure)&c_7311145,__lambda_911,  &c_7311150);; 
}

static void __lambda_912(void *data, object self_734605, int argc, object *args) /* object self_734605, object k_733407, object x_731006_731936 */
 {
 object k_733407 = args[0]; object x_731006_731936 = args[1];
  
closureN_type c_7311153;
object e_7311159 [1];
c_7311153.hdr.mark = gc_color_red;
 c_7311153.hdr.grayed = 0;
c_7311153.tag = closureN_tag;
 c_7311153.fn = (function_type)__lambda_913;
c_7311153.num_args = 1;
c_7311153.num_elements = 1;
c_7311153.elements = (object *)e_7311159;
c_7311153.elements[0] = k_733407;

return_closcall2(data,  ((closureN)self_734605)->elements[0],  &c_7311153, x_731006_731936);; 
}

static void __lambda_913(void *data, object self_734606, int argc, object *args) /* object self_734606, object r_733408 */
 {
 object r_733408 = args[0];
  
complex_num_type local_7311158; 
return_direct_with_clo1(data,  ((closureN)self_734606)->elements[0], (((closure)  ((closureN)self_734606)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7311158, r_733408));; 
}

static void __lambda_911(void *data, object self_734607, int argc, object *args) /* object self_734607, object r_733406 */
 {
 object r_733406 = args[0];
  return_direct_with_clo3(data,  __glo_span_srfi_1, (((closure)  __glo_span_srfi_1)->fn),  ((closureN)self_734607)->elements[0], r_733406, ((closureN)self_734607)->elements[1]);; 
}

static void __lambda_892(void *data, object _, int argc, object *args) /* closure _,object k_733384, object pred_73990_731924, object lis_73991_731925 */
 {
object k_733384 = args[0]; object pred_73990_731924 = args[1]; object lis_73991_731925 = args[2];
  Cyc_st_add(data, "srfi/1.sld:span!");

closureN_type c_7311035;
object e_7311142 [3];
c_7311035.hdr.mark = gc_color_red;
 c_7311035.hdr.grayed = 0;
c_7311035.tag = closureN_tag;
 c_7311035.fn = (function_type)__lambda_893;
c_7311035.num_args = 1;
c_7311035.num_elements = 3;
c_7311035.elements = (object *)e_7311142;
c_7311035.elements[0] = k_733384;
c_7311035.elements[1] = lis_73991_731925;
c_7311035.elements[2] = pred_73990_731924;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7311035, primitive_procedure_127, pred_73990_731924, __glo_span_67_srfi_1);; 
}

static void __lambda_893(void *data, object self_734587, int argc, object *args) /* object self_734587, object r_733385 */
 {

  
closureN_type c_7311037;
object e_7311140 [3];
c_7311037.hdr.mark = gc_color_red;
 c_7311037.hdr.grayed = 0;
c_7311037.tag = closureN_tag;
 c_7311037.fn = (function_type)__lambda_894;
c_7311037.num_args = 1;
c_7311037.num_elements = 3;
c_7311037.elements = (object *)e_7311140;
c_7311037.elements[0] = ((closureN)self_734587)->elements[0];
c_7311037.elements[1] = ((closureN)self_734587)->elements[1];
c_7311037.elements[2] = ((closureN)self_734587)->elements[2];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_7311037, ((closureN)self_734587)->elements[1]);; 
}

static void __lambda_894(void *data, object self_734588, int argc, object *args) /* object self_734588, object tmp_73993_73995_731926 */
 {
 object tmp_73993_73995_731926 = args[0];
  
closureN_type c_7311039;
object e_7311055 [3];
c_7311039.hdr.mark = gc_color_red;
 c_7311039.hdr.grayed = 0;
c_7311039.tag = closureN_tag;
 c_7311039.fn = (function_type)__lambda_895;
c_7311039.num_args = 0;
c_7311039.num_elements = 3;
c_7311039.elements = (object *)e_7311055;
c_7311039.elements[0] = ((closureN)self_734588)->elements[1];
c_7311039.elements[1] = ((closureN)self_734588)->elements[2];
c_7311039.elements[2] = tmp_73993_73995_731926;


closureN_type c_7311056;
object e_7311139 [3];
c_7311056.hdr.mark = gc_color_red;
 c_7311056.hdr.grayed = 0;
c_7311056.tag = closureN_tag;
 c_7311056.fn = (function_type)__lambda_897;
c_7311056.num_args = 1;
c_7311056.num_elements = 3;
c_7311056.elements = (object *)e_7311139;
c_7311056.elements[0] = ((closureN)self_734588)->elements[0];
c_7311056.elements[1] = ((closureN)self_734588)->elements[1];
c_7311056.elements[2] = ((closureN)self_734588)->elements[2];

return_direct_with_clo1(data,(closure)&c_7311039,__lambda_895,  &c_7311056);; 
}

static void __lambda_897(void *data, object self_734589, int argc, object *args) /* object self_734589, object r_733386 */
 {
 object r_733386 = args[0];
  if( (boolean_f != r_733386) ){ 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734589)->elements[0], NULL, ((closureN)self_734589)->elements[1]);
} else { 
  
closureN_type c_7311061;
object e_7311135 [3];
c_7311061.hdr.mark = gc_color_red;
 c_7311061.hdr.grayed = 0;
c_7311061.tag = closureN_tag;
 c_7311061.fn = (function_type)__lambda_898;
c_7311061.num_args = 1;
c_7311061.num_elements = 3;
c_7311061.elements = (object *)e_7311135;
c_7311061.elements[0] = ((closureN)self_734589)->elements[0];
c_7311061.elements[1] = ((closureN)self_734589)->elements[1];
c_7311061.elements[2] = ((closureN)self_734589)->elements[2];



return_direct_with_clo1(data,(closure)&c_7311061,__lambda_898,  Cyc_cdr(data, ((closureN)self_734589)->elements[1]));}
;; 
}

static void __lambda_898(void *data, object self_734590, int argc, object *args) /* object self_734590, object r_733389 */
 {
 object r_733389 = args[0];
  
closureN_type c_7311063;
object e_7311133 [3];
c_7311063.hdr.mark = gc_color_red;
 c_7311063.hdr.grayed = 0;
c_7311063.tag = closureN_tag;
 c_7311063.fn = (function_type)__lambda_899;
c_7311063.num_args = 2;
c_7311063.num_elements = 3;
c_7311063.elements = (object *)e_7311133;
c_7311063.elements[0] = ((closureN)self_734590)->elements[0];
c_7311063.elements[1] = ((closureN)self_734590)->elements[1];
c_7311063.elements[2] = ((closureN)self_734590)->elements[2];

return_direct_with_clo2(data,(closure)&c_7311063,__lambda_899,  ((closureN)self_734590)->elements[1], r_733389);; 
}

static void __lambda_899(void *data, object self_734591, int argc, object *args) /* object self_734591, object prev_73998_731928, object rest_73999_731929 */
 {
 object prev_73998_731928 = args[0]; object rest_73999_731929 = args[1];
  
closureN_type c_7311065;
object e_7311132 [5];
c_7311065.hdr.mark = gc_color_red;
 c_7311065.hdr.grayed = 0;
c_7311065.tag = closureN_tag;
 c_7311065.fn = (function_type)__lambda_900;
c_7311065.num_args = 1;
c_7311065.num_elements = 5;
c_7311065.elements = (object *)e_7311132;
c_7311065.elements[0] = ((closureN)self_734591)->elements[0];
c_7311065.elements[1] = ((closureN)self_734591)->elements[1];
c_7311065.elements[2] = ((closureN)self_734591)->elements[2];
c_7311065.elements[3] = prev_73998_731928;
c_7311065.elements[4] = rest_73999_731929;

return_direct_with_clo1(data,(closure)&c_7311065,__lambda_900,  boolean_f);; 
}

static void __lambda_900(void *data, object self_734592, int argc, object *args) /* object self_734592, object lp_731000_731930 */
 {
 object lp_731000_731930 = args[0];
  
closureN_type c_7311067;
object e_7311128 [5];
c_7311067.hdr.mark = gc_color_red;
 c_7311067.hdr.grayed = 0;
c_7311067.tag = closureN_tag;
 c_7311067.fn = (function_type)__lambda_1202;
c_7311067.num_args = 1;
c_7311067.num_elements = 5;
c_7311067.elements = (object *)e_7311128;
c_7311067.elements[0] = ((closureN)self_734592)->elements[0];
c_7311067.elements[1] = ((closureN)self_734592)->elements[1];
c_7311067.elements[2] = ((closureN)self_734592)->elements[2];
c_7311067.elements[3] = ((closureN)self_734592)->elements[3];
c_7311067.elements[4] = ((closureN)self_734592)->elements[4];


pair_type local_7311131; 
return_direct_with_clo1(data,(closure)&c_7311067,__lambda_1202,  set_cell_as_expr(&local_7311131, lp_731000_731930));; 
}

static void __lambda_1202(void *data, object self_734593, int argc, object *args) /* object self_734593, object lp_731000_731930 */
 {
 object lp_731000_731930 = args[0];
  
closureN_type c_7311069;
object e_7311087 [5];
c_7311069.hdr.mark = gc_color_red;
 c_7311069.hdr.grayed = 0;
c_7311069.tag = closureN_tag;
 c_7311069.fn = (function_type)__lambda_901;
c_7311069.num_args = 1;
c_7311069.num_elements = 5;
c_7311069.elements = (object *)e_7311087;
c_7311069.elements[0] = ((closureN)self_734593)->elements[0];
c_7311069.elements[1] = ((closureN)self_734593)->elements[1];
c_7311069.elements[2] = lp_731000_731930;
c_7311069.elements[3] = ((closureN)self_734593)->elements[3];
c_7311069.elements[4] = ((closureN)self_734593)->elements[4];


closureN_type c_7311088;
object e_7311127 [2];
c_7311088.hdr.mark = gc_color_red;
 c_7311088.hdr.grayed = 0;
c_7311088.tag = closureN_tag;
 c_7311088.fn = (function_type)__lambda_904;
c_7311088.num_args = 2;
c_7311088.num_elements = 2;
c_7311088.elements = (object *)e_7311127;
c_7311088.elements[0] = lp_731000_731930;
c_7311088.elements[1] = ((closureN)self_734593)->elements[2];

return_direct_with_clo1(data,(closure)&c_7311069,__lambda_901,  &c_7311088);; 
}

static void __lambda_904(void *data, object self_734594, int argc, object *args) /* object self_734594, object k_733392, object prev_731001_731931, object rest_731002_731932 */
 {
 object k_733392 = args[0]; object prev_731001_731931 = args[1]; object rest_731002_731932 = args[2];
  
closureN_type c_7311090;
object e_7311126 [5];
c_7311090.hdr.mark = gc_color_red;
 c_7311090.hdr.grayed = 0;
c_7311090.tag = closureN_tag;
 c_7311090.fn = (function_type)__lambda_905;
c_7311090.num_args = 1;
c_7311090.num_elements = 5;
c_7311090.elements = (object *)e_7311126;
c_7311090.elements[0] = k_733392;
c_7311090.elements[1] = ((closureN)self_734594)->elements[0];
c_7311090.elements[2] = ((closureN)self_734594)->elements[1];
c_7311090.elements[3] = prev_731001_731931;
c_7311090.elements[4] = rest_731002_731932;

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_7311090, rest_731002_731932);; 
}

static void __lambda_905(void *data, object self_734595, int argc, object *args) /* object self_734595, object r_733393 */
 {
 object r_733393 = args[0];
  if( (boolean_f != r_733393) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734595)->elements[0], (((closure)  ((closureN)self_734595)->elements[0])->fn),  ((closureN)self_734595)->elements[4]);
} else { 
  
closureN_type c_7311095;
object e_7311122 [5];
c_7311095.hdr.mark = gc_color_red;
 c_7311095.hdr.grayed = 0;
c_7311095.tag = closureN_tag;
 c_7311095.fn = (function_type)__lambda_906;
c_7311095.num_args = 1;
c_7311095.num_elements = 5;
c_7311095.elements = (object *)e_7311122;
c_7311095.elements[0] = ((closureN)self_734595)->elements[0];
c_7311095.elements[1] = ((closureN)self_734595)->elements[1];
c_7311095.elements[2] = ((closureN)self_734595)->elements[2];
c_7311095.elements[3] = ((closureN)self_734595)->elements[3];
c_7311095.elements[4] = ((closureN)self_734595)->elements[4];



return_direct_with_clo1(data,(closure)&c_7311095,__lambda_906,  Cyc_car(data, ((closureN)self_734595)->elements[4]));}
;; 
}

static void __lambda_906(void *data, object self_734596, int argc, object *args) /* object self_734596, object x_731003_731933 */
 {
 object x_731003_731933 = args[0];
  
closureN_type c_7311098;
object e_7311121 [4];
c_7311098.hdr.mark = gc_color_red;
 c_7311098.hdr.grayed = 0;
c_7311098.tag = closureN_tag;
 c_7311098.fn = (function_type)__lambda_907;
c_7311098.num_args = 1;
c_7311098.num_elements = 4;
c_7311098.elements = (object *)e_7311121;
c_7311098.elements[0] = ((closureN)self_734596)->elements[0];
c_7311098.elements[1] = ((closureN)self_734596)->elements[1];
c_7311098.elements[2] = ((closureN)self_734596)->elements[3];
c_7311098.elements[3] = ((closureN)self_734596)->elements[4];

return_closcall2(data,  ((closureN)self_734596)->elements[2],  &c_7311098, x_731003_731933);; 
}

static void __lambda_907(void *data, object self_734597, int argc, object *args) /* object self_734597, object r_733395 */
 {
 object r_733395 = args[0];
  if( (boolean_f != r_733395) ){ 
  
closureN_type c_7311100;
object e_7311107 [3];
c_7311100.hdr.mark = gc_color_red;
 c_7311100.hdr.grayed = 0;
c_7311100.tag = closureN_tag;
 c_7311100.fn = (function_type)__lambda_908;
c_7311100.num_args = 1;
c_7311100.num_elements = 3;
c_7311100.elements = (object *)e_7311107;
c_7311100.elements[0] = ((closureN)self_734597)->elements[0];
c_7311100.elements[1] = ((closureN)self_734597)->elements[1];
c_7311100.elements[2] = ((closureN)self_734597)->elements[3];



return_direct_with_clo1(data,(closure)&c_7311100,__lambda_908,  Cyc_cdr(data, ((closureN)self_734597)->elements[3]));
} else { 
  
closureN_type c_7311112;
object e_7311116 [2];
c_7311112.hdr.mark = gc_color_red;
 c_7311112.hdr.grayed = 0;
c_7311112.tag = closureN_tag;
 c_7311112.fn = (function_type)__lambda_909;
c_7311112.num_args = 1;
c_7311112.num_elements = 2;
c_7311112.elements = (object *)e_7311116;
c_7311112.elements[0] = ((closureN)self_734597)->elements[0];
c_7311112.elements[1] = ((closureN)self_734597)->elements[3];


object c_7311119 = Cyc_set_cdr_cps(data,(closure)&c_7311112,((closureN)self_734597)->elements[2], NULL);
return_closcall1(data,(closure)&c_7311112,  c_7311119);}
;; 
}

static void __lambda_909(void *data, object self_734599, int argc, object *args) /* object self_734599, object r_733397 */
 {

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

static void __lambda_908(void *data, object self_734598, int argc, object *args) /* object self_734598, object r_733396 */
 {
 object r_733396 = args[0];
  

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

static void __lambda_901(void *data, object self_734600, int argc, object *args) /* object self_734600, object r_733391 */
 {
 object r_733391 = args[0];
  
closureN_type c_7311071;
object e_7311083 [5];
c_7311071.hdr.mark = gc_color_red;
 c_7311071.hdr.grayed = 0;
c_7311071.tag = closureN_tag;
 c_7311071.fn = (function_type)__lambda_902;
c_7311071.num_args = 1;
c_7311071.num_elements = 5;
c_7311071.elements = (object *)e_7311083;
c_7311071.elements[0] = ((closureN)self_734600)->elements[0];
c_7311071.elements[1] = ((closureN)self_734600)->elements[1];
c_7311071.elements[2] = ((closureN)self_734600)->elements[2];
c_7311071.elements[3] = ((closureN)self_734600)->elements[3];
c_7311071.elements[4] = ((closureN)self_734600)->elements[4];



return_direct_with_clo1(data,(closure)&c_7311071,__lambda_902,  Cyc_set_cell(data, ((closureN)self_734600)->elements[2], r_733391));; 
}

static void __lambda_902(void *data, object self_734601, int argc, object *args) /* object self_734601, object r_733390 */
 {

  


closureN_type c_7311076;
object e_7311080 [2];
c_7311076.hdr.mark = gc_color_red;
 c_7311076.hdr.grayed = 0;
c_7311076.tag = closureN_tag;
 c_7311076.fn = (function_type)__lambda_903;
c_7311076.num_args = 1;
c_7311076.num_elements = 2;
c_7311076.elements = (object *)e_7311080;
c_7311076.elements[0] = ((closureN)self_734601)->elements[0];
c_7311076.elements[1] = ((closureN)self_734601)->elements[1];

return_closcall3(data,  car(((closureN)self_734601)->elements[2]),  &c_7311076, ((closureN)self_734601)->elements[3], ((closureN)self_734601)->elements[4]);; 
}

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

static void __lambda_895(void *data, object self_734603, int argc, object *args) /* object self_734603, object k_733400 */
 {
 object k_733400 = args[0];
  if( (boolean_f != ((closureN)self_734603)->elements[2]) ){ 
  return_direct_with_clo1(data,  k_733400, (((closure)  k_733400)->fn),  ((closureN)self_734603)->elements[2]);
} else { 
  
closureN_type c_7311045;
object e_7311051 [1];
c_7311045.hdr.mark = gc_color_red;
 c_7311045.hdr.grayed = 0;
c_7311045.tag = closureN_tag;
 c_7311045.fn = (function_type)__lambda_896;
c_7311045.num_args = 1;
c_7311045.num_elements = 1;
c_7311045.elements = (object *)e_7311051;
c_7311045.elements[0] = k_733400;



return_closcall2(data,  ((closureN)self_734603)->elements[1],  &c_7311045, Cyc_car(data, ((closureN)self_734603)->elements[0]));}
;; 
}

static void __lambda_896(void *data, object self_734604, int argc, object *args) /* object self_734604, object r_733401 */
 {
 object r_733401 = args[0];
  
complex_num_type local_7311050; 
return_direct_with_clo1(data,  ((closureN)self_734604)->elements[0], (((closure)  ((closureN)self_734604)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7311050, r_733401));; 
}

static void __lambda_878(void *data, object _, int argc, object *args) /* closure _,object k_733365, object pred_73981_731916, object lis_73982_731917 */
 {
object k_733365 = args[0]; object pred_73981_731916 = args[1]; object lis_73982_731917 = args[2];
  Cyc_st_add(data, "srfi/1.sld:span");

closureN_type c_7310958;
object e_7311032 [3];
c_7310958.hdr.mark = gc_color_red;
 c_7310958.hdr.grayed = 0;
c_7310958.tag = closureN_tag;
 c_7310958.fn = (function_type)__lambda_879;
c_7310958.num_args = 1;
c_7310958.num_elements = 3;
c_7310958.elements = (object *)e_7311032;
c_7310958.elements[0] = k_733365;
c_7310958.elements[1] = lis_73982_731917;
c_7310958.elements[2] = pred_73981_731916;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7310958, primitive_procedure_127, pred_73981_731916, __glo_span_srfi_1);; 
}

static void __lambda_879(void *data, object self_734573, int argc, object *args) /* object self_734573, object r_733366 */
 {

  
closureN_type c_7310960;
object e_7311030 [2];
c_7310960.hdr.mark = gc_color_red;
 c_7310960.hdr.grayed = 0;
c_7310960.tag = closureN_tag;
 c_7310960.fn = (function_type)__lambda_880;
c_7310960.num_args = 1;
c_7310960.num_elements = 2;
c_7310960.elements = (object *)e_7311030;
c_7310960.elements[0] = ((closureN)self_734573)->elements[0];
c_7310960.elements[1] = ((closureN)self_734573)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310960,__lambda_880,  ((closureN)self_734573)->elements[1]);; 
}

static void __lambda_880(void *data, object self_734574, int argc, object *args) /* object self_734574, object lis_73984_731918 */
 {
 object lis_73984_731918 = args[0];
  
closureN_type c_7310962;
object e_7311029 [3];
c_7310962.hdr.mark = gc_color_red;
 c_7310962.hdr.grayed = 0;
c_7310962.tag = closureN_tag;
 c_7310962.fn = (function_type)__lambda_881;
c_7310962.num_args = 1;
c_7310962.num_elements = 3;
c_7310962.elements = (object *)e_7311029;
c_7310962.elements[0] = ((closureN)self_734574)->elements[0];
c_7310962.elements[1] = lis_73984_731918;
c_7310962.elements[2] = ((closureN)self_734574)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310962,__lambda_881,  boolean_f);; 
}

static void __lambda_881(void *data, object self_734575, int argc, object *args) /* object self_734575, object recur_73985_731919 */
 {
 object recur_73985_731919 = args[0];
  
closureN_type c_7310964;
object e_7311025 [3];
c_7310964.hdr.mark = gc_color_red;
 c_7310964.hdr.grayed = 0;
c_7310964.tag = closureN_tag;
 c_7310964.fn = (function_type)__lambda_1201;
c_7310964.num_args = 1;
c_7310964.num_elements = 3;
c_7310964.elements = (object *)e_7311025;
c_7310964.elements[0] = ((closureN)self_734575)->elements[0];
c_7310964.elements[1] = ((closureN)self_734575)->elements[1];
c_7310964.elements[2] = ((closureN)self_734575)->elements[2];


pair_type local_7311028; 
return_direct_with_clo1(data,(closure)&c_7310964,__lambda_1201,  set_cell_as_expr(&local_7311028, recur_73985_731919));; 
}

static void __lambda_1201(void *data, object self_734576, int argc, object *args) /* object self_734576, object recur_73985_731919 */
 {
 object recur_73985_731919 = args[0];
  
closureN_type c_7310966;
object e_7310979 [3];
c_7310966.hdr.mark = gc_color_red;
 c_7310966.hdr.grayed = 0;
c_7310966.tag = closureN_tag;
 c_7310966.fn = (function_type)__lambda_882;
c_7310966.num_args = 1;
c_7310966.num_elements = 3;
c_7310966.elements = (object *)e_7310979;
c_7310966.elements[0] = ((closureN)self_734576)->elements[0];
c_7310966.elements[1] = ((closureN)self_734576)->elements[1];
c_7310966.elements[2] = recur_73985_731919;


closureN_type c_7310980;
object e_7311024 [2];
c_7310980.hdr.mark = gc_color_red;
 c_7310980.hdr.grayed = 0;
c_7310980.tag = closureN_tag;
 c_7310980.fn = (function_type)__lambda_884;
c_7310980.num_args = 1;
c_7310980.num_elements = 2;
c_7310980.elements = (object *)e_7311024;
c_7310980.elements[0] = ((closureN)self_734576)->elements[2];
c_7310980.elements[1] = recur_73985_731919;

return_direct_with_clo1(data,(closure)&c_7310966,__lambda_882,  &c_7310980);; 
}

static void __lambda_884(void *data, object self_734577, int argc, object *args) /* object self_734577, object k_733369, object lis_73986_731920 */
 {
 object k_733369 = args[0]; object lis_73986_731920 = args[1];
  
closureN_type c_7310982;
object e_7311023 [4];
c_7310982.hdr.mark = gc_color_red;
 c_7310982.hdr.grayed = 0;
c_7310982.tag = closureN_tag;
 c_7310982.fn = (function_type)__lambda_885;
c_7310982.num_args = 1;
c_7310982.num_elements = 4;
c_7310982.elements = (object *)e_7311023;
c_7310982.elements[0] = k_733369;
c_7310982.elements[1] = lis_73986_731920;
c_7310982.elements[2] = ((closureN)self_734577)->elements[0];
c_7310982.elements[3] = ((closureN)self_734577)->elements[1];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_7310982, lis_73986_731920);; 
}

static void __lambda_885(void *data, object self_734578, int argc, object *args) /* object self_734578, object r_733370 */
 {
 object r_733370 = args[0];
  if( (boolean_f != r_733370) ){ 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734578)->elements[0], NULL, NULL);
} else { 
  
closureN_type c_7310986;
object e_7311019 [4];
c_7310986.hdr.mark = gc_color_red;
 c_7310986.hdr.grayed = 0;
c_7310986.tag = closureN_tag;
 c_7310986.fn = (function_type)__lambda_886;
c_7310986.num_args = 1;
c_7310986.num_elements = 4;
c_7310986.elements = (object *)e_7311019;
c_7310986.elements[0] = ((closureN)self_734578)->elements[0];
c_7310986.elements[1] = ((closureN)self_734578)->elements[1];
c_7310986.elements[2] = ((closureN)self_734578)->elements[2];
c_7310986.elements[3] = ((closureN)self_734578)->elements[3];



return_direct_with_clo1(data,(closure)&c_7310986,__lambda_886,  Cyc_car(data, ((closureN)self_734578)->elements[1]));}
;; 
}

static void __lambda_886(void *data, object self_734579, int argc, object *args) /* object self_734579, object x_73987_731921 */
 {
 object x_73987_731921 = args[0];
  
closureN_type c_7310989;
object e_7311018 [4];
c_7310989.hdr.mark = gc_color_red;
 c_7310989.hdr.grayed = 0;
c_7310989.tag = closureN_tag;
 c_7310989.fn = (function_type)__lambda_887;
c_7310989.num_args = 1;
c_7310989.num_elements = 4;
c_7310989.elements = (object *)e_7311018;
c_7310989.elements[0] = ((closureN)self_734579)->elements[0];
c_7310989.elements[1] = ((closureN)self_734579)->elements[1];
c_7310989.elements[2] = ((closureN)self_734579)->elements[3];
c_7310989.elements[3] = x_73987_731921;

return_closcall2(data,  ((closureN)self_734579)->elements[2],  &c_7310989, x_73987_731921);; 
}

static void __lambda_887(void *data, object self_734580, int argc, object *args) /* object self_734580, object r_733374 */
 {
 object r_733374 = args[0];
  if( (boolean_f != r_733374) ){ 
  
closureN_type c_7310991;
object e_7311005 [2];
c_7310991.hdr.mark = gc_color_red;
 c_7310991.hdr.grayed = 0;
c_7310991.tag = closureN_tag;
 c_7310991.fn = (function_type)__lambda_888;
c_7310991.num_args = 1;
c_7310991.num_elements = 2;
c_7310991.elements = (object *)e_7311005;
c_7310991.elements[0] = ((closureN)self_734580)->elements[0];
c_7310991.elements[1] = ((closureN)self_734580)->elements[3];


closureN_type c_7311006;
object e_7311014 [2];
c_7311006.hdr.mark = gc_color_red;
 c_7311006.hdr.grayed = 0;
c_7311006.tag = closureN_tag;
 c_7311006.fn = (function_type)__lambda_891;
c_7311006.num_args = 0;
c_7311006.num_elements = 2;
c_7311006.elements = (object *)e_7311014;
c_7311006.elements[0] = ((closureN)self_734580)->elements[1];
c_7311006.elements[1] = ((closureN)self_734580)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310991,__lambda_888,  &c_7311006);
} else { 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734580)->elements[0], NULL, ((closureN)self_734580)->elements[1]);}
;; 
}

static void __lambda_891(void *data, object self_734581, int argc, object *args) /* object self_734581, object k_733379 */
 {
 object k_733379 = args[0];
  



return_closcall2(data,  car(((closureN)self_734581)->elements[1]),  k_733379, Cyc_cdr(data, ((closureN)self_734581)->elements[0]));; 
}

static void __lambda_888(void *data, object self_734582, int argc, object *args) /* object self_734582, object r_733375 */
 {
 object r_733375 = args[0];
  
closureN_type c_7310993;
object e_7310997 [2];
c_7310993.hdr.mark = gc_color_red;
 c_7310993.hdr.grayed = 0;
c_7310993.tag = closureN_tag;
 c_7310993.fn = (function_type)__lambda_889;
c_7310993.num_args = 1;
c_7310993.num_elements = 2;
c_7310993.elements = (object *)e_7310997;
c_7310993.elements[0] = ((closureN)self_734582)->elements[0];
c_7310993.elements[1] = r_733375;


closureN_type c_7310998;
object e_7311004 [1];
c_7310998.hdr.mark = gc_color_red;
 c_7310998.hdr.grayed = 0;
c_7310998.tag = closureN_tag;
 c_7310998.fn = (function_type)__lambda_890;
c_7310998.num_args = 2;
c_7310998.num_elements = 1;
c_7310998.elements = (object *)e_7311004;
c_7310998.elements[0] = ((closureN)self_734582)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310993,__lambda_889,  &c_7310998);; 
}

static void __lambda_890(void *data, object self_734583, int argc, object *args) /* object self_734583, object k_733377, object prefix_73988_731922, object suffix_73989_731923 */
 {
 object k_733377 = args[0]; object prefix_73988_731922 = args[1]; object suffix_73989_731923 = args[2];
  
pair_type local_7311002; 
return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_733377, set_pair_as_expr(&local_7311002, ((closureN)self_734583)->elements[0], prefix_73988_731922), suffix_73989_731923);; 
}

static void __lambda_889(void *data, object self_734584, int argc, object *args) /* object self_734584, object r_733376 */
 {
 object r_733376 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734584)->elements[0], ((closureN)self_734584)->elements[1], r_733376);; 
}

static void __lambda_882(void *data, object self_734585, int argc, object *args) /* object self_734585, object r_733368 */
 {
 object r_733368 = args[0];
  
closureN_type c_7310968;
object e_7310975 [3];
c_7310968.hdr.mark = gc_color_red;
 c_7310968.hdr.grayed = 0;
c_7310968.tag = closureN_tag;
 c_7310968.fn = (function_type)__lambda_883;
c_7310968.num_args = 1;
c_7310968.num_elements = 3;
c_7310968.elements = (object *)e_7310975;
c_7310968.elements[0] = ((closureN)self_734585)->elements[0];
c_7310968.elements[1] = ((closureN)self_734585)->elements[1];
c_7310968.elements[2] = ((closureN)self_734585)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310968,__lambda_883,  Cyc_set_cell(data, ((closureN)self_734585)->elements[2], r_733368));; 
}

static void __lambda_883(void *data, object self_734586, int argc, object *args) /* object self_734586, object r_733367 */
 {

  

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

static void __lambda_862(void *data, object _, int argc, object *args) /* closure _,object k_733346, object pred_73968_731907, object lis_73969_731908 */
 {
object k_733346 = args[0]; object pred_73968_731907 = args[1]; object lis_73969_731908 = args[2];
  Cyc_st_add(data, "srfi/1.sld:take-while!");

closureN_type c_7310857;
object e_7310955 [3];
c_7310857.hdr.mark = gc_color_red;
 c_7310857.hdr.grayed = 0;
c_7310857.tag = closureN_tag;
 c_7310857.fn = (function_type)__lambda_863;
c_7310857.num_args = 1;
c_7310857.num_elements = 3;
c_7310857.elements = (object *)e_7310955;
c_7310857.elements[0] = k_733346;
c_7310857.elements[1] = lis_73969_731908;
c_7310857.elements[2] = pred_73968_731907;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7310857, primitive_procedure_127, pred_73968_731907, __glo_take_91while_67_srfi_1);; 
}

static void __lambda_863(void *data, object self_734557, int argc, object *args) /* object self_734557, object r_733347 */
 {

  
closureN_type c_7310859;
object e_7310953 [3];
c_7310859.hdr.mark = gc_color_red;
 c_7310859.hdr.grayed = 0;
c_7310859.tag = closureN_tag;
 c_7310859.fn = (function_type)__lambda_864;
c_7310859.num_args = 1;
c_7310859.num_elements = 3;
c_7310859.elements = (object *)e_7310953;
c_7310859.elements[0] = ((closureN)self_734557)->elements[0];
c_7310859.elements[1] = ((closureN)self_734557)->elements[1];
c_7310859.elements[2] = ((closureN)self_734557)->elements[2];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_7310859, ((closureN)self_734557)->elements[1]);; 
}

static void __lambda_864(void *data, object self_734558, int argc, object *args) /* object self_734558, object tmp_73971_73973_731909 */
 {
 object tmp_73971_73973_731909 = args[0];
  
closureN_type c_7310861;
object e_7310877 [3];
c_7310861.hdr.mark = gc_color_red;
 c_7310861.hdr.grayed = 0;
c_7310861.tag = closureN_tag;
 c_7310861.fn = (function_type)__lambda_865;
c_7310861.num_args = 0;
c_7310861.num_elements = 3;
c_7310861.elements = (object *)e_7310877;
c_7310861.elements[0] = ((closureN)self_734558)->elements[1];
c_7310861.elements[1] = ((closureN)self_734558)->elements[2];
c_7310861.elements[2] = tmp_73971_73973_731909;


closureN_type c_7310878;
object e_7310952 [3];
c_7310878.hdr.mark = gc_color_red;
 c_7310878.hdr.grayed = 0;
c_7310878.tag = closureN_tag;
 c_7310878.fn = (function_type)__lambda_867;
c_7310878.num_args = 1;
c_7310878.num_elements = 3;
c_7310878.elements = (object *)e_7310952;
c_7310878.elements[0] = ((closureN)self_734558)->elements[0];
c_7310878.elements[1] = ((closureN)self_734558)->elements[1];
c_7310878.elements[2] = ((closureN)self_734558)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310861,__lambda_865,  &c_7310878);; 
}

static void __lambda_867(void *data, object self_734559, int argc, object *args) /* object self_734559, object r_733348 */
 {
 object r_733348 = args[0];
  if( (boolean_f != r_733348) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734559)->elements[0], (((closure)  ((closureN)self_734559)->elements[0])->fn),  NULL);
} else { 
  
closureN_type c_7310882;
object e_7310948 [3];
c_7310882.hdr.mark = gc_color_red;
 c_7310882.hdr.grayed = 0;
c_7310882.tag = closureN_tag;
 c_7310882.fn = (function_type)__lambda_868;
c_7310882.num_args = 1;
c_7310882.num_elements = 3;
c_7310882.elements = (object *)e_7310948;
c_7310882.elements[0] = ((closureN)self_734559)->elements[0];
c_7310882.elements[1] = ((closureN)self_734559)->elements[1];
c_7310882.elements[2] = ((closureN)self_734559)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310882,__lambda_868,  Cyc_cdr(data, ((closureN)self_734559)->elements[1]));}
;; 
}

static void __lambda_868(void *data, object self_734560, int argc, object *args) /* object self_734560, object r_733350 */
 {
 object r_733350 = args[0];
  
closureN_type c_7310884;
object e_7310946 [3];
c_7310884.hdr.mark = gc_color_red;
 c_7310884.hdr.grayed = 0;
c_7310884.tag = closureN_tag;
 c_7310884.fn = (function_type)__lambda_869;
c_7310884.num_args = 2;
c_7310884.num_elements = 3;
c_7310884.elements = (object *)e_7310946;
c_7310884.elements[0] = ((closureN)self_734560)->elements[0];
c_7310884.elements[1] = ((closureN)self_734560)->elements[1];
c_7310884.elements[2] = ((closureN)self_734560)->elements[2];

return_direct_with_clo2(data,(closure)&c_7310884,__lambda_869,  ((closureN)self_734560)->elements[1], r_733350);; 
}

static void __lambda_869(void *data, object self_734561, int argc, object *args) /* object self_734561, object prev_73975_731910, object rest_73976_731911 */
 {
 object prev_73975_731910 = args[0]; object rest_73976_731911 = args[1];
  
closureN_type c_7310886;
object e_7310945 [5];
c_7310886.hdr.mark = gc_color_red;
 c_7310886.hdr.grayed = 0;
c_7310886.tag = closureN_tag;
 c_7310886.fn = (function_type)__lambda_870;
c_7310886.num_args = 1;
c_7310886.num_elements = 5;
c_7310886.elements = (object *)e_7310945;
c_7310886.elements[0] = ((closureN)self_734561)->elements[0];
c_7310886.elements[1] = ((closureN)self_734561)->elements[1];
c_7310886.elements[2] = ((closureN)self_734561)->elements[2];
c_7310886.elements[3] = prev_73975_731910;
c_7310886.elements[4] = rest_73976_731911;

return_direct_with_clo1(data,(closure)&c_7310886,__lambda_870,  boolean_f);; 
}

static void __lambda_870(void *data, object self_734562, int argc, object *args) /* object self_734562, object lp_73977_731912 */
 {
 object lp_73977_731912 = args[0];
  
closureN_type c_7310888;
object e_7310941 [5];
c_7310888.hdr.mark = gc_color_red;
 c_7310888.hdr.grayed = 0;
c_7310888.tag = closureN_tag;
 c_7310888.fn = (function_type)__lambda_1200;
c_7310888.num_args = 1;
c_7310888.num_elements = 5;
c_7310888.elements = (object *)e_7310941;
c_7310888.elements[0] = ((closureN)self_734562)->elements[0];
c_7310888.elements[1] = ((closureN)self_734562)->elements[1];
c_7310888.elements[2] = ((closureN)self_734562)->elements[2];
c_7310888.elements[3] = ((closureN)self_734562)->elements[3];
c_7310888.elements[4] = ((closureN)self_734562)->elements[4];


pair_type local_7310944; 
return_direct_with_clo1(data,(closure)&c_7310888,__lambda_1200,  set_cell_as_expr(&local_7310944, lp_73977_731912));; 
}

static void __lambda_1200(void *data, object self_734563, int argc, object *args) /* object self_734563, object lp_73977_731912 */
 {
 object lp_73977_731912 = args[0];
  
closureN_type c_7310890;
object e_7310908 [5];
c_7310890.hdr.mark = gc_color_red;
 c_7310890.hdr.grayed = 0;
c_7310890.tag = closureN_tag;
 c_7310890.fn = (function_type)__lambda_871;
c_7310890.num_args = 1;
c_7310890.num_elements = 5;
c_7310890.elements = (object *)e_7310908;
c_7310890.elements[0] = ((closureN)self_734563)->elements[0];
c_7310890.elements[1] = ((closureN)self_734563)->elements[1];
c_7310890.elements[2] = lp_73977_731912;
c_7310890.elements[3] = ((closureN)self_734563)->elements[3];
c_7310890.elements[4] = ((closureN)self_734563)->elements[4];


closureN_type c_7310909;
object e_7310940 [2];
c_7310909.hdr.mark = gc_color_red;
 c_7310909.hdr.grayed = 0;
c_7310909.tag = closureN_tag;
 c_7310909.fn = (function_type)__lambda_874;
c_7310909.num_args = 2;
c_7310909.num_elements = 2;
c_7310909.elements = (object *)e_7310940;
c_7310909.elements[0] = lp_73977_731912;
c_7310909.elements[1] = ((closureN)self_734563)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310890,__lambda_871,  &c_7310909);; 
}

static void __lambda_874(void *data, object self_734564, int argc, object *args) /* object self_734564, object k_733353, object prev_73978_731913, object rest_73979_731914 */
 {
 object k_733353 = args[0]; object prev_73978_731913 = args[1]; object rest_73979_731914 = args[2];
    
if( (boolean_f != Cyc_is_pair(rest_73979_731914)) ){ 
  
closureN_type c_7310913;
object e_7310936 [5];
c_7310913.hdr.mark = gc_color_red;
 c_7310913.hdr.grayed = 0;
c_7310913.tag = closureN_tag;
 c_7310913.fn = (function_type)__lambda_875;
c_7310913.num_args = 1;
c_7310913.num_elements = 5;
c_7310913.elements = (object *)e_7310936;
c_7310913.elements[0] = k_733353;
c_7310913.elements[1] = ((closureN)self_734564)->elements[0];
c_7310913.elements[2] = ((closureN)self_734564)->elements[1];
c_7310913.elements[3] = prev_73978_731913;
c_7310913.elements[4] = rest_73979_731914;



return_direct_with_clo1(data,(closure)&c_7310913,__lambda_875,  Cyc_car(data, rest_73979_731914));
} else { 
  return_direct_with_clo1(data,  k_733353, (((closure)  k_733353)->fn),  Cyc_VOID);}
;; 
}

static void __lambda_875(void *data, object self_734565, int argc, object *args) /* object self_734565, object x_73980_731915 */
 {
 object x_73980_731915 = args[0];
  
closureN_type c_7310916;
object e_7310935 [4];
c_7310916.hdr.mark = gc_color_red;
 c_7310916.hdr.grayed = 0;
c_7310916.tag = closureN_tag;
 c_7310916.fn = (function_type)__lambda_876;
c_7310916.num_args = 1;
c_7310916.num_elements = 4;
c_7310916.elements = (object *)e_7310935;
c_7310916.elements[0] = ((closureN)self_734565)->elements[0];
c_7310916.elements[1] = ((closureN)self_734565)->elements[1];
c_7310916.elements[2] = ((closureN)self_734565)->elements[3];
c_7310916.elements[3] = ((closureN)self_734565)->elements[4];

return_closcall2(data,  ((closureN)self_734565)->elements[2],  &c_7310916, x_73980_731915);; 
}

static void __lambda_876(void *data, object self_734566, int argc, object *args) /* object self_734566, object r_733356 */
 {
 object r_733356 = args[0];
  if( (boolean_f != r_733356) ){ 
  
closureN_type c_7310918;
object e_7310925 [3];
c_7310918.hdr.mark = gc_color_red;
 c_7310918.hdr.grayed = 0;
c_7310918.tag = closureN_tag;
 c_7310918.fn = (function_type)__lambda_877;
c_7310918.num_args = 1;
c_7310918.num_elements = 3;
c_7310918.elements = (object *)e_7310925;
c_7310918.elements[0] = ((closureN)self_734566)->elements[0];
c_7310918.elements[1] = ((closureN)self_734566)->elements[1];
c_7310918.elements[2] = ((closureN)self_734566)->elements[3];



return_direct_with_clo1(data,(closure)&c_7310918,__lambda_877,  Cyc_cdr(data, ((closureN)self_734566)->elements[3]));
} else { 
  
object c_7310933 = Cyc_set_cdr_cps(data,  ((closureN)self_734566)->elements[0],((closureN)self_734566)->elements[2], NULL);
return_direct_with_clo1(data,  ((closureN)self_734566)->elements[0], (((closure)  ((closureN)self_734566)->elements[0])->fn),  c_7310933);}
;; 
}

static void __lambda_877(void *data, object self_734567, int argc, object *args) /* object self_734567, object r_733357 */
 {
 object r_733357 = args[0];
  

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

static void __lambda_871(void *data, object self_734568, int argc, object *args) /* object self_734568, object r_733352 */
 {
 object r_733352 = args[0];
  
closureN_type c_7310892;
object e_7310904 [5];
c_7310892.hdr.mark = gc_color_red;
 c_7310892.hdr.grayed = 0;
c_7310892.tag = closureN_tag;
 c_7310892.fn = (function_type)__lambda_872;
c_7310892.num_args = 1;
c_7310892.num_elements = 5;
c_7310892.elements = (object *)e_7310904;
c_7310892.elements[0] = ((closureN)self_734568)->elements[0];
c_7310892.elements[1] = ((closureN)self_734568)->elements[1];
c_7310892.elements[2] = ((closureN)self_734568)->elements[2];
c_7310892.elements[3] = ((closureN)self_734568)->elements[3];
c_7310892.elements[4] = ((closureN)self_734568)->elements[4];



return_direct_with_clo1(data,(closure)&c_7310892,__lambda_872,  Cyc_set_cell(data, ((closureN)self_734568)->elements[2], r_733352));; 
}

static void __lambda_872(void *data, object self_734569, int argc, object *args) /* object self_734569, object r_733351 */
 {

  


closureN_type c_7310897;
object e_7310901 [2];
c_7310897.hdr.mark = gc_color_red;
 c_7310897.hdr.grayed = 0;
c_7310897.tag = closureN_tag;
 c_7310897.fn = (function_type)__lambda_873;
c_7310897.num_args = 1;
c_7310897.num_elements = 2;
c_7310897.elements = (object *)e_7310901;
c_7310897.elements[0] = ((closureN)self_734569)->elements[0];
c_7310897.elements[1] = ((closureN)self_734569)->elements[1];

return_closcall3(data,  car(((closureN)self_734569)->elements[2]),  &c_7310897, ((closureN)self_734569)->elements[3], ((closureN)self_734569)->elements[4]);; 
}

static void __lambda_873(void *data, object self_734570, int argc, object *args) /* object self_734570, object r_733349 */
 {

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

static void __lambda_865(void *data, object self_734571, int argc, object *args) /* object self_734571, object k_733360 */
 {
 object k_733360 = args[0];
  if( (boolean_f != ((closureN)self_734571)->elements[2]) ){ 
  return_direct_with_clo1(data,  k_733360, (((closure)  k_733360)->fn),  ((closureN)self_734571)->elements[2]);
} else { 
  
closureN_type c_7310867;
object e_7310873 [1];
c_7310867.hdr.mark = gc_color_red;
 c_7310867.hdr.grayed = 0;
c_7310867.tag = closureN_tag;
 c_7310867.fn = (function_type)__lambda_866;
c_7310867.num_args = 1;
c_7310867.num_elements = 1;
c_7310867.elements = (object *)e_7310873;
c_7310867.elements[0] = k_733360;



return_closcall2(data,  ((closureN)self_734571)->elements[1],  &c_7310867, Cyc_car(data, ((closureN)self_734571)->elements[0]));}
;; 
}

static void __lambda_866(void *data, object self_734572, int argc, object *args) /* object self_734572, object r_733361 */
 {
 object r_733361 = args[0];
  
complex_num_type local_7310872; 
return_direct_with_clo1(data,  ((closureN)self_734572)->elements[0], (((closure)  ((closureN)self_734572)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7310872, r_733361));; 
}

static void __lambda_853(void *data, object _, int argc, object *args) /* closure _,object k_733335, object pred_73962_731902, object lis_73963_731903 */
 {
object k_733335 = args[0]; object pred_73962_731902 = args[1]; object lis_73963_731903 = args[2];
  Cyc_st_add(data, "srfi/1.sld:drop-while");

closureN_type c_7310800;
object e_7310854 [3];
c_7310800.hdr.mark = gc_color_red;
 c_7310800.hdr.grayed = 0;
c_7310800.tag = closureN_tag;
 c_7310800.fn = (function_type)__lambda_854;
c_7310800.num_args = 1;
c_7310800.num_elements = 3;
c_7310800.elements = (object *)e_7310854;
c_7310800.elements[0] = k_733335;
c_7310800.elements[1] = lis_73963_731903;
c_7310800.elements[2] = pred_73962_731902;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7310800, primitive_procedure_127, pred_73962_731902, __glo_drop_91while_srfi_1);; 
}

static void __lambda_854(void *data, object self_734548, int argc, object *args) /* object self_734548, object r_733336 */
 {

  
closureN_type c_7310802;
object e_7310852 [2];
c_7310802.hdr.mark = gc_color_red;
 c_7310802.hdr.grayed = 0;
c_7310802.tag = closureN_tag;
 c_7310802.fn = (function_type)__lambda_855;
c_7310802.num_args = 1;
c_7310802.num_elements = 2;
c_7310802.elements = (object *)e_7310852;
c_7310802.elements[0] = ((closureN)self_734548)->elements[0];
c_7310802.elements[1] = ((closureN)self_734548)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310802,__lambda_855,  ((closureN)self_734548)->elements[1]);; 
}

static void __lambda_855(void *data, object self_734549, int argc, object *args) /* object self_734549, object lis_73965_731904 */
 {
 object lis_73965_731904 = args[0];
  
closureN_type c_7310804;
object e_7310851 [3];
c_7310804.hdr.mark = gc_color_red;
 c_7310804.hdr.grayed = 0;
c_7310804.tag = closureN_tag;
 c_7310804.fn = (function_type)__lambda_856;
c_7310804.num_args = 1;
c_7310804.num_elements = 3;
c_7310804.elements = (object *)e_7310851;
c_7310804.elements[0] = ((closureN)self_734549)->elements[0];
c_7310804.elements[1] = lis_73965_731904;
c_7310804.elements[2] = ((closureN)self_734549)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310804,__lambda_856,  boolean_f);; 
}

static void __lambda_856(void *data, object self_734550, int argc, object *args) /* object self_734550, object lp_73966_731905 */
 {
 object lp_73966_731905 = args[0];
  
closureN_type c_7310806;
object e_7310847 [3];
c_7310806.hdr.mark = gc_color_red;
 c_7310806.hdr.grayed = 0;
c_7310806.tag = closureN_tag;
 c_7310806.fn = (function_type)__lambda_1199;
c_7310806.num_args = 1;
c_7310806.num_elements = 3;
c_7310806.elements = (object *)e_7310847;
c_7310806.elements[0] = ((closureN)self_734550)->elements[0];
c_7310806.elements[1] = ((closureN)self_734550)->elements[1];
c_7310806.elements[2] = ((closureN)self_734550)->elements[2];


pair_type local_7310850; 
return_direct_with_clo1(data,(closure)&c_7310806,__lambda_1199,  set_cell_as_expr(&local_7310850, lp_73966_731905));; 
}

static void __lambda_1199(void *data, object self_734551, int argc, object *args) /* object self_734551, object lp_73966_731905 */
 {
 object lp_73966_731905 = args[0];
  
closureN_type c_7310808;
object e_7310821 [3];
c_7310808.hdr.mark = gc_color_red;
 c_7310808.hdr.grayed = 0;
c_7310808.tag = closureN_tag;
 c_7310808.fn = (function_type)__lambda_857;
c_7310808.num_args = 1;
c_7310808.num_elements = 3;
c_7310808.elements = (object *)e_7310821;
c_7310808.elements[0] = ((closureN)self_734551)->elements[0];
c_7310808.elements[1] = ((closureN)self_734551)->elements[1];
c_7310808.elements[2] = lp_73966_731905;


closureN_type c_7310822;
object e_7310846 [2];
c_7310822.hdr.mark = gc_color_red;
 c_7310822.hdr.grayed = 0;
c_7310822.tag = closureN_tag;
 c_7310822.fn = (function_type)__lambda_859;
c_7310822.num_args = 1;
c_7310822.num_elements = 2;
c_7310822.elements = (object *)e_7310846;
c_7310822.elements[0] = lp_73966_731905;
c_7310822.elements[1] = ((closureN)self_734551)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310808,__lambda_857,  &c_7310822);; 
}

static void __lambda_859(void *data, object self_734552, int argc, object *args) /* object self_734552, object k_733339, object lis_73967_731906 */
 {
 object k_733339 = args[0]; object lis_73967_731906 = args[1];
  
closureN_type c_7310824;
object e_7310845 [4];
c_7310824.hdr.mark = gc_color_red;
 c_7310824.hdr.grayed = 0;
c_7310824.tag = closureN_tag;
 c_7310824.fn = (function_type)__lambda_860;
c_7310824.num_args = 1;
c_7310824.num_elements = 4;
c_7310824.elements = (object *)e_7310845;
c_7310824.elements[0] = k_733339;
c_7310824.elements[1] = lis_73967_731906;
c_7310824.elements[2] = ((closureN)self_734552)->elements[0];
c_7310824.elements[3] = ((closureN)self_734552)->elements[1];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_7310824, lis_73967_731906);; 
}

static void __lambda_860(void *data, object self_734553, int argc, object *args) /* object self_734553, object r_733340 */
 {
 object r_733340 = args[0];
  if( (boolean_f != r_733340) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734553)->elements[0], (((closure)  ((closureN)self_734553)->elements[0])->fn),  NULL);
} else { 
  
closureN_type c_7310829;
object e_7310841 [3];
c_7310829.hdr.mark = gc_color_red;
 c_7310829.hdr.grayed = 0;
c_7310829.tag = closureN_tag;
 c_7310829.fn = (function_type)__lambda_861;
c_7310829.num_args = 1;
c_7310829.num_elements = 3;
c_7310829.elements = (object *)e_7310841;
c_7310829.elements[0] = ((closureN)self_734553)->elements[0];
c_7310829.elements[1] = ((closureN)self_734553)->elements[1];
c_7310829.elements[2] = ((closureN)self_734553)->elements[2];



return_closcall2(data,  ((closureN)self_734553)->elements[3],  &c_7310829, Cyc_car(data, ((closureN)self_734553)->elements[1]));}
;; 
}

static void __lambda_861(void *data, object self_734554, int argc, object *args) /* object self_734554, object r_733341 */
 {
 object r_733341 = args[0];
  if( (boolean_f != r_733341) ){ 
  



return_closcall2(data,  car(((closureN)self_734554)->elements[2]),  ((closureN)self_734554)->elements[0], Cyc_cdr(data, ((closureN)self_734554)->elements[1]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734554)->elements[0], (((closure)  ((closureN)self_734554)->elements[0])->fn),  ((closureN)self_734554)->elements[1]);}
;; 
}

static void __lambda_857(void *data, object self_734555, int argc, object *args) /* object self_734555, object r_733338 */
 {
 object r_733338 = args[0];
  
closureN_type c_7310810;
object e_7310817 [3];
c_7310810.hdr.mark = gc_color_red;
 c_7310810.hdr.grayed = 0;
c_7310810.tag = closureN_tag;
 c_7310810.fn = (function_type)__lambda_858;
c_7310810.num_args = 1;
c_7310810.num_elements = 3;
c_7310810.elements = (object *)e_7310817;
c_7310810.elements[0] = ((closureN)self_734555)->elements[0];
c_7310810.elements[1] = ((closureN)self_734555)->elements[1];
c_7310810.elements[2] = ((closureN)self_734555)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310810,__lambda_858,  Cyc_set_cell(data, ((closureN)self_734555)->elements[2], r_733338));; 
}

static void __lambda_858(void *data, object self_734556, int argc, object *args) /* object self_734556, object r_733337 */
 {

  

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

static void __lambda_843(void *data, object _, int argc, object *args) /* closure _,object k_733323, object pred_73955_731896, object lis_73956_731897 */
 {
object k_733323 = args[0]; object pred_73955_731896 = args[1]; object lis_73956_731897 = args[2];
  Cyc_st_add(data, "srfi/1.sld:take-while");

closureN_type c_7310735;
object e_7310797 [3];
c_7310735.hdr.mark = gc_color_red;
 c_7310735.hdr.grayed = 0;
c_7310735.tag = closureN_tag;
 c_7310735.fn = (function_type)__lambda_844;
c_7310735.num_args = 1;
c_7310735.num_elements = 3;
c_7310735.elements = (object *)e_7310797;
c_7310735.elements[0] = k_733323;
c_7310735.elements[1] = lis_73956_731897;
c_7310735.elements[2] = pred_73955_731896;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7310735, primitive_procedure_127, pred_73955_731896, __glo_take_91while_srfi_1);; 
}

static void __lambda_844(void *data, object self_734538, int argc, object *args) /* object self_734538, object r_733324 */
 {

  
closureN_type c_7310737;
object e_7310795 [2];
c_7310737.hdr.mark = gc_color_red;
 c_7310737.hdr.grayed = 0;
c_7310737.tag = closureN_tag;
 c_7310737.fn = (function_type)__lambda_845;
c_7310737.num_args = 1;
c_7310737.num_elements = 2;
c_7310737.elements = (object *)e_7310795;
c_7310737.elements[0] = ((closureN)self_734538)->elements[0];
c_7310737.elements[1] = ((closureN)self_734538)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310737,__lambda_845,  ((closureN)self_734538)->elements[1]);; 
}

static void __lambda_845(void *data, object self_734539, int argc, object *args) /* object self_734539, object lis_73958_731898 */
 {
 object lis_73958_731898 = args[0];
  
closureN_type c_7310739;
object e_7310794 [3];
c_7310739.hdr.mark = gc_color_red;
 c_7310739.hdr.grayed = 0;
c_7310739.tag = closureN_tag;
 c_7310739.fn = (function_type)__lambda_846;
c_7310739.num_args = 1;
c_7310739.num_elements = 3;
c_7310739.elements = (object *)e_7310794;
c_7310739.elements[0] = ((closureN)self_734539)->elements[0];
c_7310739.elements[1] = lis_73958_731898;
c_7310739.elements[2] = ((closureN)self_734539)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310739,__lambda_846,  boolean_f);; 
}

static void __lambda_846(void *data, object self_734540, int argc, object *args) /* object self_734540, object recur_73959_731899 */
 {
 object recur_73959_731899 = args[0];
  
closureN_type c_7310741;
object e_7310790 [3];
c_7310741.hdr.mark = gc_color_red;
 c_7310741.hdr.grayed = 0;
c_7310741.tag = closureN_tag;
 c_7310741.fn = (function_type)__lambda_1198;
c_7310741.num_args = 1;
c_7310741.num_elements = 3;
c_7310741.elements = (object *)e_7310790;
c_7310741.elements[0] = ((closureN)self_734540)->elements[0];
c_7310741.elements[1] = ((closureN)self_734540)->elements[1];
c_7310741.elements[2] = ((closureN)self_734540)->elements[2];


pair_type local_7310793; 
return_direct_with_clo1(data,(closure)&c_7310741,__lambda_1198,  set_cell_as_expr(&local_7310793, recur_73959_731899));; 
}

static void __lambda_1198(void *data, object self_734541, int argc, object *args) /* object self_734541, object recur_73959_731899 */
 {
 object recur_73959_731899 = args[0];
  
closureN_type c_7310743;
object e_7310756 [3];
c_7310743.hdr.mark = gc_color_red;
 c_7310743.hdr.grayed = 0;
c_7310743.tag = closureN_tag;
 c_7310743.fn = (function_type)__lambda_847;
c_7310743.num_args = 1;
c_7310743.num_elements = 3;
c_7310743.elements = (object *)e_7310756;
c_7310743.elements[0] = ((closureN)self_734541)->elements[0];
c_7310743.elements[1] = ((closureN)self_734541)->elements[1];
c_7310743.elements[2] = recur_73959_731899;


closureN_type c_7310757;
object e_7310789 [2];
c_7310757.hdr.mark = gc_color_red;
 c_7310757.hdr.grayed = 0;
c_7310757.tag = closureN_tag;
 c_7310757.fn = (function_type)__lambda_849;
c_7310757.num_args = 1;
c_7310757.num_elements = 2;
c_7310757.elements = (object *)e_7310789;
c_7310757.elements[0] = ((closureN)self_734541)->elements[2];
c_7310757.elements[1] = recur_73959_731899;

return_direct_with_clo1(data,(closure)&c_7310743,__lambda_847,  &c_7310757);; 
}

static void __lambda_849(void *data, object self_734542, int argc, object *args) /* object self_734542, object k_733327, object lis_73960_731900 */
 {
 object k_733327 = args[0]; object lis_73960_731900 = args[1];
  
closureN_type c_7310759;
object e_7310788 [4];
c_7310759.hdr.mark = gc_color_red;
 c_7310759.hdr.grayed = 0;
c_7310759.tag = closureN_tag;
 c_7310759.fn = (function_type)__lambda_850;
c_7310759.num_args = 1;
c_7310759.num_elements = 4;
c_7310759.elements = (object *)e_7310788;
c_7310759.elements[0] = k_733327;
c_7310759.elements[1] = lis_73960_731900;
c_7310759.elements[2] = ((closureN)self_734542)->elements[0];
c_7310759.elements[3] = ((closureN)self_734542)->elements[1];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_7310759, lis_73960_731900);; 
}

static void __lambda_850(void *data, object self_734543, int argc, object *args) /* object self_734543, object r_733328 */
 {
 object r_733328 = args[0];
  if( (boolean_f != r_733328) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734543)->elements[0], (((closure)  ((closureN)self_734543)->elements[0])->fn),  NULL);
} else { 
  
closureN_type c_7310764;
object e_7310784 [3];
c_7310764.hdr.mark = gc_color_red;
 c_7310764.hdr.grayed = 0;
c_7310764.tag = closureN_tag;
 c_7310764.fn = (function_type)__lambda_851;
c_7310764.num_args = 1;
c_7310764.num_elements = 3;
c_7310764.elements = (object *)e_7310784;
c_7310764.elements[0] = ((closureN)self_734543)->elements[0];
c_7310764.elements[1] = ((closureN)self_734543)->elements[1];
c_7310764.elements[2] = ((closureN)self_734543)->elements[3];



return_closcall2(data,  ((closureN)self_734543)->elements[2],  &c_7310764, Cyc_car(data, ((closureN)self_734543)->elements[1]));}
;; 
}

static void __lambda_851(void *data, object self_734544, int argc, object *args) /* object self_734544, object r_733330 */
 {
 object r_733330 = args[0];
  if( (boolean_f != r_733330) ){ 
  


closureN_type c_7310769;
object e_7310778 [2];
c_7310769.hdr.mark = gc_color_red;
 c_7310769.hdr.grayed = 0;
c_7310769.tag = closureN_tag;
 c_7310769.fn = (function_type)__lambda_852;
c_7310769.num_args = 1;
c_7310769.num_elements = 2;
c_7310769.elements = (object *)e_7310778;
c_7310769.elements[0] = ((closureN)self_734544)->elements[0];
c_7310769.elements[1] = ((closureN)self_734544)->elements[1];



return_closcall2(data,  car(((closureN)self_734544)->elements[2]),  &c_7310769, Cyc_cdr(data, ((closureN)self_734544)->elements[1]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734544)->elements[0], (((closure)  ((closureN)self_734544)->elements[0])->fn),  NULL);}
;; 
}

static void __lambda_852(void *data, object self_734545, int argc, object *args) /* object self_734545, object r_733331 */
 {
 object r_733331 = args[0];
  
pair_type local_7310774; 


return_direct_with_clo1(data,  ((closureN)self_734545)->elements[0], (((closure)  ((closureN)self_734545)->elements[0])->fn),  set_pair_as_expr(&local_7310774, Cyc_car(data, ((closureN)self_734545)->elements[1]), r_733331));; 
}

static void __lambda_847(void *data, object self_734546, int argc, object *args) /* object self_734546, object r_733326 */
 {
 object r_733326 = args[0];
  
closureN_type c_7310745;
object e_7310752 [3];
c_7310745.hdr.mark = gc_color_red;
 c_7310745.hdr.grayed = 0;
c_7310745.tag = closureN_tag;
 c_7310745.fn = (function_type)__lambda_848;
c_7310745.num_args = 1;
c_7310745.num_elements = 3;
c_7310745.elements = (object *)e_7310752;
c_7310745.elements[0] = ((closureN)self_734546)->elements[0];
c_7310745.elements[1] = ((closureN)self_734546)->elements[1];
c_7310745.elements[2] = ((closureN)self_734546)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310745,__lambda_848,  Cyc_set_cell(data, ((closureN)self_734546)->elements[2], r_733326));; 
}

static void __lambda_848(void *data, object self_734547, int argc, object *args) /* object self_734547, object r_733325 */
 {

  

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

static void __lambda_834(void *data, object _, int argc, object *args) /* closure _,object k_733312, object pred_73948_731891, object list_73949_731892 */
 {
object k_733312 = args[0]; object pred_73948_731891 = args[1]; object list_73949_731892 = args[2];
  Cyc_st_add(data, "srfi/1.sld:find-tail");

closureN_type c_7310678;
object e_7310732 [3];
c_7310678.hdr.mark = gc_color_red;
 c_7310678.hdr.grayed = 0;
c_7310678.tag = closureN_tag;
 c_7310678.fn = (function_type)__lambda_835;
c_7310678.num_args = 1;
c_7310678.num_elements = 3;
c_7310678.elements = (object *)e_7310732;
c_7310678.elements[0] = k_733312;
c_7310678.elements[1] = list_73949_731892;
c_7310678.elements[2] = pred_73948_731891;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7310678, primitive_procedure_127, pred_73948_731891, __glo_find_91tail_srfi_1);; 
}

static void __lambda_835(void *data, object self_734529, int argc, object *args) /* object self_734529, object r_733313 */
 {

  
closureN_type c_7310680;
object e_7310730 [2];
c_7310680.hdr.mark = gc_color_red;
 c_7310680.hdr.grayed = 0;
c_7310680.tag = closureN_tag;
 c_7310680.fn = (function_type)__lambda_836;
c_7310680.num_args = 1;
c_7310680.num_elements = 2;
c_7310680.elements = (object *)e_7310730;
c_7310680.elements[0] = ((closureN)self_734529)->elements[0];
c_7310680.elements[1] = ((closureN)self_734529)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310680,__lambda_836,  ((closureN)self_734529)->elements[1]);; 
}

static void __lambda_836(void *data, object self_734530, int argc, object *args) /* object self_734530, object list_73951_731893 */
 {
 object list_73951_731893 = args[0];
  
closureN_type c_7310682;
object e_7310729 [3];
c_7310682.hdr.mark = gc_color_red;
 c_7310682.hdr.grayed = 0;
c_7310682.tag = closureN_tag;
 c_7310682.fn = (function_type)__lambda_837;
c_7310682.num_args = 1;
c_7310682.num_elements = 3;
c_7310682.elements = (object *)e_7310729;
c_7310682.elements[0] = ((closureN)self_734530)->elements[0];
c_7310682.elements[1] = list_73951_731893;
c_7310682.elements[2] = ((closureN)self_734530)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310682,__lambda_837,  boolean_f);; 
}

static void __lambda_837(void *data, object self_734531, int argc, object *args) /* object self_734531, object lp_73952_731894 */
 {
 object lp_73952_731894 = args[0];
  
closureN_type c_7310684;
object e_7310725 [3];
c_7310684.hdr.mark = gc_color_red;
 c_7310684.hdr.grayed = 0;
c_7310684.tag = closureN_tag;
 c_7310684.fn = (function_type)__lambda_1197;
c_7310684.num_args = 1;
c_7310684.num_elements = 3;
c_7310684.elements = (object *)e_7310725;
c_7310684.elements[0] = ((closureN)self_734531)->elements[0];
c_7310684.elements[1] = ((closureN)self_734531)->elements[1];
c_7310684.elements[2] = ((closureN)self_734531)->elements[2];


pair_type local_7310728; 
return_direct_with_clo1(data,(closure)&c_7310684,__lambda_1197,  set_cell_as_expr(&local_7310728, lp_73952_731894));; 
}

static void __lambda_1197(void *data, object self_734532, int argc, object *args) /* object self_734532, object lp_73952_731894 */
 {
 object lp_73952_731894 = args[0];
  
closureN_type c_7310686;
object e_7310699 [3];
c_7310686.hdr.mark = gc_color_red;
 c_7310686.hdr.grayed = 0;
c_7310686.tag = closureN_tag;
 c_7310686.fn = (function_type)__lambda_838;
c_7310686.num_args = 1;
c_7310686.num_elements = 3;
c_7310686.elements = (object *)e_7310699;
c_7310686.elements[0] = ((closureN)self_734532)->elements[0];
c_7310686.elements[1] = ((closureN)self_734532)->elements[1];
c_7310686.elements[2] = lp_73952_731894;


closureN_type c_7310700;
object e_7310724 [2];
c_7310700.hdr.mark = gc_color_red;
 c_7310700.hdr.grayed = 0;
c_7310700.tag = closureN_tag;
 c_7310700.fn = (function_type)__lambda_840;
c_7310700.num_args = 1;
c_7310700.num_elements = 2;
c_7310700.elements = (object *)e_7310724;
c_7310700.elements[0] = lp_73952_731894;
c_7310700.elements[1] = ((closureN)self_734532)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310686,__lambda_838,  &c_7310700);; 
}

static void __lambda_840(void *data, object self_734533, int argc, object *args) /* object self_734533, object k_733316, object list_73953_731895 */
 {
 object k_733316 = args[0]; object list_73953_731895 = args[1];
  
closureN_type c_7310702;
object e_7310723 [4];
c_7310702.hdr.mark = gc_color_red;
 c_7310702.hdr.grayed = 0;
c_7310702.tag = closureN_tag;
 c_7310702.fn = (function_type)__lambda_841;
c_7310702.num_args = 1;
c_7310702.num_elements = 4;
c_7310702.elements = (object *)e_7310723;
c_7310702.elements[0] = k_733316;
c_7310702.elements[1] = list_73953_731895;
c_7310702.elements[2] = ((closureN)self_734533)->elements[0];
c_7310702.elements[3] = ((closureN)self_734533)->elements[1];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_7310702, list_73953_731895);; 
}

static void __lambda_841(void *data, object self_734534, int argc, object *args) /* object self_734534, object r_733317 */
 {
 object r_733317 = args[0];
  if( (boolean_f != r_733317) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734534)->elements[0], (((closure)  ((closureN)self_734534)->elements[0])->fn),  boolean_f);
} else { 
  
closureN_type c_7310707;
object e_7310719 [3];
c_7310707.hdr.mark = gc_color_red;
 c_7310707.hdr.grayed = 0;
c_7310707.tag = closureN_tag;
 c_7310707.fn = (function_type)__lambda_842;
c_7310707.num_args = 1;
c_7310707.num_elements = 3;
c_7310707.elements = (object *)e_7310719;
c_7310707.elements[0] = ((closureN)self_734534)->elements[0];
c_7310707.elements[1] = ((closureN)self_734534)->elements[1];
c_7310707.elements[2] = ((closureN)self_734534)->elements[2];



return_closcall2(data,  ((closureN)self_734534)->elements[3],  &c_7310707, Cyc_car(data, ((closureN)self_734534)->elements[1]));}
;; 
}

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



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

static void __lambda_838(void *data, object self_734536, int argc, object *args) /* object self_734536, object r_733315 */
 {
 object r_733315 = args[0];
  
closureN_type c_7310688;
object e_7310695 [3];
c_7310688.hdr.mark = gc_color_red;
 c_7310688.hdr.grayed = 0;
c_7310688.tag = closureN_tag;
 c_7310688.fn = (function_type)__lambda_839;
c_7310688.num_args = 1;
c_7310688.num_elements = 3;
c_7310688.elements = (object *)e_7310695;
c_7310688.elements[0] = ((closureN)self_734536)->elements[0];
c_7310688.elements[1] = ((closureN)self_734536)->elements[1];
c_7310688.elements[2] = ((closureN)self_734536)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310688,__lambda_839,  Cyc_set_cell(data, ((closureN)self_734536)->elements[2], r_733315));; 
}

static void __lambda_839(void *data, object self_734537, int argc, object *args) /* object self_734537, object r_733314 */
 {

  

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

static void __lambda_832(void *data, object _, int argc, object *args) /* closure _,object k_733308, object pred_73940_731888, object list_73941_731889 */
 {
object k_733308 = args[0]; object pred_73940_731888 = args[1]; object list_73941_731889 = args[2];
  Cyc_st_add(data, "srfi/1.sld:find");

closureN_type c_7310668;
object e_7310675 [1];
c_7310668.hdr.mark = gc_color_red;
 c_7310668.hdr.grayed = 0;
c_7310668.tag = closureN_tag;
 c_7310668.fn = (function_type)__lambda_833;
c_7310668.num_args = 1;
c_7310668.num_elements = 1;
c_7310668.elements = (object *)e_7310675;
c_7310668.elements[0] = k_733308;

return_direct_with_clo3(data,  __glo_find_91tail_srfi_1, (((closure)  __glo_find_91tail_srfi_1)->fn),  &c_7310668, pred_73940_731888, list_73941_731889);; 
}

static void __lambda_833(void *data, object self_734528, int argc, object *args) /* object self_734528, object tmp_73944_73946_731890 */
 {
 object tmp_73944_73946_731890 = args[0];
  if( (boolean_f != tmp_73944_73946_731890) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_734528)->elements[0], (((closure)  ((closureN)self_734528)->elements[0])->fn),  Cyc_car(data, tmp_73944_73946_731890));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734528)->elements[0], (((closure)  ((closureN)self_734528)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_824(void *data, object _, int argc, object *args) /* closure _,object k_733296, object key_73912_731882, object alist_73913_731883, object maybe_91_123_73914_731884_raw, ... */
 {
object k_733296 = args[0]; object key_73912_731882 = args[1]; object alist_73913_731883 = args[2];
load_varargs(maybe_91_123_73914_731884, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/1.sld:alist-delete!");

closureN_type c_7310618;
object e_7310665 [3];
c_7310618.hdr.mark = gc_color_red;
 c_7310618.hdr.grayed = 0;
c_7310618.tag = closureN_tag;
 c_7310618.fn = (function_type)__lambda_825;
c_7310618.num_args = 1;
c_7310618.num_elements = 3;
c_7310618.elements = (object *)e_7310665;
c_7310618.elements[0] = alist_73913_731883;
c_7310618.elements[1] = k_733296;
c_7310618.elements[2] = key_73912_731882;

return_direct_with_clo1(data,(closure)&c_7310618,__lambda_825,  maybe_91_123_73914_731884);; 
}

static void __lambda_825(void *data, object self_734521, int argc, object *args) /* object self_734521, object maybe_91arg_73929_73932_731887 */
 {
 object maybe_91arg_73929_73932_731887 = args[0];
  
closureN_type c_7310620;
object e_7310642 [1];
c_7310620.hdr.mark = gc_color_red;
 c_7310620.hdr.grayed = 0;
c_7310620.tag = closureN_tag;
 c_7310620.fn = (function_type)__lambda_826;
c_7310620.num_args = 0;
c_7310620.num_elements = 1;
c_7310620.elements = (object *)e_7310642;
c_7310620.elements[0] = maybe_91arg_73929_73932_731887;


closureN_type c_7310643;
object e_7310664 [3];
c_7310643.hdr.mark = gc_color_red;
 c_7310643.hdr.grayed = 0;
c_7310643.tag = closureN_tag;
 c_7310643.fn = (function_type)__lambda_828;
c_7310643.num_args = 1;
c_7310643.num_elements = 3;
c_7310643.elements = (object *)e_7310664;
c_7310643.elements[0] = ((closureN)self_734521)->elements[0];
c_7310643.elements[1] = ((closureN)self_734521)->elements[1];
c_7310643.elements[2] = ((closureN)self_734521)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310620,__lambda_826,  &c_7310643);; 
}

static void __lambda_828(void *data, object self_734522, int argc, object *args) /* object self_734522, object _123_73915_731885 */
 {
 object _123_73915_731885 = args[0];
  
closureN_type c_7310645;
object e_7310649 [2];
c_7310645.hdr.mark = gc_color_red;
 c_7310645.hdr.grayed = 0;
c_7310645.tag = closureN_tag;
 c_7310645.fn = (function_type)__lambda_829;
c_7310645.num_args = 1;
c_7310645.num_elements = 2;
c_7310645.elements = (object *)e_7310649;
c_7310645.elements[0] = ((closureN)self_734522)->elements[0];
c_7310645.elements[1] = ((closureN)self_734522)->elements[1];


closureN_type c_7310650;
object e_7310663 [2];
c_7310650.hdr.mark = gc_color_red;
 c_7310650.hdr.grayed = 0;
c_7310650.tag = closureN_tag;
 c_7310650.fn = (function_type)__lambda_830;
c_7310650.num_args = 1;
c_7310650.num_elements = 2;
c_7310650.elements = (object *)e_7310663;
c_7310650.elements[0] = _123_73915_731885;
c_7310650.elements[1] = ((closureN)self_734522)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310645,__lambda_829,  &c_7310650);; 
}

static void __lambda_830(void *data, object self_734523, int argc, object *args) /* object self_734523, object k_733299, object elt_73916_731886 */
 {
 object k_733299 = args[0]; object elt_73916_731886 = args[1];
  
closureN_type c_7310653;
object e_7310659 [1];
c_7310653.hdr.mark = gc_color_red;
 c_7310653.hdr.grayed = 0;
c_7310653.tag = closureN_tag;
 c_7310653.fn = (function_type)__lambda_831;
c_7310653.num_args = 1;
c_7310653.num_elements = 1;
c_7310653.elements = (object *)e_7310659;
c_7310653.elements[0] = k_733299;



return_closcall3(data,  ((closureN)self_734523)->elements[0],  &c_7310653, ((closureN)self_734523)->elements[1], Cyc_car(data, elt_73916_731886));; 
}

static void __lambda_831(void *data, object self_734524, int argc, object *args) /* object self_734524, object r_733300 */
 {
 object r_733300 = args[0];
  
complex_num_type local_7310658; 
return_direct_with_clo1(data,  ((closureN)self_734524)->elements[0], (((closure)  ((closureN)self_734524)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7310658, r_733300));; 
}

static void __lambda_829(void *data, object self_734525, int argc, object *args) /* object self_734525, object r_733298 */
 {
 object r_733298 = args[0];
  return_direct_with_clo3(data,  __glo_filter_67_srfi_1, (((closure)  __glo_filter_67_srfi_1)->fn),  ((closureN)self_734525)->elements[1], r_733298, ((closureN)self_734525)->elements[0]);; 
}

static void __lambda_826(void *data, object self_734526, int argc, object *args) /* object self_734526, object k_733302 */
 {
 object k_733302 = args[0];
    
if( (boolean_f != Cyc_is_null(((closureN)self_734526)->elements[0])) ){ 
  return_direct_with_clo1(data,  k_733302, (((closure)  k_733302)->fn),  primitive_equal_127);
} else { 
  
closureN_type c_7310626;
object e_7310638 [2];
c_7310626.hdr.mark = gc_color_red;
 c_7310626.hdr.grayed = 0;
c_7310626.tag = closureN_tag;
 c_7310626.fn = (function_type)__lambda_827;
c_7310626.num_args = 1;
c_7310626.num_elements = 2;
c_7310626.elements = (object *)e_7310638;
c_7310626.elements[0] = k_733302;
c_7310626.elements[1] = ((closureN)self_734526)->elements[0];



return_direct_with_clo1(data,(closure)&c_7310626,__lambda_827,  Cyc_cdr(data, ((closureN)self_734526)->elements[0]));}
;; 
}

static void __lambda_827(void *data, object self_734527, int argc, object *args) /* object self_734527, object r_733305 */
 {
 object r_733305 = args[0];
    
if( (boolean_f != Cyc_is_null(r_733305)) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_734527)->elements[0], (((closure)  ((closureN)self_734527)->elements[0])->fn),  Cyc_car(data, ((closureN)self_734527)->elements[1]));
} else { 
  
make_utf8_string_with_len(c_7310636, "too many optional arguments", 27, 27);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_734527)->elements[0], &c_7310636, ((closureN)self_734527)->elements[1]);}
;; 
}

static void __lambda_816(void *data, object _, int argc, object *args) /* closure _,object k_733284, object key_73884_731876, object alist_73885_731877, object maybe_91_123_73886_731878_raw, ... */
 {
object k_733284 = args[0]; object key_73884_731876 = args[1]; object alist_73885_731877 = args[2];
load_varargs(maybe_91_123_73886_731878, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/1.sld:alist-delete");

closureN_type c_7310568;
object e_7310615 [3];
c_7310568.hdr.mark = gc_color_red;
 c_7310568.hdr.grayed = 0;
c_7310568.tag = closureN_tag;
 c_7310568.fn = (function_type)__lambda_817;
c_7310568.num_args = 1;
c_7310568.num_elements = 3;
c_7310568.elements = (object *)e_7310615;
c_7310568.elements[0] = alist_73885_731877;
c_7310568.elements[1] = k_733284;
c_7310568.elements[2] = key_73884_731876;

return_direct_with_clo1(data,(closure)&c_7310568,__lambda_817,  maybe_91_123_73886_731878);; 
}

static void __lambda_817(void *data, object self_734514, int argc, object *args) /* object self_734514, object maybe_91arg_73901_73904_731881 */
 {
 object maybe_91arg_73901_73904_731881 = args[0];
  
closureN_type c_7310570;
object e_7310592 [1];
c_7310570.hdr.mark = gc_color_red;
 c_7310570.hdr.grayed = 0;
c_7310570.tag = closureN_tag;
 c_7310570.fn = (function_type)__lambda_818;
c_7310570.num_args = 0;
c_7310570.num_elements = 1;
c_7310570.elements = (object *)e_7310592;
c_7310570.elements[0] = maybe_91arg_73901_73904_731881;


closureN_type c_7310593;
object e_7310614 [3];
c_7310593.hdr.mark = gc_color_red;
 c_7310593.hdr.grayed = 0;
c_7310593.tag = closureN_tag;
 c_7310593.fn = (function_type)__lambda_820;
c_7310593.num_args = 1;
c_7310593.num_elements = 3;
c_7310593.elements = (object *)e_7310614;
c_7310593.elements[0] = ((closureN)self_734514)->elements[0];
c_7310593.elements[1] = ((closureN)self_734514)->elements[1];
c_7310593.elements[2] = ((closureN)self_734514)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310570,__lambda_818,  &c_7310593);; 
}

static void __lambda_820(void *data, object self_734515, int argc, object *args) /* object self_734515, object _123_73887_731879 */
 {
 object _123_73887_731879 = args[0];
  
closureN_type c_7310595;
object e_7310599 [2];
c_7310595.hdr.mark = gc_color_red;
 c_7310595.hdr.grayed = 0;
c_7310595.tag = closureN_tag;
 c_7310595.fn = (function_type)__lambda_821;
c_7310595.num_args = 1;
c_7310595.num_elements = 2;
c_7310595.elements = (object *)e_7310599;
c_7310595.elements[0] = ((closureN)self_734515)->elements[0];
c_7310595.elements[1] = ((closureN)self_734515)->elements[1];


closureN_type c_7310600;
object e_7310613 [2];
c_7310600.hdr.mark = gc_color_red;
 c_7310600.hdr.grayed = 0;
c_7310600.tag = closureN_tag;
 c_7310600.fn = (function_type)__lambda_822;
c_7310600.num_args = 1;
c_7310600.num_elements = 2;
c_7310600.elements = (object *)e_7310613;
c_7310600.elements[0] = _123_73887_731879;
c_7310600.elements[1] = ((closureN)self_734515)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310595,__lambda_821,  &c_7310600);; 
}

static void __lambda_822(void *data, object self_734516, int argc, object *args) /* object self_734516, object k_733287, object elt_73888_731880 */
 {
 object k_733287 = args[0]; object elt_73888_731880 = args[1];
  
closureN_type c_7310603;
object e_7310609 [1];
c_7310603.hdr.mark = gc_color_red;
 c_7310603.hdr.grayed = 0;
c_7310603.tag = closureN_tag;
 c_7310603.fn = (function_type)__lambda_823;
c_7310603.num_args = 1;
c_7310603.num_elements = 1;
c_7310603.elements = (object *)e_7310609;
c_7310603.elements[0] = k_733287;



return_closcall3(data,  ((closureN)self_734516)->elements[0],  &c_7310603, ((closureN)self_734516)->elements[1], Cyc_car(data, elt_73888_731880));; 
}

static void __lambda_823(void *data, object self_734517, int argc, object *args) /* object self_734517, object r_733288 */
 {
 object r_733288 = args[0];
  
complex_num_type local_7310608; 
return_direct_with_clo1(data,  ((closureN)self_734517)->elements[0], (((closure)  ((closureN)self_734517)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7310608, r_733288));; 
}

static void __lambda_821(void *data, object self_734518, int argc, object *args) /* object self_734518, object r_733286 */
 {
 object r_733286 = args[0];
  return_direct_with_clo3(data,  __glo_filter_srfi_1, (((closure)  __glo_filter_srfi_1)->fn),  ((closureN)self_734518)->elements[1], r_733286, ((closureN)self_734518)->elements[0]);; 
}

static void __lambda_818(void *data, object self_734519, int argc, object *args) /* object self_734519, object k_733290 */
 {
 object k_733290 = args[0];
    
if( (boolean_f != Cyc_is_null(((closureN)self_734519)->elements[0])) ){ 
  return_direct_with_clo1(data,  k_733290, (((closure)  k_733290)->fn),  primitive_equal_127);
} else { 
  
closureN_type c_7310576;
object e_7310588 [2];
c_7310576.hdr.mark = gc_color_red;
 c_7310576.hdr.grayed = 0;
c_7310576.tag = closureN_tag;
 c_7310576.fn = (function_type)__lambda_819;
c_7310576.num_args = 1;
c_7310576.num_elements = 2;
c_7310576.elements = (object *)e_7310588;
c_7310576.elements[0] = k_733290;
c_7310576.elements[1] = ((closureN)self_734519)->elements[0];



return_direct_with_clo1(data,(closure)&c_7310576,__lambda_819,  Cyc_cdr(data, ((closureN)self_734519)->elements[0]));}
;; 
}

static void __lambda_819(void *data, object self_734520, int argc, object *args) /* object self_734520, object r_733293 */
 {
 object r_733293 = args[0];
    
if( (boolean_f != Cyc_is_null(r_733293)) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_734520)->elements[0], (((closure)  ((closureN)self_734520)->elements[0])->fn),  Cyc_car(data, ((closureN)self_734520)->elements[1]));
} else { 
  
make_utf8_string_with_len(c_7310586, "too many optional arguments", 27, 27);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_734520)->elements[0], &c_7310586, ((closureN)self_734520)->elements[1]);}
;; 
}

static void __lambda_813(void *data, object _, int argc, object *args) /* closure _,object k_733277, object alist_73882_731874 */
 {
object k_733277 = args[0]; object alist_73882_731874 = args[1];
  Cyc_st_add(data, "srfi/1.sld:alist-copy");

closureN_type c_7310552;
object e_7310556 [2];
c_7310552.hdr.mark = gc_color_red;
 c_7310552.hdr.grayed = 0;
c_7310552.tag = closureN_tag;
 c_7310552.fn = (function_type)__lambda_814;
c_7310552.num_args = 1;
c_7310552.num_elements = 2;
c_7310552.elements = (object *)e_7310556;
c_7310552.elements[0] = alist_73882_731874;
c_7310552.elements[1] = k_733277;


mclosure0(c_7310557, (function_type)__lambda_815);c_7310557.num_args = 1;
return_direct_with_clo1(data,(closure)&c_7310552,__lambda_814,  &c_7310557);; 
}

static void __lambda_815(void *data, object self_734512, int argc, object *args) /* object self_734512, object k_733279, object elt_73883_731875 */
 {
 object k_733279 = args[0]; object elt_73883_731875 = args[1];
  
pair_type local_7310561; 




return_direct_with_clo1(data,  k_733279, (((closure)  k_733279)->fn),  set_pair_as_expr(&local_7310561, Cyc_car(data, elt_73883_731875), Cyc_cdr(data, elt_73883_731875)));; 
}

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

static void __lambda_812(void *data, object _, int argc, object *args) /* closure _,object k_733273, object key_73879_731871, object datum_73880_731872, object alist_73881_731873 */
 {
object k_733273 = args[0]; object key_73879_731871 = args[1]; object datum_73880_731872 = args[2]; object alist_73881_731873 = args[3];
  Cyc_st_add(data, "srfi/1.sld:alist-cons");

pair_type local_7310546; 

pair_type local_7310549; 
return_direct_with_clo1(data,  k_733273, (((closure)  k_733273)->fn),  set_pair_as_expr(&local_7310546, set_pair_as_expr(&local_7310549, key_73879_731871, datum_73880_731872), alist_73881_731873));; 
}

static void __lambda_798(void *data, object _, int argc, object *args) /* closure _,object k_733255, object lis_73839_731861, object maybe_91_123_73840_731862 */
 {
object k_733255 = args[0]; object lis_73839_731861 = args[1]; object maybe_91_123_73840_731862 = args[2];
  Cyc_st_add(data, "srfi/1.sld:delete-duplicates!");

closureN_type c_7310443;
object e_7310541 [2];
c_7310443.hdr.mark = gc_color_red;
 c_7310443.hdr.grayed = 0;
c_7310443.tag = closureN_tag;
 c_7310443.fn = (function_type)__lambda_799;
c_7310443.num_args = 1;
c_7310443.num_elements = 2;
c_7310443.elements = (object *)e_7310541;
c_7310443.elements[0] = k_733255;
c_7310443.elements[1] = lis_73839_731861;

return_direct_with_clo1(data,(closure)&c_7310443,__lambda_799,  maybe_91_123_73840_731862);; 
}

static void __lambda_799(void *data, object self_734498, int argc, object *args) /* object self_734498, object maybe_91arg_73868_73871_731870 */
 {
 object maybe_91arg_73868_73871_731870 = args[0];
  
closureN_type c_7310445;
object e_7310467 [1];
c_7310445.hdr.mark = gc_color_red;
 c_7310445.hdr.grayed = 0;
c_7310445.tag = closureN_tag;
 c_7310445.fn = (function_type)__lambda_800;
c_7310445.num_args = 0;
c_7310445.num_elements = 1;
c_7310445.elements = (object *)e_7310467;
c_7310445.elements[0] = maybe_91arg_73868_73871_731870;


closureN_type c_7310468;
object e_7310540 [2];
c_7310468.hdr.mark = gc_color_red;
 c_7310468.hdr.grayed = 0;
c_7310468.tag = closureN_tag;
 c_7310468.fn = (function_type)__lambda_802;
c_7310468.num_args = 1;
c_7310468.num_elements = 2;
c_7310468.elements = (object *)e_7310540;
c_7310468.elements[0] = ((closureN)self_734498)->elements[0];
c_7310468.elements[1] = ((closureN)self_734498)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310445,__lambda_800,  &c_7310468);; 
}

static void __lambda_802(void *data, object self_734499, int argc, object *args) /* object self_734499, object elt_123_73841_731863 */
 {
 object elt_123_73841_731863 = args[0];
  
closureN_type c_7310470;
object e_7310539 [3];
c_7310470.hdr.mark = gc_color_red;
 c_7310470.hdr.grayed = 0;
c_7310470.tag = closureN_tag;
 c_7310470.fn = (function_type)__lambda_803;
c_7310470.num_args = 1;
c_7310470.num_elements = 3;
c_7310470.elements = (object *)e_7310539;
c_7310470.elements[0] = elt_123_73841_731863;
c_7310470.elements[1] = ((closureN)self_734499)->elements[0];
c_7310470.elements[2] = ((closureN)self_734499)->elements[1];

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7310470, primitive_procedure_127, elt_123_73841_731863, __glo_delete_91duplicates_67_srfi_1);; 
}

static void __lambda_803(void *data, object self_734500, int argc, object *args) /* object self_734500, object r_733257 */
 {

  
closureN_type c_7310472;
object e_7310537 [2];
c_7310472.hdr.mark = gc_color_red;
 c_7310472.hdr.grayed = 0;
c_7310472.tag = closureN_tag;
 c_7310472.fn = (function_type)__lambda_804;
c_7310472.num_args = 1;
c_7310472.num_elements = 2;
c_7310472.elements = (object *)e_7310537;
c_7310472.elements[0] = ((closureN)self_734500)->elements[0];
c_7310472.elements[1] = ((closureN)self_734500)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310472,__lambda_804,  ((closureN)self_734500)->elements[2]);; 
}

static void __lambda_804(void *data, object self_734501, int argc, object *args) /* object self_734501, object lis_73843_731864 */
 {
 object lis_73843_731864 = args[0];
  
closureN_type c_7310474;
object e_7310536 [3];
c_7310474.hdr.mark = gc_color_red;
 c_7310474.hdr.grayed = 0;
c_7310474.tag = closureN_tag;
 c_7310474.fn = (function_type)__lambda_805;
c_7310474.num_args = 1;
c_7310474.num_elements = 3;
c_7310474.elements = (object *)e_7310536;
c_7310474.elements[0] = ((closureN)self_734501)->elements[0];
c_7310474.elements[1] = ((closureN)self_734501)->elements[1];
c_7310474.elements[2] = lis_73843_731864;

return_direct_with_clo1(data,(closure)&c_7310474,__lambda_805,  boolean_f);; 
}

static void __lambda_805(void *data, object self_734502, int argc, object *args) /* object self_734502, object recur_73844_731865 */
 {
 object recur_73844_731865 = args[0];
  
closureN_type c_7310476;
object e_7310532 [3];
c_7310476.hdr.mark = gc_color_red;
 c_7310476.hdr.grayed = 0;
c_7310476.tag = closureN_tag;
 c_7310476.fn = (function_type)__lambda_1196;
c_7310476.num_args = 1;
c_7310476.num_elements = 3;
c_7310476.elements = (object *)e_7310532;
c_7310476.elements[0] = ((closureN)self_734502)->elements[0];
c_7310476.elements[1] = ((closureN)self_734502)->elements[1];
c_7310476.elements[2] = ((closureN)self_734502)->elements[2];


pair_type local_7310535; 
return_direct_with_clo1(data,(closure)&c_7310476,__lambda_1196,  set_cell_as_expr(&local_7310535, recur_73844_731865));; 
}

static void __lambda_1196(void *data, object self_734503, int argc, object *args) /* object self_734503, object recur_73844_731865 */
 {
 object recur_73844_731865 = args[0];
  
closureN_type c_7310478;
object e_7310491 [3];
c_7310478.hdr.mark = gc_color_red;
 c_7310478.hdr.grayed = 0;
c_7310478.tag = closureN_tag;
 c_7310478.fn = (function_type)__lambda_806;
c_7310478.num_args = 1;
c_7310478.num_elements = 3;
c_7310478.elements = (object *)e_7310491;
c_7310478.elements[0] = ((closureN)self_734503)->elements[1];
c_7310478.elements[1] = ((closureN)self_734503)->elements[2];
c_7310478.elements[2] = recur_73844_731865;


closureN_type c_7310492;
object e_7310531 [2];
c_7310492.hdr.mark = gc_color_red;
 c_7310492.hdr.grayed = 0;
c_7310492.tag = closureN_tag;
 c_7310492.fn = (function_type)__lambda_808;
c_7310492.num_args = 1;
c_7310492.num_elements = 2;
c_7310492.elements = (object *)e_7310531;
c_7310492.elements[0] = ((closureN)self_734503)->elements[0];
c_7310492.elements[1] = recur_73844_731865;

return_direct_with_clo1(data,(closure)&c_7310478,__lambda_806,  &c_7310492);; 
}

static void __lambda_808(void *data, object self_734504, int argc, object *args) /* object self_734504, object k_733260, object lis_73845_731866 */
 {
 object k_733260 = args[0]; object lis_73845_731866 = args[1];
  
closureN_type c_7310494;
object e_7310530 [4];
c_7310494.hdr.mark = gc_color_red;
 c_7310494.hdr.grayed = 0;
c_7310494.tag = closureN_tag;
 c_7310494.fn = (function_type)__lambda_809;
c_7310494.num_args = 1;
c_7310494.num_elements = 4;
c_7310494.elements = (object *)e_7310530;
c_7310494.elements[0] = ((closureN)self_734504)->elements[0];
c_7310494.elements[1] = k_733260;
c_7310494.elements[2] = lis_73845_731866;
c_7310494.elements[3] = ((closureN)self_734504)->elements[1];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_7310494, lis_73845_731866);; 
}

static void __lambda_809(void *data, object self_734505, int argc, object *args) /* object self_734505, object r_733261 */
 {
 object r_733261 = args[0];
  if( (boolean_f != r_733261) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734505)->elements[1], (((closure)  ((closureN)self_734505)->elements[1])->fn),  ((closureN)self_734505)->elements[2]);
} else { 
  
closureN_type c_7310499;
object e_7310522 [3];
c_7310499.hdr.mark = gc_color_red;
 c_7310499.hdr.grayed = 0;
c_7310499.tag = closureN_tag;
 c_7310499.fn = (function_type)__lambda_810;
c_7310499.num_args = 1;
c_7310499.num_elements = 3;
c_7310499.elements = (object *)e_7310522;
c_7310499.elements[0] = ((closureN)self_734505)->elements[1];
c_7310499.elements[1] = ((closureN)self_734505)->elements[2];
c_7310499.elements[2] = ((closureN)self_734505)->elements[3];





return_direct_with_clo4(data,  __glo_delete_67_srfi_1, (((closure)  __glo_delete_67_srfi_1)->fn),  &c_7310499, Cyc_car(data, ((closureN)self_734505)->elements[2]), Cyc_cdr(data, ((closureN)self_734505)->elements[2]), ((closureN)self_734505)->elements[0]);}
;; 
}

static void __lambda_810(void *data, object self_734506, int argc, object *args) /* object self_734506, object r_733266 */
 {
 object r_733266 = args[0];
  


closureN_type c_7310504;
object e_7310521 [2];
c_7310504.hdr.mark = gc_color_red;
 c_7310504.hdr.grayed = 0;
c_7310504.tag = closureN_tag;
 c_7310504.fn = (function_type)__lambda_811;
c_7310504.num_args = 1;
c_7310504.num_elements = 2;
c_7310504.elements = (object *)e_7310521;
c_7310504.elements[0] = ((closureN)self_734506)->elements[0];
c_7310504.elements[1] = ((closureN)self_734506)->elements[1];

return_closcall2(data,  car(((closureN)self_734506)->elements[2]),  &c_7310504, r_733266);; 
}

static void __lambda_811(void *data, object self_734507, int argc, object *args) /* object self_734507, object new_91tail_73854_731869 */
 {
 object new_91tail_73854_731869 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_cdr(data, ((closureN)self_734507)->elements[1]), new_91tail_73854_731869)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734507)->elements[0], (((closure)  ((closureN)self_734507)->elements[0])->fn),  ((closureN)self_734507)->elements[1]);
} else { 
  
pair_type local_7310517; 


return_direct_with_clo1(data,  ((closureN)self_734507)->elements[0], (((closure)  ((closureN)self_734507)->elements[0])->fn),  set_pair_as_expr(&local_7310517, Cyc_car(data, ((closureN)self_734507)->elements[1]), new_91tail_73854_731869));}
;; 
}

static void __lambda_806(void *data, object self_734508, int argc, object *args) /* object self_734508, object r_733259 */
 {
 object r_733259 = args[0];
  
closureN_type c_7310480;
object e_7310487 [3];
c_7310480.hdr.mark = gc_color_red;
 c_7310480.hdr.grayed = 0;
c_7310480.tag = closureN_tag;
 c_7310480.fn = (function_type)__lambda_807;
c_7310480.num_args = 1;
c_7310480.num_elements = 3;
c_7310480.elements = (object *)e_7310487;
c_7310480.elements[0] = ((closureN)self_734508)->elements[0];
c_7310480.elements[1] = ((closureN)self_734508)->elements[1];
c_7310480.elements[2] = ((closureN)self_734508)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310480,__lambda_807,  Cyc_set_cell(data, ((closureN)self_734508)->elements[2], r_733259));; 
}

static void __lambda_807(void *data, object self_734509, int argc, object *args) /* object self_734509, object r_733258 */
 {

  

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

static void __lambda_800(void *data, object self_734510, int argc, object *args) /* object self_734510, object k_733267 */
 {
 object k_733267 = args[0];
    
if( (boolean_f != Cyc_is_null(((closureN)self_734510)->elements[0])) ){ 
  return_direct_with_clo1(data,  k_733267, (((closure)  k_733267)->fn),  primitive_equal_127);
} else { 
  
closureN_type c_7310451;
object e_7310463 [2];
c_7310451.hdr.mark = gc_color_red;
 c_7310451.hdr.grayed = 0;
c_7310451.tag = closureN_tag;
 c_7310451.fn = (function_type)__lambda_801;
c_7310451.num_args = 1;
c_7310451.num_elements = 2;
c_7310451.elements = (object *)e_7310463;
c_7310451.elements[0] = k_733267;
c_7310451.elements[1] = ((closureN)self_734510)->elements[0];



return_direct_with_clo1(data,(closure)&c_7310451,__lambda_801,  Cyc_cdr(data, ((closureN)self_734510)->elements[0]));}
;; 
}

static void __lambda_801(void *data, object self_734511, int argc, object *args) /* object self_734511, object r_733270 */
 {
 object r_733270 = args[0];
    
if( (boolean_f != Cyc_is_null(r_733270)) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_734511)->elements[0], (((closure)  ((closureN)self_734511)->elements[0])->fn),  Cyc_car(data, ((closureN)self_734511)->elements[1]));
} else { 
  
make_utf8_string_with_len(c_7310461, "too many optional arguments", 27, 27);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_734511)->elements[0], &c_7310461, ((closureN)self_734511)->elements[1]);}
;; 
}

static void __lambda_784(void *data, object _, int argc, object *args) /* closure _,object k_733237, object lis_73799_731851, object maybe_91_123_73800_731852_raw, ... */
 {
object k_733237 = args[0]; object lis_73799_731851 = args[1];
load_varargs(maybe_91_123_73800_731852, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/1.sld:delete-duplicates");

closureN_type c_7310342;
object e_7310440 [2];
c_7310342.hdr.mark = gc_color_red;
 c_7310342.hdr.grayed = 0;
c_7310342.tag = closureN_tag;
 c_7310342.fn = (function_type)__lambda_785;
c_7310342.num_args = 1;
c_7310342.num_elements = 2;
c_7310342.elements = (object *)e_7310440;
c_7310342.elements[0] = k_733237;
c_7310342.elements[1] = lis_73799_731851;

return_direct_with_clo1(data,(closure)&c_7310342,__lambda_785,  maybe_91_123_73800_731852);; 
}

static void __lambda_785(void *data, object self_734484, int argc, object *args) /* object self_734484, object maybe_91arg_73828_73831_731860 */
 {
 object maybe_91arg_73828_73831_731860 = args[0];
  
closureN_type c_7310344;
object e_7310366 [1];
c_7310344.hdr.mark = gc_color_red;
 c_7310344.hdr.grayed = 0;
c_7310344.tag = closureN_tag;
 c_7310344.fn = (function_type)__lambda_786;
c_7310344.num_args = 0;
c_7310344.num_elements = 1;
c_7310344.elements = (object *)e_7310366;
c_7310344.elements[0] = maybe_91arg_73828_73831_731860;


closureN_type c_7310367;
object e_7310439 [2];
c_7310367.hdr.mark = gc_color_red;
 c_7310367.hdr.grayed = 0;
c_7310367.tag = closureN_tag;
 c_7310367.fn = (function_type)__lambda_788;
c_7310367.num_args = 1;
c_7310367.num_elements = 2;
c_7310367.elements = (object *)e_7310439;
c_7310367.elements[0] = ((closureN)self_734484)->elements[0];
c_7310367.elements[1] = ((closureN)self_734484)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310344,__lambda_786,  &c_7310367);; 
}

static void __lambda_788(void *data, object self_734485, int argc, object *args) /* object self_734485, object elt_123_73801_731853 */
 {
 object elt_123_73801_731853 = args[0];
  
closureN_type c_7310369;
object e_7310438 [3];
c_7310369.hdr.mark = gc_color_red;
 c_7310369.hdr.grayed = 0;
c_7310369.tag = closureN_tag;
 c_7310369.fn = (function_type)__lambda_789;
c_7310369.num_args = 1;
c_7310369.num_elements = 3;
c_7310369.elements = (object *)e_7310438;
c_7310369.elements[0] = elt_123_73801_731853;
c_7310369.elements[1] = ((closureN)self_734485)->elements[0];
c_7310369.elements[2] = ((closureN)self_734485)->elements[1];

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_7310369, primitive_procedure_127, elt_123_73801_731853, __glo_delete_91duplicates_srfi_1);; 
}

static void __lambda_789(void *data, object self_734486, int argc, object *args) /* object self_734486, object r_733239 */
 {

  
closureN_type c_7310371;
object e_7310436 [2];
c_7310371.hdr.mark = gc_color_red;
 c_7310371.hdr.grayed = 0;
c_7310371.tag = closureN_tag;
 c_7310371.fn = (function_type)__lambda_790;
c_7310371.num_args = 1;
c_7310371.num_elements = 2;
c_7310371.elements = (object *)e_7310436;
c_7310371.elements[0] = ((closureN)self_734486)->elements[0];
c_7310371.elements[1] = ((closureN)self_734486)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310371,__lambda_790,  ((closureN)self_734486)->elements[2]);; 
}

static void __lambda_790(void *data, object self_734487, int argc, object *args) /* object self_734487, object lis_73803_731854 */
 {
 object lis_73803_731854 = args[0];
  
closureN_type c_7310373;
object e_7310435 [3];
c_7310373.hdr.mark = gc_color_red;
 c_7310373.hdr.grayed = 0;
c_7310373.tag = closureN_tag;
 c_7310373.fn = (function_type)__lambda_791;
c_7310373.num_args = 1;
c_7310373.num_elements = 3;
c_7310373.elements = (object *)e_7310435;
c_7310373.elements[0] = ((closureN)self_734487)->elements[0];
c_7310373.elements[1] = ((closureN)self_734487)->elements[1];
c_7310373.elements[2] = lis_73803_731854;

return_direct_with_clo1(data,(closure)&c_7310373,__lambda_791,  boolean_f);; 
}

static void __lambda_791(void *data, object self_734488, int argc, object *args) /* object self_734488, object recur_73804_731855 */
 {
 object recur_73804_731855 = args[0];
  
closureN_type c_7310375;
object e_7310431 [3];
c_7310375.hdr.mark = gc_color_red;
 c_7310375.hdr.grayed = 0;
c_7310375.tag = closureN_tag;
 c_7310375.fn = (function_type)__lambda_1195;
c_7310375.num_args = 1;
c_7310375.num_elements = 3;
c_7310375.elements = (object *)e_7310431;
c_7310375.elements[0] = ((closureN)self_734488)->elements[0];
c_7310375.elements[1] = ((closureN)self_734488)->elements[1];
c_7310375.elements[2] = ((closureN)self_734488)->elements[2];


pair_type local_7310434; 
return_direct_with_clo1(data,(closure)&c_7310375,__lambda_1195,  set_cell_as_expr(&local_7310434, recur_73804_731855));; 
}

static void __lambda_1195(void *data, object self_734489, int argc, object *args) /* object self_734489, object recur_73804_731855 */
 {
 object recur_73804_731855 = args[0];
  
closureN_type c_7310377;
object e_7310390 [3];
c_7310377.hdr.mark = gc_color_red;
 c_7310377.hdr.grayed = 0;
c_7310377.tag = closureN_tag;
 c_7310377.fn = (function_type)__lambda_792;
c_7310377.num_args = 1;
c_7310377.num_elements = 3;
c_7310377.elements = (object *)e_7310390;
c_7310377.elements[0] = ((closureN)self_734489)->elements[1];
c_7310377.elements[1] = ((closureN)self_734489)->elements[2];
c_7310377.elements[2] = recur_73804_731855;


closureN_type c_7310391;
object e_7310430 [2];
c_7310391.hdr.mark = gc_color_red;
 c_7310391.hdr.grayed = 0;
c_7310391.tag = closureN_tag;
 c_7310391.fn = (function_type)__lambda_794;
c_7310391.num_args = 1;
c_7310391.num_elements = 2;
c_7310391.elements = (object *)e_7310430;
c_7310391.elements[0] = ((closureN)self_734489)->elements[0];
c_7310391.elements[1] = recur_73804_731855;

return_direct_with_clo1(data,(closure)&c_7310377,__lambda_792,  &c_7310391);; 
}

static void __lambda_794(void *data, object self_734490, int argc, object *args) /* object self_734490, object k_733242, object lis_73805_731856 */
 {
 object k_733242 = args[0]; object lis_73805_731856 = args[1];
  
closureN_type c_7310393;
object e_7310429 [4];
c_7310393.hdr.mark = gc_color_red;
 c_7310393.hdr.grayed = 0;
c_7310393.tag = closureN_tag;
 c_7310393.fn = (function_type)__lambda_795;
c_7310393.num_args = 1;
c_7310393.num_elements = 4;
c_7310393.elements = (object *)e_7310429;
c_7310393.elements[0] = ((closureN)self_734490)->elements[0];
c_7310393.elements[1] = k_733242;
c_7310393.elements[2] = lis_73805_731856;
c_7310393.elements[3] = ((closureN)self_734490)->elements[1];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_7310393, lis_73805_731856);; 
}

static void __lambda_795(void *data, object self_734491, int argc, object *args) /* object self_734491, object r_733243 */
 {
 object r_733243 = args[0];
  if( (boolean_f != r_733243) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734491)->elements[1], (((closure)  ((closureN)self_734491)->elements[1])->fn),  ((closureN)self_734491)->elements[2]);
} else { 
  
closureN_type c_7310398;
object e_7310421 [3];
c_7310398.hdr.mark = gc_color_red;
 c_7310398.hdr.grayed = 0;
c_7310398.tag = closureN_tag;
 c_7310398.fn = (function_type)__lambda_796;
c_7310398.num_args = 1;
c_7310398.num_elements = 3;
c_7310398.elements = (object *)e_7310421;
c_7310398.elements[0] = ((closureN)self_734491)->elements[1];
c_7310398.elements[1] = ((closureN)self_734491)->elements[2];
c_7310398.elements[2] = ((closureN)self_734491)->elements[3];





return_direct_with_clo4(data,  __glo_delete_srfi_1, (((closure)  __glo_delete_srfi_1)->fn),  &c_7310398, Cyc_car(data, ((closureN)self_734491)->elements[2]), Cyc_cdr(data, ((closureN)self_734491)->elements[2]), ((closureN)self_734491)->elements[0]);}
;; 
}

static void __lambda_796(void *data, object self_734492, int argc, object *args) /* object self_734492, object r_733248 */
 {
 object r_733248 = args[0];
  


closureN_type c_7310403;
object e_7310420 [2];
c_7310403.hdr.mark = gc_color_red;
 c_7310403.hdr.grayed = 0;
c_7310403.tag = closureN_tag;
 c_7310403.fn = (function_type)__lambda_797;
c_7310403.num_args = 1;
c_7310403.num_elements = 2;
c_7310403.elements = (object *)e_7310420;
c_7310403.elements[0] = ((closureN)self_734492)->elements[0];
c_7310403.elements[1] = ((closureN)self_734492)->elements[1];

return_closcall2(data,  car(((closureN)self_734492)->elements[2]),  &c_7310403, r_733248);; 
}

static void __lambda_797(void *data, object self_734493, int argc, object *args) /* object self_734493, object new_91tail_73814_731859 */
 {
 object new_91tail_73814_731859 = args[0];
    
  
if( (boolean_f != Cyc_eq(Cyc_cdr(data, ((closureN)self_734493)->elements[1]), new_91tail_73814_731859)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734493)->elements[0], (((closure)  ((closureN)self_734493)->elements[0])->fn),  ((closureN)self_734493)->elements[1]);
} else { 
  
pair_type local_7310416; 


return_direct_with_clo1(data,  ((closureN)self_734493)->elements[0], (((closure)  ((closureN)self_734493)->elements[0])->fn),  set_pair_as_expr(&local_7310416, Cyc_car(data, ((closureN)self_734493)->elements[1]), new_91tail_73814_731859));}
;; 
}

static void __lambda_792(void *data, object self_734494, int argc, object *args) /* object self_734494, object r_733241 */
 {
 object r_733241 = args[0];
  
closureN_type c_7310379;
object e_7310386 [3];
c_7310379.hdr.mark = gc_color_red;
 c_7310379.hdr.grayed = 0;
c_7310379.tag = closureN_tag;
 c_7310379.fn = (function_type)__lambda_793;
c_7310379.num_args = 1;
c_7310379.num_elements = 3;
c_7310379.elements = (object *)e_7310386;
c_7310379.elements[0] = ((closureN)self_734494)->elements[0];
c_7310379.elements[1] = ((closureN)self_734494)->elements[1];
c_7310379.elements[2] = ((closureN)self_734494)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310379,__lambda_793,  Cyc_set_cell(data, ((closureN)self_734494)->elements[2], r_733241));; 
}

static void __lambda_793(void *data, object self_734495, int argc, object *args) /* object self_734495, object r_733240 */
 {

  

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

static void __lambda_786(void *data, object self_734496, int argc, object *args) /* object self_734496, object k_733249 */
 {
 object k_733249 = args[0];
    
if( (boolean_f != Cyc_is_null(((closureN)self_734496)->elements[0])) ){ 
  return_direct_with_clo1(data,  k_733249, (((closure)  k_733249)->fn),  primitive_equal_127);
} else { 
  
closureN_type c_7310350;
object e_7310362 [2];
c_7310350.hdr.mark = gc_color_red;
 c_7310350.hdr.grayed = 0;
c_7310350.tag = closureN_tag;
 c_7310350.fn = (function_type)__lambda_787;
c_7310350.num_args = 1;
c_7310350.num_elements = 2;
c_7310350.elements = (object *)e_7310362;
c_7310350.elements[0] = k_733249;
c_7310350.elements[1] = ((closureN)self_734496)->elements[0];



return_direct_with_clo1(data,(closure)&c_7310350,__lambda_787,  Cyc_cdr(data, ((closureN)self_734496)->elements[0]));}
;; 
}

static void __lambda_787(void *data, object self_734497, int argc, object *args) /* object self_734497, object r_733252 */
 {
 object r_733252 = args[0];
    
if( (boolean_f != Cyc_is_null(r_733252)) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_734497)->elements[0], (((closure)  ((closureN)self_734497)->elements[0])->fn),  Cyc_car(data, ((closureN)self_734497)->elements[1]));
} else { 
  
make_utf8_string_with_len(c_7310360, "too many optional arguments", 27, 27);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_734497)->elements[0], &c_7310360, ((closureN)self_734497)->elements[1]);}
;; 
}

static void __lambda_776(void *data, object _, int argc, object *args) /* closure _,object k_733226, object x_73771_731845, object lis_73772_731846, object maybe_91_123_73773_731847_raw, ... */
 {
object k_733226 = args[0]; object x_73771_731845 = args[1]; object lis_73772_731846 = args[2];
load_varargs(maybe_91_123_73773_731847, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/1.sld:delete!");

closureN_type c_7310294;
object e_7310339 [3];
c_7310294.hdr.mark = gc_color_red;
 c_7310294.hdr.grayed = 0;
c_7310294.tag = closureN_tag;
 c_7310294.fn = (function_type)__lambda_777;
c_7310294.num_args = 1;
c_7310294.num_elements = 3;
c_7310294.elements = (object *)e_7310339;
c_7310294.elements[0] = k_733226;
c_7310294.elements[1] = lis_73772_731846;
c_7310294.elements[2] = x_73771_731845;

return_direct_with_clo1(data,(closure)&c_7310294,__lambda_777,  maybe_91_123_73773_731847);; 
}

static void __lambda_777(void *data, object self_734477, int argc, object *args) /* object self_734477, object maybe_91arg_73788_73791_731850 */
 {
 object maybe_91arg_73788_73791_731850 = args[0];
  
closureN_type c_7310296;
object e_7310318 [1];
c_7310296.hdr.mark = gc_color_red;
 c_7310296.hdr.grayed = 0;
c_7310296.tag = closureN_tag;
 c_7310296.fn = (function_type)__lambda_778;
c_7310296.num_args = 0;
c_7310296.num_elements = 1;
c_7310296.elements = (object *)e_7310318;
c_7310296.elements[0] = maybe_91arg_73788_73791_731850;


closureN_type c_7310319;
object e_7310338 [3];
c_7310319.hdr.mark = gc_color_red;
 c_7310319.hdr.grayed = 0;
c_7310319.tag = closureN_tag;
 c_7310319.fn = (function_type)__lambda_780;
c_7310319.num_args = 1;
c_7310319.num_elements = 3;
c_7310319.elements = (object *)e_7310338;
c_7310319.elements[0] = ((closureN)self_734477)->elements[0];
c_7310319.elements[1] = ((closureN)self_734477)->elements[1];
c_7310319.elements[2] = ((closureN)self_734477)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310296,__lambda_778,  &c_7310319);; 
}

static void __lambda_780(void *data, object self_734478, int argc, object *args) /* object self_734478, object _123_73774_731848 */
 {
 object _123_73774_731848 = args[0];
  
closureN_type c_7310321;
object e_7310325 [2];
c_7310321.hdr.mark = gc_color_red;
 c_7310321.hdr.grayed = 0;
c_7310321.tag = closureN_tag;
 c_7310321.fn = (function_type)__lambda_781;
c_7310321.num_args = 1;
c_7310321.num_elements = 2;
c_7310321.elements = (object *)e_7310325;
c_7310321.elements[0] = ((closureN)self_734478)->elements[0];
c_7310321.elements[1] = ((closureN)self_734478)->elements[1];


closureN_type c_7310326;
object e_7310337 [2];
c_7310326.hdr.mark = gc_color_red;
 c_7310326.hdr.grayed = 0;
c_7310326.tag = closureN_tag;
 c_7310326.fn = (function_type)__lambda_782;
c_7310326.num_args = 1;
c_7310326.num_elements = 2;
c_7310326.elements = (object *)e_7310337;
c_7310326.elements[0] = _123_73774_731848;
c_7310326.elements[1] = ((closureN)self_734478)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310321,__lambda_781,  &c_7310326);; 
}

static void __lambda_782(void *data, object self_734479, int argc, object *args) /* object self_734479, object k_733229, object y_73775_731849 */
 {
 object k_733229 = args[0]; object y_73775_731849 = args[1];
  
closureN_type c_7310329;
object e_7310335 [1];
c_7310329.hdr.mark = gc_color_red;
 c_7310329.hdr.grayed = 0;
c_7310329.tag = closureN_tag;
 c_7310329.fn = (function_type)__lambda_783;
c_7310329.num_args = 1;
c_7310329.num_elements = 1;
c_7310329.elements = (object *)e_7310335;
c_7310329.elements[0] = k_733229;

return_closcall3(data,  ((closureN)self_734479)->elements[0],  &c_7310329, ((closureN)self_734479)->elements[1], y_73775_731849);; 
}

static void __lambda_783(void *data, object self_734480, int argc, object *args) /* object self_734480, object r_733230 */
 {
 object r_733230 = args[0];
  
complex_num_type local_7310334; 
return_direct_with_clo1(data,  ((closureN)self_734480)->elements[0], (((closure)  ((closureN)self_734480)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7310334, r_733230));; 
}

static void __lambda_781(void *data, object self_734481, int argc, object *args) /* object self_734481, object r_733228 */
 {
 object r_733228 = args[0];
  return_direct_with_clo3(data,  __glo_filter_67_srfi_1, (((closure)  __glo_filter_67_srfi_1)->fn),  ((closureN)self_734481)->elements[0], r_733228, ((closureN)self_734481)->elements[1]);; 
}

static void __lambda_778(void *data, object self_734482, int argc, object *args) /* object self_734482, object k_733231 */
 {
 object k_733231 = args[0];
    
if( (boolean_f != Cyc_is_null(((closureN)self_734482)->elements[0])) ){ 
  return_direct_with_clo1(data,  k_733231, (((closure)  k_733231)->fn),  primitive_equal_127);
} else { 
  
closureN_type c_7310302;
object e_7310314 [2];
c_7310302.hdr.mark = gc_color_red;
 c_7310302.hdr.grayed = 0;
c_7310302.tag = closureN_tag;
 c_7310302.fn = (function_type)__lambda_779;
c_7310302.num_args = 1;
c_7310302.num_elements = 2;
c_7310302.elements = (object *)e_7310314;
c_7310302.elements[0] = k_733231;
c_7310302.elements[1] = ((closureN)self_734482)->elements[0];



return_direct_with_clo1(data,(closure)&c_7310302,__lambda_779,  Cyc_cdr(data, ((closureN)self_734482)->elements[0]));}
;; 
}

static void __lambda_779(void *data, object self_734483, int argc, object *args) /* object self_734483, object r_733234 */
 {
 object r_733234 = args[0];
    
if( (boolean_f != Cyc_is_null(r_733234)) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_734483)->elements[0], (((closure)  ((closureN)self_734483)->elements[0])->fn),  Cyc_car(data, ((closureN)self_734483)->elements[1]));
} else { 
  
make_utf8_string_with_len(c_7310312, "too many optional arguments", 27, 27);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_734483)->elements[0], &c_7310312, ((closureN)self_734483)->elements[1]);}
;; 
}

static void __lambda_768(void *data, object _, int argc, object *args) /* closure _,object k_733215, object x_73743_731839, object lis_73744_731840, object maybe_91_123_73745_731841_raw, ... */
 {
object k_733215 = args[0]; object x_73743_731839 = args[1]; object lis_73744_731840 = args[2];
load_varargs(maybe_91_123_73745_731841, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/1.sld:delete");

closureN_type c_7310246;
object e_7310291 [3];
c_7310246.hdr.mark = gc_color_red;
 c_7310246.hdr.grayed = 0;
c_7310246.tag = closureN_tag;
 c_7310246.fn = (function_type)__lambda_769;
c_7310246.num_args = 1;
c_7310246.num_elements = 3;
c_7310246.elements = (object *)e_7310291;
c_7310246.elements[0] = k_733215;
c_7310246.elements[1] = lis_73744_731840;
c_7310246.elements[2] = x_73743_731839;

return_direct_with_clo1(data,(closure)&c_7310246,__lambda_769,  maybe_91_123_73745_731841);; 
}

static void __lambda_769(void *data, object self_734470, int argc, object *args) /* object self_734470, object maybe_91arg_73760_73763_731844 */
 {
 object maybe_91arg_73760_73763_731844 = args[0];
  
closureN_type c_7310248;
object e_7310270 [1];
c_7310248.hdr.mark = gc_color_red;
 c_7310248.hdr.grayed = 0;
c_7310248.tag = closureN_tag;
 c_7310248.fn = (function_type)__lambda_770;
c_7310248.num_args = 0;
c_7310248.num_elements = 1;
c_7310248.elements = (object *)e_7310270;
c_7310248.elements[0] = maybe_91arg_73760_73763_731844;


closureN_type c_7310271;
object e_7310290 [3];
c_7310271.hdr.mark = gc_color_red;
 c_7310271.hdr.grayed = 0;
c_7310271.tag = closureN_tag;
 c_7310271.fn = (function_type)__lambda_772;
c_7310271.num_args = 1;
c_7310271.num_elements = 3;
c_7310271.elements = (object *)e_7310290;
c_7310271.elements[0] = ((closureN)self_734470)->elements[0];
c_7310271.elements[1] = ((closureN)self_734470)->elements[1];
c_7310271.elements[2] = ((closureN)self_734470)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310248,__lambda_770,  &c_7310271);; 
}

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


closureN_type c_7310278;
object e_7310289 [2];
c_7310278.hdr.mark = gc_color_red;
 c_7310278.hdr.grayed = 0;
c_7310278.tag = closureN_tag;
 c_7310278.fn = (function_type)__lambda_774;
c_7310278.num_args = 1;
c_7310278.num_elements = 2;
c_7310278.elements = (object *)e_7310289;
c_7310278.elements[0] = _123_73746_731842;
c_7310278.elements[1] = ((closureN)self_734471)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310273,__lambda_773,  &c_7310278);; 
}

static void __lambda_774(void *data, object self_734472, int argc, object *args) /* object self_734472, object k_733218, object y_73747_731843 */
 {
 object k_733218 = args[0]; object y_73747_731843 = args[1];
  
closureN_type c_7310281;
object e_7310287 [1];
c_7310281.hdr.mark = gc_color_red;
 c_7310281.hdr.grayed = 0;
c_7310281.tag = closureN_tag;
 c_7310281.fn = (function_type)__lambda_775;
c_7310281.num_args = 1;
c_7310281.num_elements = 1;
c_7310281.elements = (object *)e_7310287;
c_7310281.elements[0] = k_733218;

return_closcall3(data,  ((closureN)self_734472)->elements[0],  &c_7310281, ((closureN)self_734472)->elements[1], y_73747_731843);; 
}

static void __lambda_775(void *data, object self_734473, int argc, object *args) /* object self_734473, object r_733219 */
 {
 object r_733219 = args[0];
  
complex_num_type local_7310286; 
return_direct_with_clo1(data,  ((closureN)self_734473)->elements[0], (((closure)  ((closureN)self_734473)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7310286, r_733219));; 
}

static void __lambda_773(void *data, object self_734474, int argc, object *args) /* object self_734474, object r_733217 */
 {
 object r_733217 = args[0];
  return_direct_with_clo3(data,  __glo_filter_srfi_1, (((closure)  __glo_filter_srfi_1)->fn),  ((closureN)self_734474)->elements[0], r_733217, ((closureN)self_734474)->elements[1]);; 
}

static void __lambda_770(void *data, object self_734475, int argc, object *args) /* object self_734475, object k_733220 */
 {
 object k_733220 = args[0];
    
if( (boolean_f != Cyc_is_null(((closureN)self_734475)->elements[0])) ){ 
  return_direct_with_clo1(data,  k_733220, (((closure)  k_733220)->fn),  primitive_equal_127);
} else { 
  
closureN_type c_7310254;
object e_7310266 [2];
c_7310254.hdr.mark = gc_color_red;
 c_7310254.hdr.grayed = 0;
c_7310254.tag = closureN_tag;
 c_7310254.fn = (function_type)__lambda_771;
c_7310254.num_args = 1;
c_7310254.num_elements = 2;
c_7310254.elements = (object *)e_7310266;
c_7310254.elements[0] = k_733220;
c_7310254.elements[1] = ((closureN)self_734475)->elements[0];



return_direct_with_clo1(data,(closure)&c_7310254,__lambda_771,  Cyc_cdr(data, ((closureN)self_734475)->elements[0]));}
;; 
}

static void __lambda_771(void *data, object self_734476, int argc, object *args) /* object self_734476, object r_733223 */
 {
 object r_733223 = args[0];
    
if( (boolean_f != Cyc_is_null(r_733223)) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_734476)->elements[0], (((closure)  ((closureN)self_734476)->elements[0])->fn),  Cyc_car(data, ((closureN)self_734476)->elements[1]));
} else { 
  
make_utf8_string_with_len(c_7310264, "too many optional arguments", 27, 27);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_734476)->elements[0], &c_7310264, ((closureN)self_734476)->elements[1]);}
;; 
}

static void __lambda_764(void *data, object _, int argc, object *args) /* closure _,object k_733209, object pred_73740_731836, object l_73741_731837 */
 {
object k_733209 = args[0]; object pred_73740_731836 = args[1]; object l_73741_731837 = args[2];
  Cyc_st_add(data, "srfi/1.sld:remove!");

closureN_type c_7310228;
object e_7310232 [2];
c_7310228.hdr.mark = gc_color_red;
 c_7310228.hdr.grayed = 0;
c_7310228.tag = closureN_tag;
 c_7310228.fn = (function_type)__lambda_765;
c_7310228.num_args = 1;
c_7310228.num_elements = 2;
c_7310228.elements = (object *)e_7310232;
c_7310228.elements[0] = k_733209;
c_7310228.elements[1] = l_73741_731837;


closureN_type c_7310233;
object e_7310243 [1];
c_7310233.hdr.mark = gc_color_red;
 c_7310233.hdr.grayed = 0;
c_7310233.tag = closureN_tag;
 c_7310233.fn = (function_type)__lambda_766;
c_7310233.num_args = 1;
c_7310233.num_elements = 1;
c_7310233.elements = (object *)e_7310243;
c_7310233.elements[0] = pred_73740_731836;

return_direct_with_clo1(data,(closure)&c_7310228,__lambda_765,  &c_7310233);; 
}

static void __lambda_766(void *data, object self_734467, int argc, object *args) /* object self_734467, object k_733211, object x_73742_731838 */
 {
 object k_733211 = args[0]; object x_73742_731838 = args[1];
  
closureN_type c_7310236;
object e_7310242 [1];
c_7310236.hdr.mark = gc_color_red;
 c_7310236.hdr.grayed = 0;
c_7310236.tag = closureN_tag;
 c_7310236.fn = (function_type)__lambda_767;
c_7310236.num_args = 1;
c_7310236.num_elements = 1;
c_7310236.elements = (object *)e_7310242;
c_7310236.elements[0] = k_733211;

return_closcall2(data,  ((closureN)self_734467)->elements[0],  &c_7310236, x_73742_731838);; 
}

static void __lambda_767(void *data, object self_734468, int argc, object *args) /* object self_734468, object r_733212 */
 {
 object r_733212 = args[0];
  
complex_num_type local_7310241; 
return_direct_with_clo1(data,  ((closureN)self_734468)->elements[0], (((closure)  ((closureN)self_734468)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7310241, r_733212));; 
}

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

static void __lambda_760(void *data, object _, int argc, object *args) /* closure _,object k_733203, object pred_73737_731833, object l_73738_731834 */
 {
object k_733203 = args[0]; object pred_73737_731833 = args[1]; object l_73738_731834 = args[2];
  Cyc_st_add(data, "srfi/1.sld:remove");

closureN_type c_7310210;
object e_7310214 [2];
c_7310210.hdr.mark = gc_color_red;
 c_7310210.hdr.grayed = 0;
c_7310210.tag = closureN_tag;
 c_7310210.fn = (function_type)__lambda_761;
c_7310210.num_args = 1;
c_7310210.num_elements = 2;
c_7310210.elements = (object *)e_7310214;
c_7310210.elements[0] = k_733203;
c_7310210.elements[1] = l_73738_731834;


closureN_type c_7310215;
object e_7310225 [1];
c_7310215.hdr.mark = gc_color_red;
 c_7310215.hdr.grayed = 0;
c_7310215.tag = closureN_tag;
 c_7310215.fn = (function_type)__lambda_762;
c_7310215.num_args = 1;
c_7310215.num_elements = 1;
c_7310215.elements = (object *)e_7310225;
c_7310215.elements[0] = pred_73737_731833;

return_direct_with_clo1(data,(closure)&c_7310210,__lambda_761,  &c_7310215);; 
}

static void __lambda_762(void *data, object self_734464, int argc, object *args) /* object self_734464, object k_733205, object x_73739_731835 */
 {
 object k_733205 = args[0]; object x_73739_731835 = args[1];
  
closureN_type c_7310218;
object e_7310224 [1];
c_7310218.hdr.mark = gc_color_red;
 c_7310218.hdr.grayed = 0;
c_7310218.tag = closureN_tag;
 c_7310218.fn = (function_type)__lambda_763;
c_7310218.num_args = 1;
c_7310218.num_elements = 1;
c_7310218.elements = (object *)e_7310224;
c_7310218.elements[0] = k_733205;

return_closcall2(data,  ((closureN)self_734464)->elements[0],  &c_7310218, x_73739_731835);; 
}

static void __lambda_763(void *data, object self_734465, int argc, object *args) /* object self_734465, object r_733206 */
 {
 object r_733206 = args[0];
  
complex_num_type local_7310223; 
return_direct_with_clo1(data,  ((closureN)self_734465)->elements[0], (((closure)  ((closureN)self_734465)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_7310223, r_733206));; 
}

static void __lambda_761(void *data, object self_734466, int argc, object *args) /* object self_734466, object r_733204 */
 {
 object r_733204 = args[0];
  return_direct_with_clo3(data,  __glo_filter_srfi_1, (((closure)  __glo_filter_srfi_1)->fn),  ((closureN)self_734466)->elements[0], r_733204, ((closureN)self_734466)->elements[1]);; 
}

static void __lambda_706(void *data, object _, int argc, object *args) /* closure _,object k_733152, object pred_73689_731803, object lis_73690_731804 */
 {
object k_733152 = args[0]; object pred_73689_731803 = args[1]; object lis_73690_731804 = args[2];
  Cyc_st_add(data, "srfi/1.sld:partition!");

closureN_type c_739832;
object e_7310207 [3];
c_739832.hdr.mark = gc_color_red;
 c_739832.hdr.grayed = 0;
c_739832.tag = closureN_tag;
 c_739832.fn = (function_type)__lambda_707;
c_739832.num_args = 1;
c_739832.num_elements = 3;
c_739832.elements = (object *)e_7310207;
c_739832.elements[0] = k_733152;
c_739832.elements[1] = lis_73690_731804;
c_739832.elements[2] = pred_73689_731803;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_739832, primitive_procedure_127, pred_73689_731803, __glo_partition_67_srfi_1);; 
}

static void __lambda_707(void *data, object self_734405, int argc, object *args) /* object self_734405, object r_733153 */
 {

  
closureN_type c_739834;
object e_7310205 [3];
c_739834.hdr.mark = gc_color_red;
 c_739834.hdr.grayed = 0;
c_739834.tag = closureN_tag;
 c_739834.fn = (function_type)__lambda_708;
c_739834.num_args = 1;
c_739834.num_elements = 3;
c_739834.elements = (object *)e_7310205;
c_739834.elements[0] = ((closureN)self_734405)->elements[0];
c_739834.elements[1] = ((closureN)self_734405)->elements[1];
c_739834.elements[2] = ((closureN)self_734405)->elements[2];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_739834, ((closureN)self_734405)->elements[1]);; 
}

static void __lambda_708(void *data, object self_734406, int argc, object *args) /* object self_734406, object r_733154 */
 {
 object r_733154 = args[0];
  if( (boolean_f != r_733154) ){ 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734406)->elements[0], ((closureN)self_734406)->elements[1], ((closureN)self_734406)->elements[1]);
} else { 
  
closureN_type c_739840;
object e_7310204 [3];
c_739840.hdr.mark = gc_color_red;
 c_739840.hdr.grayed = 0;
c_739840.tag = closureN_tag;
 c_739840.fn = (function_type)__lambda_709;
c_739840.num_args = 2;
c_739840.num_elements = 3;
c_739840.elements = (object *)e_7310204;
c_739840.elements[0] = ((closureN)self_734406)->elements[0];
c_739840.elements[1] = ((closureN)self_734406)->elements[1];
c_739840.elements[2] = ((closureN)self_734406)->elements[2];

return_direct_with_clo2(data,(closure)&c_739840,__lambda_709,  boolean_f, boolean_f);}
;; 
}

static void __lambda_709(void *data, object self_734407, int argc, object *args) /* object self_734407, object scan_91in_73691_731805, object scan_91out_73692_731806 */
 {
 object scan_91in_73691_731805 = args[0]; object scan_91out_73692_731806 = args[1];
  
closureN_type c_739842;
object e_7310200 [4];
c_739842.hdr.mark = gc_color_red;
 c_739842.hdr.grayed = 0;
c_739842.tag = closureN_tag;
 c_739842.fn = (function_type)__lambda_1194;
c_739842.num_args = 1;
c_739842.num_elements = 4;
c_739842.elements = (object *)e_7310200;
c_739842.elements[0] = ((closureN)self_734407)->elements[0];
c_739842.elements[1] = ((closureN)self_734407)->elements[1];
c_739842.elements[2] = ((closureN)self_734407)->elements[2];
c_739842.elements[3] = scan_91out_73692_731806;


pair_type local_7310203; 
return_direct_with_clo1(data,(closure)&c_739842,__lambda_1194,  set_cell_as_expr(&local_7310203, scan_91in_73691_731805));; 
}

static void __lambda_1194(void *data, object self_734408, int argc, object *args) /* object self_734408, object scan_91in_73691_731805 */
 {
 object scan_91in_73691_731805 = args[0];
  
closureN_type c_739844;
object e_7310195 [4];
c_739844.hdr.mark = gc_color_red;
 c_739844.hdr.grayed = 0;
c_739844.tag = closureN_tag;
 c_739844.fn = (function_type)__lambda_1193;
c_739844.num_args = 1;
c_739844.num_elements = 4;
c_739844.elements = (object *)e_7310195;
c_739844.elements[0] = ((closureN)self_734408)->elements[0];
c_739844.elements[1] = ((closureN)self_734408)->elements[1];
c_739844.elements[2] = ((closureN)self_734408)->elements[2];
c_739844.elements[3] = scan_91in_73691_731805;


pair_type local_7310198; 
return_direct_with_clo1(data,(closure)&c_739844,__lambda_1193,  set_cell_as_expr(&local_7310198, ((closureN)self_734408)->elements[3]));; 
}

static void __lambda_1193(void *data, object self_734409, int argc, object *args) /* object self_734409, object scan_91out_73692_731806 */
 {
 object scan_91out_73692_731806 = args[0];
  
closureN_type c_739846;
object e_7310113 [5];
c_739846.hdr.mark = gc_color_red;
 c_739846.hdr.grayed = 0;
c_739846.tag = closureN_tag;
 c_739846.fn = (function_type)__lambda_710;
c_739846.num_args = 1;
c_739846.num_elements = 5;
c_739846.elements = (object *)e_7310113;
c_739846.elements[0] = ((closureN)self_734409)->elements[0];
c_739846.elements[1] = ((closureN)self_734409)->elements[1];
c_739846.elements[2] = ((closureN)self_734409)->elements[2];
c_739846.elements[3] = ((closureN)self_734409)->elements[3];
c_739846.elements[4] = scan_91out_73692_731806;


closureN_type c_7310114;
object e_7310194 [2];
c_7310114.hdr.mark = gc_color_red;
 c_7310114.hdr.grayed = 0;
c_7310114.tag = closureN_tag;
 c_7310114.fn = (function_type)__lambda_749;
c_7310114.num_args = 3;
c_7310114.num_elements = 2;
c_7310114.elements = (object *)e_7310194;
c_7310114.elements[0] = ((closureN)self_734409)->elements[2];
c_7310114.elements[1] = scan_91out_73692_731806;

return_direct_with_clo1(data,(closure)&c_739846,__lambda_710,  &c_7310114);; 
}

static void __lambda_749(void *data, object self_734410, int argc, object *args) /* object self_734410, object k_733191, object in_91prev_73693_731807, object out_91prev_73694_731808, object lis_73695_731809 */
 {
 object k_733191 = args[0]; object in_91prev_73693_731807 = args[1]; object out_91prev_73694_731808 = args[2]; object lis_73695_731809 = args[3];
  
closureN_type c_7310116;
object e_7310193 [4];
c_7310116.hdr.mark = gc_color_red;
 c_7310116.hdr.grayed = 0;
c_7310116.tag = closureN_tag;
 c_7310116.fn = (function_type)__lambda_750;
c_7310116.num_args = 2;
c_7310116.num_elements = 4;
c_7310116.elements = (object *)e_7310193;
c_7310116.elements[0] = k_733191;
c_7310116.elements[1] = out_91prev_73694_731808;
c_7310116.elements[2] = ((closureN)self_734410)->elements[0];
c_7310116.elements[3] = ((closureN)self_734410)->elements[1];

return_direct_with_clo2(data,(closure)&c_7310116,__lambda_750,  in_91prev_73693_731807, lis_73695_731809);; 
}

static void __lambda_750(void *data, object self_734411, int argc, object *args) /* object self_734411, object in_91prev_73697_731810, object lis_73698_731811 */
 {
 object in_91prev_73697_731810 = args[0]; object lis_73698_731811 = args[1];
  
closureN_type c_7310118;
object e_7310192 [6];
c_7310118.hdr.mark = gc_color_red;
 c_7310118.hdr.grayed = 0;
c_7310118.tag = closureN_tag;
 c_7310118.fn = (function_type)__lambda_751;
c_7310118.num_args = 1;
c_7310118.num_elements = 6;
c_7310118.elements = (object *)e_7310192;
c_7310118.elements[0] = in_91prev_73697_731810;
c_7310118.elements[1] = ((closureN)self_734411)->elements[0];
c_7310118.elements[2] = lis_73698_731811;
c_7310118.elements[3] = ((closureN)self_734411)->elements[1];
c_7310118.elements[4] = ((closureN)self_734411)->elements[2];
c_7310118.elements[5] = ((closureN)self_734411)->elements[3];

return_direct_with_clo1(data,(closure)&c_7310118,__lambda_751,  boolean_f);; 
}

static void __lambda_751(void *data, object self_734412, int argc, object *args) /* object self_734412, object lp_73699_731812 */
 {
 object lp_73699_731812 = args[0];
  
closureN_type c_7310120;
object e_7310188 [6];
c_7310120.hdr.mark = gc_color_red;
 c_7310120.hdr.grayed = 0;
c_7310120.tag = closureN_tag;
 c_7310120.fn = (function_type)__lambda_1192;
c_7310120.num_args = 1;
c_7310120.num_elements = 6;
c_7310120.elements = (object *)e_7310188;
c_7310120.elements[0] = ((closureN)self_734412)->elements[0];
c_7310120.elements[1] = ((closureN)self_734412)->elements[1];
c_7310120.elements[2] = ((closureN)self_734412)->elements[2];
c_7310120.elements[3] = ((closureN)self_734412)->elements[3];
c_7310120.elements[4] = ((closureN)self_734412)->elements[4];
c_7310120.elements[5] = ((closureN)self_734412)->elements[5];


pair_type local_7310191; 
return_direct_with_clo1(data,(closure)&c_7310120,__lambda_1192,  set_cell_as_expr(&local_7310191, lp_73699_731812));; 
}

static void __lambda_1192(void *data, object self_734413, int argc, object *args) /* object self_734413, object lp_73699_731812 */
 {
 object lp_73699_731812 = args[0];
  
closureN_type c_7310122;
object e_7310136 [4];
c_7310122.hdr.mark = gc_color_red;
 c_7310122.hdr.grayed = 0;
c_7310122.tag = closureN_tag;
 c_7310122.fn = (function_type)__lambda_752;
c_7310122.num_args = 1;
c_7310122.num_elements = 4;
c_7310122.elements = (object *)e_7310136;
c_7310122.elements[0] = ((closureN)self_734413)->elements[0];
c_7310122.elements[1] = ((closureN)self_734413)->elements[1];
c_7310122.elements[2] = ((closureN)self_734413)->elements[2];
c_7310122.elements[3] = lp_73699_731812;


closureN_type c_7310137;
object e_7310187 [4];
c_7310137.hdr.mark = gc_color_red;
 c_7310137.hdr.grayed = 0;
c_7310137.tag = closureN_tag;
 c_7310137.fn = (function_type)__lambda_754;
c_7310137.num_args = 2;
c_7310137.num_elements = 4;
c_7310137.elements = (object *)e_7310187;
c_7310137.elements[0] = lp_73699_731812;
c_7310137.elements[1] = ((closureN)self_734413)->elements[3];
c_7310137.elements[2] = ((closureN)self_734413)->elements[4];
c_7310137.elements[3] = ((closureN)self_734413)->elements[5];

return_direct_with_clo1(data,(closure)&c_7310122,__lambda_752,  &c_7310137);; 
}

static void __lambda_754(void *data, object self_734414, int argc, object *args) /* object self_734414, object k_733194, object in_91prev_73700_731813, object lis_73701_731814 */
 {
 object k_733194 = args[0]; object in_91prev_73700_731813 = args[1]; object lis_73701_731814 = args[2];
    
if( (boolean_f != Cyc_is_pair(lis_73701_731814)) ){ 
  
closureN_type c_7310141;
object e_7310179 [7];
c_7310141.hdr.mark = gc_color_red;
 c_7310141.hdr.grayed = 0;
c_7310141.tag = closureN_tag;
 c_7310141.fn = (function_type)__lambda_755;
c_7310141.num_args = 1;
c_7310141.num_elements = 7;
c_7310141.elements = (object *)e_7310179;
c_7310141.elements[0] = in_91prev_73700_731813;
c_7310141.elements[1] = k_733194;
c_7310141.elements[2] = lis_73701_731814;
c_7310141.elements[3] = ((closureN)self_734414)->elements[0];
c_7310141.elements[4] = ((closureN)self_734414)->elements[1];
c_7310141.elements[5] = ((closureN)self_734414)->elements[2];
c_7310141.elements[6] = ((closureN)self_734414)->elements[3];



return_direct_with_clo1(data,(closure)&c_7310141,__lambda_755,  Cyc_car(data, lis_73701_731814));
} else { 
  
object c_7310185 = Cyc_set_cdr_cps(data,  k_733194,((closureN)self_734414)->elements[1], lis_73701_731814);
return_direct_with_clo1(data,  k_733194, (((closure)  k_733194)->fn),  c_7310185);}
;; 
}

static void __lambda_755(void *data, object self_734415, int argc, object *args) /* object self_734415, object r_733200 */
 {
 object r_733200 = args[0];
  
closureN_type c_7310144;
object e_7310178 [6];
c_7310144.hdr.mark = gc_color_red;
 c_7310144.hdr.grayed = 0;
c_7310144.tag = closureN_tag;
 c_7310144.fn = (function_type)__lambda_756;
c_7310144.num_args = 1;
c_7310144.num_elements = 6;
c_7310144.elements = (object *)e_7310178;
c_7310144.elements[0] = ((closureN)self_734415)->elements[0];
c_7310144.elements[1] = ((closureN)self_734415)->elements[1];
c_7310144.elements[2] = ((closureN)self_734415)->elements[2];
c_7310144.elements[3] = ((closureN)self_734415)->elements[3];
c_7310144.elements[4] = ((closureN)self_734415)->elements[4];
c_7310144.elements[5] = ((closureN)self_734415)->elements[6];

return_closcall2(data,  ((closureN)self_734415)->elements[5],  &c_7310144, r_733200);; 
}

static void __lambda_756(void *data, object self_734416, int argc, object *args) /* object self_734416, object r_733196 */
 {
 object r_733196 = args[0];
  if( (boolean_f != r_733196) ){ 
  
closureN_type c_7310146;
object e_7310153 [3];
c_7310146.hdr.mark = gc_color_red;
 c_7310146.hdr.grayed = 0;
c_7310146.tag = closureN_tag;
 c_7310146.fn = (function_type)__lambda_757;
c_7310146.num_args = 1;
c_7310146.num_elements = 3;
c_7310146.elements = (object *)e_7310153;
c_7310146.elements[0] = ((closureN)self_734416)->elements[1];
c_7310146.elements[1] = ((closureN)self_734416)->elements[2];
c_7310146.elements[2] = ((closureN)self_734416)->elements[3];



return_direct_with_clo1(data,(closure)&c_7310146,__lambda_757,  Cyc_cdr(data, ((closureN)self_734416)->elements[2]));
} else { 
  
closureN_type c_7310158;
object e_7310172 [4];
c_7310158.hdr.mark = gc_color_red;
 c_7310158.hdr.grayed = 0;
c_7310158.tag = closureN_tag;
 c_7310158.fn = (function_type)__lambda_758;
c_7310158.num_args = 1;
c_7310158.num_elements = 4;
c_7310158.elements = (object *)e_7310172;
c_7310158.elements[0] = ((closureN)self_734416)->elements[0];
c_7310158.elements[1] = ((closureN)self_734416)->elements[1];
c_7310158.elements[2] = ((closureN)self_734416)->elements[2];
c_7310158.elements[3] = ((closureN)self_734416)->elements[5];


object c_7310175 = Cyc_set_cdr_cps(data,(closure)&c_7310158,((closureN)self_734416)->elements[4], ((closureN)self_734416)->elements[2]);
return_closcall1(data,(closure)&c_7310158,  c_7310175);}
;; 
}

static void __lambda_758(void *data, object self_734418, int argc, object *args) /* object self_734418, object r_733198 */
 {

  
closureN_type c_7310160;
object e_7310168 [4];
c_7310160.hdr.mark = gc_color_red;
 c_7310160.hdr.grayed = 0;
c_7310160.tag = closureN_tag;
 c_7310160.fn = (function_type)__lambda_759;
c_7310160.num_args = 1;
c_7310160.num_elements = 4;
c_7310160.elements = (object *)e_7310168;
c_7310160.elements[0] = ((closureN)self_734418)->elements[0];
c_7310160.elements[1] = ((closureN)self_734418)->elements[1];
c_7310160.elements[2] = ((closureN)self_734418)->elements[2];
c_7310160.elements[3] = ((closureN)self_734418)->elements[3];



return_direct_with_clo1(data,(closure)&c_7310160,__lambda_759,  Cyc_cdr(data, ((closureN)self_734418)->elements[2]));; 
}

static void __lambda_759(void *data, object self_734419, int argc, object *args) /* object self_734419, object r_733199 */
 {
 object r_733199 = args[0];
  

return_closcall4(data,  car(((closureN)self_734419)->elements[3]),  ((closureN)self_734419)->elements[1], ((closureN)self_734419)->elements[0], ((closureN)self_734419)->elements[2], r_733199);; 
}

static void __lambda_757(void *data, object self_734417, int argc, object *args) /* object self_734417, object r_733197 */
 {
 object r_733197 = args[0];
  

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

static void __lambda_752(void *data, object self_734420, int argc, object *args) /* object self_734420, object r_733193 */
 {
 object r_733193 = args[0];
  
closureN_type c_7310124;
object e_7310132 [4];
c_7310124.hdr.mark = gc_color_red;
 c_7310124.hdr.grayed = 0;
c_7310124.tag = closureN_tag;
 c_7310124.fn = (function_type)__lambda_753;
c_7310124.num_args = 1;
c_7310124.num_elements = 4;
c_7310124.elements = (object *)e_7310132;
c_7310124.elements[0] = ((closureN)self_734420)->elements[0];
c_7310124.elements[1] = ((closureN)self_734420)->elements[1];
c_7310124.elements[2] = ((closureN)self_734420)->elements[2];
c_7310124.elements[3] = ((closureN)self_734420)->elements[3];



return_direct_with_clo1(data,(closure)&c_7310124,__lambda_753,  Cyc_set_cell(data, ((closureN)self_734420)->elements[3], r_733193));; 
}

static void __lambda_753(void *data, object self_734421, int argc, object *args) /* object self_734421, object r_733192 */
 {

  

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

static void __lambda_710(void *data, object self_734422, int argc, object *args) /* object self_734422, object r_733190 */
 {
 object r_733190 = args[0];
  
closureN_type c_739848;
object e_7310109 [5];
c_739848.hdr.mark = gc_color_red;
 c_739848.hdr.grayed = 0;
c_739848.tag = closureN_tag;
 c_739848.fn = (function_type)__lambda_711;
c_739848.num_args = 1;
c_739848.num_elements = 5;
c_739848.elements = (object *)e_7310109;
c_739848.elements[0] = ((closureN)self_734422)->elements[0];
c_739848.elements[1] = ((closureN)self_734422)->elements[1];
c_739848.elements[2] = ((closureN)self_734422)->elements[2];
c_739848.elements[3] = ((closureN)self_734422)->elements[3];
c_739848.elements[4] = ((closureN)self_734422)->elements[4];



return_direct_with_clo1(data,(closure)&c_739848,__lambda_711,  Cyc_set_cell(data, ((closureN)self_734422)->elements[3], r_733190));; 
}

static void __lambda_711(void *data, object self_734423, int argc, object *args) /* object self_734423, object r_733155 */
 {

  
closureN_type c_739850;
object e_7310027 [5];
c_739850.hdr.mark = gc_color_red;
 c_739850.hdr.grayed = 0;
c_739850.tag = closureN_tag;
 c_739850.fn = (function_type)__lambda_712;
c_739850.num_args = 1;
c_739850.num_elements = 5;
c_739850.elements = (object *)e_7310027;
c_739850.elements[0] = ((closureN)self_734423)->elements[0];
c_739850.elements[1] = ((closureN)self_734423)->elements[1];
c_739850.elements[2] = ((closureN)self_734423)->elements[2];
c_739850.elements[3] = ((closureN)self_734423)->elements[3];
c_739850.elements[4] = ((closureN)self_734423)->elements[4];


closureN_type c_7310028;
object e_7310108 [2];
c_7310028.hdr.mark = gc_color_red;
 c_7310028.hdr.grayed = 0;
c_7310028.tag = closureN_tag;
 c_7310028.fn = (function_type)__lambda_738;
c_7310028.num_args = 3;
c_7310028.num_elements = 2;
c_7310028.elements = (object *)e_7310108;
c_7310028.elements[0] = ((closureN)self_734423)->elements[2];
c_7310028.elements[1] = ((closureN)self_734423)->elements[3];

return_direct_with_clo1(data,(closure)&c_739850,__lambda_712,  &c_7310028);; 
}

static void __lambda_738(void *data, object self_734424, int argc, object *args) /* object self_734424, object k_733180, object in_91prev_73702_731815, object out_91prev_73703_731816, object lis_73704_731817 */
 {
 object k_733180 = args[0]; object in_91prev_73702_731815 = args[1]; object out_91prev_73703_731816 = args[2]; object lis_73704_731817 = args[3];
  
closureN_type c_7310030;
object e_7310107 [4];
c_7310030.hdr.mark = gc_color_red;
 c_7310030.hdr.grayed = 0;
c_7310030.tag = closureN_tag;
 c_7310030.fn = (function_type)__lambda_739;
c_7310030.num_args = 2;
c_7310030.num_elements = 4;
c_7310030.elements = (object *)e_7310107;
c_7310030.elements[0] = in_91prev_73702_731815;
c_7310030.elements[1] = k_733180;
c_7310030.elements[2] = ((closureN)self_734424)->elements[0];
c_7310030.elements[3] = ((closureN)self_734424)->elements[1];

return_direct_with_clo2(data,(closure)&c_7310030,__lambda_739,  out_91prev_73703_731816, lis_73704_731817);; 
}

static void __lambda_739(void *data, object self_734425, int argc, object *args) /* object self_734425, object out_91prev_73706_731818, object lis_73707_731819 */
 {
 object out_91prev_73706_731818 = args[0]; object lis_73707_731819 = args[1];
  
closureN_type c_7310032;
object e_7310106 [6];
c_7310032.hdr.mark = gc_color_red;
 c_7310032.hdr.grayed = 0;
c_7310032.tag = closureN_tag;
 c_7310032.fn = (function_type)__lambda_740;
c_7310032.num_args = 1;
c_7310032.num_elements = 6;
c_7310032.elements = (object *)e_7310106;
c_7310032.elements[0] = ((closureN)self_734425)->elements[0];
c_7310032.elements[1] = ((closureN)self_734425)->elements[1];
c_7310032.elements[2] = lis_73707_731819;
c_7310032.elements[3] = out_91prev_73706_731818;
c_7310032.elements[4] = ((closureN)self_734425)->elements[2];
c_7310032.elements[5] = ((closureN)self_734425)->elements[3];

return_direct_with_clo1(data,(closure)&c_7310032,__lambda_740,  boolean_f);; 
}

static void __lambda_740(void *data, object self_734426, int argc, object *args) /* object self_734426, object lp_73708_731820 */
 {
 object lp_73708_731820 = args[0];
  
closureN_type c_7310034;
object e_7310102 [6];
c_7310034.hdr.mark = gc_color_red;
 c_7310034.hdr.grayed = 0;
c_7310034.tag = closureN_tag;
 c_7310034.fn = (function_type)__lambda_1191;
c_7310034.num_args = 1;
c_7310034.num_elements = 6;
c_7310034.elements = (object *)e_7310102;
c_7310034.elements[0] = ((closureN)self_734426)->elements[0];
c_7310034.elements[1] = ((closureN)self_734426)->elements[1];
c_7310034.elements[2] = ((closureN)self_734426)->elements[2];
c_7310034.elements[3] = ((closureN)self_734426)->elements[3];
c_7310034.elements[4] = ((closureN)self_734426)->elements[4];
c_7310034.elements[5] = ((closureN)self_734426)->elements[5];


pair_type local_7310105; 
return_direct_with_clo1(data,(closure)&c_7310034,__lambda_1191,  set_cell_as_expr(&local_7310105, lp_73708_731820));; 
}

static void __lambda_1191(void *data, object self_734427, int argc, object *args) /* object self_734427, object lp_73708_731820 */
 {
 object lp_73708_731820 = args[0];
  
closureN_type c_7310036;
object e_7310050 [4];
c_7310036.hdr.mark = gc_color_red;
 c_7310036.hdr.grayed = 0;
c_7310036.tag = closureN_tag;
 c_7310036.fn = (function_type)__lambda_741;
c_7310036.num_args = 1;
c_7310036.num_elements = 4;
c_7310036.elements = (object *)e_7310050;
c_7310036.elements[0] = ((closureN)self_734427)->elements[1];
c_7310036.elements[1] = ((closureN)self_734427)->elements[2];
c_7310036.elements[2] = lp_73708_731820;
c_7310036.elements[3] = ((closureN)self_734427)->elements[3];


closureN_type c_7310051;
object e_7310101 [4];
c_7310051.hdr.mark = gc_color_red;
 c_7310051.hdr.grayed = 0;
c_7310051.tag = closureN_tag;
 c_7310051.fn = (function_type)__lambda_743;
c_7310051.num_args = 2;
c_7310051.num_elements = 4;
c_7310051.elements = (object *)e_7310101;
c_7310051.elements[0] = ((closureN)self_734427)->elements[0];
c_7310051.elements[1] = lp_73708_731820;
c_7310051.elements[2] = ((closureN)self_734427)->elements[4];
c_7310051.elements[3] = ((closureN)self_734427)->elements[5];

return_direct_with_clo1(data,(closure)&c_7310036,__lambda_741,  &c_7310051);; 
}

static void __lambda_743(void *data, object self_734428, int argc, object *args) /* object self_734428, object k_733183, object out_91prev_73709_731821, object lis_73710_731822 */
 {
 object k_733183 = args[0]; object out_91prev_73709_731821 = args[1]; object lis_73710_731822 = args[2];
    
if( (boolean_f != Cyc_is_pair(lis_73710_731822)) ){ 
  
closureN_type c_7310055;
object e_7310093 [7];
c_7310055.hdr.mark = gc_color_red;
 c_7310055.hdr.grayed = 0;
c_7310055.tag = closureN_tag;
 c_7310055.fn = (function_type)__lambda_744;
c_7310055.num_args = 1;
c_7310055.num_elements = 7;
c_7310055.elements = (object *)e_7310093;
c_7310055.elements[0] = ((closureN)self_734428)->elements[0];
c_7310055.elements[1] = k_733183;
c_7310055.elements[2] = lis_73710_731822;
c_7310055.elements[3] = ((closureN)self_734428)->elements[1];
c_7310055.elements[4] = out_91prev_73709_731821;
c_7310055.elements[5] = ((closureN)self_734428)->elements[2];
c_7310055.elements[6] = ((closureN)self_734428)->elements[3];



return_direct_with_clo1(data,(closure)&c_7310055,__lambda_744,  Cyc_car(data, lis_73710_731822));
} else { 
  
object c_7310099 = Cyc_set_cdr_cps(data,  k_733183,((closureN)self_734428)->elements[0], lis_73710_731822);
return_direct_with_clo1(data,  k_733183, (((closure)  k_733183)->fn),  c_7310099);}
;; 
}

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

return_closcall2(data,  ((closureN)self_734429)->elements[5],  &c_7310058, r_733189);; 
}

static void __lambda_745(void *data, object self_734430, int argc, object *args) /* object self_734430, object r_733185 */
 {
 object r_733185 = args[0];
  if( (boolean_f != r_733185) ){ 
  
closureN_type c_7310060;
object e_7310074 [4];
c_7310060.hdr.mark = gc_color_red;
 c_7310060.hdr.grayed = 0;
c_7310060.tag = closureN_tag;
 c_7310060.fn = (function_type)__lambda_746;
c_7310060.num_args = 1;
c_7310060.num_elements = 4;
c_7310060.elements = (object *)e_7310074;
c_7310060.elements[0] = ((closureN)self_734430)->elements[1];
c_7310060.elements[1] = ((closureN)self_734430)->elements[2];
c_7310060.elements[2] = ((closureN)self_734430)->elements[4];
c_7310060.elements[3] = ((closureN)self_734430)->elements[5];


object c_7310077 = Cyc_set_cdr_cps(data,(closure)&c_7310060,((closureN)self_734430)->elements[0], ((closureN)self_734430)->elements[2]);
return_closcall1(data,(closure)&c_7310060,  c_7310077);
} else { 
  
closureN_type c_7310081;
object e_7310088 [3];
c_7310081.hdr.mark = gc_color_red;
 c_7310081.hdr.grayed = 0;
c_7310081.tag = closureN_tag;
 c_7310081.fn = (function_type)__lambda_748;
c_7310081.num_args = 1;
c_7310081.num_elements = 3;
c_7310081.elements = (object *)e_7310088;
c_7310081.elements[0] = ((closureN)self_734430)->elements[1];
c_7310081.elements[1] = ((closureN)self_734430)->elements[2];
c_7310081.elements[2] = ((closureN)self_734430)->elements[3];



return_direct_with_clo1(data,(closure)&c_7310081,__lambda_748,  Cyc_cdr(data, ((closureN)self_734430)->elements[2]));}
;; 
}

static void __lambda_748(void *data, object self_734433, int argc, object *args) /* object self_734433, object r_733188 */
 {
 object r_733188 = args[0];
  

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

static void __lambda_746(void *data, object self_734431, int argc, object *args) /* object self_734431, object r_733186 */
 {

  
closureN_type c_7310062;
object e_7310070 [4];
c_7310062.hdr.mark = gc_color_red;
 c_7310062.hdr.grayed = 0;
c_7310062.tag = closureN_tag;
 c_7310062.fn = (function_type)__lambda_747;
c_7310062.num_args = 1;
c_7310062.num_elements = 4;
c_7310062.elements = (object *)e_7310070;
c_7310062.elements[0] = ((closureN)self_734431)->elements[0];
c_7310062.elements[1] = ((closureN)self_734431)->elements[1];
c_7310062.elements[2] = ((closureN)self_734431)->elements[2];
c_7310062.elements[3] = ((closureN)self_734431)->elements[3];



return_direct_with_clo1(data,(closure)&c_7310062,__lambda_747,  Cyc_cdr(data, ((closureN)self_734431)->elements[1]));; 
}

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

return_closcall4(data,  car(((closureN)self_734432)->elements[3]),  ((closureN)self_734432)->elements[0], ((closureN)self_734432)->elements[1], ((closureN)self_734432)->elements[2], r_733187);; 
}

static void __lambda_741(void *data, object self_734434, int argc, object *args) /* object self_734434, object r_733182 */
 {
 object r_733182 = args[0];
  
closureN_type c_7310038;
object e_7310046 [4];
c_7310038.hdr.mark = gc_color_red;
 c_7310038.hdr.grayed = 0;
c_7310038.tag = closureN_tag;
 c_7310038.fn = (function_type)__lambda_742;
c_7310038.num_args = 1;
c_7310038.num_elements = 4;
c_7310038.elements = (object *)e_7310046;
c_7310038.elements[0] = ((closureN)self_734434)->elements[0];
c_7310038.elements[1] = ((closureN)self_734434)->elements[1];
c_7310038.elements[2] = ((closureN)self_734434)->elements[2];
c_7310038.elements[3] = ((closureN)self_734434)->elements[3];



return_direct_with_clo1(data,(closure)&c_7310038,__lambda_742,  Cyc_set_cell(data, ((closureN)self_734434)->elements[2], r_733182));; 
}

static void __lambda_742(void *data, object self_734435, int argc, object *args) /* object self_734435, object r_733181 */
 {

  

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

static void __lambda_712(void *data, object self_734436, int argc, object *args) /* object self_734436, object r_733179 */
 {
 object r_733179 = args[0];
  
closureN_type c_739852;
object e_7310023 [5];
c_739852.hdr.mark = gc_color_red;
 c_739852.hdr.grayed = 0;
c_739852.tag = closureN_tag;
 c_739852.fn = (function_type)__lambda_713;
c_739852.num_args = 1;
c_739852.num_elements = 5;
c_739852.elements = (object *)e_7310023;
c_739852.elements[0] = ((closureN)self_734436)->elements[0];
c_739852.elements[1] = ((closureN)self_734436)->elements[1];
c_739852.elements[2] = ((closureN)self_734436)->elements[2];
c_739852.elements[3] = ((closureN)self_734436)->elements[3];
c_739852.elements[4] = ((closureN)self_734436)->elements[4];



return_direct_with_clo1(data,(closure)&c_739852,__lambda_713,  Cyc_set_cell(data, ((closureN)self_734436)->elements[4], r_733179));; 
}

static void __lambda_713(void *data, object self_734437, int argc, object *args) /* object self_734437, object r_733156 */
 {

  
closureN_type c_739854;
object e_7310019 [5];
c_739854.hdr.mark = gc_color_red;
 c_739854.hdr.grayed = 0;
c_739854.tag = closureN_tag;
 c_739854.fn = (function_type)__lambda_714;
c_739854.num_args = 1;
c_739854.num_elements = 5;
c_739854.elements = (object *)e_7310019;
c_739854.elements[0] = ((closureN)self_734437)->elements[0];
c_739854.elements[1] = ((closureN)self_734437)->elements[1];
c_739854.elements[2] = ((closureN)self_734437)->elements[2];
c_739854.elements[3] = ((closureN)self_734437)->elements[3];
c_739854.elements[4] = ((closureN)self_734437)->elements[4];



return_direct_with_clo1(data,(closure)&c_739854,__lambda_714,  Cyc_car(data, ((closureN)self_734437)->elements[1]));; 
}

static void __lambda_714(void *data, object self_734438, int argc, object *args) /* object self_734438, object r_733178 */
 {
 object r_733178 = args[0];
  
closureN_type c_739857;
object e_7310018 [5];
c_739857.hdr.mark = gc_color_red;
 c_739857.hdr.grayed = 0;
c_739857.tag = closureN_tag;
 c_739857.fn = (function_type)__lambda_715;
c_739857.num_args = 1;
c_739857.num_elements = 5;
c_739857.elements = (object *)e_7310018;
c_739857.elements[0] = ((closureN)self_734438)->elements[0];
c_739857.elements[1] = ((closureN)self_734438)->elements[1];
c_739857.elements[2] = ((closureN)self_734438)->elements[2];
c_739857.elements[3] = ((closureN)self_734438)->elements[3];
c_739857.elements[4] = ((closureN)self_734438)->elements[4];

return_closcall2(data,  ((closureN)self_734438)->elements[2],  &c_739857, r_733178);; 
}

static void __lambda_715(void *data, object self_734439, int argc, object *args) /* object self_734439, object r_733157 */
 {
 object r_733157 = args[0];
  if( (boolean_f != r_733157) ){ 
  
closureN_type c_739859;
object e_739934 [4];
c_739859.hdr.mark = gc_color_red;
 c_739859.hdr.grayed = 0;
c_739859.tag = closureN_tag;
 c_739859.fn = (function_type)__lambda_716;
c_739859.num_args = 1;
c_739859.num_elements = 4;
c_739859.elements = (object *)e_739934;
c_739859.elements[0] = ((closureN)self_734439)->elements[0];
c_739859.elements[1] = ((closureN)self_734439)->elements[1];
c_739859.elements[2] = ((closureN)self_734439)->elements[2];
c_739859.elements[3] = ((closureN)self_734439)->elements[4];



return_direct_with_clo1(data,(closure)&c_739859,__lambda_716,  Cyc_cdr(data, ((closureN)self_734439)->elements[1]));
} else { 
  
closureN_type c_739939;
object e_7310014 [4];
c_739939.hdr.mark = gc_color_red;
 c_739939.hdr.grayed = 0;
c_739939.tag = closureN_tag;
 c_739939.fn = (function_type)__lambda_727;
c_739939.num_args = 1;
c_739939.num_elements = 4;
c_739939.elements = (object *)e_7310014;
c_739939.elements[0] = ((closureN)self_734439)->elements[0];
c_739939.elements[1] = ((closureN)self_734439)->elements[1];
c_739939.elements[2] = ((closureN)self_734439)->elements[2];
c_739939.elements[3] = ((closureN)self_734439)->elements[3];



return_direct_with_clo1(data,(closure)&c_739939,__lambda_727,  Cyc_cdr(data, ((closureN)self_734439)->elements[1]));}
;; 
}

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

return_direct_with_clo2(data,(closure)&c_739941,__lambda_728,  ((closureN)self_734452)->elements[1], r_733168);; 
}

static void __lambda_728(void *data, object self_734453, int argc, object *args) /* object self_734453, object prev_91l_73725_731828, object l_73726_731829 */
 {
 object prev_91l_73725_731828 = args[0]; object l_73726_731829 = args[1];
  
closureN_type c_739943;
object e_7310011 [6];
c_739943.hdr.mark = gc_color_red;
 c_739943.hdr.grayed = 0;
c_739943.tag = closureN_tag;
 c_739943.fn = (function_type)__lambda_729;
c_739943.num_args = 1;
c_739943.num_elements = 6;
c_739943.elements = (object *)e_7310011;
c_739943.elements[0] = ((closureN)self_734453)->elements[0];
c_739943.elements[1] = l_73726_731829;
c_739943.elements[2] = ((closureN)self_734453)->elements[1];
c_739943.elements[3] = ((closureN)self_734453)->elements[2];
c_739943.elements[4] = prev_91l_73725_731828;
c_739943.elements[5] = ((closureN)self_734453)->elements[3];

return_direct_with_clo1(data,(closure)&c_739943,__lambda_729,  boolean_f);; 
}

static void __lambda_729(void *data, object self_734454, int argc, object *args) /* object self_734454, object lp_73727_731830 */
 {
 object lp_73727_731830 = args[0];
  
closureN_type c_739945;
object e_7310007 [6];
c_739945.hdr.mark = gc_color_red;
 c_739945.hdr.grayed = 0;
c_739945.tag = closureN_tag;
 c_739945.fn = (function_type)__lambda_1190;
c_739945.num_args = 1;
c_739945.num_elements = 6;
c_739945.elements = (object *)e_7310007;
c_739945.elements[0] = ((closureN)self_734454)->elements[0];
c_739945.elements[1] = ((closureN)self_734454)->elements[1];
c_739945.elements[2] = ((closureN)self_734454)->elements[2];
c_739945.elements[3] = ((closureN)self_734454)->elements[3];
c_739945.elements[4] = ((closureN)self_734454)->elements[4];
c_739945.elements[5] = ((closureN)self_734454)->elements[5];


pair_type local_7310010; 
return_direct_with_clo1(data,(closure)&c_739945,__lambda_1190,  set_cell_as_expr(&local_7310010, lp_73727_731830));; 
}

static void __lambda_1190(void *data, object self_734455, int argc, object *args) /* object self_734455, object lp_73727_731830 */
 {
 object lp_73727_731830 = args[0];
  
closureN_type c_739947;
object e_739961 [4];
c_739947.hdr.mark = gc_color_red;
 c_739947.hdr.grayed = 0;
c_739947.tag = closureN_tag;
 c_739947.fn = (function_type)__lambda_730;
c_739947.num_args = 1;
c_739947.num_elements = 4;
c_739947.elements = (object *)e_739961;
c_739947.elements[0] = ((closureN)self_734455)->elements[0];
c_739947.elements[1] = ((closureN)self_734455)->elements[1];
c_739947.elements[2] = lp_73727_731830;
c_739947.elements[3] = ((closureN)self_734455)->elements[4];


closureN_type c_739962;
object e_7310006 [4];
c_739962.hdr.mark = gc_color_red;
 c_739962.hdr.grayed = 0;
c_739962.tag = closureN_tag;
 c_739962.fn = (function_type)__lambda_732;
c_739962.num_args = 2;
c_739962.num_elements = 4;
c_739962.elements = (object *)e_7310006;
c_739962.elements[0] = ((closureN)self_734455)->elements[2];
c_739962.elements[1] = lp_73727_731830;
c_739962.elements[2] = ((closureN)self_734455)->elements[3];
c_739962.elements[3] = ((closureN)self_734455)->elements[5];

return_direct_with_clo1(data,(closure)&c_739947,__lambda_730,  &c_739962);; 
}

static void __lambda_732(void *data, object self_734456, int argc, object *args) /* object self_734456, object k_733171, object prev_91l_73728_731831, object l_73729_731832 */
 {
 object k_733171 = args[0]; object prev_91l_73728_731831 = args[1]; object l_73729_731832 = args[2];
    
if( (boolean_f != Cyc_is_pair(l_73729_731832)) ){ 
  
closureN_type c_739966;
object e_7310001 [7];
c_739966.hdr.mark = gc_color_red;
 c_739966.hdr.grayed = 0;
c_739966.tag = closureN_tag;
 c_739966.fn = (function_type)__lambda_733;
c_739966.num_args = 1;
c_739966.num_elements = 7;
c_739966.elements = (object *)e_7310001;
c_739966.elements[0] = k_733171;
c_739966.elements[1] = l_73729_731832;
c_739966.elements[2] = ((closureN)self_734456)->elements[0];
c_739966.elements[3] = ((closureN)self_734456)->elements[1];
c_739966.elements[4] = ((closureN)self_734456)->elements[2];
c_739966.elements[5] = prev_91l_73728_731831;
c_739966.elements[6] = ((closureN)self_734456)->elements[3];



return_direct_with_clo1(data,(closure)&c_739966,__lambda_733,  Cyc_car(data, l_73729_731832));
} else { 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_733171, l_73729_731832, ((closureN)self_734456)->elements[0]);}
;; 
}

static void __lambda_733(void *data, object self_734457, int argc, object *args) /* object self_734457, object r_733177 */
 {
 object r_733177 = args[0];
  
closureN_type c_739969;
object e_7310000 [6];
c_739969.hdr.mark = gc_color_red;
 c_739969.hdr.grayed = 0;
c_739969.tag = closureN_tag;
 c_739969.fn = (function_type)__lambda_734;
c_739969.num_args = 1;
c_739969.num_elements = 6;
c_739969.elements = (object *)e_7310000;
c_739969.elements[0] = ((closureN)self_734457)->elements[0];
c_739969.elements[1] = ((closureN)self_734457)->elements[1];
c_739969.elements[2] = ((closureN)self_734457)->elements[2];
c_739969.elements[3] = ((closureN)self_734457)->elements[3];
c_739969.elements[4] = ((closureN)self_734457)->elements[5];
c_739969.elements[5] = ((closureN)self_734457)->elements[6];

return_closcall2(data,  ((closureN)self_734457)->elements[4],  &c_739969, r_733177);; 
}

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



return_direct_with_clo1(data,(closure)&c_739971,__lambda_735,  Cyc_cdr(data, ((closureN)self_734458)->elements[1]));
} else { 
  
closureN_type c_739989;
object e_739996 [3];
c_739989.hdr.mark = gc_color_red;
 c_739989.hdr.grayed = 0;
c_739989.tag = closureN_tag;
 c_739989.fn = (function_type)__lambda_737;
c_739989.num_args = 1;
c_739989.num_elements = 3;
c_739989.elements = (object *)e_739996;
c_739989.elements[0] = ((closureN)self_734458)->elements[0];
c_739989.elements[1] = ((closureN)self_734458)->elements[1];
c_739989.elements[2] = ((closureN)self_734458)->elements[3];



return_direct_with_clo1(data,(closure)&c_739989,__lambda_737,  Cyc_cdr(data, ((closureN)self_734458)->elements[1]));}
;; 
}

static void __lambda_737(void *data, object self_734461, int argc, object *args) /* object self_734461, object r_733176 */
 {
 object r_733176 = args[0];
  

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

static void __lambda_735(void *data, object self_734459, int argc, object *args) /* object self_734459, object r_733175 */
 {
 object r_733175 = args[0];
  


closureN_type c_739976;
object e_739981 [3];
c_739976.hdr.mark = gc_color_red;
 c_739976.hdr.grayed = 0;
c_739976.tag = closureN_tag;
 c_739976.fn = (function_type)__lambda_736;
c_739976.num_args = 1;
c_739976.num_elements = 3;
c_739976.elements = (object *)e_739981;
c_739976.elements[0] = ((closureN)self_734459)->elements[0];
c_739976.elements[1] = ((closureN)self_734459)->elements[1];
c_739976.elements[2] = ((closureN)self_734459)->elements[2];

return_closcall4(data,  car(((closureN)self_734459)->elements[4]),  &c_739976, ((closureN)self_734459)->elements[1], ((closureN)self_734459)->elements[3], r_733175);; 
}

static void __lambda_736(void *data, object self_734460, int argc, object *args) /* object self_734460, object r_733174 */
 {

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

static void __lambda_730(void *data, object self_734462, int argc, object *args) /* object self_734462, object r_733170 */
 {
 object r_733170 = args[0];
  
closureN_type c_739949;
object e_739957 [4];
c_739949.hdr.mark = gc_color_red;
 c_739949.hdr.grayed = 0;
c_739949.tag = closureN_tag;
 c_739949.fn = (function_type)__lambda_731;
c_739949.num_args = 1;
c_739949.num_elements = 4;
c_739949.elements = (object *)e_739957;
c_739949.elements[0] = ((closureN)self_734462)->elements[0];
c_739949.elements[1] = ((closureN)self_734462)->elements[1];
c_739949.elements[2] = ((closureN)self_734462)->elements[2];
c_739949.elements[3] = ((closureN)self_734462)->elements[3];



return_direct_with_clo1(data,(closure)&c_739949,__lambda_731,  Cyc_set_cell(data, ((closureN)self_734462)->elements[2], r_733170));; 
}

static void __lambda_731(void *data, object self_734463, int argc, object *args) /* object self_734463, object r_733169 */
 {

  

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

static void __lambda_716(void *data, object self_734440, int argc, object *args) /* object self_734440, object r_733158 */
 {
 object r_733158 = args[0];
  
closureN_type c_739861;
object e_739932 [4];
c_739861.hdr.mark = gc_color_red;
 c_739861.hdr.grayed = 0;
c_739861.tag = closureN_tag;
 c_739861.fn = (function_type)__lambda_717;
c_739861.num_args = 2;
c_739861.num_elements = 4;
c_739861.elements = (object *)e_739932;
c_739861.elements[0] = ((closureN)self_734440)->elements[0];
c_739861.elements[1] = ((closureN)self_734440)->elements[1];
c_739861.elements[2] = ((closureN)self_734440)->elements[2];
c_739861.elements[3] = ((closureN)self_734440)->elements[3];

return_direct_with_clo2(data,(closure)&c_739861,__lambda_717,  ((closureN)self_734440)->elements[1], r_733158);; 
}

static void __lambda_717(void *data, object self_734441, int argc, object *args) /* object self_734441, object prev_91l_73712_731823, object l_73713_731824 */
 {
 object prev_91l_73712_731823 = args[0]; object l_73713_731824 = args[1];
  
closureN_type c_739863;
object e_739931 [6];
c_739863.hdr.mark = gc_color_red;
 c_739863.hdr.grayed = 0;
c_739863.tag = closureN_tag;
 c_739863.fn = (function_type)__lambda_718;
c_739863.num_args = 1;
c_739863.num_elements = 6;
c_739863.elements = (object *)e_739931;
c_739863.elements[0] = ((closureN)self_734441)->elements[0];
c_739863.elements[1] = l_73713_731824;
c_739863.elements[2] = ((closureN)self_734441)->elements[1];
c_739863.elements[3] = ((closureN)self_734441)->elements[2];
c_739863.elements[4] = prev_91l_73712_731823;
c_739863.elements[5] = ((closureN)self_734441)->elements[3];

return_direct_with_clo1(data,(closure)&c_739863,__lambda_718,  boolean_f);; 
}

static void __lambda_718(void *data, object self_734442, int argc, object *args) /* object self_734442, object lp_73714_731825 */
 {
 object lp_73714_731825 = args[0];
  
closureN_type c_739865;
object e_739927 [6];
c_739865.hdr.mark = gc_color_red;
 c_739865.hdr.grayed = 0;
c_739865.tag = closureN_tag;
 c_739865.fn = (function_type)__lambda_1189;
c_739865.num_args = 1;
c_739865.num_elements = 6;
c_739865.elements = (object *)e_739927;
c_739865.elements[0] = ((closureN)self_734442)->elements[0];
c_739865.elements[1] = ((closureN)self_734442)->elements[1];
c_739865.elements[2] = ((closureN)self_734442)->elements[2];
c_739865.elements[3] = ((closureN)self_734442)->elements[3];
c_739865.elements[4] = ((closureN)self_734442)->elements[4];
c_739865.elements[5] = ((closureN)self_734442)->elements[5];


pair_type local_739930; 
return_direct_with_clo1(data,(closure)&c_739865,__lambda_1189,  set_cell_as_expr(&local_739930, lp_73714_731825));; 
}

static void __lambda_1189(void *data, object self_734443, int argc, object *args) /* object self_734443, object lp_73714_731825 */
 {
 object lp_73714_731825 = args[0];
  
closureN_type c_739867;
object e_739881 [4];
c_739867.hdr.mark = gc_color_red;
 c_739867.hdr.grayed = 0;
c_739867.tag = closureN_tag;
 c_739867.fn = (function_type)__lambda_719;
c_739867.num_args = 1;
c_739867.num_elements = 4;
c_739867.elements = (object *)e_739881;
c_739867.elements[0] = ((closureN)self_734443)->elements[0];
c_739867.elements[1] = ((closureN)self_734443)->elements[1];
c_739867.elements[2] = lp_73714_731825;
c_739867.elements[3] = ((closureN)self_734443)->elements[4];


closureN_type c_739882;
object e_739926 [4];
c_739882.hdr.mark = gc_color_red;
 c_739882.hdr.grayed = 0;
c_739882.tag = closureN_tag;
 c_739882.fn = (function_type)__lambda_721;
c_739882.num_args = 2;
c_739882.num_elements = 4;
c_739882.elements = (object *)e_739926;
c_739882.elements[0] = ((closureN)self_734443)->elements[2];
c_739882.elements[1] = lp_73714_731825;
c_739882.elements[2] = ((closureN)self_734443)->elements[3];
c_739882.elements[3] = ((closureN)self_734443)->elements[5];

return_direct_with_clo1(data,(closure)&c_739867,__lambda_719,  &c_739882);; 
}

static void __lambda_721(void *data, object self_734444, int argc, object *args) /* object self_734444, object k_733161, object prev_91l_73715_731826, object l_73716_731827 */
 {
 object k_733161 = args[0]; object prev_91l_73715_731826 = args[1]; object l_73716_731827 = args[2];
    
if( (boolean_f != Cyc_is_pair(l_73716_731827)) ){ 
  
closureN_type c_739886;
object e_739921 [7];
c_739886.hdr.mark = gc_color_red;
 c_739886.hdr.grayed = 0;
c_739886.tag = closureN_tag;
 c_739886.fn = (function_type)__lambda_722;
c_739886.num_args = 1;
c_739886.num_elements = 7;
c_739886.elements = (object *)e_739921;
c_739886.elements[0] = k_733161;
c_739886.elements[1] = l_73716_731827;
c_739886.elements[2] = ((closureN)self_734444)->elements[0];
c_739886.elements[3] = ((closureN)self_734444)->elements[1];
c_739886.elements[4] = ((closureN)self_734444)->elements[2];
c_739886.elements[5] = prev_91l_73715_731826;
c_739886.elements[6] = ((closureN)self_734444)->elements[3];



return_direct_with_clo1(data,(closure)&c_739886,__lambda_722,  Cyc_car(data, l_73716_731827));
} else { 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_733161, ((closureN)self_734444)->elements[0], l_73716_731827);}
;; 
}

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

return_closcall2(data,  ((closureN)self_734445)->elements[4],  &c_739889, r_733167);; 
}

static void __lambda_723(void *data, object self_734446, int argc, object *args) /* object self_734446, object r_733163 */
 {
 object r_733163 = args[0];
  if( (boolean_f != r_733163) ){ 
  
closureN_type c_739891;
object e_739898 [3];
c_739891.hdr.mark = gc_color_red;
 c_739891.hdr.grayed = 0;
c_739891.tag = closureN_tag;
 c_739891.fn = (function_type)__lambda_724;
c_739891.num_args = 1;
c_739891.num_elements = 3;
c_739891.elements = (object *)e_739898;
c_739891.elements[0] = ((closureN)self_734446)->elements[0];
c_739891.elements[1] = ((closureN)self_734446)->elements[1];
c_739891.elements[2] = ((closureN)self_734446)->elements[3];



return_direct_with_clo1(data,(closure)&c_739891,__lambda_724,  Cyc_cdr(data, ((closureN)self_734446)->elements[1]));
} else { 
  
closureN_type c_739903;
object e_739916 [5];
c_739903.hdr.mark = gc_color_red;
 c_739903.hdr.grayed = 0;
c_739903.tag = closureN_tag;
 c_739903.fn = (function_type)__lambda_725;
c_739903.num_args = 1;
c_739903.num_elements = 5;
c_739903.elements = (object *)e_739916;
c_739903.elements[0] = ((closureN)self_734446)->elements[0];
c_739903.elements[1] = ((closureN)self_734446)->elements[1];
c_739903.elements[2] = ((closureN)self_734446)->elements[2];
c_739903.elements[3] = ((closureN)self_734446)->elements[4];
c_739903.elements[4] = ((closureN)self_734446)->elements[5];



return_direct_with_clo1(data,(closure)&c_739903,__lambda_725,  Cyc_cdr(data, ((closureN)self_734446)->elements[1]));}
;; 
}

static void __lambda_725(void *data, object self_734448, int argc, object *args) /* object self_734448, object r_733166 */
 {
 object r_733166 = args[0];
  


closureN_type c_739908;
object e_739913 [3];
c_739908.hdr.mark = gc_color_red;
 c_739908.hdr.grayed = 0;
c_739908.tag = closureN_tag;
 c_739908.fn = (function_type)__lambda_726;
c_739908.num_args = 1;
c_739908.num_elements = 3;
c_739908.elements = (object *)e_739913;
c_739908.elements[0] = ((closureN)self_734448)->elements[0];
c_739908.elements[1] = ((closureN)self_734448)->elements[1];
c_739908.elements[2] = ((closureN)self_734448)->elements[2];

return_closcall4(data,  car(((closureN)self_734448)->elements[4]),  &c_739908, ((closureN)self_734448)->elements[3], ((closureN)self_734448)->elements[1], r_733166);; 
}

static void __lambda_726(void *data, object self_734449, int argc, object *args) /* object self_734449, object r_733165 */
 {

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

static void __lambda_724(void *data, object self_734447, int argc, object *args) /* object self_734447, object r_733164 */
 {
 object r_733164 = args[0];
  

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

static void __lambda_719(void *data, object self_734450, int argc, object *args) /* object self_734450, object r_733160 */
 {
 object r_733160 = args[0];
  
closureN_type c_739869;
object e_739877 [4];
c_739869.hdr.mark = gc_color_red;
 c_739869.hdr.grayed = 0;
c_739869.tag = closureN_tag;
 c_739869.fn = (function_type)__lambda_720;
c_739869.num_args = 1;
c_739869.num_elements = 4;
c_739869.elements = (object *)e_739877;
c_739869.elements[0] = ((closureN)self_734450)->elements[0];
c_739869.elements[1] = ((closureN)self_734450)->elements[1];
c_739869.elements[2] = ((closureN)self_734450)->elements[2];
c_739869.elements[3] = ((closureN)self_734450)->elements[3];



return_direct_with_clo1(data,(closure)&c_739869,__lambda_720,  Cyc_set_cell(data, ((closureN)self_734450)->elements[2], r_733160));; 
}

static void __lambda_720(void *data, object self_734451, int argc, object *args) /* object self_734451, object r_733159 */
 {

  

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

static void __lambda_690(void *data, object _, int argc, object *args) /* closure _,object k_733131, object pred_73679_731794, object lis_73680_731795 */
 {
object k_733131 = args[0]; object pred_73679_731794 = args[1]; object lis_73680_731795 = args[2];
  Cyc_st_add(data, "srfi/1.sld:partition");

closureN_type c_739722;
object e_739829 [3];
c_739722.hdr.mark = gc_color_red;
 c_739722.hdr.grayed = 0;
c_739722.tag = closureN_tag;
 c_739722.fn = (function_type)__lambda_691;
c_739722.num_args = 1;
c_739722.num_elements = 3;
c_739722.elements = (object *)e_739829;
c_739722.elements[0] = k_733131;
c_739722.elements[1] = lis_73680_731795;
c_739722.elements[2] = pred_73679_731794;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_739722, primitive_procedure_127, pred_73679_731794, __glo_partition_srfi_1);; 
}

static void __lambda_691(void *data, object self_734389, int argc, object *args) /* object self_734389, object r_733132 */
 {

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

return_direct_with_clo1(data,(closure)&c_739724,__lambda_692,  ((closureN)self_734389)->elements[1]);; 
}

static void __lambda_692(void *data, object self_734390, int argc, object *args) /* object self_734390, object lis_73682_731796 */
 {
 object lis_73682_731796 = args[0];
  
closureN_type c_739726;
object e_739826 [3];
c_739726.hdr.mark = gc_color_red;
 c_739726.hdr.grayed = 0;
c_739726.tag = closureN_tag;
 c_739726.fn = (function_type)__lambda_693;
c_739726.num_args = 1;
c_739726.num_elements = 3;
c_739726.elements = (object *)e_739826;
c_739726.elements[0] = ((closureN)self_734390)->elements[0];
c_739726.elements[1] = lis_73682_731796;
c_739726.elements[2] = ((closureN)self_734390)->elements[1];

return_direct_with_clo1(data,(closure)&c_739726,__lambda_693,  boolean_f);; 
}

static void __lambda_693(void *data, object self_734391, int argc, object *args) /* object self_734391, object recur_73683_731797 */
 {
 object recur_73683_731797 = args[0];
  
closureN_type c_739728;
object e_739822 [3];
c_739728.hdr.mark = gc_color_red;
 c_739728.hdr.grayed = 0;
c_739728.tag = closureN_tag;
 c_739728.fn = (function_type)__lambda_1188;
c_739728.num_args = 1;
c_739728.num_elements = 3;
c_739728.elements = (object *)e_739822;
c_739728.elements[0] = ((closureN)self_734391)->elements[0];
c_739728.elements[1] = ((closureN)self_734391)->elements[1];
c_739728.elements[2] = ((closureN)self_734391)->elements[2];


pair_type local_739825; 
return_direct_with_clo1(data,(closure)&c_739728,__lambda_1188,  set_cell_as_expr(&local_739825, recur_73683_731797));; 
}

static void __lambda_1188(void *data, object self_734392, int argc, object *args) /* object self_734392, object recur_73683_731797 */
 {
 object recur_73683_731797 = args[0];
  
closureN_type c_739730;
object e_739743 [3];
c_739730.hdr.mark = gc_color_red;
 c_739730.hdr.grayed = 0;
c_739730.tag = closureN_tag;
 c_739730.fn = (function_type)__lambda_694;
c_739730.num_args = 1;
c_739730.num_elements = 3;
c_739730.elements = (object *)e_739743;
c_739730.elements[0] = ((closureN)self_734392)->elements[0];
c_739730.elements[1] = ((closureN)self_734392)->elements[1];
c_739730.elements[2] = recur_73683_731797;


closureN_type c_739744;
object e_739821 [2];
c_739744.hdr.mark = gc_color_red;
 c_739744.hdr.grayed = 0;
c_739744.tag = closureN_tag;
 c_739744.fn = (function_type)__lambda_696;
c_739744.num_args = 1;
c_739744.num_elements = 2;
c_739744.elements = (object *)e_739821;
c_739744.elements[0] = ((closureN)self_734392)->elements[2];
c_739744.elements[1] = recur_73683_731797;

return_direct_with_clo1(data,(closure)&c_739730,__lambda_694,  &c_739744);; 
}

static void __lambda_696(void *data, object self_734393, int argc, object *args) /* object self_734393, object k_733135, object lis_73684_731798 */
 {
 object k_733135 = args[0]; object lis_73684_731798 = args[1];
  
closureN_type c_739746;
object e_739820 [4];
c_739746.hdr.mark = gc_color_red;
 c_739746.hdr.grayed = 0;
c_739746.tag = closureN_tag;
 c_739746.fn = (function_type)__lambda_697;
c_739746.num_args = 1;
c_739746.num_elements = 4;
c_739746.elements = (object *)e_739820;
c_739746.elements[0] = k_733135;
c_739746.elements[1] = lis_73684_731798;
c_739746.elements[2] = ((closureN)self_734393)->elements[0];
c_739746.elements[3] = ((closureN)self_734393)->elements[1];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_739746, lis_73684_731798);; 
}

static void __lambda_697(void *data, object self_734394, int argc, object *args) /* object self_734394, object r_733136 */
 {
 object r_733136 = args[0];
  if( (boolean_f != r_733136) ){ 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734394)->elements[0], ((closureN)self_734394)->elements[1], ((closureN)self_734394)->elements[1]);
} else { 
  
closureN_type c_739752;
object e_739816 [4];
c_739752.hdr.mark = gc_color_red;
 c_739752.hdr.grayed = 0;
c_739752.tag = closureN_tag;
 c_739752.fn = (function_type)__lambda_698;
c_739752.num_args = 1;
c_739752.num_elements = 4;
c_739752.elements = (object *)e_739816;
c_739752.elements[0] = ((closureN)self_734394)->elements[0];
c_739752.elements[1] = ((closureN)self_734394)->elements[1];
c_739752.elements[2] = ((closureN)self_734394)->elements[2];
c_739752.elements[3] = ((closureN)self_734394)->elements[3];



return_direct_with_clo1(data,(closure)&c_739752,__lambda_698,  Cyc_car(data, ((closureN)self_734394)->elements[1]));}
;; 
}

static void __lambda_698(void *data, object self_734395, int argc, object *args) /* object self_734395, object r_733137 */
 {
 object r_733137 = args[0];
  
closureN_type c_739754;
object e_739812 [5];
c_739754.hdr.mark = gc_color_red;
 c_739754.hdr.grayed = 0;
c_739754.tag = closureN_tag;
 c_739754.fn = (function_type)__lambda_699;
c_739754.num_args = 1;
c_739754.num_elements = 5;
c_739754.elements = (object *)e_739812;
c_739754.elements[0] = ((closureN)self_734395)->elements[0];
c_739754.elements[1] = ((closureN)self_734395)->elements[1];
c_739754.elements[2] = ((closureN)self_734395)->elements[2];
c_739754.elements[3] = r_733137;
c_739754.elements[4] = ((closureN)self_734395)->elements[3];



return_direct_with_clo1(data,(closure)&c_739754,__lambda_699,  Cyc_cdr(data, ((closureN)self_734395)->elements[1]));; 
}

static void __lambda_699(void *data, object self_734396, int argc, object *args) /* object self_734396, object r_733138 */
 {
 object r_733138 = args[0];
  
closureN_type c_739756;
object e_739810 [4];
c_739756.hdr.mark = gc_color_red;
 c_739756.hdr.grayed = 0;
c_739756.tag = closureN_tag;
 c_739756.fn = (function_type)__lambda_700;
c_739756.num_args = 2;
c_739756.num_elements = 4;
c_739756.elements = (object *)e_739810;
c_739756.elements[0] = ((closureN)self_734396)->elements[0];
c_739756.elements[1] = ((closureN)self_734396)->elements[1];
c_739756.elements[2] = ((closureN)self_734396)->elements[2];
c_739756.elements[3] = ((closureN)self_734396)->elements[4];

return_direct_with_clo2(data,(closure)&c_739756,__lambda_700,  ((closureN)self_734396)->elements[3], r_733138);; 
}

static void __lambda_700(void *data, object self_734397, int argc, object *args) /* object self_734397, object elt_73685_731799, object tail_73686_731800 */
 {
 object elt_73685_731799 = args[0]; object tail_73686_731800 = args[1];
  
closureN_type c_739758;
object e_739802 [4];
c_739758.hdr.mark = gc_color_red;
 c_739758.hdr.grayed = 0;
c_739758.tag = closureN_tag;
 c_739758.fn = (function_type)__lambda_701;
c_739758.num_args = 1;
c_739758.num_elements = 4;
c_739758.elements = (object *)e_739802;
c_739758.elements[0] = elt_73685_731799;
c_739758.elements[1] = ((closureN)self_734397)->elements[0];
c_739758.elements[2] = ((closureN)self_734397)->elements[1];
c_739758.elements[3] = ((closureN)self_734397)->elements[2];


closureN_type c_739803;
object e_739809 [2];
c_739803.hdr.mark = gc_color_red;
 c_739803.hdr.grayed = 0;
c_739803.tag = closureN_tag;
 c_739803.fn = (function_type)__lambda_705;
c_739803.num_args = 0;
c_739803.num_elements = 2;
c_739803.elements = (object *)e_739809;
c_739803.elements[0] = ((closureN)self_734397)->elements[3];
c_739803.elements[1] = tail_73686_731800;

return_direct_with_clo1(data,(closure)&c_739758,__lambda_701,  &c_739803);; 
}

static void __lambda_705(void *data, object self_734398, int argc, object *args) /* object self_734398, object k_733149 */
 {
 object k_733149 = args[0];
  

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

static void __lambda_701(void *data, object self_734399, int argc, object *args) /* object self_734399, object r_733139 */
 {
 object r_733139 = args[0];
  
closureN_type c_739760;
object e_739764 [2];
c_739760.hdr.mark = gc_color_red;
 c_739760.hdr.grayed = 0;
c_739760.tag = closureN_tag;
 c_739760.fn = (function_type)__lambda_702;
c_739760.num_args = 1;
c_739760.num_elements = 2;
c_739760.elements = (object *)e_739764;
c_739760.elements[0] = ((closureN)self_734399)->elements[1];
c_739760.elements[1] = r_733139;


closureN_type c_739765;
object e_739801 [3];
c_739765.hdr.mark = gc_color_red;
 c_739765.hdr.grayed = 0;
c_739765.tag = closureN_tag;
 c_739765.fn = (function_type)__lambda_703;
c_739765.num_args = 2;
c_739765.num_elements = 3;
c_739765.elements = (object *)e_739801;
c_739765.elements[0] = ((closureN)self_734399)->elements[0];
c_739765.elements[1] = ((closureN)self_734399)->elements[2];
c_739765.elements[2] = ((closureN)self_734399)->elements[3];

return_direct_with_clo1(data,(closure)&c_739760,__lambda_702,  &c_739765);; 
}

static void __lambda_703(void *data, object self_734400, int argc, object *args) /* object self_734400, object k_733141, object in_73687_731801, object out_73688_731802 */
 {
 object k_733141 = args[0]; object in_73687_731801 = args[1]; object out_73688_731802 = args[2];
  
closureN_type c_739768;
object e_739799 [5];
c_739768.hdr.mark = gc_color_red;
 c_739768.hdr.grayed = 0;
c_739768.tag = closureN_tag;
 c_739768.fn = (function_type)__lambda_704;
c_739768.num_args = 1;
c_739768.num_elements = 5;
c_739768.elements = (object *)e_739799;
c_739768.elements[0] = ((closureN)self_734400)->elements[0];
c_739768.elements[1] = in_73687_731801;
c_739768.elements[2] = k_733141;
c_739768.elements[3] = ((closureN)self_734400)->elements[1];
c_739768.elements[4] = out_73688_731802;

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

static void __lambda_704(void *data, object self_734401, int argc, object *args) /* object self_734401, object r_733142 */
 {
 object r_733142 = args[0];
  if( (boolean_f != r_733142) ){ 
  object r_733143;
    
if( (boolean_f != Cyc_is_pair(((closureN)self_734401)->elements[4])) ){ 
  object local_739776 = alloca(sizeof(pair_type)); 
  r_733143 = set_pair_as_expr(local_739776, ((closureN)self_734401)->elements[0], ((closureN)self_734401)->elements[1]);
} else { 
  r_733143 = ((closureN)self_734401)->elements[3];}
;return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734401)->elements[2], r_733143, ((closureN)self_734401)->elements[4]);
} else { 
  object r_733146;
    
if( (boolean_f != Cyc_is_pair(((closureN)self_734401)->elements[1])) ){ 
  object local_739791 = alloca(sizeof(pair_type)); 
  r_733146 = set_pair_as_expr(local_739791, ((closureN)self_734401)->elements[0], ((closureN)self_734401)->elements[4]);
} else { 
  r_733146 = ((closureN)self_734401)->elements[3];}
;return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734401)->elements[2], ((closureN)self_734401)->elements[1], r_733146);}
;; 
}

static void __lambda_702(void *data, object self_734402, int argc, object *args) /* object self_734402, object r_733140 */
 {
 object r_733140 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734402)->elements[0], ((closureN)self_734402)->elements[1], r_733140);; 
}

static void __lambda_694(void *data, object self_734403, int argc, object *args) /* object self_734403, object r_733134 */
 {
 object r_733134 = args[0];
  
closureN_type c_739732;
object e_739739 [3];
c_739732.hdr.mark = gc_color_red;
 c_739732.hdr.grayed = 0;
c_739732.tag = closureN_tag;
 c_739732.fn = (function_type)__lambda_695;
c_739732.num_args = 1;
c_739732.num_elements = 3;
c_739732.elements = (object *)e_739739;
c_739732.elements[0] = ((closureN)self_734403)->elements[0];
c_739732.elements[1] = ((closureN)self_734403)->elements[1];
c_739732.elements[2] = ((closureN)self_734403)->elements[2];



return_direct_with_clo1(data,(closure)&c_739732,__lambda_695,  Cyc_set_cell(data, ((closureN)self_734403)->elements[2], r_733134));; 
}

static void __lambda_695(void *data, object self_734404, int argc, object *args) /* object self_734404, object r_733133 */
 {

  

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

static void __lambda_659(void *data, object _, int argc, object *args) /* closure _,object k_733098, object pred_73656_731780, object lis_73657_731781 */
 {
object k_733098 = args[0]; object pred_73656_731780 = args[1]; object lis_73657_731781 = args[2];
  Cyc_st_add(data, "srfi/1.sld:filter!");

closureN_type c_739504;
object e_739719 [3];
c_739504.hdr.mark = gc_color_red;
 c_739504.hdr.grayed = 0;
c_739504.tag = closureN_tag;
 c_739504.fn = (function_type)__lambda_660;
c_739504.num_args = 1;
c_739504.num_elements = 3;
c_739504.elements = (object *)e_739719;
c_739504.elements[0] = k_733098;
c_739504.elements[1] = lis_73657_731781;
c_739504.elements[2] = pred_73656_731780;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_739504, primitive_procedure_127, pred_73656_731780, __glo_filter_67_srfi_1);; 
}

static void __lambda_660(void *data, object self_734355, int argc, object *args) /* object self_734355, object r_733099 */
 {

  
closureN_type c_739506;
object e_739717 [2];
c_739506.hdr.mark = gc_color_red;
 c_739506.hdr.grayed = 0;
c_739506.tag = closureN_tag;
 c_739506.fn = (function_type)__lambda_661;
c_739506.num_args = 1;
c_739506.num_elements = 2;
c_739506.elements = (object *)e_739717;
c_739506.elements[0] = ((closureN)self_734355)->elements[0];
c_739506.elements[1] = ((closureN)self_734355)->elements[2];

return_direct_with_clo1(data,(closure)&c_739506,__lambda_661,  ((closureN)self_734355)->elements[1]);; 
}

static void __lambda_661(void *data, object self_734356, int argc, object *args) /* object self_734356, object ans_73659_731782 */
 {
 object ans_73659_731782 = args[0];
  
closureN_type c_739508;
object e_739716 [3];
c_739508.hdr.mark = gc_color_red;
 c_739508.hdr.grayed = 0;
c_739508.tag = closureN_tag;
 c_739508.fn = (function_type)__lambda_662;
c_739508.num_args = 1;
c_739508.num_elements = 3;
c_739508.elements = (object *)e_739716;
c_739508.elements[0] = ans_73659_731782;
c_739508.elements[1] = ((closureN)self_734356)->elements[0];
c_739508.elements[2] = ((closureN)self_734356)->elements[1];

return_direct_with_clo1(data,(closure)&c_739508,__lambda_662,  boolean_f);; 
}

static void __lambda_662(void *data, object self_734357, int argc, object *args) /* object self_734357, object lp_73660_731783 */
 {
 object lp_73660_731783 = args[0];
  
closureN_type c_739510;
object e_739712 [3];
c_739510.hdr.mark = gc_color_red;
 c_739510.hdr.grayed = 0;
c_739510.tag = closureN_tag;
 c_739510.fn = (function_type)__lambda_1187;
c_739510.num_args = 1;
c_739510.num_elements = 3;
c_739510.elements = (object *)e_739712;
c_739510.elements[0] = ((closureN)self_734357)->elements[0];
c_739510.elements[1] = ((closureN)self_734357)->elements[1];
c_739510.elements[2] = ((closureN)self_734357)->elements[2];


pair_type local_739715; 
return_direct_with_clo1(data,(closure)&c_739510,__lambda_1187,  set_cell_as_expr(&local_739715, lp_73660_731783));; 
}

static void __lambda_1187(void *data, object self_734358, int argc, object *args) /* object self_734358, object lp_73660_731783 */
 {
 object lp_73660_731783 = args[0];
  
closureN_type c_739512;
object e_739525 [3];
c_739512.hdr.mark = gc_color_red;
 c_739512.hdr.grayed = 0;
c_739512.tag = closureN_tag;
 c_739512.fn = (function_type)__lambda_663;
c_739512.num_args = 1;
c_739512.num_elements = 3;
c_739512.elements = (object *)e_739525;
c_739512.elements[0] = ((closureN)self_734358)->elements[0];
c_739512.elements[1] = ((closureN)self_734358)->elements[1];
c_739512.elements[2] = lp_73660_731783;


closureN_type c_739526;
object e_739711 [2];
c_739526.hdr.mark = gc_color_red;
 c_739526.hdr.grayed = 0;
c_739526.tag = closureN_tag;
 c_739526.fn = (function_type)__lambda_665;
c_739526.num_args = 1;
c_739526.num_elements = 2;
c_739526.elements = (object *)e_739711;
c_739526.elements[0] = lp_73660_731783;
c_739526.elements[1] = ((closureN)self_734358)->elements[2];

return_direct_with_clo1(data,(closure)&c_739512,__lambda_663,  &c_739526);; 
}

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

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_739528, ans_73661_731784);; 
}

static void __lambda_666(void *data, object self_734360, int argc, object *args) /* object self_734360, object r_733103 */
 {
 object r_733103 = args[0];
  if( (boolean_f != r_733103) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734360)->elements[1], (((closure)  ((closureN)self_734360)->elements[1])->fn),  ((closureN)self_734360)->elements[0]);
} else { 
  
closureN_type c_739533;
object e_739706 [4];
c_739533.hdr.mark = gc_color_red;
 c_739533.hdr.grayed = 0;
c_739533.tag = closureN_tag;
 c_739533.fn = (function_type)__lambda_667;
c_739533.num_args = 1;
c_739533.num_elements = 4;
c_739533.elements = (object *)e_739706;
c_739533.elements[0] = ((closureN)self_734360)->elements[0];
c_739533.elements[1] = ((closureN)self_734360)->elements[1];
c_739533.elements[2] = ((closureN)self_734360)->elements[2];
c_739533.elements[3] = ((closureN)self_734360)->elements[3];



return_direct_with_clo1(data,(closure)&c_739533,__lambda_667,  Cyc_car(data, ((closureN)self_734360)->elements[0]));}
;; 
}

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

return_closcall2(data,  ((closureN)self_734361)->elements[3],  &c_739536, r_733128);; 
}

static void __lambda_668(void *data, object self_734362, int argc, object *args) /* object self_734362, object r_733104 */
 {
 object r_733104 = args[0];
  if( (boolean_f != r_733104) ){ 
  
closureN_type c_739538;
object e_739696 [3];
c_739538.hdr.mark = gc_color_red;
 c_739538.hdr.grayed = 0;
c_739538.tag = closureN_tag;
 c_739538.fn = (function_type)__lambda_669;
c_739538.num_args = 2;
c_739538.num_elements = 3;
c_739538.elements = (object *)e_739696;
c_739538.elements[0] = ((closureN)self_734362)->elements[0];
c_739538.elements[1] = ((closureN)self_734362)->elements[1];
c_739538.elements[2] = ((closureN)self_734362)->elements[3];

return_direct_with_clo2(data,(closure)&c_739538,__lambda_669,  boolean_f, boolean_f);
} else { 
  



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

static void __lambda_669(void *data, object self_734363, int argc, object *args) /* object self_734363, object scan_91in_73669_731785, object scan_91out_73670_731786 */
 {
 object scan_91in_73669_731785 = args[0]; object scan_91out_73670_731786 = args[1];
  
closureN_type c_739540;
object e_739692 [4];
c_739540.hdr.mark = gc_color_red;
 c_739540.hdr.grayed = 0;
c_739540.tag = closureN_tag;
 c_739540.fn = (function_type)__lambda_1186;
c_739540.num_args = 1;
c_739540.num_elements = 4;
c_739540.elements = (object *)e_739692;
c_739540.elements[0] = ((closureN)self_734363)->elements[0];
c_739540.elements[1] = ((closureN)self_734363)->elements[1];
c_739540.elements[2] = ((closureN)self_734363)->elements[2];
c_739540.elements[3] = scan_91out_73670_731786;


pair_type local_739695; 
return_direct_with_clo1(data,(closure)&c_739540,__lambda_1186,  set_cell_as_expr(&local_739695, scan_91in_73669_731785));; 
}

static void __lambda_1186(void *data, object self_734364, int argc, object *args) /* object self_734364, object scan_91in_73669_731785 */
 {
 object scan_91in_73669_731785 = args[0];
  
closureN_type c_739542;
object e_739687 [4];
c_739542.hdr.mark = gc_color_red;
 c_739542.hdr.grayed = 0;
c_739542.tag = closureN_tag;
 c_739542.fn = (function_type)__lambda_1185;
c_739542.num_args = 1;
c_739542.num_elements = 4;
c_739542.elements = (object *)e_739687;
c_739542.elements[0] = ((closureN)self_734364)->elements[0];
c_739542.elements[1] = ((closureN)self_734364)->elements[1];
c_739542.elements[2] = ((closureN)self_734364)->elements[2];
c_739542.elements[3] = scan_91in_73669_731785;


pair_type local_739690; 
return_direct_with_clo1(data,(closure)&c_739542,__lambda_1185,  set_cell_as_expr(&local_739690, ((closureN)self_734364)->elements[3]));; 
}

static void __lambda_1185(void *data, object self_734365, int argc, object *args) /* object self_734365, object scan_91out_73670_731786 */
 {
 object scan_91out_73670_731786 = args[0];
  
closureN_type c_739544;
object e_739651 [5];
c_739544.hdr.mark = gc_color_red;
 c_739544.hdr.grayed = 0;
c_739544.tag = closureN_tag;
 c_739544.fn = (function_type)__lambda_670;
c_739544.num_args = 1;
c_739544.num_elements = 5;
c_739544.elements = (object *)e_739651;
c_739544.elements[0] = ((closureN)self_734365)->elements[0];
c_739544.elements[1] = ((closureN)self_734365)->elements[1];
c_739544.elements[2] = ((closureN)self_734365)->elements[2];
c_739544.elements[3] = ((closureN)self_734365)->elements[3];
c_739544.elements[4] = scan_91out_73670_731786;


closureN_type c_739652;
object e_739686 [3];
c_739652.hdr.mark = gc_color_red;
 c_739652.hdr.grayed = 0;
c_739652.tag = closureN_tag;
 c_739652.fn = (function_type)__lambda_686;
c_739652.num_args = 2;
c_739652.num_elements = 3;
c_739652.elements = (object *)e_739686;
c_739652.elements[0] = ((closureN)self_734365)->elements[2];
c_739652.elements[1] = ((closureN)self_734365)->elements[3];
c_739652.elements[2] = scan_91out_73670_731786;

return_direct_with_clo1(data,(closure)&c_739544,__lambda_670,  &c_739652);; 
}

static void __lambda_686(void *data, object self_734366, int argc, object *args) /* object self_734366, object k_733121, object prev_73671_731787, object lis_73672_731788 */
 {
 object k_733121 = args[0]; object prev_73671_731787 = args[1]; object lis_73672_731788 = args[2];
    
if( (boolean_f != Cyc_is_pair(lis_73672_731788)) ){ 
  
closureN_type c_739656;
object e_739682 [6];
c_739656.hdr.mark = gc_color_red;
 c_739656.hdr.grayed = 0;
c_739656.tag = closureN_tag;
 c_739656.fn = (function_type)__lambda_687;
c_739656.num_args = 1;
c_739656.num_elements = 6;
c_739656.elements = (object *)e_739682;
c_739656.elements[0] = k_733121;
c_739656.elements[1] = lis_73672_731788;
c_739656.elements[2] = ((closureN)self_734366)->elements[0];
c_739656.elements[3] = prev_73671_731787;
c_739656.elements[4] = ((closureN)self_734366)->elements[1];
c_739656.elements[5] = ((closureN)self_734366)->elements[2];



return_direct_with_clo1(data,(closure)&c_739656,__lambda_687,  Cyc_car(data, lis_73672_731788));
} else { 
  return_direct_with_clo1(data,  k_733121, (((closure)  k_733121)->fn),  Cyc_VOID);}
;; 
}

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

return_closcall2(data,  ((closureN)self_734367)->elements[2],  &c_739659, r_733126);; 
}

static void __lambda_688(void *data, object self_734368, int argc, object *args) /* object self_734368, object r_733123 */
 {
 object r_733123 = args[0];
  if( (boolean_f != r_733123) ){ 
  
closureN_type c_739661;
object e_739668 [3];
c_739661.hdr.mark = gc_color_red;
 c_739661.hdr.grayed = 0;
c_739661.tag = closureN_tag;
 c_739661.fn = (function_type)__lambda_689;
c_739661.num_args = 1;
c_739661.num_elements = 3;
c_739661.elements = (object *)e_739668;
c_739661.elements[0] = ((closureN)self_734368)->elements[0];
c_739661.elements[1] = ((closureN)self_734368)->elements[1];
c_739661.elements[2] = ((closureN)self_734368)->elements[3];



return_direct_with_clo1(data,(closure)&c_739661,__lambda_689,  Cyc_cdr(data, ((closureN)self_734368)->elements[1]));
} else { 
  



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

static void __lambda_689(void *data, object self_734369, int argc, object *args) /* object self_734369, object r_733124 */
 {
 object r_733124 = args[0];
  

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

static void __lambda_670(void *data, object self_734370, int argc, object *args) /* object self_734370, object r_733120 */
 {
 object r_733120 = args[0];
  
closureN_type c_739546;
object e_739647 [5];
c_739546.hdr.mark = gc_color_red;
 c_739546.hdr.grayed = 0;
c_739546.tag = closureN_tag;
 c_739546.fn = (function_type)__lambda_671;
c_739546.num_args = 1;
c_739546.num_elements = 5;
c_739546.elements = (object *)e_739647;
c_739546.elements[0] = ((closureN)self_734370)->elements[0];
c_739546.elements[1] = ((closureN)self_734370)->elements[1];
c_739546.elements[2] = ((closureN)self_734370)->elements[2];
c_739546.elements[3] = ((closureN)self_734370)->elements[3];
c_739546.elements[4] = ((closureN)self_734370)->elements[4];



return_direct_with_clo1(data,(closure)&c_739546,__lambda_671,  Cyc_set_cell(data, ((closureN)self_734370)->elements[3], r_733120));; 
}

static void __lambda_671(void *data, object self_734371, int argc, object *args) /* object self_734371, object r_733105 */
 {

  
closureN_type c_739548;
object e_739571 [4];
c_739548.hdr.mark = gc_color_red;
 c_739548.hdr.grayed = 0;
c_739548.tag = closureN_tag;
 c_739548.fn = (function_type)__lambda_672;
c_739548.num_args = 1;
c_739548.num_elements = 4;
c_739548.elements = (object *)e_739571;
c_739548.elements[0] = ((closureN)self_734371)->elements[0];
c_739548.elements[1] = ((closureN)self_734371)->elements[1];
c_739548.elements[2] = ((closureN)self_734371)->elements[3];
c_739548.elements[3] = ((closureN)self_734371)->elements[4];


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

return_direct_with_clo1(data,(closure)&c_739548,__lambda_672,  &c_739572);; 
}

static void __lambda_676(void *data, object self_734372, int argc, object *args) /* object self_734372, object k_733110, object prev_73673_731789, object lis_73674_731790 */
 {
 object k_733110 = args[0]; object prev_73673_731789 = args[1]; object lis_73674_731790 = args[2];
  
closureN_type c_739574;
object e_739645 [4];
c_739574.hdr.mark = gc_color_red;
 c_739574.hdr.grayed = 0;
c_739574.tag = closureN_tag;
 c_739574.fn = (function_type)__lambda_677;
c_739574.num_args = 1;
c_739574.num_elements = 4;
c_739574.elements = (object *)e_739645;
c_739574.elements[0] = k_733110;
c_739574.elements[1] = ((closureN)self_734372)->elements[0];
c_739574.elements[2] = prev_73673_731789;
c_739574.elements[3] = ((closureN)self_734372)->elements[1];

return_direct_with_clo1(data,(closure)&c_739574,__lambda_677,  lis_73674_731790);; 
}

static void __lambda_677(void *data, object self_734373, int argc, object *args) /* object self_734373, object lis_73676_731791 */
 {
 object lis_73676_731791 = args[0];
  
closureN_type c_739576;
object e_739644 [5];
c_739576.hdr.mark = gc_color_red;
 c_739576.hdr.grayed = 0;
c_739576.tag = closureN_tag;
 c_739576.fn = (function_type)__lambda_678;
c_739576.num_args = 1;
c_739576.num_elements = 5;
c_739576.elements = (object *)e_739644;
c_739576.elements[0] = ((closureN)self_734373)->elements[0];
c_739576.elements[1] = lis_73676_731791;
c_739576.elements[2] = ((closureN)self_734373)->elements[1];
c_739576.elements[3] = ((closureN)self_734373)->elements[2];
c_739576.elements[4] = ((closureN)self_734373)->elements[3];

return_direct_with_clo1(data,(closure)&c_739576,__lambda_678,  boolean_f);; 
}

static void __lambda_678(void *data, object self_734374, int argc, object *args) /* object self_734374, object lp_73677_731792 */
 {
 object lp_73677_731792 = args[0];
  
closureN_type c_739578;
object e_739640 [5];
c_739578.hdr.mark = gc_color_red;
 c_739578.hdr.grayed = 0;
c_739578.tag = closureN_tag;
 c_739578.fn = (function_type)__lambda_1184;
c_739578.num_args = 1;
c_739578.num_elements = 5;
c_739578.elements = (object *)e_739640;
c_739578.elements[0] = ((closureN)self_734374)->elements[0];
c_739578.elements[1] = ((closureN)self_734374)->elements[1];
c_739578.elements[2] = ((closureN)self_734374)->elements[2];
c_739578.elements[3] = ((closureN)self_734374)->elements[3];
c_739578.elements[4] = ((closureN)self_734374)->elements[4];


pair_type local_739643; 
return_direct_with_clo1(data,(closure)&c_739578,__lambda_1184,  set_cell_as_expr(&local_739643, lp_73677_731792));; 
}

static void __lambda_1184(void *data, object self_734375, int argc, object *args) /* object self_734375, object lp_73677_731792 */
 {
 object lp_73677_731792 = args[0];
  
closureN_type c_739580;
object e_739593 [3];
c_739580.hdr.mark = gc_color_red;
 c_739580.hdr.grayed = 0;
c_739580.tag = closureN_tag;
 c_739580.fn = (function_type)__lambda_679;
c_739580.num_args = 1;
c_739580.num_elements = 3;
c_739580.elements = (object *)e_739593;
c_739580.elements[0] = ((closureN)self_734375)->elements[0];
c_739580.elements[1] = ((closureN)self_734375)->elements[1];
c_739580.elements[2] = lp_73677_731792;


closureN_type c_739594;
object e_739639 [4];
c_739594.hdr.mark = gc_color_red;
 c_739594.hdr.grayed = 0;
c_739594.tag = closureN_tag;
 c_739594.fn = (function_type)__lambda_681;
c_739594.num_args = 1;
c_739594.num_elements = 4;
c_739594.elements = (object *)e_739639;
c_739594.elements[0] = lp_73677_731792;
c_739594.elements[1] = ((closureN)self_734375)->elements[2];
c_739594.elements[2] = ((closureN)self_734375)->elements[3];
c_739594.elements[3] = ((closureN)self_734375)->elements[4];

return_direct_with_clo1(data,(closure)&c_739580,__lambda_679,  &c_739594);; 
}

static void __lambda_681(void *data, object self_734376, int argc, object *args) /* object self_734376, object k_733113, object lis_73678_731793 */
 {
 object k_733113 = args[0]; object lis_73678_731793 = args[1];
    
if( (boolean_f != Cyc_is_pair(lis_73678_731793)) ){ 
  
closureN_type c_739598;
object e_739631 [6];
c_739598.hdr.mark = gc_color_red;
 c_739598.hdr.grayed = 0;
c_739598.tag = closureN_tag;
 c_739598.fn = (function_type)__lambda_682;
c_739598.num_args = 1;
c_739598.num_elements = 6;
c_739598.elements = (object *)e_739631;
c_739598.elements[0] = k_733113;
c_739598.elements[1] = lis_73678_731793;
c_739598.elements[2] = ((closureN)self_734376)->elements[0];
c_739598.elements[3] = ((closureN)self_734376)->elements[1];
c_739598.elements[4] = ((closureN)self_734376)->elements[2];
c_739598.elements[5] = ((closureN)self_734376)->elements[3];



return_direct_with_clo1(data,(closure)&c_739598,__lambda_682,  Cyc_car(data, lis_73678_731793));
} else { 
  
object c_739637 = Cyc_set_cdr_cps(data,  k_733113,((closureN)self_734376)->elements[2], lis_73678_731793);
return_direct_with_clo1(data,  k_733113, (((closure)  k_733113)->fn),  c_739637);}
;; 
}

static void __lambda_682(void *data, object self_734377, int argc, object *args) /* object self_734377, object r_733119 */
 {
 object r_733119 = args[0];
  
closureN_type c_739601;
object e_739630 [5];
c_739601.hdr.mark = gc_color_red;
 c_739601.hdr.grayed = 0;
c_739601.tag = closureN_tag;
 c_739601.fn = (function_type)__lambda_683;
c_739601.num_args = 1;
c_739601.num_elements = 5;
c_739601.elements = (object *)e_739630;
c_739601.elements[0] = ((closureN)self_734377)->elements[0];
c_739601.elements[1] = ((closureN)self_734377)->elements[1];
c_739601.elements[2] = ((closureN)self_734377)->elements[2];
c_739601.elements[3] = ((closureN)self_734377)->elements[4];
c_739601.elements[4] = ((closureN)self_734377)->elements[5];

return_closcall2(data,  ((closureN)self_734377)->elements[3],  &c_739601, r_733119);; 
}

static void __lambda_683(void *data, object self_734378, int argc, object *args) /* object self_734378, object r_733115 */
 {
 object r_733115 = args[0];
  if( (boolean_f != r_733115) ){ 
  
closureN_type c_739603;
object e_739616 [3];
c_739603.hdr.mark = gc_color_red;
 c_739603.hdr.grayed = 0;
c_739603.tag = closureN_tag;
 c_739603.fn = (function_type)__lambda_684;
c_739603.num_args = 1;
c_739603.num_elements = 3;
c_739603.elements = (object *)e_739616;
c_739603.elements[0] = ((closureN)self_734378)->elements[0];
c_739603.elements[1] = ((closureN)self_734378)->elements[1];
c_739603.elements[2] = ((closureN)self_734378)->elements[4];


object c_739619 = Cyc_set_cdr_cps(data,(closure)&c_739603,((closureN)self_734378)->elements[3], ((closureN)self_734378)->elements[1]);
return_closcall1(data,(closure)&c_739603,  c_739619);
} else { 
  



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

static void __lambda_684(void *data, object self_734379, int argc, object *args) /* object self_734379, object r_733116 */
 {

  
closureN_type c_739605;
object e_739612 [3];
c_739605.hdr.mark = gc_color_red;
 c_739605.hdr.grayed = 0;
c_739605.tag = closureN_tag;
 c_739605.fn = (function_type)__lambda_685;
c_739605.num_args = 1;
c_739605.num_elements = 3;
c_739605.elements = (object *)e_739612;
c_739605.elements[0] = ((closureN)self_734379)->elements[0];
c_739605.elements[1] = ((closureN)self_734379)->elements[1];
c_739605.elements[2] = ((closureN)self_734379)->elements[2];



return_direct_with_clo1(data,(closure)&c_739605,__lambda_685,  Cyc_cdr(data, ((closureN)self_734379)->elements[1]));; 
}

static void __lambda_685(void *data, object self_734380, int argc, object *args) /* object self_734380, object r_733117 */
 {
 object r_733117 = args[0];
  

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

static void __lambda_679(void *data, object self_734381, int argc, object *args) /* object self_734381, object r_733112 */
 {
 object r_733112 = args[0];
  
closureN_type c_739582;
object e_739589 [3];
c_739582.hdr.mark = gc_color_red;
 c_739582.hdr.grayed = 0;
c_739582.tag = closureN_tag;
 c_739582.fn = (function_type)__lambda_680;
c_739582.num_args = 1;
c_739582.num_elements = 3;
c_739582.elements = (object *)e_739589;
c_739582.elements[0] = ((closureN)self_734381)->elements[0];
c_739582.elements[1] = ((closureN)self_734381)->elements[1];
c_739582.elements[2] = ((closureN)self_734381)->elements[2];



return_direct_with_clo1(data,(closure)&c_739582,__lambda_680,  Cyc_set_cell(data, ((closureN)self_734381)->elements[2], r_733112));; 
}

static void __lambda_680(void *data, object self_734382, int argc, object *args) /* object self_734382, object r_733111 */
 {

  

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

static void __lambda_672(void *data, object self_734383, int argc, object *args) /* object self_734383, object r_733109 */
 {
 object r_733109 = args[0];
  
closureN_type c_739550;
object e_739567 [3];
c_739550.hdr.mark = gc_color_red;
 c_739550.hdr.grayed = 0;
c_739550.tag = closureN_tag;
 c_739550.fn = (function_type)__lambda_673;
c_739550.num_args = 1;
c_739550.num_elements = 3;
c_739550.elements = (object *)e_739567;
c_739550.elements[0] = ((closureN)self_734383)->elements[0];
c_739550.elements[1] = ((closureN)self_734383)->elements[1];
c_739550.elements[2] = ((closureN)self_734383)->elements[2];



return_direct_with_clo1(data,(closure)&c_739550,__lambda_673,  Cyc_set_cell(data, ((closureN)self_734383)->elements[3], r_733109));; 
}

static void __lambda_673(void *data, object self_734384, int argc, object *args) /* object self_734384, object r_733106 */
 {

  
closureN_type c_739552;
object e_739563 [3];
c_739552.hdr.mark = gc_color_red;
 c_739552.hdr.grayed = 0;
c_739552.tag = closureN_tag;
 c_739552.fn = (function_type)__lambda_674;
c_739552.num_args = 1;
c_739552.num_elements = 3;
c_739552.elements = (object *)e_739563;
c_739552.elements[0] = ((closureN)self_734384)->elements[0];
c_739552.elements[1] = ((closureN)self_734384)->elements[1];
c_739552.elements[2] = ((closureN)self_734384)->elements[2];



return_direct_with_clo1(data,(closure)&c_739552,__lambda_674,  Cyc_cdr(data, ((closureN)self_734384)->elements[0]));; 
}

static void __lambda_674(void *data, object self_734385, int argc, object *args) /* object self_734385, object r_733108 */
 {
 object r_733108 = args[0];
  


closureN_type c_739557;
object e_739561 [2];
c_739557.hdr.mark = gc_color_red;
 c_739557.hdr.grayed = 0;
c_739557.tag = closureN_tag;
 c_739557.fn = (function_type)__lambda_675;
c_739557.num_args = 1;
c_739557.num_elements = 2;
c_739557.elements = (object *)e_739561;
c_739557.elements[0] = ((closureN)self_734385)->elements[0];
c_739557.elements[1] = ((closureN)self_734385)->elements[1];

return_closcall3(data,  car(((closureN)self_734385)->elements[2]),  &c_739557, ((closureN)self_734385)->elements[0], r_733108);; 
}

static void __lambda_675(void *data, object self_734386, int argc, object *args) /* object self_734386, object r_733107 */
 {

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

static void __lambda_663(void *data, object self_734387, int argc, object *args) /* object self_734387, object r_733101 */
 {
 object r_733101 = args[0];
  
closureN_type c_739514;
object e_739521 [3];
c_739514.hdr.mark = gc_color_red;
 c_739514.hdr.grayed = 0;
c_739514.tag = closureN_tag;
 c_739514.fn = (function_type)__lambda_664;
c_739514.num_args = 1;
c_739514.num_elements = 3;
c_739514.elements = (object *)e_739521;
c_739514.elements[0] = ((closureN)self_734387)->elements[0];
c_739514.elements[1] = ((closureN)self_734387)->elements[1];
c_739514.elements[2] = ((closureN)self_734387)->elements[2];



return_direct_with_clo1(data,(closure)&c_739514,__lambda_664,  Cyc_set_cell(data, ((closureN)self_734387)->elements[2], r_733101));; 
}

static void __lambda_664(void *data, object self_734388, int argc, object *args) /* object self_734388, object r_733100 */
 {

  

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

static void __lambda_648(void *data, object _, int argc, object *args) /* closure _,object k_733085, object pred_73647_731772, object lis_73648_731773 */
 {
object k_733085 = args[0]; object pred_73647_731772 = args[1]; object lis_73648_731773 = args[2];
  Cyc_st_add(data, "srfi/1.sld:filter");

closureN_type c_739426;
object e_739501 [3];
c_739426.hdr.mark = gc_color_red;
 c_739426.hdr.grayed = 0;
c_739426.tag = closureN_tag;
 c_739426.fn = (function_type)__lambda_649;
c_739426.num_args = 1;
c_739426.num_elements = 3;
c_739426.elements = (object *)e_739501;
c_739426.elements[0] = k_733085;
c_739426.elements[1] = lis_73648_731773;
c_739426.elements[2] = pred_73647_731772;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_739426, primitive_procedure_127, pred_73647_731772, __glo_filter_srfi_1);; 
}

static void __lambda_649(void *data, object self_734344, int argc, object *args) /* object self_734344, object r_733086 */
 {

  
closureN_type c_739428;
object e_739499 [2];
c_739428.hdr.mark = gc_color_red;
 c_739428.hdr.grayed = 0;
c_739428.tag = closureN_tag;
 c_739428.fn = (function_type)__lambda_650;
c_739428.num_args = 1;
c_739428.num_elements = 2;
c_739428.elements = (object *)e_739499;
c_739428.elements[0] = ((closureN)self_734344)->elements[0];
c_739428.elements[1] = ((closureN)self_734344)->elements[2];

return_direct_with_clo1(data,(closure)&c_739428,__lambda_650,  ((closureN)self_734344)->elements[1]);; 
}

static void __lambda_650(void *data, object self_734345, int argc, object *args) /* object self_734345, object lis_73650_731774 */
 {
 object lis_73650_731774 = args[0];
  
closureN_type c_739430;
object e_739498 [3];
c_739430.hdr.mark = gc_color_red;
 c_739430.hdr.grayed = 0;
c_739430.tag = closureN_tag;
 c_739430.fn = (function_type)__lambda_651;
c_739430.num_args = 1;
c_739430.num_elements = 3;
c_739430.elements = (object *)e_739498;
c_739430.elements[0] = ((closureN)self_734345)->elements[0];
c_739430.elements[1] = lis_73650_731774;
c_739430.elements[2] = ((closureN)self_734345)->elements[1];

return_direct_with_clo1(data,(closure)&c_739430,__lambda_651,  boolean_f);; 
}

static void __lambda_651(void *data, object self_734346, int argc, object *args) /* object self_734346, object recur_73651_731775 */
 {
 object recur_73651_731775 = args[0];
  
closureN_type c_739432;
object e_739494 [3];
c_739432.hdr.mark = gc_color_red;
 c_739432.hdr.grayed = 0;
c_739432.tag = closureN_tag;
 c_739432.fn = (function_type)__lambda_1183;
c_739432.num_args = 1;
c_739432.num_elements = 3;
c_739432.elements = (object *)e_739494;
c_739432.elements[0] = ((closureN)self_734346)->elements[0];
c_739432.elements[1] = ((closureN)self_734346)->elements[1];
c_739432.elements[2] = ((closureN)self_734346)->elements[2];


pair_type local_739497; 
return_direct_with_clo1(data,(closure)&c_739432,__lambda_1183,  set_cell_as_expr(&local_739497, recur_73651_731775));; 
}

static void __lambda_1183(void *data, object self_734347, int argc, object *args) /* object self_734347, object recur_73651_731775 */
 {
 object recur_73651_731775 = args[0];
  
closureN_type c_739434;
object e_739447 [3];
c_739434.hdr.mark = gc_color_red;
 c_739434.hdr.grayed = 0;
c_739434.tag = closureN_tag;
 c_739434.fn = (function_type)__lambda_652;
c_739434.num_args = 1;
c_739434.num_elements = 3;
c_739434.elements = (object *)e_739447;
c_739434.elements[0] = ((closureN)self_734347)->elements[0];
c_739434.elements[1] = ((closureN)self_734347)->elements[1];
c_739434.elements[2] = recur_73651_731775;


closureN_type c_739448;
object e_739493 [2];
c_739448.hdr.mark = gc_color_red;
 c_739448.hdr.grayed = 0;
c_739448.tag = closureN_tag;
 c_739448.fn = (function_type)__lambda_654;
c_739448.num_args = 1;
c_739448.num_elements = 2;
c_739448.elements = (object *)e_739493;
c_739448.elements[0] = ((closureN)self_734347)->elements[2];
c_739448.elements[1] = recur_73651_731775;

return_direct_with_clo1(data,(closure)&c_739434,__lambda_652,  &c_739448);; 
}

static void __lambda_654(void *data, object self_734348, int argc, object *args) /* object self_734348, object k_733089, object lis_73652_731776 */
 {
 object k_733089 = args[0]; object lis_73652_731776 = args[1];
  
closureN_type c_739450;
object e_739492 [4];
c_739450.hdr.mark = gc_color_red;
 c_739450.hdr.grayed = 0;
c_739450.tag = closureN_tag;
 c_739450.fn = (function_type)__lambda_655;
c_739450.num_args = 1;
c_739450.num_elements = 4;
c_739450.elements = (object *)e_739492;
c_739450.elements[0] = k_733089;
c_739450.elements[1] = lis_73652_731776;
c_739450.elements[2] = ((closureN)self_734348)->elements[0];
c_739450.elements[3] = ((closureN)self_734348)->elements[1];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_739450, lis_73652_731776);; 
}

static void __lambda_655(void *data, object self_734349, int argc, object *args) /* object self_734349, object r_733090 */
 {
 object r_733090 = args[0];
  if( (boolean_f != r_733090) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734349)->elements[0], (((closure)  ((closureN)self_734349)->elements[0])->fn),  ((closureN)self_734349)->elements[1]);
} else { 
  
closureN_type c_739455;
object e_739485 [4];
c_739455.hdr.mark = gc_color_red;
 c_739455.hdr.grayed = 0;
c_739455.tag = closureN_tag;
 c_739455.fn = (function_type)__lambda_656;
c_739455.num_args = 2;
c_739455.num_elements = 4;
c_739455.elements = (object *)e_739485;
c_739455.elements[0] = ((closureN)self_734349)->elements[0];
c_739455.elements[1] = ((closureN)self_734349)->elements[1];
c_739455.elements[2] = ((closureN)self_734349)->elements[2];
c_739455.elements[3] = ((closureN)self_734349)->elements[3];





return_direct_with_clo2(data,(closure)&c_739455,__lambda_656,  Cyc_car(data, ((closureN)self_734349)->elements[1]), Cyc_cdr(data, ((closureN)self_734349)->elements[1]));}
;; 
}

static void __lambda_656(void *data, object self_734350, int argc, object *args) /* object self_734350, object head_73653_731777, object tail_73654_731778 */
 {
 object head_73653_731777 = args[0]; object tail_73654_731778 = args[1];
  
closureN_type c_739458;
object e_739484 [5];
c_739458.hdr.mark = gc_color_red;
 c_739458.hdr.grayed = 0;
c_739458.tag = closureN_tag;
 c_739458.fn = (function_type)__lambda_657;
c_739458.num_args = 1;
c_739458.num_elements = 5;
c_739458.elements = (object *)e_739484;
c_739458.elements[0] = head_73653_731777;
c_739458.elements[1] = ((closureN)self_734350)->elements[0];
c_739458.elements[2] = ((closureN)self_734350)->elements[1];
c_739458.elements[3] = ((closureN)self_734350)->elements[3];
c_739458.elements[4] = tail_73654_731778;

return_closcall2(data,  ((closureN)self_734350)->elements[2],  &c_739458, head_73653_731777);; 
}

static void __lambda_657(void *data, object self_734351, int argc, object *args) /* object self_734351, object r_733093 */
 {
 object r_733093 = args[0];
  if( (boolean_f != r_733093) ){ 
  


closureN_type c_739463;
object e_739476 [4];
c_739463.hdr.mark = gc_color_red;
 c_739463.hdr.grayed = 0;
c_739463.tag = closureN_tag;
 c_739463.fn = (function_type)__lambda_658;
c_739463.num_args = 1;
c_739463.num_elements = 4;
c_739463.elements = (object *)e_739476;
c_739463.elements[0] = ((closureN)self_734351)->elements[0];
c_739463.elements[1] = ((closureN)self_734351)->elements[1];
c_739463.elements[2] = ((closureN)self_734351)->elements[2];
c_739463.elements[3] = ((closureN)self_734351)->elements[4];

return_closcall2(data,  car(((closureN)self_734351)->elements[3]),  &c_739463, ((closureN)self_734351)->elements[4]);
} else { 
  

return_closcall2(data,  car(((closureN)self_734351)->elements[3]),  ((closureN)self_734351)->elements[1], ((closureN)self_734351)->elements[4]);}
;; 
}

static void __lambda_658(void *data, object self_734352, int argc, object *args) /* object self_734352, object new_91tail_73655_731779 */
 {
 object new_91tail_73655_731779 = args[0];
    
if( (boolean_f != Cyc_eq(((closureN)self_734352)->elements[3], new_91tail_73655_731779)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734352)->elements[1], (((closure)  ((closureN)self_734352)->elements[1])->fn),  ((closureN)self_734352)->elements[2]);
} else { 
  
pair_type local_739474; 
return_direct_with_clo1(data,  ((closureN)self_734352)->elements[1], (((closure)  ((closureN)self_734352)->elements[1])->fn),  set_pair_as_expr(&local_739474, ((closureN)self_734352)->elements[0], new_91tail_73655_731779));}
;; 
}

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



return_direct_with_clo1(data,(closure)&c_739436,__lambda_653,  Cyc_set_cell(data, ((closureN)self_734353)->elements[2], r_733088));; 
}

static void __lambda_653(void *data, object self_734354, int argc, object *args) /* object self_734354, object r_733087 */
 {

  

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

static void __lambda_626(void *data, object _, int argc, object *args) /* closure _,object k_733059, object f_73631_731758, object lis1_73632_731759, object lists_73633_731760_raw, ... */
 {
object k_733059 = args[0]; object f_73631_731758 = args[1]; object lis1_73632_731759 = args[2];
load_varargs(lists_73633_731760, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/1.sld:map-in-order");

closureN_type c_739286;
object e_739423 [4];
c_739286.hdr.mark = gc_color_red;
 c_739286.hdr.grayed = 0;
c_739286.tag = closureN_tag;
 c_739286.fn = (function_type)__lambda_627;
c_739286.num_args = 1;
c_739286.num_elements = 4;
c_739286.elements = (object *)e_739423;
c_739286.elements[0] = f_73631_731758;
c_739286.elements[1] = k_733059;
c_739286.elements[2] = lis1_73632_731759;
c_739286.elements[3] = lists_73633_731760;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_739286, primitive_procedure_127, f_73631_731758, __glo_map_91in_91order_srfi_1);; 
}

static void __lambda_627(void *data, object self_734321, int argc, object *args) /* object self_734321, object r_733060 */
 {

    
if( (boolean_f != Cyc_is_pair(((closureN)self_734321)->elements[3])) ){ 
  
closureN_type c_739291;
object e_739356 [2];
c_739291.hdr.mark = gc_color_red;
 c_739291.hdr.grayed = 0;
c_739291.tag = closureN_tag;
 c_739291.fn = (function_type)__lambda_628;
c_739291.num_args = 1;
c_739291.num_elements = 2;
c_739291.elements = (object *)e_739356;
c_739291.elements[0] = ((closureN)self_734321)->elements[0];
c_739291.elements[1] = ((closureN)self_734321)->elements[1];


pair_type local_739359; 
return_direct_with_clo1(data,(closure)&c_739291,__lambda_628,  set_pair_as_expr(&local_739359, ((closureN)self_734321)->elements[2], ((closureN)self_734321)->elements[3]));
} else { 
  
closureN_type c_739363;
object e_739421 [2];
c_739363.hdr.mark = gc_color_red;
 c_739363.hdr.grayed = 0;
c_739363.tag = closureN_tag;
 c_739363.fn = (function_type)__lambda_639;
c_739363.num_args = 1;
c_739363.num_elements = 2;
c_739363.elements = (object *)e_739421;
c_739363.elements[0] = ((closureN)self_734321)->elements[0];
c_739363.elements[1] = ((closureN)self_734321)->elements[1];

return_direct_with_clo1(data,(closure)&c_739363,__lambda_639,  ((closureN)self_734321)->elements[2]);}
;; 
}

static void __lambda_639(void *data, object self_734334, int argc, object *args) /* object self_734334, object lis_73642_731767 */
 {
 object lis_73642_731767 = args[0];
  
closureN_type c_739365;
object e_739420 [3];
c_739365.hdr.mark = gc_color_red;
 c_739365.hdr.grayed = 0;
c_739365.tag = closureN_tag;
 c_739365.fn = (function_type)__lambda_640;
c_739365.num_args = 1;
c_739365.num_elements = 3;
c_739365.elements = (object *)e_739420;
c_739365.elements[0] = ((closureN)self_734334)->elements[0];
c_739365.elements[1] = ((closureN)self_734334)->elements[1];
c_739365.elements[2] = lis_73642_731767;

return_direct_with_clo1(data,(closure)&c_739365,__lambda_640,  boolean_f);; 
}

static void __lambda_640(void *data, object self_734335, int argc, object *args) /* object self_734335, object recur_73643_731768 */
 {
 object recur_73643_731768 = args[0];
  
closureN_type c_739367;
object e_739416 [3];
c_739367.hdr.mark = gc_color_red;
 c_739367.hdr.grayed = 0;
c_739367.tag = closureN_tag;
 c_739367.fn = (function_type)__lambda_1182;
c_739367.num_args = 1;
c_739367.num_elements = 3;
c_739367.elements = (object *)e_739416;
c_739367.elements[0] = ((closureN)self_734335)->elements[0];
c_739367.elements[1] = ((closureN)self_734335)->elements[1];
c_739367.elements[2] = ((closureN)self_734335)->elements[2];


pair_type local_739419; 
return_direct_with_clo1(data,(closure)&c_739367,__lambda_1182,  set_cell_as_expr(&local_739419, recur_73643_731768));; 
}

static void __lambda_1182(void *data, object self_734336, int argc, object *args) /* object self_734336, object recur_73643_731768 */
 {
 object recur_73643_731768 = args[0];
  
closureN_type c_739369;
object e_739382 [3];
c_739369.hdr.mark = gc_color_red;
 c_739369.hdr.grayed = 0;
c_739369.tag = closureN_tag;
 c_739369.fn = (function_type)__lambda_641;
c_739369.num_args = 1;
c_739369.num_elements = 3;
c_739369.elements = (object *)e_739382;
c_739369.elements[0] = ((closureN)self_734336)->elements[1];
c_739369.elements[1] = ((closureN)self_734336)->elements[2];
c_739369.elements[2] = recur_73643_731768;


closureN_type c_739383;
object e_739415 [2];
c_739383.hdr.mark = gc_color_red;
 c_739383.hdr.grayed = 0;
c_739383.tag = closureN_tag;
 c_739383.fn = (function_type)__lambda_643;
c_739383.num_args = 1;
c_739383.num_elements = 2;
c_739383.elements = (object *)e_739415;
c_739383.elements[0] = ((closureN)self_734336)->elements[0];
c_739383.elements[1] = recur_73643_731768;

return_direct_with_clo1(data,(closure)&c_739369,__lambda_641,  &c_739383);; 
}

static void __lambda_643(void *data, object self_734337, int argc, object *args) /* object self_734337, object k_733075, object lis_73644_731769 */
 {
 object k_733075 = args[0]; object lis_73644_731769 = args[1];
  
closureN_type c_739385;
object e_739414 [4];
c_739385.hdr.mark = gc_color_red;
 c_739385.hdr.grayed = 0;
c_739385.tag = closureN_tag;
 c_739385.fn = (function_type)__lambda_644;
c_739385.num_args = 1;
c_739385.num_elements = 4;
c_739385.elements = (object *)e_739414;
c_739385.elements[0] = ((closureN)self_734337)->elements[0];
c_739385.elements[1] = k_733075;
c_739385.elements[2] = lis_73644_731769;
c_739385.elements[3] = ((closureN)self_734337)->elements[1];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_739385, lis_73644_731769);; 
}

static void __lambda_644(void *data, object self_734338, int argc, object *args) /* object self_734338, object r_733076 */
 {
 object r_733076 = args[0];
  if( (boolean_f != r_733076) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734338)->elements[1], (((closure)  ((closureN)self_734338)->elements[1])->fn),  ((closureN)self_734338)->elements[2]);
} else { 
  
closureN_type c_739391;
object e_739410 [3];
c_739391.hdr.mark = gc_color_red;
 c_739391.hdr.grayed = 0;
c_739391.tag = closureN_tag;
 c_739391.fn = (function_type)__lambda_645;
c_739391.num_args = 1;
c_739391.num_elements = 3;
c_739391.elements = (object *)e_739410;
c_739391.elements[0] = ((closureN)self_734338)->elements[1];
c_739391.elements[1] = ((closureN)self_734338)->elements[2];
c_739391.elements[2] = ((closureN)self_734338)->elements[3];



return_closcall2(data,  ((closureN)self_734338)->elements[0],  &c_739391, Cyc_car(data, ((closureN)self_734338)->elements[2]));}
;; 
}

static void __lambda_645(void *data, object self_734339, int argc, object *args) /* object self_734339, object r_733078 */
 {
 object r_733078 = args[0];
  
closureN_type c_739393;
object e_739406 [2];
c_739393.hdr.mark = gc_color_red;
 c_739393.hdr.grayed = 0;
c_739393.tag = closureN_tag;
 c_739393.fn = (function_type)__lambda_646;
c_739393.num_args = 2;
c_739393.num_elements = 2;
c_739393.elements = (object *)e_739406;
c_739393.elements[0] = ((closureN)self_734339)->elements[0];
c_739393.elements[1] = ((closureN)self_734339)->elements[2];



return_direct_with_clo2(data,(closure)&c_739393,__lambda_646,  Cyc_cdr(data, ((closureN)self_734339)->elements[1]), r_733078);; 
}

static void __lambda_646(void *data, object self_734340, int argc, object *args) /* object self_734340, object tail_73645_731770, object x_73646_731771 */
 {
 object tail_73645_731770 = args[0]; object x_73646_731771 = args[1];
  


closureN_type c_739398;
object e_739405 [2];
c_739398.hdr.mark = gc_color_red;
 c_739398.hdr.grayed = 0;
c_739398.tag = closureN_tag;
 c_739398.fn = (function_type)__lambda_647;
c_739398.num_args = 1;
c_739398.num_elements = 2;
c_739398.elements = (object *)e_739405;
c_739398.elements[0] = ((closureN)self_734340)->elements[0];
c_739398.elements[1] = x_73646_731771;

return_closcall2(data,  car(((closureN)self_734340)->elements[1]),  &c_739398, tail_73645_731770);; 
}

static void __lambda_647(void *data, object self_734341, int argc, object *args) /* object self_734341, object r_733079 */
 {
 object r_733079 = args[0];
  
pair_type local_739403; 
return_direct_with_clo1(data,  ((closureN)self_734341)->elements[0], (((closure)  ((closureN)self_734341)->elements[0])->fn),  set_pair_as_expr(&local_739403, ((closureN)self_734341)->elements[1], r_733079));; 
}

static void __lambda_641(void *data, object self_734342, int argc, object *args) /* object self_734342, object r_733074 */
 {
 object r_733074 = args[0];
  
closureN_type c_739371;
object e_739378 [3];
c_739371.hdr.mark = gc_color_red;
 c_739371.hdr.grayed = 0;
c_739371.tag = closureN_tag;
 c_739371.fn = (function_type)__lambda_642;
c_739371.num_args = 1;
c_739371.num_elements = 3;
c_739371.elements = (object *)e_739378;
c_739371.elements[0] = ((closureN)self_734342)->elements[0];
c_739371.elements[1] = ((closureN)self_734342)->elements[1];
c_739371.elements[2] = ((closureN)self_734342)->elements[2];



return_direct_with_clo1(data,(closure)&c_739371,__lambda_642,  Cyc_set_cell(data, ((closureN)self_734342)->elements[2], r_733074));; 
}

static void __lambda_642(void *data, object self_734343, int argc, object *args) /* object self_734343, object r_733073 */
 {

  

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

static void __lambda_628(void *data, object self_734322, int argc, object *args) /* object self_734322, object lists_73635_731761 */
 {
 object lists_73635_731761 = args[0];
  
closureN_type c_739293;
object e_739355 [3];
c_739293.hdr.mark = gc_color_red;
 c_739293.hdr.grayed = 0;
c_739293.tag = closureN_tag;
 c_739293.fn = (function_type)__lambda_629;
c_739293.num_args = 1;
c_739293.num_elements = 3;
c_739293.elements = (object *)e_739355;
c_739293.elements[0] = ((closureN)self_734322)->elements[0];
c_739293.elements[1] = ((closureN)self_734322)->elements[1];
c_739293.elements[2] = lists_73635_731761;

return_direct_with_clo1(data,(closure)&c_739293,__lambda_629,  boolean_f);; 
}

static void __lambda_629(void *data, object self_734323, int argc, object *args) /* object self_734323, object recur_73636_731762 */
 {
 object recur_73636_731762 = args[0];
  
closureN_type c_739295;
object e_739351 [3];
c_739295.hdr.mark = gc_color_red;
 c_739295.hdr.grayed = 0;
c_739295.tag = closureN_tag;
 c_739295.fn = (function_type)__lambda_1181;
c_739295.num_args = 1;
c_739295.num_elements = 3;
c_739295.elements = (object *)e_739351;
c_739295.elements[0] = ((closureN)self_734323)->elements[0];
c_739295.elements[1] = ((closureN)self_734323)->elements[1];
c_739295.elements[2] = ((closureN)self_734323)->elements[2];


pair_type local_739354; 
return_direct_with_clo1(data,(closure)&c_739295,__lambda_1181,  set_cell_as_expr(&local_739354, recur_73636_731762));; 
}

static void __lambda_1181(void *data, object self_734324, int argc, object *args) /* object self_734324, object recur_73636_731762 */
 {
 object recur_73636_731762 = args[0];
  
closureN_type c_739297;
object e_739310 [3];
c_739297.hdr.mark = gc_color_red;
 c_739297.hdr.grayed = 0;
c_739297.tag = closureN_tag;
 c_739297.fn = (function_type)__lambda_630;
c_739297.num_args = 1;
c_739297.num_elements = 3;
c_739297.elements = (object *)e_739310;
c_739297.elements[0] = ((closureN)self_734324)->elements[1];
c_739297.elements[1] = ((closureN)self_734324)->elements[2];
c_739297.elements[2] = recur_73636_731762;


closureN_type c_739311;
object e_739350 [2];
c_739311.hdr.mark = gc_color_red;
 c_739311.hdr.grayed = 0;
c_739311.tag = closureN_tag;
 c_739311.fn = (function_type)__lambda_632;
c_739311.num_args = 1;
c_739311.num_elements = 2;
c_739311.elements = (object *)e_739350;
c_739311.elements[0] = ((closureN)self_734324)->elements[0];
c_739311.elements[1] = recur_73636_731762;

return_direct_with_clo1(data,(closure)&c_739297,__lambda_630,  &c_739311);; 
}

static void __lambda_632(void *data, object self_734325, int argc, object *args) /* object self_734325, object k_733065, object lists_73637_731763 */
 {
 object k_733065 = args[0]; object lists_73637_731763 = args[1];
  
closureN_type c_739313;
object e_739345 [3];
c_739313.hdr.mark = gc_color_red;
 c_739313.hdr.grayed = 0;
c_739313.tag = closureN_tag;
 c_739313.fn = (function_type)__lambda_633;
c_739313.num_args = 1;
c_739313.num_elements = 3;
c_739313.elements = (object *)e_739345;
c_739313.elements[0] = ((closureN)self_734325)->elements[0];
c_739313.elements[1] = k_733065;
c_739313.elements[2] = ((closureN)self_734325)->elements[1];


closureN_type c_739346;
object e_739349 [1];
c_739346.hdr.mark = gc_color_red;
 c_739346.hdr.grayed = 0;
c_739346.tag = closureN_tag;
 c_739346.fn = (function_type)__lambda_638;
c_739346.num_args = 0;
c_739346.num_elements = 1;
c_739346.elements = (object *)e_739349;
c_739346.elements[0] = lists_73637_731763;

return_direct_with_clo1(data,(closure)&c_739313,__lambda_633,  &c_739346);; 
}

static void __lambda_638(void *data, object self_734326, int argc, object *args) /* object self_734326, object k_733072 */
 {
 object k_733072 = args[0];
  return_direct_with_clo2(data,  __glo__75cars_87cdrs_srfi_1, (((closure)  __glo__75cars_87cdrs_srfi_1)->fn),  k_733072, ((closureN)self_734326)->elements[0]);; 
}

static void __lambda_633(void *data, object self_734327, int argc, object *args) /* object self_734327, object r_733066 */
 {
 object r_733066 = args[0];
  
closureN_type c_739315;
object e_739319 [2];
c_739315.hdr.mark = gc_color_red;
 c_739315.hdr.grayed = 0;
c_739315.tag = closureN_tag;
 c_739315.fn = (function_type)__lambda_634;
c_739315.num_args = 1;
c_739315.num_elements = 2;
c_739315.elements = (object *)e_739319;
c_739315.elements[0] = ((closureN)self_734327)->elements[1];
c_739315.elements[1] = r_733066;


closureN_type c_739320;
object e_739344 [2];
c_739320.hdr.mark = gc_color_red;
 c_739320.hdr.grayed = 0;
c_739320.tag = closureN_tag;
 c_739320.fn = (function_type)__lambda_635;
c_739320.num_args = 2;
c_739320.num_elements = 2;
c_739320.elements = (object *)e_739344;
c_739320.elements[0] = ((closureN)self_734327)->elements[0];
c_739320.elements[1] = ((closureN)self_734327)->elements[2];

return_direct_with_clo1(data,(closure)&c_739315,__lambda_634,  &c_739320);; 
}

static void __lambda_635(void *data, object self_734328, int argc, object *args) /* object self_734328, object k_733068, object cars_73638_731764, object cdrs_73639_731765 */
 {
 object k_733068 = args[0]; object cars_73638_731764 = args[1]; object cdrs_73639_731765 = args[2];
    
if( (boolean_f != Cyc_is_pair(cars_73638_731764)) ){ 
  
closureN_type c_739324;
object e_739338 [3];
c_739324.hdr.mark = gc_color_red;
 c_739324.hdr.grayed = 0;
c_739324.tag = closureN_tag;
 c_739324.fn = (function_type)__lambda_636;
c_739324.num_args = 1;
c_739324.num_elements = 3;
c_739324.elements = (object *)e_739338;
c_739324.elements[0] = cdrs_73639_731765;
c_739324.elements[1] = k_733068;
c_739324.elements[2] = ((closureN)self_734328)->elements[1];


object c_739341 = apply(data,(closure)&c_739324,((closureN)self_734328)->elements[0], cars_73638_731764);
return_closcall1(data,(closure)&c_739324,  c_739341);
} else { 
  return_direct_with_clo1(data,  k_733068, (((closure)  k_733068)->fn),  NULL);}
;; 
}

static void __lambda_636(void *data, object self_734329, int argc, object *args) /* object self_734329, object x_73640_731766 */
 {
 object x_73640_731766 = args[0];
  


closureN_type c_739329;
object e_739336 [2];
c_739329.hdr.mark = gc_color_red;
 c_739329.hdr.grayed = 0;
c_739329.tag = closureN_tag;
 c_739329.fn = (function_type)__lambda_637;
c_739329.num_args = 1;
c_739329.num_elements = 2;
c_739329.elements = (object *)e_739336;
c_739329.elements[0] = ((closureN)self_734329)->elements[1];
c_739329.elements[1] = x_73640_731766;

return_closcall2(data,  car(((closureN)self_734329)->elements[2]),  &c_739329, ((closureN)self_734329)->elements[0]);; 
}

static void __lambda_637(void *data, object self_734330, int argc, object *args) /* object self_734330, object r_733071 */
 {
 object r_733071 = args[0];
  
pair_type local_739334; 
return_direct_with_clo1(data,  ((closureN)self_734330)->elements[0], (((closure)  ((closureN)self_734330)->elements[0])->fn),  set_pair_as_expr(&local_739334, ((closureN)self_734330)->elements[1], r_733071));; 
}

static void __lambda_634(void *data, object self_734331, int argc, object *args) /* object self_734331, object r_733067 */
 {
 object r_733067 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734331)->elements[0], ((closureN)self_734331)->elements[1], r_733067);; 
}

static void __lambda_630(void *data, object self_734332, int argc, object *args) /* object self_734332, object r_733064 */
 {
 object r_733064 = args[0];
  
closureN_type c_739299;
object e_739306 [3];
c_739299.hdr.mark = gc_color_red;
 c_739299.hdr.grayed = 0;
c_739299.tag = closureN_tag;
 c_739299.fn = (function_type)__lambda_631;
c_739299.num_args = 1;
c_739299.num_elements = 3;
c_739299.elements = (object *)e_739306;
c_739299.elements[0] = ((closureN)self_734332)->elements[0];
c_739299.elements[1] = ((closureN)self_734332)->elements[1];
c_739299.elements[2] = ((closureN)self_734332)->elements[2];



return_direct_with_clo1(data,(closure)&c_739299,__lambda_631,  Cyc_set_cell(data, ((closureN)self_734332)->elements[2], r_733064));; 
}

static void __lambda_631(void *data, object self_734333, int argc, object *args) /* object self_734333, object r_733063 */
 {

  

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

static void __lambda_603(void *data, object _, int argc, object *args) /* closure _,object k_733035, object f_73603_731742, object lis1_73604_731743, object lists_73605_731744_raw, ... */
 {
object k_733035 = args[0]; object f_73603_731742 = args[1]; object lis1_73604_731743 = args[2];
load_varargs(lists_73605_731744, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/1.sld:filter-map");

closureN_type c_739134;
object e_739283 [4];
c_739134.hdr.mark = gc_color_red;
 c_739134.hdr.grayed = 0;
c_739134.tag = closureN_tag;
 c_739134.fn = (function_type)__lambda_604;
c_739134.num_args = 1;
c_739134.num_elements = 4;
c_739134.elements = (object *)e_739283;
c_739134.elements[0] = f_73603_731742;
c_739134.elements[1] = k_733035;
c_739134.elements[2] = lis1_73604_731743;
c_739134.elements[3] = lists_73605_731744;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_739134, primitive_procedure_127, f_73603_731742, __glo_filter_91map_srfi_1);; 
}

static void __lambda_604(void *data, object self_734297, int argc, object *args) /* object self_734297, object r_733036 */
 {

    
if( (boolean_f != Cyc_is_pair(((closureN)self_734297)->elements[3])) ){ 
  
closureN_type c_739139;
object e_739213 [2];
c_739139.hdr.mark = gc_color_red;
 c_739139.hdr.grayed = 0;
c_739139.tag = closureN_tag;
 c_739139.fn = (function_type)__lambda_605;
c_739139.num_args = 1;
c_739139.num_elements = 2;
c_739139.elements = (object *)e_739213;
c_739139.elements[0] = ((closureN)self_734297)->elements[0];
c_739139.elements[1] = ((closureN)self_734297)->elements[1];


pair_type local_739216; 
return_direct_with_clo1(data,(closure)&c_739139,__lambda_605,  set_pair_as_expr(&local_739216, ((closureN)self_734297)->elements[2], ((closureN)self_734297)->elements[3]));
} else { 
  
closureN_type c_739220;
object e_739281 [2];
c_739220.hdr.mark = gc_color_red;
 c_739220.hdr.grayed = 0;
c_739220.tag = closureN_tag;
 c_739220.fn = (function_type)__lambda_617;
c_739220.num_args = 1;
c_739220.num_elements = 2;
c_739220.elements = (object *)e_739281;
c_739220.elements[0] = ((closureN)self_734297)->elements[0];
c_739220.elements[1] = ((closureN)self_734297)->elements[1];

return_direct_with_clo1(data,(closure)&c_739220,__lambda_617,  ((closureN)self_734297)->elements[2]);}
;; 
}

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

return_direct_with_clo1(data,(closure)&c_739222,__lambda_618,  boolean_f);; 
}

static void __lambda_618(void *data, object self_734312, int argc, object *args) /* object self_734312, object recur_73621_731753 */
 {
 object recur_73621_731753 = args[0];
  
closureN_type c_739224;
object e_739276 [3];
c_739224.hdr.mark = gc_color_red;
 c_739224.hdr.grayed = 0;
c_739224.tag = closureN_tag;
 c_739224.fn = (function_type)__lambda_1180;
c_739224.num_args = 1;
c_739224.num_elements = 3;
c_739224.elements = (object *)e_739276;
c_739224.elements[0] = ((closureN)self_734312)->elements[0];
c_739224.elements[1] = ((closureN)self_734312)->elements[1];
c_739224.elements[2] = ((closureN)self_734312)->elements[2];


pair_type local_739279; 
return_direct_with_clo1(data,(closure)&c_739224,__lambda_1180,  set_cell_as_expr(&local_739279, recur_73621_731753));; 
}

static void __lambda_1180(void *data, object self_734313, int argc, object *args) /* object self_734313, object recur_73621_731753 */
 {
 object recur_73621_731753 = args[0];
  
closureN_type c_739226;
object e_739239 [3];
c_739226.hdr.mark = gc_color_red;
 c_739226.hdr.grayed = 0;
c_739226.tag = closureN_tag;
 c_739226.fn = (function_type)__lambda_619;
c_739226.num_args = 1;
c_739226.num_elements = 3;
c_739226.elements = (object *)e_739239;
c_739226.elements[0] = ((closureN)self_734313)->elements[1];
c_739226.elements[1] = ((closureN)self_734313)->elements[2];
c_739226.elements[2] = recur_73621_731753;


closureN_type c_739240;
object e_739275 [2];
c_739240.hdr.mark = gc_color_red;
 c_739240.hdr.grayed = 0;
c_739240.tag = closureN_tag;
 c_739240.fn = (function_type)__lambda_621;
c_739240.num_args = 1;
c_739240.num_elements = 2;
c_739240.elements = (object *)e_739275;
c_739240.elements[0] = ((closureN)self_734313)->elements[0];
c_739240.elements[1] = recur_73621_731753;

return_direct_with_clo1(data,(closure)&c_739226,__lambda_619,  &c_739240);; 
}

static void __lambda_621(void *data, object self_734314, int argc, object *args) /* object self_734314, object k_733051, object lis_73622_731754 */
 {
 object k_733051 = args[0]; object lis_73622_731754 = args[1];
  
closureN_type c_739242;
object e_739274 [4];
c_739242.hdr.mark = gc_color_red;
 c_739242.hdr.grayed = 0;
c_739242.tag = closureN_tag;
 c_739242.fn = (function_type)__lambda_622;
c_739242.num_args = 1;
c_739242.num_elements = 4;
c_739242.elements = (object *)e_739274;
c_739242.elements[0] = ((closureN)self_734314)->elements[0];
c_739242.elements[1] = k_733051;
c_739242.elements[2] = lis_73622_731754;
c_739242.elements[3] = ((closureN)self_734314)->elements[1];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_739242, lis_73622_731754);; 
}

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


closureN_type c_739250;
object e_739270 [3];
c_739250.hdr.mark = gc_color_red;
 c_739250.hdr.grayed = 0;
c_739250.tag = closureN_tag;
 c_739250.fn = (function_type)__lambda_623;
c_739250.num_args = 1;
c_739250.num_elements = 3;
c_739250.elements = (object *)e_739270;
c_739250.elements[0] = ((closureN)self_734315)->elements[0];
c_739250.elements[1] = ((closureN)self_734315)->elements[1];
c_739250.elements[2] = ((closureN)self_734315)->elements[2];



return_closcall2(data,  car(((closureN)self_734315)->elements[3]),  &c_739250, Cyc_cdr(data, ((closureN)self_734315)->elements[2]));}
;; 
}

static void __lambda_623(void *data, object self_734316, int argc, object *args) /* object self_734316, object tail_73623_731755 */
 {
 object tail_73623_731755 = args[0];
  
closureN_type c_739253;
object e_739266 [2];
c_739253.hdr.mark = gc_color_red;
 c_739253.hdr.grayed = 0;
c_739253.tag = closureN_tag;
 c_739253.fn = (function_type)__lambda_624;
c_739253.num_args = 1;
c_739253.num_elements = 2;
c_739253.elements = (object *)e_739266;
c_739253.elements[0] = ((closureN)self_734316)->elements[1];
c_739253.elements[1] = tail_73623_731755;



return_closcall2(data,  ((closureN)self_734316)->elements[0],  &c_739253, Cyc_car(data, ((closureN)self_734316)->elements[2]));; 
}

static void __lambda_624(void *data, object self_734317, int argc, object *args) /* object self_734317, object tmp_73626_73628_731756 */
 {
 object tmp_73626_73628_731756 = args[0];
  if( (boolean_f != tmp_73626_73628_731756) ){ 
  
closureN_type c_739255;
object e_739262 [2];
c_739255.hdr.mark = gc_color_red;
 c_739255.hdr.grayed = 0;
c_739255.tag = closureN_tag;
 c_739255.fn = (function_type)__lambda_625;
c_739255.num_args = 1;
c_739255.num_elements = 2;
c_739255.elements = (object *)e_739262;
c_739255.elements[0] = ((closureN)self_734317)->elements[0];
c_739255.elements[1] = ((closureN)self_734317)->elements[1];

return_direct_with_clo1(data,(closure)&c_739255,__lambda_625,  tmp_73626_73628_731756);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734317)->elements[0], (((closure)  ((closureN)self_734317)->elements[0])->fn),  ((closureN)self_734317)->elements[1]);}
;; 
}

static void __lambda_625(void *data, object self_734318, int argc, object *args) /* object self_734318, object x_73629_731757 */
 {
 object x_73629_731757 = args[0];
  
pair_type local_739260; 
return_direct_with_clo1(data,  ((closureN)self_734318)->elements[0], (((closure)  ((closureN)self_734318)->elements[0])->fn),  set_pair_as_expr(&local_739260, x_73629_731757, ((closureN)self_734318)->elements[1]));; 
}

static void __lambda_619(void *data, object self_734319, int argc, object *args) /* object self_734319, object r_733050 */
 {
 object r_733050 = args[0];
  
closureN_type c_739228;
object e_739235 [3];
c_739228.hdr.mark = gc_color_red;
 c_739228.hdr.grayed = 0;
c_739228.tag = closureN_tag;
 c_739228.fn = (function_type)__lambda_620;
c_739228.num_args = 1;
c_739228.num_elements = 3;
c_739228.elements = (object *)e_739235;
c_739228.elements[0] = ((closureN)self_734319)->elements[0];
c_739228.elements[1] = ((closureN)self_734319)->elements[1];
c_739228.elements[2] = ((closureN)self_734319)->elements[2];



return_direct_with_clo1(data,(closure)&c_739228,__lambda_620,  Cyc_set_cell(data, ((closureN)self_734319)->elements[2], r_733050));; 
}

static void __lambda_620(void *data, object self_734320, int argc, object *args) /* object self_734320, object r_733049 */
 {

  

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

static void __lambda_605(void *data, object self_734298, int argc, object *args) /* object self_734298, object lists_73607_731745 */
 {
 object lists_73607_731745 = args[0];
  
closureN_type c_739141;
object e_739212 [3];
c_739141.hdr.mark = gc_color_red;
 c_739141.hdr.grayed = 0;
c_739141.tag = closureN_tag;
 c_739141.fn = (function_type)__lambda_606;
c_739141.num_args = 1;
c_739141.num_elements = 3;
c_739141.elements = (object *)e_739212;
c_739141.elements[0] = ((closureN)self_734298)->elements[0];
c_739141.elements[1] = ((closureN)self_734298)->elements[1];
c_739141.elements[2] = lists_73607_731745;

return_direct_with_clo1(data,(closure)&c_739141,__lambda_606,  boolean_f);; 
}

static void __lambda_606(void *data, object self_734299, int argc, object *args) /* object self_734299, object recur_73608_731746 */
 {
 object recur_73608_731746 = args[0];
  
closureN_type c_739143;
object e_739208 [3];
c_739143.hdr.mark = gc_color_red;
 c_739143.hdr.grayed = 0;
c_739143.tag = closureN_tag;
 c_739143.fn = (function_type)__lambda_1179;
c_739143.num_args = 1;
c_739143.num_elements = 3;
c_739143.elements = (object *)e_739208;
c_739143.elements[0] = ((closureN)self_734299)->elements[0];
c_739143.elements[1] = ((closureN)self_734299)->elements[1];
c_739143.elements[2] = ((closureN)self_734299)->elements[2];


pair_type local_739211; 
return_direct_with_clo1(data,(closure)&c_739143,__lambda_1179,  set_cell_as_expr(&local_739211, recur_73608_731746));; 
}

static void __lambda_1179(void *data, object self_734300, int argc, object *args) /* object self_734300, object recur_73608_731746 */
 {
 object recur_73608_731746 = args[0];
  
closureN_type c_739145;
object e_739158 [3];
c_739145.hdr.mark = gc_color_red;
 c_739145.hdr.grayed = 0;
c_739145.tag = closureN_tag;
 c_739145.fn = (function_type)__lambda_607;
c_739145.num_args = 1;
c_739145.num_elements = 3;
c_739145.elements = (object *)e_739158;
c_739145.elements[0] = ((closureN)self_734300)->elements[1];
c_739145.elements[1] = ((closureN)self_734300)->elements[2];
c_739145.elements[2] = recur_73608_731746;


closureN_type c_739159;
object e_739207 [2];
c_739159.hdr.mark = gc_color_red;
 c_739159.hdr.grayed = 0;
c_739159.tag = closureN_tag;
 c_739159.fn = (function_type)__lambda_609;
c_739159.num_args = 1;
c_739159.num_elements = 2;
c_739159.elements = (object *)e_739207;
c_739159.elements[0] = ((closureN)self_734300)->elements[0];
c_739159.elements[1] = recur_73608_731746;

return_direct_with_clo1(data,(closure)&c_739145,__lambda_607,  &c_739159);; 
}

static void __lambda_609(void *data, object self_734301, int argc, object *args) /* object self_734301, object k_733041, object lists_73609_731747 */
 {
 object k_733041 = args[0]; object lists_73609_731747 = args[1];
  
closureN_type c_739161;
object e_739202 [3];
c_739161.hdr.mark = gc_color_red;
 c_739161.hdr.grayed = 0;
c_739161.tag = closureN_tag;
 c_739161.fn = (function_type)__lambda_610;
c_739161.num_args = 1;
c_739161.num_elements = 3;
c_739161.elements = (object *)e_739202;
c_739161.elements[0] = ((closureN)self_734301)->elements[0];
c_739161.elements[1] = k_733041;
c_739161.elements[2] = ((closureN)self_734301)->elements[1];


closureN_type c_739203;
object e_739206 [1];
c_739203.hdr.mark = gc_color_red;
 c_739203.hdr.grayed = 0;
c_739203.tag = closureN_tag;
 c_739203.fn = (function_type)__lambda_616;
c_739203.num_args = 0;
c_739203.num_elements = 1;
c_739203.elements = (object *)e_739206;
c_739203.elements[0] = lists_73609_731747;

return_direct_with_clo1(data,(closure)&c_739161,__lambda_610,  &c_739203);; 
}

static void __lambda_616(void *data, object self_734302, int argc, object *args) /* object self_734302, object k_733048 */
 {
 object k_733048 = args[0];
  return_direct_with_clo2(data,  __glo__75cars_87cdrs_srfi_1, (((closure)  __glo__75cars_87cdrs_srfi_1)->fn),  k_733048, ((closureN)self_734302)->elements[0]);; 
}

static void __lambda_610(void *data, object self_734303, int argc, object *args) /* object self_734303, object r_733042 */
 {
 object r_733042 = args[0];
  
closureN_type c_739163;
object e_739167 [2];
c_739163.hdr.mark = gc_color_red;
 c_739163.hdr.grayed = 0;
c_739163.tag = closureN_tag;
 c_739163.fn = (function_type)__lambda_611;
c_739163.num_args = 1;
c_739163.num_elements = 2;
c_739163.elements = (object *)e_739167;
c_739163.elements[0] = ((closureN)self_734303)->elements[1];
c_739163.elements[1] = r_733042;


closureN_type c_739168;
object e_739201 [2];
c_739168.hdr.mark = gc_color_red;
 c_739168.hdr.grayed = 0;
c_739168.tag = closureN_tag;
 c_739168.fn = (function_type)__lambda_612;
c_739168.num_args = 2;
c_739168.num_elements = 2;
c_739168.elements = (object *)e_739201;
c_739168.elements[0] = ((closureN)self_734303)->elements[0];
c_739168.elements[1] = ((closureN)self_734303)->elements[2];

return_direct_with_clo1(data,(closure)&c_739163,__lambda_611,  &c_739168);; 
}

static void __lambda_612(void *data, object self_734304, int argc, object *args) /* object self_734304, object k_733044, object cars_73610_731748, object cdrs_73611_731749 */
 {
 object k_733044 = args[0]; object cars_73610_731748 = args[1]; object cdrs_73611_731749 = args[2];
    
if( (boolean_f != Cyc_is_pair(cars_73610_731748)) ){ 
  
closureN_type c_739172;
object e_739195 [3];
c_739172.hdr.mark = gc_color_red;
 c_739172.hdr.grayed = 0;
c_739172.tag = closureN_tag;
 c_739172.fn = (function_type)__lambda_613;
c_739172.num_args = 1;
c_739172.num_elements = 3;
c_739172.elements = (object *)e_739195;
c_739172.elements[0] = cdrs_73611_731749;
c_739172.elements[1] = k_733044;
c_739172.elements[2] = ((closureN)self_734304)->elements[1];


object c_739198 = apply(data,(closure)&c_739172,((closureN)self_734304)->elements[0], cars_73610_731748);
return_closcall1(data,(closure)&c_739172,  c_739198);
} else { 
  return_direct_with_clo1(data,  k_733044, (((closure)  k_733044)->fn),  NULL);}
;; 
}

static void __lambda_613(void *data, object self_734305, int argc, object *args) /* object self_734305, object tmp_73614_73616_731750 */
 {
 object tmp_73614_73616_731750 = args[0];
  if( (boolean_f != tmp_73614_73616_731750) ){ 
  
closureN_type c_739174;
object e_739188 [3];
c_739174.hdr.mark = gc_color_red;
 c_739174.hdr.grayed = 0;
c_739174.tag = closureN_tag;
 c_739174.fn = (function_type)__lambda_614;
c_739174.num_args = 1;
c_739174.num_elements = 3;
c_739174.elements = (object *)e_739188;
c_739174.elements[0] = ((closureN)self_734305)->elements[0];
c_739174.elements[1] = ((closureN)self_734305)->elements[1];
c_739174.elements[2] = ((closureN)self_734305)->elements[2];

return_direct_with_clo1(data,(closure)&c_739174,__lambda_614,  tmp_73614_73616_731750);
} else { 
  

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

static void __lambda_614(void *data, object self_734306, int argc, object *args) /* object self_734306, object x_73617_731751 */
 {
 object x_73617_731751 = args[0];
  


closureN_type c_739179;
object e_739186 [2];
c_739179.hdr.mark = gc_color_red;
 c_739179.hdr.grayed = 0;
c_739179.tag = closureN_tag;
 c_739179.fn = (function_type)__lambda_615;
c_739179.num_args = 1;
c_739179.num_elements = 2;
c_739179.elements = (object *)e_739186;
c_739179.elements[0] = ((closureN)self_734306)->elements[1];
c_739179.elements[1] = x_73617_731751;

return_closcall2(data,  car(((closureN)self_734306)->elements[2]),  &c_739179, ((closureN)self_734306)->elements[0]);; 
}

static void __lambda_615(void *data, object self_734307, int argc, object *args) /* object self_734307, object r_733047 */
 {
 object r_733047 = args[0];
  
pair_type local_739184; 
return_direct_with_clo1(data,  ((closureN)self_734307)->elements[0], (((closure)  ((closureN)self_734307)->elements[0])->fn),  set_pair_as_expr(&local_739184, ((closureN)self_734307)->elements[1], r_733047));; 
}

static void __lambda_611(void *data, object self_734308, int argc, object *args) /* object self_734308, object r_733043 */
 {
 object r_733043 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734308)->elements[0], ((closureN)self_734308)->elements[1], r_733043);; 
}

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



return_direct_with_clo1(data,(closure)&c_739147,__lambda_608,  Cyc_set_cell(data, ((closureN)self_734309)->elements[2], r_733040));; 
}

static void __lambda_608(void *data, object self_734310, int argc, object *args) /* object self_734310, object r_733039 */
 {

  

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

static void __lambda_581(void *data, object _, int argc, object *args) /* closure _,object k_733012, object f_73591_731731, object lis1_73592_731732, object lists_73593_731733_raw, ... */
 {
object k_733012 = args[0]; object f_73591_731731 = args[1]; object lis1_73592_731732 = args[2];
load_varargs(lists_73593_731733, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/1.sld:map!");

closureN_type c_739011;
object e_739131 [4];
c_739011.hdr.mark = gc_color_red;
 c_739011.hdr.grayed = 0;
c_739011.tag = closureN_tag;
 c_739011.fn = (function_type)__lambda_582;
c_739011.num_args = 1;
c_739011.num_elements = 4;
c_739011.elements = (object *)e_739131;
c_739011.elements[0] = f_73591_731731;
c_739011.elements[1] = k_733012;
c_739011.elements[2] = lis1_73592_731732;
c_739011.elements[3] = lists_73593_731733;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_739011, primitive_procedure_127, f_73591_731731, __glo_map_67_srfi_1);; 
}

static void __lambda_582(void *data, object self_734275, int argc, object *args) /* object self_734275, object r_733013 */
 {

  
closureN_type c_739013;
object e_739125 [3];
c_739013.hdr.mark = gc_color_red;
 c_739013.hdr.grayed = 0;
c_739013.tag = closureN_tag;
 c_739013.fn = (function_type)__lambda_583;
c_739013.num_args = 0;
c_739013.num_elements = 3;
c_739013.elements = (object *)e_739125;
c_739013.elements[0] = ((closureN)self_734275)->elements[0];
c_739013.elements[1] = ((closureN)self_734275)->elements[2];
c_739013.elements[2] = ((closureN)self_734275)->elements[3];


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

return_direct_with_clo1(data,(closure)&c_739013,__lambda_583,  &c_739126);; 
}

static void __lambda_602(void *data, object self_734276, int argc, object *args) /* object self_734276, object r_733014 */
 {

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

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

return_direct_with_clo2(data,(closure)&c_739018,__lambda_584,  ((closureN)self_734277)->elements[1], ((closureN)self_734277)->elements[2]);
} else { 
  
closureN_type c_739103;
object e_739107 [2];
c_739103.hdr.mark = gc_color_red;
 c_739103.hdr.grayed = 0;
c_739103.tag = closureN_tag;
 c_739103.fn = (function_type)__lambda_598;
c_739103.num_args = 1;
c_739103.num_elements = 2;
c_739103.elements = (object *)e_739107;
c_739103.elements[0] = k_733015;
c_739103.elements[1] = ((closureN)self_734277)->elements[1];


closureN_type c_739108;
object e_739124 [1];
c_739108.hdr.mark = gc_color_red;
 c_739108.hdr.grayed = 0;
c_739108.tag = closureN_tag;
 c_739108.fn = (function_type)__lambda_599;
c_739108.num_args = 1;
c_739108.num_elements = 1;
c_739108.elements = (object *)e_739124;
c_739108.elements[0] = ((closureN)self_734277)->elements[0];

return_direct_with_clo1(data,(closure)&c_739103,__lambda_598,  &c_739108);}
;; 
}

static void __lambda_599(void *data, object self_734293, int argc, object *args) /* object self_734293, object k_733030, object pair_73602_731741 */
 {
 object k_733030 = args[0]; object pair_73602_731741 = args[1];
  
closureN_type c_739110;
object e_739121 [3];
c_739110.hdr.mark = gc_color_red;
 c_739110.hdr.grayed = 0;
c_739110.tag = closureN_tag;
 c_739110.fn = (function_type)__lambda_600;
c_739110.num_args = 1;
c_739110.num_elements = 3;
c_739110.elements = (object *)e_739121;
c_739110.elements[0] = ((closureN)self_734293)->elements[0];
c_739110.elements[1] = k_733030;
c_739110.elements[2] = pair_73602_731741;



return_direct_with_clo1(data,(closure)&c_739110,__lambda_600,  Cyc_car(data, pair_73602_731741));; 
}

static void __lambda_600(void *data, object self_734294, int argc, object *args) /* object self_734294, object r_733032 */
 {
 object r_733032 = args[0];
  
closureN_type c_739113;
object e_739120 [2];
c_739113.hdr.mark = gc_color_red;
 c_739113.hdr.grayed = 0;
c_739113.tag = closureN_tag;
 c_739113.fn = (function_type)__lambda_601;
c_739113.num_args = 1;
c_739113.num_elements = 2;
c_739113.elements = (object *)e_739120;
c_739113.elements[0] = ((closureN)self_734294)->elements[1];
c_739113.elements[1] = ((closureN)self_734294)->elements[2];

return_closcall2(data,  ((closureN)self_734294)->elements[0],  &c_739113, r_733032);; 
}

static void __lambda_601(void *data, object self_734295, int argc, object *args) /* object self_734295, object r_733031 */
 {
 object r_733031 = args[0];
  
object c_739118 = Cyc_set_car_cps(data,  ((closureN)self_734295)->elements[0],((closureN)self_734295)->elements[1], r_733031);
return_direct_with_clo1(data,  ((closureN)self_734295)->elements[0], (((closure)  ((closureN)self_734295)->elements[0])->fn),  c_739118);; 
}

static void __lambda_598(void *data, object self_734296, int argc, object *args) /* object self_734296, object r_733029 */
 {
 object r_733029 = args[0];
  return_direct_with_clo3(data,  __glo_pair_91for_91each_srfi_1, (((closure)  __glo_pair_91for_91each_srfi_1)->fn),  ((closureN)self_734296)->elements[0], r_733029, ((closureN)self_734296)->elements[1]);; 
}

static void __lambda_584(void *data, object self_734278, int argc, object *args) /* object self_734278, object lis1_73595_731734, object lists_73596_731735 */
 {
 object lis1_73595_731734 = args[0]; object lists_73596_731735 = args[1];
  
closureN_type c_739020;
object e_739098 [4];
c_739020.hdr.mark = gc_color_red;
 c_739020.hdr.grayed = 0;
c_739020.tag = closureN_tag;
 c_739020.fn = (function_type)__lambda_585;
c_739020.num_args = 1;
c_739020.num_elements = 4;
c_739020.elements = (object *)e_739098;
c_739020.elements[0] = ((closureN)self_734278)->elements[0];
c_739020.elements[1] = ((closureN)self_734278)->elements[1];
c_739020.elements[2] = lis1_73595_731734;
c_739020.elements[3] = lists_73596_731735;

return_direct_with_clo1(data,(closure)&c_739020,__lambda_585,  boolean_f);; 
}

static void __lambda_585(void *data, object self_734279, int argc, object *args) /* object self_734279, object lp_73597_731736 */
 {
 object lp_73597_731736 = args[0];
  
closureN_type c_739022;
object e_739094 [4];
c_739022.hdr.mark = gc_color_red;
 c_739022.hdr.grayed = 0;
c_739022.tag = closureN_tag;
 c_739022.fn = (function_type)__lambda_1178;
c_739022.num_args = 1;
c_739022.num_elements = 4;
c_739022.elements = (object *)e_739094;
c_739022.elements[0] = ((closureN)self_734279)->elements[0];
c_739022.elements[1] = ((closureN)self_734279)->elements[1];
c_739022.elements[2] = ((closureN)self_734279)->elements[2];
c_739022.elements[3] = ((closureN)self_734279)->elements[3];


pair_type local_739097; 
return_direct_with_clo1(data,(closure)&c_739022,__lambda_1178,  set_cell_as_expr(&local_739097, lp_73597_731736));; 
}

static void __lambda_1178(void *data, object self_734280, int argc, object *args) /* object self_734280, object lp_73597_731736 */
 {
 object lp_73597_731736 = args[0];
  
closureN_type c_739024;
object e_739038 [4];
c_739024.hdr.mark = gc_color_red;
 c_739024.hdr.grayed = 0;
c_739024.tag = closureN_tag;
 c_739024.fn = (function_type)__lambda_586;
c_739024.num_args = 1;
c_739024.num_elements = 4;
c_739024.elements = (object *)e_739038;
c_739024.elements[0] = ((closureN)self_734280)->elements[1];
c_739024.elements[1] = ((closureN)self_734280)->elements[2];
c_739024.elements[2] = ((closureN)self_734280)->elements[3];
c_739024.elements[3] = lp_73597_731736;


closureN_type c_739039;
object e_739093 [2];
c_739039.hdr.mark = gc_color_red;
 c_739039.hdr.grayed = 0;
c_739039.tag = closureN_tag;
 c_739039.fn = (function_type)__lambda_588;
c_739039.num_args = 2;
c_739039.num_elements = 2;
c_739039.elements = (object *)e_739093;
c_739039.elements[0] = ((closureN)self_734280)->elements[0];
c_739039.elements[1] = lp_73597_731736;

return_direct_with_clo1(data,(closure)&c_739024,__lambda_586,  &c_739039);; 
}

static void __lambda_588(void *data, object self_734281, int argc, object *args) /* object self_734281, object k_733019, object lis1_73598_731737, object lists_73599_731738 */
 {
 object k_733019 = args[0]; object lis1_73598_731737 = args[1]; object lists_73599_731738 = args[2];
  
closureN_type c_739041;
object e_739092 [5];
c_739041.hdr.mark = gc_color_red;
 c_739041.hdr.grayed = 0;
c_739041.tag = closureN_tag;
 c_739041.fn = (function_type)__lambda_589;
c_739041.num_args = 1;
c_739041.num_elements = 5;
c_739041.elements = (object *)e_739092;
c_739041.elements[0] = ((closureN)self_734281)->elements[0];
c_739041.elements[1] = k_733019;
c_739041.elements[2] = lis1_73598_731737;
c_739041.elements[3] = lists_73599_731738;
c_739041.elements[4] = ((closureN)self_734281)->elements[1];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_739041, lis1_73598_731737);; 
}

static void __lambda_589(void *data, object self_734282, int argc, object *args) /* object self_734282, object r_733020 */
 {
 object r_733020 = args[0];
  if( (boolean_f != r_733020) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734282)->elements[1], (((closure)  ((closureN)self_734282)->elements[1])->fn),  Cyc_VOID);
} else { 
  
closureN_type c_739045;
object e_739087 [4];
c_739045.hdr.mark = gc_color_red;
 c_739045.hdr.grayed = 0;
c_739045.tag = closureN_tag;
 c_739045.fn = (function_type)__lambda_590;
c_739045.num_args = 1;
c_739045.num_elements = 4;
c_739045.elements = (object *)e_739087;
c_739045.elements[0] = ((closureN)self_734282)->elements[0];
c_739045.elements[1] = ((closureN)self_734282)->elements[1];
c_739045.elements[2] = ((closureN)self_734282)->elements[2];
c_739045.elements[3] = ((closureN)self_734282)->elements[4];


closureN_type c_739088;
object e_739091 [1];
c_739088.hdr.mark = gc_color_red;
 c_739088.hdr.grayed = 0;
c_739088.tag = closureN_tag;
 c_739088.fn = (function_type)__lambda_597;
c_739088.num_args = 0;
c_739088.num_elements = 1;
c_739088.elements = (object *)e_739091;
c_739088.elements[0] = ((closureN)self_734282)->elements[3];

return_direct_with_clo1(data,(closure)&c_739045,__lambda_590,  &c_739088);}
;; 
}

static void __lambda_597(void *data, object self_734283, int argc, object *args) /* object self_734283, object k_733028 */
 {
 object k_733028 = args[0];
  return_direct_with_clo2(data,  __glo__75cars_87cdrs_95no_91test_srfi_1, (((closure)  __glo__75cars_87cdrs_95no_91test_srfi_1)->fn),  k_733028, ((closureN)self_734283)->elements[0]);; 
}

static void __lambda_590(void *data, object self_734284, int argc, object *args) /* object self_734284, object r_733021 */
 {
 object r_733021 = args[0];
  
closureN_type c_739047;
object e_739051 [2];
c_739047.hdr.mark = gc_color_red;
 c_739047.hdr.grayed = 0;
c_739047.tag = closureN_tag;
 c_739047.fn = (function_type)__lambda_591;
c_739047.num_args = 1;
c_739047.num_elements = 2;
c_739047.elements = (object *)e_739051;
c_739047.elements[0] = ((closureN)self_734284)->elements[1];
c_739047.elements[1] = r_733021;


closureN_type c_739052;
object e_739086 [3];
c_739052.hdr.mark = gc_color_red;
 c_739052.hdr.grayed = 0;
c_739052.tag = closureN_tag;
 c_739052.fn = (function_type)__lambda_592;
c_739052.num_args = 2;
c_739052.num_elements = 3;
c_739052.elements = (object *)e_739086;
c_739052.elements[0] = ((closureN)self_734284)->elements[0];
c_739052.elements[1] = ((closureN)self_734284)->elements[2];
c_739052.elements[2] = ((closureN)self_734284)->elements[3];

return_direct_with_clo1(data,(closure)&c_739047,__lambda_591,  &c_739052);; 
}

static void __lambda_592(void *data, object self_734285, int argc, object *args) /* object self_734285, object k_733023, object heads_73600_731739, object tails_73601_731740 */
 {
 object k_733023 = args[0]; object heads_73600_731739 = args[1]; object tails_73601_731740 = args[2];
  
closureN_type c_739054;
object e_739082 [6];
c_739054.hdr.mark = gc_color_red;
 c_739054.hdr.grayed = 0;
c_739054.tag = closureN_tag;
 c_739054.fn = (function_type)__lambda_593;
c_739054.num_args = 1;
c_739054.num_elements = 6;
c_739054.elements = (object *)e_739082;
c_739054.elements[0] = ((closureN)self_734285)->elements[0];
c_739054.elements[1] = heads_73600_731739;
c_739054.elements[2] = k_733023;
c_739054.elements[3] = ((closureN)self_734285)->elements[1];
c_739054.elements[4] = ((closureN)self_734285)->elements[2];
c_739054.elements[5] = tails_73601_731740;



return_direct_with_clo1(data,(closure)&c_739054,__lambda_593,  Cyc_car(data, ((closureN)self_734285)->elements[1]));; 
}

static void __lambda_593(void *data, object self_734286, int argc, object *args) /* object self_734286, object r_733027 */
 {
 object r_733027 = args[0];
  
closureN_type c_739056;
object e_739076 [4];
c_739056.hdr.mark = gc_color_red;
 c_739056.hdr.grayed = 0;
c_739056.tag = closureN_tag;
 c_739056.fn = (function_type)__lambda_594;
c_739056.num_args = 1;
c_739056.num_elements = 4;
c_739056.elements = (object *)e_739076;
c_739056.elements[0] = ((closureN)self_734286)->elements[2];
c_739056.elements[1] = ((closureN)self_734286)->elements[3];
c_739056.elements[2] = ((closureN)self_734286)->elements[4];
c_739056.elements[3] = ((closureN)self_734286)->elements[5];


object c_739079 = apply_va(data,(closure)&c_739056,3,((closureN)self_734286)->elements[0], r_733027, ((closureN)self_734286)->elements[1]);
return_closcall1(data,(closure)&c_739056,  c_739079);; 
}

static void __lambda_594(void *data, object self_734287, int argc, object *args) /* object self_734287, object r_733026 */
 {
 object r_733026 = args[0];
  
closureN_type c_739058;
object e_739071 [4];
c_739058.hdr.mark = gc_color_red;
 c_739058.hdr.grayed = 0;
c_739058.tag = closureN_tag;
 c_739058.fn = (function_type)__lambda_595;
c_739058.num_args = 1;
c_739058.num_elements = 4;
c_739058.elements = (object *)e_739071;
c_739058.elements[0] = ((closureN)self_734287)->elements[0];
c_739058.elements[1] = ((closureN)self_734287)->elements[1];
c_739058.elements[2] = ((closureN)self_734287)->elements[2];
c_739058.elements[3] = ((closureN)self_734287)->elements[3];


object c_739074 = Cyc_set_car_cps(data,(closure)&c_739058,((closureN)self_734287)->elements[1], r_733026);
return_closcall1(data,(closure)&c_739058,  c_739074);; 
}

static void __lambda_595(void *data, object self_734288, int argc, object *args) /* object self_734288, object r_733024 */
 {

  
closureN_type c_739060;
object e_739067 [3];
c_739060.hdr.mark = gc_color_red;
 c_739060.hdr.grayed = 0;
c_739060.tag = closureN_tag;
 c_739060.fn = (function_type)__lambda_596;
c_739060.num_args = 1;
c_739060.num_elements = 3;
c_739060.elements = (object *)e_739067;
c_739060.elements[0] = ((closureN)self_734288)->elements[0];
c_739060.elements[1] = ((closureN)self_734288)->elements[2];
c_739060.elements[2] = ((closureN)self_734288)->elements[3];



return_direct_with_clo1(data,(closure)&c_739060,__lambda_596,  Cyc_cdr(data, ((closureN)self_734288)->elements[1]));; 
}

static void __lambda_596(void *data, object self_734289, int argc, object *args) /* object self_734289, object r_733025 */
 {
 object r_733025 = args[0];
  

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

static void __lambda_591(void *data, object self_734290, int argc, object *args) /* object self_734290, object r_733022 */
 {
 object r_733022 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734290)->elements[0], ((closureN)self_734290)->elements[1], r_733022);; 
}

static void __lambda_586(void *data, object self_734291, int argc, object *args) /* object self_734291, object r_733018 */
 {
 object r_733018 = args[0];
  
closureN_type c_739026;
object e_739034 [4];
c_739026.hdr.mark = gc_color_red;
 c_739026.hdr.grayed = 0;
c_739026.tag = closureN_tag;
 c_739026.fn = (function_type)__lambda_587;
c_739026.num_args = 1;
c_739026.num_elements = 4;
c_739026.elements = (object *)e_739034;
c_739026.elements[0] = ((closureN)self_734291)->elements[0];
c_739026.elements[1] = ((closureN)self_734291)->elements[1];
c_739026.elements[2] = ((closureN)self_734291)->elements[2];
c_739026.elements[3] = ((closureN)self_734291)->elements[3];



return_direct_with_clo1(data,(closure)&c_739026,__lambda_587,  Cyc_set_cell(data, ((closureN)self_734291)->elements[3], r_733018));; 
}

static void __lambda_587(void *data, object self_734292, int argc, object *args) /* object self_734292, object r_733017 */
 {

  

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

static void __lambda_564(void *data, object _, int argc, object *args) /* closure _,object k_732994, object proc_73578_731720, object lis1_73579_731721, object lists_73580_731722_raw, ... */
 {
object k_732994 = args[0]; object proc_73578_731720 = args[1]; object lis1_73579_731721 = args[2];
load_varargs(lists_73580_731722, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/1.sld:pair-for-each");

closureN_type c_738897;
object e_739008 [4];
c_738897.hdr.mark = gc_color_red;
 c_738897.hdr.grayed = 0;
c_738897.tag = closureN_tag;
 c_738897.fn = (function_type)__lambda_565;
c_738897.num_args = 1;
c_738897.num_elements = 4;
c_738897.elements = (object *)e_739008;
c_738897.elements[0] = k_732994;
c_738897.elements[1] = lis1_73579_731721;
c_738897.elements[2] = lists_73580_731722;
c_738897.elements[3] = proc_73578_731720;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_738897, primitive_procedure_127, proc_73578_731720, __glo_pair_91for_91each_srfi_1);; 
}

static void __lambda_565(void *data, object self_734257, int argc, object *args) /* object self_734257, object r_732995 */
 {

    
if( (boolean_f != Cyc_is_pair(((closureN)self_734257)->elements[2])) ){ 
  
closureN_type c_738902;
object e_738950 [2];
c_738902.hdr.mark = gc_color_red;
 c_738902.hdr.grayed = 0;
c_738902.tag = closureN_tag;
 c_738902.fn = (function_type)__lambda_566;
c_738902.num_args = 1;
c_738902.num_elements = 2;
c_738902.elements = (object *)e_738950;
c_738902.elements[0] = ((closureN)self_734257)->elements[0];
c_738902.elements[1] = ((closureN)self_734257)->elements[3];


pair_type local_738953; 
return_direct_with_clo1(data,(closure)&c_738902,__lambda_566,  set_pair_as_expr(&local_738953, ((closureN)self_734257)->elements[1], ((closureN)self_734257)->elements[2]));
} else { 
  
closureN_type c_738957;
object e_739006 [2];
c_738957.hdr.mark = gc_color_red;
 c_738957.hdr.grayed = 0;
c_738957.tag = closureN_tag;
 c_738957.fn = (function_type)__lambda_573;
c_738957.num_args = 1;
c_738957.num_elements = 2;
c_738957.elements = (object *)e_739006;
c_738957.elements[0] = ((closureN)self_734257)->elements[0];
c_738957.elements[1] = ((closureN)self_734257)->elements[3];

return_direct_with_clo1(data,(closure)&c_738957,__lambda_573,  ((closureN)self_734257)->elements[1]);}
;; 
}

static void __lambda_573(void *data, object self_734266, int argc, object *args) /* object self_734266, object lis_73587_731727 */
 {
 object lis_73587_731727 = args[0];
  
closureN_type c_738959;
object e_739005 [3];
c_738959.hdr.mark = gc_color_red;
 c_738959.hdr.grayed = 0;
c_738959.tag = closureN_tag;
 c_738959.fn = (function_type)__lambda_574;
c_738959.num_args = 1;
c_738959.num_elements = 3;
c_738959.elements = (object *)e_739005;
c_738959.elements[0] = ((closureN)self_734266)->elements[0];
c_738959.elements[1] = lis_73587_731727;
c_738959.elements[2] = ((closureN)self_734266)->elements[1];

return_direct_with_clo1(data,(closure)&c_738959,__lambda_574,  boolean_f);; 
}

static void __lambda_574(void *data, object self_734267, int argc, object *args) /* object self_734267, object lp_73588_731728 */
 {
 object lp_73588_731728 = args[0];
  
closureN_type c_738961;
object e_739001 [3];
c_738961.hdr.mark = gc_color_red;
 c_738961.hdr.grayed = 0;
c_738961.tag = closureN_tag;
 c_738961.fn = (function_type)__lambda_1177;
c_738961.num_args = 1;
c_738961.num_elements = 3;
c_738961.elements = (object *)e_739001;
c_738961.elements[0] = ((closureN)self_734267)->elements[0];
c_738961.elements[1] = ((closureN)self_734267)->elements[1];
c_738961.elements[2] = ((closureN)self_734267)->elements[2];


pair_type local_739004; 
return_direct_with_clo1(data,(closure)&c_738961,__lambda_1177,  set_cell_as_expr(&local_739004, lp_73588_731728));; 
}

static void __lambda_1177(void *data, object self_734268, int argc, object *args) /* object self_734268, object lp_73588_731728 */
 {
 object lp_73588_731728 = args[0];
  
closureN_type c_738963;
object e_738976 [3];
c_738963.hdr.mark = gc_color_red;
 c_738963.hdr.grayed = 0;
c_738963.tag = closureN_tag;
 c_738963.fn = (function_type)__lambda_575;
c_738963.num_args = 1;
c_738963.num_elements = 3;
c_738963.elements = (object *)e_738976;
c_738963.elements[0] = ((closureN)self_734268)->elements[0];
c_738963.elements[1] = ((closureN)self_734268)->elements[1];
c_738963.elements[2] = lp_73588_731728;


closureN_type c_738977;
object e_739000 [2];
c_738977.hdr.mark = gc_color_red;
 c_738977.hdr.grayed = 0;
c_738977.tag = closureN_tag;
 c_738977.fn = (function_type)__lambda_577;
c_738977.num_args = 1;
c_738977.num_elements = 2;
c_738977.elements = (object *)e_739000;
c_738977.elements[0] = lp_73588_731728;
c_738977.elements[1] = ((closureN)self_734268)->elements[2];

return_direct_with_clo1(data,(closure)&c_738963,__lambda_575,  &c_738977);; 
}

static void __lambda_577(void *data, object self_734269, int argc, object *args) /* object self_734269, object k_733006, object lis_73589_731729 */
 {
 object k_733006 = args[0]; object lis_73589_731729 = args[1];
  
closureN_type c_738979;
object e_738999 [4];
c_738979.hdr.mark = gc_color_red;
 c_738979.hdr.grayed = 0;
c_738979.tag = closureN_tag;
 c_738979.fn = (function_type)__lambda_578;
c_738979.num_args = 1;
c_738979.num_elements = 4;
c_738979.elements = (object *)e_738999;
c_738979.elements[0] = k_733006;
c_738979.elements[1] = lis_73589_731729;
c_738979.elements[2] = ((closureN)self_734269)->elements[0];
c_738979.elements[3] = ((closureN)self_734269)->elements[1];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_738979, lis_73589_731729);; 
}

static void __lambda_578(void *data, object self_734270, int argc, object *args) /* object self_734270, object r_733007 */
 {
 object r_733007 = args[0];
  if( (boolean_f != r_733007) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734270)->elements[0], (((closure)  ((closureN)self_734270)->elements[0])->fn),  Cyc_VOID);
} else { 
  
closureN_type c_738983;
object e_738995 [4];
c_738983.hdr.mark = gc_color_red;
 c_738983.hdr.grayed = 0;
c_738983.tag = closureN_tag;
 c_738983.fn = (function_type)__lambda_579;
c_738983.num_args = 1;
c_738983.num_elements = 4;
c_738983.elements = (object *)e_738995;
c_738983.elements[0] = ((closureN)self_734270)->elements[0];
c_738983.elements[1] = ((closureN)self_734270)->elements[1];
c_738983.elements[2] = ((closureN)self_734270)->elements[2];
c_738983.elements[3] = ((closureN)self_734270)->elements[3];



return_direct_with_clo1(data,(closure)&c_738983,__lambda_579,  Cyc_cdr(data, ((closureN)self_734270)->elements[1]));}
;; 
}

static void __lambda_579(void *data, object self_734271, int argc, object *args) /* object self_734271, object tail_73590_731730 */
 {
 object tail_73590_731730 = args[0];
  
closureN_type c_738986;
object e_738993 [3];
c_738986.hdr.mark = gc_color_red;
 c_738986.hdr.grayed = 0;
c_738986.tag = closureN_tag;
 c_738986.fn = (function_type)__lambda_580;
c_738986.num_args = 1;
c_738986.num_elements = 3;
c_738986.elements = (object *)e_738993;
c_738986.elements[0] = ((closureN)self_734271)->elements[0];
c_738986.elements[1] = ((closureN)self_734271)->elements[2];
c_738986.elements[2] = tail_73590_731730;

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

static void __lambda_580(void *data, object self_734272, int argc, object *args) /* object self_734272, object r_733009 */
 {

  

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

static void __lambda_575(void *data, object self_734273, int argc, object *args) /* object self_734273, object r_733005 */
 {
 object r_733005 = args[0];
  
closureN_type c_738965;
object e_738972 [3];
c_738965.hdr.mark = gc_color_red;
 c_738965.hdr.grayed = 0;
c_738965.tag = closureN_tag;
 c_738965.fn = (function_type)__lambda_576;
c_738965.num_args = 1;
c_738965.num_elements = 3;
c_738965.elements = (object *)e_738972;
c_738965.elements[0] = ((closureN)self_734273)->elements[0];
c_738965.elements[1] = ((closureN)self_734273)->elements[1];
c_738965.elements[2] = ((closureN)self_734273)->elements[2];



return_direct_with_clo1(data,(closure)&c_738965,__lambda_576,  Cyc_set_cell(data, ((closureN)self_734273)->elements[2], r_733005));; 
}

static void __lambda_576(void *data, object self_734274, int argc, object *args) /* object self_734274, object r_733004 */
 {

  

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

static void __lambda_566(void *data, object self_734258, int argc, object *args) /* object self_734258, object lists_73582_731723 */
 {
 object lists_73582_731723 = args[0];
  
closureN_type c_738904;
object e_738949 [3];
c_738904.hdr.mark = gc_color_red;
 c_738904.hdr.grayed = 0;
c_738904.tag = closureN_tag;
 c_738904.fn = (function_type)__lambda_567;
c_738904.num_args = 1;
c_738904.num_elements = 3;
c_738904.elements = (object *)e_738949;
c_738904.elements[0] = ((closureN)self_734258)->elements[0];
c_738904.elements[1] = lists_73582_731723;
c_738904.elements[2] = ((closureN)self_734258)->elements[1];

return_direct_with_clo1(data,(closure)&c_738904,__lambda_567,  boolean_f);; 
}

static void __lambda_567(void *data, object self_734259, int argc, object *args) /* object self_734259, object lp_73583_731724 */
 {
 object lp_73583_731724 = args[0];
  
closureN_type c_738906;
object e_738945 [3];
c_738906.hdr.mark = gc_color_red;
 c_738906.hdr.grayed = 0;
c_738906.tag = closureN_tag;
 c_738906.fn = (function_type)__lambda_1176;
c_738906.num_args = 1;
c_738906.num_elements = 3;
c_738906.elements = (object *)e_738945;
c_738906.elements[0] = ((closureN)self_734259)->elements[0];
c_738906.elements[1] = ((closureN)self_734259)->elements[1];
c_738906.elements[2] = ((closureN)self_734259)->elements[2];


pair_type local_738948; 
return_direct_with_clo1(data,(closure)&c_738906,__lambda_1176,  set_cell_as_expr(&local_738948, lp_73583_731724));; 
}

static void __lambda_1176(void *data, object self_734260, int argc, object *args) /* object self_734260, object lp_73583_731724 */
 {
 object lp_73583_731724 = args[0];
  
closureN_type c_738908;
object e_738921 [3];
c_738908.hdr.mark = gc_color_red;
 c_738908.hdr.grayed = 0;
c_738908.tag = closureN_tag;
 c_738908.fn = (function_type)__lambda_568;
c_738908.num_args = 1;
c_738908.num_elements = 3;
c_738908.elements = (object *)e_738921;
c_738908.elements[0] = ((closureN)self_734260)->elements[0];
c_738908.elements[1] = ((closureN)self_734260)->elements[1];
c_738908.elements[2] = lp_73583_731724;


closureN_type c_738922;
object e_738944 [2];
c_738922.hdr.mark = gc_color_red;
 c_738922.hdr.grayed = 0;
c_738922.tag = closureN_tag;
 c_738922.fn = (function_type)__lambda_570;
c_738922.num_args = 1;
c_738922.num_elements = 2;
c_738922.elements = (object *)e_738944;
c_738922.elements[0] = lp_73583_731724;
c_738922.elements[1] = ((closureN)self_734260)->elements[2];

return_direct_with_clo1(data,(closure)&c_738908,__lambda_568,  &c_738922);; 
}

static void __lambda_570(void *data, object self_734261, int argc, object *args) /* object self_734261, object k_733000, object lists_73584_731725 */
 {
 object k_733000 = args[0]; object lists_73584_731725 = args[1];
  
closureN_type c_738924;
object e_738943 [4];
c_738924.hdr.mark = gc_color_red;
 c_738924.hdr.grayed = 0;
c_738924.tag = closureN_tag;
 c_738924.fn = (function_type)__lambda_571;
c_738924.num_args = 1;
c_738924.num_elements = 4;
c_738924.elements = (object *)e_738943;
c_738924.elements[0] = k_733000;
c_738924.elements[1] = lists_73584_731725;
c_738924.elements[2] = ((closureN)self_734261)->elements[0];
c_738924.elements[3] = ((closureN)self_734261)->elements[1];

return_direct_with_clo2(data,  __glo__75cdrs_srfi_1, (((closure)  __glo__75cdrs_srfi_1)->fn),  &c_738924, lists_73584_731725);; 
}

static void __lambda_571(void *data, object self_734262, int argc, object *args) /* object self_734262, object tails_73585_731726 */
 {
 object tails_73585_731726 = args[0];
    
if( (boolean_f != Cyc_is_pair(tails_73585_731726)) ){ 
  
closureN_type c_738928;
object e_738935 [3];
c_738928.hdr.mark = gc_color_red;
 c_738928.hdr.grayed = 0;
c_738928.tag = closureN_tag;
 c_738928.fn = (function_type)__lambda_572;
c_738928.num_args = 1;
c_738928.num_elements = 3;
c_738928.elements = (object *)e_738935;
c_738928.elements[0] = ((closureN)self_734262)->elements[0];
c_738928.elements[1] = ((closureN)self_734262)->elements[2];
c_738928.elements[2] = tails_73585_731726;


object c_738938 = apply(data,(closure)&c_738928,((closureN)self_734262)->elements[3], ((closureN)self_734262)->elements[1]);
return_closcall1(data,(closure)&c_738928,  c_738938);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734262)->elements[0], (((closure)  ((closureN)self_734262)->elements[0])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_572(void *data, object self_734263, int argc, object *args) /* object self_734263, object r_733003 */
 {

  

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

static void __lambda_568(void *data, object self_734264, int argc, object *args) /* object self_734264, object r_732999 */
 {
 object r_732999 = args[0];
  
closureN_type c_738910;
object e_738917 [3];
c_738910.hdr.mark = gc_color_red;
 c_738910.hdr.grayed = 0;
c_738910.tag = closureN_tag;
 c_738910.fn = (function_type)__lambda_569;
c_738910.num_args = 1;
c_738910.num_elements = 3;
c_738910.elements = (object *)e_738917;
c_738910.elements[0] = ((closureN)self_734264)->elements[0];
c_738910.elements[1] = ((closureN)self_734264)->elements[1];
c_738910.elements[2] = ((closureN)self_734264)->elements[2];



return_direct_with_clo1(data,(closure)&c_738910,__lambda_569,  Cyc_set_cell(data, ((closureN)self_734264)->elements[2], r_732999));; 
}

static void __lambda_569(void *data, object self_734265, int argc, object *args) /* object self_734265, object r_732998 */
 {

  

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

static void __lambda_538(void *data, object _, int argc, object *args) /* closure _,object k_732962, object who_73555_731699, object appender_73556_731700, object f_73557_731701, object lis1_73558_731702, object lists_73559_731703 */
 {
object k_732962 = args[0]; object who_73555_731699 = args[1]; object appender_73556_731700 = args[2]; object f_73557_731701 = args[3]; object lis1_73558_731702 = args[4]; object lists_73559_731703 = args[5];
  Cyc_st_add(data, "srfi/1.sld:really-append-map");

closureN_type c_738733;
object e_738894 [5];
c_738733.hdr.mark = gc_color_red;
 c_738733.hdr.grayed = 0;
c_738733.tag = closureN_tag;
 c_738733.fn = (function_type)__lambda_539;
c_738733.num_args = 1;
c_738733.num_elements = 5;
c_738733.elements = (object *)e_738894;
c_738733.elements[0] = appender_73556_731700;
c_738733.elements[1] = f_73557_731701;
c_738733.elements[2] = k_732962;
c_738733.elements[3] = lis1_73558_731702;
c_738733.elements[4] = lists_73559_731703;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_738733, primitive_procedure_127, f_73557_731701, who_73555_731699);; 
}

static void __lambda_539(void *data, object self_734230, int argc, object *args) /* object self_734230, object r_732963 */
 {

    
if( (boolean_f != Cyc_is_pair(((closureN)self_734230)->elements[4])) ){ 
  
closureN_type c_738738;
object e_738816 [3];
c_738738.hdr.mark = gc_color_red;
 c_738738.hdr.grayed = 0;
c_738738.tag = closureN_tag;
 c_738738.fn = (function_type)__lambda_540;
c_738738.num_args = 1;
c_738738.num_elements = 3;
c_738738.elements = (object *)e_738816;
c_738738.elements[0] = ((closureN)self_734230)->elements[0];
c_738738.elements[1] = ((closureN)self_734230)->elements[1];
c_738738.elements[2] = ((closureN)self_734230)->elements[2];


closureN_type c_738817;
object e_738824 [2];
c_738817.hdr.mark = gc_color_red;
 c_738817.hdr.grayed = 0;
c_738817.tag = closureN_tag;
 c_738817.fn = (function_type)__lambda_554;
c_738817.num_args = 0;
c_738817.num_elements = 2;
c_738817.elements = (object *)e_738824;
c_738817.elements[0] = ((closureN)self_734230)->elements[3];
c_738817.elements[1] = ((closureN)self_734230)->elements[4];

return_direct_with_clo1(data,(closure)&c_738738,__lambda_540,  &c_738817);
} else { 
  
closureN_type c_738826;
object e_738892 [4];
c_738826.hdr.mark = gc_color_red;
 c_738826.hdr.grayed = 0;
c_738826.tag = closureN_tag;
 c_738826.fn = (function_type)__lambda_555;
c_738826.num_args = 1;
c_738826.num_elements = 4;
c_738826.elements = (object *)e_738892;
c_738826.elements[0] = ((closureN)self_734230)->elements[0];
c_738826.elements[1] = ((closureN)self_734230)->elements[1];
c_738826.elements[2] = ((closureN)self_734230)->elements[2];
c_738826.elements[3] = ((closureN)self_734230)->elements[3];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_738826, ((closureN)self_734230)->elements[3]);}
;; 
}

static void __lambda_555(void *data, object self_734247, int argc, object *args) /* object self_734247, object r_732981 */
 {
 object r_732981 = args[0];
  if( (boolean_f != r_732981) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734247)->elements[2], (((closure)  ((closureN)self_734247)->elements[2])->fn),  NULL);
} else { 
  
closureN_type c_738830;
object e_738885 [3];
c_738830.hdr.mark = gc_color_red;
 c_738830.hdr.grayed = 0;
c_738830.tag = closureN_tag;
 c_738830.fn = (function_type)__lambda_556;
c_738830.num_args = 2;
c_738830.num_elements = 3;
c_738830.elements = (object *)e_738885;
c_738830.elements[0] = ((closureN)self_734247)->elements[0];
c_738830.elements[1] = ((closureN)self_734247)->elements[1];
c_738830.elements[2] = ((closureN)self_734247)->elements[2];





return_direct_with_clo2(data,(closure)&c_738830,__lambda_556,  Cyc_car(data, ((closureN)self_734247)->elements[3]), Cyc_cdr(data, ((closureN)self_734247)->elements[3]));}
;; 
}

static void __lambda_556(void *data, object self_734248, int argc, object *args) /* object self_734248, object elt_73572_731714, object rest_73573_731715 */
 {
 object elt_73572_731714 = args[0]; object rest_73573_731715 = args[1];
  
closureN_type c_738832;
object e_738884 [5];
c_738832.hdr.mark = gc_color_red;
 c_738832.hdr.grayed = 0;
c_738832.tag = closureN_tag;
 c_738832.fn = (function_type)__lambda_557;
c_738832.num_args = 1;
c_738832.num_elements = 5;
c_738832.elements = (object *)e_738884;
c_738832.elements[0] = ((closureN)self_734248)->elements[0];
c_738832.elements[1] = elt_73572_731714;
c_738832.elements[2] = ((closureN)self_734248)->elements[1];
c_738832.elements[3] = ((closureN)self_734248)->elements[2];
c_738832.elements[4] = rest_73573_731715;

return_direct_with_clo1(data,(closure)&c_738832,__lambda_557,  boolean_f);; 
}

static void __lambda_557(void *data, object self_734249, int argc, object *args) /* object self_734249, object recur_73574_731716 */
 {
 object recur_73574_731716 = args[0];
  
closureN_type c_738834;
object e_738880 [5];
c_738834.hdr.mark = gc_color_red;
 c_738834.hdr.grayed = 0;
c_738834.tag = closureN_tag;
 c_738834.fn = (function_type)__lambda_1175;
c_738834.num_args = 1;
c_738834.num_elements = 5;
c_738834.elements = (object *)e_738880;
c_738834.elements[0] = ((closureN)self_734249)->elements[0];
c_738834.elements[1] = ((closureN)self_734249)->elements[1];
c_738834.elements[2] = ((closureN)self_734249)->elements[2];
c_738834.elements[3] = ((closureN)self_734249)->elements[3];
c_738834.elements[4] = ((closureN)self_734249)->elements[4];


pair_type local_738883; 
return_direct_with_clo1(data,(closure)&c_738834,__lambda_1175,  set_cell_as_expr(&local_738883, recur_73574_731716));; 
}

static void __lambda_1175(void *data, object self_734250, int argc, object *args) /* object self_734250, object recur_73574_731716 */
 {
 object recur_73574_731716 = args[0];
  
closureN_type c_738836;
object e_738850 [4];
c_738836.hdr.mark = gc_color_red;
 c_738836.hdr.grayed = 0;
c_738836.tag = closureN_tag;
 c_738836.fn = (function_type)__lambda_558;
c_738836.num_args = 1;
c_738836.num_elements = 4;
c_738836.elements = (object *)e_738850;
c_738836.elements[0] = ((closureN)self_734250)->elements[1];
c_738836.elements[1] = ((closureN)self_734250)->elements[3];
c_738836.elements[2] = recur_73574_731716;
c_738836.elements[3] = ((closureN)self_734250)->elements[4];


closureN_type c_738851;
object e_738879 [3];
c_738851.hdr.mark = gc_color_red;
 c_738851.hdr.grayed = 0;
c_738851.tag = closureN_tag;
 c_738851.fn = (function_type)__lambda_560;
c_738851.num_args = 2;
c_738851.num_elements = 3;
c_738851.elements = (object *)e_738879;
c_738851.elements[0] = ((closureN)self_734250)->elements[0];
c_738851.elements[1] = ((closureN)self_734250)->elements[2];
c_738851.elements[2] = recur_73574_731716;

return_direct_with_clo1(data,(closure)&c_738836,__lambda_558,  &c_738851);; 
}

static void __lambda_560(void *data, object self_734251, int argc, object *args) /* object self_734251, object k_732986, object elt_73575_731717, object rest_73576_731718 */
 {
 object k_732986 = args[0]; object elt_73575_731717 = args[1]; object rest_73576_731718 = args[2];
  
closureN_type c_738854;
object e_738878 [4];
c_738854.hdr.mark = gc_color_red;
 c_738854.hdr.grayed = 0;
c_738854.tag = closureN_tag;
 c_738854.fn = (function_type)__lambda_561;
c_738854.num_args = 1;
c_738854.num_elements = 4;
c_738854.elements = (object *)e_738878;
c_738854.elements[0] = ((closureN)self_734251)->elements[0];
c_738854.elements[1] = k_732986;
c_738854.elements[2] = ((closureN)self_734251)->elements[2];
c_738854.elements[3] = rest_73576_731718;

return_closcall2(data,  ((closureN)self_734251)->elements[1],  &c_738854, elt_73575_731717);; 
}

static void __lambda_561(void *data, object self_734252, int argc, object *args) /* object self_734252, object vals_73577_731719 */
 {
 object vals_73577_731719 = args[0];
  
closureN_type c_738856;
object e_738876 [5];
c_738856.hdr.mark = gc_color_red;
 c_738856.hdr.grayed = 0;
c_738856.tag = closureN_tag;
 c_738856.fn = (function_type)__lambda_562;
c_738856.num_args = 1;
c_738856.num_elements = 5;
c_738856.elements = (object *)e_738876;
c_738856.elements[0] = ((closureN)self_734252)->elements[0];
c_738856.elements[1] = ((closureN)self_734252)->elements[1];
c_738856.elements[2] = ((closureN)self_734252)->elements[2];
c_738856.elements[3] = ((closureN)self_734252)->elements[3];
c_738856.elements[4] = vals_73577_731719;

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_738856, ((closureN)self_734252)->elements[3]);; 
}

static void __lambda_562(void *data, object self_734253, int argc, object *args) /* object self_734253, object r_732988 */
 {
 object r_732988 = args[0];
  if( (boolean_f != r_732988) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734253)->elements[1], (((closure)  ((closureN)self_734253)->elements[1])->fn),  ((closureN)self_734253)->elements[4]);
} else { 
  


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





return_closcall3(data,  car(((closureN)self_734253)->elements[2]),  &c_738864, Cyc_car(data, ((closureN)self_734253)->elements[3]), Cyc_cdr(data, ((closureN)self_734253)->elements[3]));}
;; 
}

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

static void __lambda_558(void *data, object self_734255, int argc, object *args) /* object self_734255, object r_732985 */
 {
 object r_732985 = args[0];
  
closureN_type c_738838;
object e_738846 [4];
c_738838.hdr.mark = gc_color_red;
 c_738838.hdr.grayed = 0;
c_738838.tag = closureN_tag;
 c_738838.fn = (function_type)__lambda_559;
c_738838.num_args = 1;
c_738838.num_elements = 4;
c_738838.elements = (object *)e_738846;
c_738838.elements[0] = ((closureN)self_734255)->elements[0];
c_738838.elements[1] = ((closureN)self_734255)->elements[1];
c_738838.elements[2] = ((closureN)self_734255)->elements[2];
c_738838.elements[3] = ((closureN)self_734255)->elements[3];



return_direct_with_clo1(data,(closure)&c_738838,__lambda_559,  Cyc_set_cell(data, ((closureN)self_734255)->elements[2], r_732985));; 
}

static void __lambda_559(void *data, object self_734256, int argc, object *args) /* object self_734256, object r_732984 */
 {

  

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

static void __lambda_554(void *data, object self_734231, int argc, object *args) /* object self_734231, object k_732979 */
 {
 object k_732979 = args[0];
  
pair_type local_738821; 
return_direct_with_clo2(data,  __glo__75cars_87cdrs_srfi_1, (((closure)  __glo__75cars_87cdrs_srfi_1)->fn),  k_732979, set_pair_as_expr(&local_738821, ((closureN)self_734231)->elements[0], ((closureN)self_734231)->elements[1]));; 
}

static void __lambda_540(void *data, object self_734232, int argc, object *args) /* object self_734232, object r_732965 */
 {
 object r_732965 = args[0];
  
closureN_type c_738740;
object e_738744 [2];
c_738740.hdr.mark = gc_color_red;
 c_738740.hdr.grayed = 0;
c_738740.tag = closureN_tag;
 c_738740.fn = (function_type)__lambda_541;
c_738740.num_args = 1;
c_738740.num_elements = 2;
c_738740.elements = (object *)e_738744;
c_738740.elements[0] = ((closureN)self_734232)->elements[2];
c_738740.elements[1] = r_732965;


closureN_type c_738745;
object e_738815 [2];
c_738745.hdr.mark = gc_color_red;
 c_738745.hdr.grayed = 0;
c_738745.tag = closureN_tag;
 c_738745.fn = (function_type)__lambda_542;
c_738745.num_args = 2;
c_738745.num_elements = 2;
c_738745.elements = (object *)e_738815;
c_738745.elements[0] = ((closureN)self_734232)->elements[0];
c_738745.elements[1] = ((closureN)self_734232)->elements[1];

return_direct_with_clo1(data,(closure)&c_738740,__lambda_541,  &c_738745);; 
}

static void __lambda_542(void *data, object self_734233, int argc, object *args) /* object self_734233, object k_732967, object cars_73560_731704, object cdrs_73561_731705 */
 {
 object k_732967 = args[0]; object cars_73560_731704 = args[1]; object cdrs_73561_731705 = args[2];
    
if( (boolean_f != Cyc_is_null(cars_73560_731704)) ){ 
  return_direct_with_clo1(data,  k_732967, (((closure)  k_732967)->fn),  NULL);
} else { 
  
closureN_type c_738750;
object e_738814 [3];
c_738750.hdr.mark = gc_color_red;
 c_738750.hdr.grayed = 0;
c_738750.tag = closureN_tag;
 c_738750.fn = (function_type)__lambda_543;
c_738750.num_args = 2;
c_738750.num_elements = 3;
c_738750.elements = (object *)e_738814;
c_738750.elements[0] = ((closureN)self_734233)->elements[0];
c_738750.elements[1] = ((closureN)self_734233)->elements[1];
c_738750.elements[2] = k_732967;

return_direct_with_clo2(data,(closure)&c_738750,__lambda_543,  cars_73560_731704, cdrs_73561_731705);}
;; 
}

static void __lambda_543(void *data, object self_734234, int argc, object *args) /* object self_734234, object cars_73563_731706, object cdrs_73564_731707 */
 {
 object cars_73563_731706 = args[0]; object cdrs_73564_731707 = args[1];
  
closureN_type c_738752;
object e_738813 [5];
c_738752.hdr.mark = gc_color_red;
 c_738752.hdr.grayed = 0;
c_738752.tag = closureN_tag;
 c_738752.fn = (function_type)__lambda_544;
c_738752.num_args = 1;
c_738752.num_elements = 5;
c_738752.elements = (object *)e_738813;
c_738752.elements[0] = ((closureN)self_734234)->elements[0];
c_738752.elements[1] = cars_73563_731706;
c_738752.elements[2] = cdrs_73564_731707;
c_738752.elements[3] = ((closureN)self_734234)->elements[1];
c_738752.elements[4] = ((closureN)self_734234)->elements[2];

return_direct_with_clo1(data,(closure)&c_738752,__lambda_544,  boolean_f);; 
}

static void __lambda_544(void *data, object self_734235, int argc, object *args) /* object self_734235, object recur_73565_731708 */
 {
 object recur_73565_731708 = args[0];
  
closureN_type c_738754;
object e_738809 [5];
c_738754.hdr.mark = gc_color_red;
 c_738754.hdr.grayed = 0;
c_738754.tag = closureN_tag;
 c_738754.fn = (function_type)__lambda_1174;
c_738754.num_args = 1;
c_738754.num_elements = 5;
c_738754.elements = (object *)e_738809;
c_738754.elements[0] = ((closureN)self_734235)->elements[0];
c_738754.elements[1] = ((closureN)self_734235)->elements[1];
c_738754.elements[2] = ((closureN)self_734235)->elements[2];
c_738754.elements[3] = ((closureN)self_734235)->elements[3];
c_738754.elements[4] = ((closureN)self_734235)->elements[4];


pair_type local_738812; 
return_direct_with_clo1(data,(closure)&c_738754,__lambda_1174,  set_cell_as_expr(&local_738812, recur_73565_731708));; 
}

static void __lambda_1174(void *data, object self_734236, int argc, object *args) /* object self_734236, object recur_73565_731708 */
 {
 object recur_73565_731708 = args[0];
  
closureN_type c_738756;
object e_738770 [4];
c_738756.hdr.mark = gc_color_red;
 c_738756.hdr.grayed = 0;
c_738756.tag = closureN_tag;
 c_738756.fn = (function_type)__lambda_545;
c_738756.num_args = 1;
c_738756.num_elements = 4;
c_738756.elements = (object *)e_738770;
c_738756.elements[0] = ((closureN)self_734236)->elements[1];
c_738756.elements[1] = ((closureN)self_734236)->elements[2];
c_738756.elements[2] = ((closureN)self_734236)->elements[4];
c_738756.elements[3] = recur_73565_731708;


closureN_type c_738771;
object e_738808 [3];
c_738771.hdr.mark = gc_color_red;
 c_738771.hdr.grayed = 0;
c_738771.tag = closureN_tag;
 c_738771.fn = (function_type)__lambda_547;
c_738771.num_args = 2;
c_738771.num_elements = 3;
c_738771.elements = (object *)e_738808;
c_738771.elements[0] = ((closureN)self_734236)->elements[0];
c_738771.elements[1] = ((closureN)self_734236)->elements[3];
c_738771.elements[2] = recur_73565_731708;

return_direct_with_clo1(data,(closure)&c_738756,__lambda_545,  &c_738771);; 
}

static void __lambda_547(void *data, object self_734237, int argc, object *args) /* object self_734237, object k_732971, object cars_73566_731709, object cdrs_73567_731710 */
 {
 object k_732971 = args[0]; object cars_73566_731709 = args[1]; object cdrs_73567_731710 = args[2];
  
closureN_type c_738773;
object e_738803 [4];
c_738773.hdr.mark = gc_color_red;
 c_738773.hdr.grayed = 0;
c_738773.tag = closureN_tag;
 c_738773.fn = (function_type)__lambda_548;
c_738773.num_args = 1;
c_738773.num_elements = 4;
c_738773.elements = (object *)e_738803;
c_738773.elements[0] = ((closureN)self_734237)->elements[0];
c_738773.elements[1] = cdrs_73567_731710;
c_738773.elements[2] = k_732971;
c_738773.elements[3] = ((closureN)self_734237)->elements[2];


object c_738806 = apply(data,(closure)&c_738773,((closureN)self_734237)->elements[1], cars_73566_731709);
return_closcall1(data,(closure)&c_738773,  c_738806);; 
}

static void __lambda_548(void *data, object self_734238, int argc, object *args) /* object self_734238, object vals_73568_731711 */
 {
 object vals_73568_731711 = args[0];
  
closureN_type c_738775;
object e_738798 [4];
c_738775.hdr.mark = gc_color_red;
 c_738775.hdr.grayed = 0;
c_738775.tag = closureN_tag;
 c_738775.fn = (function_type)__lambda_549;
c_738775.num_args = 1;
c_738775.num_elements = 4;
c_738775.elements = (object *)e_738798;
c_738775.elements[0] = ((closureN)self_734238)->elements[0];
c_738775.elements[1] = ((closureN)self_734238)->elements[2];
c_738775.elements[2] = ((closureN)self_734238)->elements[3];
c_738775.elements[3] = vals_73568_731711;


closureN_type c_738799;
object e_738802 [1];
c_738799.hdr.mark = gc_color_red;
 c_738799.hdr.grayed = 0;
c_738799.tag = closureN_tag;
 c_738799.fn = (function_type)__lambda_553;
c_738799.num_args = 0;
c_738799.num_elements = 1;
c_738799.elements = (object *)e_738802;
c_738799.elements[0] = ((closureN)self_734238)->elements[1];

return_direct_with_clo1(data,(closure)&c_738775,__lambda_549,  &c_738799);; 
}

static void __lambda_553(void *data, object self_734239, int argc, object *args) /* object self_734239, object k_732978 */
 {
 object k_732978 = args[0];
  return_direct_with_clo2(data,  __glo__75cars_87cdrs_srfi_1, (((closure)  __glo__75cars_87cdrs_srfi_1)->fn),  k_732978, ((closureN)self_734239)->elements[0]);; 
}

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


closureN_type c_738782;
object e_738797 [3];
c_738782.hdr.mark = gc_color_red;
 c_738782.hdr.grayed = 0;
c_738782.tag = closureN_tag;
 c_738782.fn = (function_type)__lambda_551;
c_738782.num_args = 2;
c_738782.num_elements = 3;
c_738782.elements = (object *)e_738797;
c_738782.elements[0] = ((closureN)self_734240)->elements[0];
c_738782.elements[1] = ((closureN)self_734240)->elements[2];
c_738782.elements[2] = ((closureN)self_734240)->elements[3];

return_direct_with_clo1(data,(closure)&c_738777,__lambda_550,  &c_738782);; 
}

static void __lambda_551(void *data, object self_734241, int argc, object *args) /* object self_734241, object k_732975, object cars2_73569_731712, object cdrs2_73570_731713 */
 {
 object k_732975 = args[0]; object cars2_73569_731712 = args[1]; object cdrs2_73570_731713 = args[2];
    
if( (boolean_f != Cyc_is_null(cars2_73569_731712)) ){ 
  return_direct_with_clo1(data,  k_732975, (((closure)  k_732975)->fn),  ((closureN)self_734241)->elements[2]);
} else { 
  


closureN_type c_738791;
object e_738796 [3];
c_738791.hdr.mark = gc_color_red;
 c_738791.hdr.grayed = 0;
c_738791.tag = closureN_tag;
 c_738791.fn = (function_type)__lambda_552;
c_738791.num_args = 1;
c_738791.num_elements = 3;
c_738791.elements = (object *)e_738796;
c_738791.elements[0] = ((closureN)self_734241)->elements[0];
c_738791.elements[1] = k_732975;
c_738791.elements[2] = ((closureN)self_734241)->elements[2];

return_closcall3(data,  car(((closureN)self_734241)->elements[1]),  &c_738791, cars2_73569_731712, cdrs2_73570_731713);}
;; 
}

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

static void __lambda_550(void *data, object self_734243, int argc, object *args) /* object self_734243, object r_732974 */
 {
 object r_732974 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734243)->elements[0], ((closureN)self_734243)->elements[1], r_732974);; 
}

static void __lambda_545(void *data, object self_734244, int argc, object *args) /* object self_734244, object r_732970 */
 {
 object r_732970 = args[0];
  
closureN_type c_738758;
object e_738766 [4];
c_738758.hdr.mark = gc_color_red;
 c_738758.hdr.grayed = 0;
c_738758.tag = closureN_tag;
 c_738758.fn = (function_type)__lambda_546;
c_738758.num_args = 1;
c_738758.num_elements = 4;
c_738758.elements = (object *)e_738766;
c_738758.elements[0] = ((closureN)self_734244)->elements[0];
c_738758.elements[1] = ((closureN)self_734244)->elements[1];
c_738758.elements[2] = ((closureN)self_734244)->elements[2];
c_738758.elements[3] = ((closureN)self_734244)->elements[3];



return_direct_with_clo1(data,(closure)&c_738758,__lambda_546,  Cyc_set_cell(data, ((closureN)self_734244)->elements[3], r_732970));; 
}

static void __lambda_546(void *data, object self_734245, int argc, object *args) /* object self_734245, object r_732969 */
 {

  

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

static void __lambda_541(void *data, object self_734246, int argc, object *args) /* object self_734246, object r_732966 */
 {
 object r_732966 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734246)->elements[0], ((closureN)self_734246)->elements[1], r_732966);; 
}

static void __lambda_537(void *data, object _, int argc, object *args) /* closure _,object k_732959, object f_73552_731696, object lis1_73553_731697, object lists_73554_731698_raw, ... */
 {
object k_732959 = args[0]; object f_73552_731696 = args[1]; object lis1_73553_731697 = args[2];
load_varargs(lists_73554_731698, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/1.sld:append-map!");
return_direct_with_clo6(data,  __glo_really_91append_91map_srfi_1, (((closure)  __glo_really_91append_91map_srfi_1)->fn),  k_732959, __glo_append_91map_67_srfi_1, __glo_append_67_srfi_1, f_73552_731696, lis1_73553_731697, lists_73554_731698);; 
}

static void __lambda_536(void *data, object _, int argc, object *args) /* closure _,object k_732956, object f_73549_731693, object lis1_73550_731694, object lists_73551_731695_raw, ... */
 {
object k_732956 = args[0]; object f_73549_731693 = args[1]; object lis1_73550_731694 = args[2];
load_varargs(lists_73551_731695, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/1.sld:append-map");
return_direct_with_clo6(data,  __glo_really_91append_91map_srfi_1, (((closure)  __glo_really_91append_91map_srfi_1)->fn),  k_732956, __glo_append_91map_srfi_1, __glo_append_scheme_base, f_73549_731693, lis1_73550_731694, lists_73551_731695);; 
}

static void __lambda_527(void *data, object _, int argc, object *args) /* closure _,object k_732942, object f_73540_731685, object ridentity_73541_731686, object lis_73542_731687 */
 {
object k_732942 = args[0]; object f_73540_731685 = args[1]; object ridentity_73541_731686 = args[2]; object lis_73542_731687 = args[3];
  Cyc_st_add(data, "srfi/1.sld:reduce-right");

closureN_type c_738665;
object e_738726 [4];
c_738665.hdr.mark = gc_color_red;
 c_738665.hdr.grayed = 0;
c_738665.tag = closureN_tag;
 c_738665.fn = (function_type)__lambda_528;
c_738665.num_args = 1;
c_738665.num_elements = 4;
c_738665.elements = (object *)e_738726;
c_738665.elements[0] = f_73540_731685;
c_738665.elements[1] = k_732942;
c_738665.elements[2] = lis_73542_731687;
c_738665.elements[3] = ridentity_73541_731686;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_738665, primitive_procedure_127, f_73540_731685, __glo_reduce_91right_srfi_1);; 
}

static void __lambda_528(void *data, object self_734221, int argc, object *args) /* object self_734221, object r_732943 */
 {

  
closureN_type c_738667;
object e_738724 [4];
c_738667.hdr.mark = gc_color_red;
 c_738667.hdr.grayed = 0;
c_738667.tag = closureN_tag;
 c_738667.fn = (function_type)__lambda_529;
c_738667.num_args = 1;
c_738667.num_elements = 4;
c_738667.elements = (object *)e_738724;
c_738667.elements[0] = ((closureN)self_734221)->elements[0];
c_738667.elements[1] = ((closureN)self_734221)->elements[1];
c_738667.elements[2] = ((closureN)self_734221)->elements[2];
c_738667.elements[3] = ((closureN)self_734221)->elements[3];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_738667, ((closureN)self_734221)->elements[2]);; 
}

static void __lambda_529(void *data, object self_734222, int argc, object *args) /* object self_734222, object r_732944 */
 {
 object r_732944 = args[0];
  if( (boolean_f != r_732944) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734222)->elements[1], (((closure)  ((closureN)self_734222)->elements[1])->fn),  ((closureN)self_734222)->elements[3]);
} else { 
  
closureN_type c_738672;
object e_738717 [2];
c_738672.hdr.mark = gc_color_red;
 c_738672.hdr.grayed = 0;
c_738672.tag = closureN_tag;
 c_738672.fn = (function_type)__lambda_530;
c_738672.num_args = 2;
c_738672.num_elements = 2;
c_738672.elements = (object *)e_738717;
c_738672.elements[0] = ((closureN)self_734222)->elements[0];
c_738672.elements[1] = ((closureN)self_734222)->elements[1];





return_direct_with_clo2(data,(closure)&c_738672,__lambda_530,  Cyc_car(data, ((closureN)self_734222)->elements[2]), Cyc_cdr(data, ((closureN)self_734222)->elements[2]));}
;; 
}

static void __lambda_530(void *data, object self_734223, int argc, object *args) /* object self_734223, object head_73544_731688, object lis_73545_731689 */
 {
 object head_73544_731688 = args[0]; object lis_73545_731689 = args[1];
  
closureN_type c_738674;
object e_738716 [4];
c_738674.hdr.mark = gc_color_red;
 c_738674.hdr.grayed = 0;
c_738674.tag = closureN_tag;
 c_738674.fn = (function_type)__lambda_531;
c_738674.num_args = 1;
c_738674.num_elements = 4;
c_738674.elements = (object *)e_738716;
c_738674.elements[0] = ((closureN)self_734223)->elements[0];
c_738674.elements[1] = head_73544_731688;
c_738674.elements[2] = ((closureN)self_734223)->elements[1];
c_738674.elements[3] = lis_73545_731689;

return_direct_with_clo1(data,(closure)&c_738674,__lambda_531,  boolean_f);; 
}

static void __lambda_531(void *data, object self_734224, int argc, object *args) /* object self_734224, object recur_73546_731690 */
 {
 object recur_73546_731690 = args[0];
  
closureN_type c_738676;
object e_738712 [4];
c_738676.hdr.mark = gc_color_red;
 c_738676.hdr.grayed = 0;
c_738676.tag = closureN_tag;
 c_738676.fn = (function_type)__lambda_1173;
c_738676.num_args = 1;
c_738676.num_elements = 4;
c_738676.elements = (object *)e_738712;
c_738676.elements[0] = ((closureN)self_734224)->elements[0];
c_738676.elements[1] = ((closureN)self_734224)->elements[1];
c_738676.elements[2] = ((closureN)self_734224)->elements[2];
c_738676.elements[3] = ((closureN)self_734224)->elements[3];


pair_type local_738715; 
return_direct_with_clo1(data,(closure)&c_738676,__lambda_1173,  set_cell_as_expr(&local_738715, recur_73546_731690));; 
}

static void __lambda_1173(void *data, object self_734225, int argc, object *args) /* object self_734225, object recur_73546_731690 */
 {
 object recur_73546_731690 = args[0];
  
closureN_type c_738678;
object e_738692 [4];
c_738678.hdr.mark = gc_color_red;
 c_738678.hdr.grayed = 0;
c_738678.tag = closureN_tag;
 c_738678.fn = (function_type)__lambda_532;
c_738678.num_args = 1;
c_738678.num_elements = 4;
c_738678.elements = (object *)e_738692;
c_738678.elements[0] = ((closureN)self_734225)->elements[1];
c_738678.elements[1] = ((closureN)self_734225)->elements[2];
c_738678.elements[2] = ((closureN)self_734225)->elements[3];
c_738678.elements[3] = recur_73546_731690;


closureN_type c_738693;
object e_738711 [2];
c_738693.hdr.mark = gc_color_red;
 c_738693.hdr.grayed = 0;
c_738693.tag = closureN_tag;
 c_738693.fn = (function_type)__lambda_534;
c_738693.num_args = 2;
c_738693.num_elements = 2;
c_738693.elements = (object *)e_738711;
c_738693.elements[0] = ((closureN)self_734225)->elements[0];
c_738693.elements[1] = recur_73546_731690;

return_direct_with_clo1(data,(closure)&c_738678,__lambda_532,  &c_738693);; 
}

static void __lambda_534(void *data, object self_734226, int argc, object *args) /* object self_734226, object k_732949, object head_73547_731691, object lis_73548_731692 */
 {
 object k_732949 = args[0]; object head_73547_731691 = args[1]; object lis_73548_731692 = args[2];
    
if( (boolean_f != Cyc_is_pair(lis_73548_731692)) ){ 
  


closureN_type c_738700;
object e_738705 [3];
c_738700.hdr.mark = gc_color_red;
 c_738700.hdr.grayed = 0;
c_738700.tag = closureN_tag;
 c_738700.fn = (function_type)__lambda_535;
c_738700.num_args = 1;
c_738700.num_elements = 3;
c_738700.elements = (object *)e_738705;
c_738700.elements[0] = ((closureN)self_734226)->elements[0];
c_738700.elements[1] = head_73547_731691;
c_738700.elements[2] = k_732949;





return_closcall3(data,  car(((closureN)self_734226)->elements[1]),  &c_738700, Cyc_car(data, lis_73548_731692), Cyc_cdr(data, lis_73548_731692));
} else { 
  return_direct_with_clo1(data,  k_732949, (((closure)  k_732949)->fn),  head_73547_731691);}
;; 
}

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

static void __lambda_532(void *data, object self_734228, int argc, object *args) /* object self_734228, object r_732948 */
 {
 object r_732948 = args[0];
  
closureN_type c_738680;
object e_738688 [4];
c_738680.hdr.mark = gc_color_red;
 c_738680.hdr.grayed = 0;
c_738680.tag = closureN_tag;
 c_738680.fn = (function_type)__lambda_533;
c_738680.num_args = 1;
c_738680.num_elements = 4;
c_738680.elements = (object *)e_738688;
c_738680.elements[0] = ((closureN)self_734228)->elements[0];
c_738680.elements[1] = ((closureN)self_734228)->elements[1];
c_738680.elements[2] = ((closureN)self_734228)->elements[2];
c_738680.elements[3] = ((closureN)self_734228)->elements[3];



return_direct_with_clo1(data,(closure)&c_738680,__lambda_533,  Cyc_set_cell(data, ((closureN)self_734228)->elements[3], r_732948));; 
}

static void __lambda_533(void *data, object self_734229, int argc, object *args) /* object self_734229, object r_732947 */
 {

  

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

static void __lambda_523(void *data, object _, int argc, object *args) /* closure _,object k_732935, object f_73537_731682, object ridentity_73538_731683, object lis_73539_731684 */
 {
object k_732935 = args[0]; object f_73537_731682 = args[1]; object ridentity_73538_731683 = args[2]; object lis_73539_731684 = args[3];
  Cyc_st_add(data, "srfi/1.sld:reduce");

closureN_type c_738642;
object e_738662 [4];
c_738642.hdr.mark = gc_color_red;
 c_738642.hdr.grayed = 0;
c_738642.tag = closureN_tag;
 c_738642.fn = (function_type)__lambda_524;
c_738642.num_args = 1;
c_738642.num_elements = 4;
c_738642.elements = (object *)e_738662;
c_738642.elements[0] = f_73537_731682;
c_738642.elements[1] = k_732935;
c_738642.elements[2] = lis_73539_731684;
c_738642.elements[3] = ridentity_73538_731683;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_738642, primitive_procedure_127, f_73537_731682, __glo_reduce_srfi_1);; 
}

static void __lambda_524(void *data, object self_734218, int argc, object *args) /* object self_734218, object r_732936 */
 {

  
closureN_type c_738644;
object e_738660 [4];
c_738644.hdr.mark = gc_color_red;
 c_738644.hdr.grayed = 0;
c_738644.tag = closureN_tag;
 c_738644.fn = (function_type)__lambda_525;
c_738644.num_args = 1;
c_738644.num_elements = 4;
c_738644.elements = (object *)e_738660;
c_738644.elements[0] = ((closureN)self_734218)->elements[0];
c_738644.elements[1] = ((closureN)self_734218)->elements[1];
c_738644.elements[2] = ((closureN)self_734218)->elements[2];
c_738644.elements[3] = ((closureN)self_734218)->elements[3];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_738644, ((closureN)self_734218)->elements[2]);; 
}

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



return_direct_with_clo1(data,(closure)&c_738649,__lambda_526,  Cyc_car(data, ((closureN)self_734219)->elements[2]));}
;; 
}

static void __lambda_526(void *data, object self_734220, int argc, object *args) /* object self_734220, object r_732938 */
 {
 object r_732938 = args[0];
  

return_direct_with_clo4(data,  __glo_fold_srfi_1, (((closure)  __glo_fold_srfi_1)->fn),  ((closureN)self_734220)->elements[1], ((closureN)self_734220)->elements[0], r_732938, Cyc_cdr(data, ((closureN)self_734220)->elements[2]));; 
}

static void __lambda_505(void *data, object _, int argc, object *args) /* closure _,object k_732915, object f_73519_731666, object zero_73520_731667, object lis1_73521_731668, object lists_73522_731669_raw, ... */
 {
object k_732915 = args[0]; object f_73519_731666 = args[1]; object zero_73520_731667 = args[2]; object lis1_73521_731668 = args[3];
load_varargs(lists_73522_731669, args, 4, argc - 4);
  Cyc_st_add(data, "srfi/1.sld:pair-fold");

closureN_type c_738514;
object e_738639 [5];
c_738514.hdr.mark = gc_color_red;
 c_738514.hdr.grayed = 0;
c_738514.tag = closureN_tag;
 c_738514.fn = (function_type)__lambda_506;
c_738514.num_args = 1;
c_738514.num_elements = 5;
c_738514.elements = (object *)e_738639;
c_738514.elements[0] = f_73519_731666;
c_738514.elements[1] = k_732915;
c_738514.elements[2] = lis1_73521_731668;
c_738514.elements[3] = lists_73522_731669;
c_738514.elements[4] = zero_73520_731667;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_738514, primitive_procedure_127, f_73519_731666, __glo_pair_91fold_srfi_1);; 
}

static void __lambda_506(void *data, object self_734199, int argc, object *args) /* object self_734199, object r_732916 */
 {

    
if( (boolean_f != Cyc_is_pair(((closureN)self_734199)->elements[3])) ){ 
  
closureN_type c_738519;
object e_738576 [2];
c_738519.hdr.mark = gc_color_red;
 c_738519.hdr.grayed = 0;
c_738519.tag = closureN_tag;
 c_738519.fn = (function_type)__lambda_507;
c_738519.num_args = 2;
c_738519.num_elements = 2;
c_738519.elements = (object *)e_738576;
c_738519.elements[0] = ((closureN)self_734199)->elements[0];
c_738519.elements[1] = ((closureN)self_734199)->elements[1];


pair_type local_738579; 
return_direct_with_clo2(data,(closure)&c_738519,__lambda_507,  set_pair_as_expr(&local_738579, ((closureN)self_734199)->elements[2], ((closureN)self_734199)->elements[3]), ((closureN)self_734199)->elements[4]);
} else { 
  
closureN_type c_738584;
object e_738636 [2];
c_738584.hdr.mark = gc_color_red;
 c_738584.hdr.grayed = 0;
c_738584.tag = closureN_tag;
 c_738584.fn = (function_type)__lambda_515;
c_738584.num_args = 2;
c_738584.num_elements = 2;
c_738584.elements = (object *)e_738636;
c_738584.elements[0] = ((closureN)self_734199)->elements[0];
c_738584.elements[1] = ((closureN)self_734199)->elements[1];

return_direct_with_clo2(data,(closure)&c_738584,__lambda_515,  ((closureN)self_734199)->elements[2], ((closureN)self_734199)->elements[4]);}
;; 
}

static void __lambda_515(void *data, object self_734209, int argc, object *args) /* object self_734209, object lis_73531_731676, object ans_73532_731677 */
 {
 object lis_73531_731676 = args[0]; object ans_73532_731677 = args[1];
  
closureN_type c_738586;
object e_738635 [4];
c_738586.hdr.mark = gc_color_red;
 c_738586.hdr.grayed = 0;
c_738586.tag = closureN_tag;
 c_738586.fn = (function_type)__lambda_516;
c_738586.num_args = 1;
c_738586.num_elements = 4;
c_738586.elements = (object *)e_738635;
c_738586.elements[0] = ans_73532_731677;
c_738586.elements[1] = ((closureN)self_734209)->elements[0];
c_738586.elements[2] = ((closureN)self_734209)->elements[1];
c_738586.elements[3] = lis_73531_731676;

return_direct_with_clo1(data,(closure)&c_738586,__lambda_516,  boolean_f);; 
}

static void __lambda_516(void *data, object self_734210, int argc, object *args) /* object self_734210, object lp_73533_731678 */
 {
 object lp_73533_731678 = args[0];
  
closureN_type c_738588;
object e_738631 [4];
c_738588.hdr.mark = gc_color_red;
 c_738588.hdr.grayed = 0;
c_738588.tag = closureN_tag;
 c_738588.fn = (function_type)__lambda_1172;
c_738588.num_args = 1;
c_738588.num_elements = 4;
c_738588.elements = (object *)e_738631;
c_738588.elements[0] = ((closureN)self_734210)->elements[0];
c_738588.elements[1] = ((closureN)self_734210)->elements[1];
c_738588.elements[2] = ((closureN)self_734210)->elements[2];
c_738588.elements[3] = ((closureN)self_734210)->elements[3];


pair_type local_738634; 
return_direct_with_clo1(data,(closure)&c_738588,__lambda_1172,  set_cell_as_expr(&local_738634, lp_73533_731678));; 
}

static void __lambda_1172(void *data, object self_734211, int argc, object *args) /* object self_734211, object lp_73533_731678 */
 {
 object lp_73533_731678 = args[0];
  
closureN_type c_738590;
object e_738604 [4];
c_738590.hdr.mark = gc_color_red;
 c_738590.hdr.grayed = 0;
c_738590.tag = closureN_tag;
 c_738590.fn = (function_type)__lambda_517;
c_738590.num_args = 1;
c_738590.num_elements = 4;
c_738590.elements = (object *)e_738604;
c_738590.elements[0] = ((closureN)self_734211)->elements[0];
c_738590.elements[1] = ((closureN)self_734211)->elements[2];
c_738590.elements[2] = ((closureN)self_734211)->elements[3];
c_738590.elements[3] = lp_73533_731678;


closureN_type c_738605;
object e_738630 [2];
c_738605.hdr.mark = gc_color_red;
 c_738605.hdr.grayed = 0;
c_738605.tag = closureN_tag;
 c_738605.fn = (function_type)__lambda_519;
c_738605.num_args = 2;
c_738605.num_elements = 2;
c_738605.elements = (object *)e_738630;
c_738605.elements[0] = ((closureN)self_734211)->elements[1];
c_738605.elements[1] = lp_73533_731678;

return_direct_with_clo1(data,(closure)&c_738590,__lambda_517,  &c_738605);; 
}

static void __lambda_519(void *data, object self_734212, int argc, object *args) /* object self_734212, object k_732929, object lis_73534_731679, object ans_73535_731680 */
 {
 object k_732929 = args[0]; object lis_73534_731679 = args[1]; object ans_73535_731680 = args[2];
  
closureN_type c_738607;
object e_738629 [5];
c_738607.hdr.mark = gc_color_red;
 c_738607.hdr.grayed = 0;
c_738607.tag = closureN_tag;
 c_738607.fn = (function_type)__lambda_520;
c_738607.num_args = 1;
c_738607.num_elements = 5;
c_738607.elements = (object *)e_738629;
c_738607.elements[0] = ans_73535_731680;
c_738607.elements[1] = ((closureN)self_734212)->elements[0];
c_738607.elements[2] = k_732929;
c_738607.elements[3] = lis_73534_731679;
c_738607.elements[4] = ((closureN)self_734212)->elements[1];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_738607, lis_73534_731679);; 
}

static void __lambda_520(void *data, object self_734213, int argc, object *args) /* object self_734213, object r_732930 */
 {
 object r_732930 = args[0];
  if( (boolean_f != r_732930) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734213)->elements[2], (((closure)  ((closureN)self_734213)->elements[2])->fn),  ((closureN)self_734213)->elements[0]);
} else { 
  
closureN_type c_738612;
object e_738625 [5];
c_738612.hdr.mark = gc_color_red;
 c_738612.hdr.grayed = 0;
c_738612.tag = closureN_tag;
 c_738612.fn = (function_type)__lambda_521;
c_738612.num_args = 1;
c_738612.num_elements = 5;
c_738612.elements = (object *)e_738625;
c_738612.elements[0] = ((closureN)self_734213)->elements[0];
c_738612.elements[1] = ((closureN)self_734213)->elements[1];
c_738612.elements[2] = ((closureN)self_734213)->elements[2];
c_738612.elements[3] = ((closureN)self_734213)->elements[3];
c_738612.elements[4] = ((closureN)self_734213)->elements[4];



return_direct_with_clo1(data,(closure)&c_738612,__lambda_521,  Cyc_cdr(data, ((closureN)self_734213)->elements[3]));}
;; 
}

static void __lambda_521(void *data, object self_734214, int argc, object *args) /* object self_734214, object tail_73536_731681 */
 {
 object tail_73536_731681 = args[0];
  
closureN_type c_738615;
object e_738622 [3];
c_738615.hdr.mark = gc_color_red;
 c_738615.hdr.grayed = 0;
c_738615.tag = closureN_tag;
 c_738615.fn = (function_type)__lambda_522;
c_738615.num_args = 1;
c_738615.num_elements = 3;
c_738615.elements = (object *)e_738622;
c_738615.elements[0] = ((closureN)self_734214)->elements[2];
c_738615.elements[1] = ((closureN)self_734214)->elements[4];
c_738615.elements[2] = tail_73536_731681;

return_closcall3(data,  ((closureN)self_734214)->elements[1],  &c_738615, ((closureN)self_734214)->elements[3], ((closureN)self_734214)->elements[0]);; 
}

static void __lambda_522(void *data, object self_734215, int argc, object *args) /* object self_734215, object r_732932 */
 {
 object r_732932 = args[0];
  

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

static void __lambda_517(void *data, object self_734216, int argc, object *args) /* object self_734216, object r_732928 */
 {
 object r_732928 = args[0];
  
closureN_type c_738592;
object e_738600 [4];
c_738592.hdr.mark = gc_color_red;
 c_738592.hdr.grayed = 0;
c_738592.tag = closureN_tag;
 c_738592.fn = (function_type)__lambda_518;
c_738592.num_args = 1;
c_738592.num_elements = 4;
c_738592.elements = (object *)e_738600;
c_738592.elements[0] = ((closureN)self_734216)->elements[0];
c_738592.elements[1] = ((closureN)self_734216)->elements[1];
c_738592.elements[2] = ((closureN)self_734216)->elements[2];
c_738592.elements[3] = ((closureN)self_734216)->elements[3];



return_direct_with_clo1(data,(closure)&c_738592,__lambda_518,  Cyc_set_cell(data, ((closureN)self_734216)->elements[3], r_732928));; 
}

static void __lambda_518(void *data, object self_734217, int argc, object *args) /* object self_734217, object r_732927 */
 {

  

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

static void __lambda_507(void *data, object self_734200, int argc, object *args) /* object self_734200, object lists_73524_731670, object ans_73525_731671 */
 {
 object lists_73524_731670 = args[0]; object ans_73525_731671 = args[1];
  
closureN_type c_738521;
object e_738575 [4];
c_738521.hdr.mark = gc_color_red;
 c_738521.hdr.grayed = 0;
c_738521.tag = closureN_tag;
 c_738521.fn = (function_type)__lambda_508;
c_738521.num_args = 1;
c_738521.num_elements = 4;
c_738521.elements = (object *)e_738575;
c_738521.elements[0] = ans_73525_731671;
c_738521.elements[1] = ((closureN)self_734200)->elements[0];
c_738521.elements[2] = ((closureN)self_734200)->elements[1];
c_738521.elements[3] = lists_73524_731670;

return_direct_with_clo1(data,(closure)&c_738521,__lambda_508,  boolean_f);; 
}

static void __lambda_508(void *data, object self_734201, int argc, object *args) /* object self_734201, object lp_73526_731672 */
 {
 object lp_73526_731672 = args[0];
  
closureN_type c_738523;
object e_738571 [4];
c_738523.hdr.mark = gc_color_red;
 c_738523.hdr.grayed = 0;
c_738523.tag = closureN_tag;
 c_738523.fn = (function_type)__lambda_1171;
c_738523.num_args = 1;
c_738523.num_elements = 4;
c_738523.elements = (object *)e_738571;
c_738523.elements[0] = ((closureN)self_734201)->elements[0];
c_738523.elements[1] = ((closureN)self_734201)->elements[1];
c_738523.elements[2] = ((closureN)self_734201)->elements[2];
c_738523.elements[3] = ((closureN)self_734201)->elements[3];


pair_type local_738574; 
return_direct_with_clo1(data,(closure)&c_738523,__lambda_1171,  set_cell_as_expr(&local_738574, lp_73526_731672));; 
}

static void __lambda_1171(void *data, object self_734202, int argc, object *args) /* object self_734202, object lp_73526_731672 */
 {
 object lp_73526_731672 = args[0];
  
closureN_type c_738525;
object e_738539 [4];
c_738525.hdr.mark = gc_color_red;
 c_738525.hdr.grayed = 0;
c_738525.tag = closureN_tag;
 c_738525.fn = (function_type)__lambda_509;
c_738525.num_args = 1;
c_738525.num_elements = 4;
c_738525.elements = (object *)e_738539;
c_738525.elements[0] = ((closureN)self_734202)->elements[0];
c_738525.elements[1] = ((closureN)self_734202)->elements[2];
c_738525.elements[2] = ((closureN)self_734202)->elements[3];
c_738525.elements[3] = lp_73526_731672;


closureN_type c_738540;
object e_738570 [2];
c_738540.hdr.mark = gc_color_red;
 c_738540.hdr.grayed = 0;
c_738540.tag = closureN_tag;
 c_738540.fn = (function_type)__lambda_511;
c_738540.num_args = 2;
c_738540.num_elements = 2;
c_738540.elements = (object *)e_738570;
c_738540.elements[0] = ((closureN)self_734202)->elements[1];
c_738540.elements[1] = lp_73526_731672;

return_direct_with_clo1(data,(closure)&c_738525,__lambda_509,  &c_738540);; 
}

static void __lambda_511(void *data, object self_734203, int argc, object *args) /* object self_734203, object k_732921, object lists_73527_731673, object ans_73528_731674 */
 {
 object k_732921 = args[0]; object lists_73527_731673 = args[1]; object ans_73528_731674 = args[2];
  
closureN_type c_738542;
object e_738569 [5];
c_738542.hdr.mark = gc_color_red;
 c_738542.hdr.grayed = 0;
c_738542.tag = closureN_tag;
 c_738542.fn = (function_type)__lambda_512;
c_738542.num_args = 1;
c_738542.num_elements = 5;
c_738542.elements = (object *)e_738569;
c_738542.elements[0] = ans_73528_731674;
c_738542.elements[1] = ((closureN)self_734203)->elements[0];
c_738542.elements[2] = k_732921;
c_738542.elements[3] = lists_73527_731673;
c_738542.elements[4] = ((closureN)self_734203)->elements[1];

return_direct_with_clo2(data,  __glo__75cdrs_srfi_1, (((closure)  __glo__75cdrs_srfi_1)->fn),  &c_738542, lists_73527_731673);; 
}

static void __lambda_512(void *data, object self_734204, int argc, object *args) /* object self_734204, object tails_73529_731675 */
 {
 object tails_73529_731675 = args[0];
    
if( (boolean_f != Cyc_is_null(tails_73529_731675)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734204)->elements[2], (((closure)  ((closureN)self_734204)->elements[2])->fn),  ((closureN)self_734204)->elements[0]);
} else { 
  
closureN_type c_738549;
object e_738563 [4];
c_738549.hdr.mark = gc_color_red;
 c_738549.hdr.grayed = 0;
c_738549.tag = closureN_tag;
 c_738549.fn = (function_type)__lambda_513;
c_738549.num_args = 1;
c_738549.num_elements = 4;
c_738549.elements = (object *)e_738563;
c_738549.elements[0] = ((closureN)self_734204)->elements[1];
c_738549.elements[1] = ((closureN)self_734204)->elements[2];
c_738549.elements[2] = ((closureN)self_734204)->elements[4];
c_738549.elements[3] = tails_73529_731675;


pair_type local_738567; 
return_direct_with_clo3(data,  __glo_append_67_srfi_1, (((closure)  __glo_append_67_srfi_1)->fn),  &c_738549, ((closureN)self_734204)->elements[3], set_cell_as_expr(&local_738567, ((closureN)self_734204)->elements[0]));}
;; 
}

static void __lambda_513(void *data, object self_734205, int argc, object *args) /* object self_734205, object r_732925 */
 {
 object r_732925 = args[0];
  
closureN_type c_738551;
object e_738558 [3];
c_738551.hdr.mark = gc_color_red;
 c_738551.hdr.grayed = 0;
c_738551.tag = closureN_tag;
 c_738551.fn = (function_type)__lambda_514;
c_738551.num_args = 1;
c_738551.num_elements = 3;
c_738551.elements = (object *)e_738558;
c_738551.elements[0] = ((closureN)self_734205)->elements[1];
c_738551.elements[1] = ((closureN)self_734205)->elements[2];
c_738551.elements[2] = ((closureN)self_734205)->elements[3];


object c_738561 = apply(data,(closure)&c_738551,((closureN)self_734205)->elements[0], r_732925);
return_closcall1(data,(closure)&c_738551,  c_738561);; 
}

static void __lambda_514(void *data, object self_734206, int argc, object *args) /* object self_734206, object r_732924 */
 {
 object r_732924 = args[0];
  

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

static void __lambda_509(void *data, object self_734207, int argc, object *args) /* object self_734207, object r_732920 */
 {
 object r_732920 = args[0];
  
closureN_type c_738527;
object e_738535 [4];
c_738527.hdr.mark = gc_color_red;
 c_738527.hdr.grayed = 0;
c_738527.tag = closureN_tag;
 c_738527.fn = (function_type)__lambda_510;
c_738527.num_args = 1;
c_738527.num_elements = 4;
c_738527.elements = (object *)e_738535;
c_738527.elements[0] = ((closureN)self_734207)->elements[0];
c_738527.elements[1] = ((closureN)self_734207)->elements[1];
c_738527.elements[2] = ((closureN)self_734207)->elements[2];
c_738527.elements[3] = ((closureN)self_734207)->elements[3];



return_direct_with_clo1(data,(closure)&c_738527,__lambda_510,  Cyc_set_cell(data, ((closureN)self_734207)->elements[3], r_732920));; 
}

static void __lambda_510(void *data, object self_734208, int argc, object *args) /* object self_734208, object r_732919 */
 {

  

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

static void __lambda_487(void *data, object _, int argc, object *args) /* closure _,object k_732895, object f_73506_731655, object zero_73507_731656, object lis1_73508_731657, object lists_73509_731658_raw, ... */
 {
object k_732895 = args[0]; object f_73506_731655 = args[1]; object zero_73507_731656 = args[2]; object lis1_73508_731657 = args[3];
load_varargs(lists_73509_731658, args, 4, argc - 4);
  Cyc_st_add(data, "srfi/1.sld:pair-fold-right");

closureN_type c_738394;
object e_738511 [5];
c_738394.hdr.mark = gc_color_red;
 c_738394.hdr.grayed = 0;
c_738394.tag = closureN_tag;
 c_738394.fn = (function_type)__lambda_488;
c_738394.num_args = 1;
c_738394.num_elements = 5;
c_738394.elements = (object *)e_738511;
c_738394.elements[0] = f_73506_731655;
c_738394.elements[1] = k_732895;
c_738394.elements[2] = lis1_73508_731657;
c_738394.elements[3] = lists_73509_731658;
c_738394.elements[4] = zero_73507_731656;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_738394, primitive_procedure_127, f_73506_731655, __glo_pair_91fold_91right_srfi_1);; 
}

static void __lambda_488(void *data, object self_734180, int argc, object *args) /* object self_734180, object r_732896 */
 {

    
if( (boolean_f != Cyc_is_pair(((closureN)self_734180)->elements[3])) ){ 
  
closureN_type c_738399;
object e_738453 [3];
c_738399.hdr.mark = gc_color_red;
 c_738399.hdr.grayed = 0;
c_738399.tag = closureN_tag;
 c_738399.fn = (function_type)__lambda_489;
c_738399.num_args = 1;
c_738399.num_elements = 3;
c_738399.elements = (object *)e_738453;
c_738399.elements[0] = ((closureN)self_734180)->elements[0];
c_738399.elements[1] = ((closureN)self_734180)->elements[1];
c_738399.elements[2] = ((closureN)self_734180)->elements[4];


pair_type local_738456; 
return_direct_with_clo1(data,(closure)&c_738399,__lambda_489,  set_pair_as_expr(&local_738456, ((closureN)self_734180)->elements[2], ((closureN)self_734180)->elements[3]));
} else { 
  
closureN_type c_738460;
object e_738509 [3];
c_738460.hdr.mark = gc_color_red;
 c_738460.hdr.grayed = 0;
c_738460.tag = closureN_tag;
 c_738460.fn = (function_type)__lambda_497;
c_738460.num_args = 1;
c_738460.num_elements = 3;
c_738460.elements = (object *)e_738509;
c_738460.elements[0] = ((closureN)self_734180)->elements[0];
c_738460.elements[1] = ((closureN)self_734180)->elements[1];
c_738460.elements[2] = ((closureN)self_734180)->elements[4];

return_direct_with_clo1(data,(closure)&c_738460,__lambda_497,  ((closureN)self_734180)->elements[2]);}
;; 
}

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

return_direct_with_clo1(data,(closure)&c_738462,__lambda_498,  boolean_f);; 
}

static void __lambda_498(void *data, object self_734191, int argc, object *args) /* object self_734191, object recur_73517_731664 */
 {
 object recur_73517_731664 = args[0];
  
closureN_type c_738464;
object e_738504 [4];
c_738464.hdr.mark = gc_color_red;
 c_738464.hdr.grayed = 0;
c_738464.tag = closureN_tag;
 c_738464.fn = (function_type)__lambda_1170;
c_738464.num_args = 1;
c_738464.num_elements = 4;
c_738464.elements = (object *)e_738504;
c_738464.elements[0] = ((closureN)self_734191)->elements[0];
c_738464.elements[1] = ((closureN)self_734191)->elements[1];
c_738464.elements[2] = ((closureN)self_734191)->elements[2];
c_738464.elements[3] = ((closureN)self_734191)->elements[3];


pair_type local_738507; 
return_direct_with_clo1(data,(closure)&c_738464,__lambda_1170,  set_cell_as_expr(&local_738507, recur_73517_731664));; 
}

static void __lambda_1170(void *data, object self_734192, int argc, object *args) /* object self_734192, object recur_73517_731664 */
 {
 object recur_73517_731664 = args[0];
  
closureN_type c_738466;
object e_738479 [3];
c_738466.hdr.mark = gc_color_red;
 c_738466.hdr.grayed = 0;
c_738466.tag = closureN_tag;
 c_738466.fn = (function_type)__lambda_499;
c_738466.num_args = 1;
c_738466.num_elements = 3;
c_738466.elements = (object *)e_738479;
c_738466.elements[0] = ((closureN)self_734192)->elements[1];
c_738466.elements[1] = ((closureN)self_734192)->elements[2];
c_738466.elements[2] = recur_73517_731664;


closureN_type c_738480;
object e_738503 [3];
c_738480.hdr.mark = gc_color_red;
 c_738480.hdr.grayed = 0;
c_738480.tag = closureN_tag;
 c_738480.fn = (function_type)__lambda_501;
c_738480.num_args = 1;
c_738480.num_elements = 3;
c_738480.elements = (object *)e_738503;
c_738480.elements[0] = ((closureN)self_734192)->elements[0];
c_738480.elements[1] = recur_73517_731664;
c_738480.elements[2] = ((closureN)self_734192)->elements[3];

return_direct_with_clo1(data,(closure)&c_738466,__lambda_499,  &c_738480);; 
}

static void __lambda_501(void *data, object self_734193, int argc, object *args) /* object self_734193, object k_732909, object lis_73518_731665 */
 {
 object k_732909 = args[0]; object lis_73518_731665 = args[1];
  
closureN_type c_738482;
object e_738502 [5];
c_738482.hdr.mark = gc_color_red;
 c_738482.hdr.grayed = 0;
c_738482.tag = closureN_tag;
 c_738482.fn = (function_type)__lambda_502;
c_738482.num_args = 1;
c_738482.num_elements = 5;
c_738482.elements = (object *)e_738502;
c_738482.elements[0] = ((closureN)self_734193)->elements[0];
c_738482.elements[1] = k_732909;
c_738482.elements[2] = lis_73518_731665;
c_738482.elements[3] = ((closureN)self_734193)->elements[1];
c_738482.elements[4] = ((closureN)self_734193)->elements[2];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_738482, lis_73518_731665);; 
}

static void __lambda_502(void *data, object self_734194, int argc, object *args) /* object self_734194, object r_732910 */
 {
 object r_732910 = args[0];
  if( (boolean_f != r_732910) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734194)->elements[1], (((closure)  ((closureN)self_734194)->elements[1])->fn),  ((closureN)self_734194)->elements[4]);
} else { 
  
closureN_type c_738487;
object e_738498 [4];
c_738487.hdr.mark = gc_color_red;
 c_738487.hdr.grayed = 0;
c_738487.tag = closureN_tag;
 c_738487.fn = (function_type)__lambda_503;
c_738487.num_args = 1;
c_738487.num_elements = 4;
c_738487.elements = (object *)e_738498;
c_738487.elements[0] = ((closureN)self_734194)->elements[0];
c_738487.elements[1] = ((closureN)self_734194)->elements[1];
c_738487.elements[2] = ((closureN)self_734194)->elements[2];
c_738487.elements[3] = ((closureN)self_734194)->elements[3];



return_direct_with_clo1(data,(closure)&c_738487,__lambda_503,  Cyc_cdr(data, ((closureN)self_734194)->elements[2]));}
;; 
}

static void __lambda_503(void *data, object self_734195, int argc, object *args) /* object self_734195, object r_732912 */
 {
 object r_732912 = args[0];
  


closureN_type c_738492;
object e_738497 [3];
c_738492.hdr.mark = gc_color_red;
 c_738492.hdr.grayed = 0;
c_738492.tag = closureN_tag;
 c_738492.fn = (function_type)__lambda_504;
c_738492.num_args = 1;
c_738492.num_elements = 3;
c_738492.elements = (object *)e_738497;
c_738492.elements[0] = ((closureN)self_734195)->elements[0];
c_738492.elements[1] = ((closureN)self_734195)->elements[1];
c_738492.elements[2] = ((closureN)self_734195)->elements[2];

return_closcall2(data,  car(((closureN)self_734195)->elements[3]),  &c_738492, r_732912);; 
}

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

static void __lambda_499(void *data, object self_734197, int argc, object *args) /* object self_734197, object r_732908 */
 {
 object r_732908 = args[0];
  
closureN_type c_738468;
object e_738475 [3];
c_738468.hdr.mark = gc_color_red;
 c_738468.hdr.grayed = 0;
c_738468.tag = closureN_tag;
 c_738468.fn = (function_type)__lambda_500;
c_738468.num_args = 1;
c_738468.num_elements = 3;
c_738468.elements = (object *)e_738475;
c_738468.elements[0] = ((closureN)self_734197)->elements[0];
c_738468.elements[1] = ((closureN)self_734197)->elements[1];
c_738468.elements[2] = ((closureN)self_734197)->elements[2];



return_direct_with_clo1(data,(closure)&c_738468,__lambda_500,  Cyc_set_cell(data, ((closureN)self_734197)->elements[2], r_732908));; 
}

static void __lambda_500(void *data, object self_734198, int argc, object *args) /* object self_734198, object r_732907 */
 {

  

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

static void __lambda_489(void *data, object self_734181, int argc, object *args) /* object self_734181, object lists_73511_731659 */
 {
 object lists_73511_731659 = args[0];
  
closureN_type c_738401;
object e_738452 [4];
c_738401.hdr.mark = gc_color_red;
 c_738401.hdr.grayed = 0;
c_738401.tag = closureN_tag;
 c_738401.fn = (function_type)__lambda_490;
c_738401.num_args = 1;
c_738401.num_elements = 4;
c_738401.elements = (object *)e_738452;
c_738401.elements[0] = ((closureN)self_734181)->elements[0];
c_738401.elements[1] = ((closureN)self_734181)->elements[1];
c_738401.elements[2] = lists_73511_731659;
c_738401.elements[3] = ((closureN)self_734181)->elements[2];

return_direct_with_clo1(data,(closure)&c_738401,__lambda_490,  boolean_f);; 
}

static void __lambda_490(void *data, object self_734182, int argc, object *args) /* object self_734182, object recur_73512_731660 */
 {
 object recur_73512_731660 = args[0];
  
closureN_type c_738403;
object e_738448 [4];
c_738403.hdr.mark = gc_color_red;
 c_738403.hdr.grayed = 0;
c_738403.tag = closureN_tag;
 c_738403.fn = (function_type)__lambda_1169;
c_738403.num_args = 1;
c_738403.num_elements = 4;
c_738403.elements = (object *)e_738448;
c_738403.elements[0] = ((closureN)self_734182)->elements[0];
c_738403.elements[1] = ((closureN)self_734182)->elements[1];
c_738403.elements[2] = ((closureN)self_734182)->elements[2];
c_738403.elements[3] = ((closureN)self_734182)->elements[3];


pair_type local_738451; 
return_direct_with_clo1(data,(closure)&c_738403,__lambda_1169,  set_cell_as_expr(&local_738451, recur_73512_731660));; 
}

static void __lambda_1169(void *data, object self_734183, int argc, object *args) /* object self_734183, object recur_73512_731660 */
 {
 object recur_73512_731660 = args[0];
  
closureN_type c_738405;
object e_738418 [3];
c_738405.hdr.mark = gc_color_red;
 c_738405.hdr.grayed = 0;
c_738405.tag = closureN_tag;
 c_738405.fn = (function_type)__lambda_491;
c_738405.num_args = 1;
c_738405.num_elements = 3;
c_738405.elements = (object *)e_738418;
c_738405.elements[0] = ((closureN)self_734183)->elements[1];
c_738405.elements[1] = ((closureN)self_734183)->elements[2];
c_738405.elements[2] = recur_73512_731660;


closureN_type c_738419;
object e_738447 [3];
c_738419.hdr.mark = gc_color_red;
 c_738419.hdr.grayed = 0;
c_738419.tag = closureN_tag;
 c_738419.fn = (function_type)__lambda_493;
c_738419.num_args = 1;
c_738419.num_elements = 3;
c_738419.elements = (object *)e_738447;
c_738419.elements[0] = ((closureN)self_734183)->elements[0];
c_738419.elements[1] = recur_73512_731660;
c_738419.elements[2] = ((closureN)self_734183)->elements[3];

return_direct_with_clo1(data,(closure)&c_738405,__lambda_491,  &c_738419);; 
}

static void __lambda_493(void *data, object self_734184, int argc, object *args) /* object self_734184, object k_732901, object lists_73513_731661 */
 {
 object k_732901 = args[0]; object lists_73513_731661 = args[1];
  
closureN_type c_738421;
object e_738446 [5];
c_738421.hdr.mark = gc_color_red;
 c_738421.hdr.grayed = 0;
c_738421.tag = closureN_tag;
 c_738421.fn = (function_type)__lambda_494;
c_738421.num_args = 1;
c_738421.num_elements = 5;
c_738421.elements = (object *)e_738446;
c_738421.elements[0] = ((closureN)self_734184)->elements[0];
c_738421.elements[1] = k_732901;
c_738421.elements[2] = lists_73513_731661;
c_738421.elements[3] = ((closureN)self_734184)->elements[1];
c_738421.elements[4] = ((closureN)self_734184)->elements[2];

return_direct_with_clo2(data,  __glo__75cdrs_srfi_1, (((closure)  __glo__75cdrs_srfi_1)->fn),  &c_738421, lists_73513_731661);; 
}

static void __lambda_494(void *data, object self_734185, int argc, object *args) /* object self_734185, object cdrs_73514_731662 */
 {
 object cdrs_73514_731662 = args[0];
    
if( (boolean_f != Cyc_is_null(cdrs_73514_731662)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734185)->elements[1], (((closure)  ((closureN)self_734185)->elements[1])->fn),  ((closureN)self_734185)->elements[4]);
} else { 
  


closureN_type c_738431;
object e_738445 [3];
c_738431.hdr.mark = gc_color_red;
 c_738431.hdr.grayed = 0;
c_738431.tag = closureN_tag;
 c_738431.fn = (function_type)__lambda_495;
c_738431.num_args = 1;
c_738431.num_elements = 3;
c_738431.elements = (object *)e_738445;
c_738431.elements[0] = ((closureN)self_734185)->elements[0];
c_738431.elements[1] = ((closureN)self_734185)->elements[1];
c_738431.elements[2] = ((closureN)self_734185)->elements[2];

return_closcall2(data,  car(((closureN)self_734185)->elements[3]),  &c_738431, cdrs_73514_731662);}
;; 
}

static void __lambda_495(void *data, object self_734186, int argc, object *args) /* object self_734186, object r_732906 */
 {
 object r_732906 = args[0];
  
closureN_type c_738433;
object e_738440 [2];
c_738433.hdr.mark = gc_color_red;
 c_738433.hdr.grayed = 0;
c_738433.tag = closureN_tag;
 c_738433.fn = (function_type)__lambda_496;
c_738433.num_args = 1;
c_738433.num_elements = 2;
c_738433.elements = (object *)e_738440;
c_738433.elements[0] = ((closureN)self_734186)->elements[0];
c_738433.elements[1] = ((closureN)self_734186)->elements[1];


pair_type local_738444; 
return_direct_with_clo3(data,  __glo_append_67_srfi_1, (((closure)  __glo_append_67_srfi_1)->fn),  &c_738433, ((closureN)self_734186)->elements[2], set_cell_as_expr(&local_738444, r_732906));; 
}

static void __lambda_496(void *data, object self_734187, int argc, object *args) /* object self_734187, object r_732904 */
 {
 object r_732904 = args[0];
  
object c_738438 = apply(data,  ((closureN)self_734187)->elements[1],((closureN)self_734187)->elements[0], r_732904);
return_direct_with_clo1(data,  ((closureN)self_734187)->elements[1], (((closure)  ((closureN)self_734187)->elements[1])->fn),  c_738438);; 
}

static void __lambda_491(void *data, object self_734188, int argc, object *args) /* object self_734188, object r_732900 */
 {
 object r_732900 = args[0];
  
closureN_type c_738407;
object e_738414 [3];
c_738407.hdr.mark = gc_color_red;
 c_738407.hdr.grayed = 0;
c_738407.tag = closureN_tag;
 c_738407.fn = (function_type)__lambda_492;
c_738407.num_args = 1;
c_738407.num_elements = 3;
c_738407.elements = (object *)e_738414;
c_738407.elements[0] = ((closureN)self_734188)->elements[0];
c_738407.elements[1] = ((closureN)self_734188)->elements[1];
c_738407.elements[2] = ((closureN)self_734188)->elements[2];



return_direct_with_clo1(data,(closure)&c_738407,__lambda_492,  Cyc_set_cell(data, ((closureN)self_734188)->elements[2], r_732900));; 
}

static void __lambda_492(void *data, object self_734189, int argc, object *args) /* object self_734189, object r_732899 */
 {

  

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

static void __lambda_470(void *data, object _, int argc, object *args) /* closure _,object k_732875, object kons_73492_731643, object knil_73493_731644, object lis1_73494_731645, object lists_73495_731646_raw, ... */
 {
object k_732875 = args[0]; object kons_73492_731643 = args[1]; object knil_73493_731644 = args[2]; object lis1_73494_731645 = args[3];
load_varargs(lists_73495_731646, args, 4, argc - 4);
  Cyc_st_add(data, "srfi/1.sld:fold-right");

closureN_type c_738278;
object e_738391 [5];
c_738278.hdr.mark = gc_color_red;
 c_738278.hdr.grayed = 0;
c_738278.tag = closureN_tag;
 c_738278.fn = (function_type)__lambda_471;
c_738278.num_args = 1;
c_738278.num_elements = 5;
c_738278.elements = (object *)e_738391;
c_738278.elements[0] = k_732875;
c_738278.elements[1] = knil_73493_731644;
c_738278.elements[2] = kons_73492_731643;
c_738278.elements[3] = lis1_73494_731645;
c_738278.elements[4] = lists_73495_731646;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_738278, primitive_procedure_127, kons_73492_731643, __glo_fold_91right_srfi_1);; 
}

static void __lambda_471(void *data, object self_734162, int argc, object *args) /* object self_734162, object r_732876 */
 {

    
if( (boolean_f != Cyc_is_pair(((closureN)self_734162)->elements[4])) ){ 
  
closureN_type c_738283;
object e_738334 [3];
c_738283.hdr.mark = gc_color_red;
 c_738283.hdr.grayed = 0;
c_738283.tag = closureN_tag;
 c_738283.fn = (function_type)__lambda_472;
c_738283.num_args = 1;
c_738283.num_elements = 3;
c_738283.elements = (object *)e_738334;
c_738283.elements[0] = ((closureN)self_734162)->elements[0];
c_738283.elements[1] = ((closureN)self_734162)->elements[1];
c_738283.elements[2] = ((closureN)self_734162)->elements[2];


pair_type local_738337; 
return_direct_with_clo1(data,(closure)&c_738283,__lambda_472,  set_pair_as_expr(&local_738337, ((closureN)self_734162)->elements[3], ((closureN)self_734162)->elements[4]));
} else { 
  
closureN_type c_738341;
object e_738389 [3];
c_738341.hdr.mark = gc_color_red;
 c_738341.hdr.grayed = 0;
c_738341.tag = closureN_tag;
 c_738341.fn = (function_type)__lambda_480;
c_738341.num_args = 1;
c_738341.num_elements = 3;
c_738341.elements = (object *)e_738389;
c_738341.elements[0] = ((closureN)self_734162)->elements[0];
c_738341.elements[1] = ((closureN)self_734162)->elements[1];
c_738341.elements[2] = ((closureN)self_734162)->elements[2];

return_direct_with_clo1(data,(closure)&c_738341,__lambda_480,  ((closureN)self_734162)->elements[3]);}
;; 
}

static void __lambda_480(void *data, object self_734172, int argc, object *args) /* object self_734172, object lis_73502_731651 */
 {
 object lis_73502_731651 = args[0];
  
closureN_type c_738343;
object e_738388 [4];
c_738343.hdr.mark = gc_color_red;
 c_738343.hdr.grayed = 0;
c_738343.tag = closureN_tag;
 c_738343.fn = (function_type)__lambda_481;
c_738343.num_args = 1;
c_738343.num_elements = 4;
c_738343.elements = (object *)e_738388;
c_738343.elements[0] = ((closureN)self_734172)->elements[0];
c_738343.elements[1] = ((closureN)self_734172)->elements[1];
c_738343.elements[2] = ((closureN)self_734172)->elements[2];
c_738343.elements[3] = lis_73502_731651;

return_direct_with_clo1(data,(closure)&c_738343,__lambda_481,  boolean_f);; 
}

static void __lambda_481(void *data, object self_734173, int argc, object *args) /* object self_734173, object recur_73503_731652 */
 {
 object recur_73503_731652 = args[0];
  
closureN_type c_738345;
object e_738384 [4];
c_738345.hdr.mark = gc_color_red;
 c_738345.hdr.grayed = 0;
c_738345.tag = closureN_tag;
 c_738345.fn = (function_type)__lambda_1168;
c_738345.num_args = 1;
c_738345.num_elements = 4;
c_738345.elements = (object *)e_738384;
c_738345.elements[0] = ((closureN)self_734173)->elements[0];
c_738345.elements[1] = ((closureN)self_734173)->elements[1];
c_738345.elements[2] = ((closureN)self_734173)->elements[2];
c_738345.elements[3] = ((closureN)self_734173)->elements[3];


pair_type local_738387; 
return_direct_with_clo1(data,(closure)&c_738345,__lambda_1168,  set_cell_as_expr(&local_738387, recur_73503_731652));; 
}

static void __lambda_1168(void *data, object self_734174, int argc, object *args) /* object self_734174, object recur_73503_731652 */
 {
 object recur_73503_731652 = args[0];
  
closureN_type c_738347;
object e_738360 [3];
c_738347.hdr.mark = gc_color_red;
 c_738347.hdr.grayed = 0;
c_738347.tag = closureN_tag;
 c_738347.fn = (function_type)__lambda_482;
c_738347.num_args = 1;
c_738347.num_elements = 3;
c_738347.elements = (object *)e_738360;
c_738347.elements[0] = ((closureN)self_734174)->elements[0];
c_738347.elements[1] = ((closureN)self_734174)->elements[3];
c_738347.elements[2] = recur_73503_731652;


closureN_type c_738361;
object e_738383 [3];
c_738361.hdr.mark = gc_color_red;
 c_738361.hdr.grayed = 0;
c_738361.tag = closureN_tag;
 c_738361.fn = (function_type)__lambda_484;
c_738361.num_args = 1;
c_738361.num_elements = 3;
c_738361.elements = (object *)e_738383;
c_738361.elements[0] = ((closureN)self_734174)->elements[1];
c_738361.elements[1] = ((closureN)self_734174)->elements[2];
c_738361.elements[2] = recur_73503_731652;

return_direct_with_clo1(data,(closure)&c_738347,__lambda_482,  &c_738361);; 
}

static void __lambda_484(void *data, object self_734175, int argc, object *args) /* object self_734175, object k_732888, object lis_73504_731653 */
 {
 object k_732888 = args[0]; object lis_73504_731653 = args[1];
  
closureN_type c_738363;
object e_738382 [5];
c_738363.hdr.mark = gc_color_red;
 c_738363.hdr.grayed = 0;
c_738363.tag = closureN_tag;
 c_738363.fn = (function_type)__lambda_485;
c_738363.num_args = 1;
c_738363.num_elements = 5;
c_738363.elements = (object *)e_738382;
c_738363.elements[0] = k_732888;
c_738363.elements[1] = ((closureN)self_734175)->elements[0];
c_738363.elements[2] = ((closureN)self_734175)->elements[1];
c_738363.elements[3] = lis_73504_731653;
c_738363.elements[4] = ((closureN)self_734175)->elements[2];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_738363, lis_73504_731653);; 
}

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


closureN_type c_738371;
object e_738378 [3];
c_738371.hdr.mark = gc_color_red;
 c_738371.hdr.grayed = 0;
c_738371.tag = closureN_tag;
 c_738371.fn = (function_type)__lambda_486;
c_738371.num_args = 1;
c_738371.num_elements = 3;
c_738371.elements = (object *)e_738378;
c_738371.elements[0] = ((closureN)self_734176)->elements[0];
c_738371.elements[1] = ((closureN)self_734176)->elements[2];
c_738371.elements[2] = ((closureN)self_734176)->elements[3];



return_closcall2(data,  car(((closureN)self_734176)->elements[4]),  &c_738371, Cyc_cdr(data, ((closureN)self_734176)->elements[3]));}
;; 
}

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

return_closcall3(data,  ((closureN)self_734177)->elements[1],  ((closureN)self_734177)->elements[0], Cyc_car(data, ((closureN)self_734177)->elements[2]), r_732891);; 
}

static void __lambda_482(void *data, object self_734178, int argc, object *args) /* object self_734178, object r_732887 */
 {
 object r_732887 = args[0];
  
closureN_type c_738349;
object e_738356 [3];
c_738349.hdr.mark = gc_color_red;
 c_738349.hdr.grayed = 0;
c_738349.tag = closureN_tag;
 c_738349.fn = (function_type)__lambda_483;
c_738349.num_args = 1;
c_738349.num_elements = 3;
c_738349.elements = (object *)e_738356;
c_738349.elements[0] = ((closureN)self_734178)->elements[0];
c_738349.elements[1] = ((closureN)self_734178)->elements[1];
c_738349.elements[2] = ((closureN)self_734178)->elements[2];



return_direct_with_clo1(data,(closure)&c_738349,__lambda_483,  Cyc_set_cell(data, ((closureN)self_734178)->elements[2], r_732887));; 
}

static void __lambda_483(void *data, object self_734179, int argc, object *args) /* object self_734179, object r_732886 */
 {

  

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

static void __lambda_472(void *data, object self_734163, int argc, object *args) /* object self_734163, object lists_73497_731647 */
 {
 object lists_73497_731647 = args[0];
  
closureN_type c_738285;
object e_738333 [4];
c_738285.hdr.mark = gc_color_red;
 c_738285.hdr.grayed = 0;
c_738285.tag = closureN_tag;
 c_738285.fn = (function_type)__lambda_473;
c_738285.num_args = 1;
c_738285.num_elements = 4;
c_738285.elements = (object *)e_738333;
c_738285.elements[0] = ((closureN)self_734163)->elements[0];
c_738285.elements[1] = ((closureN)self_734163)->elements[1];
c_738285.elements[2] = ((closureN)self_734163)->elements[2];
c_738285.elements[3] = lists_73497_731647;

return_direct_with_clo1(data,(closure)&c_738285,__lambda_473,  boolean_f);; 
}

static void __lambda_473(void *data, object self_734164, int argc, object *args) /* object self_734164, object recur_73498_731648 */
 {
 object recur_73498_731648 = args[0];
  
closureN_type c_738287;
object e_738329 [4];
c_738287.hdr.mark = gc_color_red;
 c_738287.hdr.grayed = 0;
c_738287.tag = closureN_tag;
 c_738287.fn = (function_type)__lambda_1167;
c_738287.num_args = 1;
c_738287.num_elements = 4;
c_738287.elements = (object *)e_738329;
c_738287.elements[0] = ((closureN)self_734164)->elements[0];
c_738287.elements[1] = ((closureN)self_734164)->elements[1];
c_738287.elements[2] = ((closureN)self_734164)->elements[2];
c_738287.elements[3] = ((closureN)self_734164)->elements[3];


pair_type local_738332; 
return_direct_with_clo1(data,(closure)&c_738287,__lambda_1167,  set_cell_as_expr(&local_738332, recur_73498_731648));; 
}

static void __lambda_1167(void *data, object self_734165, int argc, object *args) /* object self_734165, object recur_73498_731648 */
 {
 object recur_73498_731648 = args[0];
  
closureN_type c_738289;
object e_738302 [3];
c_738289.hdr.mark = gc_color_red;
 c_738289.hdr.grayed = 0;
c_738289.tag = closureN_tag;
 c_738289.fn = (function_type)__lambda_474;
c_738289.num_args = 1;
c_738289.num_elements = 3;
c_738289.elements = (object *)e_738302;
c_738289.elements[0] = ((closureN)self_734165)->elements[0];
c_738289.elements[1] = ((closureN)self_734165)->elements[3];
c_738289.elements[2] = recur_73498_731648;


closureN_type c_738303;
object e_738328 [3];
c_738303.hdr.mark = gc_color_red;
 c_738303.hdr.grayed = 0;
c_738303.tag = closureN_tag;
 c_738303.fn = (function_type)__lambda_476;
c_738303.num_args = 1;
c_738303.num_elements = 3;
c_738303.elements = (object *)e_738328;
c_738303.elements[0] = ((closureN)self_734165)->elements[1];
c_738303.elements[1] = ((closureN)self_734165)->elements[2];
c_738303.elements[2] = recur_73498_731648;

return_direct_with_clo1(data,(closure)&c_738289,__lambda_474,  &c_738303);; 
}

static void __lambda_476(void *data, object self_734166, int argc, object *args) /* object self_734166, object k_732881, object lists_73499_731649 */
 {
 object k_732881 = args[0]; object lists_73499_731649 = args[1];
  
closureN_type c_738305;
object e_738327 [5];
c_738305.hdr.mark = gc_color_red;
 c_738305.hdr.grayed = 0;
c_738305.tag = closureN_tag;
 c_738305.fn = (function_type)__lambda_477;
c_738305.num_args = 1;
c_738305.num_elements = 5;
c_738305.elements = (object *)e_738327;
c_738305.elements[0] = k_732881;
c_738305.elements[1] = ((closureN)self_734166)->elements[0];
c_738305.elements[2] = ((closureN)self_734166)->elements[1];
c_738305.elements[3] = lists_73499_731649;
c_738305.elements[4] = ((closureN)self_734166)->elements[2];

return_direct_with_clo2(data,  __glo__75cdrs_srfi_1, (((closure)  __glo__75cdrs_srfi_1)->fn),  &c_738305, lists_73499_731649);; 
}

static void __lambda_477(void *data, object self_734167, int argc, object *args) /* object self_734167, object cdrs_73500_731650 */
 {
 object cdrs_73500_731650 = args[0];
    
if( (boolean_f != Cyc_is_null(cdrs_73500_731650)) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734167)->elements[0], (((closure)  ((closureN)self_734167)->elements[0])->fn),  ((closureN)self_734167)->elements[1]);
} else { 
  


closureN_type c_738315;
object e_738326 [3];
c_738315.hdr.mark = gc_color_red;
 c_738315.hdr.grayed = 0;
c_738315.tag = closureN_tag;
 c_738315.fn = (function_type)__lambda_478;
c_738315.num_args = 1;
c_738315.num_elements = 3;
c_738315.elements = (object *)e_738326;
c_738315.elements[0] = ((closureN)self_734167)->elements[0];
c_738315.elements[1] = ((closureN)self_734167)->elements[2];
c_738315.elements[2] = ((closureN)self_734167)->elements[3];

return_closcall2(data,  car(((closureN)self_734167)->elements[4]),  &c_738315, cdrs_73500_731650);}
;; 
}

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

return_direct_with_clo3(data,  __glo__75cars_87_srfi_1, (((closure)  __glo__75cars_87_srfi_1)->fn),  &c_738317, ((closureN)self_734168)->elements[2], r_732885);; 
}

static void __lambda_479(void *data, object self_734169, int argc, object *args) /* object self_734169, object r_732884 */
 {
 object r_732884 = args[0];
  
object c_738322 = apply(data,  ((closureN)self_734169)->elements[0],((closureN)self_734169)->elements[1], r_732884);
return_direct_with_clo1(data,  ((closureN)self_734169)->elements[0], (((closure)  ((closureN)self_734169)->elements[0])->fn),  c_738322);; 
}

static void __lambda_474(void *data, object self_734170, int argc, object *args) /* object self_734170, object r_732880 */
 {
 object r_732880 = args[0];
  
closureN_type c_738291;
object e_738298 [3];
c_738291.hdr.mark = gc_color_red;
 c_738291.hdr.grayed = 0;
c_738291.tag = closureN_tag;
 c_738291.fn = (function_type)__lambda_475;
c_738291.num_args = 1;
c_738291.num_elements = 3;
c_738291.elements = (object *)e_738298;
c_738291.elements[0] = ((closureN)self_734170)->elements[0];
c_738291.elements[1] = ((closureN)self_734170)->elements[1];
c_738291.elements[2] = ((closureN)self_734170)->elements[2];



return_direct_with_clo1(data,(closure)&c_738291,__lambda_475,  Cyc_set_cell(data, ((closureN)self_734170)->elements[2], r_732880));; 
}

static void __lambda_475(void *data, object self_734171, int argc, object *args) /* object self_734171, object r_732879 */
 {

  

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

static void __lambda_451(void *data, object _, int argc, object *args) /* closure _,object k_732853, object kons_73474_731627, object knil_73475_731628, object lis1_73476_731629, object lists_73477_731630_raw, ... */
 {
object k_732853 = args[0]; object kons_73474_731627 = args[1]; object knil_73475_731628 = args[2]; object lis1_73476_731629 = args[3];
load_varargs(lists_73477_731630, args, 4, argc - 4);
  Cyc_st_add(data, "srfi/1.sld:fold");

closureN_type c_738148;
object e_738275 [5];
c_738148.hdr.mark = gc_color_red;
 c_738148.hdr.grayed = 0;
c_738148.tag = closureN_tag;
 c_738148.fn = (function_type)__lambda_452;
c_738148.num_args = 1;
c_738148.num_elements = 5;
c_738148.elements = (object *)e_738275;
c_738148.elements[0] = k_732853;
c_738148.elements[1] = knil_73475_731628;
c_738148.elements[2] = kons_73474_731627;
c_738148.elements[3] = lis1_73476_731629;
c_738148.elements[4] = lists_73477_731630;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_738148, primitive_procedure_127, kons_73474_731627, __glo_fold_srfi_1);; 
}

static void __lambda_452(void *data, object self_734142, int argc, object *args) /* object self_734142, object r_732854 */
 {

    
if( (boolean_f != Cyc_is_pair(((closureN)self_734142)->elements[4])) ){ 
  
closureN_type c_738153;
object e_738214 [2];
c_738153.hdr.mark = gc_color_red;
 c_738153.hdr.grayed = 0;
c_738153.tag = closureN_tag;
 c_738153.fn = (function_type)__lambda_453;
c_738153.num_args = 2;
c_738153.num_elements = 2;
c_738153.elements = (object *)e_738214;
c_738153.elements[0] = ((closureN)self_734142)->elements[0];
c_738153.elements[1] = ((closureN)self_734142)->elements[2];


pair_type local_738217; 
return_direct_with_clo2(data,(closure)&c_738153,__lambda_453,  set_pair_as_expr(&local_738217, ((closureN)self_734142)->elements[3], ((closureN)self_734142)->elements[4]), ((closureN)self_734142)->elements[1]);
} else { 
  
closureN_type c_738222;
object e_738272 [2];
c_738222.hdr.mark = gc_color_red;
 c_738222.hdr.grayed = 0;
c_738222.tag = closureN_tag;
 c_738222.fn = (function_type)__lambda_463;
c_738222.num_args = 2;
c_738222.num_elements = 2;
c_738222.elements = (object *)e_738272;
c_738222.elements[0] = ((closureN)self_734142)->elements[0];
c_738222.elements[1] = ((closureN)self_734142)->elements[2];

return_direct_with_clo2(data,(closure)&c_738222,__lambda_463,  ((closureN)self_734142)->elements[3], ((closureN)self_734142)->elements[1]);}
;; 
}

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

return_direct_with_clo1(data,(closure)&c_738224,__lambda_464,  boolean_f);; 
}

static void __lambda_464(void *data, object self_734155, int argc, object *args) /* object self_734155, object lp_73489_731640 */
 {
 object lp_73489_731640 = args[0];
  
closureN_type c_738226;
object e_738267 [4];
c_738226.hdr.mark = gc_color_red;
 c_738226.hdr.grayed = 0;
c_738226.tag = closureN_tag;
 c_738226.fn = (function_type)__lambda_1166;
c_738226.num_args = 1;
c_738226.num_elements = 4;
c_738226.elements = (object *)e_738267;
c_738226.elements[0] = ((closureN)self_734155)->elements[0];
c_738226.elements[1] = ((closureN)self_734155)->elements[1];
c_738226.elements[2] = ((closureN)self_734155)->elements[2];
c_738226.elements[3] = ((closureN)self_734155)->elements[3];


pair_type local_738270; 
return_direct_with_clo1(data,(closure)&c_738226,__lambda_1166,  set_cell_as_expr(&local_738270, lp_73489_731640));; 
}

static void __lambda_1166(void *data, object self_734156, int argc, object *args) /* object self_734156, object lp_73489_731640 */
 {
 object lp_73489_731640 = args[0];
  
closureN_type c_738228;
object e_738242 [4];
c_738228.hdr.mark = gc_color_red;
 c_738228.hdr.grayed = 0;
c_738228.tag = closureN_tag;
 c_738228.fn = (function_type)__lambda_465;
c_738228.num_args = 1;
c_738228.num_elements = 4;
c_738228.elements = (object *)e_738242;
c_738228.elements[0] = ((closureN)self_734156)->elements[0];
c_738228.elements[1] = ((closureN)self_734156)->elements[1];
c_738228.elements[2] = ((closureN)self_734156)->elements[3];
c_738228.elements[3] = lp_73489_731640;


closureN_type c_738243;
object e_738266 [2];
c_738243.hdr.mark = gc_color_red;
 c_738243.hdr.grayed = 0;
c_738243.tag = closureN_tag;
 c_738243.fn = (function_type)__lambda_467;
c_738243.num_args = 2;
c_738243.num_elements = 2;
c_738243.elements = (object *)e_738266;
c_738243.elements[0] = ((closureN)self_734156)->elements[2];
c_738243.elements[1] = lp_73489_731640;

return_direct_with_clo1(data,(closure)&c_738228,__lambda_465,  &c_738243);; 
}

static void __lambda_467(void *data, object self_734157, int argc, object *args) /* object self_734157, object k_732868, object lis_73490_731641, object ans_73491_731642 */
 {
 object k_732868 = args[0]; object lis_73490_731641 = args[1]; object ans_73491_731642 = args[2];
  
closureN_type c_738245;
object e_738265 [5];
c_738245.hdr.mark = gc_color_red;
 c_738245.hdr.grayed = 0;
c_738245.tag = closureN_tag;
 c_738245.fn = (function_type)__lambda_468;
c_738245.num_args = 1;
c_738245.num_elements = 5;
c_738245.elements = (object *)e_738265;
c_738245.elements[0] = ans_73491_731642;
c_738245.elements[1] = k_732868;
c_738245.elements[2] = ((closureN)self_734157)->elements[0];
c_738245.elements[3] = lis_73490_731641;
c_738245.elements[4] = ((closureN)self_734157)->elements[1];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_738245, lis_73490_731641);; 
}

static void __lambda_468(void *data, object self_734158, int argc, object *args) /* object self_734158, object r_732869 */
 {
 object r_732869 = args[0];
  if( (boolean_f != r_732869) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734158)->elements[1], (((closure)  ((closureN)self_734158)->elements[1])->fn),  ((closureN)self_734158)->elements[0]);
} else { 
  
closureN_type c_738251;
object e_738260 [3];
c_738251.hdr.mark = gc_color_red;
 c_738251.hdr.grayed = 0;
c_738251.tag = closureN_tag;
 c_738251.fn = (function_type)__lambda_469;
c_738251.num_args = 1;
c_738251.num_elements = 3;
c_738251.elements = (object *)e_738260;
c_738251.elements[0] = ((closureN)self_734158)->elements[1];
c_738251.elements[1] = ((closureN)self_734158)->elements[3];
c_738251.elements[2] = ((closureN)self_734158)->elements[4];



return_closcall3(data,  ((closureN)self_734158)->elements[2],  &c_738251, Cyc_car(data, ((closureN)self_734158)->elements[3]), ((closureN)self_734158)->elements[0]);}
;; 
}

static void __lambda_469(void *data, object self_734159, int argc, object *args) /* object self_734159, object r_732871 */
 {
 object r_732871 = args[0];
  



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

static void __lambda_465(void *data, object self_734160, int argc, object *args) /* object self_734160, object r_732867 */
 {
 object r_732867 = args[0];
  
closureN_type c_738230;
object e_738238 [4];
c_738230.hdr.mark = gc_color_red;
 c_738230.hdr.grayed = 0;
c_738230.tag = closureN_tag;
 c_738230.fn = (function_type)__lambda_466;
c_738230.num_args = 1;
c_738230.num_elements = 4;
c_738230.elements = (object *)e_738238;
c_738230.elements[0] = ((closureN)self_734160)->elements[0];
c_738230.elements[1] = ((closureN)self_734160)->elements[1];
c_738230.elements[2] = ((closureN)self_734160)->elements[2];
c_738230.elements[3] = ((closureN)self_734160)->elements[3];



return_direct_with_clo1(data,(closure)&c_738230,__lambda_466,  Cyc_set_cell(data, ((closureN)self_734160)->elements[3], r_732867));; 
}

static void __lambda_466(void *data, object self_734161, int argc, object *args) /* object self_734161, object r_732866 */
 {

  

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

static void __lambda_453(void *data, object self_734143, int argc, object *args) /* object self_734143, object lists_73479_731631, object ans_73480_731632 */
 {
 object lists_73479_731631 = args[0]; object ans_73480_731632 = args[1];
  
closureN_type c_738155;
object e_738213 [4];
c_738155.hdr.mark = gc_color_red;
 c_738155.hdr.grayed = 0;
c_738155.tag = closureN_tag;
 c_738155.fn = (function_type)__lambda_454;
c_738155.num_args = 1;
c_738155.num_elements = 4;
c_738155.elements = (object *)e_738213;
c_738155.elements[0] = ans_73480_731632;
c_738155.elements[1] = ((closureN)self_734143)->elements[0];
c_738155.elements[2] = ((closureN)self_734143)->elements[1];
c_738155.elements[3] = lists_73479_731631;

return_direct_with_clo1(data,(closure)&c_738155,__lambda_454,  boolean_f);; 
}

static void __lambda_454(void *data, object self_734144, int argc, object *args) /* object self_734144, object lp_73481_731633 */
 {
 object lp_73481_731633 = args[0];
  
closureN_type c_738157;
object e_738209 [4];
c_738157.hdr.mark = gc_color_red;
 c_738157.hdr.grayed = 0;
c_738157.tag = closureN_tag;
 c_738157.fn = (function_type)__lambda_1165;
c_738157.num_args = 1;
c_738157.num_elements = 4;
c_738157.elements = (object *)e_738209;
c_738157.elements[0] = ((closureN)self_734144)->elements[0];
c_738157.elements[1] = ((closureN)self_734144)->elements[1];
c_738157.elements[2] = ((closureN)self_734144)->elements[2];
c_738157.elements[3] = ((closureN)self_734144)->elements[3];


pair_type local_738212; 
return_direct_with_clo1(data,(closure)&c_738157,__lambda_1165,  set_cell_as_expr(&local_738212, lp_73481_731633));; 
}

static void __lambda_1165(void *data, object self_734145, int argc, object *args) /* object self_734145, object lp_73481_731633 */
 {
 object lp_73481_731633 = args[0];
  
closureN_type c_738159;
object e_738173 [4];
c_738159.hdr.mark = gc_color_red;
 c_738159.hdr.grayed = 0;
c_738159.tag = closureN_tag;
 c_738159.fn = (function_type)__lambda_455;
c_738159.num_args = 1;
c_738159.num_elements = 4;
c_738159.elements = (object *)e_738173;
c_738159.elements[0] = ((closureN)self_734145)->elements[0];
c_738159.elements[1] = ((closureN)self_734145)->elements[1];
c_738159.elements[2] = ((closureN)self_734145)->elements[3];
c_738159.elements[3] = lp_73481_731633;


closureN_type c_738174;
object e_738208 [2];
c_738174.hdr.mark = gc_color_red;
 c_738174.hdr.grayed = 0;
c_738174.tag = closureN_tag;
 c_738174.fn = (function_type)__lambda_457;
c_738174.num_args = 2;
c_738174.num_elements = 2;
c_738174.elements = (object *)e_738208;
c_738174.elements[0] = ((closureN)self_734145)->elements[2];
c_738174.elements[1] = lp_73481_731633;

return_direct_with_clo1(data,(closure)&c_738159,__lambda_455,  &c_738174);; 
}

static void __lambda_457(void *data, object self_734146, int argc, object *args) /* object self_734146, object k_732859, object lists_73482_731634, object ans_73483_731635 */
 {
 object k_732859 = args[0]; object lists_73482_731634 = args[1]; object ans_73483_731635 = args[2];
  
closureN_type c_738176;
object e_738202 [4];
c_738176.hdr.mark = gc_color_red;
 c_738176.hdr.grayed = 0;
c_738176.tag = closureN_tag;
 c_738176.fn = (function_type)__lambda_458;
c_738176.num_args = 1;
c_738176.num_elements = 4;
c_738176.elements = (object *)e_738202;
c_738176.elements[0] = ans_73483_731635;
c_738176.elements[1] = k_732859;
c_738176.elements[2] = ((closureN)self_734146)->elements[0];
c_738176.elements[3] = ((closureN)self_734146)->elements[1];


closureN_type c_738203;
object e_738207 [2];
c_738203.hdr.mark = gc_color_red;
 c_738203.hdr.grayed = 0;
c_738203.tag = closureN_tag;
 c_738203.fn = (function_type)__lambda_462;
c_738203.num_args = 0;
c_738203.num_elements = 2;
c_738203.elements = (object *)e_738207;
c_738203.elements[0] = ans_73483_731635;
c_738203.elements[1] = lists_73482_731634;

return_direct_with_clo1(data,(closure)&c_738176,__lambda_458,  &c_738203);; 
}

static void __lambda_462(void *data, object self_734147, int argc, object *args) /* object self_734147, object k_732865 */
 {
 object k_732865 = args[0];
  return_direct_with_clo3(data,  __glo__75cars_87cdrs_87_srfi_1, (((closure)  __glo__75cars_87cdrs_87_srfi_1)->fn),  k_732865, ((closureN)self_734147)->elements[1], ((closureN)self_734147)->elements[0]);; 
}

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


closureN_type c_738183;
object e_738201 [3];
c_738183.hdr.mark = gc_color_red;
 c_738183.hdr.grayed = 0;
c_738183.tag = closureN_tag;
 c_738183.fn = (function_type)__lambda_460;
c_738183.num_args = 2;
c_738183.num_elements = 3;
c_738183.elements = (object *)e_738201;
c_738183.elements[0] = ((closureN)self_734148)->elements[0];
c_738183.elements[1] = ((closureN)self_734148)->elements[2];
c_738183.elements[2] = ((closureN)self_734148)->elements[3];

return_direct_with_clo1(data,(closure)&c_738178,__lambda_459,  &c_738183);; 
}

static void __lambda_460(void *data, object self_734149, int argc, object *args) /* object self_734149, object k_732862, object cars_87ans_73484_731636, object cdrs_73485_731637 */
 {
 object k_732862 = args[0]; object cars_87ans_73484_731636 = args[1]; object cdrs_73485_731637 = args[2];
    
if( (boolean_f != Cyc_is_null(cars_87ans_73484_731636)) ){ 
  return_direct_with_clo1(data,  k_732862, (((closure)  k_732862)->fn),  ((closureN)self_734149)->elements[0]);
} else { 
  
closureN_type c_738189;
object e_738196 [3];
c_738189.hdr.mark = gc_color_red;
 c_738189.hdr.grayed = 0;
c_738189.tag = closureN_tag;
 c_738189.fn = (function_type)__lambda_461;
c_738189.num_args = 1;
c_738189.num_elements = 3;
c_738189.elements = (object *)e_738196;
c_738189.elements[0] = cdrs_73485_731637;
c_738189.elements[1] = k_732862;
c_738189.elements[2] = ((closureN)self_734149)->elements[2];


object c_738199 = apply(data,(closure)&c_738189,((closureN)self_734149)->elements[1], cars_87ans_73484_731636);
return_closcall1(data,(closure)&c_738189,  c_738199);}
;; 
}

static void __lambda_461(void *data, object self_734150, int argc, object *args) /* object self_734150, object r_732864 */
 {
 object r_732864 = args[0];
  

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

static void __lambda_459(void *data, object self_734151, int argc, object *args) /* object self_734151, object r_732861 */
 {
 object r_732861 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734151)->elements[0], ((closureN)self_734151)->elements[1], r_732861);; 
}

static void __lambda_455(void *data, object self_734152, int argc, object *args) /* object self_734152, object r_732858 */
 {
 object r_732858 = args[0];
  
closureN_type c_738161;
object e_738169 [4];
c_738161.hdr.mark = gc_color_red;
 c_738161.hdr.grayed = 0;
c_738161.tag = closureN_tag;
 c_738161.fn = (function_type)__lambda_456;
c_738161.num_args = 1;
c_738161.num_elements = 4;
c_738161.elements = (object *)e_738169;
c_738161.elements[0] = ((closureN)self_734152)->elements[0];
c_738161.elements[1] = ((closureN)self_734152)->elements[1];
c_738161.elements[2] = ((closureN)self_734152)->elements[2];
c_738161.elements[3] = ((closureN)self_734152)->elements[3];



return_direct_with_clo1(data,(closure)&c_738161,__lambda_456,  Cyc_set_cell(data, ((closureN)self_734152)->elements[3], r_732858));; 
}

static void __lambda_456(void *data, object self_734153, int argc, object *args) /* object self_734153, object r_732857 */
 {

  

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

static void __lambda_428(void *data, object _, int argc, object *args) /* closure _,object k_732829, object p_73460_731615, object f_73461_731616, object g_73462_731617, object seed_73463_731618, object maybe_91tail_91gen_73464_731619_raw, ... */
 {
object k_732829 = args[0]; object p_73460_731615 = args[1]; object f_73461_731616 = args[2]; object g_73462_731617 = args[3]; object seed_73463_731618 = args[4];
load_varargs(maybe_91tail_91gen_73464_731619, args, 5, argc - 5);
  Cyc_st_add(data, "srfi/1.sld:unfold");

closureN_type c_737993;
object e_738145 [6];
c_737993.hdr.mark = gc_color_red;
 c_737993.hdr.grayed = 0;
c_737993.tag = closureN_tag;
 c_737993.fn = (function_type)__lambda_429;
c_737993.num_args = 1;
c_737993.num_elements = 6;
c_737993.elements = (object *)e_738145;
c_737993.elements[0] = f_73461_731616;
c_737993.elements[1] = g_73462_731617;
c_737993.elements[2] = k_732829;
c_737993.elements[3] = maybe_91tail_91gen_73464_731619;
c_737993.elements[4] = p_73460_731615;
c_737993.elements[5] = seed_73463_731618;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_737993, primitive_procedure_127, p_73460_731615, __glo_unfold_srfi_1);; 
}

static void __lambda_429(void *data, object self_734118, int argc, object *args) /* object self_734118, object r_732830 */
 {

  
closureN_type c_737995;
object e_738143 [6];
c_737995.hdr.mark = gc_color_red;
 c_737995.hdr.grayed = 0;
c_737995.tag = closureN_tag;
 c_737995.fn = (function_type)__lambda_430;
c_737995.num_args = 1;
c_737995.num_elements = 6;
c_737995.elements = (object *)e_738143;
c_737995.elements[0] = ((closureN)self_734118)->elements[0];
c_737995.elements[1] = ((closureN)self_734118)->elements[1];
c_737995.elements[2] = ((closureN)self_734118)->elements[2];
c_737995.elements[3] = ((closureN)self_734118)->elements[3];
c_737995.elements[4] = ((closureN)self_734118)->elements[4];
c_737995.elements[5] = ((closureN)self_734118)->elements[5];

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_737995, primitive_procedure_127, ((closureN)self_734118)->elements[0], __glo_unfold_srfi_1);; 
}

static void __lambda_430(void *data, object self_734119, int argc, object *args) /* object self_734119, object r_732831 */
 {

  
closureN_type c_737997;
object e_738141 [6];
c_737997.hdr.mark = gc_color_red;
 c_737997.hdr.grayed = 0;
c_737997.tag = closureN_tag;
 c_737997.fn = (function_type)__lambda_431;
c_737997.num_args = 1;
c_737997.num_elements = 6;
c_737997.elements = (object *)e_738141;
c_737997.elements[0] = ((closureN)self_734119)->elements[0];
c_737997.elements[1] = ((closureN)self_734119)->elements[1];
c_737997.elements[2] = ((closureN)self_734119)->elements[2];
c_737997.elements[3] = ((closureN)self_734119)->elements[3];
c_737997.elements[4] = ((closureN)self_734119)->elements[4];
c_737997.elements[5] = ((closureN)self_734119)->elements[5];

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_737997, primitive_procedure_127, ((closureN)self_734119)->elements[1], __glo_unfold_srfi_1);; 
}

static void __lambda_431(void *data, object self_734120, int argc, object *args) /* object self_734120, object r_732832 */
 {

    
if( (boolean_f != Cyc_is_pair(((closureN)self_734120)->elements[3])) ){ 
  
closureN_type c_738002;
object e_738079 [6];
c_738002.hdr.mark = gc_color_red;
 c_738002.hdr.grayed = 0;
c_738002.tag = closureN_tag;
 c_738002.fn = (function_type)__lambda_432;
c_738002.num_args = 1;
c_738002.num_elements = 6;
c_738002.elements = (object *)e_738079;
c_738002.elements[0] = ((closureN)self_734120)->elements[0];
c_738002.elements[1] = ((closureN)self_734120)->elements[1];
c_738002.elements[2] = ((closureN)self_734120)->elements[2];
c_738002.elements[3] = ((closureN)self_734120)->elements[3];
c_738002.elements[4] = ((closureN)self_734120)->elements[4];
c_738002.elements[5] = ((closureN)self_734120)->elements[5];



return_direct_with_clo1(data,(closure)&c_738002,__lambda_432,  Cyc_car(data, ((closureN)self_734120)->elements[3]));
} else { 
  
closureN_type c_738084;
object e_738139 [4];
c_738084.hdr.mark = gc_color_red;
 c_738084.hdr.grayed = 0;
c_738084.tag = closureN_tag;
 c_738084.fn = (function_type)__lambda_442;
c_738084.num_args = 1;
c_738084.num_elements = 4;
c_738084.elements = (object *)e_738139;
c_738084.elements[0] = ((closureN)self_734120)->elements[0];
c_738084.elements[1] = ((closureN)self_734120)->elements[1];
c_738084.elements[2] = ((closureN)self_734120)->elements[2];
c_738084.elements[3] = ((closureN)self_734120)->elements[4];

return_direct_with_clo1(data,(closure)&c_738084,__lambda_442,  ((closureN)self_734120)->elements[5]);}
;; 
}

static void __lambda_442(void *data, object self_734132, int argc, object *args) /* object self_734132, object seed_73471_731624 */
 {
 object seed_73471_731624 = args[0];
  
closureN_type c_738086;
object e_738138 [5];
c_738086.hdr.mark = gc_color_red;
 c_738086.hdr.grayed = 0;
c_738086.tag = closureN_tag;
 c_738086.fn = (function_type)__lambda_443;
c_738086.num_args = 1;
c_738086.num_elements = 5;
c_738086.elements = (object *)e_738138;
c_738086.elements[0] = ((closureN)self_734132)->elements[0];
c_738086.elements[1] = ((closureN)self_734132)->elements[1];
c_738086.elements[2] = ((closureN)self_734132)->elements[2];
c_738086.elements[3] = ((closureN)self_734132)->elements[3];
c_738086.elements[4] = seed_73471_731624;

return_direct_with_clo1(data,(closure)&c_738086,__lambda_443,  boolean_f);; 
}

static void __lambda_443(void *data, object self_734133, int argc, object *args) /* object self_734133, object recur_73472_731625 */
 {
 object recur_73472_731625 = args[0];
  
closureN_type c_738088;
object e_738134 [5];
c_738088.hdr.mark = gc_color_red;
 c_738088.hdr.grayed = 0;
c_738088.tag = closureN_tag;
 c_738088.fn = (function_type)__lambda_1164;
c_738088.num_args = 1;
c_738088.num_elements = 5;
c_738088.elements = (object *)e_738134;
c_738088.elements[0] = ((closureN)self_734133)->elements[0];
c_738088.elements[1] = ((closureN)self_734133)->elements[1];
c_738088.elements[2] = ((closureN)self_734133)->elements[2];
c_738088.elements[3] = ((closureN)self_734133)->elements[3];
c_738088.elements[4] = ((closureN)self_734133)->elements[4];


pair_type local_738137; 
return_direct_with_clo1(data,(closure)&c_738088,__lambda_1164,  set_cell_as_expr(&local_738137, recur_73472_731625));; 
}

static void __lambda_1164(void *data, object self_734134, int argc, object *args) /* object self_734134, object recur_73472_731625 */
 {
 object recur_73472_731625 = args[0];
  
closureN_type c_738090;
object e_738103 [3];
c_738090.hdr.mark = gc_color_red;
 c_738090.hdr.grayed = 0;
c_738090.tag = closureN_tag;
 c_738090.fn = (function_type)__lambda_444;
c_738090.num_args = 1;
c_738090.num_elements = 3;
c_738090.elements = (object *)e_738103;
c_738090.elements[0] = ((closureN)self_734134)->elements[2];
c_738090.elements[1] = recur_73472_731625;
c_738090.elements[2] = ((closureN)self_734134)->elements[4];


closureN_type c_738104;
object e_738133 [4];
c_738104.hdr.mark = gc_color_red;
 c_738104.hdr.grayed = 0;
c_738104.tag = closureN_tag;
 c_738104.fn = (function_type)__lambda_446;
c_738104.num_args = 1;
c_738104.num_elements = 4;
c_738104.elements = (object *)e_738133;
c_738104.elements[0] = ((closureN)self_734134)->elements[0];
c_738104.elements[1] = ((closureN)self_734134)->elements[1];
c_738104.elements[2] = ((closureN)self_734134)->elements[3];
c_738104.elements[3] = recur_73472_731625;

return_direct_with_clo1(data,(closure)&c_738090,__lambda_444,  &c_738104);; 
}

static void __lambda_446(void *data, object self_734135, int argc, object *args) /* object self_734135, object k_732846, object seed_73473_731626 */
 {
 object k_732846 = args[0]; object seed_73473_731626 = args[1];
  
closureN_type c_738107;
object e_738132 [5];
c_738107.hdr.mark = gc_color_red;
 c_738107.hdr.grayed = 0;
c_738107.tag = closureN_tag;
 c_738107.fn = (function_type)__lambda_447;
c_738107.num_args = 1;
c_738107.num_elements = 5;
c_738107.elements = (object *)e_738132;
c_738107.elements[0] = ((closureN)self_734135)->elements[0];
c_738107.elements[1] = ((closureN)self_734135)->elements[1];
c_738107.elements[2] = k_732846;
c_738107.elements[3] = ((closureN)self_734135)->elements[3];
c_738107.elements[4] = seed_73473_731626;

return_closcall2(data,  ((closureN)self_734135)->elements[2],  &c_738107, seed_73473_731626);; 
}

static void __lambda_447(void *data, object self_734136, int argc, object *args) /* object self_734136, object r_732847 */
 {
 object r_732847 = args[0];
  if( (boolean_f != r_732847) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734136)->elements[2], (((closure)  ((closureN)self_734136)->elements[2])->fn),  NULL);
} else { 
  
closureN_type c_738112;
object e_738130 [4];
c_738112.hdr.mark = gc_color_red;
 c_738112.hdr.grayed = 0;
c_738112.tag = closureN_tag;
 c_738112.fn = (function_type)__lambda_448;
c_738112.num_args = 1;
c_738112.num_elements = 4;
c_738112.elements = (object *)e_738130;
c_738112.elements[0] = ((closureN)self_734136)->elements[1];
c_738112.elements[1] = ((closureN)self_734136)->elements[2];
c_738112.elements[2] = ((closureN)self_734136)->elements[3];
c_738112.elements[3] = ((closureN)self_734136)->elements[4];

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

static void __lambda_448(void *data, object self_734137, int argc, object *args) /* object self_734137, object r_732848 */
 {
 object r_732848 = args[0];
  
closureN_type c_738115;
object e_738128 [3];
c_738115.hdr.mark = gc_color_red;
 c_738115.hdr.grayed = 0;
c_738115.tag = closureN_tag;
 c_738115.fn = (function_type)__lambda_449;
c_738115.num_args = 1;
c_738115.num_elements = 3;
c_738115.elements = (object *)e_738128;
c_738115.elements[0] = ((closureN)self_734137)->elements[1];
c_738115.elements[1] = r_732848;
c_738115.elements[2] = ((closureN)self_734137)->elements[2];

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

static void __lambda_449(void *data, object self_734138, int argc, object *args) /* object self_734138, object r_732850 */
 {
 object r_732850 = args[0];
  


closureN_type c_738120;
object e_738127 [2];
c_738120.hdr.mark = gc_color_red;
 c_738120.hdr.grayed = 0;
c_738120.tag = closureN_tag;
 c_738120.fn = (function_type)__lambda_450;
c_738120.num_args = 1;
c_738120.num_elements = 2;
c_738120.elements = (object *)e_738127;
c_738120.elements[0] = ((closureN)self_734138)->elements[0];
c_738120.elements[1] = ((closureN)self_734138)->elements[1];

return_closcall2(data,  car(((closureN)self_734138)->elements[2]),  &c_738120, r_732850);; 
}

static void __lambda_450(void *data, object self_734139, int argc, object *args) /* object self_734139, object r_732849 */
 {
 object r_732849 = args[0];
  
pair_type local_738125; 
return_direct_with_clo1(data,  ((closureN)self_734139)->elements[0], (((closure)  ((closureN)self_734139)->elements[0])->fn),  set_pair_as_expr(&local_738125, ((closureN)self_734139)->elements[1], r_732849));; 
}

static void __lambda_444(void *data, object self_734140, int argc, object *args) /* object self_734140, object r_732845 */
 {
 object r_732845 = args[0];
  
closureN_type c_738092;
object e_738099 [3];
c_738092.hdr.mark = gc_color_red;
 c_738092.hdr.grayed = 0;
c_738092.tag = closureN_tag;
 c_738092.fn = (function_type)__lambda_445;
c_738092.num_args = 1;
c_738092.num_elements = 3;
c_738092.elements = (object *)e_738099;
c_738092.elements[0] = ((closureN)self_734140)->elements[0];
c_738092.elements[1] = ((closureN)self_734140)->elements[1];
c_738092.elements[2] = ((closureN)self_734140)->elements[2];



return_direct_with_clo1(data,(closure)&c_738092,__lambda_445,  Cyc_set_cell(data, ((closureN)self_734140)->elements[1], r_732845));; 
}

static void __lambda_445(void *data, object self_734141, int argc, object *args) /* object self_734141, object r_732844 */
 {

  

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

static void __lambda_432(void *data, object self_734121, int argc, object *args) /* object self_734121, object tail_91gen_73465_731620 */
 {
 object tail_91gen_73465_731620 = args[0];
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_734121)->elements[3]))) ){ 
  
make_utf8_string_with_len(c_738013, "Too many arguments", 18, 18);

object c_738012 = apply_va(data,  ((closureN)self_734121)->elements[2],8,__glo_error_scheme_base, &c_738013, __glo_unfold_srfi_1, ((closureN)self_734121)->elements[4], ((closureN)self_734121)->elements[0], ((closureN)self_734121)->elements[1], ((closureN)self_734121)->elements[5], ((closureN)self_734121)->elements[3]);
return_direct_with_clo1(data,  ((closureN)self_734121)->elements[2], (((closure)  ((closureN)self_734121)->elements[2])->fn),  c_738012);
} else { 
  
closureN_type c_738020;
object e_738077 [5];
c_738020.hdr.mark = gc_color_red;
 c_738020.hdr.grayed = 0;
c_738020.tag = closureN_tag;
 c_738020.fn = (function_type)__lambda_433;
c_738020.num_args = 1;
c_738020.num_elements = 5;
c_738020.elements = (object *)e_738077;
c_738020.elements[0] = ((closureN)self_734121)->elements[0];
c_738020.elements[1] = ((closureN)self_734121)->elements[1];
c_738020.elements[2] = ((closureN)self_734121)->elements[2];
c_738020.elements[3] = ((closureN)self_734121)->elements[4];
c_738020.elements[4] = tail_91gen_73465_731620;

return_direct_with_clo1(data,(closure)&c_738020,__lambda_433,  ((closureN)self_734121)->elements[5]);}
;; 
}

static void __lambda_433(void *data, object self_734122, int argc, object *args) /* object self_734122, object seed_73467_731621 */
 {
 object seed_73467_731621 = args[0];
  
closureN_type c_738022;
object e_738076 [6];
c_738022.hdr.mark = gc_color_red;
 c_738022.hdr.grayed = 0;
c_738022.tag = closureN_tag;
 c_738022.fn = (function_type)__lambda_434;
c_738022.num_args = 1;
c_738022.num_elements = 6;
c_738022.elements = (object *)e_738076;
c_738022.elements[0] = ((closureN)self_734122)->elements[0];
c_738022.elements[1] = ((closureN)self_734122)->elements[1];
c_738022.elements[2] = ((closureN)self_734122)->elements[2];
c_738022.elements[3] = ((closureN)self_734122)->elements[3];
c_738022.elements[4] = seed_73467_731621;
c_738022.elements[5] = ((closureN)self_734122)->elements[4];

return_direct_with_clo1(data,(closure)&c_738022,__lambda_434,  boolean_f);; 
}

static void __lambda_434(void *data, object self_734123, int argc, object *args) /* object self_734123, object recur_73468_731622 */
 {
 object recur_73468_731622 = args[0];
  
closureN_type c_738024;
object e_738072 [6];
c_738024.hdr.mark = gc_color_red;
 c_738024.hdr.grayed = 0;
c_738024.tag = closureN_tag;
 c_738024.fn = (function_type)__lambda_1163;
c_738024.num_args = 1;
c_738024.num_elements = 6;
c_738024.elements = (object *)e_738072;
c_738024.elements[0] = ((closureN)self_734123)->elements[0];
c_738024.elements[1] = ((closureN)self_734123)->elements[1];
c_738024.elements[2] = ((closureN)self_734123)->elements[2];
c_738024.elements[3] = ((closureN)self_734123)->elements[3];
c_738024.elements[4] = ((closureN)self_734123)->elements[4];
c_738024.elements[5] = ((closureN)self_734123)->elements[5];


pair_type local_738075; 
return_direct_with_clo1(data,(closure)&c_738024,__lambda_1163,  set_cell_as_expr(&local_738075, recur_73468_731622));; 
}

static void __lambda_1163(void *data, object self_734124, int argc, object *args) /* object self_734124, object recur_73468_731622 */
 {
 object recur_73468_731622 = args[0];
  
closureN_type c_738026;
object e_738039 [3];
c_738026.hdr.mark = gc_color_red;
 c_738026.hdr.grayed = 0;
c_738026.tag = closureN_tag;
 c_738026.fn = (function_type)__lambda_435;
c_738026.num_args = 1;
c_738026.num_elements = 3;
c_738026.elements = (object *)e_738039;
c_738026.elements[0] = ((closureN)self_734124)->elements[2];
c_738026.elements[1] = recur_73468_731622;
c_738026.elements[2] = ((closureN)self_734124)->elements[4];


closureN_type c_738040;
object e_738071 [5];
c_738040.hdr.mark = gc_color_red;
 c_738040.hdr.grayed = 0;
c_738040.tag = closureN_tag;
 c_738040.fn = (function_type)__lambda_437;
c_738040.num_args = 1;
c_738040.num_elements = 5;
c_738040.elements = (object *)e_738071;
c_738040.elements[0] = ((closureN)self_734124)->elements[0];
c_738040.elements[1] = ((closureN)self_734124)->elements[1];
c_738040.elements[2] = ((closureN)self_734124)->elements[3];
c_738040.elements[3] = recur_73468_731622;
c_738040.elements[4] = ((closureN)self_734124)->elements[5];

return_direct_with_clo1(data,(closure)&c_738026,__lambda_435,  &c_738040);; 
}

static void __lambda_437(void *data, object self_734125, int argc, object *args) /* object self_734125, object k_732838, object seed_73469_731623 */
 {
 object k_732838 = args[0]; object seed_73469_731623 = args[1];
  
closureN_type c_738043;
object e_738070 [6];
c_738043.hdr.mark = gc_color_red;
 c_738043.hdr.grayed = 0;
c_738043.tag = closureN_tag;
 c_738043.fn = (function_type)__lambda_438;
c_738043.num_args = 1;
c_738043.num_elements = 6;
c_738043.elements = (object *)e_738070;
c_738043.elements[0] = ((closureN)self_734125)->elements[0];
c_738043.elements[1] = ((closureN)self_734125)->elements[1];
c_738043.elements[2] = k_732838;
c_738043.elements[3] = ((closureN)self_734125)->elements[3];
c_738043.elements[4] = seed_73469_731623;
c_738043.elements[5] = ((closureN)self_734125)->elements[4];

return_closcall2(data,  ((closureN)self_734125)->elements[2],  &c_738043, seed_73469_731623);; 
}

static void __lambda_438(void *data, object self_734126, int argc, object *args) /* object self_734126, object r_732839 */
 {
 object r_732839 = args[0];
  if( (boolean_f != r_732839) ){ 
  return_closcall2(data,  ((closureN)self_734126)->elements[5],  ((closureN)self_734126)->elements[2], ((closureN)self_734126)->elements[4]);
} else { 
  
closureN_type c_738050;
object e_738068 [4];
c_738050.hdr.mark = gc_color_red;
 c_738050.hdr.grayed = 0;
c_738050.tag = closureN_tag;
 c_738050.fn = (function_type)__lambda_439;
c_738050.num_args = 1;
c_738050.num_elements = 4;
c_738050.elements = (object *)e_738068;
c_738050.elements[0] = ((closureN)self_734126)->elements[1];
c_738050.elements[1] = ((closureN)self_734126)->elements[2];
c_738050.elements[2] = ((closureN)self_734126)->elements[3];
c_738050.elements[3] = ((closureN)self_734126)->elements[4];

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

static void __lambda_439(void *data, object self_734127, int argc, object *args) /* object self_734127, object r_732840 */
 {
 object r_732840 = args[0];
  
closureN_type c_738053;
object e_738066 [3];
c_738053.hdr.mark = gc_color_red;
 c_738053.hdr.grayed = 0;
c_738053.tag = closureN_tag;
 c_738053.fn = (function_type)__lambda_440;
c_738053.num_args = 1;
c_738053.num_elements = 3;
c_738053.elements = (object *)e_738066;
c_738053.elements[0] = ((closureN)self_734127)->elements[1];
c_738053.elements[1] = r_732840;
c_738053.elements[2] = ((closureN)self_734127)->elements[2];

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

static void __lambda_440(void *data, object self_734128, int argc, object *args) /* object self_734128, object r_732842 */
 {
 object r_732842 = args[0];
  


closureN_type c_738058;
object e_738065 [2];
c_738058.hdr.mark = gc_color_red;
 c_738058.hdr.grayed = 0;
c_738058.tag = closureN_tag;
 c_738058.fn = (function_type)__lambda_441;
c_738058.num_args = 1;
c_738058.num_elements = 2;
c_738058.elements = (object *)e_738065;
c_738058.elements[0] = ((closureN)self_734128)->elements[0];
c_738058.elements[1] = ((closureN)self_734128)->elements[1];

return_closcall2(data,  car(((closureN)self_734128)->elements[2]),  &c_738058, r_732842);; 
}

static void __lambda_441(void *data, object self_734129, int argc, object *args) /* object self_734129, object r_732841 */
 {
 object r_732841 = args[0];
  
pair_type local_738063; 
return_direct_with_clo1(data,  ((closureN)self_734129)->elements[0], (((closure)  ((closureN)self_734129)->elements[0])->fn),  set_pair_as_expr(&local_738063, ((closureN)self_734129)->elements[1], r_732841));; 
}

static void __lambda_435(void *data, object self_734130, int argc, object *args) /* object self_734130, object r_732837 */
 {
 object r_732837 = args[0];
  
closureN_type c_738028;
object e_738035 [3];
c_738028.hdr.mark = gc_color_red;
 c_738028.hdr.grayed = 0;
c_738028.tag = closureN_tag;
 c_738028.fn = (function_type)__lambda_436;
c_738028.num_args = 1;
c_738028.num_elements = 3;
c_738028.elements = (object *)e_738035;
c_738028.elements[0] = ((closureN)self_734130)->elements[0];
c_738028.elements[1] = ((closureN)self_734130)->elements[1];
c_738028.elements[2] = ((closureN)self_734130)->elements[2];



return_direct_with_clo1(data,(closure)&c_738028,__lambda_436,  Cyc_set_cell(data, ((closureN)self_734130)->elements[1], r_732837));; 
}

static void __lambda_436(void *data, object self_734131, int argc, object *args) /* object self_734131, object r_732836 */
 {

  

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

static void __lambda_411(void *data, object _, int argc, object *args) /* closure _,object k_732811, object p_73426_731604, object f_73427_731605, object g_73428_731606, object seed_73429_731607, object maybe_91tail_73430_731608_raw, ... */
 {
object k_732811 = args[0]; object p_73426_731604 = args[1]; object f_73427_731605 = args[2]; object g_73428_731606 = args[3]; object seed_73429_731607 = args[4];
load_varargs(maybe_91tail_73430_731608, args, 5, argc - 5);
  Cyc_st_add(data, "srfi/1.sld:unfold-right");

closureN_type c_737890;
object e_737990 [6];
c_737890.hdr.mark = gc_color_red;
 c_737890.hdr.grayed = 0;
c_737890.tag = closureN_tag;
 c_737890.fn = (function_type)__lambda_412;
c_737890.num_args = 1;
c_737890.num_elements = 6;
c_737890.elements = (object *)e_737990;
c_737890.elements[0] = f_73427_731605;
c_737890.elements[1] = g_73428_731606;
c_737890.elements[2] = k_732811;
c_737890.elements[3] = maybe_91tail_73430_731608;
c_737890.elements[4] = p_73426_731604;
c_737890.elements[5] = seed_73429_731607;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_737890, primitive_procedure_127, p_73426_731604, __glo_unfold_91right_srfi_1);; 
}

static void __lambda_412(void *data, object self_734101, int argc, object *args) /* object self_734101, object r_732812 */
 {

  
closureN_type c_737892;
object e_737988 [6];
c_737892.hdr.mark = gc_color_red;
 c_737892.hdr.grayed = 0;
c_737892.tag = closureN_tag;
 c_737892.fn = (function_type)__lambda_413;
c_737892.num_args = 1;
c_737892.num_elements = 6;
c_737892.elements = (object *)e_737988;
c_737892.elements[0] = ((closureN)self_734101)->elements[0];
c_737892.elements[1] = ((closureN)self_734101)->elements[1];
c_737892.elements[2] = ((closureN)self_734101)->elements[2];
c_737892.elements[3] = ((closureN)self_734101)->elements[3];
c_737892.elements[4] = ((closureN)self_734101)->elements[4];
c_737892.elements[5] = ((closureN)self_734101)->elements[5];

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_737892, primitive_procedure_127, ((closureN)self_734101)->elements[0], __glo_unfold_91right_srfi_1);; 
}

static void __lambda_413(void *data, object self_734102, int argc, object *args) /* object self_734102, object r_732813 */
 {

  
closureN_type c_737894;
object e_737986 [6];
c_737894.hdr.mark = gc_color_red;
 c_737894.hdr.grayed = 0;
c_737894.tag = closureN_tag;
 c_737894.fn = (function_type)__lambda_414;
c_737894.num_args = 1;
c_737894.num_elements = 6;
c_737894.elements = (object *)e_737986;
c_737894.elements[0] = ((closureN)self_734102)->elements[0];
c_737894.elements[1] = ((closureN)self_734102)->elements[1];
c_737894.elements[2] = ((closureN)self_734102)->elements[2];
c_737894.elements[3] = ((closureN)self_734102)->elements[3];
c_737894.elements[4] = ((closureN)self_734102)->elements[4];
c_737894.elements[5] = ((closureN)self_734102)->elements[5];

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_737894, primitive_procedure_127, ((closureN)self_734102)->elements[1], __glo_unfold_91right_srfi_1);; 
}

static void __lambda_414(void *data, object self_734103, int argc, object *args) /* object self_734103, object r_732814 */
 {

  
closureN_type c_737896;
object e_737984 [5];
c_737896.hdr.mark = gc_color_red;
 c_737896.hdr.grayed = 0;
c_737896.tag = closureN_tag;
 c_737896.fn = (function_type)__lambda_415;
c_737896.num_args = 1;
c_737896.num_elements = 5;
c_737896.elements = (object *)e_737984;
c_737896.elements[0] = ((closureN)self_734103)->elements[0];
c_737896.elements[1] = ((closureN)self_734103)->elements[1];
c_737896.elements[2] = ((closureN)self_734103)->elements[2];
c_737896.elements[3] = ((closureN)self_734103)->elements[4];
c_737896.elements[4] = ((closureN)self_734103)->elements[5];

return_direct_with_clo1(data,(closure)&c_737896,__lambda_415,  ((closureN)self_734103)->elements[3]);; 
}

static void __lambda_415(void *data, object self_734104, int argc, object *args) /* object self_734104, object maybe_91arg_73449_73452_731614 */
 {
 object maybe_91arg_73449_73452_731614 = args[0];
  
closureN_type c_737898;
object e_737920 [1];
c_737898.hdr.mark = gc_color_red;
 c_737898.hdr.grayed = 0;
c_737898.tag = closureN_tag;
 c_737898.fn = (function_type)__lambda_416;
c_737898.num_args = 0;
c_737898.num_elements = 1;
c_737898.elements = (object *)e_737920;
c_737898.elements[0] = maybe_91arg_73449_73452_731614;


closureN_type c_737921;
object e_737983 [5];
c_737921.hdr.mark = gc_color_red;
 c_737921.hdr.grayed = 0;
c_737921.tag = closureN_tag;
 c_737921.fn = (function_type)__lambda_418;
c_737921.num_args = 1;
c_737921.num_elements = 5;
c_737921.elements = (object *)e_737983;
c_737921.elements[0] = ((closureN)self_734104)->elements[0];
c_737921.elements[1] = ((closureN)self_734104)->elements[1];
c_737921.elements[2] = ((closureN)self_734104)->elements[2];
c_737921.elements[3] = ((closureN)self_734104)->elements[3];
c_737921.elements[4] = ((closureN)self_734104)->elements[4];

return_direct_with_clo1(data,(closure)&c_737898,__lambda_416,  &c_737921);; 
}

static void __lambda_418(void *data, object self_734105, int argc, object *args) /* object self_734105, object r_732815 */
 {
 object r_732815 = args[0];
  
closureN_type c_737923;
object e_737981 [4];
c_737923.hdr.mark = gc_color_red;
 c_737923.hdr.grayed = 0;
c_737923.tag = closureN_tag;
 c_737923.fn = (function_type)__lambda_419;
c_737923.num_args = 2;
c_737923.num_elements = 4;
c_737923.elements = (object *)e_737981;
c_737923.elements[0] = ((closureN)self_734105)->elements[0];
c_737923.elements[1] = ((closureN)self_734105)->elements[1];
c_737923.elements[2] = ((closureN)self_734105)->elements[2];
c_737923.elements[3] = ((closureN)self_734105)->elements[3];

return_direct_with_clo2(data,(closure)&c_737923,__lambda_419,  ((closureN)self_734105)->elements[4], r_732815);; 
}

static void __lambda_419(void *data, object self_734106, int argc, object *args) /* object self_734106, object seed_73432_731609, object ans_73433_731610 */
 {
 object seed_73432_731609 = args[0]; object ans_73433_731610 = args[1];
  
closureN_type c_737925;
object e_737980 [6];
c_737925.hdr.mark = gc_color_red;
 c_737925.hdr.grayed = 0;
c_737925.tag = closureN_tag;
 c_737925.fn = (function_type)__lambda_420;
c_737925.num_args = 1;
c_737925.num_elements = 6;
c_737925.elements = (object *)e_737980;
c_737925.elements[0] = ans_73433_731610;
c_737925.elements[1] = ((closureN)self_734106)->elements[0];
c_737925.elements[2] = ((closureN)self_734106)->elements[1];
c_737925.elements[3] = ((closureN)self_734106)->elements[2];
c_737925.elements[4] = ((closureN)self_734106)->elements[3];
c_737925.elements[5] = seed_73432_731609;

return_direct_with_clo1(data,(closure)&c_737925,__lambda_420,  boolean_f);; 
}

static void __lambda_420(void *data, object self_734107, int argc, object *args) /* object self_734107, object lp_73434_731611 */
 {
 object lp_73434_731611 = args[0];
  
closureN_type c_737927;
object e_737976 [6];
c_737927.hdr.mark = gc_color_red;
 c_737927.hdr.grayed = 0;
c_737927.tag = closureN_tag;
 c_737927.fn = (function_type)__lambda_1162;
c_737927.num_args = 1;
c_737927.num_elements = 6;
c_737927.elements = (object *)e_737976;
c_737927.elements[0] = ((closureN)self_734107)->elements[0];
c_737927.elements[1] = ((closureN)self_734107)->elements[1];
c_737927.elements[2] = ((closureN)self_734107)->elements[2];
c_737927.elements[3] = ((closureN)self_734107)->elements[3];
c_737927.elements[4] = ((closureN)self_734107)->elements[4];
c_737927.elements[5] = ((closureN)self_734107)->elements[5];


pair_type local_737979; 
return_direct_with_clo1(data,(closure)&c_737927,__lambda_1162,  set_cell_as_expr(&local_737979, lp_73434_731611));; 
}

static void __lambda_1162(void *data, object self_734108, int argc, object *args) /* object self_734108, object lp_73434_731611 */
 {
 object lp_73434_731611 = args[0];
  
closureN_type c_737929;
object e_737943 [4];
c_737929.hdr.mark = gc_color_red;
 c_737929.hdr.grayed = 0;
c_737929.tag = closureN_tag;
 c_737929.fn = (function_type)__lambda_421;
c_737929.num_args = 1;
c_737929.num_elements = 4;
c_737929.elements = (object *)e_737943;
c_737929.elements[0] = ((closureN)self_734108)->elements[0];
c_737929.elements[1] = ((closureN)self_734108)->elements[3];
c_737929.elements[2] = lp_73434_731611;
c_737929.elements[3] = ((closureN)self_734108)->elements[5];


closureN_type c_737944;
object e_737975 [4];
c_737944.hdr.mark = gc_color_red;
 c_737944.hdr.grayed = 0;
c_737944.tag = closureN_tag;
 c_737944.fn = (function_type)__lambda_423;
c_737944.num_args = 2;
c_737944.num_elements = 4;
c_737944.elements = (object *)e_737975;
c_737944.elements[0] = ((closureN)self_734108)->elements[1];
c_737944.elements[1] = ((closureN)self_734108)->elements[2];
c_737944.elements[2] = lp_73434_731611;
c_737944.elements[3] = ((closureN)self_734108)->elements[4];

return_direct_with_clo1(data,(closure)&c_737929,__lambda_421,  &c_737944);; 
}

static void __lambda_423(void *data, object self_734109, int argc, object *args) /* object self_734109, object k_732818, object seed_73435_731612, object ans_73436_731613 */
 {
 object k_732818 = args[0]; object seed_73435_731612 = args[1]; object ans_73436_731613 = args[2];
  
closureN_type c_737947;
object e_737974 [6];
c_737947.hdr.mark = gc_color_red;
 c_737947.hdr.grayed = 0;
c_737947.tag = closureN_tag;
 c_737947.fn = (function_type)__lambda_424;
c_737947.num_args = 1;
c_737947.num_elements = 6;
c_737947.elements = (object *)e_737974;
c_737947.elements[0] = ans_73436_731613;
c_737947.elements[1] = ((closureN)self_734109)->elements[0];
c_737947.elements[2] = ((closureN)self_734109)->elements[1];
c_737947.elements[3] = k_732818;
c_737947.elements[4] = ((closureN)self_734109)->elements[2];
c_737947.elements[5] = seed_73435_731612;

return_closcall2(data,  ((closureN)self_734109)->elements[3],  &c_737947, seed_73435_731612);; 
}

static void __lambda_424(void *data, object self_734110, int argc, object *args) /* object self_734110, object r_732819 */
 {
 object r_732819 = args[0];
  if( (boolean_f != r_732819) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734110)->elements[3], (((closure)  ((closureN)self_734110)->elements[3])->fn),  ((closureN)self_734110)->elements[0]);
} else { 
  
closureN_type c_737953;
object e_737972 [5];
c_737953.hdr.mark = gc_color_red;
 c_737953.hdr.grayed = 0;
c_737953.tag = closureN_tag;
 c_737953.fn = (function_type)__lambda_425;
c_737953.num_args = 1;
c_737953.num_elements = 5;
c_737953.elements = (object *)e_737972;
c_737953.elements[0] = ((closureN)self_734110)->elements[0];
c_737953.elements[1] = ((closureN)self_734110)->elements[1];
c_737953.elements[2] = ((closureN)self_734110)->elements[3];
c_737953.elements[3] = ((closureN)self_734110)->elements[4];
c_737953.elements[4] = ((closureN)self_734110)->elements[5];

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

static void __lambda_425(void *data, object self_734111, int argc, object *args) /* object self_734111, object r_732820 */
 {
 object r_732820 = args[0];
  
closureN_type c_737956;
object e_737970 [4];
c_737956.hdr.mark = gc_color_red;
 c_737956.hdr.grayed = 0;
c_737956.tag = closureN_tag;
 c_737956.fn = (function_type)__lambda_426;
c_737956.num_args = 1;
c_737956.num_elements = 4;
c_737956.elements = (object *)e_737970;
c_737956.elements[0] = ((closureN)self_734111)->elements[0];
c_737956.elements[1] = ((closureN)self_734111)->elements[2];
c_737956.elements[2] = ((closureN)self_734111)->elements[3];
c_737956.elements[3] = r_732820;

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

static void __lambda_426(void *data, object self_734112, int argc, object *args) /* object self_734112, object r_732822 */
 {
 object r_732822 = args[0];
  
closureN_type c_737958;
object e_737965 [3];
c_737958.hdr.mark = gc_color_red;
 c_737958.hdr.grayed = 0;
c_737958.tag = closureN_tag;
 c_737958.fn = (function_type)__lambda_427;
c_737958.num_args = 1;
c_737958.num_elements = 3;
c_737958.elements = (object *)e_737965;
c_737958.elements[0] = ((closureN)self_734112)->elements[1];
c_737958.elements[1] = ((closureN)self_734112)->elements[2];
c_737958.elements[2] = ((closureN)self_734112)->elements[3];


pair_type local_737968; 
return_direct_with_clo1(data,(closure)&c_737958,__lambda_427,  set_pair_as_expr(&local_737968, r_732822, ((closureN)self_734112)->elements[0]));; 
}

static void __lambda_427(void *data, object self_734113, int argc, object *args) /* object self_734113, object r_732821 */
 {
 object r_732821 = args[0];
  

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

static void __lambda_421(void *data, object self_734114, int argc, object *args) /* object self_734114, object r_732817 */
 {
 object r_732817 = args[0];
  
closureN_type c_737931;
object e_737939 [4];
c_737931.hdr.mark = gc_color_red;
 c_737931.hdr.grayed = 0;
c_737931.tag = closureN_tag;
 c_737931.fn = (function_type)__lambda_422;
c_737931.num_args = 1;
c_737931.num_elements = 4;
c_737931.elements = (object *)e_737939;
c_737931.elements[0] = ((closureN)self_734114)->elements[0];
c_737931.elements[1] = ((closureN)self_734114)->elements[1];
c_737931.elements[2] = ((closureN)self_734114)->elements[2];
c_737931.elements[3] = ((closureN)self_734114)->elements[3];



return_direct_with_clo1(data,(closure)&c_737931,__lambda_422,  Cyc_set_cell(data, ((closureN)self_734114)->elements[2], r_732817));; 
}

static void __lambda_422(void *data, object self_734115, int argc, object *args) /* object self_734115, object r_732816 */
 {

  

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

static void __lambda_416(void *data, object self_734116, int argc, object *args) /* object self_734116, object k_732823 */
 {
 object k_732823 = args[0];
    
if( (boolean_f != Cyc_is_null(((closureN)self_734116)->elements[0])) ){ 
  return_direct_with_clo1(data,  k_732823, (((closure)  k_732823)->fn),  NULL);
} else { 
  
closureN_type c_737904;
object e_737916 [2];
c_737904.hdr.mark = gc_color_red;
 c_737904.hdr.grayed = 0;
c_737904.tag = closureN_tag;
 c_737904.fn = (function_type)__lambda_417;
c_737904.num_args = 1;
c_737904.num_elements = 2;
c_737904.elements = (object *)e_737916;
c_737904.elements[0] = k_732823;
c_737904.elements[1] = ((closureN)self_734116)->elements[0];



return_direct_with_clo1(data,(closure)&c_737904,__lambda_417,  Cyc_cdr(data, ((closureN)self_734116)->elements[0]));}
;; 
}

static void __lambda_417(void *data, object self_734117, int argc, object *args) /* object self_734117, object r_732826 */
 {
 object r_732826 = args[0];
    
if( (boolean_f != Cyc_is_null(r_732826)) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_734117)->elements[0], (((closure)  ((closureN)self_734117)->elements[0])->fn),  Cyc_car(data, ((closureN)self_734117)->elements[1]));
} else { 
  
make_utf8_string_with_len(c_737914, "too many optional arguments", 27, 27);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_734117)->elements[0], &c_737914, ((closureN)self_734117)->elements[1]);}
;; 
}

static void __lambda_387(void *data, object _, int argc, object *args) /* closure _,object k_732783, object pred_73407_731587, object list1_73408_731588, object lists_73409_731589_raw, ... */
 {
object k_732783 = args[0]; object pred_73407_731587 = args[1]; object list1_73408_731588 = args[2];
load_varargs(lists_73409_731589, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/1.sld:count");

closureN_type c_737727;
object e_737887 [4];
c_737727.hdr.mark = gc_color_red;
 c_737727.hdr.grayed = 0;
c_737727.tag = closureN_tag;
 c_737727.fn = (function_type)__lambda_388;
c_737727.num_args = 1;
c_737727.num_elements = 4;
c_737727.elements = (object *)e_737887;
c_737727.elements[0] = k_732783;
c_737727.elements[1] = list1_73408_731588;
c_737727.elements[2] = lists_73409_731589;
c_737727.elements[3] = pred_73407_731587;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_737727, primitive_procedure_127, pred_73407_731587, __glo_count_srfi_1);; 
}

static void __lambda_388(void *data, object self_734076, int argc, object *args) /* object self_734076, object r_732784 */
 {

    
if( (boolean_f != Cyc_is_pair(((closureN)self_734076)->elements[2])) ){ 
  
closureN_type c_737732;
object e_737819 [2];
c_737732.hdr.mark = gc_color_red;
 c_737732.hdr.grayed = 0;
c_737732.tag = closureN_tag;
 c_737732.fn = (function_type)__lambda_389;
c_737732.num_args = 2;
c_737732.num_elements = 2;
c_737732.elements = (object *)e_737819;
c_737732.elements[0] = ((closureN)self_734076)->elements[0];
c_737732.elements[1] = ((closureN)self_734076)->elements[3];

return_direct_with_clo2(data,(closure)&c_737732,__lambda_389,  ((closureN)self_734076)->elements[1], ((closureN)self_734076)->elements[2]);
} else { 
  
closureN_type c_737823;
object e_737885 [2];
c_737823.hdr.mark = gc_color_red;
 c_737823.hdr.grayed = 0;
c_737823.tag = closureN_tag;
 c_737823.fn = (function_type)__lambda_402;
c_737823.num_args = 1;
c_737823.num_elements = 2;
c_737823.elements = (object *)e_737885;
c_737823.elements[0] = ((closureN)self_734076)->elements[0];
c_737823.elements[1] = ((closureN)self_734076)->elements[3];

return_direct_with_clo1(data,(closure)&c_737823,__lambda_402,  ((closureN)self_734076)->elements[1]);}
;; 
}

static void __lambda_402(void *data, object self_734091, int argc, object *args) /* object self_734091, object lis_73421_731599 */
 {
 object lis_73421_731599 = args[0];
  
closureN_type c_737825;
object e_737884 [3];
c_737825.hdr.mark = gc_color_red;
 c_737825.hdr.grayed = 0;
c_737825.tag = closureN_tag;
 c_737825.fn = (function_type)__lambda_403;
c_737825.num_args = 1;
c_737825.num_elements = 3;
c_737825.elements = (object *)e_737884;
c_737825.elements[0] = ((closureN)self_734091)->elements[0];
c_737825.elements[1] = lis_73421_731599;
c_737825.elements[2] = ((closureN)self_734091)->elements[1];

return_direct_with_clo1(data,(closure)&c_737825,__lambda_403,  boolean_f);; 
}

static void __lambda_403(void *data, object self_734092, int argc, object *args) /* object self_734092, object lp_73423_731601 */
 {
 object lp_73423_731601 = args[0];
  
closureN_type c_737827;
object e_737880 [3];
c_737827.hdr.mark = gc_color_red;
 c_737827.hdr.grayed = 0;
c_737827.tag = closureN_tag;
 c_737827.fn = (function_type)__lambda_1161;
c_737827.num_args = 1;
c_737827.num_elements = 3;
c_737827.elements = (object *)e_737880;
c_737827.elements[0] = ((closureN)self_734092)->elements[0];
c_737827.elements[1] = ((closureN)self_734092)->elements[1];
c_737827.elements[2] = ((closureN)self_734092)->elements[2];


pair_type local_737883; 
return_direct_with_clo1(data,(closure)&c_737827,__lambda_1161,  set_cell_as_expr(&local_737883, lp_73423_731601));; 
}

static void __lambda_1161(void *data, object self_734093, int argc, object *args) /* object self_734093, object lp_73423_731601 */
 {
 object lp_73423_731601 = args[0];
  
closureN_type c_737829;
object e_737842 [3];
c_737829.hdr.mark = gc_color_red;
 c_737829.hdr.grayed = 0;
c_737829.tag = closureN_tag;
 c_737829.fn = (function_type)__lambda_404;
c_737829.num_args = 1;
c_737829.num_elements = 3;
c_737829.elements = (object *)e_737842;
c_737829.elements[0] = ((closureN)self_734093)->elements[0];
c_737829.elements[1] = ((closureN)self_734093)->elements[1];
c_737829.elements[2] = lp_73423_731601;


closureN_type c_737843;
object e_737879 [2];
c_737843.hdr.mark = gc_color_red;
 c_737843.hdr.grayed = 0;
c_737843.tag = closureN_tag;
 c_737843.fn = (function_type)__lambda_406;
c_737843.num_args = 2;
c_737843.num_elements = 2;
c_737843.elements = (object *)e_737879;
c_737843.elements[0] = lp_73423_731601;
c_737843.elements[1] = ((closureN)self_734093)->elements[2];

return_direct_with_clo1(data,(closure)&c_737829,__lambda_404,  &c_737843);; 
}

static void __lambda_406(void *data, object self_734094, int argc, object *args) /* object self_734094, object k_732802, object lis_73424_731602, object i_73425_731603 */
 {
 object k_732802 = args[0]; object lis_73424_731602 = args[1]; object i_73425_731603 = args[2];
  
closureN_type c_737845;
object e_737878 [5];
c_737845.hdr.mark = gc_color_red;
 c_737845.hdr.grayed = 0;
c_737845.tag = closureN_tag;
 c_737845.fn = (function_type)__lambda_407;
c_737845.num_args = 1;
c_737845.num_elements = 5;
c_737845.elements = (object *)e_737878;
c_737845.elements[0] = i_73425_731603;
c_737845.elements[1] = k_732802;
c_737845.elements[2] = lis_73424_731602;
c_737845.elements[3] = ((closureN)self_734094)->elements[0];
c_737845.elements[4] = ((closureN)self_734094)->elements[1];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_737845, lis_73424_731602);; 
}

static void __lambda_407(void *data, object self_734095, int argc, object *args) /* object self_734095, object r_732803 */
 {
 object r_732803 = args[0];
  if( (boolean_f != r_732803) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734095)->elements[1], (((closure)  ((closureN)self_734095)->elements[1])->fn),  ((closureN)self_734095)->elements[0]);
} else { 
  
closureN_type c_737850;
object e_737867 [3];
c_737850.hdr.mark = gc_color_red;
 c_737850.hdr.grayed = 0;
c_737850.tag = closureN_tag;
 c_737850.fn = (function_type)__lambda_408;
c_737850.num_args = 0;
c_737850.num_elements = 3;
c_737850.elements = (object *)e_737867;
c_737850.elements[0] = ((closureN)self_734095)->elements[0];
c_737850.elements[1] = ((closureN)self_734095)->elements[2];
c_737850.elements[2] = ((closureN)self_734095)->elements[4];


closureN_type c_737868;
object e_737877 [3];
c_737868.hdr.mark = gc_color_red;
 c_737868.hdr.grayed = 0;
c_737868.tag = closureN_tag;
 c_737868.fn = (function_type)__lambda_410;
c_737868.num_args = 1;
c_737868.num_elements = 3;
c_737868.elements = (object *)e_737877;
c_737868.elements[0] = ((closureN)self_734095)->elements[1];
c_737868.elements[1] = ((closureN)self_734095)->elements[2];
c_737868.elements[2] = ((closureN)self_734095)->elements[3];

return_direct_with_clo1(data,(closure)&c_737850,__lambda_408,  &c_737868);}
;; 
}

static void __lambda_410(void *data, object self_734096, int argc, object *args) /* object self_734096, object r_732805 */
 {
 object r_732805 = args[0];
  



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

static void __lambda_408(void *data, object self_734097, int argc, object *args) /* object self_734097, object k_732806 */
 {
 object k_732806 = args[0];
  
closureN_type c_737853;
object e_737863 [2];
c_737853.hdr.mark = gc_color_red;
 c_737853.hdr.grayed = 0;
c_737853.tag = closureN_tag;
 c_737853.fn = (function_type)__lambda_409;
c_737853.num_args = 1;
c_737853.num_elements = 2;
c_737853.elements = (object *)e_737863;
c_737853.elements[0] = ((closureN)self_734097)->elements[0];
c_737853.elements[1] = k_732806;



return_closcall2(data,  ((closureN)self_734097)->elements[2],  &c_737853, Cyc_car(data, ((closureN)self_734097)->elements[1]));; 
}

static void __lambda_409(void *data, object self_734098, int argc, object *args) /* object self_734098, object r_732807 */
 {
 object r_732807 = args[0];
  if( (boolean_f != r_732807) ){ 
  
complex_num_type local_737858; 
return_direct_with_clo1(data,  ((closureN)self_734098)->elements[1], (((closure)  ((closureN)self_734098)->elements[1])->fn),  Cyc_fast_sum(data,&local_737858, ((closureN)self_734098)->elements[0], obj_int2obj(1)));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734098)->elements[1], (((closure)  ((closureN)self_734098)->elements[1])->fn),  ((closureN)self_734098)->elements[0]);}
;; 
}

static void __lambda_404(void *data, object self_734099, int argc, object *args) /* object self_734099, object r_732801 */
 {
 object r_732801 = args[0];
  
closureN_type c_737831;
object e_737838 [3];
c_737831.hdr.mark = gc_color_red;
 c_737831.hdr.grayed = 0;
c_737831.tag = closureN_tag;
 c_737831.fn = (function_type)__lambda_405;
c_737831.num_args = 1;
c_737831.num_elements = 3;
c_737831.elements = (object *)e_737838;
c_737831.elements[0] = ((closureN)self_734099)->elements[0];
c_737831.elements[1] = ((closureN)self_734099)->elements[1];
c_737831.elements[2] = ((closureN)self_734099)->elements[2];



return_direct_with_clo1(data,(closure)&c_737831,__lambda_405,  Cyc_set_cell(data, ((closureN)self_734099)->elements[2], r_732801));; 
}

static void __lambda_405(void *data, object self_734100, int argc, object *args) /* object self_734100, object r_732800 */
 {

  

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

static void __lambda_389(void *data, object self_734077, int argc, object *args) /* object self_734077, object list1_73411_731590, object lists_73412_731591 */
 {
 object list1_73411_731590 = args[0]; object lists_73412_731591 = args[1];
  
closureN_type c_737734;
object e_737818 [4];
c_737734.hdr.mark = gc_color_red;
 c_737734.hdr.grayed = 0;
c_737734.tag = closureN_tag;
 c_737734.fn = (function_type)__lambda_390;
c_737734.num_args = 1;
c_737734.num_elements = 4;
c_737734.elements = (object *)e_737818;
c_737734.elements[0] = ((closureN)self_734077)->elements[0];
c_737734.elements[1] = list1_73411_731590;
c_737734.elements[2] = lists_73412_731591;
c_737734.elements[3] = ((closureN)self_734077)->elements[1];

return_direct_with_clo1(data,(closure)&c_737734,__lambda_390,  boolean_f);; 
}

static void __lambda_390(void *data, object self_734078, int argc, object *args) /* object self_734078, object lp_73414_731593 */
 {
 object lp_73414_731593 = args[0];
  
closureN_type c_737736;
object e_737814 [4];
c_737736.hdr.mark = gc_color_red;
 c_737736.hdr.grayed = 0;
c_737736.tag = closureN_tag;
 c_737736.fn = (function_type)__lambda_1160;
c_737736.num_args = 1;
c_737736.num_elements = 4;
c_737736.elements = (object *)e_737814;
c_737736.elements[0] = ((closureN)self_734078)->elements[0];
c_737736.elements[1] = ((closureN)self_734078)->elements[1];
c_737736.elements[2] = ((closureN)self_734078)->elements[2];
c_737736.elements[3] = ((closureN)self_734078)->elements[3];


pair_type local_737817; 
return_direct_with_clo1(data,(closure)&c_737736,__lambda_1160,  set_cell_as_expr(&local_737817, lp_73414_731593));; 
}

static void __lambda_1160(void *data, object self_734079, int argc, object *args) /* object self_734079, object lp_73414_731593 */
 {
 object lp_73414_731593 = args[0];
  
closureN_type c_737738;
object e_737752 [4];
c_737738.hdr.mark = gc_color_red;
 c_737738.hdr.grayed = 0;
c_737738.tag = closureN_tag;
 c_737738.fn = (function_type)__lambda_391;
c_737738.num_args = 1;
c_737738.num_elements = 4;
c_737738.elements = (object *)e_737752;
c_737738.elements[0] = ((closureN)self_734079)->elements[0];
c_737738.elements[1] = ((closureN)self_734079)->elements[1];
c_737738.elements[2] = ((closureN)self_734079)->elements[2];
c_737738.elements[3] = lp_73414_731593;


closureN_type c_737753;
object e_737813 [2];
c_737753.hdr.mark = gc_color_red;
 c_737753.hdr.grayed = 0;
c_737753.tag = closureN_tag;
 c_737753.fn = (function_type)__lambda_393;
c_737753.num_args = 3;
c_737753.num_elements = 2;
c_737753.elements = (object *)e_737813;
c_737753.elements[0] = lp_73414_731593;
c_737753.elements[1] = ((closureN)self_734079)->elements[3];

return_direct_with_clo1(data,(closure)&c_737738,__lambda_391,  &c_737753);; 
}

static void __lambda_393(void *data, object self_734080, int argc, object *args) /* object self_734080, object k_732788, object list1_73415_731594, object lists_73416_731595, object i_73417_731596 */
 {
 object k_732788 = args[0]; object list1_73415_731594 = args[1]; object lists_73416_731595 = args[2]; object i_73417_731596 = args[3];
  
closureN_type c_737755;
object e_737812 [6];
c_737755.hdr.mark = gc_color_red;
 c_737755.hdr.grayed = 0;
c_737755.tag = closureN_tag;
 c_737755.fn = (function_type)__lambda_394;
c_737755.num_args = 1;
c_737755.num_elements = 6;
c_737755.elements = (object *)e_737812;
c_737755.elements[0] = i_73417_731596;
c_737755.elements[1] = k_732788;
c_737755.elements[2] = list1_73415_731594;
c_737755.elements[3] = lists_73416_731595;
c_737755.elements[4] = ((closureN)self_734080)->elements[0];
c_737755.elements[5] = ((closureN)self_734080)->elements[1];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_737755, list1_73415_731594);; 
}

static void __lambda_394(void *data, object self_734081, int argc, object *args) /* object self_734081, object r_732789 */
 {
 object r_732789 = args[0];
  if( (boolean_f != r_732789) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734081)->elements[1], (((closure)  ((closureN)self_734081)->elements[1])->fn),  ((closureN)self_734081)->elements[0]);
} else { 
  
closureN_type c_737760;
object e_737807 [5];
c_737760.hdr.mark = gc_color_red;
 c_737760.hdr.grayed = 0;
c_737760.tag = closureN_tag;
 c_737760.fn = (function_type)__lambda_395;
c_737760.num_args = 1;
c_737760.num_elements = 5;
c_737760.elements = (object *)e_737807;
c_737760.elements[0] = ((closureN)self_734081)->elements[0];
c_737760.elements[1] = ((closureN)self_734081)->elements[1];
c_737760.elements[2] = ((closureN)self_734081)->elements[2];
c_737760.elements[3] = ((closureN)self_734081)->elements[4];
c_737760.elements[4] = ((closureN)self_734081)->elements[5];


closureN_type c_737808;
object e_737811 [1];
c_737808.hdr.mark = gc_color_red;
 c_737808.hdr.grayed = 0;
c_737808.tag = closureN_tag;
 c_737808.fn = (function_type)__lambda_401;
c_737808.num_args = 0;
c_737808.num_elements = 1;
c_737808.elements = (object *)e_737811;
c_737808.elements[0] = ((closureN)self_734081)->elements[3];

return_direct_with_clo1(data,(closure)&c_737760,__lambda_395,  &c_737808);}
;; 
}

static void __lambda_401(void *data, object self_734082, int argc, object *args) /* object self_734082, object k_732799 */
 {
 object k_732799 = args[0];
  return_direct_with_clo2(data,  __glo__75cars_87cdrs_srfi_1, (((closure)  __glo__75cars_87cdrs_srfi_1)->fn),  k_732799, ((closureN)self_734082)->elements[0]);; 
}

static void __lambda_395(void *data, object self_734083, int argc, object *args) /* object self_734083, object r_732790 */
 {
 object r_732790 = args[0];
  
closureN_type c_737762;
object e_737766 [2];
c_737762.hdr.mark = gc_color_red;
 c_737762.hdr.grayed = 0;
c_737762.tag = closureN_tag;
 c_737762.fn = (function_type)__lambda_396;
c_737762.num_args = 1;
c_737762.num_elements = 2;
c_737762.elements = (object *)e_737766;
c_737762.elements[0] = ((closureN)self_734083)->elements[1];
c_737762.elements[1] = r_732790;


closureN_type c_737767;
object e_737806 [4];
c_737767.hdr.mark = gc_color_red;
 c_737767.hdr.grayed = 0;
c_737767.tag = closureN_tag;
 c_737767.fn = (function_type)__lambda_397;
c_737767.num_args = 2;
c_737767.num_elements = 4;
c_737767.elements = (object *)e_737806;
c_737767.elements[0] = ((closureN)self_734083)->elements[0];
c_737767.elements[1] = ((closureN)self_734083)->elements[2];
c_737767.elements[2] = ((closureN)self_734083)->elements[3];
c_737767.elements[3] = ((closureN)self_734083)->elements[4];

return_direct_with_clo1(data,(closure)&c_737762,__lambda_396,  &c_737767);; 
}

static void __lambda_397(void *data, object self_734084, int argc, object *args) /* object self_734084, object k_732792, object as_73418_731597, object ds_73419_731598 */
 {
 object k_732792 = args[0]; object as_73418_731597 = args[1]; object ds_73419_731598 = args[2];
    
if( (boolean_f != Cyc_is_null(as_73418_731597)) ){ 
  return_direct_with_clo1(data,  k_732792, (((closure)  k_732792)->fn),  ((closureN)self_734084)->elements[0]);
} else { 
  
closureN_type c_737773;
object e_737794 [4];
c_737773.hdr.mark = gc_color_red;
 c_737773.hdr.grayed = 0;
c_737773.tag = closureN_tag;
 c_737773.fn = (function_type)__lambda_398;
c_737773.num_args = 0;
c_737773.num_elements = 4;
c_737773.elements = (object *)e_737794;
c_737773.elements[0] = as_73418_731597;
c_737773.elements[1] = ((closureN)self_734084)->elements[0];
c_737773.elements[2] = ((closureN)self_734084)->elements[1];
c_737773.elements[3] = ((closureN)self_734084)->elements[3];


closureN_type c_737795;
object e_737805 [4];
c_737795.hdr.mark = gc_color_red;
 c_737795.hdr.grayed = 0;
c_737795.tag = closureN_tag;
 c_737795.fn = (function_type)__lambda_400;
c_737795.num_args = 1;
c_737795.num_elements = 4;
c_737795.elements = (object *)e_737805;
c_737795.elements[0] = ds_73419_731598;
c_737795.elements[1] = k_732792;
c_737795.elements[2] = ((closureN)self_734084)->elements[1];
c_737795.elements[3] = ((closureN)self_734084)->elements[2];

return_direct_with_clo1(data,(closure)&c_737773,__lambda_398,  &c_737795);}
;; 
}

static void __lambda_400(void *data, object self_734085, int argc, object *args) /* object self_734085, object r_732795 */
 {
 object r_732795 = args[0];
  



return_closcall4(data,  car(((closureN)self_734085)->elements[3]),  ((closureN)self_734085)->elements[1], Cyc_cdr(data, ((closureN)self_734085)->elements[2]), ((closureN)self_734085)->elements[0], r_732795);; 
}

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




object c_737788 = apply_va(data,(closure)&c_737775,3,((closureN)self_734086)->elements[3], Cyc_car(data, ((closureN)self_734086)->elements[2]), ((closureN)self_734086)->elements[0]);
return_closcall1(data,(closure)&c_737775,  c_737788);; 
}

static void __lambda_399(void *data, object self_734087, int argc, object *args) /* object self_734087, object r_732797 */
 {
 object r_732797 = args[0];
  if( (boolean_f != r_732797) ){ 
  
complex_num_type local_737780; 
return_direct_with_clo1(data,  ((closureN)self_734087)->elements[1], (((closure)  ((closureN)self_734087)->elements[1])->fn),  Cyc_fast_sum(data,&local_737780, ((closureN)self_734087)->elements[0], obj_int2obj(1)));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734087)->elements[1], (((closure)  ((closureN)self_734087)->elements[1])->fn),  ((closureN)self_734087)->elements[0]);}
;; 
}

static void __lambda_396(void *data, object self_734088, int argc, object *args) /* object self_734088, object r_732791 */
 {
 object r_732791 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734088)->elements[0], ((closureN)self_734088)->elements[1], r_732791);; 
}

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



return_direct_with_clo1(data,(closure)&c_737740,__lambda_392,  Cyc_set_cell(data, ((closureN)self_734089)->elements[3], r_732787));; 
}

static void __lambda_392(void *data, object self_734090, int argc, object *args) /* object self_734090, object r_732786 */
 {

  

return_closcall4(data,  car(((closureN)self_734090)->elements[3]),  ((closureN)self_734090)->elements[0], ((closureN)self_734090)->elements[1], ((closureN)self_734090)->elements[2], obj_int2obj(0));; 
}

static void __lambda_369(void *data, object _, int argc, object *args) /* closure _,object k_732760, object lists_73396_731577 */
 {
object k_732760 = args[0]; object lists_73396_731577 = args[1];
  Cyc_st_add(data, "srfi/1.sld:%cars+cdrs/no-test");

closureN_type c_737627;
object e_737724 [1];
c_737627.hdr.mark = gc_color_red;
 c_737627.hdr.grayed = 0;
c_737627.tag = closureN_tag;
 c_737627.fn = (function_type)__lambda_370;
c_737627.num_args = 1;
c_737627.num_elements = 1;
c_737627.elements = (object *)e_737724;
c_737627.elements[0] = k_732760;

return_direct_with_clo1(data,(closure)&c_737627,__lambda_370,  lists_73396_731577);; 
}

static void __lambda_370(void *data, object self_734058, int argc, object *args) /* object self_734058, object lists_73398_731578 */
 {
 object lists_73398_731578 = args[0];
  
closureN_type c_737629;
object e_737723 [2];
c_737629.hdr.mark = gc_color_red;
 c_737629.hdr.grayed = 0;
c_737629.tag = closureN_tag;
 c_737629.fn = (function_type)__lambda_371;
c_737629.num_args = 1;
c_737629.num_elements = 2;
c_737629.elements = (object *)e_737723;
c_737629.elements[0] = ((closureN)self_734058)->elements[0];
c_737629.elements[1] = lists_73398_731578;

return_direct_with_clo1(data,(closure)&c_737629,__lambda_371,  boolean_f);; 
}

static void __lambda_371(void *data, object self_734059, int argc, object *args) /* object self_734059, object recur_73399_731579 */
 {
 object recur_73399_731579 = args[0];
  
closureN_type c_737631;
object e_737719 [2];
c_737631.hdr.mark = gc_color_red;
 c_737631.hdr.grayed = 0;
c_737631.tag = closureN_tag;
 c_737631.fn = (function_type)__lambda_1159;
c_737631.num_args = 1;
c_737631.num_elements = 2;
c_737631.elements = (object *)e_737719;
c_737631.elements[0] = ((closureN)self_734059)->elements[0];
c_737631.elements[1] = ((closureN)self_734059)->elements[1];


pair_type local_737722; 
return_direct_with_clo1(data,(closure)&c_737631,__lambda_1159,  set_cell_as_expr(&local_737722, recur_73399_731579));; 
}

static void __lambda_1159(void *data, object self_734060, int argc, object *args) /* object self_734060, object recur_73399_731579 */
 {
 object recur_73399_731579 = args[0];
  
closureN_type c_737633;
object e_737646 [3];
c_737633.hdr.mark = gc_color_red;
 c_737633.hdr.grayed = 0;
c_737633.tag = closureN_tag;
 c_737633.fn = (function_type)__lambda_372;
c_737633.num_args = 1;
c_737633.num_elements = 3;
c_737633.elements = (object *)e_737646;
c_737633.elements[0] = ((closureN)self_734060)->elements[0];
c_737633.elements[1] = ((closureN)self_734060)->elements[1];
c_737633.elements[2] = recur_73399_731579;


closureN_type c_737647;
object e_737718 [1];
c_737647.hdr.mark = gc_color_red;
 c_737647.hdr.grayed = 0;
c_737647.tag = closureN_tag;
 c_737647.fn = (function_type)__lambda_374;
c_737647.num_args = 1;
c_737647.num_elements = 1;
c_737647.elements = (object *)e_737718;
c_737647.elements[0] = recur_73399_731579;

return_direct_with_clo1(data,(closure)&c_737633,__lambda_372,  &c_737647);; 
}

static void __lambda_374(void *data, object self_734061, int argc, object *args) /* object self_734061, object k_732763, object lists_73400_731580 */
 {
 object k_732763 = args[0]; object lists_73400_731580 = args[1];
    
if( (boolean_f != Cyc_is_pair(lists_73400_731580)) ){ 
  
closureN_type c_737651;
object e_737707 [2];
c_737651.hdr.mark = gc_color_red;
 c_737651.hdr.grayed = 0;
c_737651.tag = closureN_tag;
 c_737651.fn = (function_type)__lambda_375;
c_737651.num_args = 1;
c_737651.num_elements = 2;
c_737651.elements = (object *)e_737707;
c_737651.elements[0] = k_732763;
c_737651.elements[1] = ((closureN)self_734061)->elements[0];


closureN_type c_737708;
object e_737716 [1];
c_737708.hdr.mark = gc_color_red;
 c_737708.hdr.grayed = 0;
c_737708.tag = closureN_tag;
 c_737708.fn = (function_type)__lambda_386;
c_737708.num_args = 0;
c_737708.num_elements = 1;
c_737708.elements = (object *)e_737716;
c_737708.elements[0] = lists_73400_731580;

return_direct_with_clo1(data,(closure)&c_737651,__lambda_375,  &c_737708);
} else { 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_732763, NULL, NULL);}
;; 
}

static void __lambda_386(void *data, object self_734062, int argc, object *args) /* object self_734062, object k_732778 */
 {
 object k_732778 = args[0];
  



return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_732778, Cyc_car(data, ((closureN)self_734062)->elements[0]), Cyc_cdr(data, ((closureN)self_734062)->elements[0]));; 
}

static void __lambda_375(void *data, object self_734063, int argc, object *args) /* object self_734063, object r_732765 */
 {
 object r_732765 = args[0];
  
closureN_type c_737653;
object e_737657 [2];
c_737653.hdr.mark = gc_color_red;
 c_737653.hdr.grayed = 0;
c_737653.tag = closureN_tag;
 c_737653.fn = (function_type)__lambda_376;
c_737653.num_args = 1;
c_737653.num_elements = 2;
c_737653.elements = (object *)e_737657;
c_737653.elements[0] = ((closureN)self_734063)->elements[0];
c_737653.elements[1] = r_732765;


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

return_direct_with_clo1(data,(closure)&c_737653,__lambda_376,  &c_737658);; 
}

static void __lambda_377(void *data, object self_734064, int argc, object *args) /* object self_734064, object k_732767, object list_73401_731581, object other_91lists_73402_731582 */
 {
 object k_732767 = args[0]; object list_73401_731581 = args[1]; object other_91lists_73402_731582 = args[2];
  
closureN_type c_737660;
object e_737696 [3];
c_737660.hdr.mark = gc_color_red;
 c_737660.hdr.grayed = 0;
c_737660.tag = closureN_tag;
 c_737660.fn = (function_type)__lambda_378;
c_737660.num_args = 1;
c_737660.num_elements = 3;
c_737660.elements = (object *)e_737696;
c_737660.elements[0] = k_732767;
c_737660.elements[1] = other_91lists_73402_731582;
c_737660.elements[2] = ((closureN)self_734064)->elements[0];


closureN_type c_737697;
object e_737705 [1];
c_737697.hdr.mark = gc_color_red;
 c_737697.hdr.grayed = 0;
c_737697.tag = closureN_tag;
 c_737697.fn = (function_type)__lambda_385;
c_737697.num_args = 0;
c_737697.num_elements = 1;
c_737697.elements = (object *)e_737705;
c_737697.elements[0] = list_73401_731581;

return_direct_with_clo1(data,(closure)&c_737660,__lambda_378,  &c_737697);; 
}

static void __lambda_385(void *data, object self_734065, int argc, object *args) /* object self_734065, object k_732777 */
 {
 object k_732777 = args[0];
  



return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_732777, Cyc_car(data, ((closureN)self_734065)->elements[0]), Cyc_cdr(data, ((closureN)self_734065)->elements[0]));; 
}

static void __lambda_378(void *data, object self_734066, int argc, object *args) /* object self_734066, object r_732768 */
 {
 object r_732768 = args[0];
  
closureN_type c_737662;
object e_737666 [2];
c_737662.hdr.mark = gc_color_red;
 c_737662.hdr.grayed = 0;
c_737662.tag = closureN_tag;
 c_737662.fn = (function_type)__lambda_379;
c_737662.num_args = 1;
c_737662.num_elements = 2;
c_737662.elements = (object *)e_737666;
c_737662.elements[0] = ((closureN)self_734066)->elements[0];
c_737662.elements[1] = r_732768;


closureN_type c_737667;
object e_737695 [2];
c_737667.hdr.mark = gc_color_red;
 c_737667.hdr.grayed = 0;
c_737667.tag = closureN_tag;
 c_737667.fn = (function_type)__lambda_380;
c_737667.num_args = 2;
c_737667.num_elements = 2;
c_737667.elements = (object *)e_737695;
c_737667.elements[0] = ((closureN)self_734066)->elements[1];
c_737667.elements[1] = ((closureN)self_734066)->elements[2];

return_direct_with_clo1(data,(closure)&c_737662,__lambda_379,  &c_737667);; 
}

static void __lambda_380(void *data, object self_734067, int argc, object *args) /* object self_734067, object k_732770, object a_73403_731583, object d_73404_731584 */
 {
 object k_732770 = args[0]; object a_73403_731583 = args[1]; object d_73404_731584 = args[2];
  
closureN_type c_737669;
object e_737687 [3];
c_737669.hdr.mark = gc_color_red;
 c_737669.hdr.grayed = 0;
c_737669.tag = closureN_tag;
 c_737669.fn = (function_type)__lambda_381;
c_737669.num_args = 1;
c_737669.num_elements = 3;
c_737669.elements = (object *)e_737687;
c_737669.elements[0] = a_73403_731583;
c_737669.elements[1] = d_73404_731584;
c_737669.elements[2] = k_732770;


closureN_type c_737688;
object e_737694 [2];
c_737688.hdr.mark = gc_color_red;
 c_737688.hdr.grayed = 0;
c_737688.tag = closureN_tag;
 c_737688.fn = (function_type)__lambda_384;
c_737688.num_args = 0;
c_737688.num_elements = 2;
c_737688.elements = (object *)e_737694;
c_737688.elements[0] = ((closureN)self_734067)->elements[0];
c_737688.elements[1] = ((closureN)self_734067)->elements[1];

return_direct_with_clo1(data,(closure)&c_737669,__lambda_381,  &c_737688);; 
}

static void __lambda_384(void *data, object self_734068, int argc, object *args) /* object self_734068, object k_732776 */
 {
 object k_732776 = args[0];
  

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

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


closureN_type c_737676;
object e_737686 [2];
c_737676.hdr.mark = gc_color_red;
 c_737676.hdr.grayed = 0;
c_737676.tag = closureN_tag;
 c_737676.fn = (function_type)__lambda_383;
c_737676.num_args = 2;
c_737676.num_elements = 2;
c_737676.elements = (object *)e_737686;
c_737676.elements[0] = ((closureN)self_734069)->elements[0];
c_737676.elements[1] = ((closureN)self_734069)->elements[1];

return_direct_with_clo1(data,(closure)&c_737671,__lambda_382,  &c_737676);; 
}

static void __lambda_383(void *data, object self_734070, int argc, object *args) /* object self_734070, object k_732773, object cars_73405_731585, object cdrs_73406_731586 */
 {
 object k_732773 = args[0]; object cars_73405_731585 = args[1]; object cdrs_73406_731586 = args[2];
  
pair_type local_737680; 

pair_type local_737684; 
return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_732773, set_pair_as_expr(&local_737680, ((closureN)self_734070)->elements[0], cars_73405_731585), set_pair_as_expr(&local_737684, ((closureN)self_734070)->elements[1], cdrs_73406_731586));; 
}

static void __lambda_382(void *data, object self_734071, int argc, object *args) /* object self_734071, object r_732772 */
 {
 object r_732772 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734071)->elements[0], ((closureN)self_734071)->elements[1], r_732772);; 
}

static void __lambda_379(void *data, object self_734072, int argc, object *args) /* object self_734072, object r_732769 */
 {
 object r_732769 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734072)->elements[0], ((closureN)self_734072)->elements[1], r_732769);; 
}

static void __lambda_376(void *data, object self_734073, int argc, object *args) /* object self_734073, object r_732766 */
 {
 object r_732766 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734073)->elements[0], ((closureN)self_734073)->elements[1], r_732766);; 
}

static void __lambda_372(void *data, object self_734074, int argc, object *args) /* object self_734074, object r_732762 */
 {
 object r_732762 = args[0];
  
closureN_type c_737635;
object e_737642 [3];
c_737635.hdr.mark = gc_color_red;
 c_737635.hdr.grayed = 0;
c_737635.tag = closureN_tag;
 c_737635.fn = (function_type)__lambda_373;
c_737635.num_args = 1;
c_737635.num_elements = 3;
c_737635.elements = (object *)e_737642;
c_737635.elements[0] = ((closureN)self_734074)->elements[0];
c_737635.elements[1] = ((closureN)self_734074)->elements[1];
c_737635.elements[2] = ((closureN)self_734074)->elements[2];



return_direct_with_clo1(data,(closure)&c_737635,__lambda_373,  Cyc_set_cell(data, ((closureN)self_734074)->elements[2], r_732762));; 
}

static void __lambda_373(void *data, object self_734075, int argc, object *args) /* object self_734075, object r_732761 */
 {

  

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

static void __lambda_348(void *data, object _, int argc, object *args) /* closure _,object k_732732, object lists_73383_731565, object cars_91final_73384_731566 */
 {
object k_732732 = args[0]; object lists_73383_731565 = args[1]; object cars_91final_73384_731566 = args[2];
  Cyc_st_add(data, "srfi/1.sld:%cars+cdrs+");

closureN_type c_737509;
object e_737512 [1];
c_737509.hdr.mark = gc_color_red;
 c_737509.hdr.grayed = 0;
c_737509.tag = closureN_tag;
 c_737509.fn = (function_type)__lambda_349;
c_737509.num_args = 1;
c_737509.num_elements = 1;
c_737509.elements = (object *)e_737512;
c_737509.elements[0] = k_732732;


closureN_type c_737513;
object e_737624 [2];
c_737513.hdr.mark = gc_color_red;
 c_737513.hdr.grayed = 0;
c_737513.tag = closureN_tag;
 c_737513.fn = (function_type)__lambda_350;
c_737513.num_args = 1;
c_737513.num_elements = 2;
c_737513.elements = (object *)e_737624;
c_737513.elements[0] = cars_91final_73384_731566;
c_737513.elements[1] = lists_73383_731565;

return_direct_with_clo1(data,(closure)&c_737509,__lambda_349,  &c_737513);; 
}

static void __lambda_350(void *data, object self_734037, int argc, object *args) /* object self_734037, object k_732734, object abort_73385_731567 */
 {
 object k_732734 = args[0]; object abort_73385_731567 = args[1];
  
closureN_type c_737515;
object e_737622 [3];
c_737515.hdr.mark = gc_color_red;
 c_737515.hdr.grayed = 0;
c_737515.tag = closureN_tag;
 c_737515.fn = (function_type)__lambda_351;
c_737515.num_args = 1;
c_737515.num_elements = 3;
c_737515.elements = (object *)e_737622;
c_737515.elements[0] = abort_73385_731567;
c_737515.elements[1] = ((closureN)self_734037)->elements[0];
c_737515.elements[2] = k_732734;

return_direct_with_clo1(data,(closure)&c_737515,__lambda_351,  ((closureN)self_734037)->elements[1]);; 
}

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

return_direct_with_clo1(data,(closure)&c_737517,__lambda_352,  boolean_f);; 
}

static void __lambda_352(void *data, object self_734039, int argc, object *args) /* object self_734039, object recur_73388_731569 */
 {
 object recur_73388_731569 = args[0];
  
closureN_type c_737519;
object e_737617 [4];
c_737519.hdr.mark = gc_color_red;
 c_737519.hdr.grayed = 0;
c_737519.tag = closureN_tag;
 c_737519.fn = (function_type)__lambda_1158;
c_737519.num_args = 1;
c_737519.num_elements = 4;
c_737519.elements = (object *)e_737617;
c_737519.elements[0] = ((closureN)self_734039)->elements[0];
c_737519.elements[1] = ((closureN)self_734039)->elements[1];
c_737519.elements[2] = ((closureN)self_734039)->elements[2];
c_737519.elements[3] = ((closureN)self_734039)->elements[3];


pair_type local_737620; 
return_direct_with_clo1(data,(closure)&c_737519,__lambda_1158,  set_cell_as_expr(&local_737620, recur_73388_731569));; 
}

static void __lambda_1158(void *data, object self_734040, int argc, object *args) /* object self_734040, object recur_73388_731569 */
 {
 object recur_73388_731569 = args[0];
  
closureN_type c_737521;
object e_737534 [3];
c_737521.hdr.mark = gc_color_red;
 c_737521.hdr.grayed = 0;
c_737521.tag = closureN_tag;
 c_737521.fn = (function_type)__lambda_353;
c_737521.num_args = 1;
c_737521.num_elements = 3;
c_737521.elements = (object *)e_737534;
c_737521.elements[0] = ((closureN)self_734040)->elements[2];
c_737521.elements[1] = ((closureN)self_734040)->elements[3];
c_737521.elements[2] = recur_73388_731569;


closureN_type c_737535;
object e_737616 [3];
c_737535.hdr.mark = gc_color_red;
 c_737535.hdr.grayed = 0;
c_737535.tag = closureN_tag;
 c_737535.fn = (function_type)__lambda_355;
c_737535.num_args = 1;
c_737535.num_elements = 3;
c_737535.elements = (object *)e_737616;
c_737535.elements[0] = ((closureN)self_734040)->elements[0];
c_737535.elements[1] = ((closureN)self_734040)->elements[1];
c_737535.elements[2] = recur_73388_731569;

return_direct_with_clo1(data,(closure)&c_737521,__lambda_353,  &c_737535);; 
}

static void __lambda_355(void *data, object self_734041, int argc, object *args) /* object self_734041, object k_732737, object lists_73389_731570 */
 {
 object k_732737 = args[0]; object lists_73389_731570 = args[1];
    
if( (boolean_f != Cyc_is_pair(lists_73389_731570)) ){ 
  
closureN_type c_737539;
object e_737601 [3];
c_737539.hdr.mark = gc_color_red;
 c_737539.hdr.grayed = 0;
c_737539.tag = closureN_tag;
 c_737539.fn = (function_type)__lambda_356;
c_737539.num_args = 1;
c_737539.num_elements = 3;
c_737539.elements = (object *)e_737601;
c_737539.elements[0] = ((closureN)self_734041)->elements[0];
c_737539.elements[1] = k_732737;
c_737539.elements[2] = ((closureN)self_734041)->elements[2];


closureN_type c_737602;
object e_737610 [1];
c_737602.hdr.mark = gc_color_red;
 c_737602.hdr.grayed = 0;
c_737602.tag = closureN_tag;
 c_737602.fn = (function_type)__lambda_368;
c_737602.num_args = 0;
c_737602.num_elements = 1;
c_737602.elements = (object *)e_737610;
c_737602.elements[0] = lists_73389_731570;

return_direct_with_clo1(data,(closure)&c_737539,__lambda_356,  &c_737602);
} else { 
  
pair_type local_737614; 
return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_732737, set_cell_as_expr(&local_737614, ((closureN)self_734041)->elements[1]), NULL);}
;; 
}

static void __lambda_368(void *data, object self_734042, int argc, object *args) /* object self_734042, object k_732755 */
 {
 object k_732755 = args[0];
  



return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_732755, Cyc_car(data, ((closureN)self_734042)->elements[0]), Cyc_cdr(data, ((closureN)self_734042)->elements[0]));; 
}

static void __lambda_356(void *data, object self_734043, int argc, object *args) /* object self_734043, object r_732739 */
 {
 object r_732739 = args[0];
  
closureN_type c_737541;
object e_737545 [2];
c_737541.hdr.mark = gc_color_red;
 c_737541.hdr.grayed = 0;
c_737541.tag = closureN_tag;
 c_737541.fn = (function_type)__lambda_357;
c_737541.num_args = 1;
c_737541.num_elements = 2;
c_737541.elements = (object *)e_737545;
c_737541.elements[0] = ((closureN)self_734043)->elements[1];
c_737541.elements[1] = r_732739;


closureN_type c_737546;
object e_737600 [2];
c_737546.hdr.mark = gc_color_red;
 c_737546.hdr.grayed = 0;
c_737546.tag = closureN_tag;
 c_737546.fn = (function_type)__lambda_358;
c_737546.num_args = 2;
c_737546.num_elements = 2;
c_737546.elements = (object *)e_737600;
c_737546.elements[0] = ((closureN)self_734043)->elements[0];
c_737546.elements[1] = ((closureN)self_734043)->elements[2];

return_direct_with_clo1(data,(closure)&c_737541,__lambda_357,  &c_737546);; 
}

static void __lambda_358(void *data, object self_734044, int argc, object *args) /* object self_734044, object k_732741, object list_73390_731571, object other_91lists_73391_731572 */
 {
 object k_732741 = args[0]; object list_73390_731571 = args[1]; object other_91lists_73391_731572 = args[2];
  
closureN_type c_737548;
object e_737599 [5];
c_737548.hdr.mark = gc_color_red;
 c_737548.hdr.grayed = 0;
c_737548.tag = closureN_tag;
 c_737548.fn = (function_type)__lambda_359;
c_737548.num_args = 1;
c_737548.num_elements = 5;
c_737548.elements = (object *)e_737599;
c_737548.elements[0] = ((closureN)self_734044)->elements[0];
c_737548.elements[1] = k_732741;
c_737548.elements[2] = list_73390_731571;
c_737548.elements[3] = other_91lists_73391_731572;
c_737548.elements[4] = ((closureN)self_734044)->elements[1];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_737548, list_73390_731571);; 
}

static void __lambda_359(void *data, object self_734045, int argc, object *args) /* object self_734045, object r_732742 */
 {
 object r_732742 = args[0];
  if( (boolean_f != r_732742) ){ 
  return_closcall3(data,  ((closureN)self_734045)->elements[0],  ((closureN)self_734045)->elements[1], NULL, NULL);
} else { 
  
closureN_type c_737553;
object e_737589 [3];
c_737553.hdr.mark = gc_color_red;
 c_737553.hdr.grayed = 0;
c_737553.tag = closureN_tag;
 c_737553.fn = (function_type)__lambda_360;
c_737553.num_args = 1;
c_737553.num_elements = 3;
c_737553.elements = (object *)e_737589;
c_737553.elements[0] = ((closureN)self_734045)->elements[1];
c_737553.elements[1] = ((closureN)self_734045)->elements[3];
c_737553.elements[2] = ((closureN)self_734045)->elements[4];


closureN_type c_737590;
object e_737598 [1];
c_737590.hdr.mark = gc_color_red;
 c_737590.hdr.grayed = 0;
c_737590.tag = closureN_tag;
 c_737590.fn = (function_type)__lambda_367;
c_737590.num_args = 0;
c_737590.num_elements = 1;
c_737590.elements = (object *)e_737598;
c_737590.elements[0] = ((closureN)self_734045)->elements[2];

return_direct_with_clo1(data,(closure)&c_737553,__lambda_360,  &c_737590);}
;; 
}

static void __lambda_367(void *data, object self_734046, int argc, object *args) /* object self_734046, object k_732754 */
 {
 object k_732754 = args[0];
  



return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_732754, Cyc_car(data, ((closureN)self_734046)->elements[0]), Cyc_cdr(data, ((closureN)self_734046)->elements[0]));; 
}

static void __lambda_360(void *data, object self_734047, int argc, object *args) /* object self_734047, object r_732745 */
 {
 object r_732745 = args[0];
  
closureN_type c_737555;
object e_737559 [2];
c_737555.hdr.mark = gc_color_red;
 c_737555.hdr.grayed = 0;
c_737555.tag = closureN_tag;
 c_737555.fn = (function_type)__lambda_361;
c_737555.num_args = 1;
c_737555.num_elements = 2;
c_737555.elements = (object *)e_737559;
c_737555.elements[0] = ((closureN)self_734047)->elements[0];
c_737555.elements[1] = r_732745;


closureN_type c_737560;
object e_737588 [2];
c_737560.hdr.mark = gc_color_red;
 c_737560.hdr.grayed = 0;
c_737560.tag = closureN_tag;
 c_737560.fn = (function_type)__lambda_362;
c_737560.num_args = 2;
c_737560.num_elements = 2;
c_737560.elements = (object *)e_737588;
c_737560.elements[0] = ((closureN)self_734047)->elements[1];
c_737560.elements[1] = ((closureN)self_734047)->elements[2];

return_direct_with_clo1(data,(closure)&c_737555,__lambda_361,  &c_737560);; 
}

static void __lambda_362(void *data, object self_734048, int argc, object *args) /* object self_734048, object k_732747, object a_73392_731573, object d_73393_731574 */
 {
 object k_732747 = args[0]; object a_73392_731573 = args[1]; object d_73393_731574 = args[2];
  
closureN_type c_737562;
object e_737580 [3];
c_737562.hdr.mark = gc_color_red;
 c_737562.hdr.grayed = 0;
c_737562.tag = closureN_tag;
 c_737562.fn = (function_type)__lambda_363;
c_737562.num_args = 1;
c_737562.num_elements = 3;
c_737562.elements = (object *)e_737580;
c_737562.elements[0] = a_73392_731573;
c_737562.elements[1] = d_73393_731574;
c_737562.elements[2] = k_732747;


closureN_type c_737581;
object e_737587 [2];
c_737581.hdr.mark = gc_color_red;
 c_737581.hdr.grayed = 0;
c_737581.tag = closureN_tag;
 c_737581.fn = (function_type)__lambda_366;
c_737581.num_args = 0;
c_737581.num_elements = 2;
c_737581.elements = (object *)e_737587;
c_737581.elements[0] = ((closureN)self_734048)->elements[0];
c_737581.elements[1] = ((closureN)self_734048)->elements[1];

return_direct_with_clo1(data,(closure)&c_737562,__lambda_363,  &c_737581);; 
}

static void __lambda_366(void *data, object self_734049, int argc, object *args) /* object self_734049, object k_732753 */
 {
 object k_732753 = args[0];
  

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

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


closureN_type c_737569;
object e_737579 [2];
c_737569.hdr.mark = gc_color_red;
 c_737569.hdr.grayed = 0;
c_737569.tag = closureN_tag;
 c_737569.fn = (function_type)__lambda_365;
c_737569.num_args = 2;
c_737569.num_elements = 2;
c_737569.elements = (object *)e_737579;
c_737569.elements[0] = ((closureN)self_734050)->elements[0];
c_737569.elements[1] = ((closureN)self_734050)->elements[1];

return_direct_with_clo1(data,(closure)&c_737564,__lambda_364,  &c_737569);; 
}

static void __lambda_365(void *data, object self_734051, int argc, object *args) /* object self_734051, object k_732750, object cars_73394_731575, object cdrs_73395_731576 */
 {
 object k_732750 = args[0]; object cars_73394_731575 = args[1]; object cdrs_73395_731576 = args[2];
  
pair_type local_737573; 

pair_type local_737577; 
return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_732750, set_pair_as_expr(&local_737573, ((closureN)self_734051)->elements[0], cars_73394_731575), set_pair_as_expr(&local_737577, ((closureN)self_734051)->elements[1], cdrs_73395_731576));; 
}

static void __lambda_364(void *data, object self_734052, int argc, object *args) /* object self_734052, object r_732749 */
 {
 object r_732749 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734052)->elements[0], ((closureN)self_734052)->elements[1], r_732749);; 
}

static void __lambda_361(void *data, object self_734053, int argc, object *args) /* object self_734053, object r_732746 */
 {
 object r_732746 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734053)->elements[0], ((closureN)self_734053)->elements[1], r_732746);; 
}

static void __lambda_357(void *data, object self_734054, int argc, object *args) /* object self_734054, object r_732740 */
 {
 object r_732740 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734054)->elements[0], ((closureN)self_734054)->elements[1], r_732740);; 
}

static void __lambda_353(void *data, object self_734055, int argc, object *args) /* object self_734055, object r_732736 */
 {
 object r_732736 = args[0];
  
closureN_type c_737523;
object e_737530 [3];
c_737523.hdr.mark = gc_color_red;
 c_737523.hdr.grayed = 0;
c_737523.tag = closureN_tag;
 c_737523.fn = (function_type)__lambda_354;
c_737523.num_args = 1;
c_737523.num_elements = 3;
c_737523.elements = (object *)e_737530;
c_737523.elements[0] = ((closureN)self_734055)->elements[0];
c_737523.elements[1] = ((closureN)self_734055)->elements[1];
c_737523.elements[2] = ((closureN)self_734055)->elements[2];



return_direct_with_clo1(data,(closure)&c_737523,__lambda_354,  Cyc_set_cell(data, ((closureN)self_734055)->elements[2], r_732736));; 
}

static void __lambda_354(void *data, object self_734056, int argc, object *args) /* object self_734056, object r_732735 */
 {

  

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

static void __lambda_349(void *data, object self_734057, int argc, object *args) /* object self_734057, object r_732733 */
 {
 object r_732733 = args[0];
  return_direct_with_clo2(data,  __glo_call_91with_91current_91continuation_scheme_base, (((closure)  __glo_call_91with_91current_91continuation_scheme_base)->fn),  ((closureN)self_734057)->elements[0], r_732733);; 
}

static void __lambda_327(void *data, object _, int argc, object *args) /* closure _,object k_732704, object lists_73371_731554 */
 {
object k_732704 = args[0]; object lists_73371_731554 = args[1];
  Cyc_st_add(data, "srfi/1.sld:%cars+cdrs");

closureN_type c_737395;
object e_737398 [1];
c_737395.hdr.mark = gc_color_red;
 c_737395.hdr.grayed = 0;
c_737395.tag = closureN_tag;
 c_737395.fn = (function_type)__lambda_328;
c_737395.num_args = 1;
c_737395.num_elements = 1;
c_737395.elements = (object *)e_737398;
c_737395.elements[0] = k_732704;


closureN_type c_737399;
object e_737506 [1];
c_737399.hdr.mark = gc_color_red;
 c_737399.hdr.grayed = 0;
c_737399.tag = closureN_tag;
 c_737399.fn = (function_type)__lambda_329;
c_737399.num_args = 1;
c_737399.num_elements = 1;
c_737399.elements = (object *)e_737506;
c_737399.elements[0] = lists_73371_731554;

return_direct_with_clo1(data,(closure)&c_737395,__lambda_328,  &c_737399);; 
}

static void __lambda_329(void *data, object self_734016, int argc, object *args) /* object self_734016, object k_732706, object abort_73372_731555 */
 {
 object k_732706 = args[0]; object abort_73372_731555 = args[1];
  
closureN_type c_737401;
object e_737504 [2];
c_737401.hdr.mark = gc_color_red;
 c_737401.hdr.grayed = 0;
c_737401.tag = closureN_tag;
 c_737401.fn = (function_type)__lambda_330;
c_737401.num_args = 1;
c_737401.num_elements = 2;
c_737401.elements = (object *)e_737504;
c_737401.elements[0] = abort_73372_731555;
c_737401.elements[1] = k_732706;

return_direct_with_clo1(data,(closure)&c_737401,__lambda_330,  ((closureN)self_734016)->elements[0]);; 
}

static void __lambda_330(void *data, object self_734017, int argc, object *args) /* object self_734017, object lists_73374_731556 */
 {
 object lists_73374_731556 = args[0];
  
closureN_type c_737403;
object e_737503 [3];
c_737403.hdr.mark = gc_color_red;
 c_737403.hdr.grayed = 0;
c_737403.tag = closureN_tag;
 c_737403.fn = (function_type)__lambda_331;
c_737403.num_args = 1;
c_737403.num_elements = 3;
c_737403.elements = (object *)e_737503;
c_737403.elements[0] = ((closureN)self_734017)->elements[0];
c_737403.elements[1] = ((closureN)self_734017)->elements[1];
c_737403.elements[2] = lists_73374_731556;

return_direct_with_clo1(data,(closure)&c_737403,__lambda_331,  boolean_f);; 
}

static void __lambda_331(void *data, object self_734018, int argc, object *args) /* object self_734018, object recur_73375_731557 */
 {
 object recur_73375_731557 = args[0];
  
closureN_type c_737405;
object e_737499 [3];
c_737405.hdr.mark = gc_color_red;
 c_737405.hdr.grayed = 0;
c_737405.tag = closureN_tag;
 c_737405.fn = (function_type)__lambda_1157;
c_737405.num_args = 1;
c_737405.num_elements = 3;
c_737405.elements = (object *)e_737499;
c_737405.elements[0] = ((closureN)self_734018)->elements[0];
c_737405.elements[1] = ((closureN)self_734018)->elements[1];
c_737405.elements[2] = ((closureN)self_734018)->elements[2];


pair_type local_737502; 
return_direct_with_clo1(data,(closure)&c_737405,__lambda_1157,  set_cell_as_expr(&local_737502, recur_73375_731557));; 
}

static void __lambda_1157(void *data, object self_734019, int argc, object *args) /* object self_734019, object recur_73375_731557 */
 {
 object recur_73375_731557 = args[0];
  
closureN_type c_737407;
object e_737420 [3];
c_737407.hdr.mark = gc_color_red;
 c_737407.hdr.grayed = 0;
c_737407.tag = closureN_tag;
 c_737407.fn = (function_type)__lambda_332;
c_737407.num_args = 1;
c_737407.num_elements = 3;
c_737407.elements = (object *)e_737420;
c_737407.elements[0] = ((closureN)self_734019)->elements[1];
c_737407.elements[1] = ((closureN)self_734019)->elements[2];
c_737407.elements[2] = recur_73375_731557;


closureN_type c_737421;
object e_737498 [2];
c_737421.hdr.mark = gc_color_red;
 c_737421.hdr.grayed = 0;
c_737421.tag = closureN_tag;
 c_737421.fn = (function_type)__lambda_334;
c_737421.num_args = 1;
c_737421.num_elements = 2;
c_737421.elements = (object *)e_737498;
c_737421.elements[0] = ((closureN)self_734019)->elements[0];
c_737421.elements[1] = recur_73375_731557;

return_direct_with_clo1(data,(closure)&c_737407,__lambda_332,  &c_737421);; 
}

static void __lambda_334(void *data, object self_734020, int argc, object *args) /* object self_734020, object k_732709, object lists_73376_731558 */
 {
 object k_732709 = args[0]; object lists_73376_731558 = args[1];
    
if( (boolean_f != Cyc_is_pair(lists_73376_731558)) ){ 
  
closureN_type c_737425;
object e_737487 [3];
c_737425.hdr.mark = gc_color_red;
 c_737425.hdr.grayed = 0;
c_737425.tag = closureN_tag;
 c_737425.fn = (function_type)__lambda_335;
c_737425.num_args = 1;
c_737425.num_elements = 3;
c_737425.elements = (object *)e_737487;
c_737425.elements[0] = ((closureN)self_734020)->elements[0];
c_737425.elements[1] = k_732709;
c_737425.elements[2] = ((closureN)self_734020)->elements[1];


closureN_type c_737488;
object e_737496 [1];
c_737488.hdr.mark = gc_color_red;
 c_737488.hdr.grayed = 0;
c_737488.tag = closureN_tag;
 c_737488.fn = (function_type)__lambda_347;
c_737488.num_args = 0;
c_737488.num_elements = 1;
c_737488.elements = (object *)e_737496;
c_737488.elements[0] = lists_73376_731558;

return_direct_with_clo1(data,(closure)&c_737425,__lambda_335,  &c_737488);
} else { 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_732709, NULL, NULL);}
;; 
}

static void __lambda_347(void *data, object self_734021, int argc, object *args) /* object self_734021, object k_732727 */
 {
 object k_732727 = args[0];
  



return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_732727, Cyc_car(data, ((closureN)self_734021)->elements[0]), Cyc_cdr(data, ((closureN)self_734021)->elements[0]));; 
}

static void __lambda_335(void *data, object self_734022, int argc, object *args) /* object self_734022, object r_732711 */
 {
 object r_732711 = args[0];
  
closureN_type c_737427;
object e_737431 [2];
c_737427.hdr.mark = gc_color_red;
 c_737427.hdr.grayed = 0;
c_737427.tag = closureN_tag;
 c_737427.fn = (function_type)__lambda_336;
c_737427.num_args = 1;
c_737427.num_elements = 2;
c_737427.elements = (object *)e_737431;
c_737427.elements[0] = ((closureN)self_734022)->elements[1];
c_737427.elements[1] = r_732711;


closureN_type c_737432;
object e_737486 [2];
c_737432.hdr.mark = gc_color_red;
 c_737432.hdr.grayed = 0;
c_737432.tag = closureN_tag;
 c_737432.fn = (function_type)__lambda_337;
c_737432.num_args = 2;
c_737432.num_elements = 2;
c_737432.elements = (object *)e_737486;
c_737432.elements[0] = ((closureN)self_734022)->elements[0];
c_737432.elements[1] = ((closureN)self_734022)->elements[2];

return_direct_with_clo1(data,(closure)&c_737427,__lambda_336,  &c_737432);; 
}

static void __lambda_337(void *data, object self_734023, int argc, object *args) /* object self_734023, object k_732713, object list_73377_731559, object other_91lists_73378_731560 */
 {
 object k_732713 = args[0]; object list_73377_731559 = args[1]; object other_91lists_73378_731560 = args[2];
  
closureN_type c_737434;
object e_737485 [5];
c_737434.hdr.mark = gc_color_red;
 c_737434.hdr.grayed = 0;
c_737434.tag = closureN_tag;
 c_737434.fn = (function_type)__lambda_338;
c_737434.num_args = 1;
c_737434.num_elements = 5;
c_737434.elements = (object *)e_737485;
c_737434.elements[0] = ((closureN)self_734023)->elements[0];
c_737434.elements[1] = k_732713;
c_737434.elements[2] = list_73377_731559;
c_737434.elements[3] = other_91lists_73378_731560;
c_737434.elements[4] = ((closureN)self_734023)->elements[1];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_737434, list_73377_731559);; 
}

static void __lambda_338(void *data, object self_734024, int argc, object *args) /* object self_734024, object r_732714 */
 {
 object r_732714 = args[0];
  if( (boolean_f != r_732714) ){ 
  return_closcall3(data,  ((closureN)self_734024)->elements[0],  ((closureN)self_734024)->elements[1], NULL, NULL);
} else { 
  
closureN_type c_737439;
object e_737475 [3];
c_737439.hdr.mark = gc_color_red;
 c_737439.hdr.grayed = 0;
c_737439.tag = closureN_tag;
 c_737439.fn = (function_type)__lambda_339;
c_737439.num_args = 1;
c_737439.num_elements = 3;
c_737439.elements = (object *)e_737475;
c_737439.elements[0] = ((closureN)self_734024)->elements[1];
c_737439.elements[1] = ((closureN)self_734024)->elements[3];
c_737439.elements[2] = ((closureN)self_734024)->elements[4];


closureN_type c_737476;
object e_737484 [1];
c_737476.hdr.mark = gc_color_red;
 c_737476.hdr.grayed = 0;
c_737476.tag = closureN_tag;
 c_737476.fn = (function_type)__lambda_346;
c_737476.num_args = 0;
c_737476.num_elements = 1;
c_737476.elements = (object *)e_737484;
c_737476.elements[0] = ((closureN)self_734024)->elements[2];

return_direct_with_clo1(data,(closure)&c_737439,__lambda_339,  &c_737476);}
;; 
}

static void __lambda_346(void *data, object self_734025, int argc, object *args) /* object self_734025, object k_732726 */
 {
 object k_732726 = args[0];
  



return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_732726, Cyc_car(data, ((closureN)self_734025)->elements[0]), Cyc_cdr(data, ((closureN)self_734025)->elements[0]));; 
}

static void __lambda_339(void *data, object self_734026, int argc, object *args) /* object self_734026, object r_732717 */
 {
 object r_732717 = args[0];
  
closureN_type c_737441;
object e_737445 [2];
c_737441.hdr.mark = gc_color_red;
 c_737441.hdr.grayed = 0;
c_737441.tag = closureN_tag;
 c_737441.fn = (function_type)__lambda_340;
c_737441.num_args = 1;
c_737441.num_elements = 2;
c_737441.elements = (object *)e_737445;
c_737441.elements[0] = ((closureN)self_734026)->elements[0];
c_737441.elements[1] = r_732717;


closureN_type c_737446;
object e_737474 [2];
c_737446.hdr.mark = gc_color_red;
 c_737446.hdr.grayed = 0;
c_737446.tag = closureN_tag;
 c_737446.fn = (function_type)__lambda_341;
c_737446.num_args = 2;
c_737446.num_elements = 2;
c_737446.elements = (object *)e_737474;
c_737446.elements[0] = ((closureN)self_734026)->elements[1];
c_737446.elements[1] = ((closureN)self_734026)->elements[2];

return_direct_with_clo1(data,(closure)&c_737441,__lambda_340,  &c_737446);; 
}

static void __lambda_341(void *data, object self_734027, int argc, object *args) /* object self_734027, object k_732719, object a_73379_731561, object d_73380_731562 */
 {
 object k_732719 = args[0]; object a_73379_731561 = args[1]; object d_73380_731562 = args[2];
  
closureN_type c_737448;
object e_737466 [3];
c_737448.hdr.mark = gc_color_red;
 c_737448.hdr.grayed = 0;
c_737448.tag = closureN_tag;
 c_737448.fn = (function_type)__lambda_342;
c_737448.num_args = 1;
c_737448.num_elements = 3;
c_737448.elements = (object *)e_737466;
c_737448.elements[0] = a_73379_731561;
c_737448.elements[1] = d_73380_731562;
c_737448.elements[2] = k_732719;


closureN_type c_737467;
object e_737473 [2];
c_737467.hdr.mark = gc_color_red;
 c_737467.hdr.grayed = 0;
c_737467.tag = closureN_tag;
 c_737467.fn = (function_type)__lambda_345;
c_737467.num_args = 0;
c_737467.num_elements = 2;
c_737467.elements = (object *)e_737473;
c_737467.elements[0] = ((closureN)self_734027)->elements[0];
c_737467.elements[1] = ((closureN)self_734027)->elements[1];

return_direct_with_clo1(data,(closure)&c_737448,__lambda_342,  &c_737467);; 
}

static void __lambda_345(void *data, object self_734028, int argc, object *args) /* object self_734028, object k_732725 */
 {
 object k_732725 = args[0];
  

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

static void __lambda_342(void *data, object self_734029, int argc, object *args) /* object self_734029, object r_732720 */
 {
 object r_732720 = args[0];
  
closureN_type c_737450;
object e_737454 [2];
c_737450.hdr.mark = gc_color_red;
 c_737450.hdr.grayed = 0;
c_737450.tag = closureN_tag;
 c_737450.fn = (function_type)__lambda_343;
c_737450.num_args = 1;
c_737450.num_elements = 2;
c_737450.elements = (object *)e_737454;
c_737450.elements[0] = ((closureN)self_734029)->elements[2];
c_737450.elements[1] = r_732720;


closureN_type c_737455;
object e_737465 [2];
c_737455.hdr.mark = gc_color_red;
 c_737455.hdr.grayed = 0;
c_737455.tag = closureN_tag;
 c_737455.fn = (function_type)__lambda_344;
c_737455.num_args = 2;
c_737455.num_elements = 2;
c_737455.elements = (object *)e_737465;
c_737455.elements[0] = ((closureN)self_734029)->elements[0];
c_737455.elements[1] = ((closureN)self_734029)->elements[1];

return_direct_with_clo1(data,(closure)&c_737450,__lambda_343,  &c_737455);; 
}

static void __lambda_344(void *data, object self_734030, int argc, object *args) /* object self_734030, object k_732722, object cars_73381_731563, object cdrs_73382_731564 */
 {
 object k_732722 = args[0]; object cars_73381_731563 = args[1]; object cdrs_73382_731564 = args[2];
  
pair_type local_737459; 

pair_type local_737463; 
return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_732722, set_pair_as_expr(&local_737459, ((closureN)self_734030)->elements[0], cars_73381_731563), set_pair_as_expr(&local_737463, ((closureN)self_734030)->elements[1], cdrs_73382_731564));; 
}

static void __lambda_343(void *data, object self_734031, int argc, object *args) /* object self_734031, object r_732721 */
 {
 object r_732721 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734031)->elements[0], ((closureN)self_734031)->elements[1], r_732721);; 
}

static void __lambda_340(void *data, object self_734032, int argc, object *args) /* object self_734032, object r_732718 */
 {
 object r_732718 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734032)->elements[0], ((closureN)self_734032)->elements[1], r_732718);; 
}

static void __lambda_336(void *data, object self_734033, int argc, object *args) /* object self_734033, object r_732712 */
 {
 object r_732712 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_734033)->elements[0], ((closureN)self_734033)->elements[1], r_732712);; 
}

static void __lambda_332(void *data, object self_734034, int argc, object *args) /* object self_734034, object r_732708 */
 {
 object r_732708 = args[0];
  
closureN_type c_737409;
object e_737416 [3];
c_737409.hdr.mark = gc_color_red;
 c_737409.hdr.grayed = 0;
c_737409.tag = closureN_tag;
 c_737409.fn = (function_type)__lambda_333;
c_737409.num_args = 1;
c_737409.num_elements = 3;
c_737409.elements = (object *)e_737416;
c_737409.elements[0] = ((closureN)self_734034)->elements[0];
c_737409.elements[1] = ((closureN)self_734034)->elements[1];
c_737409.elements[2] = ((closureN)self_734034)->elements[2];



return_direct_with_clo1(data,(closure)&c_737409,__lambda_333,  Cyc_set_cell(data, ((closureN)self_734034)->elements[2], r_732708));; 
}

static void __lambda_333(void *data, object self_734035, int argc, object *args) /* object self_734035, object r_732707 */
 {

  

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

static void __lambda_328(void *data, object self_734036, int argc, object *args) /* object self_734036, object r_732705 */
 {
 object r_732705 = args[0];
  return_direct_with_clo2(data,  __glo_call_91with_91current_91continuation_scheme_base, (((closure)  __glo_call_91with_91current_91continuation_scheme_base)->fn),  ((closureN)self_734036)->elements[0], r_732705);; 
}

static void __lambda_320(void *data, object _, int argc, object *args) /* closure _,object k_732694, object lists_73365_731549, object last_91elt_73366_731550 */
 {
object k_732694 = args[0]; object lists_73365_731549 = args[1]; object last_91elt_73366_731550 = args[2];
  Cyc_st_add(data, "srfi/1.sld:%cars+");

closureN_type c_737342;
object e_737392 [2];
c_737342.hdr.mark = gc_color_red;
 c_737342.hdr.grayed = 0;
c_737342.tag = closureN_tag;
 c_737342.fn = (function_type)__lambda_321;
c_737342.num_args = 1;
c_737342.num_elements = 2;
c_737342.elements = (object *)e_737392;
c_737342.elements[0] = k_732694;
c_737342.elements[1] = last_91elt_73366_731550;

return_direct_with_clo1(data,(closure)&c_737342,__lambda_321,  lists_73365_731549);; 
}

static void __lambda_321(void *data, object self_734009, int argc, object *args) /* object self_734009, object lists_73368_731551 */
 {
 object lists_73368_731551 = args[0];
  
closureN_type c_737344;
object e_737391 [3];
c_737344.hdr.mark = gc_color_red;
 c_737344.hdr.grayed = 0;
c_737344.tag = closureN_tag;
 c_737344.fn = (function_type)__lambda_322;
c_737344.num_args = 1;
c_737344.num_elements = 3;
c_737344.elements = (object *)e_737391;
c_737344.elements[0] = ((closureN)self_734009)->elements[0];
c_737344.elements[1] = ((closureN)self_734009)->elements[1];
c_737344.elements[2] = lists_73368_731551;

return_direct_with_clo1(data,(closure)&c_737344,__lambda_322,  boolean_f);; 
}

static void __lambda_322(void *data, object self_734010, int argc, object *args) /* object self_734010, object recur_73369_731552 */
 {
 object recur_73369_731552 = args[0];
  
closureN_type c_737346;
object e_737387 [3];
c_737346.hdr.mark = gc_color_red;
 c_737346.hdr.grayed = 0;
c_737346.tag = closureN_tag;
 c_737346.fn = (function_type)__lambda_1156;
c_737346.num_args = 1;
c_737346.num_elements = 3;
c_737346.elements = (object *)e_737387;
c_737346.elements[0] = ((closureN)self_734010)->elements[0];
c_737346.elements[1] = ((closureN)self_734010)->elements[1];
c_737346.elements[2] = ((closureN)self_734010)->elements[2];


pair_type local_737390; 
return_direct_with_clo1(data,(closure)&c_737346,__lambda_1156,  set_cell_as_expr(&local_737390, recur_73369_731552));; 
}

static void __lambda_1156(void *data, object self_734011, int argc, object *args) /* object self_734011, object recur_73369_731552 */
 {
 object recur_73369_731552 = args[0];
  
closureN_type c_737348;
object e_737361 [3];
c_737348.hdr.mark = gc_color_red;
 c_737348.hdr.grayed = 0;
c_737348.tag = closureN_tag;
 c_737348.fn = (function_type)__lambda_323;
c_737348.num_args = 1;
c_737348.num_elements = 3;
c_737348.elements = (object *)e_737361;
c_737348.elements[0] = ((closureN)self_734011)->elements[0];
c_737348.elements[1] = ((closureN)self_734011)->elements[2];
c_737348.elements[2] = recur_73369_731552;


closureN_type c_737362;
object e_737386 [2];
c_737362.hdr.mark = gc_color_red;
 c_737362.hdr.grayed = 0;
c_737362.tag = closureN_tag;
 c_737362.fn = (function_type)__lambda_325;
c_737362.num_args = 1;
c_737362.num_elements = 2;
c_737362.elements = (object *)e_737386;
c_737362.elements[0] = ((closureN)self_734011)->elements[1];
c_737362.elements[1] = recur_73369_731552;

return_direct_with_clo1(data,(closure)&c_737348,__lambda_323,  &c_737362);; 
}

static void __lambda_325(void *data, object self_734012, int argc, object *args) /* object self_734012, object k_732697, object lists_73370_731553 */
 {
 object k_732697 = args[0]; object lists_73370_731553 = args[1];
    
if( (boolean_f != Cyc_is_pair(lists_73370_731553)) ){ 
  


closureN_type c_737369;
object e_737378 [2];
c_737369.hdr.mark = gc_color_red;
 c_737369.hdr.grayed = 0;
c_737369.tag = closureN_tag;
 c_737369.fn = (function_type)__lambda_326;
c_737369.num_args = 1;
c_737369.num_elements = 2;
c_737369.elements = (object *)e_737378;
c_737369.elements[0] = k_732697;
c_737369.elements[1] = lists_73370_731553;



return_closcall2(data,  car(((closureN)self_734012)->elements[1]),  &c_737369, Cyc_cdr(data, lists_73370_731553));
} else { 
  
pair_type local_737384; 
return_direct_with_clo1(data,  k_732697, (((closure)  k_732697)->fn),  set_cell_as_expr(&local_737384, ((closureN)self_734012)->elements[0]));}
;; 
}

static void __lambda_326(void *data, object self_734013, int argc, object *args) /* object self_734013, object r_732700 */
 {
 object r_732700 = args[0];
  
pair_type local_737374; 


return_direct_with_clo1(data,  ((closureN)self_734013)->elements[0], (((closure)  ((closureN)self_734013)->elements[0])->fn),  set_pair_as_expr(&local_737374, Cyc_caar(data, ((closureN)self_734013)->elements[1]), r_732700));; 
}

static void __lambda_323(void *data, object self_734014, int argc, object *args) /* object self_734014, object r_732696 */
 {
 object r_732696 = args[0];
  
closureN_type c_737350;
object e_737357 [3];
c_737350.hdr.mark = gc_color_red;
 c_737350.hdr.grayed = 0;
c_737350.tag = closureN_tag;
 c_737350.fn = (function_type)__lambda_324;
c_737350.num_args = 1;
c_737350.num_elements = 3;
c_737350.elements = (object *)e_737357;
c_737350.elements[0] = ((closureN)self_734014)->elements[0];
c_737350.elements[1] = ((closureN)self_734014)->elements[1];
c_737350.elements[2] = ((closureN)self_734014)->elements[2];



return_direct_with_clo1(data,(closure)&c_737350,__lambda_324,  Cyc_set_cell(data, ((closureN)self_734014)->elements[2], r_732696));; 
}

static void __lambda_324(void *data, object self_734015, int argc, object *args) /* object self_734015, object r_732695 */
 {

  

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

static void __lambda_310(void *data, object _, int argc, object *args) /* closure _,object k_732679, object lists_73358_731543 */
 {
object k_732679 = args[0]; object lists_73358_731543 = args[1];
  Cyc_st_add(data, "srfi/1.sld:%cdrs");

closureN_type c_737274;
object e_737277 [1];
c_737274.hdr.mark = gc_color_red;
 c_737274.hdr.grayed = 0;
c_737274.tag = closureN_tag;
 c_737274.fn = (function_type)__lambda_311;
c_737274.num_args = 1;
c_737274.num_elements = 1;
c_737274.elements = (object *)e_737277;
c_737274.elements[0] = k_732679;


closureN_type c_737278;
object e_737339 [1];
c_737278.hdr.mark = gc_color_red;
 c_737278.hdr.grayed = 0;
c_737278.tag = closureN_tag;
 c_737278.fn = (function_type)__lambda_312;
c_737278.num_args = 1;
c_737278.num_elements = 1;
c_737278.elements = (object *)e_737339;
c_737278.elements[0] = lists_73358_731543;

return_direct_with_clo1(data,(closure)&c_737274,__lambda_311,  &c_737278);; 
}

static void __lambda_312(void *data, object self_733999, int argc, object *args) /* object self_733999, object k_732681, object abort_73359_731544 */
 {
 object k_732681 = args[0]; object abort_73359_731544 = args[1];
  
closureN_type c_737280;
object e_737337 [2];
c_737280.hdr.mark = gc_color_red;
 c_737280.hdr.grayed = 0;
c_737280.tag = closureN_tag;
 c_737280.fn = (function_type)__lambda_313;
c_737280.num_args = 1;
c_737280.num_elements = 2;
c_737280.elements = (object *)e_737337;
c_737280.elements[0] = abort_73359_731544;
c_737280.elements[1] = k_732681;

return_direct_with_clo1(data,(closure)&c_737280,__lambda_313,  ((closureN)self_733999)->elements[0]);; 
}

static void __lambda_313(void *data, object self_734000, int argc, object *args) /* object self_734000, object lists_73361_731545 */
 {
 object lists_73361_731545 = args[0];
  
closureN_type c_737282;
object e_737336 [3];
c_737282.hdr.mark = gc_color_red;
 c_737282.hdr.grayed = 0;
c_737282.tag = closureN_tag;
 c_737282.fn = (function_type)__lambda_314;
c_737282.num_args = 1;
c_737282.num_elements = 3;
c_737282.elements = (object *)e_737336;
c_737282.elements[0] = ((closureN)self_734000)->elements[0];
c_737282.elements[1] = ((closureN)self_734000)->elements[1];
c_737282.elements[2] = lists_73361_731545;

return_direct_with_clo1(data,(closure)&c_737282,__lambda_314,  boolean_f);; 
}

static void __lambda_314(void *data, object self_734001, int argc, object *args) /* object self_734001, object recur_73362_731546 */
 {
 object recur_73362_731546 = args[0];
  
closureN_type c_737284;
object e_737332 [3];
c_737284.hdr.mark = gc_color_red;
 c_737284.hdr.grayed = 0;
c_737284.tag = closureN_tag;
 c_737284.fn = (function_type)__lambda_1155;
c_737284.num_args = 1;
c_737284.num_elements = 3;
c_737284.elements = (object *)e_737332;
c_737284.elements[0] = ((closureN)self_734001)->elements[0];
c_737284.elements[1] = ((closureN)self_734001)->elements[1];
c_737284.elements[2] = ((closureN)self_734001)->elements[2];


pair_type local_737335; 
return_direct_with_clo1(data,(closure)&c_737284,__lambda_1155,  set_cell_as_expr(&local_737335, recur_73362_731546));; 
}

static void __lambda_1155(void *data, object self_734002, int argc, object *args) /* object self_734002, object recur_73362_731546 */
 {
 object recur_73362_731546 = args[0];
  
closureN_type c_737286;
object e_737299 [3];
c_737286.hdr.mark = gc_color_red;
 c_737286.hdr.grayed = 0;
c_737286.tag = closureN_tag;
 c_737286.fn = (function_type)__lambda_315;
c_737286.num_args = 1;
c_737286.num_elements = 3;
c_737286.elements = (object *)e_737299;
c_737286.elements[0] = ((closureN)self_734002)->elements[1];
c_737286.elements[1] = ((closureN)self_734002)->elements[2];
c_737286.elements[2] = recur_73362_731546;


closureN_type c_737300;
object e_737331 [2];
c_737300.hdr.mark = gc_color_red;
 c_737300.hdr.grayed = 0;
c_737300.tag = closureN_tag;
 c_737300.fn = (function_type)__lambda_317;
c_737300.num_args = 1;
c_737300.num_elements = 2;
c_737300.elements = (object *)e_737331;
c_737300.elements[0] = ((closureN)self_734002)->elements[0];
c_737300.elements[1] = recur_73362_731546;

return_direct_with_clo1(data,(closure)&c_737286,__lambda_315,  &c_737300);; 
}

static void __lambda_317(void *data, object self_734003, int argc, object *args) /* object self_734003, object k_732684, object lists_73363_731547 */
 {
 object k_732684 = args[0]; object lists_73363_731547 = args[1];
    
if( (boolean_f != Cyc_is_pair(lists_73363_731547)) ){ 
  
closureN_type c_737304;
object e_737327 [4];
c_737304.hdr.mark = gc_color_red;
 c_737304.hdr.grayed = 0;
c_737304.tag = closureN_tag;
 c_737304.fn = (function_type)__lambda_318;
c_737304.num_args = 1;
c_737304.num_elements = 4;
c_737304.elements = (object *)e_737327;
c_737304.elements[0] = ((closureN)self_734003)->elements[0];
c_737304.elements[1] = k_732684;
c_737304.elements[2] = lists_73363_731547;
c_737304.elements[3] = ((closureN)self_734003)->elements[1];



return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_737304, Cyc_car(data, lists_73363_731547));
} else { 
  return_direct_with_clo1(data,  k_732684, (((closure)  k_732684)->fn),  NULL);}
;; 
}

static void __lambda_318(void *data, object self_734004, int argc, object *args) /* object self_734004, object r_732687 */
 {
 object r_732687 = args[0];
  if( (boolean_f != r_732687) ){ 
  return_closcall2(data,  ((closureN)self_734004)->elements[0],  ((closureN)self_734004)->elements[1], NULL);
} else { 
  


closureN_type c_737312;
object e_737323 [2];
c_737312.hdr.mark = gc_color_red;
 c_737312.hdr.grayed = 0;
c_737312.tag = closureN_tag;
 c_737312.fn = (function_type)__lambda_319;
c_737312.num_args = 1;
c_737312.num_elements = 2;
c_737312.elements = (object *)e_737323;
c_737312.elements[0] = ((closureN)self_734004)->elements[1];
c_737312.elements[1] = ((closureN)self_734004)->elements[2];



return_closcall2(data,  car(((closureN)self_734004)->elements[3]),  &c_737312, Cyc_cdr(data, ((closureN)self_734004)->elements[2]));}
;; 
}

static void __lambda_319(void *data, object self_734005, int argc, object *args) /* object self_734005, object r_732690 */
 {
 object r_732690 = args[0];
  
pair_type local_737317; 




return_direct_with_clo1(data,  ((closureN)self_734005)->elements[0], (((closure)  ((closureN)self_734005)->elements[0])->fn),  set_pair_as_expr(&local_737317, Cyc_cdr(data, Cyc_car(data, ((closureN)self_734005)->elements[1])), r_732690));; 
}

static void __lambda_315(void *data, object self_734006, int argc, object *args) /* object self_734006, object r_732683 */
 {
 object r_732683 = args[0];
  
closureN_type c_737288;
object e_737295 [3];
c_737288.hdr.mark = gc_color_red;
 c_737288.hdr.grayed = 0;
c_737288.tag = closureN_tag;
 c_737288.fn = (function_type)__lambda_316;
c_737288.num_args = 1;
c_737288.num_elements = 3;
c_737288.elements = (object *)e_737295;
c_737288.elements[0] = ((closureN)self_734006)->elements[0];
c_737288.elements[1] = ((closureN)self_734006)->elements[1];
c_737288.elements[2] = ((closureN)self_734006)->elements[2];



return_direct_with_clo1(data,(closure)&c_737288,__lambda_316,  Cyc_set_cell(data, ((closureN)self_734006)->elements[2], r_732683));; 
}

static void __lambda_316(void *data, object self_734007, int argc, object *args) /* object self_734007, object r_732682 */
 {

  

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

static void __lambda_311(void *data, object self_734008, int argc, object *args) /* object self_734008, object r_732680 */
 {
 object r_732680 = args[0];
  return_direct_with_clo2(data,  __glo_call_91with_91current_91continuation_scheme_base, (((closure)  __glo_call_91with_91current_91continuation_scheme_base)->fn),  ((closureN)self_734008)->elements[0], r_732680);; 
}

static void __lambda_309(void *data, object _, int argc, object *args) /* closure _,object k_732675, object lists_73357_731542 */
 {
object k_732675 = args[0]; object lists_73357_731542 = args[1];
  Cyc_st_add(data, "srfi/1.sld:concatenate!");
return_direct_with_clo4(data,  __glo_reduce_91right_srfi_1, (((closure)  __glo_reduce_91right_srfi_1)->fn),  k_732675, __glo_append_67_srfi_1, NULL, lists_73357_731542);; 
}

static void __lambda_308(void *data, object _, int argc, object *args) /* closure _,object k_732671, object lists_73356_731541 */
 {
object k_732671 = args[0]; object lists_73356_731541 = args[1];
  Cyc_st_add(data, "srfi/1.sld:concatenate");
return_direct_with_clo4(data,  __glo_reduce_91right_srfi_1, (((closure)  __glo_reduce_91right_srfi_1)->fn),  k_732671, __glo_append_scheme_base, NULL, lists_73356_731541);; 
}

static void __lambda_299(void *data, object _, int argc, object *args) /* closure _,object k_732662, object rev_91head_73347_731533, object tail_73348_731534 */
 {
object k_732662 = args[0]; object rev_91head_73347_731533 = args[1]; object tail_73348_731534 = args[2];
  Cyc_st_add(data, "srfi/1.sld:append-reverse!");

closureN_type c_737212;
object e_737267 [1];
c_737212.hdr.mark = gc_color_red;
 c_737212.hdr.grayed = 0;
c_737212.tag = closureN_tag;
 c_737212.fn = (function_type)__lambda_300;
c_737212.num_args = 2;
c_737212.num_elements = 1;
c_737212.elements = (object *)e_737267;
c_737212.elements[0] = k_732662;

return_direct_with_clo2(data,(closure)&c_737212,__lambda_300,  rev_91head_73347_731533, tail_73348_731534);; 
}

static void __lambda_300(void *data, object self_733990, int argc, object *args) /* object self_733990, object rev_91head_73350_731535, object tail_73351_731536 */
 {
 object rev_91head_73350_731535 = args[0]; object tail_73351_731536 = args[1];
  
closureN_type c_737214;
object e_737266 [3];
c_737214.hdr.mark = gc_color_red;
 c_737214.hdr.grayed = 0;
c_737214.tag = closureN_tag;
 c_737214.fn = (function_type)__lambda_301;
c_737214.num_args = 1;
c_737214.num_elements = 3;
c_737214.elements = (object *)e_737266;
c_737214.elements[0] = ((closureN)self_733990)->elements[0];
c_737214.elements[1] = rev_91head_73350_731535;
c_737214.elements[2] = tail_73351_731536;

return_direct_with_clo1(data,(closure)&c_737214,__lambda_301,  boolean_f);; 
}

static void __lambda_301(void *data, object self_733991, int argc, object *args) /* object self_733991, object lp_73352_731537 */
 {
 object lp_73352_731537 = args[0];
  
closureN_type c_737216;
object e_737262 [3];
c_737216.hdr.mark = gc_color_red;
 c_737216.hdr.grayed = 0;
c_737216.tag = closureN_tag;
 c_737216.fn = (function_type)__lambda_1154;
c_737216.num_args = 1;
c_737216.num_elements = 3;
c_737216.elements = (object *)e_737262;
c_737216.elements[0] = ((closureN)self_733991)->elements[0];
c_737216.elements[1] = ((closureN)self_733991)->elements[1];
c_737216.elements[2] = ((closureN)self_733991)->elements[2];


pair_type local_737265; 
return_direct_with_clo1(data,(closure)&c_737216,__lambda_1154,  set_cell_as_expr(&local_737265, lp_73352_731537));; 
}

static void __lambda_1154(void *data, object self_733992, int argc, object *args) /* object self_733992, object lp_73352_731537 */
 {
 object lp_73352_731537 = args[0];
  
closureN_type c_737218;
object e_737232 [4];
c_737218.hdr.mark = gc_color_red;
 c_737218.hdr.grayed = 0;
c_737218.tag = closureN_tag;
 c_737218.fn = (function_type)__lambda_302;
c_737218.num_args = 1;
c_737218.num_elements = 4;
c_737218.elements = (object *)e_737232;
c_737218.elements[0] = ((closureN)self_733992)->elements[0];
c_737218.elements[1] = lp_73352_731537;
c_737218.elements[2] = ((closureN)self_733992)->elements[1];
c_737218.elements[3] = ((closureN)self_733992)->elements[2];


closureN_type c_737233;
object e_737261 [1];
c_737233.hdr.mark = gc_color_red;
 c_737233.hdr.grayed = 0;
c_737233.tag = closureN_tag;
 c_737233.fn = (function_type)__lambda_304;
c_737233.num_args = 2;
c_737233.num_elements = 1;
c_737233.elements = (object *)e_737261;
c_737233.elements[0] = lp_73352_731537;

return_direct_with_clo1(data,(closure)&c_737218,__lambda_302,  &c_737233);; 
}

static void __lambda_304(void *data, object self_733993, int argc, object *args) /* object self_733993, object k_732665, object rev_91head_73353_731538, object tail_73354_731539 */
 {
 object k_732665 = args[0]; object rev_91head_73353_731538 = args[1]; object tail_73354_731539 = args[2];
  
closureN_type c_737235;
object e_737260 [4];
c_737235.hdr.mark = gc_color_red;
 c_737235.hdr.grayed = 0;
c_737235.tag = closureN_tag;
 c_737235.fn = (function_type)__lambda_305;
c_737235.num_args = 1;
c_737235.num_elements = 4;
c_737235.elements = (object *)e_737260;
c_737235.elements[0] = k_732665;
c_737235.elements[1] = ((closureN)self_733993)->elements[0];
c_737235.elements[2] = rev_91head_73353_731538;
c_737235.elements[3] = tail_73354_731539;

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_737235, rev_91head_73353_731538);; 
}

static void __lambda_305(void *data, object self_733994, int argc, object *args) /* object self_733994, object r_732666 */
 {
 object r_732666 = args[0];
  if( (boolean_f != r_732666) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733994)->elements[0], (((closure)  ((closureN)self_733994)->elements[0])->fn),  ((closureN)self_733994)->elements[3]);
} else { 
  
closureN_type c_737240;
object e_737256 [4];
c_737240.hdr.mark = gc_color_red;
 c_737240.hdr.grayed = 0;
c_737240.tag = closureN_tag;
 c_737240.fn = (function_type)__lambda_306;
c_737240.num_args = 1;
c_737240.num_elements = 4;
c_737240.elements = (object *)e_737256;
c_737240.elements[0] = ((closureN)self_733994)->elements[0];
c_737240.elements[1] = ((closureN)self_733994)->elements[1];
c_737240.elements[2] = ((closureN)self_733994)->elements[2];
c_737240.elements[3] = ((closureN)self_733994)->elements[3];



return_direct_with_clo1(data,(closure)&c_737240,__lambda_306,  Cyc_cdr(data, ((closureN)self_733994)->elements[2]));}
;; 
}

static void __lambda_306(void *data, object self_733995, int argc, object *args) /* object self_733995, object next_91rev_73355_731540 */
 {
 object next_91rev_73355_731540 = args[0];
  
closureN_type c_737242;
object e_737250 [4];
c_737242.hdr.mark = gc_color_red;
 c_737242.hdr.grayed = 0;
c_737242.tag = closureN_tag;
 c_737242.fn = (function_type)__lambda_307;
c_737242.num_args = 1;
c_737242.num_elements = 4;
c_737242.elements = (object *)e_737250;
c_737242.elements[0] = ((closureN)self_733995)->elements[0];
c_737242.elements[1] = ((closureN)self_733995)->elements[1];
c_737242.elements[2] = next_91rev_73355_731540;
c_737242.elements[3] = ((closureN)self_733995)->elements[2];


object c_737253 = Cyc_set_cdr_cps(data,(closure)&c_737242,((closureN)self_733995)->elements[2], ((closureN)self_733995)->elements[3]);
return_closcall1(data,(closure)&c_737242,  c_737253);; 
}

static void __lambda_307(void *data, object self_733996, int argc, object *args) /* object self_733996, object r_732668 */
 {

  

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

static void __lambda_302(void *data, object self_733997, int argc, object *args) /* object self_733997, object r_732664 */
 {
 object r_732664 = args[0];
  
closureN_type c_737220;
object e_737228 [4];
c_737220.hdr.mark = gc_color_red;
 c_737220.hdr.grayed = 0;
c_737220.tag = closureN_tag;
 c_737220.fn = (function_type)__lambda_303;
c_737220.num_args = 1;
c_737220.num_elements = 4;
c_737220.elements = (object *)e_737228;
c_737220.elements[0] = ((closureN)self_733997)->elements[0];
c_737220.elements[1] = ((closureN)self_733997)->elements[1];
c_737220.elements[2] = ((closureN)self_733997)->elements[2];
c_737220.elements[3] = ((closureN)self_733997)->elements[3];



return_direct_with_clo1(data,(closure)&c_737220,__lambda_303,  Cyc_set_cell(data, ((closureN)self_733997)->elements[1], r_732664));; 
}

static void __lambda_303(void *data, object self_733998, int argc, object *args) /* object self_733998, object r_732663 */
 {

  

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

static void __lambda_292(void *data, object _, int argc, object *args) /* closure _,object k_732652, object rev_91head_73339_731526, object tail_73340_731527 */
 {
object k_732652 = args[0]; object rev_91head_73339_731526 = args[1]; object tail_73340_731527 = args[2];
  Cyc_st_add(data, "srfi/1.sld:append-reverse");

closureN_type c_737160;
object e_737209 [1];
c_737160.hdr.mark = gc_color_red;
 c_737160.hdr.grayed = 0;
c_737160.tag = closureN_tag;
 c_737160.fn = (function_type)__lambda_293;
c_737160.num_args = 2;
c_737160.num_elements = 1;
c_737160.elements = (object *)e_737209;
c_737160.elements[0] = k_732652;

return_direct_with_clo2(data,(closure)&c_737160,__lambda_293,  rev_91head_73339_731526, tail_73340_731527);; 
}

static void __lambda_293(void *data, object self_733983, int argc, object *args) /* object self_733983, object rev_91head_73342_731528, object tail_73343_731529 */
 {
 object rev_91head_73342_731528 = args[0]; object tail_73343_731529 = args[1];
  
closureN_type c_737162;
object e_737208 [3];
c_737162.hdr.mark = gc_color_red;
 c_737162.hdr.grayed = 0;
c_737162.tag = closureN_tag;
 c_737162.fn = (function_type)__lambda_294;
c_737162.num_args = 1;
c_737162.num_elements = 3;
c_737162.elements = (object *)e_737208;
c_737162.elements[0] = ((closureN)self_733983)->elements[0];
c_737162.elements[1] = rev_91head_73342_731528;
c_737162.elements[2] = tail_73343_731529;

return_direct_with_clo1(data,(closure)&c_737162,__lambda_294,  boolean_f);; 
}

static void __lambda_294(void *data, object self_733984, int argc, object *args) /* object self_733984, object lp_73344_731530 */
 {
 object lp_73344_731530 = args[0];
  
closureN_type c_737164;
object e_737204 [3];
c_737164.hdr.mark = gc_color_red;
 c_737164.hdr.grayed = 0;
c_737164.tag = closureN_tag;
 c_737164.fn = (function_type)__lambda_1153;
c_737164.num_args = 1;
c_737164.num_elements = 3;
c_737164.elements = (object *)e_737204;
c_737164.elements[0] = ((closureN)self_733984)->elements[0];
c_737164.elements[1] = ((closureN)self_733984)->elements[1];
c_737164.elements[2] = ((closureN)self_733984)->elements[2];


pair_type local_737207; 
return_direct_with_clo1(data,(closure)&c_737164,__lambda_1153,  set_cell_as_expr(&local_737207, lp_73344_731530));; 
}

static void __lambda_1153(void *data, object self_733985, int argc, object *args) /* object self_733985, object lp_73344_731530 */
 {
 object lp_73344_731530 = args[0];
  
closureN_type c_737166;
object e_737180 [4];
c_737166.hdr.mark = gc_color_red;
 c_737166.hdr.grayed = 0;
c_737166.tag = closureN_tag;
 c_737166.fn = (function_type)__lambda_295;
c_737166.num_args = 1;
c_737166.num_elements = 4;
c_737166.elements = (object *)e_737180;
c_737166.elements[0] = ((closureN)self_733985)->elements[0];
c_737166.elements[1] = lp_73344_731530;
c_737166.elements[2] = ((closureN)self_733985)->elements[1];
c_737166.elements[3] = ((closureN)self_733985)->elements[2];


closureN_type c_737181;
object e_737203 [1];
c_737181.hdr.mark = gc_color_red;
 c_737181.hdr.grayed = 0;
c_737181.tag = closureN_tag;
 c_737181.fn = (function_type)__lambda_297;
c_737181.num_args = 2;
c_737181.num_elements = 1;
c_737181.elements = (object *)e_737203;
c_737181.elements[0] = lp_73344_731530;

return_direct_with_clo1(data,(closure)&c_737166,__lambda_295,  &c_737181);; 
}

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

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_737183, rev_91head_73345_731531);; 
}

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




pair_type local_737197; 


return_closcall3(data,  car(((closureN)self_733987)->elements[1]),  ((closureN)self_733987)->elements[0], Cyc_cdr(data, ((closureN)self_733987)->elements[2]), set_pair_as_expr(&local_737197, Cyc_car(data, ((closureN)self_733987)->elements[2]), ((closureN)self_733987)->elements[3]));}
;; 
}

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



return_direct_with_clo1(data,(closure)&c_737168,__lambda_296,  Cyc_set_cell(data, ((closureN)self_733988)->elements[1], r_732654));; 
}

static void __lambda_296(void *data, object self_733989, int argc, object *args) /* object self_733989, object r_732653 */
 {

  

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

static void __lambda_277(void *data, object _, int argc, object *args) /* closure _,object k_732630, object lists_73322_731511_raw, ... */
 {
object k_732630 = args[0];
load_varargs(lists_73322_731511, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/1.sld:append!");

closureN_type c_737038;
object e_737157 [1];
c_737038.hdr.mark = gc_color_red;
 c_737038.hdr.grayed = 0;
c_737038.tag = closureN_tag;
 c_737038.fn = (function_type)__lambda_278;
c_737038.num_args = 2;
c_737038.num_elements = 1;
c_737038.elements = (object *)e_737157;
c_737038.elements[0] = k_732630;

return_direct_with_clo2(data,(closure)&c_737038,__lambda_278,  lists_73322_731511, NULL);; 
}

static void __lambda_278(void *data, object self_733967, int argc, object *args) /* object self_733967, object lists_73324_731512, object prev_73325_731513 */
 {
 object lists_73324_731512 = args[0]; object prev_73325_731513 = args[1];
  
closureN_type c_737040;
object e_737156 [3];
c_737040.hdr.mark = gc_color_red;
 c_737040.hdr.grayed = 0;
c_737040.tag = closureN_tag;
 c_737040.fn = (function_type)__lambda_279;
c_737040.num_args = 1;
c_737040.num_elements = 3;
c_737040.elements = (object *)e_737156;
c_737040.elements[0] = ((closureN)self_733967)->elements[0];
c_737040.elements[1] = lists_73324_731512;
c_737040.elements[2] = prev_73325_731513;

return_direct_with_clo1(data,(closure)&c_737040,__lambda_279,  boolean_f);; 
}

static void __lambda_279(void *data, object self_733968, int argc, object *args) /* object self_733968, object lp_73326_731514 */
 {
 object lp_73326_731514 = args[0];
  
closureN_type c_737042;
object e_737152 [3];
c_737042.hdr.mark = gc_color_red;
 c_737042.hdr.grayed = 0;
c_737042.tag = closureN_tag;
 c_737042.fn = (function_type)__lambda_1152;
c_737042.num_args = 1;
c_737042.num_elements = 3;
c_737042.elements = (object *)e_737152;
c_737042.elements[0] = ((closureN)self_733968)->elements[0];
c_737042.elements[1] = ((closureN)self_733968)->elements[1];
c_737042.elements[2] = ((closureN)self_733968)->elements[2];


pair_type local_737155; 
return_direct_with_clo1(data,(closure)&c_737042,__lambda_1152,  set_cell_as_expr(&local_737155, lp_73326_731514));; 
}

static void __lambda_1152(void *data, object self_733969, int argc, object *args) /* object self_733969, object lp_73326_731514 */
 {
 object lp_73326_731514 = args[0];
  
closureN_type c_737044;
object e_737058 [4];
c_737044.hdr.mark = gc_color_red;
 c_737044.hdr.grayed = 0;
c_737044.tag = closureN_tag;
 c_737044.fn = (function_type)__lambda_280;
c_737044.num_args = 1;
c_737044.num_elements = 4;
c_737044.elements = (object *)e_737058;
c_737044.elements[0] = ((closureN)self_733969)->elements[0];
c_737044.elements[1] = ((closureN)self_733969)->elements[1];
c_737044.elements[2] = lp_73326_731514;
c_737044.elements[3] = ((closureN)self_733969)->elements[2];


closureN_type c_737059;
object e_737151 [1];
c_737059.hdr.mark = gc_color_red;
 c_737059.hdr.grayed = 0;
c_737059.tag = closureN_tag;
 c_737059.fn = (function_type)__lambda_282;
c_737059.num_args = 2;
c_737059.num_elements = 1;
c_737059.elements = (object *)e_737151;
c_737059.elements[0] = lp_73326_731514;

return_direct_with_clo1(data,(closure)&c_737044,__lambda_280,  &c_737059);; 
}

static void __lambda_282(void *data, object self_733970, int argc, object *args) /* object self_733970, object k_732634, object lists_73327_731515, object prev_73328_731516 */
 {
 object k_732634 = args[0]; object lists_73327_731515 = args[1]; object prev_73328_731516 = args[2];
    
if( (boolean_f != Cyc_is_pair(lists_73327_731515)) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, lists_73327_731515))) ){ 
  
closureN_type c_737067;
object e_737139 [2];
c_737067.hdr.mark = gc_color_red;
 c_737067.hdr.grayed = 0;
c_737067.tag = closureN_tag;
 c_737067.fn = (function_type)__lambda_283;
c_737067.num_args = 1;
c_737067.num_elements = 2;
c_737067.elements = (object *)e_737139;
c_737067.elements[0] = k_732634;
c_737067.elements[1] = lists_73327_731515;



return_direct_with_clo2(data,  __glo_last_91pair_srfi_1, (((closure)  __glo_last_91pair_srfi_1)->fn),  &c_737067, Cyc_car(data, lists_73327_731515));
} else { 
  





return_closcall3(data,  car(((closureN)self_733970)->elements[0]),  k_732634, Cyc_cdr(data, lists_73327_731515), Cyc_car(data, lists_73327_731515));}
;
} else { 
  return_direct_with_clo1(data,  k_732634, (((closure)  k_732634)->fn),  prev_73328_731516);}
;; 
}

static void __lambda_283(void *data, object self_733971, int argc, object *args) /* object self_733971, object r_732639 */
 {
 object r_732639 = args[0];
  
closureN_type c_737069;
object e_737135 [2];
c_737069.hdr.mark = gc_color_red;
 c_737069.hdr.grayed = 0;
c_737069.tag = closureN_tag;
 c_737069.fn = (function_type)__lambda_284;
c_737069.num_args = 2;
c_737069.num_elements = 2;
c_737069.elements = (object *)e_737135;
c_737069.elements[0] = ((closureN)self_733971)->elements[0];
c_737069.elements[1] = ((closureN)self_733971)->elements[1];



return_direct_with_clo2(data,(closure)&c_737069,__lambda_284,  r_732639, Cyc_cdr(data, ((closureN)self_733971)->elements[1]));; 
}

static void __lambda_284(void *data, object self_733972, int argc, object *args) /* object self_733972, object tail_91cons_73332_731519, object rest_73333_731520 */
 {
 object tail_91cons_73332_731519 = args[0]; object rest_73333_731520 = args[1];
  
closureN_type c_737071;
object e_737134 [4];
c_737071.hdr.mark = gc_color_red;
 c_737071.hdr.grayed = 0;
c_737071.tag = closureN_tag;
 c_737071.fn = (function_type)__lambda_285;
c_737071.num_args = 1;
c_737071.num_elements = 4;
c_737071.elements = (object *)e_737134;
c_737071.elements[0] = ((closureN)self_733972)->elements[0];
c_737071.elements[1] = ((closureN)self_733972)->elements[1];
c_737071.elements[2] = rest_73333_731520;
c_737071.elements[3] = tail_91cons_73332_731519;

return_direct_with_clo1(data,(closure)&c_737071,__lambda_285,  boolean_f);; 
}

static void __lambda_285(void *data, object self_733973, int argc, object *args) /* object self_733973, object lp2_73334_731521 */
 {
 object lp2_73334_731521 = args[0];
  
closureN_type c_737073;
object e_737130 [4];
c_737073.hdr.mark = gc_color_red;
 c_737073.hdr.grayed = 0;
c_737073.tag = closureN_tag;
 c_737073.fn = (function_type)__lambda_1151;
c_737073.num_args = 1;
c_737073.num_elements = 4;
c_737073.elements = (object *)e_737130;
c_737073.elements[0] = ((closureN)self_733973)->elements[0];
c_737073.elements[1] = ((closureN)self_733973)->elements[1];
c_737073.elements[2] = ((closureN)self_733973)->elements[2];
c_737073.elements[3] = ((closureN)self_733973)->elements[3];


pair_type local_737133; 
return_direct_with_clo1(data,(closure)&c_737073,__lambda_1151,  set_cell_as_expr(&local_737133, lp2_73334_731521));; 
}

static void __lambda_1151(void *data, object self_733974, int argc, object *args) /* object self_733974, object lp2_73334_731521 */
 {
 object lp2_73334_731521 = args[0];
  
closureN_type c_737075;
object e_737089 [4];
c_737075.hdr.mark = gc_color_red;
 c_737075.hdr.grayed = 0;
c_737075.tag = closureN_tag;
 c_737075.fn = (function_type)__lambda_286;
c_737075.num_args = 1;
c_737075.num_elements = 4;
c_737075.elements = (object *)e_737089;
c_737075.elements[0] = ((closureN)self_733974)->elements[0];
c_737075.elements[1] = lp2_73334_731521;
c_737075.elements[2] = ((closureN)self_733974)->elements[2];
c_737075.elements[3] = ((closureN)self_733974)->elements[3];


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

return_direct_with_clo1(data,(closure)&c_737075,__lambda_286,  &c_737090);; 
}

static void __lambda_288(void *data, object self_733975, int argc, object *args) /* object self_733975, object k_732642, object tail_91cons_73335_731522, object rest_73336_731523 */
 {
 object k_732642 = args[0]; object tail_91cons_73335_731522 = args[1]; object rest_73336_731523 = args[2];
    
if( (boolean_f != Cyc_is_pair(rest_73336_731523)) ){ 
  
closureN_type c_737094;
object e_737119 [4];
c_737094.hdr.mark = gc_color_red;
 c_737094.hdr.grayed = 0;
c_737094.tag = closureN_tag;
 c_737094.fn = (function_type)__lambda_289;
c_737094.num_args = 1;
c_737094.num_elements = 4;
c_737094.elements = (object *)e_737119;
c_737094.elements[0] = k_732642;
c_737094.elements[1] = ((closureN)self_733975)->elements[1];
c_737094.elements[2] = rest_73336_731523;
c_737094.elements[3] = tail_91cons_73335_731522;




object c_737122 = Cyc_set_cdr_cps(data,(closure)&c_737094,tail_91cons_73335_731522, Cyc_car(data, rest_73336_731523));
return_closcall1(data,(closure)&c_737094,  c_737122);
} else { 
  

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

static void __lambda_289(void *data, object self_733976, int argc, object *args) /* object self_733976, object r_732646 */
 {

  
closureN_type c_737096;
object e_737108 [2];
c_737096.hdr.mark = gc_color_red;
 c_737096.hdr.grayed = 0;
c_737096.tag = closureN_tag;
 c_737096.fn = (function_type)__lambda_290;
c_737096.num_args = 0;
c_737096.num_elements = 2;
c_737096.elements = (object *)e_737108;
c_737096.elements[0] = ((closureN)self_733976)->elements[2];
c_737096.elements[1] = ((closureN)self_733976)->elements[3];


closureN_type c_737109;
object e_737118 [3];
c_737109.hdr.mark = gc_color_red;
 c_737109.hdr.grayed = 0;
c_737109.tag = closureN_tag;
 c_737109.fn = (function_type)__lambda_291;
c_737109.num_args = 1;
c_737109.num_elements = 3;
c_737109.elements = (object *)e_737118;
c_737109.elements[0] = ((closureN)self_733976)->elements[0];
c_737109.elements[1] = ((closureN)self_733976)->elements[1];
c_737109.elements[2] = ((closureN)self_733976)->elements[2];

return_direct_with_clo1(data,(closure)&c_737096,__lambda_290,  &c_737109);; 
}

static void __lambda_291(void *data, object self_733977, int argc, object *args) /* object self_733977, object r_732647 */
 {
 object r_732647 = args[0];
  



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

static void __lambda_290(void *data, object self_733978, int argc, object *args) /* object self_733978, object k_732648 */
 {
 object k_732648 = args[0];
    
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_733978)->elements[0]))) ){ 
  

return_direct_with_clo2(data,  __glo_last_91pair_srfi_1, (((closure)  __glo_last_91pair_srfi_1)->fn),  k_732648, Cyc_car(data, ((closureN)self_733978)->elements[0]));
} else { 
  return_direct_with_clo1(data,  k_732648, (((closure)  k_732648)->fn),  ((closureN)self_733978)->elements[1]);}
;; 
}

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



return_direct_with_clo1(data,(closure)&c_737077,__lambda_287,  Cyc_set_cell(data, ((closureN)self_733979)->elements[1], r_732641));; 
}

static void __lambda_287(void *data, object self_733980, int argc, object *args) /* object self_733980, object r_732640 */
 {

  

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

static void __lambda_280(void *data, object self_733981, int argc, object *args) /* object self_733981, object r_732633 */
 {
 object r_732633 = args[0];
  
closureN_type c_737046;
object e_737054 [4];
c_737046.hdr.mark = gc_color_red;
 c_737046.hdr.grayed = 0;
c_737046.tag = closureN_tag;
 c_737046.fn = (function_type)__lambda_281;
c_737046.num_args = 1;
c_737046.num_elements = 4;
c_737046.elements = (object *)e_737054;
c_737046.elements[0] = ((closureN)self_733981)->elements[0];
c_737046.elements[1] = ((closureN)self_733981)->elements[1];
c_737046.elements[2] = ((closureN)self_733981)->elements[2];
c_737046.elements[3] = ((closureN)self_733981)->elements[3];



return_direct_with_clo1(data,(closure)&c_737046,__lambda_281,  Cyc_set_cell(data, ((closureN)self_733981)->elements[2], r_732633));; 
}

static void __lambda_281(void *data, object self_733982, int argc, object *args) /* object self_733982, object r_732632 */
 {

  

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

static void __lambda_266(void *data, object _, int argc, object *args) /* closure _,object k_732606, object lis_73311_731501 */
 {
object k_732606 = args[0]; object lis_73311_731501 = args[1];
  Cyc_st_add(data, "srfi/1.sld:unzip5");

closureN_type c_736935;
object e_737035 [1];
c_736935.hdr.mark = gc_color_red;
 c_736935.hdr.grayed = 0;
c_736935.tag = closureN_tag;
 c_736935.fn = (function_type)__lambda_267;
c_736935.num_args = 1;
c_736935.num_elements = 1;
c_736935.elements = (object *)e_737035;
c_736935.elements[0] = k_732606;

return_direct_with_clo1(data,(closure)&c_736935,__lambda_267,  lis_73311_731501);; 
}

static void __lambda_267(void *data, object self_733956, int argc, object *args) /* object self_733956, object lis_73313_731502 */
 {
 object lis_73313_731502 = args[0];
  
closureN_type c_736937;
object e_737034 [2];
c_736937.hdr.mark = gc_color_red;
 c_736937.hdr.grayed = 0;
c_736937.tag = closureN_tag;
 c_736937.fn = (function_type)__lambda_268;
c_736937.num_args = 1;
c_736937.num_elements = 2;
c_736937.elements = (object *)e_737034;
c_736937.elements[0] = ((closureN)self_733956)->elements[0];
c_736937.elements[1] = lis_73313_731502;

return_direct_with_clo1(data,(closure)&c_736937,__lambda_268,  boolean_f);; 
}

static void __lambda_268(void *data, object self_733957, int argc, object *args) /* object self_733957, object recur_73314_731503 */
 {
 object recur_73314_731503 = args[0];
  
closureN_type c_736939;
object e_737030 [2];
c_736939.hdr.mark = gc_color_red;
 c_736939.hdr.grayed = 0;
c_736939.tag = closureN_tag;
 c_736939.fn = (function_type)__lambda_1150;
c_736939.num_args = 1;
c_736939.num_elements = 2;
c_736939.elements = (object *)e_737030;
c_736939.elements[0] = ((closureN)self_733957)->elements[0];
c_736939.elements[1] = ((closureN)self_733957)->elements[1];


pair_type local_737033; 
return_direct_with_clo1(data,(closure)&c_736939,__lambda_1150,  set_cell_as_expr(&local_737033, recur_73314_731503));; 
}

static void __lambda_1150(void *data, object self_733958, int argc, object *args) /* object self_733958, object recur_73314_731503 */
 {
 object recur_73314_731503 = args[0];
  
closureN_type c_736941;
object e_736954 [3];
c_736941.hdr.mark = gc_color_red;
 c_736941.hdr.grayed = 0;
c_736941.tag = closureN_tag;
 c_736941.fn = (function_type)__lambda_269;
c_736941.num_args = 1;
c_736941.num_elements = 3;
c_736941.elements = (object *)e_736954;
c_736941.elements[0] = ((closureN)self_733958)->elements[0];
c_736941.elements[1] = ((closureN)self_733958)->elements[1];
c_736941.elements[2] = recur_73314_731503;


closureN_type c_736955;
object e_737029 [1];
c_736955.hdr.mark = gc_color_red;
 c_736955.hdr.grayed = 0;
c_736955.tag = closureN_tag;
 c_736955.fn = (function_type)__lambda_271;
c_736955.num_args = 1;
c_736955.num_elements = 1;
c_736955.elements = (object *)e_737029;
c_736955.elements[0] = recur_73314_731503;

return_direct_with_clo1(data,(closure)&c_736941,__lambda_269,  &c_736955);; 
}

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

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_736957, lis_73315_731504);; 
}

static void __lambda_272(void *data, object self_733960, int argc, object *args) /* object self_733960, object r_732610 */
 {
 object r_732610 = args[0];
  if( (boolean_f != r_732610) ){ 
  return_direct_with_clo6(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_733960)->elements[0], ((closureN)self_733960)->elements[1], ((closureN)self_733960)->elements[1], ((closureN)self_733960)->elements[1], ((closureN)self_733960)->elements[1], ((closureN)self_733960)->elements[1]);
} else { 
  
closureN_type c_736966;
object e_737018 [2];
c_736966.hdr.mark = gc_color_red;
 c_736966.hdr.grayed = 0;
c_736966.tag = closureN_tag;
 c_736966.fn = (function_type)__lambda_273;
c_736966.num_args = 1;
c_736966.num_elements = 2;
c_736966.elements = (object *)e_737018;
c_736966.elements[0] = ((closureN)self_733960)->elements[0];
c_736966.elements[1] = ((closureN)self_733960)->elements[1];


closureN_type c_737019;
object e_737027 [2];
c_737019.hdr.mark = gc_color_red;
 c_737019.hdr.grayed = 0;
c_737019.tag = closureN_tag;
 c_737019.fn = (function_type)__lambda_276;
c_737019.num_args = 0;
c_737019.num_elements = 2;
c_737019.elements = (object *)e_737027;
c_737019.elements[0] = ((closureN)self_733960)->elements[1];
c_737019.elements[1] = ((closureN)self_733960)->elements[2];

return_direct_with_clo1(data,(closure)&c_736966,__lambda_273,  &c_737019);}
;; 
}

static void __lambda_276(void *data, object self_733961, int argc, object *args) /* object self_733961, object k_732626 */
 {
 object k_732626 = args[0];
  



return_closcall2(data,  car(((closureN)self_733961)->elements[1]),  k_732626, Cyc_cdr(data, ((closureN)self_733961)->elements[0]));; 
}

static void __lambda_273(void *data, object self_733962, int argc, object *args) /* object self_733962, object r_732612 */
 {
 object r_732612 = args[0];
  
closureN_type c_736968;
object e_736972 [2];
c_736968.hdr.mark = gc_color_red;
 c_736968.hdr.grayed = 0;
c_736968.tag = closureN_tag;
 c_736968.fn = (function_type)__lambda_274;
c_736968.num_args = 1;
c_736968.num_elements = 2;
c_736968.elements = (object *)e_736972;
c_736968.elements[0] = ((closureN)self_733962)->elements[0];
c_736968.elements[1] = r_732612;


closureN_type c_736973;
object e_737017 [1];
c_736973.hdr.mark = gc_color_red;
 c_736973.hdr.grayed = 0;
c_736973.tag = closureN_tag;
 c_736973.fn = (function_type)__lambda_275;
c_736973.num_args = 5;
c_736973.num_elements = 1;
c_736973.elements = (object *)e_737017;
c_736973.elements[0] = ((closureN)self_733962)->elements[1];

return_direct_with_clo1(data,(closure)&c_736968,__lambda_274,  &c_736973);; 
}

static void __lambda_275(void *data, object self_733963, int argc, object *args) /* object self_733963, object k_732614, object a_73317_731506, object b_73318_731507, object c_73319_731508, object d_73320_731509, object e_73321_731510 */
 {
 object k_732614 = args[0]; object a_73317_731506 = args[1]; object b_73318_731507 = args[2]; object c_73319_731508 = args[3]; object d_73320_731509 = args[4]; object e_73321_731510 = args[5];
  
pair_type local_736977; 





pair_type local_736985; 





pair_type local_736993; 





pair_type local_737001; 





pair_type local_737009; 






return_direct_with_clo6(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_732614, set_pair_as_expr(&local_736977, Cyc_car(data, Cyc_car(data, ((closureN)self_733963)->elements[0])), a_73317_731506), set_pair_as_expr(&local_736985, Cyc_cadr(data, Cyc_car(data, ((closureN)self_733963)->elements[0])), b_73318_731507), set_pair_as_expr(&local_736993, Cyc_caddr(data, Cyc_car(data, ((closureN)self_733963)->elements[0])), c_73319_731508), set_pair_as_expr(&local_737001, Cyc_cadddr(data, Cyc_car(data, ((closureN)self_733963)->elements[0])), d_73320_731509), set_pair_as_expr(&local_737009, Cyc_car(data, Cyc_cddddr(data, Cyc_car(data, ((closureN)self_733963)->elements[0]))), e_73321_731510));; 
}

static void __lambda_274(void *data, object self_733964, int argc, object *args) /* object self_733964, object r_732613 */
 {
 object r_732613 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_733964)->elements[0], ((closureN)self_733964)->elements[1], r_732613);; 
}

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



return_direct_with_clo1(data,(closure)&c_736943,__lambda_270,  Cyc_set_cell(data, ((closureN)self_733965)->elements[2], r_732608));; 
}

static void __lambda_270(void *data, object self_733966, int argc, object *args) /* object self_733966, object r_732607 */
 {

  

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

static void __lambda_255(void *data, object _, int argc, object *args) /* closure _,object k_732585, object lis_73301_731492 */
 {
object k_732585 = args[0]; object lis_73301_731492 = args[1];
  Cyc_st_add(data, "srfi/1.sld:unzip4");

closureN_type c_736843;
object e_736932 [1];
c_736843.hdr.mark = gc_color_red;
 c_736843.hdr.grayed = 0;
c_736843.tag = closureN_tag;
 c_736843.fn = (function_type)__lambda_256;
c_736843.num_args = 1;
c_736843.num_elements = 1;
c_736843.elements = (object *)e_736932;
c_736843.elements[0] = k_732585;

return_direct_with_clo1(data,(closure)&c_736843,__lambda_256,  lis_73301_731492);; 
}

static void __lambda_256(void *data, object self_733945, int argc, object *args) /* object self_733945, object lis_73303_731493 */
 {
 object lis_73303_731493 = args[0];
  
closureN_type c_736845;
object e_736931 [2];
c_736845.hdr.mark = gc_color_red;
 c_736845.hdr.grayed = 0;
c_736845.tag = closureN_tag;
 c_736845.fn = (function_type)__lambda_257;
c_736845.num_args = 1;
c_736845.num_elements = 2;
c_736845.elements = (object *)e_736931;
c_736845.elements[0] = ((closureN)self_733945)->elements[0];
c_736845.elements[1] = lis_73303_731493;

return_direct_with_clo1(data,(closure)&c_736845,__lambda_257,  boolean_f);; 
}

static void __lambda_257(void *data, object self_733946, int argc, object *args) /* object self_733946, object recur_73304_731494 */
 {
 object recur_73304_731494 = args[0];
  
closureN_type c_736847;
object e_736927 [2];
c_736847.hdr.mark = gc_color_red;
 c_736847.hdr.grayed = 0;
c_736847.tag = closureN_tag;
 c_736847.fn = (function_type)__lambda_1149;
c_736847.num_args = 1;
c_736847.num_elements = 2;
c_736847.elements = (object *)e_736927;
c_736847.elements[0] = ((closureN)self_733946)->elements[0];
c_736847.elements[1] = ((closureN)self_733946)->elements[1];


pair_type local_736930; 
return_direct_with_clo1(data,(closure)&c_736847,__lambda_1149,  set_cell_as_expr(&local_736930, recur_73304_731494));; 
}

static void __lambda_1149(void *data, object self_733947, int argc, object *args) /* object self_733947, object recur_73304_731494 */
 {
 object recur_73304_731494 = args[0];
  
closureN_type c_736849;
object e_736862 [3];
c_736849.hdr.mark = gc_color_red;
 c_736849.hdr.grayed = 0;
c_736849.tag = closureN_tag;
 c_736849.fn = (function_type)__lambda_258;
c_736849.num_args = 1;
c_736849.num_elements = 3;
c_736849.elements = (object *)e_736862;
c_736849.elements[0] = ((closureN)self_733947)->elements[0];
c_736849.elements[1] = ((closureN)self_733947)->elements[1];
c_736849.elements[2] = recur_73304_731494;


closureN_type c_736863;
object e_736926 [1];
c_736863.hdr.mark = gc_color_red;
 c_736863.hdr.grayed = 0;
c_736863.tag = closureN_tag;
 c_736863.fn = (function_type)__lambda_260;
c_736863.num_args = 1;
c_736863.num_elements = 1;
c_736863.elements = (object *)e_736926;
c_736863.elements[0] = recur_73304_731494;

return_direct_with_clo1(data,(closure)&c_736849,__lambda_258,  &c_736863);; 
}

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

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_736865, lis_73305_731495);; 
}

static void __lambda_261(void *data, object self_733949, int argc, object *args) /* object self_733949, object r_732589 */
 {
 object r_732589 = args[0];
  if( (boolean_f != r_732589) ){ 
  return_direct_with_clo5(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_733949)->elements[0], ((closureN)self_733949)->elements[1], ((closureN)self_733949)->elements[1], ((closureN)self_733949)->elements[1], ((closureN)self_733949)->elements[1]);
} else { 
  
closureN_type c_736873;
object e_736915 [2];
c_736873.hdr.mark = gc_color_red;
 c_736873.hdr.grayed = 0;
c_736873.tag = closureN_tag;
 c_736873.fn = (function_type)__lambda_262;
c_736873.num_args = 1;
c_736873.num_elements = 2;
c_736873.elements = (object *)e_736915;
c_736873.elements[0] = ((closureN)self_733949)->elements[0];
c_736873.elements[1] = ((closureN)self_733949)->elements[1];


closureN_type c_736916;
object e_736924 [2];
c_736916.hdr.mark = gc_color_red;
 c_736916.hdr.grayed = 0;
c_736916.tag = closureN_tag;
 c_736916.fn = (function_type)__lambda_265;
c_736916.num_args = 0;
c_736916.num_elements = 2;
c_736916.elements = (object *)e_736924;
c_736916.elements[0] = ((closureN)self_733949)->elements[1];
c_736916.elements[1] = ((closureN)self_733949)->elements[2];

return_direct_with_clo1(data,(closure)&c_736873,__lambda_262,  &c_736916);}
;; 
}

static void __lambda_265(void *data, object self_733950, int argc, object *args) /* object self_733950, object k_732602 */
 {
 object k_732602 = args[0];
  



return_closcall2(data,  car(((closureN)self_733950)->elements[1]),  k_732602, Cyc_cdr(data, ((closureN)self_733950)->elements[0]));; 
}

static void __lambda_262(void *data, object self_733951, int argc, object *args) /* object self_733951, object r_732591 */
 {
 object r_732591 = args[0];
  
closureN_type c_736875;
object e_736879 [2];
c_736875.hdr.mark = gc_color_red;
 c_736875.hdr.grayed = 0;
c_736875.tag = closureN_tag;
 c_736875.fn = (function_type)__lambda_263;
c_736875.num_args = 1;
c_736875.num_elements = 2;
c_736875.elements = (object *)e_736879;
c_736875.elements[0] = ((closureN)self_733951)->elements[0];
c_736875.elements[1] = r_732591;


closureN_type c_736880;
object e_736914 [1];
c_736880.hdr.mark = gc_color_red;
 c_736880.hdr.grayed = 0;
c_736880.tag = closureN_tag;
 c_736880.fn = (function_type)__lambda_264;
c_736880.num_args = 4;
c_736880.num_elements = 1;
c_736880.elements = (object *)e_736914;
c_736880.elements[0] = ((closureN)self_733951)->elements[1];

return_direct_with_clo1(data,(closure)&c_736875,__lambda_263,  &c_736880);; 
}

static void __lambda_264(void *data, object self_733952, int argc, object *args) /* object self_733952, object k_732593, object a_73307_731497, object b_73308_731498, object c_73309_731499, object d_73310_731500 */
 {
 object k_732593 = args[0]; object a_73307_731497 = args[1]; object b_73308_731498 = args[2]; object c_73309_731499 = args[3]; object d_73310_731500 = args[4];
  
pair_type local_736884; 





pair_type local_736892; 





pair_type local_736900; 





pair_type local_736908; 




return_direct_with_clo5(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_732593, set_pair_as_expr(&local_736884, Cyc_car(data, Cyc_car(data, ((closureN)self_733952)->elements[0])), a_73307_731497), set_pair_as_expr(&local_736892, Cyc_cadr(data, Cyc_car(data, ((closureN)self_733952)->elements[0])), b_73308_731498), set_pair_as_expr(&local_736900, Cyc_caddr(data, Cyc_car(data, ((closureN)self_733952)->elements[0])), c_73309_731499), set_pair_as_expr(&local_736908, Cyc_cadddr(data, Cyc_car(data, ((closureN)self_733952)->elements[0])), d_73310_731500));; 
}

static void __lambda_263(void *data, object self_733953, int argc, object *args) /* object self_733953, object r_732592 */
 {
 object r_732592 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_733953)->elements[0], ((closureN)self_733953)->elements[1], r_732592);; 
}

static void __lambda_258(void *data, object self_733954, int argc, object *args) /* object self_733954, object r_732587 */
 {
 object r_732587 = args[0];
  
closureN_type c_736851;
object e_736858 [3];
c_736851.hdr.mark = gc_color_red;
 c_736851.hdr.grayed = 0;
c_736851.tag = closureN_tag;
 c_736851.fn = (function_type)__lambda_259;
c_736851.num_args = 1;
c_736851.num_elements = 3;
c_736851.elements = (object *)e_736858;
c_736851.elements[0] = ((closureN)self_733954)->elements[0];
c_736851.elements[1] = ((closureN)self_733954)->elements[1];
c_736851.elements[2] = ((closureN)self_733954)->elements[2];



return_direct_with_clo1(data,(closure)&c_736851,__lambda_259,  Cyc_set_cell(data, ((closureN)self_733954)->elements[2], r_732587));; 
}

static void __lambda_259(void *data, object self_733955, int argc, object *args) /* object self_733955, object r_732586 */
 {

  

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

static void __lambda_244(void *data, object _, int argc, object *args) /* closure _,object k_732566, object lis_73292_731484 */
 {
object k_732566 = args[0]; object lis_73292_731484 = args[1];
  Cyc_st_add(data, "srfi/1.sld:unzip3");

closureN_type c_736760;
object e_736840 [1];
c_736760.hdr.mark = gc_color_red;
 c_736760.hdr.grayed = 0;
c_736760.tag = closureN_tag;
 c_736760.fn = (function_type)__lambda_245;
c_736760.num_args = 1;
c_736760.num_elements = 1;
c_736760.elements = (object *)e_736840;
c_736760.elements[0] = k_732566;

return_direct_with_clo1(data,(closure)&c_736760,__lambda_245,  lis_73292_731484);; 
}

static void __lambda_245(void *data, object self_733934, int argc, object *args) /* object self_733934, object lis_73294_731485 */
 {
 object lis_73294_731485 = args[0];
  
closureN_type c_736762;
object e_736839 [2];
c_736762.hdr.mark = gc_color_red;
 c_736762.hdr.grayed = 0;
c_736762.tag = closureN_tag;
 c_736762.fn = (function_type)__lambda_246;
c_736762.num_args = 1;
c_736762.num_elements = 2;
c_736762.elements = (object *)e_736839;
c_736762.elements[0] = ((closureN)self_733934)->elements[0];
c_736762.elements[1] = lis_73294_731485;

return_direct_with_clo1(data,(closure)&c_736762,__lambda_246,  boolean_f);; 
}

static void __lambda_246(void *data, object self_733935, int argc, object *args) /* object self_733935, object recur_73295_731486 */
 {
 object recur_73295_731486 = args[0];
  
closureN_type c_736764;
object e_736835 [2];
c_736764.hdr.mark = gc_color_red;
 c_736764.hdr.grayed = 0;
c_736764.tag = closureN_tag;
 c_736764.fn = (function_type)__lambda_1148;
c_736764.num_args = 1;
c_736764.num_elements = 2;
c_736764.elements = (object *)e_736835;
c_736764.elements[0] = ((closureN)self_733935)->elements[0];
c_736764.elements[1] = ((closureN)self_733935)->elements[1];


pair_type local_736838; 
return_direct_with_clo1(data,(closure)&c_736764,__lambda_1148,  set_cell_as_expr(&local_736838, recur_73295_731486));; 
}

static void __lambda_1148(void *data, object self_733936, int argc, object *args) /* object self_733936, object recur_73295_731486 */
 {
 object recur_73295_731486 = args[0];
  
closureN_type c_736766;
object e_736779 [3];
c_736766.hdr.mark = gc_color_red;
 c_736766.hdr.grayed = 0;
c_736766.tag = closureN_tag;
 c_736766.fn = (function_type)__lambda_247;
c_736766.num_args = 1;
c_736766.num_elements = 3;
c_736766.elements = (object *)e_736779;
c_736766.elements[0] = ((closureN)self_733936)->elements[0];
c_736766.elements[1] = ((closureN)self_733936)->elements[1];
c_736766.elements[2] = recur_73295_731486;


closureN_type c_736780;
object e_736834 [1];
c_736780.hdr.mark = gc_color_red;
 c_736780.hdr.grayed = 0;
c_736780.tag = closureN_tag;
 c_736780.fn = (function_type)__lambda_249;
c_736780.num_args = 1;
c_736780.num_elements = 1;
c_736780.elements = (object *)e_736834;
c_736780.elements[0] = recur_73295_731486;

return_direct_with_clo1(data,(closure)&c_736766,__lambda_247,  &c_736780);; 
}

static void __lambda_249(void *data, object self_733937, int argc, object *args) /* object self_733937, object k_732569, object lis_73296_731487 */
 {
 object k_732569 = args[0]; object lis_73296_731487 = args[1];
  
closureN_type c_736782;
object e_736833 [3];
c_736782.hdr.mark = gc_color_red;
 c_736782.hdr.grayed = 0;
c_736782.tag = closureN_tag;
 c_736782.fn = (function_type)__lambda_250;
c_736782.num_args = 1;
c_736782.num_elements = 3;
c_736782.elements = (object *)e_736833;
c_736782.elements[0] = k_732569;
c_736782.elements[1] = lis_73296_731487;
c_736782.elements[2] = ((closureN)self_733937)->elements[0];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_736782, lis_73296_731487);; 
}

static void __lambda_250(void *data, object self_733938, int argc, object *args) /* object self_733938, object r_732570 */
 {
 object r_732570 = args[0];
  if( (boolean_f != r_732570) ){ 
  return_direct_with_clo4(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_733938)->elements[0], ((closureN)self_733938)->elements[1], ((closureN)self_733938)->elements[1], ((closureN)self_733938)->elements[1]);
} else { 
  
closureN_type c_736789;
object e_736823 [2];
c_736789.hdr.mark = gc_color_red;
 c_736789.hdr.grayed = 0;
c_736789.tag = closureN_tag;
 c_736789.fn = (function_type)__lambda_251;
c_736789.num_args = 1;
c_736789.num_elements = 2;
c_736789.elements = (object *)e_736823;
c_736789.elements[0] = ((closureN)self_733938)->elements[0];
c_736789.elements[1] = ((closureN)self_733938)->elements[1];


closureN_type c_736824;
object e_736832 [2];
c_736824.hdr.mark = gc_color_red;
 c_736824.hdr.grayed = 0;
c_736824.tag = closureN_tag;
 c_736824.fn = (function_type)__lambda_254;
c_736824.num_args = 0;
c_736824.num_elements = 2;
c_736824.elements = (object *)e_736832;
c_736824.elements[0] = ((closureN)self_733938)->elements[1];
c_736824.elements[1] = ((closureN)self_733938)->elements[2];

return_direct_with_clo1(data,(closure)&c_736789,__lambda_251,  &c_736824);}
;; 
}

static void __lambda_254(void *data, object self_733939, int argc, object *args) /* object self_733939, object k_732581 */
 {
 object k_732581 = args[0];
  



return_closcall2(data,  car(((closureN)self_733939)->elements[1]),  k_732581, Cyc_cdr(data, ((closureN)self_733939)->elements[0]));; 
}

static void __lambda_251(void *data, object self_733940, int argc, object *args) /* object self_733940, object r_732572 */
 {
 object r_732572 = args[0];
  
closureN_type c_736791;
object e_736795 [2];
c_736791.hdr.mark = gc_color_red;
 c_736791.hdr.grayed = 0;
c_736791.tag = closureN_tag;
 c_736791.fn = (function_type)__lambda_252;
c_736791.num_args = 1;
c_736791.num_elements = 2;
c_736791.elements = (object *)e_736795;
c_736791.elements[0] = ((closureN)self_733940)->elements[0];
c_736791.elements[1] = r_732572;


closureN_type c_736796;
object e_736822 [1];
c_736796.hdr.mark = gc_color_red;
 c_736796.hdr.grayed = 0;
c_736796.tag = closureN_tag;
 c_736796.fn = (function_type)__lambda_253;
c_736796.num_args = 3;
c_736796.num_elements = 1;
c_736796.elements = (object *)e_736822;
c_736796.elements[0] = ((closureN)self_733940)->elements[1];

return_direct_with_clo1(data,(closure)&c_736791,__lambda_252,  &c_736796);; 
}

static void __lambda_253(void *data, object self_733941, int argc, object *args) /* object self_733941, object k_732574, object a_73298_731489, object b_73299_731490, object c_73300_731491 */
 {
 object k_732574 = args[0]; object a_73298_731489 = args[1]; object b_73299_731490 = args[2]; object c_73300_731491 = args[3];
  
pair_type local_736800; 





pair_type local_736808; 





pair_type local_736816; 




return_direct_with_clo4(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_732574, set_pair_as_expr(&local_736800, Cyc_car(data, Cyc_car(data, ((closureN)self_733941)->elements[0])), a_73298_731489), set_pair_as_expr(&local_736808, Cyc_cadr(data, Cyc_car(data, ((closureN)self_733941)->elements[0])), b_73299_731490), set_pair_as_expr(&local_736816, Cyc_caddr(data, Cyc_car(data, ((closureN)self_733941)->elements[0])), c_73300_731491));; 
}

static void __lambda_252(void *data, object self_733942, int argc, object *args) /* object self_733942, object r_732573 */
 {
 object r_732573 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_733942)->elements[0], ((closureN)self_733942)->elements[1], r_732573);; 
}

static void __lambda_247(void *data, object self_733943, int argc, object *args) /* object self_733943, object r_732568 */
 {
 object r_732568 = args[0];
  
closureN_type c_736768;
object e_736775 [3];
c_736768.hdr.mark = gc_color_red;
 c_736768.hdr.grayed = 0;
c_736768.tag = closureN_tag;
 c_736768.fn = (function_type)__lambda_248;
c_736768.num_args = 1;
c_736768.num_elements = 3;
c_736768.elements = (object *)e_736775;
c_736768.elements[0] = ((closureN)self_733943)->elements[0];
c_736768.elements[1] = ((closureN)self_733943)->elements[1];
c_736768.elements[2] = ((closureN)self_733943)->elements[2];



return_direct_with_clo1(data,(closure)&c_736768,__lambda_248,  Cyc_set_cell(data, ((closureN)self_733943)->elements[2], r_732568));; 
}

static void __lambda_248(void *data, object self_733944, int argc, object *args) /* object self_733944, object r_732567 */
 {

  

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

static void __lambda_233(void *data, object _, int argc, object *args) /* closure _,object k_732549, object lis_73284_731477 */
 {
object k_732549 = args[0]; object lis_73284_731477 = args[1];
  Cyc_st_add(data, "srfi/1.sld:unzip2");

closureN_type c_736686;
object e_736757 [1];
c_736686.hdr.mark = gc_color_red;
 c_736686.hdr.grayed = 0;
c_736686.tag = closureN_tag;
 c_736686.fn = (function_type)__lambda_234;
c_736686.num_args = 1;
c_736686.num_elements = 1;
c_736686.elements = (object *)e_736757;
c_736686.elements[0] = k_732549;

return_direct_with_clo1(data,(closure)&c_736686,__lambda_234,  lis_73284_731477);; 
}

static void __lambda_234(void *data, object self_733923, int argc, object *args) /* object self_733923, object lis_73286_731478 */
 {
 object lis_73286_731478 = args[0];
  
closureN_type c_736688;
object e_736756 [2];
c_736688.hdr.mark = gc_color_red;
 c_736688.hdr.grayed = 0;
c_736688.tag = closureN_tag;
 c_736688.fn = (function_type)__lambda_235;
c_736688.num_args = 1;
c_736688.num_elements = 2;
c_736688.elements = (object *)e_736756;
c_736688.elements[0] = ((closureN)self_733923)->elements[0];
c_736688.elements[1] = lis_73286_731478;

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

static void __lambda_235(void *data, object self_733924, int argc, object *args) /* object self_733924, object recur_73287_731479 */
 {
 object recur_73287_731479 = args[0];
  
closureN_type c_736690;
object e_736752 [2];
c_736690.hdr.mark = gc_color_red;
 c_736690.hdr.grayed = 0;
c_736690.tag = closureN_tag;
 c_736690.fn = (function_type)__lambda_1147;
c_736690.num_args = 1;
c_736690.num_elements = 2;
c_736690.elements = (object *)e_736752;
c_736690.elements[0] = ((closureN)self_733924)->elements[0];
c_736690.elements[1] = ((closureN)self_733924)->elements[1];


pair_type local_736755; 
return_direct_with_clo1(data,(closure)&c_736690,__lambda_1147,  set_cell_as_expr(&local_736755, recur_73287_731479));; 
}

static void __lambda_1147(void *data, object self_733925, int argc, object *args) /* object self_733925, object recur_73287_731479 */
 {
 object recur_73287_731479 = args[0];
  
closureN_type c_736692;
object e_736705 [3];
c_736692.hdr.mark = gc_color_red;
 c_736692.hdr.grayed = 0;
c_736692.tag = closureN_tag;
 c_736692.fn = (function_type)__lambda_236;
c_736692.num_args = 1;
c_736692.num_elements = 3;
c_736692.elements = (object *)e_736705;
c_736692.elements[0] = ((closureN)self_733925)->elements[0];
c_736692.elements[1] = ((closureN)self_733925)->elements[1];
c_736692.elements[2] = recur_73287_731479;


closureN_type c_736706;
object e_736751 [1];
c_736706.hdr.mark = gc_color_red;
 c_736706.hdr.grayed = 0;
c_736706.tag = closureN_tag;
 c_736706.fn = (function_type)__lambda_238;
c_736706.num_args = 1;
c_736706.num_elements = 1;
c_736706.elements = (object *)e_736751;
c_736706.elements[0] = recur_73287_731479;

return_direct_with_clo1(data,(closure)&c_736692,__lambda_236,  &c_736706);; 
}

static void __lambda_238(void *data, object self_733926, int argc, object *args) /* object self_733926, object k_732552, object lis_73288_731480 */
 {
 object k_732552 = args[0]; object lis_73288_731480 = args[1];
  
closureN_type c_736708;
object e_736750 [3];
c_736708.hdr.mark = gc_color_red;
 c_736708.hdr.grayed = 0;
c_736708.tag = closureN_tag;
 c_736708.fn = (function_type)__lambda_239;
c_736708.num_args = 1;
c_736708.num_elements = 3;
c_736708.elements = (object *)e_736750;
c_736708.elements[0] = k_732552;
c_736708.elements[1] = lis_73288_731480;
c_736708.elements[2] = ((closureN)self_733926)->elements[0];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_736708, lis_73288_731480);; 
}

static void __lambda_239(void *data, object self_733927, int argc, object *args) /* object self_733927, object r_732553 */
 {
 object r_732553 = args[0];
  if( (boolean_f != r_732553) ){ 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_733927)->elements[0], ((closureN)self_733927)->elements[1], ((closureN)self_733927)->elements[1]);
} else { 
  
closureN_type c_736714;
object e_736740 [2];
c_736714.hdr.mark = gc_color_red;
 c_736714.hdr.grayed = 0;
c_736714.tag = closureN_tag;
 c_736714.fn = (function_type)__lambda_240;
c_736714.num_args = 1;
c_736714.num_elements = 2;
c_736714.elements = (object *)e_736740;
c_736714.elements[0] = ((closureN)self_733927)->elements[0];
c_736714.elements[1] = ((closureN)self_733927)->elements[1];


closureN_type c_736741;
object e_736749 [2];
c_736741.hdr.mark = gc_color_red;
 c_736741.hdr.grayed = 0;
c_736741.tag = closureN_tag;
 c_736741.fn = (function_type)__lambda_243;
c_736741.num_args = 0;
c_736741.num_elements = 2;
c_736741.elements = (object *)e_736749;
c_736741.elements[0] = ((closureN)self_733927)->elements[1];
c_736741.elements[1] = ((closureN)self_733927)->elements[2];

return_direct_with_clo1(data,(closure)&c_736714,__lambda_240,  &c_736741);}
;; 
}

static void __lambda_243(void *data, object self_733928, int argc, object *args) /* object self_733928, object k_732562 */
 {
 object k_732562 = args[0];
  



return_closcall2(data,  car(((closureN)self_733928)->elements[1]),  k_732562, Cyc_cdr(data, ((closureN)self_733928)->elements[0]));; 
}

static void __lambda_240(void *data, object self_733929, int argc, object *args) /* object self_733929, object r_732555 */
 {
 object r_732555 = args[0];
  
closureN_type c_736716;
object e_736720 [2];
c_736716.hdr.mark = gc_color_red;
 c_736716.hdr.grayed = 0;
c_736716.tag = closureN_tag;
 c_736716.fn = (function_type)__lambda_241;
c_736716.num_args = 1;
c_736716.num_elements = 2;
c_736716.elements = (object *)e_736720;
c_736716.elements[0] = ((closureN)self_733929)->elements[0];
c_736716.elements[1] = r_732555;


closureN_type c_736721;
object e_736739 [1];
c_736721.hdr.mark = gc_color_red;
 c_736721.hdr.grayed = 0;
c_736721.tag = closureN_tag;
 c_736721.fn = (function_type)__lambda_242;
c_736721.num_args = 2;
c_736721.num_elements = 1;
c_736721.elements = (object *)e_736739;
c_736721.elements[0] = ((closureN)self_733929)->elements[1];

return_direct_with_clo1(data,(closure)&c_736716,__lambda_241,  &c_736721);; 
}

static void __lambda_242(void *data, object self_733930, int argc, object *args) /* object self_733930, object k_732557, object a_73290_731482, object b_73291_731483 */
 {
 object k_732557 = args[0]; object a_73290_731482 = args[1]; object b_73291_731483 = args[2];
  
pair_type local_736725; 





pair_type local_736733; 




return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_732557, set_pair_as_expr(&local_736725, Cyc_car(data, Cyc_car(data, ((closureN)self_733930)->elements[0])), a_73290_731482), set_pair_as_expr(&local_736733, Cyc_cadr(data, Cyc_car(data, ((closureN)self_733930)->elements[0])), b_73291_731483));; 
}

static void __lambda_241(void *data, object self_733931, int argc, object *args) /* object self_733931, object r_732556 */
 {
 object r_732556 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_733931)->elements[0], ((closureN)self_733931)->elements[1], r_732556);; 
}

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



return_direct_with_clo1(data,(closure)&c_736694,__lambda_237,  Cyc_set_cell(data, ((closureN)self_733932)->elements[2], r_732551));; 
}

static void __lambda_237(void *data, object self_733933, int argc, object *args) /* object self_733933, object r_732550 */
 {

  

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

static void __lambda_232(void *data, object _, int argc, object *args) /* closure _,object k_732546, object lis_73283_731476 */
 {
object k_732546 = args[0]; object lis_73283_731476 = args[1];
  Cyc_st_add(data, "srfi/1.sld:unzip1");
return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  k_732546, primitive_car, lis_73283_731476);; 
}

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

closureN_type c_736639;
object e_736681 [2];
c_736639.hdr.mark = gc_color_red;
 c_736639.hdr.grayed = 0;
c_736639.tag = closureN_tag;
 c_736639.fn = (function_type)__lambda_226;
c_736639.num_args = 1;
c_736639.num_elements = 2;
c_736639.elements = (object *)e_736681;
c_736639.elements[0] = k_732537;
c_736639.elements[1] = lis_73277_731471;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_736639, primitive_pair_127, lis_73277_731471, __glo_last_91pair_srfi_1);; 
}

static void __lambda_226(void *data, object self_733916, int argc, object *args) /* object self_733916, object r_732538 */
 {

  
closureN_type c_736641;
object e_736679 [1];
c_736641.hdr.mark = gc_color_red;
 c_736641.hdr.grayed = 0;
c_736641.tag = closureN_tag;
 c_736641.fn = (function_type)__lambda_227;
c_736641.num_args = 1;
c_736641.num_elements = 1;
c_736641.elements = (object *)e_736679;
c_736641.elements[0] = ((closureN)self_733916)->elements[0];

return_direct_with_clo1(data,(closure)&c_736641,__lambda_227,  ((closureN)self_733916)->elements[1]);; 
}

static void __lambda_227(void *data, object self_733917, int argc, object *args) /* object self_733917, object lis_73279_731472 */
 {
 object lis_73279_731472 = args[0];
  
closureN_type c_736643;
object e_736678 [2];
c_736643.hdr.mark = gc_color_red;
 c_736643.hdr.grayed = 0;
c_736643.tag = closureN_tag;
 c_736643.fn = (function_type)__lambda_228;
c_736643.num_args = 1;
c_736643.num_elements = 2;
c_736643.elements = (object *)e_736678;
c_736643.elements[0] = ((closureN)self_733917)->elements[0];
c_736643.elements[1] = lis_73279_731472;

return_direct_with_clo1(data,(closure)&c_736643,__lambda_228,  boolean_f);; 
}

static void __lambda_228(void *data, object self_733918, int argc, object *args) /* object self_733918, object lp_73280_731473 */
 {
 object lp_73280_731473 = args[0];
  
closureN_type c_736645;
object e_736674 [2];
c_736645.hdr.mark = gc_color_red;
 c_736645.hdr.grayed = 0;
c_736645.tag = closureN_tag;
 c_736645.fn = (function_type)__lambda_1146;
c_736645.num_args = 1;
c_736645.num_elements = 2;
c_736645.elements = (object *)e_736674;
c_736645.elements[0] = ((closureN)self_733918)->elements[0];
c_736645.elements[1] = ((closureN)self_733918)->elements[1];


pair_type local_736677; 
return_direct_with_clo1(data,(closure)&c_736645,__lambda_1146,  set_cell_as_expr(&local_736677, lp_73280_731473));; 
}

static void __lambda_1146(void *data, object self_733919, int argc, object *args) /* object self_733919, object lp_73280_731473 */
 {
 object lp_73280_731473 = args[0];
  
closureN_type c_736647;
object e_736660 [3];
c_736647.hdr.mark = gc_color_red;
 c_736647.hdr.grayed = 0;
c_736647.tag = closureN_tag;
 c_736647.fn = (function_type)__lambda_229;
c_736647.num_args = 1;
c_736647.num_elements = 3;
c_736647.elements = (object *)e_736660;
c_736647.elements[0] = ((closureN)self_733919)->elements[0];
c_736647.elements[1] = ((closureN)self_733919)->elements[1];
c_736647.elements[2] = lp_73280_731473;


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

return_direct_with_clo1(data,(closure)&c_736647,__lambda_229,  &c_736661);; 
}

static void __lambda_231(void *data, object self_733920, int argc, object *args) /* object self_733920, object k_732541, object lis_73281_731474 */
 {
 object k_732541 = args[0]; object lis_73281_731474 = args[1];
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, lis_73281_731474))) ){ 
  



return_closcall2(data,  car(((closureN)self_733920)->elements[0]),  k_732541, Cyc_cdr(data, lis_73281_731474));
} else { 
  return_direct_with_clo1(data,  k_732541, (((closure)  k_732541)->fn),  lis_73281_731474);}
;; 
}

static void __lambda_229(void *data, object self_733921, int argc, object *args) /* object self_733921, object r_732540 */
 {
 object r_732540 = args[0];
  
closureN_type c_736649;
object e_736656 [3];
c_736649.hdr.mark = gc_color_red;
 c_736649.hdr.grayed = 0;
c_736649.tag = closureN_tag;
 c_736649.fn = (function_type)__lambda_230;
c_736649.num_args = 1;
c_736649.num_elements = 3;
c_736649.elements = (object *)e_736656;
c_736649.elements[0] = ((closureN)self_733921)->elements[0];
c_736649.elements[1] = ((closureN)self_733921)->elements[1];
c_736649.elements[2] = ((closureN)self_733921)->elements[2];



return_direct_with_clo1(data,(closure)&c_736649,__lambda_230,  Cyc_set_cell(data, ((closureN)self_733921)->elements[2], r_732540));; 
}

static void __lambda_230(void *data, object self_733922, int argc, object *args) /* object self_733922, object r_732539 */
 {

  

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

static void __lambda_223(void *data, object _, int argc, object *args) /* closure _,object k_732533, object lis_73276_731470 */
 {
object k_732533 = args[0]; object lis_73276_731470 = args[1];
  Cyc_st_add(data, "srfi/1.sld:last");

closureN_type c_736631;
object e_736636 [1];
c_736631.hdr.mark = gc_color_red;
 c_736631.hdr.grayed = 0;
c_736631.tag = closureN_tag;
 c_736631.fn = (function_type)__lambda_224;
c_736631.num_args = 1;
c_736631.num_elements = 1;
c_736631.elements = (object *)e_736636;
c_736631.elements[0] = k_732533;

return_direct_with_clo2(data,  __glo_last_91pair_srfi_1, (((closure)  __glo_last_91pair_srfi_1)->fn),  &c_736631, lis_73276_731470);; 
}

static void __lambda_224(void *data, object self_733915, int argc, object *args) /* object self_733915, object r_732534 */
 {
 object r_732534 = args[0];
  

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

static void __lambda_218(void *data, object _, int argc, object *args) /* closure _,object k_732522, object x_73267_731466, object k_73268_731467 */
 {
object k_732522 = args[0]; object x_73267_731466 = args[1]; object k_73268_731467 = args[2];
  Cyc_st_add(data, "srfi/1.sld:split-at!");

closureN_type c_736596;
object e_736628 [3];
c_736596.hdr.mark = gc_color_red;
 c_736596.hdr.grayed = 0;
c_736596.tag = closureN_tag;
 c_736596.fn = (function_type)__lambda_219;
c_736596.num_args = 1;
c_736596.num_elements = 3;
c_736596.elements = (object *)e_736628;
c_736596.elements[0] = k_732522;
c_736596.elements[1] = k_73268_731467;
c_736596.elements[2] = x_73267_731466;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_736596, primitive_integer_127, k_73268_731467, __glo_split_91at_67_srfi_1);; 
}

static void __lambda_219(void *data, object self_733911, int argc, object *args) /* object self_733911, object r_732523 */
 {

    complex_num_type local_736599; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_zero_127_191_191inline_191_191_scheme_base)->fn)(data,&local_736599, ((closureN)self_733911)->elements[1])) ){ 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_733911)->elements[0], NULL, ((closureN)self_733911)->elements[2]);
} else { 
  
closureN_type c_736605;
object e_736622 [2];
c_736605.hdr.mark = gc_color_red;
 c_736605.hdr.grayed = 0;
c_736605.tag = closureN_tag;
 c_736605.fn = (function_type)__lambda_220;
c_736605.num_args = 1;
c_736605.num_elements = 2;
c_736605.elements = (object *)e_736622;
c_736605.elements[0] = ((closureN)self_733911)->elements[0];
c_736605.elements[1] = ((closureN)self_733911)->elements[2];


complex_num_type local_736626; 
return_direct_with_clo3(data,  __glo_drop_srfi_1, (((closure)  __glo_drop_srfi_1)->fn),  &c_736605, ((closureN)self_733911)->elements[2], Cyc_fast_sub(data,&local_736626, ((closureN)self_733911)->elements[1], obj_int2obj(1)));}
;; 
}

static void __lambda_220(void *data, object self_733912, int argc, object *args) /* object self_733912, object prev_73271_731468 */
 {
 object prev_73271_731468 = args[0];
  
closureN_type c_736607;
object e_736619 [3];
c_736607.hdr.mark = gc_color_red;
 c_736607.hdr.grayed = 0;
c_736607.tag = closureN_tag;
 c_736607.fn = (function_type)__lambda_221;
c_736607.num_args = 1;
c_736607.num_elements = 3;
c_736607.elements = (object *)e_736619;
c_736607.elements[0] = ((closureN)self_733912)->elements[0];
c_736607.elements[1] = prev_73271_731468;
c_736607.elements[2] = ((closureN)self_733912)->elements[1];



return_direct_with_clo1(data,(closure)&c_736607,__lambda_221,  Cyc_cdr(data, prev_73271_731468));; 
}

static void __lambda_221(void *data, object self_733913, int argc, object *args) /* object self_733913, object suffix_73274_731469 */
 {
 object suffix_73274_731469 = args[0];
  
closureN_type c_736609;
object e_736614 [3];
c_736609.hdr.mark = gc_color_red;
 c_736609.hdr.grayed = 0;
c_736609.tag = closureN_tag;
 c_736609.fn = (function_type)__lambda_222;
c_736609.num_args = 1;
c_736609.num_elements = 3;
c_736609.elements = (object *)e_736614;
c_736609.elements[0] = ((closureN)self_733913)->elements[0];
c_736609.elements[1] = suffix_73274_731469;
c_736609.elements[2] = ((closureN)self_733913)->elements[2];


object c_736617 = Cyc_set_cdr_cps(data,(closure)&c_736609,((closureN)self_733913)->elements[1], NULL);
return_closcall1(data,(closure)&c_736609,  c_736617);; 
}

static void __lambda_222(void *data, object self_733914, int argc, object *args) /* object self_733914, object r_732528 */
 {

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

static void __lambda_207(void *data, object _, int argc, object *args) /* closure _,object k_732505, object x_73257_731457, object k_73258_731458 */
 {
object k_732505 = args[0]; object x_73257_731457 = args[1]; object k_73258_731458 = args[2];
  Cyc_st_add(data, "srfi/1.sld:split-at");

closureN_type c_736525;
object e_736593 [3];
c_736525.hdr.mark = gc_color_red;
 c_736525.hdr.grayed = 0;
c_736525.tag = closureN_tag;
 c_736525.fn = (function_type)__lambda_208;
c_736525.num_args = 1;
c_736525.num_elements = 3;
c_736525.elements = (object *)e_736593;
c_736525.elements[0] = k_732505;
c_736525.elements[1] = k_73258_731458;
c_736525.elements[2] = x_73257_731457;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_736525, primitive_integer_127, k_73258_731458, __glo_split_91at_srfi_1);; 
}

static void __lambda_208(void *data, object self_733900, int argc, object *args) /* object self_733900, object r_732506 */
 {

  
closureN_type c_736527;
object e_736590 [1];
c_736527.hdr.mark = gc_color_red;
 c_736527.hdr.grayed = 0;
c_736527.tag = closureN_tag;
 c_736527.fn = (function_type)__lambda_209;
c_736527.num_args = 2;
c_736527.num_elements = 1;
c_736527.elements = (object *)e_736590;
c_736527.elements[0] = ((closureN)self_733900)->elements[0];

return_direct_with_clo2(data,(closure)&c_736527,__lambda_209,  ((closureN)self_733900)->elements[2], ((closureN)self_733900)->elements[1]);; 
}

static void __lambda_209(void *data, object self_733901, int argc, object *args) /* object self_733901, object lis_73260_731459, object k_73261_731460 */
 {
 object lis_73260_731459 = args[0]; object k_73261_731460 = args[1];
  
closureN_type c_736529;
object e_736589 [3];
c_736529.hdr.mark = gc_color_red;
 c_736529.hdr.grayed = 0;
c_736529.tag = closureN_tag;
 c_736529.fn = (function_type)__lambda_210;
c_736529.num_args = 1;
c_736529.num_elements = 3;
c_736529.elements = (object *)e_736589;
c_736529.elements[0] = ((closureN)self_733901)->elements[0];
c_736529.elements[1] = k_73261_731460;
c_736529.elements[2] = lis_73260_731459;

return_direct_with_clo1(data,(closure)&c_736529,__lambda_210,  boolean_f);; 
}

static void __lambda_210(void *data, object self_733902, int argc, object *args) /* object self_733902, object recur_73262_731461 */
 {
 object recur_73262_731461 = args[0];
  
closureN_type c_736531;
object e_736585 [3];
c_736531.hdr.mark = gc_color_red;
 c_736531.hdr.grayed = 0;
c_736531.tag = closureN_tag;
 c_736531.fn = (function_type)__lambda_1145;
c_736531.num_args = 1;
c_736531.num_elements = 3;
c_736531.elements = (object *)e_736585;
c_736531.elements[0] = ((closureN)self_733902)->elements[0];
c_736531.elements[1] = ((closureN)self_733902)->elements[1];
c_736531.elements[2] = ((closureN)self_733902)->elements[2];


pair_type local_736588; 
return_direct_with_clo1(data,(closure)&c_736531,__lambda_1145,  set_cell_as_expr(&local_736588, recur_73262_731461));; 
}

static void __lambda_1145(void *data, object self_733903, int argc, object *args) /* object self_733903, object recur_73262_731461 */
 {
 object recur_73262_731461 = args[0];
  
closureN_type c_736533;
object e_736547 [4];
c_736533.hdr.mark = gc_color_red;
 c_736533.hdr.grayed = 0;
c_736533.tag = closureN_tag;
 c_736533.fn = (function_type)__lambda_211;
c_736533.num_args = 1;
c_736533.num_elements = 4;
c_736533.elements = (object *)e_736547;
c_736533.elements[0] = ((closureN)self_733903)->elements[0];
c_736533.elements[1] = ((closureN)self_733903)->elements[1];
c_736533.elements[2] = ((closureN)self_733903)->elements[2];
c_736533.elements[3] = recur_73262_731461;


closureN_type c_736548;
object e_736584 [1];
c_736548.hdr.mark = gc_color_red;
 c_736548.hdr.grayed = 0;
c_736548.tag = closureN_tag;
 c_736548.fn = (function_type)__lambda_213;
c_736548.num_args = 2;
c_736548.num_elements = 1;
c_736548.elements = (object *)e_736584;
c_736548.elements[0] = recur_73262_731461;

return_direct_with_clo1(data,(closure)&c_736533,__lambda_211,  &c_736548);; 
}

static void __lambda_213(void *data, object self_733904, int argc, object *args) /* object self_733904, object k_732509, object lis_73263_731462, object k_73264_731463 */
 {
 object k_732509 = args[0]; object lis_73263_731462 = args[1]; object k_73264_731463 = args[2];
    complex_num_type local_736551; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_zero_127_191_191inline_191_191_scheme_base)->fn)(data,&local_736551, k_73264_731463)) ){ 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_732509, NULL, lis_73263_731462);
} else { 
  
closureN_type c_736554;
object e_736570 [2];
c_736554.hdr.mark = gc_color_red;
 c_736554.hdr.grayed = 0;
c_736554.tag = closureN_tag;
 c_736554.fn = (function_type)__lambda_214;
c_736554.num_args = 1;
c_736554.num_elements = 2;
c_736554.elements = (object *)e_736570;
c_736554.elements[0] = k_732509;
c_736554.elements[1] = lis_73263_731462;


closureN_type c_736571;
object e_736583 [3];
c_736571.hdr.mark = gc_color_red;
 c_736571.hdr.grayed = 0;
c_736571.tag = closureN_tag;
 c_736571.fn = (function_type)__lambda_217;
c_736571.num_args = 0;
c_736571.num_elements = 3;
c_736571.elements = (object *)e_736583;
c_736571.elements[0] = k_73264_731463;
c_736571.elements[1] = lis_73263_731462;
c_736571.elements[2] = ((closureN)self_733904)->elements[0];

return_direct_with_clo1(data,(closure)&c_736554,__lambda_214,  &c_736571);}
;; 
}

static void __lambda_217(void *data, object self_733905, int argc, object *args) /* object self_733905, object k_732517 */
 {
 object k_732517 = args[0];
  




complex_num_type local_736581; 
return_closcall3(data,  car(((closureN)self_733905)->elements[2]),  k_732517, Cyc_cdr(data, ((closureN)self_733905)->elements[1]), Cyc_fast_sub(data,&local_736581, ((closureN)self_733905)->elements[0], obj_int2obj(1)));; 
}

static void __lambda_214(void *data, object self_733906, int argc, object *args) /* object self_733906, object r_732512 */
 {
 object r_732512 = args[0];
  
closureN_type c_736556;
object e_736560 [2];
c_736556.hdr.mark = gc_color_red;
 c_736556.hdr.grayed = 0;
c_736556.tag = closureN_tag;
 c_736556.fn = (function_type)__lambda_215;
c_736556.num_args = 1;
c_736556.num_elements = 2;
c_736556.elements = (object *)e_736560;
c_736556.elements[0] = ((closureN)self_733906)->elements[0];
c_736556.elements[1] = r_732512;


closureN_type c_736561;
object e_736569 [1];
c_736561.hdr.mark = gc_color_red;
 c_736561.hdr.grayed = 0;
c_736561.tag = closureN_tag;
 c_736561.fn = (function_type)__lambda_216;
c_736561.num_args = 2;
c_736561.num_elements = 1;
c_736561.elements = (object *)e_736569;
c_736561.elements[0] = ((closureN)self_733906)->elements[1];

return_direct_with_clo1(data,(closure)&c_736556,__lambda_215,  &c_736561);; 
}

static void __lambda_216(void *data, object self_733907, int argc, object *args) /* object self_733907, object k_732514, object prefix_73265_731464, object suffix_73266_731465 */
 {
 object k_732514 = args[0]; object prefix_73265_731464 = args[1]; object suffix_73266_731465 = args[2];
  
pair_type local_736565; 


return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_732514, set_pair_as_expr(&local_736565, Cyc_car(data, ((closureN)self_733907)->elements[0]), prefix_73265_731464), suffix_73266_731465);; 
}

static void __lambda_215(void *data, object self_733908, int argc, object *args) /* object self_733908, object r_732513 */
 {
 object r_732513 = args[0];
  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_733908)->elements[0], ((closureN)self_733908)->elements[1], r_732513);; 
}

static void __lambda_211(void *data, object self_733909, int argc, object *args) /* object self_733909, object r_732508 */
 {
 object r_732508 = args[0];
  
closureN_type c_736535;
object e_736543 [4];
c_736535.hdr.mark = gc_color_red;
 c_736535.hdr.grayed = 0;
c_736535.tag = closureN_tag;
 c_736535.fn = (function_type)__lambda_212;
c_736535.num_args = 1;
c_736535.num_elements = 4;
c_736535.elements = (object *)e_736543;
c_736535.elements[0] = ((closureN)self_733909)->elements[0];
c_736535.elements[1] = ((closureN)self_733909)->elements[1];
c_736535.elements[2] = ((closureN)self_733909)->elements[2];
c_736535.elements[3] = ((closureN)self_733909)->elements[3];



return_direct_with_clo1(data,(closure)&c_736535,__lambda_212,  Cyc_set_cell(data, ((closureN)self_733909)->elements[3], r_732508));; 
}

static void __lambda_212(void *data, object self_733910, int argc, object *args) /* object self_733910, object r_732507 */
 {

  

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

static void __lambda_197(void *data, object _, int argc, object *args) /* closure _,object k_732490, object lis_73248_731449, object k_73249_731450 */
 {
object k_732490 = args[0]; object lis_73248_731449 = args[1]; object k_73249_731450 = args[2];
  Cyc_st_add(data, "srfi/1.sld:drop-right!");

closureN_type c_736455;
object e_736522 [3];
c_736455.hdr.mark = gc_color_red;
 c_736455.hdr.grayed = 0;
c_736455.tag = closureN_tag;
 c_736455.fn = (function_type)__lambda_198;
c_736455.num_args = 1;
c_736455.num_elements = 3;
c_736455.elements = (object *)e_736522;
c_736455.elements[0] = k_73249_731450;
c_736455.elements[1] = k_732490;
c_736455.elements[2] = lis_73248_731449;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_736455, primitive_integer_127, k_73249_731450, __glo_drop_91right_67_srfi_1);; 
}

static void __lambda_198(void *data, object self_733890, int argc, object *args) /* object self_733890, object r_732491 */
 {

  
closureN_type c_736457;
object e_736519 [2];
c_736457.hdr.mark = gc_color_red;
 c_736457.hdr.grayed = 0;
c_736457.tag = closureN_tag;
 c_736457.fn = (function_type)__lambda_199;
c_736457.num_args = 1;
c_736457.num_elements = 2;
c_736457.elements = (object *)e_736519;
c_736457.elements[0] = ((closureN)self_733890)->elements[1];
c_736457.elements[1] = ((closureN)self_733890)->elements[2];

return_direct_with_clo3(data,  __glo_drop_srfi_1, (((closure)  __glo_drop_srfi_1)->fn),  &c_736457, ((closureN)self_733890)->elements[2], ((closureN)self_733890)->elements[0]);; 
}

static void __lambda_199(void *data, object self_733891, int argc, object *args) /* object self_733891, object lead_73250_731451 */
 {
 object lead_73250_731451 = args[0];
    
if( (boolean_f != Cyc_is_pair(lead_73250_731451)) ){ 
  
closureN_type c_736461;
object e_736513 [2];
c_736461.hdr.mark = gc_color_red;
 c_736461.hdr.grayed = 0;
c_736461.tag = closureN_tag;
 c_736461.fn = (function_type)__lambda_200;
c_736461.num_args = 2;
c_736461.num_elements = 2;
c_736461.elements = (object *)e_736513;
c_736461.elements[0] = ((closureN)self_733891)->elements[0];
c_736461.elements[1] = ((closureN)self_733891)->elements[1];



return_direct_with_clo2(data,(closure)&c_736461,__lambda_200,  ((closureN)self_733891)->elements[1], Cyc_cdr(data, lead_73250_731451));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733891)->elements[0], (((closure)  ((closureN)self_733891)->elements[0])->fn),  NULL);}
;; 
}

static void __lambda_200(void *data, object self_733892, int argc, object *args) /* object self_733892, object lag_73252_731452, object lead_73253_731453 */
 {
 object lag_73252_731452 = args[0]; object lead_73253_731453 = args[1];
  
closureN_type c_736463;
object e_736512 [4];
c_736463.hdr.mark = gc_color_red;
 c_736463.hdr.grayed = 0;
c_736463.tag = closureN_tag;
 c_736463.fn = (function_type)__lambda_201;
c_736463.num_args = 1;
c_736463.num_elements = 4;
c_736463.elements = (object *)e_736512;
c_736463.elements[0] = ((closureN)self_733892)->elements[0];
c_736463.elements[1] = lag_73252_731452;
c_736463.elements[2] = lead_73253_731453;
c_736463.elements[3] = ((closureN)self_733892)->elements[1];

return_direct_with_clo1(data,(closure)&c_736463,__lambda_201,  boolean_f);; 
}

static void __lambda_201(void *data, object self_733893, int argc, object *args) /* object self_733893, object lp_73254_731454 */
 {
 object lp_73254_731454 = args[0];
  
closureN_type c_736465;
object e_736508 [4];
c_736465.hdr.mark = gc_color_red;
 c_736465.hdr.grayed = 0;
c_736465.tag = closureN_tag;
 c_736465.fn = (function_type)__lambda_1144;
c_736465.num_args = 1;
c_736465.num_elements = 4;
c_736465.elements = (object *)e_736508;
c_736465.elements[0] = ((closureN)self_733893)->elements[0];
c_736465.elements[1] = ((closureN)self_733893)->elements[1];
c_736465.elements[2] = ((closureN)self_733893)->elements[2];
c_736465.elements[3] = ((closureN)self_733893)->elements[3];


pair_type local_736511; 
return_direct_with_clo1(data,(closure)&c_736465,__lambda_1144,  set_cell_as_expr(&local_736511, lp_73254_731454));; 
}

static void __lambda_1144(void *data, object self_733894, int argc, object *args) /* object self_733894, object lp_73254_731454 */
 {
 object lp_73254_731454 = args[0];
  
closureN_type c_736467;
object e_736481 [4];
c_736467.hdr.mark = gc_color_red;
 c_736467.hdr.grayed = 0;
c_736467.tag = closureN_tag;
 c_736467.fn = (function_type)__lambda_202;
c_736467.num_args = 1;
c_736467.num_elements = 4;
c_736467.elements = (object *)e_736481;
c_736467.elements[0] = ((closureN)self_733894)->elements[0];
c_736467.elements[1] = ((closureN)self_733894)->elements[1];
c_736467.elements[2] = ((closureN)self_733894)->elements[2];
c_736467.elements[3] = lp_73254_731454;


closureN_type c_736482;
object e_736507 [2];
c_736482.hdr.mark = gc_color_red;
 c_736482.hdr.grayed = 0;
c_736482.tag = closureN_tag;
 c_736482.fn = (function_type)__lambda_204;
c_736482.num_args = 2;
c_736482.num_elements = 2;
c_736482.elements = (object *)e_736507;
c_736482.elements[0] = ((closureN)self_733894)->elements[3];
c_736482.elements[1] = lp_73254_731454;

return_direct_with_clo1(data,(closure)&c_736467,__lambda_202,  &c_736482);; 
}

static void __lambda_204(void *data, object self_733895, int argc, object *args) /* object self_733895, object k_732497, object lag_73255_731455, object lead_73256_731456 */
 {
 object k_732497 = args[0]; object lag_73255_731455 = args[1]; object lead_73256_731456 = args[2];
    
if( (boolean_f != Cyc_is_pair(lead_73256_731456)) ){ 
  
closureN_type c_736486;
object e_736495 [3];
c_736486.hdr.mark = gc_color_red;
 c_736486.hdr.grayed = 0;
c_736486.tag = closureN_tag;
 c_736486.fn = (function_type)__lambda_205;
c_736486.num_args = 1;
c_736486.num_elements = 3;
c_736486.elements = (object *)e_736495;
c_736486.elements[0] = k_732497;
c_736486.elements[1] = lead_73256_731456;
c_736486.elements[2] = ((closureN)self_733895)->elements[1];



return_direct_with_clo1(data,(closure)&c_736486,__lambda_205,  Cyc_cdr(data, lag_73255_731455));
} else { 
  
closureN_type c_736499;
object e_736503 [2];
c_736499.hdr.mark = gc_color_red;
 c_736499.hdr.grayed = 0;
c_736499.tag = closureN_tag;
 c_736499.fn = (function_type)__lambda_206;
c_736499.num_args = 1;
c_736499.num_elements = 2;
c_736499.elements = (object *)e_736503;
c_736499.elements[0] = k_732497;
c_736499.elements[1] = ((closureN)self_733895)->elements[0];


object c_736506 = Cyc_set_cdr_cps(data,(closure)&c_736499,lag_73255_731455, NULL);
return_closcall1(data,(closure)&c_736499,  c_736506);}
;; 
}

static void __lambda_206(void *data, object self_733897, int argc, object *args) /* object self_733897, object r_732501 */
 {

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

static void __lambda_205(void *data, object self_733896, int argc, object *args) /* object self_733896, object r_732499 */
 {
 object r_732499 = args[0];
  



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

static void __lambda_202(void *data, object self_733898, int argc, object *args) /* object self_733898, object r_732496 */
 {
 object r_732496 = args[0];
  
closureN_type c_736469;
object e_736477 [4];
c_736469.hdr.mark = gc_color_red;
 c_736469.hdr.grayed = 0;
c_736469.tag = closureN_tag;
 c_736469.fn = (function_type)__lambda_203;
c_736469.num_args = 1;
c_736469.num_elements = 4;
c_736469.elements = (object *)e_736477;
c_736469.elements[0] = ((closureN)self_733898)->elements[0];
c_736469.elements[1] = ((closureN)self_733898)->elements[1];
c_736469.elements[2] = ((closureN)self_733898)->elements[2];
c_736469.elements[3] = ((closureN)self_733898)->elements[3];



return_direct_with_clo1(data,(closure)&c_736469,__lambda_203,  Cyc_set_cell(data, ((closureN)self_733898)->elements[3], r_732496));; 
}

static void __lambda_203(void *data, object self_733899, int argc, object *args) /* object self_733899, object r_732495 */
 {

  

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

static void __lambda_188(void *data, object _, int argc, object *args) /* closure _,object k_732477, object lis_73240_731442, object k_73241_731443 */
 {
object k_732477 = args[0]; object lis_73240_731442 = args[1]; object k_73241_731443 = args[2];
  Cyc_st_add(data, "srfi/1.sld:drop-right");

closureN_type c_736394;
object e_736452 [3];
c_736394.hdr.mark = gc_color_red;
 c_736394.hdr.grayed = 0;
c_736394.tag = closureN_tag;
 c_736394.fn = (function_type)__lambda_189;
c_736394.num_args = 1;
c_736394.num_elements = 3;
c_736394.elements = (object *)e_736452;
c_736394.elements[0] = k_73241_731443;
c_736394.elements[1] = k_732477;
c_736394.elements[2] = lis_73240_731442;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_736394, primitive_integer_127, k_73241_731443, __glo_drop_91right_srfi_1);; 
}

static void __lambda_189(void *data, object self_733881, int argc, object *args) /* object self_733881, object r_732478 */
 {

  
closureN_type c_736396;
object e_736449 [2];
c_736396.hdr.mark = gc_color_red;
 c_736396.hdr.grayed = 0;
c_736396.tag = closureN_tag;
 c_736396.fn = (function_type)__lambda_190;
c_736396.num_args = 1;
c_736396.num_elements = 2;
c_736396.elements = (object *)e_736449;
c_736396.elements[0] = ((closureN)self_733881)->elements[1];
c_736396.elements[1] = ((closureN)self_733881)->elements[2];

return_direct_with_clo3(data,  __glo_drop_srfi_1, (((closure)  __glo_drop_srfi_1)->fn),  &c_736396, ((closureN)self_733881)->elements[2], ((closureN)self_733881)->elements[0]);; 
}

static void __lambda_190(void *data, object self_733882, int argc, object *args) /* object self_733882, object r_732479 */
 {
 object r_732479 = args[0];
  
closureN_type c_736398;
object e_736447 [1];
c_736398.hdr.mark = gc_color_red;
 c_736398.hdr.grayed = 0;
c_736398.tag = closureN_tag;
 c_736398.fn = (function_type)__lambda_191;
c_736398.num_args = 2;
c_736398.num_elements = 1;
c_736398.elements = (object *)e_736447;
c_736398.elements[0] = ((closureN)self_733882)->elements[0];

return_direct_with_clo2(data,(closure)&c_736398,__lambda_191,  ((closureN)self_733882)->elements[1], r_732479);; 
}

static void __lambda_191(void *data, object self_733883, int argc, object *args) /* object self_733883, object lag_73243_731444, object lead_73244_731445 */
 {
 object lag_73243_731444 = args[0]; object lead_73244_731445 = args[1];
  
closureN_type c_736400;
object e_736446 [3];
c_736400.hdr.mark = gc_color_red;
 c_736400.hdr.grayed = 0;
c_736400.tag = closureN_tag;
 c_736400.fn = (function_type)__lambda_192;
c_736400.num_args = 1;
c_736400.num_elements = 3;
c_736400.elements = (object *)e_736446;
c_736400.elements[0] = ((closureN)self_733883)->elements[0];
c_736400.elements[1] = lag_73243_731444;
c_736400.elements[2] = lead_73244_731445;

return_direct_with_clo1(data,(closure)&c_736400,__lambda_192,  boolean_f);; 
}

static void __lambda_192(void *data, object self_733884, int argc, object *args) /* object self_733884, object recur_73245_731446 */
 {
 object recur_73245_731446 = args[0];
  
closureN_type c_736402;
object e_736442 [3];
c_736402.hdr.mark = gc_color_red;
 c_736402.hdr.grayed = 0;
c_736402.tag = closureN_tag;
 c_736402.fn = (function_type)__lambda_1143;
c_736402.num_args = 1;
c_736402.num_elements = 3;
c_736402.elements = (object *)e_736442;
c_736402.elements[0] = ((closureN)self_733884)->elements[0];
c_736402.elements[1] = ((closureN)self_733884)->elements[1];
c_736402.elements[2] = ((closureN)self_733884)->elements[2];


pair_type local_736445; 
return_direct_with_clo1(data,(closure)&c_736402,__lambda_1143,  set_cell_as_expr(&local_736445, recur_73245_731446));; 
}

static void __lambda_1143(void *data, object self_733885, int argc, object *args) /* object self_733885, object recur_73245_731446 */
 {
 object recur_73245_731446 = args[0];
  
closureN_type c_736404;
object e_736418 [4];
c_736404.hdr.mark = gc_color_red;
 c_736404.hdr.grayed = 0;
c_736404.tag = closureN_tag;
 c_736404.fn = (function_type)__lambda_193;
c_736404.num_args = 1;
c_736404.num_elements = 4;
c_736404.elements = (object *)e_736418;
c_736404.elements[0] = ((closureN)self_733885)->elements[0];
c_736404.elements[1] = ((closureN)self_733885)->elements[1];
c_736404.elements[2] = ((closureN)self_733885)->elements[2];
c_736404.elements[3] = recur_73245_731446;


closureN_type c_736419;
object e_736441 [1];
c_736419.hdr.mark = gc_color_red;
 c_736419.hdr.grayed = 0;
c_736419.tag = closureN_tag;
 c_736419.fn = (function_type)__lambda_195;
c_736419.num_args = 2;
c_736419.num_elements = 1;
c_736419.elements = (object *)e_736441;
c_736419.elements[0] = recur_73245_731446;

return_direct_with_clo1(data,(closure)&c_736404,__lambda_193,  &c_736419);; 
}

static void __lambda_195(void *data, object self_733886, int argc, object *args) /* object self_733886, object k_732482, object lag_73246_731447, object lead_73247_731448 */
 {
 object k_732482 = args[0]; object lag_73246_731447 = args[1]; object lead_73247_731448 = args[2];
    
if( (boolean_f != Cyc_is_pair(lead_73247_731448)) ){ 
  


closureN_type c_736426;
object e_736435 [2];
c_736426.hdr.mark = gc_color_red;
 c_736426.hdr.grayed = 0;
c_736426.tag = closureN_tag;
 c_736426.fn = (function_type)__lambda_196;
c_736426.num_args = 1;
c_736426.num_elements = 2;
c_736426.elements = (object *)e_736435;
c_736426.elements[0] = k_732482;
c_736426.elements[1] = lag_73246_731447;





return_closcall3(data,  car(((closureN)self_733886)->elements[0]),  &c_736426, Cyc_cdr(data, lag_73246_731447), Cyc_cdr(data, lead_73247_731448));
} else { 
  return_direct_with_clo1(data,  k_732482, (((closure)  k_732482)->fn),  NULL);}
;; 
}

static void __lambda_196(void *data, object self_733887, int argc, object *args) /* object self_733887, object r_732485 */
 {
 object r_732485 = args[0];
  
pair_type local_736431; 


return_direct_with_clo1(data,  ((closureN)self_733887)->elements[0], (((closure)  ((closureN)self_733887)->elements[0])->fn),  set_pair_as_expr(&local_736431, Cyc_car(data, ((closureN)self_733887)->elements[1]), r_732485));; 
}

static void __lambda_193(void *data, object self_733888, int argc, object *args) /* object self_733888, object r_732481 */
 {
 object r_732481 = args[0];
  
closureN_type c_736406;
object e_736414 [4];
c_736406.hdr.mark = gc_color_red;
 c_736406.hdr.grayed = 0;
c_736406.tag = closureN_tag;
 c_736406.fn = (function_type)__lambda_194;
c_736406.num_args = 1;
c_736406.num_elements = 4;
c_736406.elements = (object *)e_736414;
c_736406.elements[0] = ((closureN)self_733888)->elements[0];
c_736406.elements[1] = ((closureN)self_733888)->elements[1];
c_736406.elements[2] = ((closureN)self_733888)->elements[2];
c_736406.elements[3] = ((closureN)self_733888)->elements[3];



return_direct_with_clo1(data,(closure)&c_736406,__lambda_194,  Cyc_set_cell(data, ((closureN)self_733888)->elements[3], r_732481));; 
}

static void __lambda_194(void *data, object self_733889, int argc, object *args) /* object self_733889, object r_732480 */
 {

  

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

static void __lambda_180(void *data, object _, int argc, object *args) /* closure _,object k_732466, object lis_73232_731435, object k_73233_731436 */
 {
object k_732466 = args[0]; object lis_73232_731435 = args[1]; object k_73233_731436 = args[2];
  Cyc_st_add(data, "srfi/1.sld:take-right");

closureN_type c_736343;
object e_736391 [3];
c_736343.hdr.mark = gc_color_red;
 c_736343.hdr.grayed = 0;
c_736343.tag = closureN_tag;
 c_736343.fn = (function_type)__lambda_181;
c_736343.num_args = 1;
c_736343.num_elements = 3;
c_736343.elements = (object *)e_736391;
c_736343.elements[0] = k_73233_731436;
c_736343.elements[1] = k_732466;
c_736343.elements[2] = lis_73232_731435;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_736343, primitive_integer_127, k_73233_731436, __glo_take_91right_srfi_1);; 
}

static void __lambda_181(void *data, object self_733873, int argc, object *args) /* object self_733873, object r_732467 */
 {

  
closureN_type c_736345;
object e_736388 [2];
c_736345.hdr.mark = gc_color_red;
 c_736345.hdr.grayed = 0;
c_736345.tag = closureN_tag;
 c_736345.fn = (function_type)__lambda_182;
c_736345.num_args = 1;
c_736345.num_elements = 2;
c_736345.elements = (object *)e_736388;
c_736345.elements[0] = ((closureN)self_733873)->elements[1];
c_736345.elements[1] = ((closureN)self_733873)->elements[2];

return_direct_with_clo3(data,  __glo_drop_srfi_1, (((closure)  __glo_drop_srfi_1)->fn),  &c_736345, ((closureN)self_733873)->elements[2], ((closureN)self_733873)->elements[0]);; 
}

static void __lambda_182(void *data, object self_733874, int argc, object *args) /* object self_733874, object r_732468 */
 {
 object r_732468 = args[0];
  
closureN_type c_736347;
object e_736386 [1];
c_736347.hdr.mark = gc_color_red;
 c_736347.hdr.grayed = 0;
c_736347.tag = closureN_tag;
 c_736347.fn = (function_type)__lambda_183;
c_736347.num_args = 2;
c_736347.num_elements = 1;
c_736347.elements = (object *)e_736386;
c_736347.elements[0] = ((closureN)self_733874)->elements[0];

return_direct_with_clo2(data,(closure)&c_736347,__lambda_183,  ((closureN)self_733874)->elements[1], r_732468);; 
}

static void __lambda_183(void *data, object self_733875, int argc, object *args) /* object self_733875, object lag_73235_731437, object lead_73236_731438 */
 {
 object lag_73235_731437 = args[0]; object lead_73236_731438 = args[1];
  
closureN_type c_736349;
object e_736385 [3];
c_736349.hdr.mark = gc_color_red;
 c_736349.hdr.grayed = 0;
c_736349.tag = closureN_tag;
 c_736349.fn = (function_type)__lambda_184;
c_736349.num_args = 1;
c_736349.num_elements = 3;
c_736349.elements = (object *)e_736385;
c_736349.elements[0] = ((closureN)self_733875)->elements[0];
c_736349.elements[1] = lag_73235_731437;
c_736349.elements[2] = lead_73236_731438;

return_direct_with_clo1(data,(closure)&c_736349,__lambda_184,  boolean_f);; 
}

static void __lambda_184(void *data, object self_733876, int argc, object *args) /* object self_733876, object lp_73237_731439 */
 {
 object lp_73237_731439 = args[0];
  
closureN_type c_736351;
object e_736381 [3];
c_736351.hdr.mark = gc_color_red;
 c_736351.hdr.grayed = 0;
c_736351.tag = closureN_tag;
 c_736351.fn = (function_type)__lambda_1142;
c_736351.num_args = 1;
c_736351.num_elements = 3;
c_736351.elements = (object *)e_736381;
c_736351.elements[0] = ((closureN)self_733876)->elements[0];
c_736351.elements[1] = ((closureN)self_733876)->elements[1];
c_736351.elements[2] = ((closureN)self_733876)->elements[2];


pair_type local_736384; 
return_direct_with_clo1(data,(closure)&c_736351,__lambda_1142,  set_cell_as_expr(&local_736384, lp_73237_731439));; 
}

static void __lambda_1142(void *data, object self_733877, int argc, object *args) /* object self_733877, object lp_73237_731439 */
 {
 object lp_73237_731439 = args[0];
  
closureN_type c_736353;
object e_736367 [4];
c_736353.hdr.mark = gc_color_red;
 c_736353.hdr.grayed = 0;
c_736353.tag = closureN_tag;
 c_736353.fn = (function_type)__lambda_185;
c_736353.num_args = 1;
c_736353.num_elements = 4;
c_736353.elements = (object *)e_736367;
c_736353.elements[0] = ((closureN)self_733877)->elements[0];
c_736353.elements[1] = ((closureN)self_733877)->elements[1];
c_736353.elements[2] = ((closureN)self_733877)->elements[2];
c_736353.elements[3] = lp_73237_731439;


closureN_type c_736368;
object e_736380 [1];
c_736368.hdr.mark = gc_color_red;
 c_736368.hdr.grayed = 0;
c_736368.tag = closureN_tag;
 c_736368.fn = (function_type)__lambda_187;
c_736368.num_args = 2;
c_736368.num_elements = 1;
c_736368.elements = (object *)e_736380;
c_736368.elements[0] = lp_73237_731439;

return_direct_with_clo1(data,(closure)&c_736353,__lambda_185,  &c_736368);; 
}

static void __lambda_187(void *data, object self_733878, int argc, object *args) /* object self_733878, object k_732471, object lag_73238_731440, object lead_73239_731441 */
 {
 object k_732471 = args[0]; object lag_73238_731440 = args[1]; object lead_73239_731441 = args[2];
    
if( (boolean_f != Cyc_is_pair(lead_73239_731441)) ){ 
  





return_closcall3(data,  car(((closureN)self_733878)->elements[0]),  k_732471, Cyc_cdr(data, lag_73238_731440), Cyc_cdr(data, lead_73239_731441));
} else { 
  return_direct_with_clo1(data,  k_732471, (((closure)  k_732471)->fn),  lag_73238_731440);}
;; 
}

static void __lambda_185(void *data, object self_733879, int argc, object *args) /* object self_733879, object r_732470 */
 {
 object r_732470 = args[0];
  
closureN_type c_736355;
object e_736363 [4];
c_736355.hdr.mark = gc_color_red;
 c_736355.hdr.grayed = 0;
c_736355.tag = closureN_tag;
 c_736355.fn = (function_type)__lambda_186;
c_736355.num_args = 1;
c_736355.num_elements = 4;
c_736355.elements = (object *)e_736363;
c_736355.elements[0] = ((closureN)self_733879)->elements[0];
c_736355.elements[1] = ((closureN)self_733879)->elements[1];
c_736355.elements[2] = ((closureN)self_733879)->elements[2];
c_736355.elements[3] = ((closureN)self_733879)->elements[3];



return_direct_with_clo1(data,(closure)&c_736355,__lambda_186,  Cyc_set_cell(data, ((closureN)self_733879)->elements[3], r_732470));; 
}

static void __lambda_186(void *data, object self_733880, int argc, object *args) /* object self_733880, object r_732469 */
 {

  

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

static void __lambda_176(void *data, object _, int argc, object *args) /* closure _,object k_732457, object lis_73230_731433, object k_73231_731434 */
 {
object k_732457 = args[0]; object lis_73230_731433 = args[1]; object k_73231_731434 = args[2];
  Cyc_st_add(data, "srfi/1.sld:take!");

closureN_type c_736316;
object e_736340 [3];
c_736316.hdr.mark = gc_color_red;
 c_736316.hdr.grayed = 0;
c_736316.tag = closureN_tag;
 c_736316.fn = (function_type)__lambda_177;
c_736316.num_args = 1;
c_736316.num_elements = 3;
c_736316.elements = (object *)e_736340;
c_736316.elements[0] = k_73231_731434;
c_736316.elements[1] = k_732457;
c_736316.elements[2] = lis_73230_731433;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_736316, primitive_integer_127, k_73231_731434, __glo_take_67_srfi_1);; 
}

static void __lambda_177(void *data, object self_733870, int argc, object *args) /* object self_733870, object r_732458 */
 {

    complex_num_type local_736319; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_zero_127_191_191inline_191_191_scheme_base)->fn)(data,&local_736319, ((closureN)self_733870)->elements[0])) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733870)->elements[1], (((closure)  ((closureN)self_733870)->elements[1])->fn),  NULL);
} else { 
  
closureN_type c_736324;
object e_736334 [2];
c_736324.hdr.mark = gc_color_red;
 c_736324.hdr.grayed = 0;
c_736324.tag = closureN_tag;
 c_736324.fn = (function_type)__lambda_178;
c_736324.num_args = 1;
c_736324.num_elements = 2;
c_736324.elements = (object *)e_736334;
c_736324.elements[0] = ((closureN)self_733870)->elements[1];
c_736324.elements[1] = ((closureN)self_733870)->elements[2];


complex_num_type local_736338; 
return_direct_with_clo3(data,  __glo_drop_srfi_1, (((closure)  __glo_drop_srfi_1)->fn),  &c_736324, ((closureN)self_733870)->elements[2], Cyc_fast_sub(data,&local_736338, ((closureN)self_733870)->elements[0], obj_int2obj(1)));}
;; 
}

static void __lambda_178(void *data, object self_733871, int argc, object *args) /* object self_733871, object r_732461 */
 {
 object r_732461 = args[0];
  
closureN_type c_736326;
object e_736330 [2];
c_736326.hdr.mark = gc_color_red;
 c_736326.hdr.grayed = 0;
c_736326.tag = closureN_tag;
 c_736326.fn = (function_type)__lambda_179;
c_736326.num_args = 1;
c_736326.num_elements = 2;
c_736326.elements = (object *)e_736330;
c_736326.elements[0] = ((closureN)self_733871)->elements[0];
c_736326.elements[1] = ((closureN)self_733871)->elements[1];


object c_736333 = Cyc_set_cdr_cps(data,(closure)&c_736326,r_732461, NULL);
return_closcall1(data,(closure)&c_736326,  c_736333);; 
}

static void __lambda_179(void *data, object self_733872, int argc, object *args) /* object self_733872, object r_732460 */
 {

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

static void __lambda_169(void *data, object _, int argc, object *args) /* closure _,object k_732447, object lis_73222_731426, object k_73223_731427 */
 {
object k_732447 = args[0]; object lis_73222_731426 = args[1]; object k_73223_731427 = args[2];
  Cyc_st_add(data, "srfi/1.sld:drop");

closureN_type c_736267;
object e_736313 [3];
c_736267.hdr.mark = gc_color_red;
 c_736267.hdr.grayed = 0;
c_736267.tag = closureN_tag;
 c_736267.fn = (function_type)__lambda_170;
c_736267.num_args = 1;
c_736267.num_elements = 3;
c_736267.elements = (object *)e_736313;
c_736267.elements[0] = k_73223_731427;
c_736267.elements[1] = k_732447;
c_736267.elements[2] = lis_73222_731426;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_736267, primitive_integer_127, k_73223_731427, __glo_drop_srfi_1);; 
}

static void __lambda_170(void *data, object self_733863, int argc, object *args) /* object self_733863, object r_732448 */
 {

  
closureN_type c_736269;
object e_736310 [1];
c_736269.hdr.mark = gc_color_red;
 c_736269.hdr.grayed = 0;
c_736269.tag = closureN_tag;
 c_736269.fn = (function_type)__lambda_171;
c_736269.num_args = 2;
c_736269.num_elements = 1;
c_736269.elements = (object *)e_736310;
c_736269.elements[0] = ((closureN)self_733863)->elements[1];

return_direct_with_clo2(data,(closure)&c_736269,__lambda_171,  ((closureN)self_733863)->elements[2], ((closureN)self_733863)->elements[0]);; 
}

static void __lambda_171(void *data, object self_733864, int argc, object *args) /* object self_733864, object lis_73225_731428, object k_73226_731429 */
 {
 object lis_73225_731428 = args[0]; object k_73226_731429 = args[1];
  
closureN_type c_736271;
object e_736309 [3];
c_736271.hdr.mark = gc_color_red;
 c_736271.hdr.grayed = 0;
c_736271.tag = closureN_tag;
 c_736271.fn = (function_type)__lambda_172;
c_736271.num_args = 1;
c_736271.num_elements = 3;
c_736271.elements = (object *)e_736309;
c_736271.elements[0] = k_73226_731429;
c_736271.elements[1] = ((closureN)self_733864)->elements[0];
c_736271.elements[2] = lis_73225_731428;

return_direct_with_clo1(data,(closure)&c_736271,__lambda_172,  boolean_f);; 
}

static void __lambda_172(void *data, object self_733865, int argc, object *args) /* object self_733865, object iter_73227_731430 */
 {
 object iter_73227_731430 = args[0];
  
closureN_type c_736273;
object e_736305 [3];
c_736273.hdr.mark = gc_color_red;
 c_736273.hdr.grayed = 0;
c_736273.tag = closureN_tag;
 c_736273.fn = (function_type)__lambda_1141;
c_736273.num_args = 1;
c_736273.num_elements = 3;
c_736273.elements = (object *)e_736305;
c_736273.elements[0] = ((closureN)self_733865)->elements[0];
c_736273.elements[1] = ((closureN)self_733865)->elements[1];
c_736273.elements[2] = ((closureN)self_733865)->elements[2];


pair_type local_736308; 
return_direct_with_clo1(data,(closure)&c_736273,__lambda_1141,  set_cell_as_expr(&local_736308, iter_73227_731430));; 
}

static void __lambda_1141(void *data, object self_733866, int argc, object *args) /* object self_733866, object iter_73227_731430 */
 {
 object iter_73227_731430 = args[0];
  
closureN_type c_736275;
object e_736289 [4];
c_736275.hdr.mark = gc_color_red;
 c_736275.hdr.grayed = 0;
c_736275.tag = closureN_tag;
 c_736275.fn = (function_type)__lambda_173;
c_736275.num_args = 1;
c_736275.num_elements = 4;
c_736275.elements = (object *)e_736289;
c_736275.elements[0] = iter_73227_731430;
c_736275.elements[1] = ((closureN)self_733866)->elements[0];
c_736275.elements[2] = ((closureN)self_733866)->elements[1];
c_736275.elements[3] = ((closureN)self_733866)->elements[2];


closureN_type c_736290;
object e_736304 [1];
c_736290.hdr.mark = gc_color_red;
 c_736290.hdr.grayed = 0;
c_736290.tag = closureN_tag;
 c_736290.fn = (function_type)__lambda_175;
c_736290.num_args = 2;
c_736290.num_elements = 1;
c_736290.elements = (object *)e_736304;
c_736290.elements[0] = iter_73227_731430;

return_direct_with_clo1(data,(closure)&c_736275,__lambda_173,  &c_736290);; 
}

static void __lambda_175(void *data, object self_733867, int argc, object *args) /* object self_733867, object k_732451, object lis_73228_731431, object k_73229_731432 */
 {
 object k_732451 = args[0]; object lis_73228_731431 = args[1]; object k_73229_731432 = args[2];
    complex_num_type local_736293; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_zero_127_191_191inline_191_191_scheme_base)->fn)(data,&local_736293, k_73229_731432)) ){ 
  return_direct_with_clo1(data,  k_732451, (((closure)  k_732451)->fn),  lis_73228_731431);
} else { 
  




complex_num_type local_736303; 
return_closcall3(data,  car(((closureN)self_733867)->elements[0]),  k_732451, Cyc_cdr(data, lis_73228_731431), Cyc_fast_sub(data,&local_736303, k_73229_731432, obj_int2obj(1)));}
;; 
}

static void __lambda_173(void *data, object self_733868, int argc, object *args) /* object self_733868, object r_732450 */
 {
 object r_732450 = args[0];
  
closureN_type c_736277;
object e_736285 [4];
c_736277.hdr.mark = gc_color_red;
 c_736277.hdr.grayed = 0;
c_736277.tag = closureN_tag;
 c_736277.fn = (function_type)__lambda_174;
c_736277.num_args = 1;
c_736277.num_elements = 4;
c_736277.elements = (object *)e_736285;
c_736277.elements[0] = ((closureN)self_733868)->elements[0];
c_736277.elements[1] = ((closureN)self_733868)->elements[1];
c_736277.elements[2] = ((closureN)self_733868)->elements[2];
c_736277.elements[3] = ((closureN)self_733868)->elements[3];



return_direct_with_clo1(data,(closure)&c_736277,__lambda_174,  Cyc_set_cell(data, ((closureN)self_733868)->elements[0], r_732450));; 
}

static void __lambda_174(void *data, object self_733869, int argc, object *args) /* object self_733869, object r_732449 */
 {

  

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

static void __lambda_161(void *data, object _, int argc, object *args) /* closure _,object k_732435, object lis_73214_731419, object k_73215_731420 */
 {
object k_732435 = args[0]; object lis_73214_731419 = args[1]; object k_73215_731420 = args[2];
  Cyc_st_add(data, "srfi/1.sld:take");

closureN_type c_736208;
object e_736264 [3];
c_736208.hdr.mark = gc_color_red;
 c_736208.hdr.grayed = 0;
c_736208.tag = closureN_tag;
 c_736208.fn = (function_type)__lambda_162;
c_736208.num_args = 1;
c_736208.num_elements = 3;
c_736208.elements = (object *)e_736264;
c_736208.elements[0] = k_73215_731420;
c_736208.elements[1] = k_732435;
c_736208.elements[2] = lis_73214_731419;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_736208, primitive_integer_127, k_73215_731420, __glo_take_srfi_1);; 
}

static void __lambda_162(void *data, object self_733855, int argc, object *args) /* object self_733855, object r_732436 */
 {

  
closureN_type c_736210;
object e_736261 [1];
c_736210.hdr.mark = gc_color_red;
 c_736210.hdr.grayed = 0;
c_736210.tag = closureN_tag;
 c_736210.fn = (function_type)__lambda_163;
c_736210.num_args = 2;
c_736210.num_elements = 1;
c_736210.elements = (object *)e_736261;
c_736210.elements[0] = ((closureN)self_733855)->elements[1];

return_direct_with_clo2(data,(closure)&c_736210,__lambda_163,  ((closureN)self_733855)->elements[2], ((closureN)self_733855)->elements[0]);; 
}

static void __lambda_163(void *data, object self_733856, int argc, object *args) /* object self_733856, object lis_73217_731421, object k_73218_731422 */
 {
 object lis_73217_731421 = args[0]; object k_73218_731422 = args[1];
  
closureN_type c_736212;
object e_736260 [3];
c_736212.hdr.mark = gc_color_red;
 c_736212.hdr.grayed = 0;
c_736212.tag = closureN_tag;
 c_736212.fn = (function_type)__lambda_164;
c_736212.num_args = 1;
c_736212.num_elements = 3;
c_736212.elements = (object *)e_736260;
c_736212.elements[0] = k_73218_731422;
c_736212.elements[1] = ((closureN)self_733856)->elements[0];
c_736212.elements[2] = lis_73217_731421;

return_direct_with_clo1(data,(closure)&c_736212,__lambda_164,  boolean_f);; 
}

static void __lambda_164(void *data, object self_733857, int argc, object *args) /* object self_733857, object recur_73219_731423 */
 {
 object recur_73219_731423 = args[0];
  
closureN_type c_736214;
object e_736256 [3];
c_736214.hdr.mark = gc_color_red;
 c_736214.hdr.grayed = 0;
c_736214.tag = closureN_tag;
 c_736214.fn = (function_type)__lambda_1140;
c_736214.num_args = 1;
c_736214.num_elements = 3;
c_736214.elements = (object *)e_736256;
c_736214.elements[0] = ((closureN)self_733857)->elements[0];
c_736214.elements[1] = ((closureN)self_733857)->elements[1];
c_736214.elements[2] = ((closureN)self_733857)->elements[2];


pair_type local_736259; 
return_direct_with_clo1(data,(closure)&c_736214,__lambda_1140,  set_cell_as_expr(&local_736259, recur_73219_731423));; 
}

static void __lambda_1140(void *data, object self_733858, int argc, object *args) /* object self_733858, object recur_73219_731423 */
 {
 object recur_73219_731423 = args[0];
  
closureN_type c_736216;
object e_736230 [4];
c_736216.hdr.mark = gc_color_red;
 c_736216.hdr.grayed = 0;
c_736216.tag = closureN_tag;
 c_736216.fn = (function_type)__lambda_165;
c_736216.num_args = 1;
c_736216.num_elements = 4;
c_736216.elements = (object *)e_736230;
c_736216.elements[0] = ((closureN)self_733858)->elements[0];
c_736216.elements[1] = ((closureN)self_733858)->elements[1];
c_736216.elements[2] = ((closureN)self_733858)->elements[2];
c_736216.elements[3] = recur_73219_731423;


closureN_type c_736231;
object e_736255 [1];
c_736231.hdr.mark = gc_color_red;
 c_736231.hdr.grayed = 0;
c_736231.tag = closureN_tag;
 c_736231.fn = (function_type)__lambda_167;
c_736231.num_args = 2;
c_736231.num_elements = 1;
c_736231.elements = (object *)e_736255;
c_736231.elements[0] = recur_73219_731423;

return_direct_with_clo1(data,(closure)&c_736216,__lambda_165,  &c_736231);; 
}

static void __lambda_167(void *data, object self_733859, int argc, object *args) /* object self_733859, object k_732439, object lis_73220_731424, object k_73221_731425 */
 {
 object k_732439 = args[0]; object lis_73220_731424 = args[1]; object k_73221_731425 = args[2];
    complex_num_type local_736234; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_zero_127_191_191inline_191_191_scheme_base)->fn)(data,&local_736234, k_73221_731425)) ){ 
  return_direct_with_clo1(data,  k_732439, (((closure)  k_732439)->fn),  NULL);
} else { 
  


closureN_type c_736240;
object e_736249 [2];
c_736240.hdr.mark = gc_color_red;
 c_736240.hdr.grayed = 0;
c_736240.tag = closureN_tag;
 c_736240.fn = (function_type)__lambda_168;
c_736240.num_args = 1;
c_736240.num_elements = 2;
c_736240.elements = (object *)e_736249;
c_736240.elements[0] = k_732439;
c_736240.elements[1] = lis_73220_731424;




complex_num_type local_736254; 
return_closcall3(data,  car(((closureN)self_733859)->elements[0]),  &c_736240, Cyc_cdr(data, lis_73220_731424), Cyc_fast_sub(data,&local_736254, k_73221_731425, obj_int2obj(1)));}
;; 
}

static void __lambda_168(void *data, object self_733860, int argc, object *args) /* object self_733860, object r_732442 */
 {
 object r_732442 = args[0];
  
pair_type local_736245; 


return_direct_with_clo1(data,  ((closureN)self_733860)->elements[0], (((closure)  ((closureN)self_733860)->elements[0])->fn),  set_pair_as_expr(&local_736245, Cyc_car(data, ((closureN)self_733860)->elements[1]), r_732442));; 
}

static void __lambda_165(void *data, object self_733861, int argc, object *args) /* object self_733861, object r_732438 */
 {
 object r_732438 = args[0];
  
closureN_type c_736218;
object e_736226 [4];
c_736218.hdr.mark = gc_color_red;
 c_736218.hdr.grayed = 0;
c_736218.tag = closureN_tag;
 c_736218.fn = (function_type)__lambda_166;
c_736218.num_args = 1;
c_736218.num_elements = 4;
c_736218.elements = (object *)e_736226;
c_736218.elements[0] = ((closureN)self_733861)->elements[0];
c_736218.elements[1] = ((closureN)self_733861)->elements[1];
c_736218.elements[2] = ((closureN)self_733861)->elements[2];
c_736218.elements[3] = ((closureN)self_733861)->elements[3];



return_direct_with_clo1(data,(closure)&c_736218,__lambda_166,  Cyc_set_cell(data, ((closureN)self_733861)->elements[3], r_732438));; 
}

static void __lambda_166(void *data, object self_733862, int argc, object *args) /* object self_733862, object r_732437 */
 {

  

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

static void __lambda_160(void *data, object _, int argc, object *args) /* closure _,object k_732430, object pair_73213_731418 */
 {
object k_732430 = args[0]; object pair_73213_731418 = args[1];
  Cyc_st_add(data, "srfi/1.sld:car+cdr");




return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_732430, Cyc_car(data, pair_73213_731418), Cyc_cdr(data, pair_73213_731418));; 
}

static object __lambda_1218(void *data, object ptr,object x_73212_731417) {

  Cyc_st_add(data, "srfi/1.sld:tenth");






return_copy(ptr,  Cyc_cadr(data, Cyc_cddddr(data, Cyc_cddddr(data, x_73212_731417))));; 
}

static void __lambda_159(void *data, object _, int argc, object *args) /* closure _,object k_732425, object x_73212_731417 */
 {
object k_732425 = args[0]; object x_73212_731417 = args[1];
  Cyc_st_add(data, "srfi/1.sld:tenth");






return_direct_with_clo1(data,  k_732425, (((closure)  k_732425)->fn),  Cyc_cadr(data, Cyc_cddddr(data, Cyc_cddddr(data, x_73212_731417))));; 
}

static object __lambda_1217(void *data, object ptr,object x_73211_731416) {

  Cyc_st_add(data, "srfi/1.sld:ninth");






return_copy(ptr,  Cyc_car(data, Cyc_cddddr(data, Cyc_cddddr(data, x_73211_731416))));; 
}

static void __lambda_158(void *data, object _, int argc, object *args) /* closure _,object k_732420, object x_73211_731416 */
 {
object k_732420 = args[0]; object x_73211_731416 = args[1];
  Cyc_st_add(data, "srfi/1.sld:ninth");






return_direct_with_clo1(data,  k_732420, (((closure)  k_732420)->fn),  Cyc_car(data, Cyc_cddddr(data, Cyc_cddddr(data, x_73211_731416))));; 
}

static object __lambda_1216(void *data, object ptr,object x_73210_731415) {

  Cyc_st_add(data, "srfi/1.sld:eighth");




return_copy(ptr,  Cyc_cadddr(data, Cyc_cddddr(data, x_73210_731415)));; 
}

static void __lambda_157(void *data, object _, int argc, object *args) /* closure _,object k_732416, object x_73210_731415 */
 {
object k_732416 = args[0]; object x_73210_731415 = args[1];
  Cyc_st_add(data, "srfi/1.sld:eighth");




return_direct_with_clo1(data,  k_732416, (((closure)  k_732416)->fn),  Cyc_cadddr(data, Cyc_cddddr(data, x_73210_731415)));; 
}

static object __lambda_1215(void *data, object ptr,object x_73209_731414) {

  Cyc_st_add(data, "srfi/1.sld:seventh");




return_copy(ptr,  Cyc_caddr(data, Cyc_cddddr(data, x_73209_731414)));; 
}

static void __lambda_156(void *data, object _, int argc, object *args) /* closure _,object k_732412, object x_73209_731414 */
 {
object k_732412 = args[0]; object x_73209_731414 = args[1];
  Cyc_st_add(data, "srfi/1.sld:seventh");




return_direct_with_clo1(data,  k_732412, (((closure)  k_732412)->fn),  Cyc_caddr(data, Cyc_cddddr(data, x_73209_731414)));; 
}

static object __lambda_1214(void *data, object ptr,object x_73208_731413) {

  Cyc_st_add(data, "srfi/1.sld:sixth");




return_copy(ptr,  Cyc_cadr(data, Cyc_cddddr(data, x_73208_731413)));; 
}

static void __lambda_155(void *data, object _, int argc, object *args) /* closure _,object k_732408, object x_73208_731413 */
 {
object k_732408 = args[0]; object x_73208_731413 = args[1];
  Cyc_st_add(data, "srfi/1.sld:sixth");




return_direct_with_clo1(data,  k_732408, (((closure)  k_732408)->fn),  Cyc_cadr(data, Cyc_cddddr(data, x_73208_731413)));; 
}

static object __lambda_1213(void *data, object ptr,object x_73207_731412) {

  Cyc_st_add(data, "srfi/1.sld:fifth");




return_copy(ptr,  Cyc_car(data, Cyc_cddddr(data, x_73207_731412)));; 
}

static void __lambda_154(void *data, object _, int argc, object *args) /* closure _,object k_732404, object x_73207_731412 */
 {
object k_732404 = args[0]; object x_73207_731412 = args[1];
  Cyc_st_add(data, "srfi/1.sld:fifth");




return_direct_with_clo1(data,  k_732404, (((closure)  k_732404)->fn),  Cyc_car(data, Cyc_cddddr(data, x_73207_731412)));; 
}

static void __lambda_153(void *data, object _, int argc, object *args) /* closure _,object k_732393, object list1_73205_731410, object more_91lists_73206_731411_raw, ... */
 {
object k_732393 = args[0]; object list1_73205_731410 = args[1];
load_varargs(more_91lists_73206_731411, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/1.sld:zip");

object c_736119 = apply_va(data,  k_732393,4,__glo_map_srfi_1, __glo__list_scheme_base, list1_73205_731410, more_91lists_73206_731411);
return_direct_with_clo1(data,  k_732393, (((closure)  k_732393)->fn),  c_736119);; 
}

static void __lambda_147(void *data, object _, int argc, object *args) /* closure _,object k_732379, object x_73190_731397 */
 {
object k_732379 = args[0]; object x_73190_731397 = args[1];
  Cyc_st_add(data, "srfi/1.sld:length+");

closureN_type c_736050;
object e_736114 [1];
c_736050.hdr.mark = gc_color_red;
 c_736050.hdr.grayed = 0;
c_736050.tag = closureN_tag;
 c_736050.fn = (function_type)__lambda_148;
c_736050.num_args = 2;
c_736050.num_elements = 1;
c_736050.elements = (object *)e_736114;
c_736050.elements[0] = k_732379;

return_direct_with_clo2(data,(closure)&c_736050,__lambda_148,  x_73190_731397, x_73190_731397);; 
}

static void __lambda_148(void *data, object self_733849, int argc, object *args) /* object self_733849, object x_73192_731398, object lag_73193_731399 */
 {
 object x_73192_731398 = args[0]; object lag_73193_731399 = args[1];
  
closureN_type c_736052;
object e_736113 [3];
c_736052.hdr.mark = gc_color_red;
 c_736052.hdr.grayed = 0;
c_736052.tag = closureN_tag;
 c_736052.fn = (function_type)__lambda_149;
c_736052.num_args = 1;
c_736052.num_elements = 3;
c_736052.elements = (object *)e_736113;
c_736052.elements[0] = ((closureN)self_733849)->elements[0];
c_736052.elements[1] = lag_73193_731399;
c_736052.elements[2] = x_73192_731398;

return_direct_with_clo1(data,(closure)&c_736052,__lambda_149,  boolean_f);; 
}

static void __lambda_149(void *data, object self_733850, int argc, object *args) /* object self_733850, object lp_73195_731401 */
 {
 object lp_73195_731401 = args[0];
  
closureN_type c_736054;
object e_736109 [3];
c_736054.hdr.mark = gc_color_red;
 c_736054.hdr.grayed = 0;
c_736054.tag = closureN_tag;
 c_736054.fn = (function_type)__lambda_1139;
c_736054.num_args = 1;
c_736054.num_elements = 3;
c_736054.elements = (object *)e_736109;
c_736054.elements[0] = ((closureN)self_733850)->elements[0];
c_736054.elements[1] = ((closureN)self_733850)->elements[1];
c_736054.elements[2] = ((closureN)self_733850)->elements[2];


pair_type local_736112; 
return_direct_with_clo1(data,(closure)&c_736054,__lambda_1139,  set_cell_as_expr(&local_736112, lp_73195_731401));; 
}

static void __lambda_1139(void *data, object self_733851, int argc, object *args) /* object self_733851, object lp_73195_731401 */
 {
 object lp_73195_731401 = args[0];
  
closureN_type c_736056;
object e_736070 [4];
c_736056.hdr.mark = gc_color_red;
 c_736056.hdr.grayed = 0;
c_736056.tag = closureN_tag;
 c_736056.fn = (function_type)__lambda_150;
c_736056.num_args = 1;
c_736056.num_elements = 4;
c_736056.elements = (object *)e_736070;
c_736056.elements[0] = ((closureN)self_733851)->elements[0];
c_736056.elements[1] = ((closureN)self_733851)->elements[1];
c_736056.elements[2] = lp_73195_731401;
c_736056.elements[3] = ((closureN)self_733851)->elements[2];


closureN_type c_736071;
object e_736108 [1];
c_736071.hdr.mark = gc_color_red;
 c_736071.hdr.grayed = 0;
c_736071.tag = closureN_tag;
 c_736071.fn = (function_type)__lambda_152;
c_736071.num_args = 3;
c_736071.num_elements = 1;
c_736071.elements = (object *)e_736108;
c_736071.elements[0] = lp_73195_731401;

return_direct_with_clo1(data,(closure)&c_736056,__lambda_150,  &c_736071);; 
}

static void __lambda_152(void *data, object self_733852, int argc, object *args) /* object self_733852, object k_732382, object x_73196_731402, object lag_73197_731403, object len_73198_731404 */
 {
 object k_732382 = args[0]; object x_73196_731402 = args[1]; object lag_73197_731403 = args[2]; object len_73198_731404 = args[3];
    
if( (boolean_f != Cyc_is_pair(x_73196_731402)) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_73196_731402))) ){ 
    
  
  
  
if( (boolean_f != Cyc_eq(Cyc_cdr(data, Cyc_cdr(data, x_73196_731402)), Cyc_cdr(data, lag_73197_731403))) ){ 
  return_direct_with_clo1(data,  k_732382, (((closure)  k_732382)->fn),  boolean_f);
} else { 
  








complex_num_type local_736099; 

complex_num_type local_736102; 
return_closcall4(data,  car(((closureN)self_733852)->elements[0]),  k_732382, Cyc_cdr(data, Cyc_cdr(data, x_73196_731402)), Cyc_cdr(data, lag_73197_731403), Cyc_fast_sum(data,&local_736099, Cyc_fast_sum(data,&local_736102, len_73198_731404, obj_int2obj(1)), obj_int2obj(1)));}
;
} else { 
  
complex_num_type local_736106; 
return_direct_with_clo1(data,  k_732382, (((closure)  k_732382)->fn),  Cyc_fast_sum(data,&local_736106, len_73198_731404, obj_int2obj(1)));}
;
} else { 
  return_direct_with_clo1(data,  k_732382, (((closure)  k_732382)->fn),  len_73198_731404);}
;; 
}

static void __lambda_150(void *data, object self_733853, int argc, object *args) /* object self_733853, object r_732381 */
 {
 object r_732381 = args[0];
  
closureN_type c_736058;
object e_736066 [4];
c_736058.hdr.mark = gc_color_red;
 c_736058.hdr.grayed = 0;
c_736058.tag = closureN_tag;
 c_736058.fn = (function_type)__lambda_151;
c_736058.num_args = 1;
c_736058.num_elements = 4;
c_736058.elements = (object *)e_736066;
c_736058.elements[0] = ((closureN)self_733853)->elements[0];
c_736058.elements[1] = ((closureN)self_733853)->elements[1];
c_736058.elements[2] = ((closureN)self_733853)->elements[2];
c_736058.elements[3] = ((closureN)self_733853)->elements[3];



return_direct_with_clo1(data,(closure)&c_736058,__lambda_151,  Cyc_set_cell(data, ((closureN)self_733853)->elements[2], r_732381));; 
}

static void __lambda_151(void *data, object self_733854, int argc, object *args) /* object self_733854, object r_732380 */
 {

  

return_closcall4(data,  car(((closureN)self_733854)->elements[2]),  ((closureN)self_733854)->elements[0], ((closureN)self_733854)->elements[3], ((closureN)self_733854)->elements[1], obj_int2obj(0));; 
}

static void __lambda_131(void *data, object _, int argc, object *args) /* closure _,object k_732355, object _123_73163_731381, object lists_73164_731382_raw, ... */
 {
object k_732355 = args[0]; object _123_73163_731381 = args[1];
load_varargs(lists_73164_731382, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/1.sld:list=");
  
if( (boolean_f != Cyc_is_null(lists_73164_731382)) ){ 
  

return_direct_with_clo1(data,  k_732355, (((closure)  k_732355)->fn),  Cyc_is_null(lists_73164_731382));
} else { 
  
closureN_type c_735911;
object e_736043 [2];
c_735911.hdr.mark = gc_color_red;
 c_735911.hdr.grayed = 0;
c_735911.tag = closureN_tag;
 c_735911.fn = (function_type)__lambda_132;
c_735911.num_args = 2;
c_735911.num_elements = 2;
c_735911.elements = (object *)e_736043;
c_735911.elements[0] = _123_73163_731381;
c_735911.elements[1] = k_732355;





return_direct_with_clo2(data,(closure)&c_735911,__lambda_132,  Cyc_car(data, lists_73164_731382), Cyc_cdr(data, lists_73164_731382));}
;; 
}

static void __lambda_132(void *data, object self_733832, int argc, object *args) /* object self_733832, object list_91a_73170_731384, object others_73171_731385 */
 {
 object list_91a_73170_731384 = args[0]; object others_73171_731385 = args[1];
  
closureN_type c_735913;
object e_736042 [4];
c_735913.hdr.mark = gc_color_red;
 c_735913.hdr.grayed = 0;
c_735913.tag = closureN_tag;
 c_735913.fn = (function_type)__lambda_133;
c_735913.num_args = 1;
c_735913.num_elements = 4;
c_735913.elements = (object *)e_736042;
c_735913.elements[0] = ((closureN)self_733832)->elements[0];
c_735913.elements[1] = ((closureN)self_733832)->elements[1];
c_735913.elements[2] = list_91a_73170_731384;
c_735913.elements[3] = others_73171_731385;

return_direct_with_clo1(data,(closure)&c_735913,__lambda_133,  boolean_f);; 
}

static void __lambda_133(void *data, object self_733833, int argc, object *args) /* object self_733833, object lp1_73172_731386 */
 {
 object lp1_73172_731386 = args[0];
  
closureN_type c_735915;
object e_736038 [4];
c_735915.hdr.mark = gc_color_red;
 c_735915.hdr.grayed = 0;
c_735915.tag = closureN_tag;
 c_735915.fn = (function_type)__lambda_1138;
c_735915.num_args = 1;
c_735915.num_elements = 4;
c_735915.elements = (object *)e_736038;
c_735915.elements[0] = ((closureN)self_733833)->elements[0];
c_735915.elements[1] = ((closureN)self_733833)->elements[1];
c_735915.elements[2] = ((closureN)self_733833)->elements[2];
c_735915.elements[3] = ((closureN)self_733833)->elements[3];


pair_type local_736041; 
return_direct_with_clo1(data,(closure)&c_735915,__lambda_1138,  set_cell_as_expr(&local_736041, lp1_73172_731386));; 
}

static void __lambda_1138(void *data, object self_733834, int argc, object *args) /* object self_733834, object lp1_73172_731386 */
 {
 object lp1_73172_731386 = args[0];
  
closureN_type c_735917;
object e_735931 [4];
c_735917.hdr.mark = gc_color_red;
 c_735917.hdr.grayed = 0;
c_735917.tag = closureN_tag;
 c_735917.fn = (function_type)__lambda_134;
c_735917.num_args = 1;
c_735917.num_elements = 4;
c_735917.elements = (object *)e_735931;
c_735917.elements[0] = ((closureN)self_733834)->elements[1];
c_735917.elements[1] = ((closureN)self_733834)->elements[2];
c_735917.elements[2] = lp1_73172_731386;
c_735917.elements[3] = ((closureN)self_733834)->elements[3];


closureN_type c_735932;
object e_736037 [2];
c_735932.hdr.mark = gc_color_red;
 c_735932.hdr.grayed = 0;
c_735932.tag = closureN_tag;
 c_735932.fn = (function_type)__lambda_136;
c_735932.num_args = 2;
c_735932.num_elements = 2;
c_735932.elements = (object *)e_736037;
c_735932.elements[0] = ((closureN)self_733834)->elements[0];
c_735932.elements[1] = lp1_73172_731386;

return_direct_with_clo1(data,(closure)&c_735917,__lambda_134,  &c_735932);; 
}

static void __lambda_136(void *data, object self_733835, int argc, object *args) /* object self_733835, object k_732361, object list_91a_73173_731387, object others_73174_731388 */
 {
 object k_732361 = args[0]; object list_91a_73173_731387 = args[1]; object others_73174_731388 = args[2];
    
if( (boolean_f != Cyc_is_null(others_73174_731388)) ){ 
  

return_direct_with_clo1(data,  k_732361, (((closure)  k_732361)->fn),  Cyc_is_null(others_73174_731388));
} else { 
  
closureN_type c_735939;
object e_736032 [5];
c_735939.hdr.mark = gc_color_red;
 c_735939.hdr.grayed = 0;
c_735939.tag = closureN_tag;
 c_735939.fn = (function_type)__lambda_137;
c_735939.num_args = 1;
c_735939.num_elements = 5;
c_735939.elements = (object *)e_736032;
c_735939.elements[0] = ((closureN)self_733835)->elements[0];
c_735939.elements[1] = k_732361;
c_735939.elements[2] = list_91a_73173_731387;
c_735939.elements[3] = ((closureN)self_733835)->elements[1];
c_735939.elements[4] = others_73174_731388;





return_direct_with_clo1(data,(closure)&c_735939,__lambda_137,  Cyc_eq(list_91a_73173_731387, Cyc_car(data, others_73174_731388)));}
;; 
}

static void __lambda_137(void *data, object self_733836, int argc, object *args) /* object self_733836, object r_732365 */
 {
 object r_732365 = args[0];
  if( (boolean_f != r_732365) ){ 
  





return_closcall3(data,  car(((closureN)self_733836)->elements[3]),  ((closureN)self_733836)->elements[1], Cyc_car(data, ((closureN)self_733836)->elements[4]), Cyc_cdr(data, ((closureN)self_733836)->elements[4]));
} else { 
  
closureN_type c_735952;
object e_736027 [4];
c_735952.hdr.mark = gc_color_red;
 c_735952.hdr.grayed = 0;
c_735952.tag = closureN_tag;
 c_735952.fn = (function_type)__lambda_138;
c_735952.num_args = 2;
c_735952.num_elements = 4;
c_735952.elements = (object *)e_736027;
c_735952.elements[0] = ((closureN)self_733836)->elements[0];
c_735952.elements[1] = ((closureN)self_733836)->elements[1];
c_735952.elements[2] = ((closureN)self_733836)->elements[3];
c_735952.elements[3] = ((closureN)self_733836)->elements[4];



return_direct_with_clo2(data,(closure)&c_735952,__lambda_138,  ((closureN)self_733836)->elements[2], Cyc_car(data, ((closureN)self_733836)->elements[4]));}
;; 
}

static void __lambda_138(void *data, object self_733837, int argc, object *args) /* object self_733837, object list_91a_73182_731392, object list_91b_73183_731393 */
 {
 object list_91a_73182_731392 = args[0]; object list_91b_73183_731393 = args[1];
  
closureN_type c_735954;
object e_736026 [6];
c_735954.hdr.mark = gc_color_red;
 c_735954.hdr.grayed = 0;
c_735954.tag = closureN_tag;
 c_735954.fn = (function_type)__lambda_139;
c_735954.num_args = 1;
c_735954.num_elements = 6;
c_735954.elements = (object *)e_736026;
c_735954.elements[0] = ((closureN)self_733837)->elements[0];
c_735954.elements[1] = ((closureN)self_733837)->elements[1];
c_735954.elements[2] = list_91a_73182_731392;
c_735954.elements[3] = list_91b_73183_731393;
c_735954.elements[4] = ((closureN)self_733837)->elements[2];
c_735954.elements[5] = ((closureN)self_733837)->elements[3];

return_direct_with_clo1(data,(closure)&c_735954,__lambda_139,  boolean_f);; 
}

static void __lambda_139(void *data, object self_733838, int argc, object *args) /* object self_733838, object lp2_73184_731394 */
 {
 object lp2_73184_731394 = args[0];
  
closureN_type c_735956;
object e_736022 [6];
c_735956.hdr.mark = gc_color_red;
 c_735956.hdr.grayed = 0;
c_735956.tag = closureN_tag;
 c_735956.fn = (function_type)__lambda_1137;
c_735956.num_args = 1;
c_735956.num_elements = 6;
c_735956.elements = (object *)e_736022;
c_735956.elements[0] = ((closureN)self_733838)->elements[0];
c_735956.elements[1] = ((closureN)self_733838)->elements[1];
c_735956.elements[2] = ((closureN)self_733838)->elements[2];
c_735956.elements[3] = ((closureN)self_733838)->elements[3];
c_735956.elements[4] = ((closureN)self_733838)->elements[4];
c_735956.elements[5] = ((closureN)self_733838)->elements[5];


pair_type local_736025; 
return_direct_with_clo1(data,(closure)&c_735956,__lambda_1137,  set_cell_as_expr(&local_736025, lp2_73184_731394));; 
}

static void __lambda_1137(void *data, object self_733839, int argc, object *args) /* object self_733839, object lp2_73184_731394 */
 {
 object lp2_73184_731394 = args[0];
  
closureN_type c_735958;
object e_735972 [4];
c_735958.hdr.mark = gc_color_red;
 c_735958.hdr.grayed = 0;
c_735958.tag = closureN_tag;
 c_735958.fn = (function_type)__lambda_140;
c_735958.num_args = 1;
c_735958.num_elements = 4;
c_735958.elements = (object *)e_735972;
c_735958.elements[0] = ((closureN)self_733839)->elements[1];
c_735958.elements[1] = ((closureN)self_733839)->elements[2];
c_735958.elements[2] = ((closureN)self_733839)->elements[3];
c_735958.elements[3] = lp2_73184_731394;


closureN_type c_735973;
object e_736021 [4];
c_735973.hdr.mark = gc_color_red;
 c_735973.hdr.grayed = 0;
c_735973.tag = closureN_tag;
 c_735973.fn = (function_type)__lambda_142;
c_735973.num_args = 2;
c_735973.num_elements = 4;
c_735973.elements = (object *)e_736021;
c_735973.elements[0] = ((closureN)self_733839)->elements[0];
c_735973.elements[1] = ((closureN)self_733839)->elements[4];
c_735973.elements[2] = lp2_73184_731394;
c_735973.elements[3] = ((closureN)self_733839)->elements[5];

return_direct_with_clo1(data,(closure)&c_735958,__lambda_140,  &c_735973);; 
}

static void __lambda_142(void *data, object self_733840, int argc, object *args) /* object self_733840, object k_732368, object list_91a_73185_731395, object list_91b_73186_731396 */
 {
 object k_732368 = args[0]; object list_91a_73185_731395 = args[1]; object list_91b_73186_731396 = args[2];
  
closureN_type c_735975;
object e_736020 [7];
c_735975.hdr.mark = gc_color_red;
 c_735975.hdr.grayed = 0;
c_735975.tag = closureN_tag;
 c_735975.fn = (function_type)__lambda_143;
c_735975.num_args = 1;
c_735975.num_elements = 7;
c_735975.elements = (object *)e_736020;
c_735975.elements[0] = ((closureN)self_733840)->elements[0];
c_735975.elements[1] = k_732368;
c_735975.elements[2] = list_91a_73185_731395;
c_735975.elements[3] = list_91b_73186_731396;
c_735975.elements[4] = ((closureN)self_733840)->elements[1];
c_735975.elements[5] = ((closureN)self_733840)->elements[2];
c_735975.elements[6] = ((closureN)self_733840)->elements[3];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_735975, list_91a_73185_731395);; 
}

static void __lambda_143(void *data, object self_733841, int argc, object *args) /* object self_733841, object r_732369 */
 {
 object r_732369 = args[0];
  if( (boolean_f != r_732369) ){ 
  
closureN_type c_735977;
object e_735989 [4];
c_735977.hdr.mark = gc_color_red;
 c_735977.hdr.grayed = 0;
c_735977.tag = closureN_tag;
 c_735977.fn = (function_type)__lambda_144;
c_735977.num_args = 1;
c_735977.num_elements = 4;
c_735977.elements = (object *)e_735989;
c_735977.elements[0] = ((closureN)self_733841)->elements[1];
c_735977.elements[1] = ((closureN)self_733841)->elements[3];
c_735977.elements[2] = ((closureN)self_733841)->elements[4];
c_735977.elements[3] = ((closureN)self_733841)->elements[6];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_735977, ((closureN)self_733841)->elements[3]);
} else { 
  
closureN_type c_735992;
object e_736018 [5];
c_735992.hdr.mark = gc_color_red;
 c_735992.hdr.grayed = 0;
c_735992.tag = closureN_tag;
 c_735992.fn = (function_type)__lambda_145;
c_735992.num_args = 1;
c_735992.num_elements = 5;
c_735992.elements = (object *)e_736018;
c_735992.elements[0] = ((closureN)self_733841)->elements[0];
c_735992.elements[1] = ((closureN)self_733841)->elements[1];
c_735992.elements[2] = ((closureN)self_733841)->elements[2];
c_735992.elements[3] = ((closureN)self_733841)->elements[3];
c_735992.elements[4] = ((closureN)self_733841)->elements[5];

return_direct_with_clo2(data,  __glo_null_91list_127_srfi_1, (((closure)  __glo_null_91list_127_srfi_1)->fn),  &c_735992, ((closureN)self_733841)->elements[3]);}
;; 
}

static void __lambda_145(void *data, object self_733843, int argc, object *args) /* object self_733843, object r_732371 */
 {
 object r_732371 = args[0];
  if( (boolean_f != r_732371) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733843)->elements[1], (((closure)  ((closureN)self_733843)->elements[1])->fn),  boolean_f);
} else { 
  
closureN_type c_735997;
object e_736011 [4];
c_735997.hdr.mark = gc_color_red;
 c_735997.hdr.grayed = 0;
c_735997.tag = closureN_tag;
 c_735997.fn = (function_type)__lambda_146;
c_735997.num_args = 1;
c_735997.num_elements = 4;
c_735997.elements = (object *)e_736011;
c_735997.elements[0] = ((closureN)self_733843)->elements[1];
c_735997.elements[1] = ((closureN)self_733843)->elements[2];
c_735997.elements[2] = ((closureN)self_733843)->elements[3];
c_735997.elements[3] = ((closureN)self_733843)->elements[4];





return_closcall3(data,  ((closureN)self_733843)->elements[0],  &c_735997, Cyc_car(data, ((closureN)self_733843)->elements[2]), Cyc_car(data, ((closureN)self_733843)->elements[3]));}
;; 
}

static void __lambda_146(void *data, object self_733844, int argc, object *args) /* object self_733844, object r_732372 */
 {
 object r_732372 = args[0];
  if( (boolean_f != r_732372) ){ 
  





return_closcall3(data,  car(((closureN)self_733844)->elements[3]),  ((closureN)self_733844)->elements[0], Cyc_cdr(data, ((closureN)self_733844)->elements[1]), Cyc_cdr(data, ((closureN)self_733844)->elements[2]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733844)->elements[0], (((closure)  ((closureN)self_733844)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_144(void *data, object self_733842, int argc, object *args) /* object self_733842, object r_732370 */
 {
 object r_732370 = args[0];
  if( (boolean_f != r_732370) ){ 
  



return_closcall3(data,  car(((closureN)self_733842)->elements[2]),  ((closureN)self_733842)->elements[0], ((closureN)self_733842)->elements[1], Cyc_cdr(data, ((closureN)self_733842)->elements[3]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_733842)->elements[0], (((closure)  ((closureN)self_733842)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_140(void *data, object self_733845, int argc, object *args) /* object self_733845, object r_732367 */
 {
 object r_732367 = args[0];
  
closureN_type c_735960;
object e_735968 [4];
c_735960.hdr.mark = gc_color_red;
 c_735960.hdr.grayed = 0;
c_735960.tag = closureN_tag;
 c_735960.fn = (function_type)__lambda_141;
c_735960.num_args = 1;
c_735960.num_elements = 4;
c_735960.elements = (object *)e_735968;
c_735960.elements[0] = ((closureN)self_733845)->elements[0];
c_735960.elements[1] = ((closureN)self_733845)->elements[1];
c_735960.elements[2] = ((closureN)self_733845)->elements[2];
c_735960.elements[3] = ((closureN)self_733845)->elements[3];



return_direct_with_clo1(data,(closure)&c_735960,__lambda_141,  Cyc_set_cell(data, ((closureN)self_733845)->elements[3], r_732367));; 
}

static void __lambda_141(void *data, object self_733846, int argc, object *args) /* object self_733846, object r_732366 */
 {

  

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

static void __lambda_134(void *data, object self_733847, int argc, object *args) /* object self_733847, object r_732360 */
 {
 object r_732360 = args[0];
  
closureN_type c_735919;
object e_735927 [4];
c_735919.hdr.mark = gc_color_red;
 c_735919.hdr.grayed = 0;
c_735919.tag = closureN_tag;
 c_735919.fn = (function_type)__lambda_135;
c_735919.num_args = 1;
c_735919.num_elements = 4;
c_735919.elements = (object *)e_735927;
c_735919.elements[0] = ((closureN)self_733847)->elements[0];
c_735919.elements[1] = ((closureN)self_733847)->elements[1];
c_735919.elements[2] = ((closureN)self_733847)->elements[2];
c_735919.elements[3] = ((closureN)self_733847)->elements[3];



return_direct_with_clo1(data,(closure)&c_735919,__lambda_135,  Cyc_set_cell(data, ((closureN)self_733847)->elements[2], r_732360));; 
}

static void __lambda_135(void *data, object self_733848, int argc, object *args) /* object self_733848, object r_732359 */
 {

  

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

static void __lambda_130(void *data, object _, int argc, object *args) /* closure _,object k_732350, object l_73155_731380 */
 {
object k_732350 = args[0]; object l_73155_731380 = args[1];
  Cyc_st_add(data, "srfi/1.sld:null-list?");
  
if( (boolean_f != Cyc_is_pair(l_73155_731380)) ){ 
  return_direct_with_clo1(data,  k_732350, (((closure)  k_732350)->fn),  boolean_f);
} else { 
    
if( (boolean_f != Cyc_is_null(l_73155_731380)) ){ 
  return_direct_with_clo1(data,  k_732350, (((closure)  k_732350)->fn),  boolean_t);
} else { 
  
make_utf8_string_with_len(c_735903, "null-list\?: argument out of domain", 34, 34);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_732350, &c_735903, l_73155_731380);}
;}
;; 
}

static object __lambda_1212(void *data, object ptr,object x_73154_731379) {

  Cyc_st_add(data, "srfi/1.sld:not-pair?");

complex_num_type local_735892; 


return_copy(ptr,  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_735892, Cyc_is_pair(x_73154_731379)));; 
}

static void __lambda_129(void *data, object _, int argc, object *args) /* closure _,object k_732346, object x_73154_731379 */
 {
object k_732346 = args[0]; object x_73154_731379 = args[1];
  Cyc_st_add(data, "srfi/1.sld:not-pair?");

complex_num_type local_735885; 


return_direct_with_clo1(data,  k_732346, (((closure)  k_732346)->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_735885, Cyc_is_pair(x_73154_731379)));; 
}

static void __lambda_123(void *data, object _, int argc, object *args) /* closure _,object k_732334, object x_73138_731369 */
 {
object k_732334 = args[0]; object x_73138_731369 = args[1];
  Cyc_st_add(data, "srfi/1.sld:circular-list?");

closureN_type c_735817;
object e_735880 [1];
c_735817.hdr.mark = gc_color_red;
 c_735817.hdr.grayed = 0;
c_735817.tag = closureN_tag;
 c_735817.fn = (function_type)__lambda_124;
c_735817.num_args = 2;
c_735817.num_elements = 1;
c_735817.elements = (object *)e_735880;
c_735817.elements[0] = k_732334;

return_direct_with_clo2(data,(closure)&c_735817,__lambda_124,  x_73138_731369, x_73138_731369);; 
}

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

return_direct_with_clo1(data,(closure)&c_735819,__lambda_125,  boolean_f);; 
}

static void __lambda_125(void *data, object self_733827, int argc, object *args) /* object self_733827, object lp_73142_731372 */
 {
 object lp_73142_731372 = args[0];
  
closureN_type c_735821;
object e_735875 [3];
c_735821.hdr.mark = gc_color_red;
 c_735821.hdr.grayed = 0;
c_735821.tag = closureN_tag;
 c_735821.fn = (function_type)__lambda_1136;
c_735821.num_args = 1;
c_735821.num_elements = 3;
c_735821.elements = (object *)e_735875;
c_735821.elements[0] = ((closureN)self_733827)->elements[0];
c_735821.elements[1] = ((closureN)self_733827)->elements[1];
c_735821.elements[2] = ((closureN)self_733827)->elements[2];


pair_type local_735878; 
return_direct_with_clo1(data,(closure)&c_735821,__lambda_1136,  set_cell_as_expr(&local_735878, lp_73142_731372));; 
}

static void __lambda_1136(void *data, object self_733828, int argc, object *args) /* object self_733828, object lp_73142_731372 */
 {
 object lp_73142_731372 = args[0];
  
closureN_type c_735823;
object e_735837 [4];
c_735823.hdr.mark = gc_color_red;
 c_735823.hdr.grayed = 0;
c_735823.tag = closureN_tag;
 c_735823.fn = (function_type)__lambda_126;
c_735823.num_args = 1;
c_735823.num_elements = 4;
c_735823.elements = (object *)e_735837;
c_735823.elements[0] = ((closureN)self_733828)->elements[0];
c_735823.elements[1] = ((closureN)self_733828)->elements[1];
c_735823.elements[2] = lp_73142_731372;
c_735823.elements[3] = ((closureN)self_733828)->elements[2];


closureN_type c_735838;
object e_735874 [1];
c_735838.hdr.mark = gc_color_red;
 c_735838.hdr.grayed = 0;
c_735838.tag = closureN_tag;
 c_735838.fn = (function_type)__lambda_128;
c_735838.num_args = 2;
c_735838.num_elements = 1;
c_735838.elements = (object *)e_735874;
c_735838.elements[0] = lp_73142_731372;

return_direct_with_clo1(data,(closure)&c_735823,__lambda_126,  &c_735838);; 
}

static void __lambda_128(void *data, object self_733829, int argc, object *args) /* object self_733829, object k_732337, object x_73143_731373, object lag_73144_731374 */
 {
 object k_732337 = args[0]; object x_73143_731373 = args[1]; object lag_73144_731374 = args[2];
    
if( (boolean_f != Cyc_is_pair(x_73143_731373)) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_73143_731373))) ){ 
    
  
  
  
if( (boolean_f != Cyc_eq(Cyc_cdr(data, Cyc_cdr(data, x_73143_731373)), Cyc_cdr(data, lag_73144_731374))) ){ 
  







return_direct_with_clo1(data,  k_732337, (((closure)  k_732337)->fn),  Cyc_eq(Cyc_cdr(data, Cyc_cdr(data, x_73143_731373)), Cyc_cdr(data, lag_73144_731374)));
} else { 
  







return_closcall3(data,  car(((closureN)self_733829)->elements[0]),  k_732337, Cyc_cdr(data, Cyc_cdr(data, x_73143_731373)), Cyc_cdr(data, lag_73144_731374));}
;
} else { 
  return_direct_with_clo1(data,  k_732337, (((closure)  k_732337)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_732337, (((closure)  k_732337)->fn),  boolean_f);}
;; 
}

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



return_direct_with_clo1(data,(closure)&c_735825,__lambda_127,  Cyc_set_cell(data, ((closureN)self_733830)->elements[2], r_732336));; 
}

static void __lambda_127(void *data, object self_733831, int argc, object *args) /* object self_733831, object r_732335 */
 {

  

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

static void __lambda_117(void *data, object _, int argc, object *args) /* closure _,object k_732320, object x_73127_731360 */
 {
object k_732320 = args[0]; object x_73127_731360 = args[1];
  Cyc_st_add(data, "srfi/1.sld:dotted-list?");

closureN_type c_735747;
object e_735814 [1];
c_735747.hdr.mark = gc_color_red;
 c_735747.hdr.grayed = 0;
c_735747.tag = closureN_tag;
 c_735747.fn = (function_type)__lambda_118;
c_735747.num_args = 2;
c_735747.num_elements = 1;
c_735747.elements = (object *)e_735814;
c_735747.elements[0] = k_732320;

return_direct_with_clo2(data,(closure)&c_735747,__lambda_118,  x_73127_731360, x_73127_731360);; 
}

static void __lambda_118(void *data, object self_733820, int argc, object *args) /* object self_733820, object x_73129_731361, object lag_73130_731362 */
 {
 object x_73129_731361 = args[0]; object lag_73130_731362 = args[1];
  
closureN_type c_735749;
object e_735813 [3];
c_735749.hdr.mark = gc_color_red;
 c_735749.hdr.grayed = 0;
c_735749.tag = closureN_tag;
 c_735749.fn = (function_type)__lambda_119;
c_735749.num_args = 1;
c_735749.num_elements = 3;
c_735749.elements = (object *)e_735813;
c_735749.elements[0] = ((closureN)self_733820)->elements[0];
c_735749.elements[1] = lag_73130_731362;
c_735749.elements[2] = x_73129_731361;

return_direct_with_clo1(data,(closure)&c_735749,__lambda_119,  boolean_f);; 
}

static void __lambda_119(void *data, object self_733821, int argc, object *args) /* object self_733821, object lp_73131_731363 */
 {
 object lp_73131_731363 = args[0];
  
closureN_type c_735751;
object e_735809 [3];
c_735751.hdr.mark = gc_color_red;
 c_735751.hdr.grayed = 0;
c_735751.tag = closureN_tag;
 c_735751.fn = (function_type)__lambda_1135;
c_735751.num_args = 1;
c_735751.num_elements = 3;
c_735751.elements = (object *)e_735809;
c_735751.elements[0] = ((closureN)self_733821)->elements[0];
c_735751.elements[1] = ((closureN)self_733821)->elements[1];
c_735751.elements[2] = ((closureN)self_733821)->elements[2];


pair_type local_735812; 
return_direct_with_clo1(data,(closure)&c_735751,__lambda_1135,  set_cell_as_expr(&local_735812, lp_73131_731363));; 
}

static void __lambda_1135(void *data, object self_733822, int argc, object *args) /* object self_733822, object lp_73131_731363 */
 {
 object lp_73131_731363 = args[0];
  
closureN_type c_735753;
object e_735767 [4];
c_735753.hdr.mark = gc_color_red;
 c_735753.hdr.grayed = 0;
c_735753.tag = closureN_tag;
 c_735753.fn = (function_type)__lambda_120;
c_735753.num_args = 1;
c_735753.num_elements = 4;
c_735753.elements = (object *)e_735767;
c_735753.elements[0] = ((closureN)self_733822)->elements[0];
c_735753.elements[1] = ((closureN)self_733822)->elements[1];
c_735753.elements[2] = lp_73131_731363;
c_735753.elements[3] = ((closureN)self_733822)->elements[2];


closureN_type c_735768;
object e_735808 [1];
c_735768.hdr.mark = gc_color_red;
 c_735768.hdr.grayed = 0;
c_735768.tag = closureN_tag;
 c_735768.fn = (function_type)__lambda_122;
c_735768.num_args = 2;
c_735768.num_elements = 1;
c_735768.elements = (object *)e_735808;
c_735768.elements[0] = lp_73131_731363;

return_direct_with_clo1(data,(closure)&c_735753,__lambda_120,  &c_735768);; 
}

static void __lambda_122(void *data, object self_733823, int argc, object *args) /* object self_733823, object k_732323, object x_73132_731364, object lag_73133_731365 */
 {
 object k_732323 = args[0]; object x_73132_731364 = args[1]; object lag_73133_731365 = args[2];
    
if( (boolean_f != Cyc_is_pair(x_73132_731364)) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_73132_731364))) ){ 
    
  
  
  
if( (boolean_f != Cyc_eq(Cyc_cdr(data, Cyc_cdr(data, x_73132_731364)), Cyc_cdr(data, lag_73133_731365))) ){ 
  return_direct_with_clo1(data,  k_732323, (((closure)  k_732323)->fn),  boolean_f);
} else { 
  







return_closcall3(data,  car(((closureN)self_733823)->elements[0]),  k_732323, Cyc_cdr(data, Cyc_cdr(data, x_73132_731364)), Cyc_cdr(data, lag_73133_731365));}
;
} else { 
  
complex_num_type local_735797; 




return_direct_with_clo1(data,  k_732323, (((closure)  k_732323)->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_735797, Cyc_is_null(Cyc_cdr(data, x_73132_731364))));}
;
} else { 
  
complex_num_type local_735805; 


return_direct_with_clo1(data,  k_732323, (((closure)  k_732323)->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_735805, Cyc_is_null(x_73132_731364)));}
;; 
}

static void __lambda_120(void *data, object self_733824, int argc, object *args) /* object self_733824, object r_732322 */
 {
 object r_732322 = args[0];
  
closureN_type c_735755;
object e_735763 [4];
c_735755.hdr.mark = gc_color_red;
 c_735755.hdr.grayed = 0;
c_735755.tag = closureN_tag;
 c_735755.fn = (function_type)__lambda_121;
c_735755.num_args = 1;
c_735755.num_elements = 4;
c_735755.elements = (object *)e_735763;
c_735755.elements[0] = ((closureN)self_733824)->elements[0];
c_735755.elements[1] = ((closureN)self_733824)->elements[1];
c_735755.elements[2] = ((closureN)self_733824)->elements[2];
c_735755.elements[3] = ((closureN)self_733824)->elements[3];



return_direct_with_clo1(data,(closure)&c_735755,__lambda_121,  Cyc_set_cell(data, ((closureN)self_733824)->elements[2], r_732322));; 
}

static void __lambda_121(void *data, object self_733825, int argc, object *args) /* object self_733825, object r_732321 */
 {

  

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

static void __lambda_111(void *data, object _, int argc, object *args) /* closure _,object k_732308, object x_73116_731351 */
 {
object k_732308 = args[0]; object x_73116_731351 = args[1];
  Cyc_st_add(data, "srfi/1.sld:proper-list?");

closureN_type c_735683;
object e_735744 [1];
c_735683.hdr.mark = gc_color_red;
 c_735683.hdr.grayed = 0;
c_735683.tag = closureN_tag;
 c_735683.fn = (function_type)__lambda_112;
c_735683.num_args = 2;
c_735683.num_elements = 1;
c_735683.elements = (object *)e_735744;
c_735683.elements[0] = k_732308;

return_direct_with_clo2(data,(closure)&c_735683,__lambda_112,  x_73116_731351, x_73116_731351);; 
}

static void __lambda_112(void *data, object self_733814, int argc, object *args) /* object self_733814, object x_73118_731352, object lag_73119_731353 */
 {
 object x_73118_731352 = args[0]; object lag_73119_731353 = args[1];
  
closureN_type c_735685;
object e_735743 [3];
c_735685.hdr.mark = gc_color_red;
 c_735685.hdr.grayed = 0;
c_735685.tag = closureN_tag;
 c_735685.fn = (function_type)__lambda_113;
c_735685.num_args = 1;
c_735685.num_elements = 3;
c_735685.elements = (object *)e_735743;
c_735685.elements[0] = ((closureN)self_733814)->elements[0];
c_735685.elements[1] = lag_73119_731353;
c_735685.elements[2] = x_73118_731352;

return_direct_with_clo1(data,(closure)&c_735685,__lambda_113,  boolean_f);; 
}

static void __lambda_113(void *data, object self_733815, int argc, object *args) /* object self_733815, object lp_73120_731354 */
 {
 object lp_73120_731354 = args[0];
  
closureN_type c_735687;
object e_735739 [3];
c_735687.hdr.mark = gc_color_red;
 c_735687.hdr.grayed = 0;
c_735687.tag = closureN_tag;
 c_735687.fn = (function_type)__lambda_1134;
c_735687.num_args = 1;
c_735687.num_elements = 3;
c_735687.elements = (object *)e_735739;
c_735687.elements[0] = ((closureN)self_733815)->elements[0];
c_735687.elements[1] = ((closureN)self_733815)->elements[1];
c_735687.elements[2] = ((closureN)self_733815)->elements[2];


pair_type local_735742; 
return_direct_with_clo1(data,(closure)&c_735687,__lambda_1134,  set_cell_as_expr(&local_735742, lp_73120_731354));; 
}

static void __lambda_1134(void *data, object self_733816, int argc, object *args) /* object self_733816, object lp_73120_731354 */
 {
 object lp_73120_731354 = args[0];
  
closureN_type c_735689;
object e_735703 [4];
c_735689.hdr.mark = gc_color_red;
 c_735689.hdr.grayed = 0;
c_735689.tag = closureN_tag;
 c_735689.fn = (function_type)__lambda_114;
c_735689.num_args = 1;
c_735689.num_elements = 4;
c_735689.elements = (object *)e_735703;
c_735689.elements[0] = ((closureN)self_733816)->elements[0];
c_735689.elements[1] = ((closureN)self_733816)->elements[1];
c_735689.elements[2] = lp_73120_731354;
c_735689.elements[3] = ((closureN)self_733816)->elements[2];


closureN_type c_735704;
object e_735738 [1];
c_735704.hdr.mark = gc_color_red;
 c_735704.hdr.grayed = 0;
c_735704.tag = closureN_tag;
 c_735704.fn = (function_type)__lambda_116;
c_735704.num_args = 2;
c_735704.num_elements = 1;
c_735704.elements = (object *)e_735738;
c_735704.elements[0] = lp_73120_731354;

return_direct_with_clo1(data,(closure)&c_735689,__lambda_114,  &c_735704);; 
}

static void __lambda_116(void *data, object self_733817, int argc, object *args) /* object self_733817, object k_732311, object x_73121_731355, object lag_73122_731356 */
 {
 object k_732311 = args[0]; object x_73121_731355 = args[1]; object lag_73122_731356 = args[2];
    
if( (boolean_f != Cyc_is_pair(x_73121_731355)) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_73121_731355))) ){ 
    
  
  
  
if( (boolean_f != Cyc_eq(Cyc_cdr(data, Cyc_cdr(data, x_73121_731355)), Cyc_cdr(data, lag_73122_731356))) ){ 
  return_direct_with_clo1(data,  k_732311, (((closure)  k_732311)->fn),  boolean_f);
} else { 
  







return_closcall3(data,  car(((closureN)self_733817)->elements[0]),  k_732311, Cyc_cdr(data, Cyc_cdr(data, x_73121_731355)), Cyc_cdr(data, lag_73122_731356));}
;
} else { 
  



return_direct_with_clo1(data,  k_732311, (((closure)  k_732311)->fn),  Cyc_is_null(Cyc_cdr(data, x_73121_731355)));}
;
} else { 
  

return_direct_with_clo1(data,  k_732311, (((closure)  k_732311)->fn),  Cyc_is_null(x_73121_731355));}
;; 
}

static void __lambda_114(void *data, object self_733818, int argc, object *args) /* object self_733818, object r_732310 */
 {
 object r_732310 = args[0];
  
closureN_type c_735691;
object e_735699 [4];
c_735691.hdr.mark = gc_color_red;
 c_735691.hdr.grayed = 0;
c_735691.tag = closureN_tag;
 c_735691.fn = (function_type)__lambda_115;
c_735691.num_args = 1;
c_735691.num_elements = 4;
c_735691.elements = (object *)e_735699;
c_735691.elements[0] = ((closureN)self_733818)->elements[0];
c_735691.elements[1] = ((closureN)self_733818)->elements[1];
c_735691.elements[2] = ((closureN)self_733818)->elements[2];
c_735691.elements[3] = ((closureN)self_733818)->elements[3];



return_direct_with_clo1(data,(closure)&c_735691,__lambda_115,  Cyc_set_cell(data, ((closureN)self_733818)->elements[2], r_732310));; 
}

static void __lambda_115(void *data, object self_733819, int argc, object *args) /* object self_733819, object r_732309 */
 {

  

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

static void __lambda_107(void *data, object _, int argc, object *args) /* closure _,object k_732302, object val1_73113_731348, object vals_73114_731349_raw, ... */
 {
object k_732302 = args[0]; object val1_73113_731348 = args[1];
load_varargs(vals_73114_731349, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/1.sld:circular-list");

closureN_type c_735663;
object e_735677 [1];
c_735663.hdr.mark = gc_color_red;
 c_735663.hdr.grayed = 0;
c_735663.tag = closureN_tag;
 c_735663.fn = (function_type)__lambda_108;
c_735663.num_args = 1;
c_735663.num_elements = 1;
c_735663.elements = (object *)e_735677;
c_735663.elements[0] = k_732302;


pair_type local_735680; 
return_direct_with_clo1(data,(closure)&c_735663,__lambda_108,  set_pair_as_expr(&local_735680, val1_73113_731348, vals_73114_731349));; 
}

static void __lambda_108(void *data, object self_733811, int argc, object *args) /* object self_733811, object ans_73115_731350 */
 {
 object ans_73115_731350 = args[0];
  
closureN_type c_735665;
object e_735676 [2];
c_735665.hdr.mark = gc_color_red;
 c_735665.hdr.grayed = 0;
c_735665.tag = closureN_tag;
 c_735665.fn = (function_type)__lambda_109;
c_735665.num_args = 1;
c_735665.num_elements = 2;
c_735665.elements = (object *)e_735676;
c_735665.elements[0] = ans_73115_731350;
c_735665.elements[1] = ((closureN)self_733811)->elements[0];

return_direct_with_clo2(data,  __glo_last_91pair_srfi_1, (((closure)  __glo_last_91pair_srfi_1)->fn),  &c_735665, ans_73115_731350);; 
}

static void __lambda_109(void *data, object self_733812, int argc, object *args) /* object self_733812, object r_732305 */
 {
 object r_732305 = args[0];
  
closureN_type c_735667;
object e_735671 [2];
c_735667.hdr.mark = gc_color_red;
 c_735667.hdr.grayed = 0;
c_735667.tag = closureN_tag;
 c_735667.fn = (function_type)__lambda_110;
c_735667.num_args = 1;
c_735667.num_elements = 2;
c_735667.elements = (object *)e_735671;
c_735667.elements[0] = ((closureN)self_733812)->elements[0];
c_735667.elements[1] = ((closureN)self_733812)->elements[1];


object c_735674 = Cyc_set_cdr_cps(data,(closure)&c_735667,r_732305, ((closureN)self_733812)->elements[0]);
return_closcall1(data,(closure)&c_735667,  c_735674);; 
}

static void __lambda_110(void *data, object self_733813, int argc, object *args) /* object self_733813, object r_732304 */
 {

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

static void __lambda_93(void *data, object _, int argc, object *args) /* closure _,object k_732276, object count_73100_731339, object maybe_91start_87step_73101_731340_raw, ... */
 {
object k_732276 = args[0]; object count_73100_731339 = args[1];
load_varargs(maybe_91start_87step_73101_731340, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/1.sld:iota");

closureN_type c_735535;
object e_735660 [3];
c_735535.hdr.mark = gc_color_red;
 c_735535.hdr.grayed = 0;
c_735535.tag = closureN_tag;
 c_735535.fn = (function_type)__lambda_94;
c_735535.num_args = 1;
c_735535.num_elements = 3;
c_735535.elements = (object *)e_735660;
c_735535.elements[0] = count_73100_731339;
c_735535.elements[1] = k_732276;
c_735535.elements[2] = maybe_91start_87step_73101_731340;

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_735535, primitive_integer_127, count_73100_731339, __glo_iota_srfi_1);; 
}

static void __lambda_94(void *data, object self_733795, int argc, object *args) /* object self_733795, object r_732277 */
 {

  
closureN_type c_735537;
object e_735545 [1];
c_735537.hdr.mark = gc_color_red;
 c_735537.hdr.grayed = 0;
c_735537.tag = closureN_tag;
 c_735537.fn = (function_type)__lambda_95;
c_735537.num_args = 0;
c_735537.num_elements = 1;
c_735537.elements = (object *)e_735545;
c_735537.elements[0] = ((closureN)self_733795)->elements[0];


closureN_type c_735546;
object e_735659 [3];
c_735546.hdr.mark = gc_color_red;
 c_735546.hdr.grayed = 0;
c_735546.tag = closureN_tag;
 c_735546.fn = (function_type)__lambda_96;
c_735546.num_args = 1;
c_735546.num_elements = 3;
c_735546.elements = (object *)e_735659;
c_735546.elements[0] = ((closureN)self_733795)->elements[0];
c_735546.elements[1] = ((closureN)self_733795)->elements[1];
c_735546.elements[2] = ((closureN)self_733795)->elements[2];

return_direct_with_clo1(data,(closure)&c_735537,__lambda_95,  &c_735546);; 
}

static void __lambda_96(void *data, object self_733796, int argc, object *args) /* object self_733796, object r_732278 */
 {

  
closureN_type c_735548;
object e_735658 [3];
c_735548.hdr.mark = gc_color_red;
 c_735548.hdr.grayed = 0;
c_735548.tag = closureN_tag;
 c_735548.fn = (function_type)__lambda_97;
c_735548.num_args = 2;
c_735548.num_elements = 3;
c_735548.elements = (object *)e_735658;
c_735548.elements[0] = ((closureN)self_733796)->elements[0];
c_735548.elements[1] = ((closureN)self_733796)->elements[1];
c_735548.elements[2] = ((closureN)self_733796)->elements[2];

return_direct_with_clo2(data,(closure)&c_735548,__lambda_97,  obj_int2obj(0), obj_int2obj(1));; 
}

static void __lambda_97(void *data, object self_733797, int argc, object *args) /* object self_733797, object start_73102_731341, object step_73103_731342 */
 {
 object start_73102_731341 = args[0]; object step_73103_731342 = args[1];
  
closureN_type c_735550;
object e_735654 [4];
c_735550.hdr.mark = gc_color_red;
 c_735550.hdr.grayed = 0;
c_735550.tag = closureN_tag;
 c_735550.fn = (function_type)__lambda_1133;
c_735550.num_args = 1;
c_735550.num_elements = 4;
c_735550.elements = (object *)e_735654;
c_735550.elements[0] = ((closureN)self_733797)->elements[0];
c_735550.elements[1] = ((closureN)self_733797)->elements[1];
c_735550.elements[2] = ((closureN)self_733797)->elements[2];
c_735550.elements[3] = step_73103_731342;


pair_type local_735657; 
return_direct_with_clo1(data,(closure)&c_735550,__lambda_1133,  set_cell_as_expr(&local_735657, start_73102_731341));; 
}

static void __lambda_1133(void *data, object self_733798, int argc, object *args) /* object self_733798, object start_73102_731341 */
 {
 object start_73102_731341 = args[0];
  
closureN_type c_735552;
object e_735649 [4];
c_735552.hdr.mark = gc_color_red;
 c_735552.hdr.grayed = 0;
c_735552.tag = closureN_tag;
 c_735552.fn = (function_type)__lambda_1132;
c_735552.num_args = 1;
c_735552.num_elements = 4;
c_735552.elements = (object *)e_735649;
c_735552.elements[0] = ((closureN)self_733798)->elements[0];
c_735552.elements[1] = ((closureN)self_733798)->elements[1];
c_735552.elements[2] = ((closureN)self_733798)->elements[2];
c_735552.elements[3] = start_73102_731341;


pair_type local_735652; 
return_direct_with_clo1(data,(closure)&c_735552,__lambda_1132,  set_cell_as_expr(&local_735652, ((closureN)self_733798)->elements[3]));; 
}

static void __lambda_1132(void *data, object self_733799, int argc, object *args) /* object self_733799, object step_73103_731342 */
 {
 object step_73103_731342 = args[0];
  
closureN_type c_735554;
object e_735583 [3];
c_735554.hdr.mark = gc_color_red;
 c_735554.hdr.grayed = 0;
c_735554.tag = closureN_tag;
 c_735554.fn = (function_type)__lambda_98;
c_735554.num_args = 0;
c_735554.num_elements = 3;
c_735554.elements = (object *)e_735583;
c_735554.elements[0] = ((closureN)self_733799)->elements[2];
c_735554.elements[1] = ((closureN)self_733799)->elements[3];
c_735554.elements[2] = step_73103_731342;


closureN_type c_735584;
object e_735648 [4];
c_735584.hdr.mark = gc_color_red;
 c_735584.hdr.grayed = 0;
c_735584.tag = closureN_tag;
 c_735584.fn = (function_type)__lambda_100;
c_735584.num_args = 1;
c_735584.num_elements = 4;
c_735584.elements = (object *)e_735648;
c_735584.elements[0] = ((closureN)self_733799)->elements[0];
c_735584.elements[1] = ((closureN)self_733799)->elements[1];
c_735584.elements[2] = ((closureN)self_733799)->elements[3];
c_735584.elements[3] = step_73103_731342;

return_direct_with_clo1(data,(closure)&c_735554,__lambda_98,  &c_735584);; 
}

static void __lambda_100(void *data, object self_733800, int argc, object *args) /* object self_733800, object r_732279 */
 {

  
closureN_type c_735586;
object e_735644 [4];
c_735586.hdr.mark = gc_color_red;
 c_735586.hdr.grayed = 0;
c_735586.tag = closureN_tag;
 c_735586.fn = (function_type)__lambda_101;
c_735586.num_args = 1;
c_735586.num_elements = 4;
c_735586.elements = (object *)e_735644;
c_735586.elements[0] = ((closureN)self_733800)->elements[0];
c_735586.elements[1] = ((closureN)self_733800)->elements[1];
c_735586.elements[2] = ((closureN)self_733800)->elements[2];
c_735586.elements[3] = ((closureN)self_733800)->elements[3];



return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_735586, primitive_number_127, car(((closureN)self_733800)->elements[2]), __glo_iota_srfi_1);; 
}

static void __lambda_101(void *data, object self_733801, int argc, object *args) /* object self_733801, object r_732280 */
 {

  
closureN_type c_735588;
object e_735640 [4];
c_735588.hdr.mark = gc_color_red;
 c_735588.hdr.grayed = 0;
c_735588.tag = closureN_tag;
 c_735588.fn = (function_type)__lambda_102;
c_735588.num_args = 1;
c_735588.num_elements = 4;
c_735588.elements = (object *)e_735640;
c_735588.elements[0] = ((closureN)self_733801)->elements[0];
c_735588.elements[1] = ((closureN)self_733801)->elements[1];
c_735588.elements[2] = ((closureN)self_733801)->elements[2];
c_735588.elements[3] = ((closureN)self_733801)->elements[3];



return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_735588, primitive_number_127, car(((closureN)self_733801)->elements[3]), __glo_iota_srfi_1);; 
}

static void __lambda_102(void *data, object self_733802, int argc, object *args) /* object self_733802, object r_732281 */
 {

  
closureN_type c_735590;
object e_735639 [4];
c_735590.hdr.mark = gc_color_red;
 c_735590.hdr.grayed = 0;
c_735590.tag = closureN_tag;
 c_735590.fn = (function_type)__lambda_103;
c_735590.num_args = 1;
c_735590.num_elements = 4;
c_735590.elements = (object *)e_735639;
c_735590.elements[0] = ((closureN)self_733802)->elements[0];
c_735590.elements[1] = ((closureN)self_733802)->elements[1];
c_735590.elements[2] = ((closureN)self_733802)->elements[2];
c_735590.elements[3] = ((closureN)self_733802)->elements[3];

return_direct_with_clo1(data,(closure)&c_735590,__lambda_103,  boolean_f);; 
}

static void __lambda_103(void *data, object self_733803, int argc, object *args) /* object self_733803, object loop_73110_731345 */
 {
 object loop_73110_731345 = args[0];
  
closureN_type c_735592;
object e_735635 [4];
c_735592.hdr.mark = gc_color_red;
 c_735592.hdr.grayed = 0;
c_735592.tag = closureN_tag;
 c_735592.fn = (function_type)__lambda_1131;
c_735592.num_args = 1;
c_735592.num_elements = 4;
c_735592.elements = (object *)e_735635;
c_735592.elements[0] = ((closureN)self_733803)->elements[0];
c_735592.elements[1] = ((closureN)self_733803)->elements[1];
c_735592.elements[2] = ((closureN)self_733803)->elements[2];
c_735592.elements[3] = ((closureN)self_733803)->elements[3];


pair_type local_735638; 
return_direct_with_clo1(data,(closure)&c_735592,__lambda_1131,  set_cell_as_expr(&local_735638, loop_73110_731345));; 
}

static void __lambda_1131(void *data, object self_733804, int argc, object *args) /* object self_733804, object loop_73110_731345 */
 {
 object loop_73110_731345 = args[0];
  
closureN_type c_735594;
object e_735606 [2];
c_735594.hdr.mark = gc_color_red;
 c_735594.hdr.grayed = 0;
c_735594.tag = closureN_tag;
 c_735594.fn = (function_type)__lambda_104;
c_735594.num_args = 1;
c_735594.num_elements = 2;
c_735594.elements = (object *)e_735606;
c_735594.elements[0] = ((closureN)self_733804)->elements[1];
c_735594.elements[1] = loop_73110_731345;


closureN_type c_735607;
object e_735634 [4];
c_735607.hdr.mark = gc_color_red;
 c_735607.hdr.grayed = 0;
c_735607.tag = closureN_tag;
 c_735607.fn = (function_type)__lambda_106;
c_735607.num_args = 2;
c_735607.num_elements = 4;
c_735607.elements = (object *)e_735634;
c_735607.elements[0] = ((closureN)self_733804)->elements[0];
c_735607.elements[1] = loop_73110_731345;
c_735607.elements[2] = ((closureN)self_733804)->elements[2];
c_735607.elements[3] = ((closureN)self_733804)->elements[3];

return_direct_with_clo1(data,(closure)&c_735594,__lambda_104,  &c_735607);; 
}

static void __lambda_106(void *data, object self_733805, int argc, object *args) /* object self_733805, object k_732285, object n_73111_731346, object r_73112_731347 */
 {
 object k_732285 = args[0]; object n_73111_731346 = args[1]; object r_73112_731347 = args[2];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, n_73111_731346, ((closureN)self_733805)->elements[0])) ){ 
  return_direct_with_clo2(data,  __glo_reverse_scheme_base, (((closure)  __glo_reverse_scheme_base)->fn),  k_732285, r_73112_731347);
} else { 
  


complex_num_type local_735618; 

pair_type local_735621; 

complex_num_type local_735624; 



complex_num_type local_735630; 


return_closcall3(data,  car(((closureN)self_733805)->elements[1]),  k_732285, Cyc_fast_sum(data,&local_735618, obj_int2obj(1), n_73111_731346), set_pair_as_expr(&local_735621, Cyc_fast_sum(data,&local_735624, car(((closureN)self_733805)->elements[2]), Cyc_fast_mul(data,&local_735630, n_73111_731346, car(((closureN)self_733805)->elements[3]))), r_73112_731347));}
;; 
}

static void __lambda_104(void *data, object self_733806, int argc, object *args) /* object self_733806, object r_732284 */
 {
 object r_732284 = args[0];
  
closureN_type c_735596;
object e_735602 [2];
c_735596.hdr.mark = gc_color_red;
 c_735596.hdr.grayed = 0;
c_735596.tag = closureN_tag;
 c_735596.fn = (function_type)__lambda_105;
c_735596.num_args = 1;
c_735596.num_elements = 2;
c_735596.elements = (object *)e_735602;
c_735596.elements[0] = ((closureN)self_733806)->elements[0];
c_735596.elements[1] = ((closureN)self_733806)->elements[1];



return_direct_with_clo1(data,(closure)&c_735596,__lambda_105,  Cyc_set_cell(data, ((closureN)self_733806)->elements[1], r_732284));; 
}

static void __lambda_105(void *data, object self_733807, int argc, object *args) /* object self_733807, object r_732283 */
 {

  

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

static void __lambda_98(void *data, object self_733808, int argc, object *args) /* object self_733808, object k_732291 */
 {
 object k_732291 = args[0];
    
if( (boolean_f != Cyc_is_null(((closureN)self_733808)->elements[0])) ){ 
  return_direct_with_clo1(data,  k_732291, (((closure)  k_732291)->fn),  boolean_f);
} else { 
  
closureN_type c_735560;
object e_735576 [3];
c_735560.hdr.mark = gc_color_red;
 c_735560.hdr.grayed = 0;
c_735560.tag = closureN_tag;
 c_735560.fn = (function_type)__lambda_99;
c_735560.num_args = 1;
c_735560.num_elements = 3;
c_735560.elements = (object *)e_735576;
c_735560.elements[0] = k_732291;
c_735560.elements[1] = ((closureN)self_733808)->elements[0];
c_735560.elements[2] = ((closureN)self_733808)->elements[2];





return_direct_with_clo1(data,(closure)&c_735560,__lambda_99,  Cyc_set_cell(data, ((closureN)self_733808)->elements[1], Cyc_car(data, ((closureN)self_733808)->elements[0])));}
;; 
}

static void __lambda_99(void *data, object self_733809, int argc, object *args) /* object self_733809, object r_732293 */
 {

    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_733809)->elements[1]))) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733809)->elements[0], (((closure)  ((closureN)self_733809)->elements[0])->fn),  Cyc_VOID);
} else { 
  



return_direct_with_clo1(data,  ((closureN)self_733809)->elements[0], (((closure)  ((closureN)self_733809)->elements[0])->fn),  Cyc_set_cell(data, ((closureN)self_733809)->elements[2], Cyc_cadr(data, ((closureN)self_733809)->elements[1])));}
;; 
}

static void __lambda_95(void *data, object self_733810, int argc, object *args) /* object self_733810, object k_732298 */
 {
 object k_732298 = args[0];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_733810)->elements[0], obj_int2obj(0))) ){ 
  
make_utf8_string_with_len(c_735542, "Negative step count", 19, 19);
return_direct_with_clo4(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_732298, &c_735542, __glo_iota_srfi_1, ((closureN)self_733810)->elements[0]);
} else { 
  return_direct_with_clo1(data,  k_732298, (((closure)  k_732298)->fn),  Cyc_VOID);}
;; 
}

static void __lambda_86(void *data, object _, int argc, object *args) /* closure _,object k_732266, object lis_7395_731335 */
 {
object k_732266 = args[0]; object lis_7395_731335 = args[1];
  Cyc_st_add(data, "srfi/1.sld:list-copy");

closureN_type c_735486;
object e_735532 [1];
c_735486.hdr.mark = gc_color_red;
 c_735486.hdr.grayed = 0;
c_735486.tag = closureN_tag;
 c_735486.fn = (function_type)__lambda_87;
c_735486.num_args = 1;
c_735486.num_elements = 1;
c_735486.elements = (object *)e_735532;
c_735486.elements[0] = k_732266;

return_direct_with_clo1(data,(closure)&c_735486,__lambda_87,  lis_7395_731335);; 
}

static void __lambda_87(void *data, object self_733788, int argc, object *args) /* object self_733788, object lis_7397_731336 */
 {
 object lis_7397_731336 = args[0];
  
closureN_type c_735488;
object e_735531 [2];
c_735488.hdr.mark = gc_color_red;
 c_735488.hdr.grayed = 0;
c_735488.tag = closureN_tag;
 c_735488.fn = (function_type)__lambda_88;
c_735488.num_args = 1;
c_735488.num_elements = 2;
c_735488.elements = (object *)e_735531;
c_735488.elements[0] = ((closureN)self_733788)->elements[0];
c_735488.elements[1] = lis_7397_731336;

return_direct_with_clo1(data,(closure)&c_735488,__lambda_88,  boolean_f);; 
}

static void __lambda_88(void *data, object self_733789, int argc, object *args) /* object self_733789, object recur_7398_731337 */
 {
 object recur_7398_731337 = args[0];
  
closureN_type c_735490;
object e_735527 [2];
c_735490.hdr.mark = gc_color_red;
 c_735490.hdr.grayed = 0;
c_735490.tag = closureN_tag;
 c_735490.fn = (function_type)__lambda_1130;
c_735490.num_args = 1;
c_735490.num_elements = 2;
c_735490.elements = (object *)e_735527;
c_735490.elements[0] = ((closureN)self_733789)->elements[0];
c_735490.elements[1] = ((closureN)self_733789)->elements[1];


pair_type local_735530; 
return_direct_with_clo1(data,(closure)&c_735490,__lambda_1130,  set_cell_as_expr(&local_735530, recur_7398_731337));; 
}

static void __lambda_1130(void *data, object self_733790, int argc, object *args) /* object self_733790, object recur_7398_731337 */
 {
 object recur_7398_731337 = args[0];
  
closureN_type c_735492;
object e_735505 [3];
c_735492.hdr.mark = gc_color_red;
 c_735492.hdr.grayed = 0;
c_735492.tag = closureN_tag;
 c_735492.fn = (function_type)__lambda_89;
c_735492.num_args = 1;
c_735492.num_elements = 3;
c_735492.elements = (object *)e_735505;
c_735492.elements[0] = ((closureN)self_733790)->elements[0];
c_735492.elements[1] = ((closureN)self_733790)->elements[1];
c_735492.elements[2] = recur_7398_731337;


closureN_type c_735506;
object e_735526 [1];
c_735506.hdr.mark = gc_color_red;
 c_735506.hdr.grayed = 0;
c_735506.tag = closureN_tag;
 c_735506.fn = (function_type)__lambda_91;
c_735506.num_args = 1;
c_735506.num_elements = 1;
c_735506.elements = (object *)e_735526;
c_735506.elements[0] = recur_7398_731337;

return_direct_with_clo1(data,(closure)&c_735492,__lambda_89,  &c_735506);; 
}

static void __lambda_91(void *data, object self_733791, int argc, object *args) /* object self_733791, object k_732269, object lis_7399_731338 */
 {
 object k_732269 = args[0]; object lis_7399_731338 = args[1];
    
if( (boolean_f != Cyc_is_pair(lis_7399_731338)) ){ 
  


closureN_type c_735513;
object e_735522 [2];
c_735513.hdr.mark = gc_color_red;
 c_735513.hdr.grayed = 0;
c_735513.tag = closureN_tag;
 c_735513.fn = (function_type)__lambda_92;
c_735513.num_args = 1;
c_735513.num_elements = 2;
c_735513.elements = (object *)e_735522;
c_735513.elements[0] = k_732269;
c_735513.elements[1] = lis_7399_731338;



return_closcall2(data,  car(((closureN)self_733791)->elements[0]),  &c_735513, Cyc_cdr(data, lis_7399_731338));
} else { 
  return_direct_with_clo1(data,  k_732269, (((closure)  k_732269)->fn),  lis_7399_731338);}
;; 
}

static void __lambda_92(void *data, object self_733792, int argc, object *args) /* object self_733792, object r_732272 */
 {
 object r_732272 = args[0];
  
pair_type local_735518; 


return_direct_with_clo1(data,  ((closureN)self_733792)->elements[0], (((closure)  ((closureN)self_733792)->elements[0])->fn),  set_pair_as_expr(&local_735518, Cyc_car(data, ((closureN)self_733792)->elements[1]), r_732272));; 
}

static void __lambda_89(void *data, object self_733793, int argc, object *args) /* object self_733793, object r_732268 */
 {
 object r_732268 = args[0];
  
closureN_type c_735494;
object e_735501 [3];
c_735494.hdr.mark = gc_color_red;
 c_735494.hdr.grayed = 0;
c_735494.tag = closureN_tag;
 c_735494.fn = (function_type)__lambda_90;
c_735494.num_args = 1;
c_735494.num_elements = 3;
c_735494.elements = (object *)e_735501;
c_735494.elements[0] = ((closureN)self_733793)->elements[0];
c_735494.elements[1] = ((closureN)self_733793)->elements[1];
c_735494.elements[2] = ((closureN)self_733793)->elements[2];



return_direct_with_clo1(data,(closure)&c_735494,__lambda_90,  Cyc_set_cell(data, ((closureN)self_733793)->elements[2], r_732268));; 
}

static void __lambda_90(void *data, object self_733794, int argc, object *args) /* object self_733794, object r_732267 */
 {

  

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

static void __lambda_79(void *data, object _, int argc, object *args) /* closure _,object k_732256, object first_7387_731328, object rest_7388_731329_raw, ... */
 {
object k_732256 = args[0]; object first_7387_731328 = args[1];
load_varargs(rest_7388_731329, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/1.sld:cons*");

closureN_type c_735436;
object e_735483 [1];
c_735436.hdr.mark = gc_color_red;
 c_735436.hdr.grayed = 0;
c_735436.tag = closureN_tag;
 c_735436.fn = (function_type)__lambda_80;
c_735436.num_args = 2;
c_735436.num_elements = 1;
c_735436.elements = (object *)e_735483;
c_735436.elements[0] = k_732256;

return_direct_with_clo2(data,(closure)&c_735436,__lambda_80,  first_7387_731328, rest_7388_731329);; 
}

static void __lambda_80(void *data, object self_733781, int argc, object *args) /* object self_733781, object x_7390_731330, object rest_7391_731331 */
 {
 object x_7390_731330 = args[0]; object rest_7391_731331 = args[1];
  
closureN_type c_735438;
object e_735482 [3];
c_735438.hdr.mark = gc_color_red;
 c_735438.hdr.grayed = 0;
c_735438.tag = closureN_tag;
 c_735438.fn = (function_type)__lambda_81;
c_735438.num_args = 1;
c_735438.num_elements = 3;
c_735438.elements = (object *)e_735482;
c_735438.elements[0] = ((closureN)self_733781)->elements[0];
c_735438.elements[1] = rest_7391_731331;
c_735438.elements[2] = x_7390_731330;

return_direct_with_clo1(data,(closure)&c_735438,__lambda_81,  boolean_f);; 
}

static void __lambda_81(void *data, object self_733782, int argc, object *args) /* object self_733782, object recur_7392_731332 */
 {
 object recur_7392_731332 = args[0];
  
closureN_type c_735440;
object e_735478 [3];
c_735440.hdr.mark = gc_color_red;
 c_735440.hdr.grayed = 0;
c_735440.tag = closureN_tag;
 c_735440.fn = (function_type)__lambda_1129;
c_735440.num_args = 1;
c_735440.num_elements = 3;
c_735440.elements = (object *)e_735478;
c_735440.elements[0] = ((closureN)self_733782)->elements[0];
c_735440.elements[1] = ((closureN)self_733782)->elements[1];
c_735440.elements[2] = ((closureN)self_733782)->elements[2];


pair_type local_735481; 
return_direct_with_clo1(data,(closure)&c_735440,__lambda_1129,  set_cell_as_expr(&local_735481, recur_7392_731332));; 
}

static void __lambda_1129(void *data, object self_733783, int argc, object *args) /* object self_733783, object recur_7392_731332 */
 {
 object recur_7392_731332 = args[0];
  
closureN_type c_735442;
object e_735456 [4];
c_735442.hdr.mark = gc_color_red;
 c_735442.hdr.grayed = 0;
c_735442.tag = closureN_tag;
 c_735442.fn = (function_type)__lambda_82;
c_735442.num_args = 1;
c_735442.num_elements = 4;
c_735442.elements = (object *)e_735456;
c_735442.elements[0] = ((closureN)self_733783)->elements[0];
c_735442.elements[1] = recur_7392_731332;
c_735442.elements[2] = ((closureN)self_733783)->elements[1];
c_735442.elements[3] = ((closureN)self_733783)->elements[2];


closureN_type c_735457;
object e_735477 [1];
c_735457.hdr.mark = gc_color_red;
 c_735457.hdr.grayed = 0;
c_735457.tag = closureN_tag;
 c_735457.fn = (function_type)__lambda_84;
c_735457.num_args = 2;
c_735457.num_elements = 1;
c_735457.elements = (object *)e_735477;
c_735457.elements[0] = recur_7392_731332;

return_direct_with_clo1(data,(closure)&c_735442,__lambda_82,  &c_735457);; 
}

static void __lambda_84(void *data, object self_733784, int argc, object *args) /* object self_733784, object k_732259, object x_7393_731333, object rest_7394_731334 */
 {
 object k_732259 = args[0]; object x_7393_731333 = args[1]; object rest_7394_731334 = args[2];
    
if( (boolean_f != Cyc_is_pair(rest_7394_731334)) ){ 
  


closureN_type c_735464;
object e_735471 [2];
c_735464.hdr.mark = gc_color_red;
 c_735464.hdr.grayed = 0;
c_735464.tag = closureN_tag;
 c_735464.fn = (function_type)__lambda_85;
c_735464.num_args = 1;
c_735464.num_elements = 2;
c_735464.elements = (object *)e_735471;
c_735464.elements[0] = k_732259;
c_735464.elements[1] = x_7393_731333;





return_closcall3(data,  car(((closureN)self_733784)->elements[0]),  &c_735464, Cyc_car(data, rest_7394_731334), Cyc_cdr(data, rest_7394_731334));
} else { 
  return_direct_with_clo1(data,  k_732259, (((closure)  k_732259)->fn),  x_7393_731333);}
;; 
}

static void __lambda_85(void *data, object self_733785, int argc, object *args) /* object self_733785, object r_732261 */
 {
 object r_732261 = args[0];
  
pair_type local_735469; 
return_direct_with_clo1(data,  ((closureN)self_733785)->elements[0], (((closure)  ((closureN)self_733785)->elements[0])->fn),  set_pair_as_expr(&local_735469, ((closureN)self_733785)->elements[1], r_732261));; 
}

static void __lambda_82(void *data, object self_733786, int argc, object *args) /* object self_733786, object r_732258 */
 {
 object r_732258 = args[0];
  
closureN_type c_735444;
object e_735452 [4];
c_735444.hdr.mark = gc_color_red;
 c_735444.hdr.grayed = 0;
c_735444.tag = closureN_tag;
 c_735444.fn = (function_type)__lambda_83;
c_735444.num_args = 1;
c_735444.num_elements = 4;
c_735444.elements = (object *)e_735452;
c_735444.elements[0] = ((closureN)self_733786)->elements[0];
c_735444.elements[1] = ((closureN)self_733786)->elements[1];
c_735444.elements[2] = ((closureN)self_733786)->elements[2];
c_735444.elements[3] = ((closureN)self_733786)->elements[3];



return_direct_with_clo1(data,(closure)&c_735444,__lambda_83,  Cyc_set_cell(data, ((closureN)self_733786)->elements[1], r_732258));; 
}

static void __lambda_83(void *data, object self_733787, int argc, object *args) /* object self_733787, object r_732257 */
 {

  

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

static void __lambda_68(void *data, object _, int argc, object *args) /* closure _,object k_732239, object len_7375_731320, object proc_7376_731321 */
 {
object k_732239 = args[0]; object len_7375_731320 = args[1]; object proc_7376_731321 = args[2];
  Cyc_st_add(data, "srfi/1.sld:list-tabulate");

closureN_type c_735363;
object e_735426 [3];
c_735363.hdr.mark = gc_color_red;
 c_735363.hdr.grayed = 0;
c_735363.tag = closureN_tag;
 c_735363.fn = (function_type)__lambda_69;
c_735363.num_args = 1;
c_735363.num_elements = 3;
c_735363.elements = (object *)e_735426;
c_735363.elements[0] = k_732239;
c_735363.elements[1] = len_7375_731320;
c_735363.elements[2] = proc_7376_731321;


mclosure0(c_735427, (function_type)__lambda_78);c_735427.num_args = 1;
return_direct_with_clo1(data,(closure)&c_735363,__lambda_69,  &c_735427);; 
}

static void __lambda_78(void *data, object self_733770, int argc, object *args) /* object self_733770, object k_732252, object n_7377_731322 */
 {
 object k_732252 = args[0]; object n_7377_731322 = args[1];
    
if( (boolean_f != Cyc_is_integer(n_7377_731322)) ){ 
  

return_direct_with_clo1(data,  k_732252, (((closure)  k_732252)->fn),  Cyc_num_fast_gte_op(data, n_7377_731322, obj_int2obj(0)));
} else { 
  return_direct_with_clo1(data,  k_732252, (((closure)  k_732252)->fn),  boolean_f);}
;; 
}

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

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_735365, r_732251, ((closureN)self_733771)->elements[1], __glo_list_91tabulate_srfi_1);; 
}

static void __lambda_70(void *data, object self_733772, int argc, object *args) /* object self_733772, object r_732240 */
 {

  
closureN_type c_735367;
object e_735422 [3];
c_735367.hdr.mark = gc_color_red;
 c_735367.hdr.grayed = 0;
c_735367.tag = closureN_tag;
 c_735367.fn = (function_type)__lambda_71;
c_735367.num_args = 1;
c_735367.num_elements = 3;
c_735367.elements = (object *)e_735422;
c_735367.elements[0] = ((closureN)self_733772)->elements[0];
c_735367.elements[1] = ((closureN)self_733772)->elements[1];
c_735367.elements[2] = ((closureN)self_733772)->elements[2];

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_735367, primitive_procedure_127, ((closureN)self_733772)->elements[2], __glo_list_91tabulate_srfi_1);; 
}

static void __lambda_71(void *data, object self_733773, int argc, object *args) /* object self_733773, object r_732241 */
 {

  
closureN_type c_735369;
object e_735417 [2];
c_735369.hdr.mark = gc_color_red;
 c_735369.hdr.grayed = 0;
c_735369.tag = closureN_tag;
 c_735369.fn = (function_type)__lambda_72;
c_735369.num_args = 2;
c_735369.num_elements = 2;
c_735369.elements = (object *)e_735417;
c_735369.elements[0] = ((closureN)self_733773)->elements[0];
c_735369.elements[1] = ((closureN)self_733773)->elements[2];


complex_num_type local_735420; 
return_direct_with_clo2(data,(closure)&c_735369,__lambda_72,  Cyc_fast_sub(data,&local_735420, ((closureN)self_733773)->elements[1], obj_int2obj(1)), NULL);; 
}

static void __lambda_72(void *data, object self_733774, int argc, object *args) /* object self_733774, object i_7382_731323, object ans_7383_731324 */
 {
 object i_7382_731323 = args[0]; object ans_7383_731324 = args[1];
  
closureN_type c_735371;
object e_735416 [4];
c_735371.hdr.mark = gc_color_red;
 c_735371.hdr.grayed = 0;
c_735371.tag = closureN_tag;
 c_735371.fn = (function_type)__lambda_73;
c_735371.num_args = 1;
c_735371.num_elements = 4;
c_735371.elements = (object *)e_735416;
c_735371.elements[0] = ans_7383_731324;
c_735371.elements[1] = i_7382_731323;
c_735371.elements[2] = ((closureN)self_733774)->elements[0];
c_735371.elements[3] = ((closureN)self_733774)->elements[1];

return_direct_with_clo1(data,(closure)&c_735371,__lambda_73,  boolean_f);; 
}

static void __lambda_73(void *data, object self_733775, int argc, object *args) /* object self_733775, object lp_7379_7384_731325 */
 {
 object lp_7379_7384_731325 = args[0];
  
closureN_type c_735373;
object e_735412 [4];
c_735373.hdr.mark = gc_color_red;
 c_735373.hdr.grayed = 0;
c_735373.tag = closureN_tag;
 c_735373.fn = (function_type)__lambda_1128;
c_735373.num_args = 1;
c_735373.num_elements = 4;
c_735373.elements = (object *)e_735412;
c_735373.elements[0] = ((closureN)self_733775)->elements[0];
c_735373.elements[1] = ((closureN)self_733775)->elements[1];
c_735373.elements[2] = ((closureN)self_733775)->elements[2];
c_735373.elements[3] = ((closureN)self_733775)->elements[3];


pair_type local_735415; 
return_direct_with_clo1(data,(closure)&c_735373,__lambda_1128,  set_cell_as_expr(&local_735415, lp_7379_7384_731325));; 
}

static void __lambda_1128(void *data, object self_733776, int argc, object *args) /* object self_733776, object lp_7379_7384_731325 */
 {
 object lp_7379_7384_731325 = args[0];
  
closureN_type c_735375;
object e_735389 [4];
c_735375.hdr.mark = gc_color_red;
 c_735375.hdr.grayed = 0;
c_735375.tag = closureN_tag;
 c_735375.fn = (function_type)__lambda_74;
c_735375.num_args = 1;
c_735375.num_elements = 4;
c_735375.elements = (object *)e_735389;
c_735375.elements[0] = ((closureN)self_733776)->elements[0];
c_735375.elements[1] = ((closureN)self_733776)->elements[1];
c_735375.elements[2] = ((closureN)self_733776)->elements[2];
c_735375.elements[3] = lp_7379_7384_731325;


closureN_type c_735390;
object e_735411 [2];
c_735390.hdr.mark = gc_color_red;
 c_735390.hdr.grayed = 0;
c_735390.tag = closureN_tag;
 c_735390.fn = (function_type)__lambda_76;
c_735390.num_args = 2;
c_735390.num_elements = 2;
c_735390.elements = (object *)e_735411;
c_735390.elements[0] = lp_7379_7384_731325;
c_735390.elements[1] = ((closureN)self_733776)->elements[3];

return_direct_with_clo1(data,(closure)&c_735375,__lambda_74,  &c_735390);; 
}

static void __lambda_76(void *data, object self_733777, int argc, object *args) /* object self_733777, object k_732246, object i_7385_731326, object ans_7386_731327 */
 {
 object k_732246 = args[0]; object i_7385_731326 = args[1]; object ans_7386_731327 = args[2];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, i_7385_731326, obj_int2obj(0))) ){ 
  return_direct_with_clo1(data,  k_732246, (((closure)  k_732246)->fn),  ans_7386_731327);
} else { 
  
closureN_type c_735396;
object e_735410 [4];
c_735396.hdr.mark = gc_color_red;
 c_735396.hdr.grayed = 0;
c_735396.tag = closureN_tag;
 c_735396.fn = (function_type)__lambda_77;
c_735396.num_args = 1;
c_735396.num_elements = 4;
c_735396.elements = (object *)e_735410;
c_735396.elements[0] = ans_7386_731327;
c_735396.elements[1] = i_7385_731326;
c_735396.elements[2] = k_732246;
c_735396.elements[3] = ((closureN)self_733777)->elements[0];

return_closcall2(data,  ((closureN)self_733777)->elements[1],  &c_735396, i_7385_731326);}
;; 
}

static void __lambda_77(void *data, object self_733778, int argc, object *args) /* object self_733778, object r_732250 */
 {
 object r_732250 = args[0];
  


complex_num_type local_735404; 

pair_type local_735408; 
return_closcall3(data,  car(((closureN)self_733778)->elements[3]),  ((closureN)self_733778)->elements[2], Cyc_fast_sub(data,&local_735404, ((closureN)self_733778)->elements[1], obj_int2obj(1)), set_pair_as_expr(&local_735408, r_732250, ((closureN)self_733778)->elements[0]));; 
}

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



return_direct_with_clo1(data,(closure)&c_735377,__lambda_75,  Cyc_set_cell(data, ((closureN)self_733779)->elements[3], r_732245));; 
}

static void __lambda_75(void *data, object self_733780, int argc, object *args) /* object self_733780, object r_732244 */
 {

  

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

static void __lambda_57(void *data, object _, int argc, object *args) /* closure _,object k_732219, object len_7355_731311, object maybe_91elt_7356_731312_raw, ... */
 {
object k_732219 = args[0]; object len_7355_731311 = args[1];
load_varargs(maybe_91elt_7356_731312, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/1.sld:make-list");

closureN_type c_735278;
object e_735353 [3];
c_735278.hdr.mark = gc_color_red;
 c_735278.hdr.grayed = 0;
c_735278.tag = closureN_tag;
 c_735278.fn = (function_type)__lambda_58;
c_735278.num_args = 1;
c_735278.num_elements = 3;
c_735278.elements = (object *)e_735353;
c_735278.elements[0] = k_732219;
c_735278.elements[1] = len_7355_731311;
c_735278.elements[2] = maybe_91elt_7356_731312;


mclosure0(c_735354, (function_type)__lambda_67);c_735354.num_args = 1;
return_direct_with_clo1(data,(closure)&c_735278,__lambda_58,  &c_735354);; 
}

static void __lambda_67(void *data, object self_733759, int argc, object *args) /* object self_733759, object k_732235, object n_7357_731313 */
 {
 object k_732235 = args[0]; object n_7357_731313 = args[1];
    
if( (boolean_f != Cyc_is_integer(n_7357_731313)) ){ 
  

return_direct_with_clo1(data,  k_732235, (((closure)  k_732235)->fn),  Cyc_num_fast_gte_op(data, n_7357_731313, obj_int2obj(0)));
} else { 
  return_direct_with_clo1(data,  k_732235, (((closure)  k_732235)->fn),  boolean_f);}
;; 
}

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

return_direct_with_clo4(data,  __glo_check_91arg_srfi_1, (((closure)  __glo_check_91arg_srfi_1)->fn),  &c_735280, r_732234, ((closureN)self_733760)->elements[1], __glo_make_91list_srfi_1);; 
}

static void __lambda_59(void *data, object self_733761, int argc, object *args) /* object self_733761, object r_732220 */
 {

  
closureN_type c_735282;
object e_735303 [2];
c_735282.hdr.mark = gc_color_red;
 c_735282.hdr.grayed = 0;
c_735282.tag = closureN_tag;
 c_735282.fn = (function_type)__lambda_60;
c_735282.num_args = 0;
c_735282.num_elements = 2;
c_735282.elements = (object *)e_735303;
c_735282.elements[0] = ((closureN)self_733761)->elements[1];
c_735282.elements[1] = ((closureN)self_733761)->elements[2];


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

return_direct_with_clo1(data,(closure)&c_735282,__lambda_60,  &c_735304);; 
}

static void __lambda_61(void *data, object self_733762, int argc, object *args) /* object self_733762, object elt_7359_731314 */
 {
 object elt_7359_731314 = args[0];
  
closureN_type c_735306;
object e_735348 [2];
c_735306.hdr.mark = gc_color_red;
 c_735306.hdr.grayed = 0;
c_735306.tag = closureN_tag;
 c_735306.fn = (function_type)__lambda_62;
c_735306.num_args = 2;
c_735306.num_elements = 2;
c_735306.elements = (object *)e_735348;
c_735306.elements[0] = elt_7359_731314;
c_735306.elements[1] = ((closureN)self_733762)->elements[0];

return_direct_with_clo2(data,(closure)&c_735306,__lambda_62,  ((closureN)self_733762)->elements[1], NULL);; 
}

static void __lambda_62(void *data, object self_733763, int argc, object *args) /* object self_733763, object i_7363_731315, object ans_7364_731316 */
 {
 object i_7363_731315 = args[0]; object ans_7364_731316 = args[1];
  
closureN_type c_735308;
object e_735347 [4];
c_735308.hdr.mark = gc_color_red;
 c_735308.hdr.grayed = 0;
c_735308.tag = closureN_tag;
 c_735308.fn = (function_type)__lambda_63;
c_735308.num_args = 1;
c_735308.num_elements = 4;
c_735308.elements = (object *)e_735347;
c_735308.elements[0] = ans_7364_731316;
c_735308.elements[1] = ((closureN)self_733763)->elements[0];
c_735308.elements[2] = i_7363_731315;
c_735308.elements[3] = ((closureN)self_733763)->elements[1];

return_direct_with_clo1(data,(closure)&c_735308,__lambda_63,  boolean_f);; 
}

static void __lambda_63(void *data, object self_733764, int argc, object *args) /* object self_733764, object lp_7360_7365_731317 */
 {
 object lp_7360_7365_731317 = args[0];
  
closureN_type c_735310;
object e_735343 [4];
c_735310.hdr.mark = gc_color_red;
 c_735310.hdr.grayed = 0;
c_735310.tag = closureN_tag;
 c_735310.fn = (function_type)__lambda_1127;
c_735310.num_args = 1;
c_735310.num_elements = 4;
c_735310.elements = (object *)e_735343;
c_735310.elements[0] = ((closureN)self_733764)->elements[0];
c_735310.elements[1] = ((closureN)self_733764)->elements[1];
c_735310.elements[2] = ((closureN)self_733764)->elements[2];
c_735310.elements[3] = ((closureN)self_733764)->elements[3];


pair_type local_735346; 
return_direct_with_clo1(data,(closure)&c_735310,__lambda_1127,  set_cell_as_expr(&local_735346, lp_7360_7365_731317));; 
}

static void __lambda_1127(void *data, object self_733765, int argc, object *args) /* object self_733765, object lp_7360_7365_731317 */
 {
 object lp_7360_7365_731317 = args[0];
  
closureN_type c_735312;
object e_735326 [4];
c_735312.hdr.mark = gc_color_red;
 c_735312.hdr.grayed = 0;
c_735312.tag = closureN_tag;
 c_735312.fn = (function_type)__lambda_64;
c_735312.num_args = 1;
c_735312.num_elements = 4;
c_735312.elements = (object *)e_735326;
c_735312.elements[0] = ((closureN)self_733765)->elements[0];
c_735312.elements[1] = ((closureN)self_733765)->elements[2];
c_735312.elements[2] = ((closureN)self_733765)->elements[3];
c_735312.elements[3] = lp_7360_7365_731317;


closureN_type c_735327;
object e_735342 [2];
c_735327.hdr.mark = gc_color_red;
 c_735327.hdr.grayed = 0;
c_735327.tag = closureN_tag;
 c_735327.fn = (function_type)__lambda_66;
c_735327.num_args = 2;
c_735327.num_elements = 2;
c_735327.elements = (object *)e_735342;
c_735327.elements[0] = ((closureN)self_733765)->elements[1];
c_735327.elements[1] = lp_7360_7365_731317;

return_direct_with_clo1(data,(closure)&c_735312,__lambda_64,  &c_735327);; 
}

static void __lambda_66(void *data, object self_733766, int argc, object *args) /* object self_733766, object k_732225, object i_7366_731318, object ans_7367_731319 */
 {
 object k_732225 = args[0]; object i_7366_731318 = args[1]; object ans_7367_731319 = args[2];
    
if( (boolean_f != Cyc_num_fast_lte_op(data, i_7366_731318, obj_int2obj(0))) ){ 
  return_direct_with_clo1(data,  k_732225, (((closure)  k_732225)->fn),  ans_7367_731319);
} else { 
  


complex_num_type local_735337; 

pair_type local_735340; 
return_closcall3(data,  car(((closureN)self_733766)->elements[1]),  k_732225, Cyc_fast_sub(data,&local_735337, i_7366_731318, obj_int2obj(1)), set_pair_as_expr(&local_735340, ((closureN)self_733766)->elements[0], ans_7367_731319));}
;; 
}

static void __lambda_64(void *data, object self_733767, int argc, object *args) /* object self_733767, object r_732224 */
 {
 object r_732224 = args[0];
  
closureN_type c_735314;
object e_735322 [4];
c_735314.hdr.mark = gc_color_red;
 c_735314.hdr.grayed = 0;
c_735314.tag = closureN_tag;
 c_735314.fn = (function_type)__lambda_65;
c_735314.num_args = 1;
c_735314.num_elements = 4;
c_735314.elements = (object *)e_735322;
c_735314.elements[0] = ((closureN)self_733767)->elements[0];
c_735314.elements[1] = ((closureN)self_733767)->elements[1];
c_735314.elements[2] = ((closureN)self_733767)->elements[2];
c_735314.elements[3] = ((closureN)self_733767)->elements[3];



return_direct_with_clo1(data,(closure)&c_735314,__lambda_65,  Cyc_set_cell(data, ((closureN)self_733767)->elements[3], r_732224));; 
}

static void __lambda_65(void *data, object self_733768, int argc, object *args) /* object self_733768, object r_732223 */
 {

  

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

static void __lambda_60(void *data, object self_733769, int argc, object *args) /* object self_733769, object k_732229 */
 {
 object k_732229 = args[0];
    
if( (boolean_f != Cyc_is_null(((closureN)self_733769)->elements[1])) ){ 
  return_direct_with_clo1(data,  k_732229, (((closure)  k_732229)->fn),  boolean_f);
} else { 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_733769)->elements[1]))) ){ 
  

return_direct_with_clo1(data,  k_732229, (((closure)  k_732229)->fn),  Cyc_car(data, ((closureN)self_733769)->elements[1]));
} else { 
  
make_utf8_string_with_len(c_735297, "Too many arguments to MAKE-LIST", 31, 31);

pair_type local_735300; 
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_732229, &c_735297, set_pair_as_expr(&local_735300, ((closureN)self_733769)->elements[0], ((closureN)self_733769)->elements[1]));}
;}
;; 
}

static void __lambda_56(void *data, object _, int argc, object *args) /* closure _,object k_732216, object d_7353_731309, object a_7354_731310 */
 {
object k_732216 = args[0]; object d_7353_731309 = args[1]; object a_7354_731310 = args[2];
  Cyc_st_add(data, "srfi/1.sld:xcons");

pair_type local_735275; 
return_direct_with_clo1(data,  k_732216, (((closure)  k_732216)->fn),  set_pair_as_expr(&local_735275, a_7354_731310, d_7353_731309));; 
}

static void __lambda_9(void *data, object _, int argc, object *args) /* closure _,object k_732108, object expr_7312_7325_7342_731298, object rename_7313_7326_7343_731299, object compare_7314_7327_7344_731300 */
 {
object k_732108 = args[0]; object expr_7312_7325_7342_731298 = args[1]; object rename_7313_7326_7343_731299 = args[2];
  Cyc_st_add(data, "srfi/1.sld::optional");

closureN_type c_734860;
object e_735268 [3];
c_734860.hdr.mark = gc_color_red;
 c_734860.hdr.grayed = 0;
c_734860.tag = closureN_tag;
 c_734860.fn = (function_type)__lambda_10;
c_734860.num_args = 1;
c_734860.num_elements = 3;
c_734860.elements = (object *)e_735268;
c_734860.elements[0] = expr_7312_7325_7342_731298;
c_734860.elements[1] = k_732108;
c_734860.elements[2] = rename_7313_7326_7343_731299;



return_direct_with_clo1(data,(closure)&c_734860,__lambda_10,  Cyc_cdr(data, expr_7312_7325_7342_731298));; 
}

static void __lambda_10(void *data, object self_733713, int argc, object *args) /* object self_733713, object v_931_7320_7332_7346_731302 */
 {
 object v_931_7320_7332_7346_731302 = args[0];
  
closureN_type c_734862;
object e_735243 [2];
c_734862.hdr.mark = gc_color_red;
 c_734862.hdr.grayed = 0;
c_734862.tag = closureN_tag;
 c_734862.fn = (function_type)__lambda_11;
c_734862.num_args = 0;
c_734862.num_elements = 2;
c_734862.elements = (object *)e_735243;
c_734862.elements[0] = ((closureN)self_733713)->elements[2];
c_734862.elements[1] = v_931_7320_7332_7346_731302;


closureN_type c_735244;
object e_735267 [2];
c_735244.hdr.mark = gc_color_red;
 c_735244.hdr.grayed = 0;
c_735244.tag = closureN_tag;
 c_735244.fn = (function_type)__lambda_52;
c_735244.num_args = 1;
c_735244.num_elements = 2;
c_735244.elements = (object *)e_735267;
c_735244.elements[0] = ((closureN)self_733713)->elements[0];
c_735244.elements[1] = ((closureN)self_733713)->elements[1];

return_direct_with_clo1(data,(closure)&c_734862,__lambda_11,  &c_735244);; 
}

static void __lambda_52(void *data, object self_733714, int argc, object *args) /* object self_733714, object tmp_7329_7331_7345_731301 */
 {
 object tmp_7329_7331_7345_731301 = args[0];
  
closureN_type c_735246;
object e_735260 [2];
c_735246.hdr.mark = gc_color_red;
 c_735246.hdr.grayed = 0;
c_735246.tag = closureN_tag;
 c_735246.fn = (function_type)__lambda_53;
c_735246.num_args = 0;
c_735246.num_elements = 2;
c_735246.elements = (object *)e_735260;
c_735246.elements[0] = ((closureN)self_733714)->elements[0];
c_735246.elements[1] = tmp_7329_7331_7345_731301;


closureN_type c_735261;
object e_735266 [1];
c_735261.hdr.mark = gc_color_red;
 c_735261.hdr.grayed = 0;
c_735261.tag = closureN_tag;
 c_735261.fn = (function_type)__lambda_55;
c_735261.num_args = 1;
c_735261.num_elements = 1;
c_735261.elements = (object *)e_735266;
c_735261.elements[0] = ((closureN)self_733714)->elements[1];

return_direct_with_clo1(data,(closure)&c_735246,__lambda_53,  &c_735261);; 
}

static void __lambda_55(void *data, object self_733715, int argc, object *args) /* object self_733715, object r_732109 */
 {
 object r_732109 = args[0];
  

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

static void __lambda_53(void *data, object self_733716, int argc, object *args) /* object self_733716, object k_732111 */
 {
 object k_732111 = args[0];
  if( (boolean_f != ((closureN)self_733716)->elements[1]) ){ 
  return_direct_with_clo1(data,  k_732111, (((closure)  k_732111)->fn),  ((closureN)self_733716)->elements[1]);
} else { 
  
closureN_type c_735251;
object e_735257 [1];
c_735251.hdr.mark = gc_color_red;
 c_735251.hdr.grayed = 0;
c_735251.tag = closureN_tag;
 c_735251.fn = (function_type)__lambda_54;
c_735251.num_args = 1;
c_735251.num_elements = 1;
c_735251.elements = (object *)e_735257;
c_735251.elements[0] = k_732111;


make_utf8_string_with_len(c_735258, "no expansion for", 16, 16);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_735251, &c_735258, ((closureN)self_733716)->elements[0]);}
;; 
}

static void __lambda_54(void *data, object self_733717, int argc, object *args) /* object self_733717, object r_732112 */
 {
 object r_732112 = args[0];
  
pair_type local_735256; 
return_direct_with_clo1(data,  ((closureN)self_733717)->elements[0], (((closure)  ((closureN)self_733717)->elements[0])->fn),  set_pair_as_expr(&local_735256, r_732112, boolean_f));; 
}

static void __lambda_11(void *data, object self_733718, int argc, object *args) /* object self_733718, object k_732114 */
 {
 object k_732114 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_733718)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_733718)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_733718)->elements[1])))) ){ 
  
closureN_type c_734880;
object e_735239 [3];
c_734880.hdr.mark = gc_color_red;
 c_734880.hdr.grayed = 0;
c_734880.tag = closureN_tag;
 c_734880.fn = (function_type)__lambda_12;
c_734880.num_args = 1;
c_734880.num_elements = 3;
c_734880.elements = (object *)e_735239;
c_734880.elements[0] = k_732114;
c_734880.elements[1] = ((closureN)self_733718)->elements[0];
c_734880.elements[2] = ((closureN)self_733718)->elements[1];

return_closcall2(data,  ((closureN)self_733718)->elements[0],  &c_734880, quote_let);
} else { 
  return_direct_with_clo1(data,  k_732114, (((closure)  k_732114)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_732114, (((closure)  k_732114)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_732114, (((closure)  k_732114)->fn),  boolean_f);}
;; 
}

static void __lambda_12(void *data, object self_733719, int argc, object *args) /* object self_733719, object r_732123 */
 {
 object r_732123 = args[0];
  
closureN_type c_734883;
object e_735238 [4];
c_734883.hdr.mark = gc_color_red;
 c_734883.hdr.grayed = 0;
c_734883.tag = closureN_tag;
 c_734883.fn = (function_type)__lambda_13;
c_734883.num_args = 1;
c_734883.num_elements = 4;
c_734883.elements = (object *)e_735238;
c_734883.elements[0] = ((closureN)self_733719)->elements[0];
c_734883.elements[1] = r_732123;
c_734883.elements[2] = ((closureN)self_733719)->elements[1];
c_734883.elements[3] = ((closureN)self_733719)->elements[2];

return_closcall2(data,  ((closureN)self_733719)->elements[1],  &c_734883, quote_maybe_91arg);; 
}

static void __lambda_13(void *data, object self_733720, int argc, object *args) /* object self_733720, object r_732207 */
 {
 object r_732207 = args[0];
  
closureN_type c_734885;
object e_735233 [5];
c_734885.hdr.mark = gc_color_red;
 c_734885.hdr.grayed = 0;
c_734885.tag = closureN_tag;
 c_734885.fn = (function_type)__lambda_14;
c_734885.num_args = 1;
c_734885.num_elements = 5;
c_734885.elements = (object *)e_735233;
c_734885.elements[0] = ((closureN)self_733720)->elements[0];
c_734885.elements[1] = ((closureN)self_733720)->elements[1];
c_734885.elements[2] = r_732207;
c_734885.elements[3] = ((closureN)self_733720)->elements[2];
c_734885.elements[4] = ((closureN)self_733720)->elements[3];




make_pair(c_735237,quote_rest,NULL);c_735237.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734885, Cyc_car(data, ((closureN)self_733720)->elements[3]), NULL, &c_735237);; 
}

static void __lambda_14(void *data, object self_733721, int argc, object *args) /* object self_733721, object r_732208 */
 {
 object r_732208 = args[0];
  
closureN_type c_734887;
object e_735229 [4];
c_734887.hdr.mark = gc_color_red;
 c_734887.hdr.grayed = 0;
c_734887.tag = closureN_tag;
 c_734887.fn = (function_type)__lambda_15;
c_734887.num_args = 1;
c_734887.num_elements = 4;
c_734887.elements = (object *)e_735229;
c_734887.elements[0] = ((closureN)self_733721)->elements[0];
c_734887.elements[1] = ((closureN)self_733721)->elements[1];
c_734887.elements[2] = ((closureN)self_733721)->elements[3];
c_734887.elements[3] = ((closureN)self_733721)->elements[4];


make_pair(c_735232,quote_rest,NULL);c_735232.hdr.immutable = 1;

make_pair(c_735231,quote_maybe_91arg,&c_735232);c_735231.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734887, ((closureN)self_733721)->elements[2], r_732208, &c_735231);; 
}

static void __lambda_15(void *data, object self_733722, int argc, object *args) /* object self_733722, object r_732204 */
 {
 object r_732204 = args[0];
  
closureN_type c_734889;
object e_735225 [4];
c_734889.hdr.mark = gc_color_red;
 c_734889.hdr.grayed = 0;
c_734889.tag = closureN_tag;
 c_734889.fn = (function_type)__lambda_16;
c_734889.num_args = 1;
c_734889.num_elements = 4;
c_734889.elements = (object *)e_735225;
c_734889.elements[0] = ((closureN)self_733722)->elements[0];
c_734889.elements[1] = ((closureN)self_733722)->elements[1];
c_734889.elements[2] = ((closureN)self_733722)->elements[2];
c_734889.elements[3] = ((closureN)self_733722)->elements[3];


make_pair(c_735228,quote_rest,NULL);c_735228.hdr.immutable = 1;

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

make_pair(c_735226,&c_735227,NULL);c_735226.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734889, r_732204, NULL, &c_735226);; 
}

static void __lambda_16(void *data, object self_733723, int argc, object *args) /* object self_733723, object r_732126 */
 {
 object r_732126 = args[0];
  
closureN_type c_734892;
object e_735224 [5];
c_734892.hdr.mark = gc_color_red;
 c_734892.hdr.grayed = 0;
c_734892.tag = closureN_tag;
 c_734892.fn = (function_type)__lambda_17;
c_734892.num_args = 1;
c_734892.num_elements = 5;
c_734892.elements = (object *)e_735224;
c_734892.elements[0] = ((closureN)self_733723)->elements[0];
c_734892.elements[1] = ((closureN)self_733723)->elements[1];
c_734892.elements[2] = r_732126;
c_734892.elements[3] = ((closureN)self_733723)->elements[2];
c_734892.elements[4] = ((closureN)self_733723)->elements[3];

return_closcall2(data,  ((closureN)self_733723)->elements[2],  &c_734892, quote_cond);; 
}

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

return_closcall2(data,  ((closureN)self_733724)->elements[3],  &c_734895, quote_null_127);; 
}

static void __lambda_18(void *data, object self_733725, int argc, object *args) /* object self_733725, object r_732195 */
 {
 object r_732195 = args[0];
  
closureN_type c_734898;
object e_735222 [7];
c_734898.hdr.mark = gc_color_red;
 c_734898.hdr.grayed = 0;
c_734898.tag = closureN_tag;
 c_734898.fn = (function_type)__lambda_19;
c_734898.num_args = 1;
c_734898.num_elements = 7;
c_734898.elements = (object *)e_735222;
c_734898.elements[0] = ((closureN)self_733725)->elements[0];
c_734898.elements[1] = ((closureN)self_733725)->elements[1];
c_734898.elements[2] = ((closureN)self_733725)->elements[2];
c_734898.elements[3] = ((closureN)self_733725)->elements[3];
c_734898.elements[4] = r_732195;
c_734898.elements[5] = ((closureN)self_733725)->elements[4];
c_734898.elements[6] = ((closureN)self_733725)->elements[5];

return_closcall2(data,  ((closureN)self_733725)->elements[4],  &c_734898, quote_maybe_91arg);; 
}

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


make_pair(c_735221,quote_maybe_91arg,NULL);c_735221.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734900, r_732198, NULL, &c_735221);; 
}

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


make_pair(c_735219,quote_maybe_91arg,NULL);c_735219.hdr.immutable = 1;

make_pair(c_735218,quote_null_127,&c_735219);c_735218.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734902, ((closureN)self_733727)->elements[4], r_732196, &c_735218);; 
}

static void __lambda_21(void *data, object self_733728, int argc, object *args) /* object self_733728, object r_732190 */
 {
 object r_732190 = args[0];
  
closureN_type c_734904;
object e_735209 [6];
c_734904.hdr.mark = gc_color_red;
 c_734904.hdr.grayed = 0;
c_734904.tag = closureN_tag;
 c_734904.fn = (function_type)__lambda_22;
c_734904.num_args = 1;
c_734904.num_elements = 6;
c_734904.elements = (object *)e_735209;
c_734904.elements[0] = ((closureN)self_733728)->elements[0];
c_734904.elements[1] = ((closureN)self_733728)->elements[1];
c_734904.elements[2] = ((closureN)self_733728)->elements[2];
c_734904.elements[3] = ((closureN)self_733728)->elements[3];
c_734904.elements[4] = r_732190;
c_734904.elements[5] = ((closureN)self_733728)->elements[4];






make_pair(c_735215,quote_default_91exp,NULL);c_735215.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734904, Cyc_car(data, Cyc_cdr(data, ((closureN)self_733728)->elements[5])), NULL, &c_735215);; 
}

static void __lambda_22(void *data, object self_733729, int argc, object *args) /* object self_733729, object r_732191 */
 {
 object r_732191 = args[0];
  
closureN_type c_734906;
object e_735203 [5];
c_734906.hdr.mark = gc_color_red;
 c_734906.hdr.grayed = 0;
c_734906.tag = closureN_tag;
 c_734906.fn = (function_type)__lambda_23;
c_734906.num_args = 1;
c_734906.num_elements = 5;
c_734906.elements = (object *)e_735203;
c_734906.elements[0] = ((closureN)self_733729)->elements[0];
c_734906.elements[1] = ((closureN)self_733729)->elements[1];
c_734906.elements[2] = ((closureN)self_733729)->elements[2];
c_734906.elements[3] = ((closureN)self_733729)->elements[3];
c_734906.elements[4] = ((closureN)self_733729)->elements[5];


make_pair(c_735207,quote_maybe_91arg,NULL);c_735207.hdr.immutable = 1;

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

make_pair(c_735208,quote_default_91exp,NULL);c_735208.hdr.immutable = 1;

make_pair(c_735205,&c_735206,&c_735208);c_735205.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734906, ((closureN)self_733729)->elements[4], r_732191, &c_735205);; 
}

static void __lambda_23(void *data, object self_733730, int argc, object *args) /* object self_733730, object r_732135 */
 {
 object r_732135 = args[0];
  
closureN_type c_734909;
object e_735202 [6];
c_734909.hdr.mark = gc_color_red;
 c_734909.hdr.grayed = 0;
c_734909.tag = closureN_tag;
 c_734909.fn = (function_type)__lambda_24;
c_734909.num_args = 1;
c_734909.num_elements = 6;
c_734909.elements = (object *)e_735202;
c_734909.elements[0] = ((closureN)self_733730)->elements[0];
c_734909.elements[1] = ((closureN)self_733730)->elements[1];
c_734909.elements[2] = ((closureN)self_733730)->elements[2];
c_734909.elements[3] = ((closureN)self_733730)->elements[3];
c_734909.elements[4] = r_732135;
c_734909.elements[5] = ((closureN)self_733730)->elements[4];

return_closcall2(data,  ((closureN)self_733730)->elements[4],  &c_734909, quote_null_127);; 
}

static void __lambda_24(void *data, object self_733731, int argc, object *args) /* object self_733731, object r_732175 */
 {
 object r_732175 = args[0];
  
closureN_type c_734912;
object e_735201 [7];
c_734912.hdr.mark = gc_color_red;
 c_734912.hdr.grayed = 0;
c_734912.tag = closureN_tag;
 c_734912.fn = (function_type)__lambda_25;
c_734912.num_args = 1;
c_734912.num_elements = 7;
c_734912.elements = (object *)e_735201;
c_734912.elements[0] = ((closureN)self_733731)->elements[0];
c_734912.elements[1] = ((closureN)self_733731)->elements[1];
c_734912.elements[2] = ((closureN)self_733731)->elements[2];
c_734912.elements[3] = ((closureN)self_733731)->elements[3];
c_734912.elements[4] = ((closureN)self_733731)->elements[4];
c_734912.elements[5] = r_732175;
c_734912.elements[6] = ((closureN)self_733731)->elements[5];

return_closcall2(data,  ((closureN)self_733731)->elements[5],  &c_734912, quote_cdr);; 
}

static void __lambda_25(void *data, object self_733732, int argc, object *args) /* object self_733732, object r_732181 */
 {
 object r_732181 = args[0];
  
closureN_type c_734915;
object e_735200 [8];
c_734915.hdr.mark = gc_color_red;
 c_734915.hdr.grayed = 0;
c_734915.tag = closureN_tag;
 c_734915.fn = (function_type)__lambda_26;
c_734915.num_args = 1;
c_734915.num_elements = 8;
c_734915.elements = (object *)e_735200;
c_734915.elements[0] = ((closureN)self_733732)->elements[0];
c_734915.elements[1] = ((closureN)self_733732)->elements[1];
c_734915.elements[2] = ((closureN)self_733732)->elements[2];
c_734915.elements[3] = ((closureN)self_733732)->elements[3];
c_734915.elements[4] = ((closureN)self_733732)->elements[4];
c_734915.elements[5] = ((closureN)self_733732)->elements[5];
c_734915.elements[6] = r_732181;
c_734915.elements[7] = ((closureN)self_733732)->elements[6];

return_closcall2(data,  ((closureN)self_733732)->elements[6],  &c_734915, quote_maybe_91arg);; 
}

static void __lambda_26(void *data, object self_733733, int argc, object *args) /* object self_733733, object r_732184 */
 {
 object r_732184 = args[0];
  
closureN_type c_734917;
object e_735198 [8];
c_734917.hdr.mark = gc_color_red;
 c_734917.hdr.grayed = 0;
c_734917.tag = closureN_tag;
 c_734917.fn = (function_type)__lambda_27;
c_734917.num_args = 1;
c_734917.num_elements = 8;
c_734917.elements = (object *)e_735198;
c_734917.elements[0] = ((closureN)self_733733)->elements[0];
c_734917.elements[1] = ((closureN)self_733733)->elements[1];
c_734917.elements[2] = ((closureN)self_733733)->elements[2];
c_734917.elements[3] = ((closureN)self_733733)->elements[3];
c_734917.elements[4] = ((closureN)self_733733)->elements[4];
c_734917.elements[5] = ((closureN)self_733733)->elements[5];
c_734917.elements[6] = ((closureN)self_733733)->elements[6];
c_734917.elements[7] = ((closureN)self_733733)->elements[7];


make_pair(c_735199,quote_maybe_91arg,NULL);c_735199.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734917, r_732184, NULL, &c_735199);; 
}

static void __lambda_27(void *data, object self_733734, int argc, object *args) /* object self_733734, object r_732182 */
 {
 object r_732182 = args[0];
  
closureN_type c_734919;
object e_735194 [7];
c_734919.hdr.mark = gc_color_red;
 c_734919.hdr.grayed = 0;
c_734919.tag = closureN_tag;
 c_734919.fn = (function_type)__lambda_28;
c_734919.num_args = 1;
c_734919.num_elements = 7;
c_734919.elements = (object *)e_735194;
c_734919.elements[0] = ((closureN)self_733734)->elements[0];
c_734919.elements[1] = ((closureN)self_733734)->elements[1];
c_734919.elements[2] = ((closureN)self_733734)->elements[2];
c_734919.elements[3] = ((closureN)self_733734)->elements[3];
c_734919.elements[4] = ((closureN)self_733734)->elements[4];
c_734919.elements[5] = ((closureN)self_733734)->elements[5];
c_734919.elements[6] = ((closureN)self_733734)->elements[7];


make_pair(c_735197,quote_maybe_91arg,NULL);c_735197.hdr.immutable = 1;

make_pair(c_735196,quote_cdr,&c_735197);c_735196.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734919, ((closureN)self_733734)->elements[6], r_732182, &c_735196);; 
}

static void __lambda_28(void *data, object self_733735, int argc, object *args) /* object self_733735, object r_732178 */
 {
 object r_732178 = args[0];
  
closureN_type c_734921;
object e_735190 [7];
c_734921.hdr.mark = gc_color_red;
 c_734921.hdr.grayed = 0;
c_734921.tag = closureN_tag;
 c_734921.fn = (function_type)__lambda_29;
c_734921.num_args = 1;
c_734921.num_elements = 7;
c_734921.elements = (object *)e_735190;
c_734921.elements[0] = ((closureN)self_733735)->elements[0];
c_734921.elements[1] = ((closureN)self_733735)->elements[1];
c_734921.elements[2] = ((closureN)self_733735)->elements[2];
c_734921.elements[3] = ((closureN)self_733735)->elements[3];
c_734921.elements[4] = ((closureN)self_733735)->elements[4];
c_734921.elements[5] = ((closureN)self_733735)->elements[5];
c_734921.elements[6] = ((closureN)self_733735)->elements[6];


make_pair(c_735193,quote_maybe_91arg,NULL);c_735193.hdr.immutable = 1;

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

make_pair(c_735191,&c_735192,NULL);c_735191.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734921, r_732178, NULL, &c_735191);; 
}

static void __lambda_29(void *data, object self_733736, int argc, object *args) /* object self_733736, object r_732176 */
 {
 object r_732176 = args[0];
  
closureN_type c_734923;
object e_735184 [6];
c_734923.hdr.mark = gc_color_red;
 c_734923.hdr.grayed = 0;
c_734923.tag = closureN_tag;
 c_734923.fn = (function_type)__lambda_30;
c_734923.num_args = 1;
c_734923.num_elements = 6;
c_734923.elements = (object *)e_735184;
c_734923.elements[0] = ((closureN)self_733736)->elements[0];
c_734923.elements[1] = ((closureN)self_733736)->elements[1];
c_734923.elements[2] = ((closureN)self_733736)->elements[2];
c_734923.elements[3] = ((closureN)self_733736)->elements[3];
c_734923.elements[4] = ((closureN)self_733736)->elements[4];
c_734923.elements[5] = ((closureN)self_733736)->elements[6];


make_pair(c_735189,quote_maybe_91arg,NULL);c_735189.hdr.immutable = 1;

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

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

make_pair(c_735186,quote_null_127,&c_735187);c_735186.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734923, ((closureN)self_733736)->elements[5], r_732176, &c_735186);; 
}

static void __lambda_30(void *data, object self_733737, int argc, object *args) /* object self_733737, object r_732161 */
 {
 object r_732161 = args[0];
  
closureN_type c_734926;
object e_735183 [7];
c_734926.hdr.mark = gc_color_red;
 c_734926.hdr.grayed = 0;
c_734926.tag = closureN_tag;
 c_734926.fn = (function_type)__lambda_31;
c_734926.num_args = 1;
c_734926.num_elements = 7;
c_734926.elements = (object *)e_735183;
c_734926.elements[0] = ((closureN)self_733737)->elements[0];
c_734926.elements[1] = ((closureN)self_733737)->elements[1];
c_734926.elements[2] = ((closureN)self_733737)->elements[2];
c_734926.elements[3] = ((closureN)self_733737)->elements[3];
c_734926.elements[4] = ((closureN)self_733737)->elements[4];
c_734926.elements[5] = r_732161;
c_734926.elements[6] = ((closureN)self_733737)->elements[5];

return_closcall2(data,  ((closureN)self_733737)->elements[5],  &c_734926, quote_car);; 
}

static void __lambda_31(void *data, object self_733738, int argc, object *args) /* object self_733738, object r_732167 */
 {
 object r_732167 = args[0];
  
closureN_type c_734929;
object e_735182 [8];
c_734929.hdr.mark = gc_color_red;
 c_734929.hdr.grayed = 0;
c_734929.tag = closureN_tag;
 c_734929.fn = (function_type)__lambda_32;
c_734929.num_args = 1;
c_734929.num_elements = 8;
c_734929.elements = (object *)e_735182;
c_734929.elements[0] = ((closureN)self_733738)->elements[0];
c_734929.elements[1] = ((closureN)self_733738)->elements[1];
c_734929.elements[2] = ((closureN)self_733738)->elements[2];
c_734929.elements[3] = ((closureN)self_733738)->elements[3];
c_734929.elements[4] = ((closureN)self_733738)->elements[4];
c_734929.elements[5] = ((closureN)self_733738)->elements[5];
c_734929.elements[6] = r_732167;
c_734929.elements[7] = ((closureN)self_733738)->elements[6];

return_closcall2(data,  ((closureN)self_733738)->elements[6],  &c_734929, quote_maybe_91arg);; 
}

static void __lambda_32(void *data, object self_733739, int argc, object *args) /* object self_733739, object r_732170 */
 {
 object r_732170 = args[0];
  
closureN_type c_734931;
object e_735180 [8];
c_734931.hdr.mark = gc_color_red;
 c_734931.hdr.grayed = 0;
c_734931.tag = closureN_tag;
 c_734931.fn = (function_type)__lambda_33;
c_734931.num_args = 1;
c_734931.num_elements = 8;
c_734931.elements = (object *)e_735180;
c_734931.elements[0] = ((closureN)self_733739)->elements[0];
c_734931.elements[1] = ((closureN)self_733739)->elements[1];
c_734931.elements[2] = ((closureN)self_733739)->elements[2];
c_734931.elements[3] = ((closureN)self_733739)->elements[3];
c_734931.elements[4] = ((closureN)self_733739)->elements[4];
c_734931.elements[5] = ((closureN)self_733739)->elements[5];
c_734931.elements[6] = ((closureN)self_733739)->elements[6];
c_734931.elements[7] = ((closureN)self_733739)->elements[7];


make_pair(c_735181,quote_maybe_91arg,NULL);c_735181.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734931, r_732170, NULL, &c_735181);; 
}

static void __lambda_33(void *data, object self_733740, int argc, object *args) /* object self_733740, object r_732168 */
 {
 object r_732168 = args[0];
  
closureN_type c_734933;
object e_735176 [7];
c_734933.hdr.mark = gc_color_red;
 c_734933.hdr.grayed = 0;
c_734933.tag = closureN_tag;
 c_734933.fn = (function_type)__lambda_34;
c_734933.num_args = 1;
c_734933.num_elements = 7;
c_734933.elements = (object *)e_735176;
c_734933.elements[0] = ((closureN)self_733740)->elements[0];
c_734933.elements[1] = ((closureN)self_733740)->elements[1];
c_734933.elements[2] = ((closureN)self_733740)->elements[2];
c_734933.elements[3] = ((closureN)self_733740)->elements[3];
c_734933.elements[4] = ((closureN)self_733740)->elements[4];
c_734933.elements[5] = ((closureN)self_733740)->elements[5];
c_734933.elements[6] = ((closureN)self_733740)->elements[7];


make_pair(c_735179,quote_maybe_91arg,NULL);c_735179.hdr.immutable = 1;

make_pair(c_735178,quote_car,&c_735179);c_735178.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734933, ((closureN)self_733740)->elements[6], r_732168, &c_735178);; 
}

static void __lambda_34(void *data, object self_733741, int argc, object *args) /* object self_733741, object r_732164 */
 {
 object r_732164 = args[0];
  
closureN_type c_734935;
object e_735172 [7];
c_734935.hdr.mark = gc_color_red;
 c_734935.hdr.grayed = 0;
c_734935.tag = closureN_tag;
 c_734935.fn = (function_type)__lambda_35;
c_734935.num_args = 1;
c_734935.num_elements = 7;
c_734935.elements = (object *)e_735172;
c_734935.elements[0] = ((closureN)self_733741)->elements[0];
c_734935.elements[1] = ((closureN)self_733741)->elements[1];
c_734935.elements[2] = ((closureN)self_733741)->elements[2];
c_734935.elements[3] = ((closureN)self_733741)->elements[3];
c_734935.elements[4] = ((closureN)self_733741)->elements[4];
c_734935.elements[5] = ((closureN)self_733741)->elements[5];
c_734935.elements[6] = ((closureN)self_733741)->elements[6];


make_pair(c_735175,quote_maybe_91arg,NULL);c_735175.hdr.immutable = 1;

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

make_pair(c_735173,&c_735174,NULL);c_735173.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734935, r_732164, NULL, &c_735173);; 
}

static void __lambda_35(void *data, object self_733742, int argc, object *args) /* object self_733742, object r_732162 */
 {
 object r_732162 = args[0];
  
closureN_type c_734937;
object e_735162 [6];
c_734937.hdr.mark = gc_color_red;
 c_734937.hdr.grayed = 0;
c_734937.tag = closureN_tag;
 c_734937.fn = (function_type)__lambda_36;
c_734937.num_args = 1;
c_734937.num_elements = 6;
c_734937.elements = (object *)e_735162;
c_734937.elements[0] = ((closureN)self_733742)->elements[0];
c_734937.elements[1] = ((closureN)self_733742)->elements[1];
c_734937.elements[2] = ((closureN)self_733742)->elements[2];
c_734937.elements[3] = ((closureN)self_733742)->elements[3];
c_734937.elements[4] = ((closureN)self_733742)->elements[4];
c_734937.elements[5] = ((closureN)self_733742)->elements[6];


make_pair(c_735168,quote_maybe_91arg,NULL);c_735168.hdr.immutable = 1;

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

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

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

make_pair(c_735171,quote_maybe_91arg,NULL);c_735171.hdr.immutable = 1;

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

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

make_pair(c_735164,&c_735165,&c_735169);c_735164.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734937, ((closureN)self_733742)->elements[5], r_732162, &c_735164);; 
}

static void __lambda_36(void *data, object self_733743, int argc, object *args) /* object self_733743, object r_732138 */
 {
 object r_732138 = args[0];
  
closureN_type c_734940;
object e_735161 [7];
c_734940.hdr.mark = gc_color_red;
 c_734940.hdr.grayed = 0;
c_734940.tag = closureN_tag;
 c_734940.fn = (function_type)__lambda_37;
c_734940.num_args = 1;
c_734940.num_elements = 7;
c_734940.elements = (object *)e_735161;
c_734940.elements[0] = ((closureN)self_733743)->elements[0];
c_734940.elements[1] = ((closureN)self_733743)->elements[1];
c_734940.elements[2] = ((closureN)self_733743)->elements[2];
c_734940.elements[3] = ((closureN)self_733743)->elements[3];
c_734940.elements[4] = ((closureN)self_733743)->elements[4];
c_734940.elements[5] = r_732138;
c_734940.elements[6] = ((closureN)self_733743)->elements[5];

return_closcall2(data,  ((closureN)self_733743)->elements[5],  &c_734940, quote__else);; 
}

static void __lambda_37(void *data, object self_733744, int argc, object *args) /* object self_733744, object r_732144 */
 {
 object r_732144 = args[0];
  
closureN_type c_734943;
object e_735160 [8];
c_734943.hdr.mark = gc_color_red;
 c_734943.hdr.grayed = 0;
c_734943.tag = closureN_tag;
 c_734943.fn = (function_type)__lambda_38;
c_734943.num_args = 1;
c_734943.num_elements = 8;
c_734943.elements = (object *)e_735160;
c_734943.elements[0] = ((closureN)self_733744)->elements[0];
c_734943.elements[1] = ((closureN)self_733744)->elements[1];
c_734943.elements[2] = ((closureN)self_733744)->elements[2];
c_734943.elements[3] = ((closureN)self_733744)->elements[3];
c_734943.elements[4] = ((closureN)self_733744)->elements[4];
c_734943.elements[5] = ((closureN)self_733744)->elements[5];
c_734943.elements[6] = r_732144;
c_734943.elements[7] = ((closureN)self_733744)->elements[6];

return_closcall2(data,  ((closureN)self_733744)->elements[6],  &c_734943, quote_error);; 
}

static void __lambda_38(void *data, object self_733745, int argc, object *args) /* object self_733745, object r_732150 */
 {
 object r_732150 = args[0];
  
closureN_type c_734946;
object e_735159 [8];
c_734946.hdr.mark = gc_color_red;
 c_734946.hdr.grayed = 0;
c_734946.tag = closureN_tag;
 c_734946.fn = (function_type)__lambda_39;
c_734946.num_args = 1;
c_734946.num_elements = 8;
c_734946.elements = (object *)e_735159;
c_734946.elements[0] = ((closureN)self_733745)->elements[0];
c_734946.elements[1] = ((closureN)self_733745)->elements[1];
c_734946.elements[2] = ((closureN)self_733745)->elements[2];
c_734946.elements[3] = ((closureN)self_733745)->elements[3];
c_734946.elements[4] = ((closureN)self_733745)->elements[4];
c_734946.elements[5] = ((closureN)self_733745)->elements[5];
c_734946.elements[6] = ((closureN)self_733745)->elements[6];
c_734946.elements[7] = r_732150;

return_closcall2(data,  ((closureN)self_733745)->elements[7],  &c_734946, quote_maybe_91arg);; 
}

static void __lambda_39(void *data, object self_733746, int argc, object *args) /* object self_733746, object r_732155 */
 {
 object r_732155 = args[0];
  
closureN_type c_734948;
object e_735157 [8];
c_734948.hdr.mark = gc_color_red;
 c_734948.hdr.grayed = 0;
c_734948.tag = closureN_tag;
 c_734948.fn = (function_type)__lambda_40;
c_734948.num_args = 1;
c_734948.num_elements = 8;
c_734948.elements = (object *)e_735157;
c_734948.elements[0] = ((closureN)self_733746)->elements[0];
c_734948.elements[1] = ((closureN)self_733746)->elements[1];
c_734948.elements[2] = ((closureN)self_733746)->elements[2];
c_734948.elements[3] = ((closureN)self_733746)->elements[3];
c_734948.elements[4] = ((closureN)self_733746)->elements[4];
c_734948.elements[5] = ((closureN)self_733746)->elements[5];
c_734948.elements[6] = ((closureN)self_733746)->elements[6];
c_734948.elements[7] = ((closureN)self_733746)->elements[7];


make_pair(c_735158,quote_maybe_91arg,NULL);c_735158.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734948, r_732155, NULL, &c_735158);; 
}

static void __lambda_40(void *data, object self_733747, int argc, object *args) /* object self_733747, object r_732153 */
 {
 object r_732153 = args[0];
  
closureN_type c_734950;
object e_735152 [8];
c_734950.hdr.mark = gc_color_red;
 c_734950.hdr.grayed = 0;
c_734950.tag = closureN_tag;
 c_734950.fn = (function_type)__lambda_41;
c_734950.num_args = 1;
c_734950.num_elements = 8;
c_734950.elements = (object *)e_735152;
c_734950.elements[0] = ((closureN)self_733747)->elements[0];
c_734950.elements[1] = ((closureN)self_733747)->elements[1];
c_734950.elements[2] = ((closureN)self_733747)->elements[2];
c_734950.elements[3] = ((closureN)self_733747)->elements[3];
c_734950.elements[4] = ((closureN)self_733747)->elements[4];
c_734950.elements[5] = ((closureN)self_733747)->elements[5];
c_734950.elements[6] = ((closureN)self_733747)->elements[6];
c_734950.elements[7] = ((closureN)self_733747)->elements[7];


make_utf8_string_with_len(c_735153, "too many optional arguments", 27, 27);

make_utf8_string_with_len(c_735155, "too many optional arguments", 27, 27);c_735155.hdr.immutable = 1;

make_pair(c_735156,quote_maybe_91arg,NULL);c_735156.hdr.immutable = 1;

make_pair(c_735154,&c_735155,&c_735156);c_735154.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734950, &c_735153, r_732153, &c_735154);; 
}

static void __lambda_41(void *data, object self_733748, int argc, object *args) /* object self_733748, object r_732151 */
 {
 object r_732151 = args[0];
  
closureN_type c_734952;
object e_735146 [7];
c_734952.hdr.mark = gc_color_red;
 c_734952.hdr.grayed = 0;
c_734952.tag = closureN_tag;
 c_734952.fn = (function_type)__lambda_42;
c_734952.num_args = 1;
c_734952.num_elements = 7;
c_734952.elements = (object *)e_735146;
c_734952.elements[0] = ((closureN)self_733748)->elements[0];
c_734952.elements[1] = ((closureN)self_733748)->elements[1];
c_734952.elements[2] = ((closureN)self_733748)->elements[2];
c_734952.elements[3] = ((closureN)self_733748)->elements[3];
c_734952.elements[4] = ((closureN)self_733748)->elements[4];
c_734952.elements[5] = ((closureN)self_733748)->elements[5];
c_734952.elements[6] = ((closureN)self_733748)->elements[6];


make_utf8_string_with_len(c_735150, "too many optional arguments", 27, 27);c_735150.hdr.immutable = 1;

make_pair(c_735151,quote_maybe_91arg,NULL);c_735151.hdr.immutable = 1;

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

make_pair(c_735148,quote_error,&c_735149);c_735148.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734952, ((closureN)self_733748)->elements[7], r_732151, &c_735148);; 
}

static void __lambda_42(void *data, object self_733749, int argc, object *args) /* object self_733749, object r_732147 */
 {
 object r_732147 = args[0];
  
closureN_type c_734954;
object e_735140 [7];
c_734954.hdr.mark = gc_color_red;
 c_734954.hdr.grayed = 0;
c_734954.tag = closureN_tag;
 c_734954.fn = (function_type)__lambda_43;
c_734954.num_args = 1;
c_734954.num_elements = 7;
c_734954.elements = (object *)e_735140;
c_734954.elements[0] = ((closureN)self_733749)->elements[0];
c_734954.elements[1] = ((closureN)self_733749)->elements[1];
c_734954.elements[2] = ((closureN)self_733749)->elements[2];
c_734954.elements[3] = ((closureN)self_733749)->elements[3];
c_734954.elements[4] = ((closureN)self_733749)->elements[4];
c_734954.elements[5] = ((closureN)self_733749)->elements[5];
c_734954.elements[6] = ((closureN)self_733749)->elements[6];


make_utf8_string_with_len(c_735144, "too many optional arguments", 27, 27);c_735144.hdr.immutable = 1;

make_pair(c_735145,quote_maybe_91arg,NULL);c_735145.hdr.immutable = 1;

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

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

make_pair(c_735141,&c_735142,NULL);c_735141.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734954, r_732147, NULL, &c_735141);; 
}

static void __lambda_43(void *data, object self_733750, int argc, object *args) /* object self_733750, object r_732145 */
 {
 object r_732145 = args[0];
  
closureN_type c_734956;
object e_735132 [6];
c_734956.hdr.mark = gc_color_red;
 c_734956.hdr.grayed = 0;
c_734956.tag = closureN_tag;
 c_734956.fn = (function_type)__lambda_44;
c_734956.num_args = 1;
c_734956.num_elements = 6;
c_734956.elements = (object *)e_735132;
c_734956.elements[0] = ((closureN)self_733750)->elements[0];
c_734956.elements[1] = ((closureN)self_733750)->elements[1];
c_734956.elements[2] = ((closureN)self_733750)->elements[2];
c_734956.elements[3] = ((closureN)self_733750)->elements[3];
c_734956.elements[4] = ((closureN)self_733750)->elements[4];
c_734956.elements[5] = ((closureN)self_733750)->elements[5];


make_utf8_string_with_len(c_735138, "too many optional arguments", 27, 27);c_735138.hdr.immutable = 1;

make_pair(c_735139,quote_maybe_91arg,NULL);c_735139.hdr.immutable = 1;

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

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

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

make_pair(c_735134,quote__else,&c_735135);c_735134.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734956, ((closureN)self_733750)->elements[6], r_732145, &c_735134);; 
}

static void __lambda_44(void *data, object self_733751, int argc, object *args) /* object self_733751, object r_732141 */
 {
 object r_732141 = args[0];
  
closureN_type c_734958;
object e_735124 [6];
c_734958.hdr.mark = gc_color_red;
 c_734958.hdr.grayed = 0;
c_734958.tag = closureN_tag;
 c_734958.fn = (function_type)__lambda_45;
c_734958.num_args = 1;
c_734958.num_elements = 6;
c_734958.elements = (object *)e_735124;
c_734958.elements[0] = ((closureN)self_733751)->elements[0];
c_734958.elements[1] = ((closureN)self_733751)->elements[1];
c_734958.elements[2] = ((closureN)self_733751)->elements[2];
c_734958.elements[3] = ((closureN)self_733751)->elements[3];
c_734958.elements[4] = ((closureN)self_733751)->elements[4];
c_734958.elements[5] = ((closureN)self_733751)->elements[5];


make_utf8_string_with_len(c_735130, "too many optional arguments", 27, 27);c_735130.hdr.immutable = 1;

make_pair(c_735131,quote_maybe_91arg,NULL);c_735131.hdr.immutable = 1;

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

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

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

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

make_pair(c_735125,&c_735126,NULL);c_735125.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734958, r_732141, NULL, &c_735125);; 
}

static void __lambda_45(void *data, object self_733752, int argc, object *args) /* object self_733752, object r_732139 */
 {
 object r_732139 = args[0];
  
closureN_type c_734960;
object e_735106 [5];
c_734960.hdr.mark = gc_color_red;
 c_734960.hdr.grayed = 0;
c_734960.tag = closureN_tag;
 c_734960.fn = (function_type)__lambda_46;
c_734960.num_args = 1;
c_734960.num_elements = 5;
c_734960.elements = (object *)e_735106;
c_734960.elements[0] = ((closureN)self_733752)->elements[0];
c_734960.elements[1] = ((closureN)self_733752)->elements[1];
c_734960.elements[2] = ((closureN)self_733752)->elements[2];
c_734960.elements[3] = ((closureN)self_733752)->elements[3];
c_734960.elements[4] = ((closureN)self_733752)->elements[4];


make_pair(c_735113,quote_maybe_91arg,NULL);c_735113.hdr.immutable = 1;

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

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

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

make_pair(c_735116,quote_maybe_91arg,NULL);c_735116.hdr.immutable = 1;

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

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

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

make_utf8_string_with_len(c_735122, "too many optional arguments", 27, 27);c_735122.hdr.immutable = 1;

make_pair(c_735123,quote_maybe_91arg,NULL);c_735123.hdr.immutable = 1;

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

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

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

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

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

make_pair(c_735108,&c_735109,&c_735117);c_735108.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734960, ((closureN)self_733752)->elements[5], r_732139, &c_735108);; 
}

static void __lambda_46(void *data, object self_733753, int argc, object *args) /* object self_733753, object r_732136 */
 {
 object r_732136 = args[0];
  
closureN_type c_734962;
object e_735083 [4];
c_734962.hdr.mark = gc_color_red;
 c_734962.hdr.grayed = 0;
c_734962.tag = closureN_tag;
 c_734962.fn = (function_type)__lambda_47;
c_734962.num_args = 1;
c_734962.num_elements = 4;
c_734962.elements = (object *)e_735083;
c_734962.elements[0] = ((closureN)self_733753)->elements[0];
c_734962.elements[1] = ((closureN)self_733753)->elements[1];
c_734962.elements[2] = ((closureN)self_733753)->elements[2];
c_734962.elements[3] = ((closureN)self_733753)->elements[3];


make_pair(c_735088,quote_maybe_91arg,NULL);c_735088.hdr.immutable = 1;

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

make_pair(c_735089,quote_default_91exp,NULL);c_735089.hdr.immutable = 1;

make_pair(c_735086,&c_735087,&c_735089);c_735086.hdr.immutable = 1;

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

make_pair(c_735094,quote_cdr,&c_735095);c_735094.hdr.immutable = 1;

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

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

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

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

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

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

make_utf8_string_with_len(c_735104, "too many optional arguments", 27, 27);c_735104.hdr.immutable = 1;

make_pair(c_735105,quote_maybe_91arg,NULL);c_735105.hdr.immutable = 1;

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

make_pair(c_735102,quote_error,&c_735103);c_735102.hdr.immutable = 1;

make_pair(c_735101,&c_735102,NULL);c_735101.hdr.immutable = 1;

make_pair(c_735100,quote__else,&c_735101);c_735100.hdr.immutable = 1;

make_pair(c_735099,&c_735100,NULL);c_735099.hdr.immutable = 1;

make_pair(c_735090,&c_735091,&c_735099);c_735090.hdr.immutable = 1;

make_pair(c_735085,&c_735086,&c_735090);c_735085.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734962, ((closureN)self_733753)->elements[4], r_732136, &c_735085);; 
}

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


make_pair(c_735065,quote_maybe_91arg,NULL);c_735065.hdr.immutable = 1;

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

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

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

make_pair(c_735072,quote_maybe_91arg,NULL);c_735072.hdr.immutable = 1;

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

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

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

make_pair(c_735075,quote_maybe_91arg,NULL);c_735075.hdr.immutable = 1;

make_pair(c_735074,quote_car,&c_735075);c_735074.hdr.immutable = 1;

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

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

make_utf8_string_with_len(c_735081, "too many optional arguments", 27, 27);c_735081.hdr.immutable = 1;

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

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

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

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

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

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

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

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

make_pair(c_735061,quote_cond,&c_735062);c_735061.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734964, ((closureN)self_733754)->elements[3], r_732133, &c_735061);; 
}

static void __lambda_48(void *data, object self_733755, int argc, object *args) /* object self_733755, object r_732129 */
 {
 object r_732129 = args[0];
  
closureN_type c_734966;
object e_735035 [3];
c_734966.hdr.mark = gc_color_red;
 c_734966.hdr.grayed = 0;
c_734966.tag = closureN_tag;
 c_734966.fn = (function_type)__lambda_49;
c_734966.num_args = 1;
c_734966.num_elements = 3;
c_734966.elements = (object *)e_735035;
c_734966.elements[0] = ((closureN)self_733755)->elements[0];
c_734966.elements[1] = ((closureN)self_733755)->elements[1];
c_734966.elements[2] = ((closureN)self_733755)->elements[2];


make_pair(c_735041,quote_maybe_91arg,NULL);c_735041.hdr.immutable = 1;

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

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

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

make_pair(c_735048,quote_maybe_91arg,NULL);c_735048.hdr.immutable = 1;

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

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

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

make_pair(c_735051,quote_maybe_91arg,NULL);c_735051.hdr.immutable = 1;

make_pair(c_735050,quote_car,&c_735051);c_735050.hdr.immutable = 1;

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

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

make_utf8_string_with_len(c_735057, "too many optional arguments", 27, 27);c_735057.hdr.immutable = 1;

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

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

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

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

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

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

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

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

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

make_pair(c_735036,&c_735037,NULL);c_735036.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734966, r_732129, NULL, &c_735036);; 
}

static void __lambda_49(void *data, object self_733756, int argc, object *args) /* object self_733756, object r_732127 */
 {
 object r_732127 = args[0];
  
closureN_type c_734968;
object e_735006 [2];
c_734968.hdr.mark = gc_color_red;
 c_734968.hdr.grayed = 0;
c_734968.tag = closureN_tag;
 c_734968.fn = (function_type)__lambda_50;
c_734968.num_args = 1;
c_734968.num_elements = 2;
c_734968.elements = (object *)e_735006;
c_734968.elements[0] = ((closureN)self_733756)->elements[0];
c_734968.elements[1] = ((closureN)self_733756)->elements[1];


make_pair(c_735011,quote_rest,NULL);c_735011.hdr.immutable = 1;

make_pair(c_735010,quote_maybe_91arg,&c_735011);c_735010.hdr.immutable = 1;

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

make_pair(c_735017,quote_maybe_91arg,NULL);c_735017.hdr.immutable = 1;

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

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

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

make_pair(c_735024,quote_maybe_91arg,NULL);c_735024.hdr.immutable = 1;

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

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

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

make_pair(c_735027,quote_maybe_91arg,NULL);c_735027.hdr.immutable = 1;

make_pair(c_735026,quote_car,&c_735027);c_735026.hdr.immutable = 1;

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

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

make_utf8_string_with_len(c_735033, "too many optional arguments", 27, 27);c_735033.hdr.immutable = 1;

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

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

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

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

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

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

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

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

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

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

make_pair(c_735008,&c_735009,&c_735012);c_735008.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734968, ((closureN)self_733756)->elements[2], r_732127, &c_735008);; 
}

static void __lambda_50(void *data, object self_733757, int argc, object *args) /* object self_733757, object r_732124 */
 {
 object r_732124 = args[0];
  
closureN_type c_734970;
object e_734976 [1];
c_734970.hdr.mark = gc_color_red;
 c_734970.hdr.grayed = 0;
c_734970.tag = closureN_tag;
 c_734970.fn = (function_type)__lambda_51;
c_734970.num_args = 1;
c_734970.num_elements = 1;
c_734970.elements = (object *)e_734976;
c_734970.elements[0] = ((closureN)self_733757)->elements[0];


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

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

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

make_pair(c_734988,quote_maybe_91arg,NULL);c_734988.hdr.immutable = 1;

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

make_pair(c_734989,quote_default_91exp,NULL);c_734989.hdr.immutable = 1;

make_pair(c_734986,&c_734987,&c_734989);c_734986.hdr.immutable = 1;

make_pair(c_734995,quote_maybe_91arg,NULL);c_734995.hdr.immutable = 1;

make_pair(c_734994,quote_cdr,&c_734995);c_734994.hdr.immutable = 1;

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

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

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

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

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

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

make_utf8_string_with_len(c_735004, "too many optional arguments", 27, 27);c_735004.hdr.immutable = 1;

make_pair(c_735005,quote_maybe_91arg,NULL);c_735005.hdr.immutable = 1;

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

make_pair(c_735002,quote_error,&c_735003);c_735002.hdr.immutable = 1;

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

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

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

make_pair(c_734990,&c_734991,&c_734999);c_734990.hdr.immutable = 1;

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

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

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

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

make_pair(c_734978,quote_let,&c_734979);c_734978.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_734970, ((closureN)self_733757)->elements[1], r_732124, &c_734978);; 
}

static void __lambda_51(void *data, object self_733758, int argc, object *args) /* object self_733758, object r_732122 */
 {
 object r_732122 = args[0];
  
pair_type local_734975; 
return_direct_with_clo1(data,  ((closureN)self_733758)->elements[0], (((closure)  ((closureN)self_733758)->elements[0])->fn),  set_pair_as_expr(&local_734975, r_732122, boolean_f));; 
}

static void __lambda_1(void *data, object _, int argc, object *args) /* closure _,object k_732100, object pred_731_731292, object val_732_731293, object caller_733_731294 */
 {
object k_732100 = args[0]; object pred_731_731292 = args[1]; object val_732_731293 = args[2]; object caller_733_731294 = args[3];
  Cyc_st_add(data, "srfi/1.sld:check-arg");

closureN_type c_734811;
object e_734857 [3];
c_734811.hdr.mark = gc_color_red;
 c_734811.hdr.grayed = 0;
c_734811.tag = closureN_tag;
 c_734811.fn = (function_type)__lambda_2;
c_734811.num_args = 1;
c_734811.num_elements = 3;
c_734811.elements = (object *)e_734857;
c_734811.elements[0] = caller_733_731294;
c_734811.elements[1] = k_732100;
c_734811.elements[2] = pred_731_731292;

return_direct_with_clo1(data,(closure)&c_734811,__lambda_2,  val_732_731293);; 
}

static void __lambda_2(void *data, object self_733705, int argc, object *args) /* object self_733705, object val_735_731295 */
 {
 object val_735_731295 = args[0];
  
closureN_type c_734813;
object e_734856 [4];
c_734813.hdr.mark = gc_color_red;
 c_734813.hdr.grayed = 0;
c_734813.tag = closureN_tag;
 c_734813.fn = (function_type)__lambda_3;
c_734813.num_args = 1;
c_734813.num_elements = 4;
c_734813.elements = (object *)e_734856;
c_734813.elements[0] = ((closureN)self_733705)->elements[0];
c_734813.elements[1] = ((closureN)self_733705)->elements[1];
c_734813.elements[2] = ((closureN)self_733705)->elements[2];
c_734813.elements[3] = val_735_731295;

return_direct_with_clo1(data,(closure)&c_734813,__lambda_3,  boolean_f);; 
}

static void __lambda_3(void *data, object self_733706, int argc, object *args) /* object self_733706, object lp_736_731296 */
 {
 object lp_736_731296 = args[0];
  
closureN_type c_734815;
object e_734852 [4];
c_734815.hdr.mark = gc_color_red;
 c_734815.hdr.grayed = 0;
c_734815.tag = closureN_tag;
 c_734815.fn = (function_type)__lambda_1126;
c_734815.num_args = 1;
c_734815.num_elements = 4;
c_734815.elements = (object *)e_734852;
c_734815.elements[0] = ((closureN)self_733706)->elements[0];
c_734815.elements[1] = ((closureN)self_733706)->elements[1];
c_734815.elements[2] = ((closureN)self_733706)->elements[2];
c_734815.elements[3] = ((closureN)self_733706)->elements[3];


pair_type local_734855; 
return_direct_with_clo1(data,(closure)&c_734815,__lambda_1126,  set_cell_as_expr(&local_734855, lp_736_731296));; 
}

static void __lambda_1126(void *data, object self_733707, int argc, object *args) /* object self_733707, object lp_736_731296 */
 {
 object lp_736_731296 = args[0];
  
closureN_type c_734817;
object e_734830 [3];
c_734817.hdr.mark = gc_color_red;
 c_734817.hdr.grayed = 0;
c_734817.tag = closureN_tag;
 c_734817.fn = (function_type)__lambda_4;
c_734817.num_args = 1;
c_734817.num_elements = 3;
c_734817.elements = (object *)e_734830;
c_734817.elements[0] = ((closureN)self_733707)->elements[1];
c_734817.elements[1] = lp_736_731296;
c_734817.elements[2] = ((closureN)self_733707)->elements[3];


closureN_type c_734831;
object e_734851 [3];
c_734831.hdr.mark = gc_color_red;
 c_734831.hdr.grayed = 0;
c_734831.tag = closureN_tag;
 c_734831.fn = (function_type)__lambda_6;
c_734831.num_args = 1;
c_734831.num_elements = 3;
c_734831.elements = (object *)e_734851;
c_734831.elements[0] = ((closureN)self_733707)->elements[0];
c_734831.elements[1] = lp_736_731296;
c_734831.elements[2] = ((closureN)self_733707)->elements[2];

return_direct_with_clo1(data,(closure)&c_734817,__lambda_4,  &c_734831);; 
}

static void __lambda_6(void *data, object self_733708, int argc, object *args) /* object self_733708, object k_732103, object val_737_731297 */
 {
 object k_732103 = args[0]; object val_737_731297 = args[1];
  
closureN_type c_734834;
object e_734850 [5];
c_734834.hdr.mark = gc_color_red;
 c_734834.hdr.grayed = 0;
c_734834.tag = closureN_tag;
 c_734834.fn = (function_type)__lambda_7;
c_734834.num_args = 1;
c_734834.num_elements = 5;
c_734834.elements = (object *)e_734850;
c_734834.elements[0] = ((closureN)self_733708)->elements[0];
c_734834.elements[1] = k_732103;
c_734834.elements[2] = ((closureN)self_733708)->elements[1];
c_734834.elements[3] = ((closureN)self_733708)->elements[2];
c_734834.elements[4] = val_737_731297;

return_closcall2(data,  ((closureN)self_733708)->elements[2],  &c_734834, val_737_731297);; 
}

static void __lambda_7(void *data, object self_733709, int argc, object *args) /* object self_733709, object r_732104 */
 {
 object r_732104 = args[0];
  if( (boolean_f != r_732104) ){ 
  return_direct_with_clo1(data,  ((closureN)self_733709)->elements[1], (((closure)  ((closureN)self_733709)->elements[1])->fn),  ((closureN)self_733709)->elements[4]);
} else { 
  
closureN_type c_734839;
object e_734845 [2];
c_734839.hdr.mark = gc_color_red;
 c_734839.hdr.grayed = 0;
c_734839.tag = closureN_tag;
 c_734839.fn = (function_type)__lambda_8;
c_734839.num_args = 1;
c_734839.num_elements = 2;
c_734839.elements = (object *)e_734845;
c_734839.elements[0] = ((closureN)self_733709)->elements[1];
c_734839.elements[1] = ((closureN)self_733709)->elements[2];


make_utf8_string_with_len(c_734846, "Bad argument", 12, 12);
return_direct_with_clo5(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  &c_734839, &c_734846, ((closureN)self_733709)->elements[4], ((closureN)self_733709)->elements[3], ((closureN)self_733709)->elements[0]);}
;; 
}

static void __lambda_8(void *data, object self_733710, int argc, object *args) /* object self_733710, object r_732105 */
 {
 object r_732105 = args[0];
  

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

static void __lambda_4(void *data, object self_733711, int argc, object *args) /* object self_733711, object r_732102 */
 {
 object r_732102 = args[0];
  
closureN_type c_734819;
object e_734826 [3];
c_734819.hdr.mark = gc_color_red;
 c_734819.hdr.grayed = 0;
c_734819.tag = closureN_tag;
 c_734819.fn = (function_type)__lambda_5;
c_734819.num_args = 1;
c_734819.num_elements = 3;
c_734819.elements = (object *)e_734826;
c_734819.elements[0] = ((closureN)self_733711)->elements[0];
c_734819.elements[1] = ((closureN)self_733711)->elements[1];
c_734819.elements[2] = ((closureN)self_733711)->elements[2];



return_direct_with_clo1(data,(closure)&c_734819,__lambda_5,  Cyc_set_cell(data, ((closureN)self_733711)->elements[1], r_732102));; 
}

static void __lambda_5(void *data, object self_733712, int argc, object *args) /* object self_733712, object r_732101 */
 {

  

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

void c_srfi1_inlinable_lambdas(void *data, object clo, int argc, object *args){ 
make_pair(pair_7312515, find_or_add_symbol("tenth"), find_or_add_symbol("tenth__inline__"));
make_pair(pair_7312516, find_or_add_symbol("ninth"), find_or_add_symbol("ninth__inline__"));
make_pair(pair_7312517, find_or_add_symbol("eighth"), find_or_add_symbol("eighth__inline__"));
make_pair(pair_7312518, find_or_add_symbol("seventh"), find_or_add_symbol("seventh__inline__"));
make_pair(pair_7312519, find_or_add_symbol("sixth"), find_or_add_symbol("sixth__inline__"));
make_pair(pair_7312520, find_or_add_symbol("fifth"), find_or_add_symbol("fifth__inline__"));
make_pair(pair_7312521, find_or_add_symbol("not-pair?"), find_or_add_symbol("not-pair?__inline__"));
make_pair(c_7312528, &pair_7312515, NULL);
make_pair(c_7312527, &pair_7312516, &c_7312528);
make_pair(c_7312526, &pair_7312517, &c_7312527);
make_pair(c_7312525, &pair_7312518, &c_7312526);
make_pair(c_7312524, &pair_7312519, &c_7312525);
make_pair(c_7312523, &pair_7312520, &c_7312524);
make_pair(c_7312522, &pair_7312521, &c_7312523);
object buf[1]; object cont = args[0];
buf[0] = &c_7312522; (((closure)cont)->fn)(data, cont, 1, buf);
 } 
void c_srfi1_entry_pt_first_lambda(void *data, object clo, int argc, object *args){ 
Cyc_set_globals_changed((gc_thread_data *)data);
  quote_first = find_or_add_symbol("first");
  quote_second = find_or_add_symbol("second");
  quote_third = find_or_add_symbol("third");
  quote_fourth = find_or_add_symbol("fourth");
  quote_map = find_or_add_symbol("map");
  quote_error = find_or_add_symbol("error");
  quote__else = find_or_add_symbol("else");
  quote_car = find_or_add_symbol("car");
  quote_cdr = find_or_add_symbol("cdr");
  quote_default_91exp = find_or_add_symbol("default-exp");
  quote_null_127 = find_or_add_symbol("null?");
  quote_cond = find_or_add_symbol("cond");
  quote_rest = find_or_add_symbol("rest");
  quote_maybe_91arg = find_or_add_symbol("maybe-arg");
  quote_let = find_or_add_symbol("let");

  add_global("__glo_lib_91init_117srfi1_srfi_1", (object *) &__glo_lib_91init_117srfi1_srfi_1);
  add_global("__glo_lset_91diff_87intersection_67_srfi_1", (object *) &__glo_lset_91diff_87intersection_67_srfi_1);
  add_global("__glo_lset_91diff_87intersection_srfi_1", (object *) &__glo_lset_91diff_87intersection_srfi_1);
  add_global("__glo_lset_91xor_67_srfi_1", (object *) &__glo_lset_91xor_67_srfi_1);
  add_global("__glo_lset_91xor_srfi_1", (object *) &__glo_lset_91xor_srfi_1);
  add_global("__glo_lset_91difference_67_srfi_1", (object *) &__glo_lset_91difference_67_srfi_1);
  add_global("__glo_lset_91difference_srfi_1", (object *) &__glo_lset_91difference_srfi_1);
  add_global("__glo_lset_91intersection_67_srfi_1", (object *) &__glo_lset_91intersection_67_srfi_1);
  add_global("__glo_lset_91intersection_srfi_1", (object *) &__glo_lset_91intersection_srfi_1);
  add_global("__glo_lset_91union_67_srfi_1", (object *) &__glo_lset_91union_67_srfi_1);
  add_global("__glo_lset_91union_srfi_1", (object *) &__glo_lset_91union_srfi_1);
  add_global("__glo_lset_91adjoin_srfi_1", (object *) &__glo_lset_91adjoin_srfi_1);
  add_global("__glo_lset_123_srfi_1", (object *) &__glo_lset_123_srfi_1);
  add_global("__glo_lset_121_123_srfi_1", (object *) &__glo_lset_121_123_srfi_1);
  add_global("__glo__75lset2_121_123_srfi_1", (object *) &__glo__75lset2_121_123_srfi_1);
  add_global("__glo_reverse_67_srfi_1", (object *) &__glo_reverse_67_srfi_1);
  add_global("__glo_list_91index_srfi_1", (object *) &__glo_list_91index_srfi_1);
  add_global("__glo_every_srfi_1", (object *) &__glo_every_srfi_1);
  add_global("__glo_any_srfi_1", (object *) &__glo_any_srfi_1);
  add_global("__glo_break_67_srfi_1", (object *) &__glo_break_67_srfi_1);
  add_global("__glo__break_srfi_1", (object *) &__glo__break_srfi_1);
  add_global("__glo_span_67_srfi_1", (object *) &__glo_span_67_srfi_1);
  add_global("__glo_span_srfi_1", (object *) &__glo_span_srfi_1);
  add_global("__glo_take_91while_67_srfi_1", (object *) &__glo_take_91while_67_srfi_1);
  add_global("__glo_drop_91while_srfi_1", (object *) &__glo_drop_91while_srfi_1);
  add_global("__glo_take_91while_srfi_1", (object *) &__glo_take_91while_srfi_1);
  add_global("__glo_find_91tail_srfi_1", (object *) &__glo_find_91tail_srfi_1);
  add_global("__glo_find_srfi_1", (object *) &__glo_find_srfi_1);
  add_global("__glo_alist_91delete_67_srfi_1", (object *) &__glo_alist_91delete_67_srfi_1);
  add_global("__glo_alist_91delete_srfi_1", (object *) &__glo_alist_91delete_srfi_1);
  add_global("__glo_alist_91copy_srfi_1", (object *) &__glo_alist_91copy_srfi_1);
  add_global("__glo_alist_91cons_srfi_1", (object *) &__glo_alist_91cons_srfi_1);
  add_global("__glo_delete_91duplicates_67_srfi_1", (object *) &__glo_delete_91duplicates_67_srfi_1);
  add_global("__glo_delete_91duplicates_srfi_1", (object *) &__glo_delete_91duplicates_srfi_1);
  add_global("__glo_delete_67_srfi_1", (object *) &__glo_delete_67_srfi_1);
  add_global("__glo_delete_srfi_1", (object *) &__glo_delete_srfi_1);
  add_global("__glo_remove_67_srfi_1", (object *) &__glo_remove_67_srfi_1);
  add_global("__glo_remove_srfi_1", (object *) &__glo_remove_srfi_1);
  add_global("__glo_partition_67_srfi_1", (object *) &__glo_partition_67_srfi_1);
  add_global("__glo_partition_srfi_1", (object *) &__glo_partition_srfi_1);
  add_global("__glo_filter_67_srfi_1", (object *) &__glo_filter_67_srfi_1);
  add_global("__glo_filter_srfi_1", (object *) &__glo_filter_srfi_1);
  add_global("__glo_map_srfi_1", (object *) &__glo_map_srfi_1);
  add_global("__glo_map_91in_91order_srfi_1", (object *) &__glo_map_91in_91order_srfi_1);
  add_global("__glo_filter_91map_srfi_1", (object *) &__glo_filter_91map_srfi_1);
  add_global("__glo_map_67_srfi_1", (object *) &__glo_map_67_srfi_1);
  add_global("__glo_pair_91for_91each_srfi_1", (object *) &__glo_pair_91for_91each_srfi_1);
  add_global("__glo_really_91append_91map_srfi_1", (object *) &__glo_really_91append_91map_srfi_1);
  add_global("__glo_append_91map_67_srfi_1", (object *) &__glo_append_91map_67_srfi_1);
  add_global("__glo_append_91map_srfi_1", (object *) &__glo_append_91map_srfi_1);
  add_global("__glo_reduce_91right_srfi_1", (object *) &__glo_reduce_91right_srfi_1);
  add_global("__glo_reduce_srfi_1", (object *) &__glo_reduce_srfi_1);
  add_global("__glo_pair_91fold_srfi_1", (object *) &__glo_pair_91fold_srfi_1);
  add_global("__glo_pair_91fold_91right_srfi_1", (object *) &__glo_pair_91fold_91right_srfi_1);
  add_global("__glo_fold_91right_srfi_1", (object *) &__glo_fold_91right_srfi_1);
  add_global("__glo_fold_srfi_1", (object *) &__glo_fold_srfi_1);
  add_global("__glo_unfold_srfi_1", (object *) &__glo_unfold_srfi_1);
  add_global("__glo_unfold_91right_srfi_1", (object *) &__glo_unfold_91right_srfi_1);
  add_global("__glo_count_srfi_1", (object *) &__glo_count_srfi_1);
  add_global("__glo__75cars_87cdrs_95no_91test_srfi_1", (object *) &__glo__75cars_87cdrs_95no_91test_srfi_1);
  add_global("__glo__75cars_87cdrs_87_srfi_1", (object *) &__glo__75cars_87cdrs_87_srfi_1);
  add_global("__glo__75cars_87cdrs_srfi_1", (object *) &__glo__75cars_87cdrs_srfi_1);
  add_global("__glo__75cars_87_srfi_1", (object *) &__glo__75cars_87_srfi_1);
  add_global("__glo__75cdrs_srfi_1", (object *) &__glo__75cdrs_srfi_1);
  add_global("__glo_concatenate_67_srfi_1", (object *) &__glo_concatenate_67_srfi_1);
  add_global("__glo_concatenate_srfi_1", (object *) &__glo_concatenate_srfi_1);
  add_global("__glo_append_91reverse_67_srfi_1", (object *) &__glo_append_91reverse_67_srfi_1);
  add_global("__glo_append_91reverse_srfi_1", (object *) &__glo_append_91reverse_srfi_1);
  add_global("__glo_append_67_srfi_1", (object *) &__glo_append_67_srfi_1);
  add_global("__glo_unzip5_srfi_1", (object *) &__glo_unzip5_srfi_1);
  add_global("__glo_unzip4_srfi_1", (object *) &__glo_unzip4_srfi_1);
  add_global("__glo_unzip3_srfi_1", (object *) &__glo_unzip3_srfi_1);
  add_global("__glo_unzip2_srfi_1", (object *) &__glo_unzip2_srfi_1);
  add_global("__glo_unzip1_srfi_1", (object *) &__glo_unzip1_srfi_1);
  add_global("__glo_last_91pair_srfi_1", (object *) &__glo_last_91pair_srfi_1);
  add_global("__glo_last_srfi_1", (object *) &__glo_last_srfi_1);
  add_global("__glo_split_91at_67_srfi_1", (object *) &__glo_split_91at_67_srfi_1);
  add_global("__glo_split_91at_srfi_1", (object *) &__glo_split_91at_srfi_1);
  add_global("__glo_drop_91right_67_srfi_1", (object *) &__glo_drop_91right_67_srfi_1);
  add_global("__glo_drop_91right_srfi_1", (object *) &__glo_drop_91right_srfi_1);
  add_global("__glo_take_91right_srfi_1", (object *) &__glo_take_91right_srfi_1);
  add_global("__glo_take_67_srfi_1", (object *) &__glo_take_67_srfi_1);
  add_global("__glo_drop_srfi_1", (object *) &__glo_drop_srfi_1);
  add_global("__glo_take_srfi_1", (object *) &__glo_take_srfi_1);
  add_global("__glo_car_87cdr_srfi_1", (object *) &__glo_car_87cdr_srfi_1);
  add_global("__glo_tenth_191_191inline_191_191_srfi_1", (object *) &__glo_tenth_191_191inline_191_191_srfi_1);
  add_global("__glo_tenth_srfi_1", (object *) &__glo_tenth_srfi_1);
  add_global("__glo_ninth_191_191inline_191_191_srfi_1", (object *) &__glo_ninth_191_191inline_191_191_srfi_1);
  add_global("__glo_ninth_srfi_1", (object *) &__glo_ninth_srfi_1);
  add_global("__glo_eighth_191_191inline_191_191_srfi_1", (object *) &__glo_eighth_191_191inline_191_191_srfi_1);
  add_global("__glo_eighth_srfi_1", (object *) &__glo_eighth_srfi_1);
  add_global("__glo_seventh_191_191inline_191_191_srfi_1", (object *) &__glo_seventh_191_191inline_191_191_srfi_1);
  add_global("__glo_seventh_srfi_1", (object *) &__glo_seventh_srfi_1);
  add_global("__glo_sixth_191_191inline_191_191_srfi_1", (object *) &__glo_sixth_191_191inline_191_191_srfi_1);
  add_global("__glo_sixth_srfi_1", (object *) &__glo_sixth_srfi_1);
  add_global("__glo_fifth_191_191inline_191_191_srfi_1", (object *) &__glo_fifth_191_191inline_191_191_srfi_1);
  add_global("__glo_fifth_srfi_1", (object *) &__glo_fifth_srfi_1);
  add_global("__glo_fourth_srfi_1", (object *) &__glo_fourth_srfi_1);
  add_global("__glo_third_srfi_1", (object *) &__glo_third_srfi_1);
  add_global("__glo_second_srfi_1", (object *) &__glo_second_srfi_1);
  add_global("__glo_first_srfi_1", (object *) &__glo_first_srfi_1);
  add_global("__glo_zip_srfi_1", (object *) &__glo_zip_srfi_1);
  add_global("__glo_length_87_srfi_1", (object *) &__glo_length_87_srfi_1);
  add_global("__glo_list_123_srfi_1", (object *) &__glo_list_123_srfi_1);
  add_global("__glo_null_91list_127_srfi_1", (object *) &__glo_null_91list_127_srfi_1);
  add_global("__glo_not_91pair_127_191_191inline_191_191_srfi_1", (object *) &__glo_not_91pair_127_191_191inline_191_191_srfi_1);
  add_global("__glo_not_91pair_127_srfi_1", (object *) &__glo_not_91pair_127_srfi_1);
  add_global("__glo_circular_91list_127_srfi_1", (object *) &__glo_circular_91list_127_srfi_1);
  add_global("__glo_dotted_91list_127_srfi_1", (object *) &__glo_dotted_91list_127_srfi_1);
  add_global("__glo_proper_91list_127_srfi_1", (object *) &__glo_proper_91list_127_srfi_1);
  add_global("__glo_circular_91list_srfi_1", (object *) &__glo_circular_91list_srfi_1);
  add_global("__glo_iota_srfi_1", (object *) &__glo_iota_srfi_1);
  add_global("__glo_list_91copy_srfi_1", (object *) &__glo_list_91copy_srfi_1);
  add_global("__glo_cons_85_srfi_1", (object *) &__glo_cons_85_srfi_1);
  add_global("__glo_list_91tabulate_srfi_1", (object *) &__glo_list_91tabulate_srfi_1);
  add_global("__glo_make_91list_srfi_1", (object *) &__glo_make_91list_srfi_1);
  add_global("__glo_xcons_srfi_1", (object *) &__glo_xcons_srfi_1);
  add_global("__glo__117optional_srfi_1", (object *) &__glo__117optional_srfi_1);
  add_global("__glo_check_91arg_srfi_1", (object *) &__glo_check_91arg_srfi_1);
  mclosure0(c_7312485, (function_type)__lambda_1121);c_7312485.num_args = 0; 
  __glo_lib_91init_117srfi1_srfi_1 = &c_7312485; 
  mclosure0(c_7312439, (function_type)__lambda_1112);c_7312439.num_args = 2; 
  __glo_lset_91diff_87intersection_67_srfi_1 = &c_7312439; 
  mclosure0(c_7312393, (function_type)__lambda_1103);c_7312393.num_args = 2; 
  __glo_lset_91diff_87intersection_srfi_1 = &c_7312393; 
  mclosure0(c_7312320, (function_type)__lambda_1090);c_7312320.num_args = 1; 
  __glo_lset_91xor_67_srfi_1 = &c_7312320; 
  mclosure0(c_7312256, (function_type)__lambda_1079);c_7312256.num_args = 1; 
  __glo_lset_91xor_srfi_1 = &c_7312256; 
  mclosure0(c_7312209, (function_type)__lambda_1070);c_7312209.num_args = 2; 
  __glo_lset_91difference_67_srfi_1 = &c_7312209; 
  mclosure0(c_7312162, (function_type)__lambda_1061);c_7312162.num_args = 2; 
  __glo_lset_91difference_srfi_1 = &c_7312162; 
  mclosure0(c_7312123, (function_type)__lambda_1053);c_7312123.num_args = 2; 
  __glo_lset_91intersection_67_srfi_1 = &c_7312123; 
  mclosure0(c_7312084, (function_type)__lambda_1045);c_7312084.num_args = 2; 
  __glo_lset_91intersection_srfi_1 = &c_7312084; 
  mclosure0(c_7312018, (function_type)__lambda_1033);c_7312018.num_args = 1; 
  __glo_lset_91union_67_srfi_1 = &c_7312018; 
  mclosure0(c_7311961, (function_type)__lambda_1023);c_7311961.num_args = 1; 
  __glo_lset_91union_srfi_1 = &c_7311961; 
  mclosure0(c_7311934, (function_type)__lambda_1018);c_7311934.num_args = 2; 
  __glo_lset_91adjoin_srfi_1 = &c_7311934; 
  mclosure0(c_7311824, (function_type)__lambda_1007);c_7311824.num_args = 1; 
  __glo_lset_123_srfi_1 = &c_7311824; 
  mclosure0(c_7311725, (function_type)__lambda_997);c_7311725.num_args = 1; 
  __glo_lset_121_123_srfi_1 = &c_7311725; 
  mclosure0(c_7311713, (function_type)__lambda_994);c_7311713.num_args = 3; 
  __glo__75lset2_121_123_srfi_1 = &c_7311713; 
  mclosure0(c_7311655, (function_type)__lambda_985);c_7311655.num_args = 1; 
  __glo_reverse_67_srfi_1 = &c_7311655; 
  mclosure0(c_7311519, (function_type)__lambda_966);c_7311519.num_args = 2; 
  __glo_list_91index_srfi_1 = &c_7311519; 
  mclosure0(c_7311345, (function_type)__lambda_942);c_7311345.num_args = 2; 
  __glo_every_srfi_1 = &c_7311345; 
  mclosure0(c_7311179, (function_type)__lambda_918);c_7311179.num_args = 2; 
  __glo_any_srfi_1 = &c_7311179; 
  mclosure0(c_7311161, (function_type)__lambda_914);c_7311161.num_args = 2; 
  __glo_break_67_srfi_1 = &c_7311161; 
  mclosure0(c_7311143, (function_type)__lambda_910);c_7311143.num_args = 2; 
  __glo__break_srfi_1 = &c_7311143; 
  mclosure0(c_7311033, (function_type)__lambda_892);c_7311033.num_args = 2; 
  __glo_span_67_srfi_1 = &c_7311033; 
  mclosure0(c_7310956, (function_type)__lambda_878);c_7310956.num_args = 2; 
  __glo_span_srfi_1 = &c_7310956; 
  mclosure0(c_7310855, (function_type)__lambda_862);c_7310855.num_args = 2; 
  __glo_take_91while_67_srfi_1 = &c_7310855; 
  mclosure0(c_7310798, (function_type)__lambda_853);c_7310798.num_args = 2; 
  __glo_drop_91while_srfi_1 = &c_7310798; 
  mclosure0(c_7310733, (function_type)__lambda_843);c_7310733.num_args = 2; 
  __glo_take_91while_srfi_1 = &c_7310733; 
  mclosure0(c_7310676, (function_type)__lambda_834);c_7310676.num_args = 2; 
  __glo_find_91tail_srfi_1 = &c_7310676; 
  mclosure0(c_7310666, (function_type)__lambda_832);c_7310666.num_args = 2; 
  __glo_find_srfi_1 = &c_7310666; 
  mclosure0(c_7310616, (function_type)__lambda_824);c_7310616.num_args = 2; 
  __glo_alist_91delete_67_srfi_1 = &c_7310616; 
  mclosure0(c_7310566, (function_type)__lambda_816);c_7310566.num_args = 2; 
  __glo_alist_91delete_srfi_1 = &c_7310566; 
  mclosure0(c_7310550, (function_type)__lambda_813);c_7310550.num_args = 1; 
  __glo_alist_91copy_srfi_1 = &c_7310550; 
  mclosure0(c_7310542, (function_type)__lambda_812);c_7310542.num_args = 3; 
  __glo_alist_91cons_srfi_1 = &c_7310542; 
  mclosure0(c_7310441, (function_type)__lambda_798);c_7310441.num_args = 2; 
  __glo_delete_91duplicates_67_srfi_1 = &c_7310441; 
  mclosure0(c_7310340, (function_type)__lambda_784);c_7310340.num_args = 1; 
  __glo_delete_91duplicates_srfi_1 = &c_7310340; 
  mclosure0(c_7310292, (function_type)__lambda_776);c_7310292.num_args = 2; 
  __glo_delete_67_srfi_1 = &c_7310292; 
  mclosure0(c_7310244, (function_type)__lambda_768);c_7310244.num_args = 2; 
  __glo_delete_srfi_1 = &c_7310244; 
  mclosure0(c_7310226, (function_type)__lambda_764);c_7310226.num_args = 2; 
  __glo_remove_67_srfi_1 = &c_7310226; 
  mclosure0(c_7310208, (function_type)__lambda_760);c_7310208.num_args = 2; 
  __glo_remove_srfi_1 = &c_7310208; 
  mclosure0(c_739830, (function_type)__lambda_706);c_739830.num_args = 2; 
  __glo_partition_67_srfi_1 = &c_739830; 
  mclosure0(c_739720, (function_type)__lambda_690);c_739720.num_args = 2; 
  __glo_partition_srfi_1 = &c_739720; 
  mclosure0(c_739502, (function_type)__lambda_659);c_739502.num_args = 2; 
  __glo_filter_67_srfi_1 = &c_739502; 
  mclosure0(c_739424, (function_type)__lambda_648);c_739424.num_args = 2; 
  __glo_filter_srfi_1 = &c_739424; 
  mclosure0(c_739284, (function_type)__lambda_626);c_739284.num_args = 2; 
  __glo_map_91in_91order_srfi_1 = &c_739284; 
  mclosure0(c_739132, (function_type)__lambda_603);c_739132.num_args = 2; 
  __glo_filter_91map_srfi_1 = &c_739132; 
  mclosure0(c_739009, (function_type)__lambda_581);c_739009.num_args = 2; 
  __glo_map_67_srfi_1 = &c_739009; 
  mclosure0(c_738895, (function_type)__lambda_564);c_738895.num_args = 2; 
  __glo_pair_91for_91each_srfi_1 = &c_738895; 
  mclosure0(c_738731, (function_type)__lambda_538);c_738731.num_args = 5; 
  __glo_really_91append_91map_srfi_1 = &c_738731; 
  mclosure0(c_738729, (function_type)__lambda_537);c_738729.num_args = 2; 
  __glo_append_91map_67_srfi_1 = &c_738729; 
  mclosure0(c_738727, (function_type)__lambda_536);c_738727.num_args = 2; 
  __glo_append_91map_srfi_1 = &c_738727; 
  mclosure0(c_738663, (function_type)__lambda_527);c_738663.num_args = 3; 
  __glo_reduce_91right_srfi_1 = &c_738663; 
  mclosure0(c_738640, (function_type)__lambda_523);c_738640.num_args = 3; 
  __glo_reduce_srfi_1 = &c_738640; 
  mclosure0(c_738512, (function_type)__lambda_505);c_738512.num_args = 3; 
  __glo_pair_91fold_srfi_1 = &c_738512; 
  mclosure0(c_738392, (function_type)__lambda_487);c_738392.num_args = 3; 
  __glo_pair_91fold_91right_srfi_1 = &c_738392; 
  mclosure0(c_738276, (function_type)__lambda_470);c_738276.num_args = 3; 
  __glo_fold_91right_srfi_1 = &c_738276; 
  mclosure0(c_738146, (function_type)__lambda_451);c_738146.num_args = 3; 
  __glo_fold_srfi_1 = &c_738146; 
  mclosure0(c_737991, (function_type)__lambda_428);c_737991.num_args = 4; 
  __glo_unfold_srfi_1 = &c_737991; 
  mclosure0(c_737888, (function_type)__lambda_411);c_737888.num_args = 4; 
  __glo_unfold_91right_srfi_1 = &c_737888; 
  mclosure0(c_737725, (function_type)__lambda_387);c_737725.num_args = 2; 
  __glo_count_srfi_1 = &c_737725; 
  mclosure0(c_737625, (function_type)__lambda_369);c_737625.num_args = 1; 
  __glo__75cars_87cdrs_95no_91test_srfi_1 = &c_737625; 
  mclosure0(c_737507, (function_type)__lambda_348);c_737507.num_args = 2; 
  __glo__75cars_87cdrs_87_srfi_1 = &c_737507; 
  mclosure0(c_737393, (function_type)__lambda_327);c_737393.num_args = 1; 
  __glo__75cars_87cdrs_srfi_1 = &c_737393; 
  mclosure0(c_737340, (function_type)__lambda_320);c_737340.num_args = 2; 
  __glo__75cars_87_srfi_1 = &c_737340; 
  mclosure0(c_737272, (function_type)__lambda_310);c_737272.num_args = 1; 
  __glo__75cdrs_srfi_1 = &c_737272; 
  mclosure0(c_737270, (function_type)__lambda_309);c_737270.num_args = 1; 
  __glo_concatenate_67_srfi_1 = &c_737270; 
  mclosure0(c_737268, (function_type)__lambda_308);c_737268.num_args = 1; 
  __glo_concatenate_srfi_1 = &c_737268; 
  mclosure0(c_737210, (function_type)__lambda_299);c_737210.num_args = 2; 
  __glo_append_91reverse_67_srfi_1 = &c_737210; 
  mclosure0(c_737158, (function_type)__lambda_292);c_737158.num_args = 2; 
  __glo_append_91reverse_srfi_1 = &c_737158; 
  mclosure0(c_737036, (function_type)__lambda_277);c_737036.num_args = 0; 
  __glo_append_67_srfi_1 = &c_737036; 
  mclosure0(c_736933, (function_type)__lambda_266);c_736933.num_args = 1; 
  __glo_unzip5_srfi_1 = &c_736933; 
  mclosure0(c_736841, (function_type)__lambda_255);c_736841.num_args = 1; 
  __glo_unzip4_srfi_1 = &c_736841; 
  mclosure0(c_736758, (function_type)__lambda_244);c_736758.num_args = 1; 
  __glo_unzip3_srfi_1 = &c_736758; 
  mclosure0(c_736684, (function_type)__lambda_233);c_736684.num_args = 1; 
  __glo_unzip2_srfi_1 = &c_736684; 
  mclosure0(c_736682, (function_type)__lambda_232);c_736682.num_args = 1; 
  __glo_unzip1_srfi_1 = &c_736682; 
  mclosure0(c_736637, (function_type)__lambda_225);c_736637.num_args = 1; 
  __glo_last_91pair_srfi_1 = &c_736637; 
  mclosure0(c_736629, (function_type)__lambda_223);c_736629.num_args = 1; 
  __glo_last_srfi_1 = &c_736629; 
  mclosure0(c_736594, (function_type)__lambda_218);c_736594.num_args = 2; 
  __glo_split_91at_67_srfi_1 = &c_736594; 
  mclosure0(c_736523, (function_type)__lambda_207);c_736523.num_args = 2; 
  __glo_split_91at_srfi_1 = &c_736523; 
  mclosure0(c_736453, (function_type)__lambda_197);c_736453.num_args = 2; 
  __glo_drop_91right_67_srfi_1 = &c_736453; 
  mclosure0(c_736392, (function_type)__lambda_188);c_736392.num_args = 2; 
  __glo_drop_91right_srfi_1 = &c_736392; 
  mclosure0(c_736341, (function_type)__lambda_180);c_736341.num_args = 2; 
  __glo_take_91right_srfi_1 = &c_736341; 
  mclosure0(c_736314, (function_type)__lambda_176);c_736314.num_args = 2; 
  __glo_take_67_srfi_1 = &c_736314; 
  mclosure0(c_736265, (function_type)__lambda_169);c_736265.num_args = 2; 
  __glo_drop_srfi_1 = &c_736265; 
  mclosure0(c_736206, (function_type)__lambda_161);c_736206.num_args = 2; 
  __glo_take_srfi_1 = &c_736206; 
  mclosure0(c_736200, (function_type)__lambda_160);c_736200.num_args = 1; 
  __glo_car_87cdr_srfi_1 = &c_736200; 
  mclosure0(c_736192, (function_type)__lambda_1218);c_736192.num_args = 1; 
  __glo_tenth_191_191inline_191_191_srfi_1 = &c_736192; 
  mclosure0(c_736184, (function_type)__lambda_159);c_736184.num_args = 1; 
  __glo_tenth_srfi_1 = &c_736184; 
  mclosure0(c_736176, (function_type)__lambda_1217);c_736176.num_args = 1; 
  __glo_ninth_191_191inline_191_191_srfi_1 = &c_736176; 
  mclosure0(c_736168, (function_type)__lambda_158);c_736168.num_args = 1; 
  __glo_ninth_srfi_1 = &c_736168; 
  mclosure0(c_736162, (function_type)__lambda_1216);c_736162.num_args = 1; 
  __glo_eighth_191_191inline_191_191_srfi_1 = &c_736162; 
  mclosure0(c_736156, (function_type)__lambda_157);c_736156.num_args = 1; 
  __glo_eighth_srfi_1 = &c_736156; 
  mclosure0(c_736150, (function_type)__lambda_1215);c_736150.num_args = 1; 
  __glo_seventh_191_191inline_191_191_srfi_1 = &c_736150; 
  mclosure0(c_736144, (function_type)__lambda_156);c_736144.num_args = 1; 
  __glo_seventh_srfi_1 = &c_736144; 
  mclosure0(c_736138, (function_type)__lambda_1214);c_736138.num_args = 1; 
  __glo_sixth_191_191inline_191_191_srfi_1 = &c_736138; 
  mclosure0(c_736132, (function_type)__lambda_155);c_736132.num_args = 1; 
  __glo_sixth_srfi_1 = &c_736132; 
  mclosure0(c_736126, (function_type)__lambda_1213);c_736126.num_args = 1; 
  __glo_fifth_191_191inline_191_191_srfi_1 = &c_736126; 
  mclosure0(c_736120, (function_type)__lambda_154);c_736120.num_args = 1; 
  __glo_fifth_srfi_1 = &c_736120; 
  mclosure0(c_736115, (function_type)__lambda_153);c_736115.num_args = 1; 
  __glo_zip_srfi_1 = &c_736115; 
  mclosure0(c_736048, (function_type)__lambda_147);c_736048.num_args = 1; 
  __glo_length_87_srfi_1 = &c_736048; 
  mclosure0(c_735904, (function_type)__lambda_131);c_735904.num_args = 1; 
  __glo_list_123_srfi_1 = &c_735904; 
  mclosure0(c_735895, (function_type)__lambda_130);c_735895.num_args = 1; 
  __glo_null_91list_127_srfi_1 = &c_735895; 
  mclosure0(c_735888, (function_type)__lambda_1212);c_735888.num_args = 1; 
  __glo_not_91pair_127_191_191inline_191_191_srfi_1 = &c_735888; 
  mclosure0(c_735881, (function_type)__lambda_129);c_735881.num_args = 1; 
  __glo_not_91pair_127_srfi_1 = &c_735881; 
  mclosure0(c_735815, (function_type)__lambda_123);c_735815.num_args = 1; 
  __glo_circular_91list_127_srfi_1 = &c_735815; 
  mclosure0(c_735745, (function_type)__lambda_117);c_735745.num_args = 1; 
  __glo_dotted_91list_127_srfi_1 = &c_735745; 
  mclosure0(c_735681, (function_type)__lambda_111);c_735681.num_args = 1; 
  __glo_proper_91list_127_srfi_1 = &c_735681; 
  mclosure0(c_735661, (function_type)__lambda_107);c_735661.num_args = 1; 
  __glo_circular_91list_srfi_1 = &c_735661; 
  mclosure0(c_735533, (function_type)__lambda_93);c_735533.num_args = 1; 
  __glo_iota_srfi_1 = &c_735533; 
  mclosure0(c_735484, (function_type)__lambda_86);c_735484.num_args = 1; 
  __glo_list_91copy_srfi_1 = &c_735484; 
  mclosure0(c_735434, (function_type)__lambda_79);c_735434.num_args = 1; 
  __glo_cons_85_srfi_1 = &c_735434; 
  mclosure0(c_735361, (function_type)__lambda_68);c_735361.num_args = 2; 
  __glo_list_91tabulate_srfi_1 = &c_735361; 
  mclosure0(c_735276, (function_type)__lambda_57);c_735276.num_args = 1; 
  __glo_make_91list_srfi_1 = &c_735276; 
  mclosure0(c_735271, (function_type)__lambda_56);c_735271.num_args = 2; 
  __glo_xcons_srfi_1 = &c_735271; 
  mmacro(c_734858, (function_type)__lambda_9);c_734858.num_args = 3; 
  __glo__117optional_srfi_1 = &c_734858; 
  mclosure0(c_734809, (function_type)__lambda_1);c_734809.num_args = 3; 
  __glo_check_91arg_srfi_1 = &c_734809; 
  __glo_map_srfi_1 = boolean_f; 
  __glo_fourth_srfi_1 = boolean_f; 
  __glo_third_srfi_1 = boolean_f; 
  __glo_second_srfi_1 = boolean_f; 
  __glo_first_srfi_1 = boolean_f; 

  mclosure0(clo_7312530, c_srfi1_inlinable_lambdas); make_pair(pair_7312529, find_or_add_symbol("c_srfi1_inlinable_lambdas"), &clo_7312530);
  make_cvar(cvar_7312531, (object *)&__glo_lib_91init_117srfi1_srfi_1);make_pair(pair_7312532, find_or_add_symbol("lib-init:srfi1"), &cvar_7312531);
  make_cvar(cvar_7312533, (object *)&__glo_lset_91diff_87intersection_67_srfi_1);make_pair(pair_7312534, find_or_add_symbol("lset-diff+intersection!"), &cvar_7312533);
  make_cvar(cvar_7312535, (object *)&__glo_lset_91diff_87intersection_srfi_1);make_pair(pair_7312536, find_or_add_symbol("lset-diff+intersection"), &cvar_7312535);
  make_cvar(cvar_7312537, (object *)&__glo_lset_91xor_67_srfi_1);make_pair(pair_7312538, find_or_add_symbol("lset-xor!"), &cvar_7312537);
  make_cvar(cvar_7312539, (object *)&__glo_lset_91xor_srfi_1);make_pair(pair_7312540, find_or_add_symbol("lset-xor"), &cvar_7312539);
  make_cvar(cvar_7312541, (object *)&__glo_lset_91difference_67_srfi_1);make_pair(pair_7312542, find_or_add_symbol("lset-difference!"), &cvar_7312541);
  make_cvar(cvar_7312543, (object *)&__glo_lset_91difference_srfi_1);make_pair(pair_7312544, find_or_add_symbol("lset-difference"), &cvar_7312543);
  make_cvar(cvar_7312545, (object *)&__glo_lset_91intersection_67_srfi_1);make_pair(pair_7312546, find_or_add_symbol("lset-intersection!"), &cvar_7312545);
  make_cvar(cvar_7312547, (object *)&__glo_lset_91intersection_srfi_1);make_pair(pair_7312548, find_or_add_symbol("lset-intersection"), &cvar_7312547);
  make_cvar(cvar_7312549, (object *)&__glo_lset_91union_67_srfi_1);make_pair(pair_7312550, find_or_add_symbol("lset-union!"), &cvar_7312549);
  make_cvar(cvar_7312551, (object *)&__glo_lset_91union_srfi_1);make_pair(pair_7312552, find_or_add_symbol("lset-union"), &cvar_7312551);
  make_cvar(cvar_7312553, (object *)&__glo_lset_91adjoin_srfi_1);make_pair(pair_7312554, find_or_add_symbol("lset-adjoin"), &cvar_7312553);
  make_cvar(cvar_7312555, (object *)&__glo_lset_123_srfi_1);make_pair(pair_7312556, find_or_add_symbol("lset="), &cvar_7312555);
  make_cvar(cvar_7312557, (object *)&__glo_lset_121_123_srfi_1);make_pair(pair_7312558, find_or_add_symbol("lset<="), &cvar_7312557);
  make_cvar(cvar_7312559, (object *)&__glo__75lset2_121_123_srfi_1);make_pair(pair_7312560, find_or_add_symbol("%lset2<="), &cvar_7312559);
  make_cvar(cvar_7312561, (object *)&__glo_reverse_67_srfi_1);make_pair(pair_7312562, find_or_add_symbol("reverse!"), &cvar_7312561);
  make_cvar(cvar_7312563, (object *)&__glo_list_91index_srfi_1);make_pair(pair_7312564, find_or_add_symbol("list-index"), &cvar_7312563);
  make_cvar(cvar_7312565, (object *)&__glo_every_srfi_1);make_pair(pair_7312566, find_or_add_symbol("every"), &cvar_7312565);
  make_cvar(cvar_7312567, (object *)&__glo_any_srfi_1);make_pair(pair_7312568, find_or_add_symbol("any"), &cvar_7312567);
  make_cvar(cvar_7312569, (object *)&__glo_break_67_srfi_1);make_pair(pair_7312570, find_or_add_symbol("break!"), &cvar_7312569);
  make_cvar(cvar_7312571, (object *)&__glo__break_srfi_1);make_pair(pair_7312572, find_or_add_symbol("break"), &cvar_7312571);
  make_cvar(cvar_7312573, (object *)&__glo_span_67_srfi_1);make_pair(pair_7312574, find_or_add_symbol("span!"), &cvar_7312573);
  make_cvar(cvar_7312575, (object *)&__glo_span_srfi_1);make_pair(pair_7312576, find_or_add_symbol("span"), &cvar_7312575);
  make_cvar(cvar_7312577, (object *)&__glo_take_91while_67_srfi_1);make_pair(pair_7312578, find_or_add_symbol("take-while!"), &cvar_7312577);
  make_cvar(cvar_7312579, (object *)&__glo_drop_91while_srfi_1);make_pair(pair_7312580, find_or_add_symbol("drop-while"), &cvar_7312579);
  make_cvar(cvar_7312581, (object *)&__glo_take_91while_srfi_1);make_pair(pair_7312582, find_or_add_symbol("take-while"), &cvar_7312581);
  make_cvar(cvar_7312583, (object *)&__glo_find_91tail_srfi_1);make_pair(pair_7312584, find_or_add_symbol("find-tail"), &cvar_7312583);
  make_cvar(cvar_7312585, (object *)&__glo_find_srfi_1);make_pair(pair_7312586, find_or_add_symbol("find"), &cvar_7312585);
  make_cvar(cvar_7312587, (object *)&__glo_alist_91delete_67_srfi_1);make_pair(pair_7312588, find_or_add_symbol("alist-delete!"), &cvar_7312587);
  make_cvar(cvar_7312589, (object *)&__glo_alist_91delete_srfi_1);make_pair(pair_7312590, find_or_add_symbol("alist-delete"), &cvar_7312589);
  make_cvar(cvar_7312591, (object *)&__glo_alist_91copy_srfi_1);make_pair(pair_7312592, find_or_add_symbol("alist-copy"), &cvar_7312591);
  make_cvar(cvar_7312593, (object *)&__glo_alist_91cons_srfi_1);make_pair(pair_7312594, find_or_add_symbol("alist-cons"), &cvar_7312593);
  make_cvar(cvar_7312595, (object *)&__glo_delete_91duplicates_67_srfi_1);make_pair(pair_7312596, find_or_add_symbol("delete-duplicates!"), &cvar_7312595);
  make_cvar(cvar_7312597, (object *)&__glo_delete_91duplicates_srfi_1);make_pair(pair_7312598, find_or_add_symbol("delete-duplicates"), &cvar_7312597);
  make_cvar(cvar_7312599, (object *)&__glo_delete_67_srfi_1);make_pair(pair_7312600, find_or_add_symbol("delete!"), &cvar_7312599);
  make_cvar(cvar_7312601, (object *)&__glo_delete_srfi_1);make_pair(pair_7312602, find_or_add_symbol("delete"), &cvar_7312601);
  make_cvar(cvar_7312603, (object *)&__glo_remove_67_srfi_1);make_pair(pair_7312604, find_or_add_symbol("remove!"), &cvar_7312603);
  make_cvar(cvar_7312605, (object *)&__glo_remove_srfi_1);make_pair(pair_7312606, find_or_add_symbol("remove"), &cvar_7312605);
  make_cvar(cvar_7312607, (object *)&__glo_partition_67_srfi_1);make_pair(pair_7312608, find_or_add_symbol("partition!"), &cvar_7312607);
  make_cvar(cvar_7312609, (object *)&__glo_partition_srfi_1);make_pair(pair_7312610, find_or_add_symbol("partition"), &cvar_7312609);
  make_cvar(cvar_7312611, (object *)&__glo_filter_67_srfi_1);make_pair(pair_7312612, find_or_add_symbol("filter!"), &cvar_7312611);
  make_cvar(cvar_7312613, (object *)&__glo_filter_srfi_1);make_pair(pair_7312614, find_or_add_symbol("filter"), &cvar_7312613);
  make_cvar(cvar_7312615, (object *)&__glo_map_srfi_1);make_pair(pair_7312616, find_or_add_symbol("map"), &cvar_7312615);
  make_cvar(cvar_7312617, (object *)&__glo_map_91in_91order_srfi_1);make_pair(pair_7312618, find_or_add_symbol("map-in-order"), &cvar_7312617);
  make_cvar(cvar_7312619, (object *)&__glo_filter_91map_srfi_1);make_pair(pair_7312620, find_or_add_symbol("filter-map"), &cvar_7312619);
  make_cvar(cvar_7312621, (object *)&__glo_map_67_srfi_1);make_pair(pair_7312622, find_or_add_symbol("map!"), &cvar_7312621);
  make_cvar(cvar_7312623, (object *)&__glo_pair_91for_91each_srfi_1);make_pair(pair_7312624, find_or_add_symbol("pair-for-each"), &cvar_7312623);
  make_cvar(cvar_7312625, (object *)&__glo_really_91append_91map_srfi_1);make_pair(pair_7312626, find_or_add_symbol("really-append-map"), &cvar_7312625);
  make_cvar(cvar_7312627, (object *)&__glo_append_91map_67_srfi_1);make_pair(pair_7312628, find_or_add_symbol("append-map!"), &cvar_7312627);
  make_cvar(cvar_7312629, (object *)&__glo_append_91map_srfi_1);make_pair(pair_7312630, find_or_add_symbol("append-map"), &cvar_7312629);
  make_cvar(cvar_7312631, (object *)&__glo_reduce_91right_srfi_1);make_pair(pair_7312632, find_or_add_symbol("reduce-right"), &cvar_7312631);
  make_cvar(cvar_7312633, (object *)&__glo_reduce_srfi_1);make_pair(pair_7312634, find_or_add_symbol("reduce"), &cvar_7312633);
  make_cvar(cvar_7312635, (object *)&__glo_pair_91fold_srfi_1);make_pair(pair_7312636, find_or_add_symbol("pair-fold"), &cvar_7312635);
  make_cvar(cvar_7312637, (object *)&__glo_pair_91fold_91right_srfi_1);make_pair(pair_7312638, find_or_add_symbol("pair-fold-right"), &cvar_7312637);
  make_cvar(cvar_7312639, (object *)&__glo_fold_91right_srfi_1);make_pair(pair_7312640, find_or_add_symbol("fold-right"), &cvar_7312639);
  make_cvar(cvar_7312641, (object *)&__glo_fold_srfi_1);make_pair(pair_7312642, find_or_add_symbol("fold"), &cvar_7312641);
  make_cvar(cvar_7312643, (object *)&__glo_unfold_srfi_1);make_pair(pair_7312644, find_or_add_symbol("unfold"), &cvar_7312643);
  make_cvar(cvar_7312645, (object *)&__glo_unfold_91right_srfi_1);make_pair(pair_7312646, find_or_add_symbol("unfold-right"), &cvar_7312645);
  make_cvar(cvar_7312647, (object *)&__glo_count_srfi_1);make_pair(pair_7312648, find_or_add_symbol("count"), &cvar_7312647);
  make_cvar(cvar_7312649, (object *)&__glo__75cars_87cdrs_95no_91test_srfi_1);make_pair(pair_7312650, find_or_add_symbol("%cars+cdrs/no-test"), &cvar_7312649);
  make_cvar(cvar_7312651, (object *)&__glo__75cars_87cdrs_87_srfi_1);make_pair(pair_7312652, find_or_add_symbol("%cars+cdrs+"), &cvar_7312651);
  make_cvar(cvar_7312653, (object *)&__glo__75cars_87cdrs_srfi_1);make_pair(pair_7312654, find_or_add_symbol("%cars+cdrs"), &cvar_7312653);
  make_cvar(cvar_7312655, (object *)&__glo__75cars_87_srfi_1);make_pair(pair_7312656, find_or_add_symbol("%cars+"), &cvar_7312655);
  make_cvar(cvar_7312657, (object *)&__glo__75cdrs_srfi_1);make_pair(pair_7312658, find_or_add_symbol("%cdrs"), &cvar_7312657);
  make_cvar(cvar_7312659, (object *)&__glo_concatenate_67_srfi_1);make_pair(pair_7312660, find_or_add_symbol("concatenate!"), &cvar_7312659);
  make_cvar(cvar_7312661, (object *)&__glo_concatenate_srfi_1);make_pair(pair_7312662, find_or_add_symbol("concatenate"), &cvar_7312661);
  make_cvar(cvar_7312663, (object *)&__glo_append_91reverse_67_srfi_1);make_pair(pair_7312664, find_or_add_symbol("append-reverse!"), &cvar_7312663);
  make_cvar(cvar_7312665, (object *)&__glo_append_91reverse_srfi_1);make_pair(pair_7312666, find_or_add_symbol("append-reverse"), &cvar_7312665);
  make_cvar(cvar_7312667, (object *)&__glo_append_67_srfi_1);make_pair(pair_7312668, find_or_add_symbol("append!"), &cvar_7312667);
  make_cvar(cvar_7312669, (object *)&__glo_unzip5_srfi_1);make_pair(pair_7312670, find_or_add_symbol("unzip5"), &cvar_7312669);
  make_cvar(cvar_7312671, (object *)&__glo_unzip4_srfi_1);make_pair(pair_7312672, find_or_add_symbol("unzip4"), &cvar_7312671);
  make_cvar(cvar_7312673, (object *)&__glo_unzip3_srfi_1);make_pair(pair_7312674, find_or_add_symbol("unzip3"), &cvar_7312673);
  make_cvar(cvar_7312675, (object *)&__glo_unzip2_srfi_1);make_pair(pair_7312676, find_or_add_symbol("unzip2"), &cvar_7312675);
  make_cvar(cvar_7312677, (object *)&__glo_unzip1_srfi_1);make_pair(pair_7312678, find_or_add_symbol("unzip1"), &cvar_7312677);
  make_cvar(cvar_7312679, (object *)&__glo_last_91pair_srfi_1);make_pair(pair_7312680, find_or_add_symbol("last-pair"), &cvar_7312679);
  make_cvar(cvar_7312681, (object *)&__glo_last_srfi_1);make_pair(pair_7312682, find_or_add_symbol("last"), &cvar_7312681);
  make_cvar(cvar_7312683, (object *)&__glo_split_91at_67_srfi_1);make_pair(pair_7312684, find_or_add_symbol("split-at!"), &cvar_7312683);
  make_cvar(cvar_7312685, (object *)&__glo_split_91at_srfi_1);make_pair(pair_7312686, find_or_add_symbol("split-at"), &cvar_7312685);
  make_cvar(cvar_7312687, (object *)&__glo_drop_91right_67_srfi_1);make_pair(pair_7312688, find_or_add_symbol("drop-right!"), &cvar_7312687);
  make_cvar(cvar_7312689, (object *)&__glo_drop_91right_srfi_1);make_pair(pair_7312690, find_or_add_symbol("drop-right"), &cvar_7312689);
  make_cvar(cvar_7312691, (object *)&__glo_take_91right_srfi_1);make_pair(pair_7312692, find_or_add_symbol("take-right"), &cvar_7312691);
  make_cvar(cvar_7312693, (object *)&__glo_take_67_srfi_1);make_pair(pair_7312694, find_or_add_symbol("take!"), &cvar_7312693);
  make_cvar(cvar_7312695, (object *)&__glo_drop_srfi_1);make_pair(pair_7312696, find_or_add_symbol("drop"), &cvar_7312695);
  make_cvar(cvar_7312697, (object *)&__glo_take_srfi_1);make_pair(pair_7312698, find_or_add_symbol("take"), &cvar_7312697);
  make_cvar(cvar_7312699, (object *)&__glo_car_87cdr_srfi_1);make_pair(pair_7312700, find_or_add_symbol("car+cdr"), &cvar_7312699);
  make_cvar(cvar_7312701, (object *)&__glo_tenth_191_191inline_191_191_srfi_1);make_pair(pair_7312702, find_or_add_symbol("tenth__inline__"), &cvar_7312701);
  make_cvar(cvar_7312703, (object *)&__glo_tenth_srfi_1);make_pair(pair_7312704, find_or_add_symbol("tenth"), &cvar_7312703);
  make_cvar(cvar_7312705, (object *)&__glo_ninth_191_191inline_191_191_srfi_1);make_pair(pair_7312706, find_or_add_symbol("ninth__inline__"), &cvar_7312705);
  make_cvar(cvar_7312707, (object *)&__glo_ninth_srfi_1);make_pair(pair_7312708, find_or_add_symbol("ninth"), &cvar_7312707);
  make_cvar(cvar_7312709, (object *)&__glo_eighth_191_191inline_191_191_srfi_1);make_pair(pair_7312710, find_or_add_symbol("eighth__inline__"), &cvar_7312709);
  make_cvar(cvar_7312711, (object *)&__glo_eighth_srfi_1);make_pair(pair_7312712, find_or_add_symbol("eighth"), &cvar_7312711);
  make_cvar(cvar_7312713, (object *)&__glo_seventh_191_191inline_191_191_srfi_1);make_pair(pair_7312714, find_or_add_symbol("seventh__inline__"), &cvar_7312713);
  make_cvar(cvar_7312715, (object *)&__glo_seventh_srfi_1);make_pair(pair_7312716, find_or_add_symbol("seventh"), &cvar_7312715);
  make_cvar(cvar_7312717, (object *)&__glo_sixth_191_191inline_191_191_srfi_1);make_pair(pair_7312718, find_or_add_symbol("sixth__inline__"), &cvar_7312717);
  make_cvar(cvar_7312719, (object *)&__glo_sixth_srfi_1);make_pair(pair_7312720, find_or_add_symbol("sixth"), &cvar_7312719);
  make_cvar(cvar_7312721, (object *)&__glo_fifth_191_191inline_191_191_srfi_1);make_pair(pair_7312722, find_or_add_symbol("fifth__inline__"), &cvar_7312721);
  make_cvar(cvar_7312723, (object *)&__glo_fifth_srfi_1);make_pair(pair_7312724, find_or_add_symbol("fifth"), &cvar_7312723);
  make_cvar(cvar_7312725, (object *)&__glo_fourth_srfi_1);make_pair(pair_7312726, find_or_add_symbol("fourth"), &cvar_7312725);
  make_cvar(cvar_7312727, (object *)&__glo_third_srfi_1);make_pair(pair_7312728, find_or_add_symbol("third"), &cvar_7312727);
  make_cvar(cvar_7312729, (object *)&__glo_second_srfi_1);make_pair(pair_7312730, find_or_add_symbol("second"), &cvar_7312729);
  make_cvar(cvar_7312731, (object *)&__glo_first_srfi_1);make_pair(pair_7312732, find_or_add_symbol("first"), &cvar_7312731);
  make_cvar(cvar_7312733, (object *)&__glo_zip_srfi_1);make_pair(pair_7312734, find_or_add_symbol("zip"), &cvar_7312733);
  make_cvar(cvar_7312735, (object *)&__glo_length_87_srfi_1);make_pair(pair_7312736, find_or_add_symbol("length+"), &cvar_7312735);
  make_cvar(cvar_7312737, (object *)&__glo_list_123_srfi_1);make_pair(pair_7312738, find_or_add_symbol("list="), &cvar_7312737);
  make_cvar(cvar_7312739, (object *)&__glo_null_91list_127_srfi_1);make_pair(pair_7312740, find_or_add_symbol("null-list?"), &cvar_7312739);
  make_cvar(cvar_7312741, (object *)&__glo_not_91pair_127_191_191inline_191_191_srfi_1);make_pair(pair_7312742, find_or_add_symbol("not-pair?__inline__"), &cvar_7312741);
  make_cvar(cvar_7312743, (object *)&__glo_not_91pair_127_srfi_1);make_pair(pair_7312744, find_or_add_symbol("not-pair?"), &cvar_7312743);
  make_cvar(cvar_7312745, (object *)&__glo_circular_91list_127_srfi_1);make_pair(pair_7312746, find_or_add_symbol("circular-list?"), &cvar_7312745);
  make_cvar(cvar_7312747, (object *)&__glo_dotted_91list_127_srfi_1);make_pair(pair_7312748, find_or_add_symbol("dotted-list?"), &cvar_7312747);
  make_cvar(cvar_7312749, (object *)&__glo_proper_91list_127_srfi_1);make_pair(pair_7312750, find_or_add_symbol("proper-list?"), &cvar_7312749);
  make_cvar(cvar_7312751, (object *)&__glo_circular_91list_srfi_1);make_pair(pair_7312752, find_or_add_symbol("circular-list"), &cvar_7312751);
  make_cvar(cvar_7312753, (object *)&__glo_iota_srfi_1);make_pair(pair_7312754, find_or_add_symbol("iota"), &cvar_7312753);
  make_cvar(cvar_7312755, (object *)&__glo_list_91copy_srfi_1);make_pair(pair_7312756, find_or_add_symbol("list-copy"), &cvar_7312755);
  make_cvar(cvar_7312757, (object *)&__glo_cons_85_srfi_1);make_pair(pair_7312758, find_or_add_symbol("cons*"), &cvar_7312757);
  make_cvar(cvar_7312759, (object *)&__glo_list_91tabulate_srfi_1);make_pair(pair_7312760, find_or_add_symbol("list-tabulate"), &cvar_7312759);
  make_cvar(cvar_7312761, (object *)&__glo_make_91list_srfi_1);make_pair(pair_7312762, find_or_add_symbol("make-list"), &cvar_7312761);
  make_cvar(cvar_7312763, (object *)&__glo_xcons_srfi_1);make_pair(pair_7312764, find_or_add_symbol("xcons"), &cvar_7312763);
  make_cvar(cvar_7312765, (object *)&__glo__117optional_srfi_1);make_pair(pair_7312766, find_or_add_symbol(":optional"), &cvar_7312765);
  make_cvar(cvar_7312767, (object *)&__glo_check_91arg_srfi_1);make_pair(pair_7312768, find_or_add_symbol("check-arg"), &cvar_7312767);
make_pair(c_7312888, &pair_7312529,Cyc_global_variables);
make_pair(c_7312887, &pair_7312532, &c_7312888);
make_pair(c_7312886, &pair_7312534, &c_7312887);
make_pair(c_7312885, &pair_7312536, &c_7312886);
make_pair(c_7312884, &pair_7312538, &c_7312885);
make_pair(c_7312883, &pair_7312540, &c_7312884);
make_pair(c_7312882, &pair_7312542, &c_7312883);
make_pair(c_7312881, &pair_7312544, &c_7312882);
make_pair(c_7312880, &pair_7312546, &c_7312881);
make_pair(c_7312879, &pair_7312548, &c_7312880);
make_pair(c_7312878, &pair_7312550, &c_7312879);
make_pair(c_7312877, &pair_7312552, &c_7312878);
make_pair(c_7312876, &pair_7312554, &c_7312877);
make_pair(c_7312875, &pair_7312556, &c_7312876);
make_pair(c_7312874, &pair_7312558, &c_7312875);
make_pair(c_7312873, &pair_7312560, &c_7312874);
make_pair(c_7312872, &pair_7312562, &c_7312873);
make_pair(c_7312871, &pair_7312564, &c_7312872);
make_pair(c_7312870, &pair_7312566, &c_7312871);
make_pair(c_7312869, &pair_7312568, &c_7312870);
make_pair(c_7312868, &pair_7312570, &c_7312869);
make_pair(c_7312867, &pair_7312572, &c_7312868);
make_pair(c_7312866, &pair_7312574, &c_7312867);
make_pair(c_7312865, &pair_7312576, &c_7312866);
make_pair(c_7312864, &pair_7312578, &c_7312865);
make_pair(c_7312863, &pair_7312580, &c_7312864);
make_pair(c_7312862, &pair_7312582, &c_7312863);
make_pair(c_7312861, &pair_7312584, &c_7312862);
make_pair(c_7312860, &pair_7312586, &c_7312861);
make_pair(c_7312859, &pair_7312588, &c_7312860);
make_pair(c_7312858, &pair_7312590, &c_7312859);
make_pair(c_7312857, &pair_7312592, &c_7312858);
make_pair(c_7312856, &pair_7312594, &c_7312857);
make_pair(c_7312855, &pair_7312596, &c_7312856);
make_pair(c_7312854, &pair_7312598, &c_7312855);
make_pair(c_7312853, &pair_7312600, &c_7312854);
make_pair(c_7312852, &pair_7312602, &c_7312853);
make_pair(c_7312851, &pair_7312604, &c_7312852);
make_pair(c_7312850, &pair_7312606, &c_7312851);
make_pair(c_7312849, &pair_7312608, &c_7312850);
make_pair(c_7312848, &pair_7312610, &c_7312849);
make_pair(c_7312847, &pair_7312612, &c_7312848);
make_pair(c_7312846, &pair_7312614, &c_7312847);
make_pair(c_7312845, &pair_7312616, &c_7312846);
make_pair(c_7312844, &pair_7312618, &c_7312845);
make_pair(c_7312843, &pair_7312620, &c_7312844);
make_pair(c_7312842, &pair_7312622, &c_7312843);
make_pair(c_7312841, &pair_7312624, &c_7312842);
make_pair(c_7312840, &pair_7312626, &c_7312841);
make_pair(c_7312839, &pair_7312628, &c_7312840);
make_pair(c_7312838, &pair_7312630, &c_7312839);
make_pair(c_7312837, &pair_7312632, &c_7312838);
make_pair(c_7312836, &pair_7312634, &c_7312837);
make_pair(c_7312835, &pair_7312636, &c_7312836);
make_pair(c_7312834, &pair_7312638, &c_7312835);
make_pair(c_7312833, &pair_7312640, &c_7312834);
make_pair(c_7312832, &pair_7312642, &c_7312833);
make_pair(c_7312831, &pair_7312644, &c_7312832);
make_pair(c_7312830, &pair_7312646, &c_7312831);
make_pair(c_7312829, &pair_7312648, &c_7312830);
make_pair(c_7312828, &pair_7312650, &c_7312829);
make_pair(c_7312827, &pair_7312652, &c_7312828);
make_pair(c_7312826, &pair_7312654, &c_7312827);
make_pair(c_7312825, &pair_7312656, &c_7312826);
make_pair(c_7312824, &pair_7312658, &c_7312825);
make_pair(c_7312823, &pair_7312660, &c_7312824);
make_pair(c_7312822, &pair_7312662, &c_7312823);
make_pair(c_7312821, &pair_7312664, &c_7312822);
make_pair(c_7312820, &pair_7312666, &c_7312821);
make_pair(c_7312819, &pair_7312668, &c_7312820);
make_pair(c_7312818, &pair_7312670, &c_7312819);
make_pair(c_7312817, &pair_7312672, &c_7312818);
make_pair(c_7312816, &pair_7312674, &c_7312817);
make_pair(c_7312815, &pair_7312676, &c_7312816);
make_pair(c_7312814, &pair_7312678, &c_7312815);
make_pair(c_7312813, &pair_7312680, &c_7312814);
make_pair(c_7312812, &pair_7312682, &c_7312813);
make_pair(c_7312811, &pair_7312684, &c_7312812);
make_pair(c_7312810, &pair_7312686, &c_7312811);
make_pair(c_7312809, &pair_7312688, &c_7312810);
make_pair(c_7312808, &pair_7312690, &c_7312809);
make_pair(c_7312807, &pair_7312692, &c_7312808);
make_pair(c_7312806, &pair_7312694, &c_7312807);
make_pair(c_7312805, &pair_7312696, &c_7312806);
make_pair(c_7312804, &pair_7312698, &c_7312805);
make_pair(c_7312803, &pair_7312700, &c_7312804);
make_pair(c_7312802, &pair_7312702, &c_7312803);
make_pair(c_7312801, &pair_7312704, &c_7312802);
make_pair(c_7312800, &pair_7312706, &c_7312801);
make_pair(c_7312799, &pair_7312708, &c_7312800);
make_pair(c_7312798, &pair_7312710, &c_7312799);
make_pair(c_7312797, &pair_7312712, &c_7312798);
make_pair(c_7312796, &pair_7312714, &c_7312797);
make_pair(c_7312795, &pair_7312716, &c_7312796);
make_pair(c_7312794, &pair_7312718, &c_7312795);
make_pair(c_7312793, &pair_7312720, &c_7312794);
make_pair(c_7312792, &pair_7312722, &c_7312793);
make_pair(c_7312791, &pair_7312724, &c_7312792);
make_pair(c_7312790, &pair_7312726, &c_7312791);
make_pair(c_7312789, &pair_7312728, &c_7312790);
make_pair(c_7312788, &pair_7312730, &c_7312789);
make_pair(c_7312787, &pair_7312732, &c_7312788);
make_pair(c_7312786, &pair_7312734, &c_7312787);
make_pair(c_7312785, &pair_7312736, &c_7312786);
make_pair(c_7312784, &pair_7312738, &c_7312785);
make_pair(c_7312783, &pair_7312740, &c_7312784);
make_pair(c_7312782, &pair_7312742, &c_7312783);
make_pair(c_7312781, &pair_7312744, &c_7312782);
make_pair(c_7312780, &pair_7312746, &c_7312781);
make_pair(c_7312779, &pair_7312748, &c_7312780);
make_pair(c_7312778, &pair_7312750, &c_7312779);
make_pair(c_7312777, &pair_7312752, &c_7312778);
make_pair(c_7312776, &pair_7312754, &c_7312777);
make_pair(c_7312775, &pair_7312756, &c_7312776);
make_pair(c_7312774, &pair_7312758, &c_7312775);
make_pair(c_7312773, &pair_7312760, &c_7312774);
make_pair(c_7312772, &pair_7312762, &c_7312773);
make_pair(c_7312771, &pair_7312764, &c_7312772);
make_pair(c_7312770, &pair_7312766, &c_7312771);
make_pair(c_7312769, &pair_7312768, &c_7312770);
Cyc_global_variables = &c_7312769;
object buf[1]; buf[0] = ((closure1_type *)clo)->element;
(((closure)__glo_lib_91init_117srfi1_srfi_1)->fn)(data, buf[0], 1, buf);
}
void c_srfi1_entry_pt(void *data, object cont, int argc, object value){ 
  register_library("srfi_1");
  c_srfi1_entry_pt_first_lambda(data, cont, argc, value);
}
