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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

#include "cyclone/types.h"
object __glo_lib_91init_117srfi133_srfi_133 = NULL;
object __glo_reverse_91list_91_125vector_srfi_133 = NULL;
object __glo_reverse_91vector_91_125list_srfi_133 = NULL;
object __glo_vector_91reverse_67_srfi_133 = NULL;
object __glo_vector_91reverse_91copy_67_srfi_133 = NULL;
object __glo_vector_91swap_67_srfi_133 = NULL;
object __glo_vector_91partition_srfi_133 = NULL;
object __glo_vector_91every_srfi_133 = NULL;
object __glo_vector_91any_srfi_133 = NULL;
object __glo_vector_91binary_91search_srfi_133 = NULL;
object __glo_vector_91index_95skip_91right_srfi_133 = NULL;
object __glo_vector_91skip_91right_srfi_133 = NULL;
object __glo_vector_91index_91right_srfi_133 = NULL;
object __glo_vector_91index_95skip_srfi_133 = NULL;
object __glo_vector_91skip_srfi_133 = NULL;
object __glo_vector_91index_srfi_133 = NULL;
object __glo_vector_91cumulate_srfi_133 = NULL;
object __glo_vector_91count_srfi_133 = NULL;
object __glo_vector_91for_91each_srfi_133 = NULL;
object __glo_vector_91map_67_srfi_133 = NULL;
object __glo_vector_91fold_91right_srfi_133 = NULL;
object __glo_vector_91fold_srfi_133 = NULL;
object __glo_binary_91vector_123_srfi_133 = NULL;
object __glo_vector_123_srfi_133 = NULL;
object __glo_vector_91empty_127_srfi_133 = NULL;
object __glo_vector_91append_91subvectors_srfi_133 = NULL;
object __glo_vector_91concatenate_117aux_srfi_133 = NULL;
object __glo_vector_91concatenate_srfi_133 = NULL;
object __glo_vector_91reverse_91copy_srfi_133 = NULL;
object __glo_vector_91copy_117parse_91args_srfi_133 = NULL;
object __glo_vector_91copy_srfi_133 = NULL;
object __glo_vector_91unfold_91right_67_srfi_133 = NULL;
object __glo_vector_91unfold_91right_srfi_133 = NULL;
object __glo_vector_91unfold_67_srfi_133 = NULL;
object __glo_vector_91unfold_srfi_133 = NULL;
object __glo__75vector_91map2_87_67_srfi_133 = NULL;
object __glo__75vector_91map1_67_srfi_133 = NULL;
object __glo__75vector_91fold2_87_srfi_133 = NULL;
object __glo__75vector_91fold1_srfi_133 = NULL;
object __glo__75vector_91reverse_67_srfi_133 = NULL;
object __glo__75vector_91reverse_91copy_67_srfi_133 = NULL;
object __glo__75vector_91copy_67_srfi_133 = NULL;
object __glo__75smallest_91length_srfi_133 = NULL;
object __glo_let_91vector_91start_87end_srfi_133 = NULL;
object __glo_vector_91parse_91start_87end_srfi_133 = NULL;
object __glo_check_91indices_srfi_133 = NULL;
object __glo_check_91index_srfi_133 = NULL;
object __glo_check_91type_srfi_133 = NULL;
object __glo_vectors_91ref_srfi_133 = NULL;
object __glo_unspecified_91value_191_191inline_191_191_srfi_133 = NULL;
object __glo_unspecified_91value_srfi_133 = NULL;
object __glo_between_127_191_191inline_191_191_srfi_133 = NULL;
object __glo_between_127_srfi_133 = NULL;
object __glo_nonneg_91int_127_191_191inline_191_191_srfi_133 = NULL;
object __glo_nonneg_91int_127_srfi_133 = NULL;
object __glo_let_85_91optionals_117aux_srfi_133 = NULL;
object __glo_let_85_91optionals_srfi_133 = NULL;
extern object __glo_member_scheme_base;
extern object __glo_assoc_scheme_base;
extern object __glo_cons_91source_scheme_base;
extern object __glo_syntax_91rules_scheme_base;
extern object __glo_letrec_85_scheme_base;
extern object __glo_guard_scheme_base;
extern object __glo_guard_91aux_scheme_base;
extern object __glo_define_91record_91type_scheme_base;
extern object __glo_record_127_scheme_base;
extern object __glo_is_91a_127_scheme_base;
extern object __glo_register_91simple_91type_scheme_base;
extern object __glo_make_91type_91predicate_scheme_base;
extern object __glo_make_91constructor_scheme_base;
extern object __glo_make_91constructor_95args_scheme_base;
extern object __glo_make_91getter_scheme_base;
extern object __glo_make_91setter_scheme_base;
extern object __glo_slot_91ref_scheme_base;
extern object __glo_slot_91set_67_scheme_base;
extern object __glo_type_91slot_91offset_scheme_base;
extern object __glo_make_91record_91marker_scheme_base;
extern object __glo_receive_scheme_base;
extern object __glo_abs_scheme_base;
extern object __glo_max_scheme_base;
extern object __glo_min_scheme_base;
extern object __glo_modulo_scheme_base;
extern object __glo_floor_91remainder_scheme_base;
extern object __glo_even_127_scheme_base;
extern object __glo_exact_91integer_127_scheme_base;
extern object __glo_exact_91integer_91sqrt_scheme_base;
extern object __glo_exact_127_scheme_base;
extern object __glo_inexact_127_scheme_base;
extern object __glo_odd_127_scheme_base;
extern object __glo_complex_127_scheme_base;
extern object __glo_rational_127_scheme_base;
extern object __glo_bignum_127_scheme_base;
extern object __glo_gcd_scheme_base;
extern object __glo_lcm_scheme_base;
extern object __glo_quotient_scheme_base;
extern object __glo_remainder_scheme_base;
extern object __glo_truncate_91quotient_scheme_base;
extern object __glo_truncate_91remainder_scheme_base;
extern object __glo_truncate_95_scheme_base;
extern object __glo_floor_91quotient_scheme_base;
extern object __glo_floor_91remainder_scheme_base;
extern object __glo_floor_95_scheme_base;
extern object __glo_square_scheme_base;
extern object __glo_expt_scheme_base;
extern object __glo_call_91with_91current_91continuation_scheme_base;
extern object __glo_call_95cc_scheme_base;
extern object __glo_call_91with_91values_scheme_base;
extern object __glo_dynamic_91wind_scheme_base;
extern object __glo_values_scheme_base;
extern object __glo_char_123_127_scheme_base;
extern object __glo_char_121_127_scheme_base;
extern object __glo_char_125_127_scheme_base;
extern object __glo_char_121_123_127_scheme_base;
extern object __glo_char_125_123_127_scheme_base;
extern object __glo_string_123_127_scheme_base;
extern object __glo_string_121_127_scheme_base;
extern object __glo_string_121_123_127_scheme_base;
extern object __glo_string_125_127_scheme_base;
extern object __glo_string_125_123_127_scheme_base;
extern object __glo_fast_91string_123_127_scheme_base;
extern object __glo_fast_91string_121_127_scheme_base;
extern object __glo_fast_91string_121_123_127_scheme_base;
extern object __glo_fast_91string_125_127_scheme_base;
extern object __glo_fast_91string_125_123_127_scheme_base;
extern object __glo_foldl_scheme_base;
extern object __glo_foldr_scheme_base;
extern object __glo_not_scheme_base;
extern object __glo_list_127_scheme_base;
extern object __glo_zero_127_scheme_base;
extern object __glo_positive_127_scheme_base;
extern object __glo_negative_127_scheme_base;
extern object __glo_append_scheme_base;
extern object __glo__list_scheme_base;
extern object __glo_make_91list_scheme_base;
extern object __glo_list_91copy_scheme_base;
extern object __glo_map_scheme_base;
extern object __glo_Cyc_91map_91loop_911_scheme_base;
extern object __glo_Cyc_91map_91loop_912_scheme_base;
extern object __glo_Cyc_91for_91each_91loop_911_scheme_base;
extern object __glo_Cyc_91for_91each_91loop_912_scheme_base;
extern object __glo_for_91each_scheme_base;
extern object __glo_list_91tail_scheme_base;
extern object __glo_list_91ref_scheme_base;
extern object __glo_list_91set_67_scheme_base;
extern object __glo_reverse_scheme_base;
extern object __glo_boolean_123_127_scheme_base;
extern object __glo_symbol_123_127_scheme_base;
extern object __glo_Cyc_91obj_123_127_scheme_base;
extern object __glo_vector_scheme_base;
extern object __glo_vector_91append_scheme_base;
extern object __glo_vector_91copy_srfi_133;
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_srfi_133;
extern object __glo_make_91string_scheme_base;
extern object __glo_string_scheme_base;
extern object __glo_string_91copy_scheme_base;
extern object __glo_string_91copy_67_scheme_base;
extern object __glo_string_91fill_67_scheme_base;
extern object __glo_string_91_125list_scheme_base;
extern object __glo_string_91_125vector_scheme_base;
extern object __glo_string_91map_scheme_base;
extern object __glo_string_91for_91each_scheme_base;
extern object __glo_make_91parameter_scheme_base;
extern object __glo_current_91output_91port_scheme_base;
extern object __glo_current_91input_91port_scheme_base;
extern object __glo_current_91error_91port_scheme_base;
extern object __glo_call_91with_91port_scheme_base;
extern object __glo_error_91object_127_scheme_base;
extern object __glo_error_91object_91message_scheme_base;
extern object __glo_error_91object_91irritants_scheme_base;
extern object __glo_error_95loc_scheme_base;
extern object __glo_error_scheme_base;
extern object __glo_raise_scheme_base;
extern object __glo_raise_91continuable_scheme_base;
extern object __glo_with_91handler_scheme_base;
extern object __glo_with_91exception_91handler_scheme_base;
extern object __glo_Cyc_91add_91exception_91handler_scheme_base;
extern object __glo_Cyc_91remove_91exception_91handler_scheme_base;
extern object __glo_newline_scheme_base;
extern object __glo_write_91char_scheme_base;
extern object __glo_write_91string_scheme_base;
extern object __glo_write_91string_911_scheme_base;
extern object __glo_write_91string_912_scheme_base;
extern object __glo_flush_91output_91port_scheme_base;
extern object __glo_char_91ready_127_scheme_base;
extern object __glo_peek_91char_scheme_base;
extern object __glo_read_91char_scheme_base;
extern object __glo_read_91line_scheme_base;
extern object __glo_read_91string_scheme_base;
extern object __glo_input_91port_127_scheme_base;
extern object __glo_output_91port_127_scheme_base;
extern object __glo_input_91port_91open_127_scheme_base;
extern object __glo_output_91port_91open_127_scheme_base;
extern object __glo_get_91output_91string_scheme_base;
extern object __glo_open_91output_91string_scheme_base;
extern object __glo_open_91input_91string_scheme_base;
extern object __glo_get_91output_91bytevector_scheme_base;
extern object __glo_open_91input_91bytevector_scheme_base;
extern object __glo_open_91output_91bytevector_scheme_base;
extern object __glo_features_scheme_base;
extern object __glo_Cyc_91add_91feature_67_scheme_base;
extern object __glo_Cyc_91version_scheme_base;
extern object __glo_any_scheme_base;
extern object __glo_every_scheme_base;
extern object __glo_and_scheme_base;
extern object __glo_or_scheme_base;
extern object __glo_let_scheme_base;
extern object __glo_let_85_scheme_base;
extern object __glo_letrec_scheme_base;
extern object __glo_let_85_91values_scheme_base;
extern object __glo_let_91values_scheme_base;
extern object __glo_define_91values_scheme_base;
extern object __glo_begin_scheme_base;
extern object __glo__case_scheme_base;
extern object __glo_cond_scheme_base;
extern object __glo_cond_91expand_scheme_base;
extern object __glo__do_scheme_base;
extern object __glo_when_scheme_base;
extern object __glo_unless_scheme_base;
extern object __glo_quasiquote_scheme_base;
extern object __glo_floor_scheme_base;
extern object __glo_ceiling_scheme_base;
extern object __glo_truncate_scheme_base;
extern object __glo_round_scheme_base;
extern object __glo_exact_scheme_base;
extern object __glo_inexact_scheme_base;
extern object __glo_eof_91object_scheme_base;
extern object __glo__void_scheme_base;
extern object __glo_syntax_91error_scheme_base;
extern object __glo_bytevector_91copy_scheme_base;
extern object __glo_bytevector_91copy_67_scheme_base;
extern object __glo_utf8_91_125string_scheme_base;
extern object __glo_string_91_125utf8_scheme_base;
extern object __glo_denominator_scheme_base;
extern object __glo_numerator_scheme_base;
extern object __glo_parameterize_scheme_base;
extern object __glo_read_91bytevector_scheme_base;
extern object __glo_read_91bytevector_67_scheme_base;
extern object __glo_write_91bytevector_scheme_base;
extern object __glo_peek_91u8_scheme_base;
extern object __glo_read_91u8_scheme_base;
extern object __glo_write_91u8_scheme_base;
extern object __glo_binary_91port_127_scheme_base;
extern object __glo_textual_91port_127_scheme_base;
extern object __glo_rationalize_scheme_base;
extern object __glo_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(_75smallest_91length);
defsymbol(_75vector_91copy_67);
defsymbol(_75vector_91reverse_91copy_67);
defsymbol(_75vector_91reverse_67);
defsymbol(_75vector_91fold1);
defsymbol(_75vector_91fold2_87);
defsymbol(_75vector_91map1_67);
defsymbol(_75vector_91map2_87_67);
defsymbol(vector_91unfold_67);
defsymbol(vector_91concatenate_117aux);
defsymbol(vector_91fold_91right);
defsymbol(vector_91for_91each);
defsymbol(vector_91index_95skip);
defsymbol(vector_91index_95skip_91right);
defsymbol(vector_91any);
defsymbol(vector_91every);
defsymbol(attempted);
defsymbol(_list);
defsymbol(source_91length);
defsymbol(source);
defsymbol(target_91length);
defsymbol(target);
defsymbol(send);
defsymbol(sstart);
defsymbol(tstart);
defsymbol(_for);
defsymbol(end);
defsymbol(start);
defsymbol(quote);
defsymbol(vector_91parse_91start_87end);
defsymbol(_127end);
defsymbol(_127start);
defsymbol(receive);
defsymbol(_127callee);
defsymbol(vector_127);
defsymbol(check_91type);
defsymbol(_127vec);
defsymbol(were);
defsymbol(extra);
defsymbol(was);
defsymbol(len);
defsymbol(_125);
defsymbol(_121);
defsymbol(vector);
defsymbol(into);
defsymbol(calling);
defsymbol(_while);
defsymbol(cdr);
defsymbol(new_91args);
defsymbol(car);
defsymbol(_127more);
defsymbol(let_85);
defsymbol(_127orig_91args_91var);
defsymbol(length);
defsymbol(error);
defsymbol(_127args_91var);
defsymbol(null_127);
defsymbol(_if);
defsymbol(_127args);
defsymbol(let_85_91optionals_117aux);
defsymbol(_127body2);
defsymbol(_127body1);
defsymbol(_127default);
defsymbol(_127var);
defsymbol(let_85_91optionals);
defsymbol(_93_93_93);
defsymbol(_127x);
defsymbol(args);
defsymbol(let);
static void __lambda_470(void *data, object clo, int argc, object *args) ;/*closure _,object k_734253*/
static void __lambda_471(void *data, object clo, int argc, object *args) ;/*object self_735048, object loop_73536_732118_732786*/
static void __lambda_771(void *data, object clo, int argc, object *args) ;/*object self_735049, object loop_73536_732118_732786*/
static void __lambda_719(void *data, object clo, int argc, object *args) ;/*object self_735050, object k_734580, object vector_91list_73537_732119_732787, object length_73538_732120_732788, object callee_73539_732121_732789*/
static void __lambda_720(void *data, object clo, int argc, object *args) ;/*object self_735051, object r_734585*/
static void __lambda_721(void *data, object clo, int argc, object *args) ;/*object self_735052, object r_734584*/
static void __lambda_722(void *data, object clo, int argc, object *args) ;/*object self_735053, object r_734583*/
static void __lambda_472(void *data, object clo, int argc, object *args) ;/*object self_735054, object r_734579*/
static void __lambda_473(void *data, object clo, int argc, object *args) ;/*object self_735055, object r_734578*/
static void __lambda_474(void *data, object clo, int argc, object *args) ;/*object self_735056, object r_734577*/
static void __lambda_475(void *data, object clo, int argc, object *args) ;/*object self_735057, object r_734255*/
static void __lambda_476(void *data, object clo, int argc, object *args) ;/*object self_735058, object loop_95l_91_125r_73540_732122_732790, object loop_95r_91_125l_73541_732123_732791*/
static void __lambda_770(void *data, object clo, int argc, object *args) ;/*object self_735059, object loop_95l_91_125r_73540_732122_732790*/
static void __lambda_769(void *data, object clo, int argc, object *args) ;/*object self_735060, object loop_95r_91_125l_73541_732123_732791*/
static void __lambda_716(void *data, object clo, int argc, object *args) ;/*object self_735061, object k_734571, object target_73542_732124_732792, object source_73543_732125_732793, object send_73544_732126_732794, object i_73545_732127_732795, object j_73546_732128_732796*/
static void __lambda_717(void *data, object clo, int argc, object *args) ;/*object self_735062, object r_734576*/
static void __lambda_718(void *data, object clo, int argc, object *args) ;/*object self_735063, object r_734573*/
static void __lambda_477(void *data, object clo, int argc, object *args) ;/*object self_735064, object r_734570*/
static void __lambda_478(void *data, object clo, int argc, object *args) ;/*object self_735065, object r_734554*/
static void __lambda_713(void *data, object clo, int argc, object *args) ;/*object self_735066, object k_734564, object target_73550_732129_732797, object source_73551_732130_732798, object sstart_73552_732131_732799, object i_73553_732132_732800, object j_73554_732133_732801*/
static void __lambda_714(void *data, object clo, int argc, object *args) ;/*object self_735067, object r_734569*/
static void __lambda_715(void *data, object clo, int argc, object *args) ;/*object self_735068, object r_734566*/
static void __lambda_479(void *data, object clo, int argc, object *args) ;/*object self_735069, object r_734563*/
static void __lambda_480(void *data, object clo, int argc, object *args) ;/*object self_735070, object r_734555*/
static void __lambda_712(void *data, object clo, int argc, object *args) ;/*object self_735071, object k_734556, object target_73558_732134_732802, object tstart_73559_732135_732803, object source_73560_732136_732804, object sstart_73561_732137_732805, object send_73562_732138_732806*/
static void __lambda_481(void *data, object clo, int argc, object *args) ;/*object self_735072, object r_734553*/
static void __lambda_482(void *data, object clo, int argc, object *args) ;/*object self_735073, object r_734256*/
static void __lambda_483(void *data, object clo, int argc, object *args) ;/*object self_735074, object loop_73563_732139_732807*/
static void __lambda_768(void *data, object clo, int argc, object *args) ;/*object self_735075, object loop_73563_732139_732807*/
static void __lambda_709(void *data, object clo, int argc, object *args) ;/*object self_735076, object k_734547, object target_73564_732140_732808, object source_73565_732141_732809, object sstart_73566_732142_732810, object i_73567_732143_732811, object j_73568_732144_732812*/
static void __lambda_710(void *data, object clo, int argc, object *args) ;/*object self_735077, object r_734552*/
static void __lambda_711(void *data, object clo, int argc, object *args) ;/*object self_735078, object r_734549*/
static void __lambda_484(void *data, object clo, int argc, object *args) ;/*object self_735079, object r_734546*/
static void __lambda_485(void *data, object clo, int argc, object *args) ;/*object self_735080, object r_734543*/
static void __lambda_708(void *data, object clo, int argc, object *args) ;/*object self_735081, object k_734544, object target_73572_732145_732813, object tstart_73573_732146_732814, object source_73574_732147_732815, object sstart_73575_732148_732816, object send_73576_732149_732817*/
static void __lambda_486(void *data, object clo, int argc, object *args) ;/*object self_735082, object r_734542*/
static void __lambda_487(void *data, object clo, int argc, object *args) ;/*object self_735083, object r_734257*/
static void __lambda_488(void *data, object clo, int argc, object *args) ;/*object self_735084, object loop_73577_732150_732818*/
static void __lambda_767(void *data, object clo, int argc, object *args) ;/*object self_735085, object loop_73577_732150_732818*/
static void __lambda_703(void *data, object clo, int argc, object *args) ;/*object self_735086, object k_734534, object vec_73578_732151_732819, object i_73579_732152_732820, object j_73580_732153_732821*/
static void __lambda_704(void *data, object clo, int argc, object *args) ;/*object self_735087, object v_73584_732154_732822*/
static void __lambda_705(void *data, object clo, int argc, object *args) ;/*object self_735088, object r_734541*/
static void __lambda_706(void *data, object clo, int argc, object *args) ;/*object self_735089, object r_734537*/
static void __lambda_707(void *data, object clo, int argc, object *args) ;/*object self_735090, object r_734538*/
static void __lambda_489(void *data, object clo, int argc, object *args) ;/*object self_735091, object r_734533*/
static void __lambda_490(void *data, object clo, int argc, object *args) ;/*object self_735092, object r_734530*/
static void __lambda_702(void *data, object clo, int argc, object *args) ;/*object self_735093, object k_734531, object vec_73585_732155_732823, object start_73586_732156_732824, object end_73587_732157_732825*/
static void __lambda_491(void *data, object clo, int argc, object *args) ;/*object self_735094, object r_734529*/
static void __lambda_492(void *data, object clo, int argc, object *args) ;/*object self_735095, object r_734258*/
static void __lambda_493(void *data, object clo, int argc, object *args) ;/*object self_735096, object loop_73588_732158_732826*/
static void __lambda_766(void *data, object clo, int argc, object *args) ;/*object self_735097, object loop_73588_732158_732826*/
static void __lambda_699(void *data, object clo, int argc, object *args) ;/*object self_735098, object k_734524, object kons_73589_732159_732827, object knil_73590_732160_732828, object len_73591_732161_732829, object vec_73592_732162_732830, object i_73593_732163_732831*/
static void __lambda_700(void *data, object clo, int argc, object *args) ;/*object self_735099, object r_734528*/
static void __lambda_701(void *data, object clo, int argc, object *args) ;/*object self_735100, object r_734526*/
static void __lambda_494(void *data, object clo, int argc, object *args) ;/*object self_735101, object r_734523*/
static void __lambda_495(void *data, object clo, int argc, object *args) ;/*object self_735102, object r_734521*/
static void __lambda_698(void *data, object clo, int argc, object *args) ;/*object self_735103, object k_734522, object kons_73594_732164_732832, object knil_73595_732165_732833, object len_73596_732166_732834, object vec_73597_732167_732835*/
static void __lambda_496(void *data, object clo, int argc, object *args) ;/*object self_735104, object r_734520*/
static void __lambda_497(void *data, object clo, int argc, object *args) ;/*object self_735105, object r_734259*/
static void __lambda_498(void *data, object clo, int argc, object *args) ;/*object self_735106, object loop_73598_732168_732836*/
static void __lambda_765(void *data, object clo, int argc, object *args) ;/*object self_735107, object loop_73598_732168_732836*/
static void __lambda_695(void *data, object clo, int argc, object *args) ;/*object self_735108, object k_734515, object kons_73599_732169_732837, object knil_73600_732170_732838, object len_73601_732171_732839, object vectors_73602_732172_732840, object i_73603_732173_732841*/
static void __lambda_696(void *data, object clo, int argc, object *args) ;/*object self_735109, object r_734519*/
static void __lambda_697(void *data, object clo, int argc, object *args) ;/*object self_735110, object r_734517*/
static void __lambda_499(void *data, object clo, int argc, object *args) ;/*object self_735111, object r_734514*/
static void __lambda_500(void *data, object clo, int argc, object *args) ;/*object self_735112, object r_734512*/
static void __lambda_694(void *data, object clo, int argc, object *args) ;/*object self_735113, object k_734513, object kons_73604_732174_732842, object knil_73605_732175_732843, object len_73606_732176_732844, object vectors_73607_732177_732845*/
static void __lambda_501(void *data, object clo, int argc, object *args) ;/*object self_735114, object r_734511*/
static void __lambda_502(void *data, object clo, int argc, object *args) ;/*object self_735115, object r_734260*/
static void __lambda_503(void *data, object clo, int argc, object *args) ;/*object self_735116, object loop_73608_732178_732846*/
static void __lambda_764(void *data, object clo, int argc, object *args) ;/*object self_735117, object loop_73608_732178_732846*/
static void __lambda_690(void *data, object clo, int argc, object *args) ;/*object self_735118, object k_734505, object f_73609_732179_732847, object target_73610_732180_732848, object vec_73611_732181_732849, object i_73612_732182_732850*/
static void __lambda_691(void *data, object clo, int argc, object *args) ;/*object self_735119, object r_734510*/
static void __lambda_692(void *data, object clo, int argc, object *args) ;/*object self_735120, object r_734509*/
static void __lambda_693(void *data, object clo, int argc, object *args) ;/*object self_735121, object r_734508*/
static void __lambda_504(void *data, object clo, int argc, object *args) ;/*object self_735122, object r_734504*/
static void __lambda_505(void *data, object clo, int argc, object *args) ;/*object self_735123, object r_734502*/
static void __lambda_689(void *data, object clo, int argc, object *args) ;/*object self_735124, object k_734503, object f_73614_732184_732852, object target_73615_732185_732853, object vec_73616_732186_732854, object len_73617_732187_732855*/
static void __lambda_506(void *data, object clo, int argc, object *args) ;/*object self_735125, object r_734501*/
static void __lambda_507(void *data, object clo, int argc, object *args) ;/*object self_735126, object r_734261*/
static void __lambda_508(void *data, object clo, int argc, object *args) ;/*object self_735127, object loop_73618_732188_732856*/
static void __lambda_763(void *data, object clo, int argc, object *args) ;/*object self_735128, object loop_73618_732188_732856*/
static void __lambda_685(void *data, object clo, int argc, object *args) ;/*object self_735129, object k_734495, object f_73619_732189_732857, object target_73620_732190_732858, object vectors_73621_732191_732859, object i_73622_732192_732860*/
static void __lambda_686(void *data, object clo, int argc, object *args) ;/*object self_735130, object r_734500*/
static void __lambda_687(void *data, object clo, int argc, object *args) ;/*object self_735131, object r_734499*/
static void __lambda_688(void *data, object clo, int argc, object *args) ;/*object self_735132, object r_734498*/
static void __lambda_509(void *data, object clo, int argc, object *args) ;/*object self_735133, object r_734494*/
static void __lambda_510(void *data, object clo, int argc, object *args) ;/*object self_735134, object r_734492*/
static void __lambda_684(void *data, object clo, int argc, object *args) ;/*object self_735135, object k_734493, object f_73624_732194_732862, object target_73625_732195_732863, object vectors_73626_732196_732864, object len_73627_732197_732865*/
static void __lambda_511(void *data, object clo, int argc, object *args) ;/*object self_735136, object r_734491*/
static void __lambda_512(void *data, object clo, int argc, object *args) ;/*object self_735137, object r_734262*/
static void __lambda_513(void *data, object clo, int argc, object *args) ;/*object self_735138, object tabulate_67_73631_732198_732866, object unfold1_67_73632_732199_732867, object unfold2_87_67_73633_732200_732868*/
static void __lambda_762(void *data, object clo, int argc, object *args) ;/*object self_735139, object tabulate_67_73631_732198_732866*/
static void __lambda_761(void *data, object clo, int argc, object *args) ;/*object self_735140, object unfold1_67_73632_732199_732867*/
static void __lambda_760(void *data, object clo, int argc, object *args) ;/*object self_735141, object unfold2_87_67_73633_732200_732868*/
static void __lambda_681(void *data, object clo, int argc, object *args) ;/*object self_735142, object k_734486, object f_73634_732201_732869, object vec_73635_732202_732870, object i_73636_732203_732871, object len_73637_732204_732872*/
static void __lambda_682(void *data, object clo, int argc, object *args) ;/*object self_735143, object r_734490*/
static void __lambda_683(void *data, object clo, int argc, object *args) ;/*object self_735144, object r_734488*/
static void __lambda_514(void *data, object clo, int argc, object *args) ;/*object self_735145, object r_734485*/
static void __lambda_515(void *data, object clo, int argc, object *args) ;/*object self_735146, object r_734456*/
static void __lambda_675(void *data, object clo, int argc, object *args) ;/*object self_735147, object k_734477, object f_73641_732205_732873, object vec_73642_732206_732874, object i_73643_732207_732875, object len_73644_732208_732876, object seed_73645_732209_732877*/
static void __lambda_680(void *data, object clo, int argc, object *args) ;/*object self_735148, object k_734484*/
static void __lambda_676(void *data, object clo, int argc, object *args) ;/*object self_735149, object r_734479*/
static void __lambda_678(void *data, object clo, int argc, object *args) ;/*object self_735150, object k_734481, object elt_73646_732210_732878, object new_91seed_73647_732211_732879*/
static void __lambda_679(void *data, object clo, int argc, object *args) ;/*object self_735151, object r_734482*/
static void __lambda_677(void *data, object clo, int argc, object *args) ;/*object self_735152, object r_734480*/
static void __lambda_516(void *data, object clo, int argc, object *args) ;/*object self_735153, object r_734476*/
static void __lambda_517(void *data, object clo, int argc, object *args) ;/*object self_735154, object r_734457*/
static void __lambda_669(void *data, object clo, int argc, object *args) ;/*object self_735155, object k_734468, object f_73648_732212_732880, object vec_73649_732213_732881, object i_73650_732214_732882, object len_73651_732215_732883, object seeds_73652_732216_732884*/
static void __lambda_674(void *data, object clo, int argc, object *args) ;/*object self_735156, object k_734475*/
static void __lambda_670(void *data, object clo, int argc, object *args) ;/*object self_735157, object r_734470*/
static void __lambda_672(void *data, object clo, int argc, object *args) ;/*object self_735158, object k_734472, object elt_73653_732217_732885, object new_91seeds_73654_732218_732886_raw, ...*/
static void __lambda_673(void *data, object clo, int argc, object *args) ;/*object self_735159, object r_734473*/
static void __lambda_671(void *data, object clo, int argc, object *args) ;/*object self_735160, object r_734471*/
static void __lambda_518(void *data, object clo, int argc, object *args) ;/*object self_735161, object r_734467*/
static void __lambda_519(void *data, object clo, int argc, object *args) ;/*object self_735162, object r_734458*/
static void __lambda_663(void *data, object clo, int argc, object *args) ;/*object self_735163, object k_734459, object f_73655_732219_732887, object vec_73656_732220_732888, object start_73657_732221_732889, object end_73658_732222_732890, object initial_91seeds_73659_732223_732891_raw, ...*/
static void __lambda_664(void *data, object clo, int argc, object *args) ;/*object self_735164, object r_734460*/
static void __lambda_665(void *data, object clo, int argc, object *args) ;/*object self_735165, object r_734461*/
static void __lambda_666(void *data, object clo, int argc, object *args) ;/*object self_735166, object r_734462*/
static void __lambda_667(void *data, object clo, int argc, object *args) ;/*object self_735167, object f_73660_732224_732892, object start_73661_732225_732893, object end_73662_732226_732894*/
static void __lambda_668(void *data, object clo, int argc, object *args) ;/*object self_735168, object r_734466*/
static void __lambda_520(void *data, object clo, int argc, object *args) ;/*object self_735169, object r_734455*/
static void __lambda_521(void *data, object clo, int argc, object *args) ;/*object self_735170, object r_734263*/
static void __lambda_522(void *data, object clo, int argc, object *args) ;/*object self_735171, object compute_91length_73794_732227_732895, object concatenate_67_73795_732228_732896*/
static void __lambda_759(void *data, object clo, int argc, object *args) ;/*object self_735172, object compute_91length_73794_732227_732895*/
static void __lambda_758(void *data, object clo, int argc, object *args) ;/*object self_735173, object concatenate_67_73795_732228_732896*/
static void __lambda_661(void *data, object clo, int argc, object *args) ;/*object self_735174, object k_734448, object vectors_73796_732229_732897, object len_73797_732230_732898, object callee_73798_732231_732899*/
static void __lambda_662(void *data, object clo, int argc, object *args) ;/*object self_735175, object vec_73799_732232_732900*/
static void __lambda_523(void *data, object clo, int argc, object *args) ;/*object self_735176, object r_734447*/
static void __lambda_524(void *data, object clo, int argc, object *args) ;/*object self_735177, object r_734425*/
static void __lambda_659(void *data, object clo, int argc, object *args) ;/*object self_735178, object k_734440, object vectors_73800_732233_732901, object target_73801_732234_732902, object to_73802_732235_732903*/
static void __lambda_660(void *data, object clo, int argc, object *args) ;/*object self_735179, object r_734444*/
static void __lambda_525(void *data, object clo, int argc, object *args) ;/*object self_735180, object r_734439*/
static void __lambda_526(void *data, object clo, int argc, object *args) ;/*object self_735181, object r_734426*/
static void __lambda_650(void *data, object clo, int argc, object *args) ;/*object self_735182, object k_734427, object vectors_73810_732238_732906, object callee_73811_732239_732907*/
static void __lambda_651(void *data, object clo, int argc, object *args) ;/*object self_735183, object r_734438*/
static void __lambda_656(void *data, object clo, int argc, object *args) ;/*object self_735188, object r_734437*/
static void __lambda_657(void *data, object clo, int argc, object *args) ;/*object self_735189, object new_91vector_73829_732243_732911*/
static void __lambda_658(void *data, object clo, int argc, object *args) ;/*object self_735190, object r_734436*/
static void __lambda_652(void *data, object clo, int argc, object *args) ;/*object self_735184, object vec_73820_732240_732908*/
static void __lambda_653(void *data, object clo, int argc, object *args) ;/*object self_735185, object len_73823_732241_732909*/
static void __lambda_654(void *data, object clo, int argc, object *args) ;/*object self_735186, object new_73826_732242_732910*/
static void __lambda_655(void *data, object clo, int argc, object *args) ;/*object self_735187, object r_734433*/
static void __lambda_527(void *data, object clo, int argc, object *args) ;/*object self_735191, object r_734424*/
static void __lambda_528(void *data, object clo, int argc, object *args) ;/*object self_735192, object r_734264*/
static void __lambda_529(void *data, object clo, int argc, object *args) ;/*object self_735193, object loop1_73929_732244_732912, object loop2_87_73930_732245_732913*/
static void __lambda_757(void *data, object clo, int argc, object *args) ;/*object self_735194, object loop1_73929_732244_732912*/
static void __lambda_756(void *data, object clo, int argc, object *args) ;/*object self_735195, object loop2_87_73930_732245_732913*/
static void __lambda_647(void *data, object clo, int argc, object *args) ;/*object self_735196, object k_734419, object kons_73931_732246_732914, object knil_73932_732247_732915, object vec_73933_732248_732916, object i_73934_732249_732917*/
static void __lambda_648(void *data, object clo, int argc, object *args) ;/*object self_735197, object r_734423*/
static void __lambda_649(void *data, object clo, int argc, object *args) ;/*object self_735198, object r_734421*/
static void __lambda_530(void *data, object clo, int argc, object *args) ;/*object self_735199, object r_734418*/
static void __lambda_531(void *data, object clo, int argc, object *args) ;/*object self_735200, object r_734400*/
static void __lambda_644(void *data, object clo, int argc, object *args) ;/*object self_735201, object k_734413, object kons_73935_732250_732918, object knil_73936_732251_732919, object vectors_73937_732252_732920, object i_73938_732253_732921*/
static void __lambda_645(void *data, object clo, int argc, object *args) ;/*object self_735202, object r_734417*/
static void __lambda_646(void *data, object clo, int argc, object *args) ;/*object self_735203, object r_734415*/
static void __lambda_532(void *data, object clo, int argc, object *args) ;/*object self_735204, object r_734412*/
static void __lambda_533(void *data, object clo, int argc, object *args) ;/*object self_735205, object r_734401*/
static void __lambda_636(void *data, object clo, int argc, object *args) ;/*object self_735206, object k_734402, object kons_73939_732254_732922, object knil_73940_732255_732923, object vec_73941_732256_732924, object vectors_73942_732257_732925_raw, ...*/
static void __lambda_637(void *data, object clo, int argc, object *args) ;/*object self_735207, object r_734403*/
static void __lambda_638(void *data, object clo, int argc, object *args) ;/*object self_735208, object r_734404*/
static void __lambda_639(void *data, object clo, int argc, object *args) ;/*object self_735209, object kons_73943_732258_732926, object vec_73944_732259_732927*/
static void __lambda_641(void *data, object clo, int argc, object *args) ;/*object self_735211, object r_734408*/
static void __lambda_642(void *data, object clo, int argc, object *args) ;/*object self_735212, object r_734410*/
static void __lambda_643(void *data, object clo, int argc, object *args) ;/*object self_735213, object r_734409*/
static void __lambda_640(void *data, object clo, int argc, object *args) ;/*object self_735210, object r_734407*/
static void __lambda_534(void *data, object clo, int argc, object *args) ;/*object self_735214, object r_734399*/
static void __lambda_535(void *data, object clo, int argc, object *args) ;/*object self_735215, object r_734265*/
static void __lambda_536(void *data, object clo, int argc, object *args) ;/*object self_735216, object for_91each1_73957_732260_732928, object for_91each2_87_73958_732261_732929*/
static void __lambda_755(void *data, object clo, int argc, object *args) ;/*object self_735217, object for_91each1_73957_732260_732928*/
static void __lambda_754(void *data, object clo, int argc, object *args) ;/*object self_735218, object for_91each2_87_73958_732261_732929*/
static void __lambda_633(void *data, object clo, int argc, object *args) ;/*object self_735219, object k_734394, object f_73959_732262_732930, object vec_73960_732263_732931, object i_73961_732264_732932, object len_73962_732265_732933*/
static void __lambda_634(void *data, object clo, int argc, object *args) ;/*object self_735220, object r_734398*/
static void __lambda_635(void *data, object clo, int argc, object *args) ;/*object self_735221, object r_734396*/
static void __lambda_537(void *data, object clo, int argc, object *args) ;/*object self_735222, object r_734393*/
static void __lambda_538(void *data, object clo, int argc, object *args) ;/*object self_735223, object r_734377*/
static void __lambda_630(void *data, object clo, int argc, object *args) ;/*object self_735224, object k_734388, object f_73966_732266_732934, object vecs_73967_732267_732935, object i_73968_732268_732936, object len_73969_732269_732937*/
static void __lambda_631(void *data, object clo, int argc, object *args) ;/*object self_735225, object r_734392*/
static void __lambda_632(void *data, object clo, int argc, object *args) ;/*object self_735226, object r_734390*/
static void __lambda_539(void *data, object clo, int argc, object *args) ;/*object self_735227, object r_734387*/
static void __lambda_540(void *data, object clo, int argc, object *args) ;/*object self_735228, object r_734378*/
static void __lambda_623(void *data, object clo, int argc, object *args) ;/*object self_735229, object k_734379, object f_73973_732270_732938, object vec_73974_732271_732939, object vectors_73975_732272_732940_raw, ...*/
static void __lambda_624(void *data, object clo, int argc, object *args) ;/*object self_735230, object r_734380*/
static void __lambda_625(void *data, object clo, int argc, object *args) ;/*object self_735231, object r_734381*/
static void __lambda_626(void *data, object clo, int argc, object *args) ;/*object self_735232, object f_73976_732273_732941, object vec_73977_732274_732942*/
static void __lambda_628(void *data, object clo, int argc, object *args) ;/*object self_735234, object r_734384*/
static void __lambda_629(void *data, object clo, int argc, object *args) ;/*object self_735235, object r_734385*/
static void __lambda_627(void *data, object clo, int argc, object *args) ;/*object self_735233, object r_734383*/
static void __lambda_541(void *data, object clo, int argc, object *args) ;/*object self_735236, object r_734376*/
static void __lambda_542(void *data, object clo, int argc, object *args) ;/*object self_735237, object r_734266*/
static void __lambda_543(void *data, object clo, int argc, object *args) ;/*object self_735238, object loop1_731017_732275_732943, object loop2_87_731018_732276_732944*/
static void __lambda_753(void *data, object clo, int argc, object *args) ;/*object self_735239, object loop1_731017_732275_732943*/
static void __lambda_752(void *data, object clo, int argc, object *args) ;/*object self_735240, object loop2_87_731018_732276_732944*/
static void __lambda_620(void *data, object clo, int argc, object *args) ;/*object self_735241, object k_734371, object pred_127_731019_732277_732945, object vec_731020_732278_732946, object len_731021_732279_732947, object i_731022_732280_732948*/
static void __lambda_621(void *data, object clo, int argc, object *args) ;/*object self_735242, object r_734375*/
static void __lambda_622(void *data, object clo, int argc, object *args) ;/*object self_735243, object r_734373*/
static void __lambda_544(void *data, object clo, int argc, object *args) ;/*object self_735244, object r_734370*/
static void __lambda_545(void *data, object clo, int argc, object *args) ;/*object self_735245, object r_734354*/
static void __lambda_617(void *data, object clo, int argc, object *args) ;/*object self_735246, object k_734365, object pred_127_731030_732281_732949, object vectors_731031_732282_732950, object len_731032_732283_732951, object i_731033_732284_732952*/
static void __lambda_618(void *data, object clo, int argc, object *args) ;/*object self_735247, object r_734369*/
static void __lambda_619(void *data, object clo, int argc, object *args) ;/*object self_735248, object r_734367*/
static void __lambda_546(void *data, object clo, int argc, object *args) ;/*object self_735249, object r_734364*/
static void __lambda_547(void *data, object clo, int argc, object *args) ;/*object self_735250, object r_734355*/
static void __lambda_610(void *data, object clo, int argc, object *args) ;/*object self_735251, object k_734356, object pred_127_731041_732285_732953, object vec_731042_732286_732954, object vectors_731043_732287_732955, object callee_731044_732288_732956*/
static void __lambda_611(void *data, object clo, int argc, object *args) ;/*object self_735252, object r_734357*/
static void __lambda_612(void *data, object clo, int argc, object *args) ;/*object self_735253, object r_734358*/
static void __lambda_613(void *data, object clo, int argc, object *args) ;/*object self_735254, object pred_127_731045_732289_732957, object vec_731046_732290_732958*/
static void __lambda_615(void *data, object clo, int argc, object *args) ;/*object self_735256, object r_734361*/
static void __lambda_616(void *data, object clo, int argc, object *args) ;/*object self_735257, object r_734362*/
static void __lambda_614(void *data, object clo, int argc, object *args) ;/*object self_735255, object r_734360*/
static void __lambda_548(void *data, object clo, int argc, object *args) ;/*object self_735258, object r_734353*/
static void __lambda_549(void *data, object clo, int argc, object *args) ;/*object self_735259, object r_734267*/
static void __lambda_550(void *data, object clo, int argc, object *args) ;/*object self_735260, object loop1_731054_732291_732959, object loop2_87_731055_732292_732960*/
static void __lambda_751(void *data, object clo, int argc, object *args) ;/*object self_735261, object loop1_731054_732291_732959*/
static void __lambda_750(void *data, object clo, int argc, object *args) ;/*object self_735262, object loop2_87_731055_732292_732960*/
static void __lambda_607(void *data, object clo, int argc, object *args) ;/*object self_735263, object k_734348, object pred_127_731056_732293_732961, object vec_731057_732294_732962, object i_731058_732295_732963*/
static void __lambda_608(void *data, object clo, int argc, object *args) ;/*object self_735264, object r_734352*/
static void __lambda_609(void *data, object clo, int argc, object *args) ;/*object self_735265, object r_734350*/
static void __lambda_551(void *data, object clo, int argc, object *args) ;/*object self_735266, object r_734347*/
static void __lambda_552(void *data, object clo, int argc, object *args) ;/*object self_735267, object r_734329*/
static void __lambda_604(void *data, object clo, int argc, object *args) ;/*object self_735268, object k_734342, object pred_127_731066_732296_732964, object vectors_731067_732297_732965, object i_731068_732298_732966*/
static void __lambda_605(void *data, object clo, int argc, object *args) ;/*object self_735269, object r_734346*/
static void __lambda_606(void *data, object clo, int argc, object *args) ;/*object self_735270, object r_734344*/
static void __lambda_553(void *data, object clo, int argc, object *args) ;/*object self_735271, object r_734341*/
static void __lambda_554(void *data, object clo, int argc, object *args) ;/*object self_735272, object r_734330*/
static void __lambda_596(void *data, object clo, int argc, object *args) ;/*object self_735273, object k_734331, object pred_127_731076_732299_732967, object vec_731077_732300_732968, object vectors_731078_732301_732969, object callee_731079_732302_732970*/
static void __lambda_597(void *data, object clo, int argc, object *args) ;/*object self_735274, object r_734332*/
static void __lambda_598(void *data, object clo, int argc, object *args) ;/*object self_735275, object r_734333*/
static void __lambda_599(void *data, object clo, int argc, object *args) ;/*object self_735276, object pred_127_731080_732303_732971, object vec_731081_732304_732972*/
static void __lambda_601(void *data, object clo, int argc, object *args) ;/*object self_735278, object r_734337*/
static void __lambda_602(void *data, object clo, int argc, object *args) ;/*object self_735279, object r_734339*/
static void __lambda_603(void *data, object clo, int argc, object *args) ;/*object self_735280, object r_734338*/
static void __lambda_600(void *data, object clo, int argc, object *args) ;/*object self_735277, object r_734336*/
static void __lambda_555(void *data, object clo, int argc, object *args) ;/*object self_735281, object r_734328*/
static void __lambda_556(void *data, object clo, int argc, object *args) ;/*object self_735282, object r_734268*/
static void __lambda_557(void *data, object clo, int argc, object *args) ;/*object self_735283, object loop1_731145_732305_732973, object loop2_87_731146_732306_732974*/
static void __lambda_749(void *data, object clo, int argc, object *args) ;/*object self_735284, object loop1_731145_732305_732973*/
static void __lambda_748(void *data, object clo, int argc, object *args) ;/*object self_735285, object loop2_87_731146_732306_732974*/
static void __lambda_593(void *data, object clo, int argc, object *args) ;/*object self_735286, object k_734321, object pred_127_731147_732307_732975, object vec_731148_732308_732976, object i_731149_732309_732977, object len_731150_732310_732978, object len_911_731151_732311_732979*/
static void __lambda_594(void *data, object clo, int argc, object *args) ;/*object self_735287, object r_734327*/
static void __lambda_595(void *data, object clo, int argc, object *args) ;/*object self_735288, object tmp_731154_731156_732312_732980*/
static void __lambda_558(void *data, object clo, int argc, object *args) ;/*object self_735289, object r_734320*/
static void __lambda_559(void *data, object clo, int argc, object *args) ;/*object self_735290, object r_734300*/
static void __lambda_589(void *data, object clo, int argc, object *args) ;/*object self_735291, object k_734313, object pred_127_731157_732313_732981, object vectors_731158_732314_732982, object i_731159_732315_732983, object len_731160_732316_732984, object len_911_731161_732317_732985*/
static void __lambda_591(void *data, object clo, int argc, object *args) ;/*object self_735293, object r_734319*/
static void __lambda_592(void *data, object clo, int argc, object *args) ;/*object self_735294, object tmp_731164_731166_732318_732986*/
static void __lambda_590(void *data, object clo, int argc, object *args) ;/*object self_735292, object r_734316*/
static void __lambda_560(void *data, object clo, int argc, object *args) ;/*object self_735295, object r_734312*/
static void __lambda_561(void *data, object clo, int argc, object *args) ;/*object self_735296, object r_734301*/
static void __lambda_583(void *data, object clo, int argc, object *args) ;/*object self_735297, object k_734302, object pred_127_731167_732319_732987, object vec_731168_732320_732988, object vectors_731169_732321_732989_raw, ...*/
static void __lambda_584(void *data, object clo, int argc, object *args) ;/*object self_735298, object r_734303*/
static void __lambda_585(void *data, object clo, int argc, object *args) ;/*object self_735299, object r_734304*/
static void __lambda_586(void *data, object clo, int argc, object *args) ;/*object self_735300, object pred_127_731170_732322_732990, object vec_731171_732323_732991*/
static void __lambda_588(void *data, object clo, int argc, object *args) ;/*object self_735302, object len_731173_732325_732993*/
static void __lambda_587(void *data, object clo, int argc, object *args) ;/*object self_735301, object len_731172_732324_732992*/
static void __lambda_562(void *data, object clo, int argc, object *args) ;/*object self_735303, object r_734299*/
static void __lambda_563(void *data, object clo, int argc, object *args) ;/*object self_735304, object r_734269*/
static void __lambda_564(void *data, object clo, int argc, object *args) ;/*object self_735305, object loop1_731174_732326_732994, object loop2_87_731175_732327_732995*/
static void __lambda_747(void *data, object clo, int argc, object *args) ;/*object self_735306, object loop1_731174_732326_732994*/
static void __lambda_746(void *data, object clo, int argc, object *args) ;/*object self_735307, object loop2_87_731175_732327_732995*/
static void __lambda_580(void *data, object clo, int argc, object *args) ;/*object self_735308, object k_734292, object pred_127_731176_732328_732996, object vec_731177_732329_732997, object i_731178_732330_732998, object len_731179_732331_732999, object len_911_731180_732332_733000*/
static void __lambda_581(void *data, object clo, int argc, object *args) ;/*object self_735309, object r_734298*/
static void __lambda_582(void *data, object clo, int argc, object *args) ;/*object self_735310, object r_734296*/
static void __lambda_565(void *data, object clo, int argc, object *args) ;/*object self_735311, object r_734291*/
static void __lambda_566(void *data, object clo, int argc, object *args) ;/*object self_735312, object r_734271*/
static void __lambda_576(void *data, object clo, int argc, object *args) ;/*object self_735313, object k_734284, object pred_127_731186_732334_733002, object vectors_731187_732335_733003, object i_731188_732336_733004, object len_731189_732337_733005, object len_911_731190_732338_733006*/
static void __lambda_578(void *data, object clo, int argc, object *args) ;/*object self_735315, object r_734290*/
static void __lambda_579(void *data, object clo, int argc, object *args) ;/*object self_735316, object r_734288*/
static void __lambda_577(void *data, object clo, int argc, object *args) ;/*object self_735314, object r_734287*/
static void __lambda_567(void *data, object clo, int argc, object *args) ;/*object self_735317, object r_734283*/
static void __lambda_568(void *data, object clo, int argc, object *args) ;/*object self_735318, object r_734272*/
static void __lambda_570(void *data, object clo, int argc, object *args) ;/*object self_735319, object k_734273, object pred_127_731196_732340_733008, object vec_731197_732341_733009, object vectors_731198_732342_733010_raw, ...*/
static void __lambda_571(void *data, object clo, int argc, object *args) ;/*object self_735320, object r_734274*/
static void __lambda_572(void *data, object clo, int argc, object *args) ;/*object self_735321, object r_734275*/
static void __lambda_573(void *data, object clo, int argc, object *args) ;/*object self_735322, object pred_127_731199_732343_733011, object vec_731200_732344_733012*/
static void __lambda_575(void *data, object clo, int argc, object *args) ;/*object self_735324, object len_731202_732346_733014*/
static void __lambda_574(void *data, object clo, int argc, object *args) ;/*object self_735323, object len_731201_732345_733013*/
static void __lambda_569(void *data, object clo, int argc, object *args) ;/*object self_735325, object r_734270*/
static void __lambda_445(void *data, object clo, int argc, object *args) ;/*closure _,object k_734129, object lst_731796_732762, object maybe_91start_87end_731797_732763_raw, ...*/
static void __lambda_453(void *data, object clo, int argc, object *args) ;/*object self_735031, object r_734169*/
static void __lambda_454(void *data, object clo, int argc, object *args) ;/*object self_735032, object r_734170*/
static void __lambda_455(void *data, object clo, int argc, object *args) ;/*object self_735033, object start_731935_732771, object new_91args_731902_731936_732772*/
static void __lambda_469(void *data, object clo, int argc, object *args) ;/*object self_735047, object r_734250*/
static void __lambda_463(void *data, object clo, int argc, object *args) ;/*object self_735041, object r_734213*/
static void __lambda_464(void *data, object clo, int argc, object *args) ;/*object self_735042, object r_734214*/
static void __lambda_465(void *data, object clo, int argc, object *args) ;/*object self_735043, object start_732052_732781, object end_732053_732782*/
static void __lambda_468(void *data, object clo, int argc, object *args) ;/*object self_735044, object k_734218, object index_732055_732784, object l_732056_732785*/
static void __lambda_466(void *data, object clo, int argc, object *args) ;/*object self_735045, object f_732054_732783*/
static void __lambda_467(void *data, object clo, int argc, object *args) ;/*object self_735046, object r_734217*/
static void __lambda_456(void *data, object clo, int argc, object *args) ;/*object self_735034, object end_731983_732773*/
static void __lambda_457(void *data, object clo, int argc, object *args) ;/*object self_735035, object r_734173*/
static void __lambda_458(void *data, object clo, int argc, object *args) ;/*object self_735036, object r_734174*/
static void __lambda_459(void *data, object clo, int argc, object *args) ;/*object self_735037, object start_731985_732774, object end_731986_732775*/
static void __lambda_462(void *data, object clo, int argc, object *args) ;/*object self_735038, object k_734178, object index_731988_732777, object l_731989_732778*/
static void __lambda_460(void *data, object clo, int argc, object *args) ;/*object self_735039, object f_731987_732776*/
static void __lambda_461(void *data, object clo, int argc, object *args) ;/*object self_735040, object r_734177*/
static void __lambda_446(void *data, object clo, int argc, object *args) ;/*object self_735024, object end_731909_732765*/
static void __lambda_447(void *data, object clo, int argc, object *args) ;/*object self_735025, object r_734132*/
static void __lambda_448(void *data, object clo, int argc, object *args) ;/*object self_735026, object r_734133*/
static void __lambda_449(void *data, object clo, int argc, object *args) ;/*object self_735027, object start_731911_732766, object end_731912_732767*/
static void __lambda_452(void *data, object clo, int argc, object *args) ;/*object self_735028, object k_734137, object index_731914_732769, object l_731915_732770*/
static void __lambda_450(void *data, object clo, int argc, object *args) ;/*object self_735029, object f_731913_732768*/
static void __lambda_451(void *data, object clo, int argc, object *args) ;/*object self_735030, object r_734136*/
static void __lambda_434(void *data, object clo, int argc, object *args) ;/*closure _,object k_734111, object vec_731473_732752, object maybe_91start_87end_731474_732753_raw, ...*/
static void __lambda_435(void *data, object clo, int argc, object *args) ;/*object self_735013, object vec_731505_732754*/
static void __lambda_444(void *data, object clo, int argc, object *args) ;/*object self_735014, object k_734124*/
static void __lambda_436(void *data, object clo, int argc, object *args) ;/*object self_735015, object r_734113*/
static void __lambda_438(void *data, object clo, int argc, object *args) ;/*object self_735016, object k_734115, object start_731506_732755, object end_731507_732756*/
static void __lambda_439(void *data, object clo, int argc, object *args) ;/*object self_735017, object i_731511_732757, object result_731512_732758*/
static void __lambda_440(void *data, object clo, int argc, object *args) ;/*object self_735018, object lp_731508_731513_732759*/
static void __lambda_745(void *data, object clo, int argc, object *args) ;/*object self_735019, object lp_731508_731513_732759*/
static void __lambda_443(void *data, object clo, int argc, object *args) ;/*object self_735020, object k_734119, object i_731514_732760, object result_731515_732761*/
static void __lambda_441(void *data, object clo, int argc, object *args) ;/*object self_735021, object r_734118*/
static void __lambda_442(void *data, object clo, int argc, object *args) ;/*object self_735022, object r_734117*/
static void __lambda_437(void *data, object clo, int argc, object *args) ;/*object self_735023, object r_734114*/
static void __lambda_428(void *data, object clo, int argc, object *args) ;/*closure _,object k_734101, object vec_731395_732747, object start_87end_731396_732748_raw, ...*/
static void __lambda_429(void *data, object clo, int argc, object *args) ;/*object self_735008, object vec_731427_732749*/
static void __lambda_433(void *data, object clo, int argc, object *args) ;/*object self_735009, object k_734106*/
static void __lambda_430(void *data, object clo, int argc, object *args) ;/*object self_735010, object r_734103*/
static void __lambda_432(void *data, object clo, int argc, object *args) ;/*object self_735011, object k_734105, object start_731428_732750, object end_731429_732751*/
static void __lambda_431(void *data, object clo, int argc, object *args) ;/*object self_735012, object r_734104*/
static void __lambda_413(void *data, object clo, int argc, object *args) ;/*closure _,object k_733997, object target_731325_732732, object tstart_731326_732733, object source_731327_732734, object maybe_91sstart_87send_731328_732735_raw, ...*/
static void __lambda_414(void *data, object clo, int argc, object *args) ;/*object self_734993, object doit_67_732737*/
static void __lambda_744(void *data, object clo, int argc, object *args) ;/*object self_734994, object doit_67_732737*/
static void __lambda_417(void *data, object clo, int argc, object *args) ;/*object self_734995, object k_734010, object sstart_731329_732739, object send_731330_732740, object source_91length_731331_732741*/
static void __lambda_418(void *data, object clo, int argc, object *args) ;/*object self_734996, object r_734011*/
static void __lambda_419(void *data, object clo, int argc, object *args) ;/*object self_734997, object r_734012*/
static void __lambda_420(void *data, object clo, int argc, object *args) ;/*object self_734998, object r_734013*/
static void __lambda_421(void *data, object clo, int argc, object *args) ;/*object self_734999, object tstart_731332_732742, object sstart_731333_732743, object send_731334_732744*/
static void __lambda_424(void *data, object clo, int argc, object *args) ;/*object self_735000, object r_734014*/
static void __lambda_427(void *data, object clo, int argc, object *args) ;/*object self_735001, object r_734039*/
static void __lambda_425(void *data, object clo, int argc, object *args) ;/*object self_735002, object k_734089*/
static void __lambda_426(void *data, object clo, int argc, object *args) ;/*object self_735003, object r_734090*/
static void __lambda_422(void *data, object clo, int argc, object *args) ;/*object self_735004, object k_734094*/
static void __lambda_423(void *data, object clo, int argc, object *args) ;/*object self_735005, object tmp_731340_731342_732745*/
static void __lambda_415(void *data, object clo, int argc, object *args) ;/*object self_735006, object r_734009*/
static void __lambda_416(void *data, object clo, int argc, object *args) ;/*object self_735007, object r_733998*/
static void __lambda_405(void *data, object clo, int argc, object *args) ;/*closure _,object k_733988, object vec_731224_732725, object i_731225_732726, object j_731226_732727*/
static void __lambda_406(void *data, object clo, int argc, object *args) ;/*object self_734986, object vec_731227_732728*/
static void __lambda_407(void *data, object clo, int argc, object *args) ;/*object self_734987, object r_733990*/
static void __lambda_408(void *data, object clo, int argc, object *args) ;/*object self_734988, object r_733991*/
static void __lambda_409(void *data, object clo, int argc, object *args) ;/*object self_734989, object i_731228_732729, object j_731229_732730*/
static void __lambda_410(void *data, object clo, int argc, object *args) ;/*object self_734990, object x_731230_732731*/
static void __lambda_411(void *data, object clo, int argc, object *args) ;/*object self_734991, object r_733994*/
static void __lambda_412(void *data, object clo, int argc, object *args) ;/*object self_734992, object r_733993*/
static void __lambda_393(void *data, object clo, int argc, object *args) ;/*closure _,object k_733970, object pred_127_731203_732712, object vec_731204_732713*/
static void __lambda_394(void *data, object clo, int argc, object *args) ;/*object self_734974, object len_731207_732714*/
static void __lambda_395(void *data, object clo, int argc, object *args) ;/*object self_734975, object cnt_731210_732715*/
static void __lambda_396(void *data, object clo, int argc, object *args) ;/*object self_734976, object result_731213_732716*/
static void __lambda_397(void *data, object clo, int argc, object *args) ;/*object self_734977, object no_731218_732719*/
static void __lambda_398(void *data, object clo, int argc, object *args) ;/*object self_734978, object loop_731219_732720*/
static void __lambda_743(void *data, object clo, int argc, object *args) ;/*object self_734979, object loop_731219_732720*/
static void __lambda_401(void *data, object clo, int argc, object *args) ;/*object self_734980, object k_733976, object i_731220_732721, object yes_731221_732722, object no_731222_732723*/
static void __lambda_402(void *data, object clo, int argc, object *args) ;/*object self_734981, object r_733979*/
static void __lambda_404(void *data, object clo, int argc, object *args) ;/*object self_734983, object r_733983*/
static void __lambda_403(void *data, object clo, int argc, object *args) ;/*object self_734982, object r_733980*/
static void __lambda_399(void *data, object clo, int argc, object *args) ;/*object self_734984, object r_733975*/
static void __lambda_400(void *data, object clo, int argc, object *args) ;/*object self_734985, object r_733974*/
static void __lambda_379(void *data, object clo, int argc, object *args) ;/*closure _,object k_733937, object vec_731082_732694, object value_731083_732695, object cmp_731084_732696, object maybe_91start_87end_731085_732697_raw, ...*/
static void __lambda_380(void *data, object clo, int argc, object *args) ;/*object self_734960, object cmp_731086_732698*/
static void __lambda_381(void *data, object clo, int argc, object *args) ;/*object self_734961, object vec_731117_732699*/
static void __lambda_392(void *data, object clo, int argc, object *args) ;/*object self_734962, object k_733961*/
static void __lambda_382(void *data, object clo, int argc, object *args) ;/*object self_734963, object r_733940*/
static void __lambda_384(void *data, object clo, int argc, object *args) ;/*object self_734964, object k_733942, object start_731118_732700, object end_731119_732701*/
static void __lambda_385(void *data, object clo, int argc, object *args) ;/*object self_734965, object start_731121_732702, object end_731122_732703*/
static void __lambda_386(void *data, object clo, int argc, object *args) ;/*object self_734966, object loop_731124_732705*/
static void __lambda_742(void *data, object clo, int argc, object *args) ;/*object self_734967, object loop_731124_732705*/
static void __lambda_389(void *data, object clo, int argc, object *args) ;/*object self_734968, object k_733945, object start_731125_732706, object end_731126_732707, object j_731127_732708*/
static void __lambda_390(void *data, object clo, int argc, object *args) ;/*object self_734969, object r_733951*/
static void __lambda_391(void *data, object clo, int argc, object *args) ;/*object self_734970, object comparison_731134_732711*/
static void __lambda_387(void *data, object clo, int argc, object *args) ;/*object self_734971, object r_733944*/
static void __lambda_388(void *data, object clo, int argc, object *args) ;/*object self_734972, object r_733943*/
static void __lambda_383(void *data, object clo, int argc, object *args) ;/*object self_734973, object r_733941*/
static void __lambda_375(void *data, object clo, int argc, object *args) ;/*closure _,object k_733929, object pred_127_731050_732690, object vec_731051_732691, object vectors_731052_732692_raw, ...*/
static void __lambda_377(void *data, object clo, int argc, object *args) ;/*object self_734957, object k_733931, object elts_731053_732693_raw, ...*/
static void __lambda_378(void *data, object clo, int argc, object *args) ;/*object self_734958, object r_733932*/
static void __lambda_376(void *data, object clo, int argc, object *args) ;/*object self_734959, object r_733930*/
static void __lambda_374(void *data, object clo, int argc, object *args) ;/*closure _,object k_733926, object pred_127_731047_732687, object vec_731048_732688, object vectors_731049_732689_raw, ...*/
static void __lambda_370(void *data, object clo, int argc, object *args) ;/*closure _,object k_733918, object pred_127_731013_732683, object vec_731014_732684, object vectors_731015_732685_raw, ...*/
static void __lambda_372(void *data, object clo, int argc, object *args) ;/*object self_734954, object k_733920, object elts_731016_732686_raw, ...*/
static void __lambda_373(void *data, object clo, int argc, object *args) ;/*object self_734955, object r_733921*/
static void __lambda_371(void *data, object clo, int argc, object *args) ;/*object self_734956, object r_733919*/
static void __lambda_369(void *data, object clo, int argc, object *args) ;/*closure _,object k_733915, object pred_127_731010_732680, object vec_731011_732681, object vectors_731012_732682_raw, ...*/
static void __lambda_359(void *data, object clo, int argc, object *args) ;/*closure _,object k_733902, object f_73987_732668, object vec_73988_732669, object knil_73989_732670*/
static void __lambda_360(void *data, object clo, int argc, object *args) ;/*object self_734944, object len_73992_732671*/
static void __lambda_361(void *data, object clo, int argc, object *args) ;/*object self_734945, object result_73995_732672*/
static void __lambda_362(void *data, object clo, int argc, object *args) ;/*object self_734946, object left_73999_732674*/
static void __lambda_363(void *data, object clo, int argc, object *args) ;/*object self_734947, object loop_731000_732675*/
static void __lambda_741(void *data, object clo, int argc, object *args) ;/*object self_734948, object loop_731000_732675*/
static void __lambda_366(void *data, object clo, int argc, object *args) ;/*object self_734949, object k_733907, object i_731001_732676, object left_731002_732677*/
static void __lambda_367(void *data, object clo, int argc, object *args) ;/*object self_734950, object r_731008_732679*/
static void __lambda_368(void *data, object clo, int argc, object *args) ;/*object self_734951, object r_733911*/
static void __lambda_364(void *data, object clo, int argc, object *args) ;/*object self_734952, object r_733906*/
static void __lambda_365(void *data, object clo, int argc, object *args) ;/*object self_734953, object r_733905*/
static void __lambda_346(void *data, object clo, int argc, object *args) ;/*closure _,object k_733886, object pred_127_73978_732659, object vec_73979_732660, object vectors_73980_732661_raw, ...*/
static void __lambda_347(void *data, object clo, int argc, object *args) ;/*object self_734932, object r_733887*/
static void __lambda_348(void *data, object clo, int argc, object *args) ;/*object self_734933, object r_733888*/
static void __lambda_349(void *data, object clo, int argc, object *args) ;/*object self_734934, object pred_127_73981_732662, object vec_73982_732663*/
static void __lambda_357(void *data, object clo, int argc, object *args) ;/*object self_734939, object k_733898, object count_73985_732666, object elts_73986_732667_raw, ...*/
static void __lambda_358(void *data, object clo, int argc, object *args) ;/*object self_734940, object r_733899*/
static void __lambda_354(void *data, object clo, int argc, object *args) ;/*object self_734941, object r_733894*/
static void __lambda_355(void *data, object clo, int argc, object *args) ;/*object self_734942, object r_733895*/
static void __lambda_356(void *data, object clo, int argc, object *args) ;/*object self_734943, object r_733896*/
static void __lambda_352(void *data, object clo, int argc, object *args) ;/*object self_734935, object k_733892, object count_73983_732664, object elt_73984_732665*/
static void __lambda_353(void *data, object clo, int argc, object *args) ;/*object self_734936, object r_733893*/
static void __lambda_350(void *data, object clo, int argc, object *args) ;/*object self_734937, object r_733890*/
static void __lambda_351(void *data, object clo, int argc, object *args) ;/*object self_734938, object r_733891*/
static void __lambda_336(void *data, object clo, int argc, object *args) ;/*closure _,object k_733872, object f_73952_732654, object vec_73953_732655, object vectors_73954_732656_raw, ...*/
static void __lambda_337(void *data, object clo, int argc, object *args) ;/*object self_734923, object r_733873*/
static void __lambda_338(void *data, object clo, int argc, object *args) ;/*object self_734924, object r_733874*/
static void __lambda_339(void *data, object clo, int argc, object *args) ;/*object self_734925, object f_73955_732657, object vec_73956_732658*/
static void __lambda_345(void *data, object clo, int argc, object *args) ;/*object self_734926, object r_733875*/
static void __lambda_340(void *data, object clo, int argc, object *args) ;/*object self_734927, object k_733876*/
static void __lambda_342(void *data, object clo, int argc, object *args) ;/*object self_734929, object r_733879*/
static void __lambda_343(void *data, object clo, int argc, object *args) ;/*object self_734930, object r_733881*/
static void __lambda_344(void *data, object clo, int argc, object *args) ;/*object self_734931, object r_733880*/
static void __lambda_341(void *data, object clo, int argc, object *args) ;/*object self_734928, object r_733878*/
static void __lambda_329(void *data, object clo, int argc, object *args) ;/*closure _,object k_733860, object kons_73923_732648, object knil_73924_732649, object vec_73925_732650, object vectors_73926_732651_raw, ...*/
static void __lambda_330(void *data, object clo, int argc, object *args) ;/*object self_734917, object r_733861*/
static void __lambda_331(void *data, object clo, int argc, object *args) ;/*object self_734918, object r_733862*/
static void __lambda_332(void *data, object clo, int argc, object *args) ;/*object self_734919, object kons_73927_732652, object vec_73928_732653*/
static void __lambda_334(void *data, object clo, int argc, object *args) ;/*object self_734921, object r_733865*/
static void __lambda_335(void *data, object clo, int argc, object *args) ;/*object self_734922, object r_733866*/
static void __lambda_333(void *data, object clo, int argc, object *args) ;/*object self_734920, object r_733864*/
static void __lambda_316(void *data, object clo, int argc, object *args) ;/*closure _,object k_733839, object elt_123_127_73897_732634, object vector_91a_73898_732635, object vector_91b_73899_732636*/
static void __lambda_317(void *data, object clo, int argc, object *args) ;/*object self_734903, object loop_73906_732640, object test_73907_732641*/
static void __lambda_740(void *data, object clo, int argc, object *args) ;/*object self_734904, object loop_73906_732640*/
static void __lambda_739(void *data, object clo, int argc, object *args) ;/*object self_734905, object test_73907_732641*/
static void __lambda_326(void *data, object clo, int argc, object *args) ;/*object self_734906, object k_733853, object i_73908_732642*/
static void __lambda_327(void *data, object clo, int argc, object *args) ;/*object self_734907, object r_733856*/
static void __lambda_328(void *data, object clo, int argc, object *args) ;/*object self_734908, object r_733857*/
static void __lambda_318(void *data, object clo, int argc, object *args) ;/*object self_734909, object r_733852*/
static void __lambda_319(void *data, object clo, int argc, object *args) ;/*object self_734910, object r_733843*/
static void __lambda_322(void *data, object clo, int argc, object *args) ;/*object self_734911, object k_733847, object elt_91a_73914_732644, object elt_91b_73915_732645, object i_73916_732646*/
static void __lambda_323(void *data, object clo, int argc, object *args) ;/*object self_734912, object tmp_73919_73921_732647*/
static void __lambda_325(void *data, object clo, int argc, object *args) ;/*object self_734913, object r_733848*/
static void __lambda_324(void *data, object clo, int argc, object *args) ;/*object self_734914, object k_733851*/
static void __lambda_320(void *data, object clo, int argc, object *args) ;/*object self_734915, object r_733846*/
static void __lambda_321(void *data, object clo, int argc, object *args) ;/*object self_734916, object r_733844*/
static void __lambda_303(void *data, object clo, int argc, object *args) ;/*closure _,object k_733821, object elt_123_127_73876_732625, object vectors_73877_732626_raw, ...*/
static void __lambda_304(void *data, object clo, int argc, object *args) ;/*object self_734890, object elt_123_127_73878_732627*/
static void __lambda_305(void *data, object clo, int argc, object *args) ;/*object self_734891, object r_733836*/
static void __lambda_307(void *data, object clo, int argc, object *args) ;/*object self_734893, object vecs_73887_732628*/
static void __lambda_308(void *data, object clo, int argc, object *args) ;/*object self_734894, object loop_73888_732629*/
static void __lambda_738(void *data, object clo, int argc, object *args) ;/*object self_734895, object loop_73888_732629*/
static void __lambda_311(void *data, object clo, int argc, object *args) ;/*object self_734896, object k_733829, object vecs_73889_732630*/
static void __lambda_312(void *data, object clo, int argc, object *args) ;/*object self_734897, object r_733830*/
static void __lambda_313(void *data, object clo, int argc, object *args) ;/*object self_734898, object vec1_73890_732631, object vec2_87_73891_732632*/
static void __lambda_314(void *data, object clo, int argc, object *args) ;/*object self_734899, object r_733834*/
static void __lambda_315(void *data, object clo, int argc, object *args) ;/*object self_734900, object r_733833*/
static void __lambda_309(void *data, object clo, int argc, object *args) ;/*object self_734901, object r_733828*/
static void __lambda_310(void *data, object clo, int argc, object *args) ;/*object self_734902, object r_733827*/
static void __lambda_306(void *data, object clo, int argc, object *args) ;/*object self_734892, object r_733825*/
static void __lambda_301(void *data, object clo, int argc, object *args) ;/*closure _,object k_733816, object vec_73874_732623*/
static void __lambda_302(void *data, object clo, int argc, object *args) ;/*object self_734889, object vec_73875_732624*/
static void __lambda_263(void *data, object clo, int argc, object *args) ;/*closure _,object k_733757, object args_73830_732571_raw, ...*/
static void __lambda_264(void *data, object clo, int argc, object *args) ;/*object self_734845, object copy_91each_67_732575, object gather_91args_732576, object total_91length_732578*/
static void __lambda_737(void *data, object clo, int argc, object *args) ;/*object self_734846, object copy_91each_67_732575*/
static void __lambda_736(void *data, object clo, int argc, object *args) ;/*object self_734847, object gather_91args_732576*/
static void __lambda_735(void *data, object clo, int argc, object *args) ;/*object self_734848, object total_91length_732578*/
static void __lambda_292(void *data, object clo, int argc, object *args) ;/*object self_734849, object k_733796, object args_73831_732582*/
static void __lambda_293(void *data, object clo, int argc, object *args) ;/*object self_734850, object args_73833_732583, object vecs_73834_732584, object starts_73835_732585, object ends_73836_732586*/
static void __lambda_294(void *data, object clo, int argc, object *args) ;/*object self_734851, object loop_73837_732587*/
static void __lambda_734(void *data, object clo, int argc, object *args) ;/*object self_734852, object loop_73837_732587*/
static void __lambda_297(void *data, object clo, int argc, object *args) ;/*object self_734853, object k_733802, object args_73838_732588, object vecs_73839_732589, object starts_73840_732590, object ends_73841_732591*/
static void __lambda_298(void *data, object clo, int argc, object *args) ;/*object self_734854, object r_733804*/
static void __lambda_299(void *data, object clo, int argc, object *args) ;/*object self_734855, object r_733805*/
static void __lambda_300(void *data, object clo, int argc, object *args) ;/*object self_734856, object r_733806*/
static void __lambda_295(void *data, object clo, int argc, object *args) ;/*object self_734857, object r_733801*/
static void __lambda_296(void *data, object clo, int argc, object *args) ;/*object self_734858, object r_733800*/
static void __lambda_265(void *data, object clo, int argc, object *args) ;/*object self_734859, object r_733795*/
static void __lambda_266(void *data, object clo, int argc, object *args) ;/*object self_734860, object r_733758*/
static void __lambda_286(void *data, object clo, int argc, object *args) ;/*object self_734861, object k_733784, object starts_73842_732592, object ends_73843_732593*/
static void __lambda_287(void *data, object clo, int argc, object *args) ;/*object self_734862, object starts_73846_732595, object ends_73847_732596*/
static void __lambda_288(void *data, object clo, int argc, object *args) ;/*object self_734863, object loop_73848_732597*/
static void __lambda_733(void *data, object clo, int argc, object *args) ;/*object self_734864, object loop_73848_732597*/
static void __lambda_291(void *data, object clo, int argc, object *args) ;/*object self_734865, object k_733787, object count_73849_732598, object starts_73850_732599, object ends_73851_732600*/
static void __lambda_289(void *data, object clo, int argc, object *args) ;/*object self_734866, object r_733786*/
static void __lambda_290(void *data, object clo, int argc, object *args) ;/*object self_734867, object r_733785*/
static void __lambda_267(void *data, object clo, int argc, object *args) ;/*object self_734868, object r_733783*/
static void __lambda_268(void *data, object clo, int argc, object *args) ;/*object self_734869, object r_733759*/
static void __lambda_279(void *data, object clo, int argc, object *args) ;/*object self_734870, object k_733769, object result_73854_732603, object vecs_73855_732604, object starts_73856_732605, object ends_73857_732606*/
static void __lambda_280(void *data, object clo, int argc, object *args) ;/*object self_734871, object vecs_73860_732608, object starts_73861_732609, object ends_73862_732610*/
static void __lambda_281(void *data, object clo, int argc, object *args) ;/*object self_734872, object loop_73863_732611*/
static void __lambda_732(void *data, object clo, int argc, object *args) ;/*object self_734873, object loop_73863_732611*/
static void __lambda_284(void *data, object clo, int argc, object *args) ;/*object self_734874, object k_733772, object at_73864_732612, object vecs_73865_732613, object starts_73866_732614, object ends_73867_732615*/
static void __lambda_285(void *data, object clo, int argc, object *args) ;/*object self_734875, object r_733777*/
static void __lambda_282(void *data, object clo, int argc, object *args) ;/*object self_734876, object r_733771*/
static void __lambda_283(void *data, object clo, int argc, object *args) ;/*object self_734877, object r_733770*/
static void __lambda_269(void *data, object clo, int argc, object *args) ;/*object self_734878, object r_733768*/
static void __lambda_270(void *data, object clo, int argc, object *args) ;/*object self_734879, object r_733760*/
static void __lambda_278(void *data, object clo, int argc, object *args) ;/*object self_734880, object k_733767*/
static void __lambda_271(void *data, object clo, int argc, object *args) ;/*object self_734881, object r_733761*/
static void __lambda_273(void *data, object clo, int argc, object *args) ;/*object self_734882, object k_733763, object vecs_73871_732619, object starts_73872_732620, object ends_73873_732621*/
static void __lambda_274(void *data, object clo, int argc, object *args) ;/*object self_734883, object result_732622*/
static void __lambda_731(void *data, object clo, int argc, object *args) ;/*object self_734884, object result_732622*/
static void __lambda_275(void *data, object clo, int argc, object *args) ;/*object self_734885, object r_733766*/
static void __lambda_276(void *data, object clo, int argc, object *args) ;/*object self_734886, object r_733765*/
static void __lambda_277(void *data, object clo, int argc, object *args) ;/*object self_734887, object r_733764*/
static void __lambda_272(void *data, object clo, int argc, object *args) ;/*object self_734888, object r_733762*/
static void __lambda_262(void *data, object clo, int argc, object *args) ;/*closure _,object k_733752, object vector_91list_73793_732570*/
static void __lambda_254(void *data, object clo, int argc, object *args) ;/*closure _,object k_733739, object vec_73756_732564, object maybe_91start_87end_73757_732565_raw, ...*/
static void __lambda_255(void *data, object clo, int argc, object *args) ;/*object self_734838, object vec_73788_732566*/
static void __lambda_261(void *data, object clo, int argc, object *args) ;/*object self_734839, object k_733747*/
static void __lambda_256(void *data, object clo, int argc, object *args) ;/*object self_734840, object r_733741*/
static void __lambda_258(void *data, object clo, int argc, object *args) ;/*object self_734841, object k_733743, object start_73789_732567, object end_73790_732568*/
static void __lambda_259(void *data, object clo, int argc, object *args) ;/*object self_734842, object new_73791_732569*/
static void __lambda_260(void *data, object clo, int argc, object *args) ;/*object self_734843, object r_733745*/
static void __lambda_257(void *data, object clo, int argc, object *args) ;/*object self_734844, object r_733742*/
static void __lambda_243(void *data, object clo, int argc, object *args) ;/*closure _,object k_733686, object vec_73717_732552, object args_73718_732553*/
static void __lambda_244(void *data, object clo, int argc, object *args) ;/*object self_734827, object parse_91args_732555*/
static void __lambda_730(void *data, object clo, int argc, object *args) ;/*object self_734828, object parse_91args_732555*/
static void __lambda_247(void *data, object clo, int argc, object *args) ;/*object self_734829, object k_733707, object start_73719_732557, object end_73720_732558, object n_73721_732559, object fill_73722_732560*/
static void __lambda_248(void *data, object clo, int argc, object *args) ;/*object self_734830, object r_733708*/
static void __lambda_249(void *data, object clo, int argc, object *args) ;/*object self_734831, object r_733709*/
static void __lambda_250(void *data, object clo, int argc, object *args) ;/*object self_734832, object start_73723_732561, object end_73724_732562*/
static void __lambda_253(void *data, object clo, int argc, object *args) ;/*object self_734833, object r_733710*/
static void __lambda_251(void *data, object clo, int argc, object *args) ;/*object self_734834, object k_733735*/
static void __lambda_252(void *data, object clo, int argc, object *args) ;/*object self_734835, object r_733736*/
static void __lambda_245(void *data, object clo, int argc, object *args) ;/*object self_734836, object r_733706*/
static void __lambda_246(void *data, object clo, int argc, object *args) ;/*object self_734837, object r_733687*/
static void __lambda_235(void *data, object clo, int argc, object *args) ;/*closure _,object k_733671, object vec_73710_732545, object args_73711_732546_raw, ...*/
static void __lambda_236(void *data, object clo, int argc, object *args) ;/*object self_734820, object vec_73712_732547*/
static void __lambda_242(void *data, object clo, int argc, object *args) ;/*object self_734821, object k_733683*/
static void __lambda_237(void *data, object clo, int argc, object *args) ;/*object self_734822, object r_733673*/
static void __lambda_239(void *data, object clo, int argc, object *args) ;/*object self_734823, object k_733675, object start_73713_732548, object end_73714_732549, object fill_73715_732550*/
static void __lambda_240(void *data, object clo, int argc, object *args) ;/*object self_734824, object new_91vector_73716_732551*/
static void __lambda_241(void *data, object clo, int argc, object *args) ;/*object self_734825, object r_733677*/
static void __lambda_238(void *data, object clo, int argc, object *args) ;/*object self_734826, object r_733674*/
static void __lambda_207(void *data, object clo, int argc, object *args) ;/*closure _,object k_733633, object f_73673_732518, object vec_73674_732519, object start_73675_732520, object end_73676_732521, object initial_91seeds_73677_732522_raw, ...*/
static void __lambda_208(void *data, object clo, int argc, object *args) ;/*object self_734790, object tabulate_67_73678_732523, object unfold1_67_73679_732524, object unfold2_87_67_73680_732525*/
static void __lambda_729(void *data, object clo, int argc, object *args) ;/*object self_734791, object tabulate_67_73678_732523*/
static void __lambda_728(void *data, object clo, int argc, object *args) ;/*object self_734792, object unfold1_67_73679_732524*/
static void __lambda_727(void *data, object clo, int argc, object *args) ;/*object self_734793, object unfold2_87_67_73680_732525*/
static void __lambda_232(void *data, object clo, int argc, object *args) ;/*object self_734794, object k_733664, object f_73681_732526, object vec_73682_732527, object i_73683_732528*/
static void __lambda_233(void *data, object clo, int argc, object *args) ;/*object self_734795, object r_733668*/
static void __lambda_234(void *data, object clo, int argc, object *args) ;/*object self_734796, object r_733666*/
static void __lambda_209(void *data, object clo, int argc, object *args) ;/*object self_734797, object r_733663*/
static void __lambda_210(void *data, object clo, int argc, object *args) ;/*object self_734798, object r_733634*/
static void __lambda_226(void *data, object clo, int argc, object *args) ;/*object self_734799, object k_733655, object f_73687_732529, object vec_73688_732530, object i_73689_732531, object seed_73690_732532*/
static void __lambda_231(void *data, object clo, int argc, object *args) ;/*object self_734800, object k_733662*/
static void __lambda_227(void *data, object clo, int argc, object *args) ;/*object self_734801, object r_733657*/
static void __lambda_229(void *data, object clo, int argc, object *args) ;/*object self_734802, object k_733659, object elt_73691_732533, object new_91seed_73692_732534*/
static void __lambda_230(void *data, object clo, int argc, object *args) ;/*object self_734803, object r_733660*/
static void __lambda_228(void *data, object clo, int argc, object *args) ;/*object self_734804, object r_733658*/
static void __lambda_211(void *data, object clo, int argc, object *args) ;/*object self_734805, object r_733654*/
static void __lambda_212(void *data, object clo, int argc, object *args) ;/*object self_734806, object r_733635*/
static void __lambda_220(void *data, object clo, int argc, object *args) ;/*object self_734807, object k_733646, object f_73693_732535, object vec_73694_732536, object i_73695_732537, object seeds_73696_732538*/
static void __lambda_225(void *data, object clo, int argc, object *args) ;/*object self_734808, object k_733653*/
static void __lambda_221(void *data, object clo, int argc, object *args) ;/*object self_734809, object r_733648*/
static void __lambda_223(void *data, object clo, int argc, object *args) ;/*object self_734810, object k_733650, object elt_73697_732539, object new_91seeds_73698_732540_raw, ...*/
static void __lambda_224(void *data, object clo, int argc, object *args) ;/*object self_734811, object r_733651*/
static void __lambda_222(void *data, object clo, int argc, object *args) ;/*object self_734812, object r_733649*/
static void __lambda_213(void *data, object clo, int argc, object *args) ;/*object self_734813, object r_733645*/
static void __lambda_214(void *data, object clo, int argc, object *args) ;/*object self_734814, object r_733636*/
static void __lambda_215(void *data, object clo, int argc, object *args) ;/*object self_734815, object r_733637*/
static void __lambda_216(void *data, object clo, int argc, object *args) ;/*object self_734816, object r_733638*/
static void __lambda_217(void *data, object clo, int argc, object *args) ;/*object self_734817, object r_733639*/
static void __lambda_218(void *data, object clo, int argc, object *args) ;/*object self_734818, object f_73699_732541, object start_73700_732542, object end_73701_732543*/
static void __lambda_219(void *data, object clo, int argc, object *args) ;/*object self_734819, object r_733644*/
static void __lambda_202(void *data, object clo, int argc, object *args) ;/*closure _,object k_733627, object f_73670_732512, object len_73671_732513, object initial_91seeds_73672_732514_raw, ...*/
static void __lambda_203(void *data, object clo, int argc, object *args) ;/*object self_734785, object vec_732516*/
static void __lambda_726(void *data, object clo, int argc, object *args) ;/*object self_734786, object vec_732516*/
static void __lambda_204(void *data, object clo, int argc, object *args) ;/*object self_734787, object r_733630*/
static void __lambda_205(void *data, object clo, int argc, object *args) ;/*object self_734788, object r_733628*/
static void __lambda_206(void *data, object clo, int argc, object *args) ;/*object self_734789, object r_733629*/
static void __lambda_197(void *data, object clo, int argc, object *args) ;/*closure _,object k_733619, object f_73628_732506, object length_73629_732507, object initial_91seeds_73630_732508_raw, ...*/
static void __lambda_198(void *data, object clo, int argc, object *args) ;/*object self_734780, object vec_732510*/
static void __lambda_725(void *data, object clo, int argc, object *args) ;/*object self_734781, object vec_732510*/
static void __lambda_199(void *data, object clo, int argc, object *args) ;/*object self_734782, object r_733622*/
static void __lambda_200(void *data, object clo, int argc, object *args) ;/*object self_734783, object r_733620*/
static void __lambda_201(void *data, object clo, int argc, object *args) ;/*object self_734784, object r_733621*/
static void __lambda_157(void *data, object clo, int argc, object *args) ;/*closure _,object k_733497, object expr_73449_73472_73510_732480, object rename_73450_73473_73511_732481, object compare_73451_73474_73512_732482*/
static void __lambda_158(void *data, object clo, int argc, object *args) ;/*object self_734741, object v_931_73457_73479_73514_732484*/
static void __lambda_193(void *data, object clo, int argc, object *args) ;/*object self_734742, object tmp_73476_73478_73513_732483*/
static void __lambda_196(void *data, object clo, int argc, object *args) ;/*object self_734743, object r_733498*/
static void __lambda_194(void *data, object clo, int argc, object *args) ;/*object self_734744, object k_733500*/
static void __lambda_195(void *data, object clo, int argc, object *args) ;/*object self_734745, object r_733501*/
static void __lambda_159(void *data, object clo, int argc, object *args) ;/*object self_734746, object k_733503*/
static void __lambda_160(void *data, object clo, int argc, object *args) ;/*object self_734747, object r_733528*/
static void __lambda_161(void *data, object clo, int argc, object *args) ;/*object self_734748, object r_733588*/
static void __lambda_162(void *data, object clo, int argc, object *args) ;/*object self_734749, object r_733591*/
static void __lambda_163(void *data, object clo, int argc, object *args) ;/*object self_734750, object r_733594*/
static void __lambda_164(void *data, object clo, int argc, object *args) ;/*object self_734751, object r_733592*/
static void __lambda_165(void *data, object clo, int argc, object *args) ;/*object self_734752, object r_733589*/
static void __lambda_166(void *data, object clo, int argc, object *args) ;/*object self_734753, object r_733585*/
static void __lambda_167(void *data, object clo, int argc, object *args) ;/*object self_734754, object r_733583*/
static void __lambda_168(void *data, object clo, int argc, object *args) ;/*object self_734755, object r_733580*/
static void __lambda_169(void *data, object clo, int argc, object *args) ;/*object self_734756, object r_733531*/
static void __lambda_170(void *data, object clo, int argc, object *args) ;/*object self_734757, object r_733537*/
static void __lambda_171(void *data, object clo, int argc, object *args) ;/*object self_734758, object r_733575*/
static void __lambda_172(void *data, object clo, int argc, object *args) ;/*object self_734759, object r_733540*/
static void __lambda_173(void *data, object clo, int argc, object *args) ;/*object self_734760, object r_733547*/
static void __lambda_174(void *data, object clo, int argc, object *args) ;/*object self_734761, object r_733568*/
static void __lambda_175(void *data, object clo, int argc, object *args) ;/*object self_734762, object r_733569*/
static void __lambda_176(void *data, object clo, int argc, object *args) ;/*object self_734763, object r_733554*/
static void __lambda_177(void *data, object clo, int argc, object *args) ;/*object self_734764, object r_733562*/
static void __lambda_178(void *data, object clo, int argc, object *args) ;/*object self_734765, object r_733563*/
static void __lambda_179(void *data, object clo, int argc, object *args) ;/*object self_734766, object r_733557*/
static void __lambda_180(void *data, object clo, int argc, object *args) ;/*object self_734767, object r_733558*/
static void __lambda_181(void *data, object clo, int argc, object *args) ;/*object self_734768, object r_733555*/
static void __lambda_182(void *data, object clo, int argc, object *args) ;/*object self_734769, object r_733552*/
static void __lambda_183(void *data, object clo, int argc, object *args) ;/*object self_734770, object r_733550*/
static void __lambda_184(void *data, object clo, int argc, object *args) ;/*object self_734771, object r_733548*/
static void __lambda_185(void *data, object clo, int argc, object *args) ;/*object self_734772, object r_733543*/
static void __lambda_186(void *data, object clo, int argc, object *args) ;/*object self_734773, object r_733544*/
static void __lambda_187(void *data, object clo, int argc, object *args) ;/*object self_734774, object r_733541*/
static void __lambda_188(void *data, object clo, int argc, object *args) ;/*object self_734775, object r_733538*/
static void __lambda_189(void *data, object clo, int argc, object *args) ;/*object self_734776, object r_733534*/
static void __lambda_190(void *data, object clo, int argc, object *args) ;/*object self_734777, object r_733532*/
static void __lambda_191(void *data, object clo, int argc, object *args) ;/*object self_734778, object r_733529*/
static void __lambda_192(void *data, object clo, int argc, object *args) ;/*object self_734779, object r_733527*/
static void __lambda_155(void *data, object clo, int argc, object *args) ;/*closure _,object k_733470, object vec_73423_732474, object args_73424_732475, object start_91name_73425_732476, object end_91name_73426_732477, object callee_73427_732478*/
static void __lambda_156(void *data, object clo, int argc, object *args) ;/*object self_734740, object len_73428_732479*/
static void __lambda_141(void *data, object clo, int argc, object *args) ;/*closure _,object k_733391, object vec_73368_732462, object start_73369_732463, object start_91name_73370_732464, object end_73371_732465, object end_91name_73372_732466, object callee_73373_732467*/
static void __lambda_153(void *data, object clo, int argc, object *args) ;/*object self_734727, object k_733444, object things_73410_732473_raw, ...*/
static void __lambda_154(void *data, object clo, int argc, object *args) ;/*object self_734728, object r_733445*/
static void __lambda_142(void *data, object clo, int argc, object *args) ;/*object self_734729, object r_733392*/
static void __lambda_143(void *data, object clo, int argc, object *args) ;/*object self_734730, object r_733393*/
static void __lambda_144(void *data, object clo, int argc, object *args) ;/*object self_734731, object r_733394*/
static void __lambda_145(void *data, object clo, int argc, object *args) ;/*object self_734732, object lose_73374_732468, object start_73375_732469, object end_73376_732470*/
static void __lambda_152(void *data, object clo, int argc, object *args) ;/*object self_734739, object r_733428*/
static void __lambda_151(void *data, object clo, int argc, object *args) ;/*object self_734738, object r_733413*/
static void __lambda_150(void *data, object clo, int argc, object *args) ;/*object self_734737, object r_733406*/
static void __lambda_149(void *data, object clo, int argc, object *args) ;/*object self_734733, object k_733399*/
static void __lambda_146(void *data, object clo, int argc, object *args) ;/*object self_734734, object r_733396*/
static void __lambda_148(void *data, object clo, int argc, object *args) ;/*object self_734735, object k_733398, object new_91start_73383_732471, object new_91end_73384_732472*/
static void __lambda_147(void *data, object clo, int argc, object *args) ;/*object self_734736, object r_733397*/
static void __lambda_137(void *data, object clo, int argc, object *args) ;/*closure _,object k_733358, object vec_73345_732458, object index_73346_732459, object callee_73347_732460*/
static void __lambda_138(void *data, object clo, int argc, object *args) ;/*object self_734724, object index_73348_732461*/
static void __lambda_140(void *data, object clo, int argc, object *args) ;/*object self_734726, object r_733375*/
static void __lambda_139(void *data, object clo, int argc, object *args) ;/*object self_734725, object r_733361*/
static void __lambda_134(void *data, object clo, int argc, object *args) ;/*closure _,object k_733346, object pred_127_73339_732455, object value_73340_732456, object callee_73341_732457*/
static void __lambda_135(void *data, object clo, int argc, object *args) ;/*object self_734722, object r_733347*/
static void __lambda_136(void *data, object clo, int argc, object *args) ;/*object self_734723, object r_733348*/
static void __lambda_131(void *data, object clo, int argc, object *args) ;/*closure _,object k_733341, object vectors_73336_732452, object i_73337_732453*/
static void __lambda_133(void *data, object clo, int argc, object *args) ;/*object self_734720, object k_733343, object v_73338_732454*/
static void __lambda_132(void *data, object clo, int argc, object *args) ;/*object self_734721, object r_733342*/
static object __lambda_774(void *data, object ptr) ;
static void __lambda_130(void *data, object clo, int argc, object *args) ;/*closure _,object k_733338*/
static object __lambda_773(void *data, object ptr,object x_73332_732449, object y_73333_732450, object z_73334_732451) ;
static void __lambda_129(void *data, object clo, int argc, object *args) ;/*closure _,object k_733334, object x_73332_732449, object y_73333_732450, object z_73334_732451*/
static object __lambda_772(void *data, object ptr,object x_73330_732448) ;
static void __lambda_128(void *data, object clo, int argc, object *args) ;/*closure _,object k_733329, object x_73330_732448*/
static void __lambda_59(void *data, object clo, int argc, object *args) ;/*closure _,object k_733147, object expr_73196_73228_73290_732408, object rename_73197_73229_73291_732409, object compare_73198_73230_73292_732410*/
static void __lambda_60(void *data, object clo, int argc, object *args) ;/*object self_734652, object v_931_73204_73271_73317_732435*/
static void __lambda_82(void *data, object clo, int argc, object *args) ;/*object self_734653, object tmp_73232_73234_73293_732411*/
static void __lambda_127(void *data, object clo, int argc, object *args) ;/*object self_734654, object r_733148*/
static void __lambda_83(void *data, object clo, int argc, object *args) ;/*object self_734655, object k_733150*/
static void __lambda_84(void *data, object clo, int argc, object *args) ;/*object self_734656, object v_9310_73213_73239_73295_732413*/
static void __lambda_125(void *data, object clo, int argc, object *args) ;/*object self_734657, object tmp_73236_73238_73294_732412*/
static void __lambda_126(void *data, object clo, int argc, object *args) ;/*object self_734658, object r_733152*/
static void __lambda_85(void *data, object clo, int argc, object *args) ;/*object self_734659, object k_733154*/
static void __lambda_86(void *data, object clo, int argc, object *args) ;/*object self_734660, object r_733180*/
static void __lambda_87(void *data, object clo, int argc, object *args) ;/*object self_734661, object r_733259*/
static void __lambda_88(void *data, object clo, int argc, object *args) ;/*object self_734662, object r_733260*/
static void __lambda_89(void *data, object clo, int argc, object *args) ;/*object self_734663, object r_733183*/
static void __lambda_90(void *data, object clo, int argc, object *args) ;/*object self_734664, object r_733245*/
static void __lambda_91(void *data, object clo, int argc, object *args) ;/*object self_734665, object r_733254*/
static void __lambda_92(void *data, object clo, int argc, object *args) ;/*object self_734666, object r_733252*/
static void __lambda_93(void *data, object clo, int argc, object *args) ;/*object self_734667, object r_733248*/
static void __lambda_94(void *data, object clo, int argc, object *args) ;/*object self_734668, object r_733249*/
static void __lambda_95(void *data, object clo, int argc, object *args) ;/*object self_734669, object r_733246*/
static void __lambda_96(void *data, object clo, int argc, object *args) ;/*object self_734670, object r_733186*/
static void __lambda_97(void *data, object clo, int argc, object *args) ;/*object self_734671, object r_733192*/
static void __lambda_98(void *data, object clo, int argc, object *args) ;/*object self_734672, object r_733238*/
static void __lambda_99(void *data, object clo, int argc, object *args) ;/*object self_734673, object r_733239*/
static void __lambda_100(void *data, object clo, int argc, object *args) ;/*object self_734674, object r_733235*/
static void __lambda_101(void *data, object clo, int argc, object *args) ;/*object self_734675, object r_733233*/
static void __lambda_102(void *data, object clo, int argc, object *args) ;/*object self_734676, object r_733214*/
static void __lambda_103(void *data, object clo, int argc, object *args) ;/*object self_734677, object r_733220*/
static void __lambda_104(void *data, object clo, int argc, object *args) ;/*object self_734678, object r_733226*/
static void __lambda_105(void *data, object clo, int argc, object *args) ;/*object self_734679, object r_733227*/
static void __lambda_106(void *data, object clo, int argc, object *args) ;/*object self_734680, object r_733223*/
static void __lambda_107(void *data, object clo, int argc, object *args) ;/*object self_734681, object r_733221*/
static void __lambda_108(void *data, object clo, int argc, object *args) ;/*object self_734682, object r_733217*/
static void __lambda_109(void *data, object clo, int argc, object *args) ;/*object self_734683, object r_733215*/
static void __lambda_110(void *data, object clo, int argc, object *args) ;/*object self_734684, object r_733195*/
static void __lambda_111(void *data, object clo, int argc, object *args) ;/*object self_734685, object r_733201*/
static void __lambda_112(void *data, object clo, int argc, object *args) ;/*object self_734686, object r_733206*/
static void __lambda_113(void *data, object clo, int argc, object *args) ;/*object self_734687, object r_733209*/
static void __lambda_114(void *data, object clo, int argc, object *args) ;/*object self_734688, object r_733207*/
static void __lambda_115(void *data, object clo, int argc, object *args) ;/*object self_734689, object r_733204*/
static void __lambda_116(void *data, object clo, int argc, object *args) ;/*object self_734690, object r_733202*/
static void __lambda_117(void *data, object clo, int argc, object *args) ;/*object self_734691, object r_733198*/
static void __lambda_118(void *data, object clo, int argc, object *args) ;/*object self_734692, object r_733196*/
static void __lambda_119(void *data, object clo, int argc, object *args) ;/*object self_734693, object r_733193*/
static void __lambda_120(void *data, object clo, int argc, object *args) ;/*object self_734694, object r_733189*/
static void __lambda_121(void *data, object clo, int argc, object *args) ;/*object self_734695, object r_733187*/
static void __lambda_122(void *data, object clo, int argc, object *args) ;/*object self_734696, object r_733184*/
static void __lambda_123(void *data, object clo, int argc, object *args) ;/*object self_734697, object r_733181*/
static void __lambda_124(void *data, object clo, int argc, object *args) ;/*object self_734698, object r_733179*/
static void __lambda_61(void *data, object clo, int argc, object *args) ;/*object self_734699, object k_733267*/
static void __lambda_62(void *data, object clo, int argc, object *args) ;/*object self_734700, object r_733283*/
static void __lambda_63(void *data, object clo, int argc, object *args) ;/*object self_734701, object r_733320*/
static void __lambda_64(void *data, object clo, int argc, object *args) ;/*object self_734702, object r_733321*/
static void __lambda_65(void *data, object clo, int argc, object *args) ;/*object self_734703, object r_733286*/
static void __lambda_66(void *data, object clo, int argc, object *args) ;/*object self_734704, object r_733312*/
static void __lambda_67(void *data, object clo, int argc, object *args) ;/*object self_734705, object r_733316*/
static void __lambda_68(void *data, object clo, int argc, object *args) ;/*object self_734706, object r_733313*/
static void __lambda_69(void *data, object clo, int argc, object *args) ;/*object self_734707, object r_733289*/
static void __lambda_70(void *data, object clo, int argc, object *args) ;/*object self_734708, object r_733295*/
static void __lambda_71(void *data, object clo, int argc, object *args) ;/*object self_734709, object r_733305*/
static void __lambda_72(void *data, object clo, int argc, object *args) ;/*object self_734710, object r_733306*/
static void __lambda_73(void *data, object clo, int argc, object *args) ;/*object self_734711, object r_733300*/
static void __lambda_74(void *data, object clo, int argc, object *args) ;/*object self_734712, object r_733301*/
static void __lambda_75(void *data, object clo, int argc, object *args) ;/*object self_734713, object r_733298*/
static void __lambda_76(void *data, object clo, int argc, object *args) ;/*object self_734714, object r_733296*/
static void __lambda_77(void *data, object clo, int argc, object *args) ;/*object self_734715, object r_733292*/
static void __lambda_78(void *data, object clo, int argc, object *args) ;/*object self_734716, object r_733290*/
static void __lambda_79(void *data, object clo, int argc, object *args) ;/*object self_734717, object r_733287*/
static void __lambda_80(void *data, object clo, int argc, object *args) ;/*object self_734718, object r_733284*/
static void __lambda_81(void *data, object clo, int argc, object *args) ;/*object self_734719, object r_733282*/
static void __lambda_1(void *data, object clo, int argc, object *args) ;/*closure _,object k_733017, object expr_735_7345_73131_732347, object rename_736_7346_73132_732348, object compare_737_7347_73133_732349*/
static void __lambda_2(void *data, object clo, int argc, object *args) ;/*object self_734593, object v_931_7313_7393_73164_732380*/
static void __lambda_32(void *data, object clo, int argc, object *args) ;/*object self_734594, object tmp_7349_7351_73134_732350*/
static void __lambda_58(void *data, object clo, int argc, object *args) ;/*object self_734595, object r_733018*/
static void __lambda_33(void *data, object clo, int argc, object *args) ;/*object self_734596, object k_733020*/
static void __lambda_34(void *data, object clo, int argc, object *args) ;/*object self_734597, object v_9317_7329_7356_73136_732352*/
static void __lambda_56(void *data, object clo, int argc, object *args) ;/*object self_734598, object tmp_7353_7355_73135_732351*/
static void __lambda_57(void *data, object clo, int argc, object *args) ;/*object self_734599, object r_733022*/
static void __lambda_35(void *data, object clo, int argc, object *args) ;/*object self_734600, object k_733024*/
static void __lambda_36(void *data, object clo, int argc, object *args) ;/*object self_734601, object _127args_7359_73138_732354*/
static void __lambda_37(void *data, object clo, int argc, object *args) ;/*object self_734602, object v_9319_7331_7360_73139_732355*/
static void __lambda_38(void *data, object clo, int argc, object *args) ;/*object self_734603, object w_9321_7333_7364_73141_732357, object _127var_91ls23_7335_7365_73142_732358, object _127default_91ls24_7336_7366_73143_732359*/
static void __lambda_39(void *data, object clo, int argc, object *args) ;/*object self_734604, object lp_9322_7334_7367_73144_732360*/
static void __lambda_724(void *data, object clo, int argc, object *args) ;/*object self_734605, object lp_9322_7334_7367_73144_732360*/
static void __lambda_42(void *data, object clo, int argc, object *args) ;/*object self_734606, object k_733034, object w_9321_7333_7368_73145_732361, object _127var_91ls23_7335_7369_73146_732362, object _127default_91ls24_7336_7370_73147_732363*/
static void __lambda_43(void *data, object clo, int argc, object *args) ;/*object self_734607, object r_733036*/
static void __lambda_44(void *data, object clo, int argc, object *args) ;/*object self_734608, object r_733037*/
static void __lambda_45(void *data, object clo, int argc, object *args) ;/*object self_734609, object _127var_7371_73148_732364, object _127default_7372_73149_732365*/
static void __lambda_46(void *data, object clo, int argc, object *args) ;/*object self_734610, object r_733044*/
static void __lambda_54(void *data, object clo, int argc, object *args) ;/*object self_734611, object k_733056, object _127var_7380_73155_732371, object _127default_7381_73156_732372*/
static void __lambda_55(void *data, object clo, int argc, object *args) ;/*object self_734612, object r_733057*/
static void __lambda_47(void *data, object clo, int argc, object *args) ;/*object self_734613, object r_733055*/
static void __lambda_48(void *data, object clo, int argc, object *args) ;/*object self_734614, object r_733051*/
static void __lambda_49(void *data, object clo, int argc, object *args) ;/*object self_734615, object r_733052*/
static void __lambda_50(void *data, object clo, int argc, object *args) ;/*object self_734616, object r_733049*/
static void __lambda_51(void *data, object clo, int argc, object *args) ;/*object self_734617, object r_733047*/
static void __lambda_52(void *data, object clo, int argc, object *args) ;/*object self_734618, object r_733045*/
static void __lambda_53(void *data, object clo, int argc, object *args) ;/*object self_734619, object r_733043*/
static void __lambda_40(void *data, object clo, int argc, object *args) ;/*object self_734620, object r_733033*/
static void __lambda_41(void *data, object clo, int argc, object *args) ;/*object self_734621, object r_733032*/
static void __lambda_3(void *data, object clo, int argc, object *args) ;/*object self_734622, object k_733075*/
static void __lambda_4(void *data, object clo, int argc, object *args) ;/*object self_734623, object _127x_7397_73166_732382*/
static void __lambda_5(void *data, object clo, int argc, object *args) ;/*object self_734624, object v_933_7315_7398_73167_732383*/
static void __lambda_6(void *data, object clo, int argc, object *args) ;/*object self_734625, object w_935_7317_73102_73169_732385, object _127var_91ls7_7319_73103_73170_732386, object _127default_91ls8_7320_73104_73171_732387*/
static void __lambda_7(void *data, object clo, int argc, object *args) ;/*object self_734626, object lp_936_7318_73105_73172_732388*/
static void __lambda_723(void *data, object clo, int argc, object *args) ;/*object self_734627, object lp_936_7318_73105_73172_732388*/
static void __lambda_10(void *data, object clo, int argc, object *args) ;/*object self_734628, object k_733086, object w_935_7317_73106_73173_732389, object _127var_91ls7_7319_73107_73174_732390, object _127default_91ls8_7320_73108_73175_732391*/
static void __lambda_11(void *data, object clo, int argc, object *args) ;/*object self_734629, object r_733088*/
static void __lambda_12(void *data, object clo, int argc, object *args) ;/*object self_734630, object r_733089*/
static void __lambda_13(void *data, object clo, int argc, object *args) ;/*object self_734631, object _127var_73109_73176_732392, object _127default_73110_73177_732393*/
static void __lambda_14(void *data, object clo, int argc, object *args) ;/*object self_734632, object r_733096*/
static void __lambda_15(void *data, object clo, int argc, object *args) ;/*object self_734633, object r_733126*/
static void __lambda_16(void *data, object clo, int argc, object *args) ;/*object self_734634, object r_733127*/
static void __lambda_17(void *data, object clo, int argc, object *args) ;/*object self_734635, object r_733123*/
static void __lambda_18(void *data, object clo, int argc, object *args) ;/*object self_734636, object r_733099*/
static void __lambda_19(void *data, object clo, int argc, object *args) ;/*object self_734637, object r_733105*/
static void __lambda_20(void *data, object clo, int argc, object *args) ;/*object self_734638, object r_733108*/
static void __lambda_30(void *data, object clo, int argc, object *args) ;/*object self_734639, object k_733116, object _127var_73118_73183_732399, object _127default_73119_73184_732400*/
static void __lambda_31(void *data, object clo, int argc, object *args) ;/*object self_734640, object r_733117*/
static void __lambda_21(void *data, object clo, int argc, object *args) ;/*object self_734641, object r_733115*/
static void __lambda_22(void *data, object clo, int argc, object *args) ;/*object self_734642, object r_733111*/
static void __lambda_23(void *data, object clo, int argc, object *args) ;/*object self_734643, object r_733112*/
static void __lambda_24(void *data, object clo, int argc, object *args) ;/*object self_734644, object r_733109*/
static void __lambda_25(void *data, object clo, int argc, object *args) ;/*object self_734645, object r_733106*/
static void __lambda_26(void *data, object clo, int argc, object *args) ;/*object self_734646, object r_733102*/
static void __lambda_27(void *data, object clo, int argc, object *args) ;/*object self_734647, object r_733100*/
static void __lambda_28(void *data, object clo, int argc, object *args) ;/*object self_734648, object r_733097*/
static void __lambda_29(void *data, object clo, int argc, object *args) ;/*object self_734649, object r_733095*/
static void __lambda_8(void *data, object clo, int argc, object *args) ;/*object self_734650, object r_733085*/
static void __lambda_9(void *data, object clo, int argc, object *args) ;/*object self_734651, object r_733084*/

static void __lambda_470(void *data, object _, int argc, object *args) /* closure _,object k_734253 */
 {
object k_734253 = args[0];
  Cyc_st_add(data, "srfi/133.sld:lib-init:srfi133");

closureN_type c_7310252;
object e_7312227 [1];
c_7310252.hdr.mark = gc_color_red;
 c_7310252.hdr.grayed = 0;
c_7310252.tag = closureN_tag;
 c_7310252.fn = (function_type)__lambda_471;
c_7310252.num_args = 1;
c_7310252.num_elements = 1;
c_7310252.elements = (object *)e_7312227;
c_7310252.elements[0] = k_734253;

return_direct_with_clo1(data,(closure)&c_7310252,__lambda_471,  boolean_f);; 
}

static void __lambda_471(void *data, object self_735048, int argc, object *args) /* object self_735048, object loop_73536_732118_732786 */
 {
 object loop_73536_732118_732786 = args[0];
  
closureN_type c_7310254;
object e_7312223 [1];
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 = 1;
c_7310254.elements = (object *)e_7312223;
c_7310254.elements[0] = ((closureN)self_735048)->elements[0];


pair_type local_7312226; 
return_direct_with_clo1(data,(closure)&c_7310254,__lambda_771,  set_cell_as_expr(&local_7312226, loop_73536_732118_732786));; 
}

static void __lambda_771(void *data, object self_735049, int argc, object *args) /* object self_735049, object loop_73536_732118_732786 */
 {
 object loop_73536_732118_732786 = args[0];
  
closureN_type c_7310256;
object e_7312194 [2];
c_7310256.hdr.mark = gc_color_red;
 c_7310256.hdr.grayed = 0;
c_7310256.tag = closureN_tag;
 c_7310256.fn = (function_type)__lambda_472;
c_7310256.num_args = 1;
c_7310256.num_elements = 2;
c_7310256.elements = (object *)e_7312194;
c_7310256.elements[0] = ((closureN)self_735049)->elements[0];
c_7310256.elements[1] = loop_73536_732118_732786;


closureN_type c_7312195;
object e_7312222 [1];
c_7312195.hdr.mark = gc_color_red;
 c_7312195.hdr.grayed = 0;
c_7312195.tag = closureN_tag;
 c_7312195.fn = (function_type)__lambda_719;
c_7312195.num_args = 3;
c_7312195.num_elements = 1;
c_7312195.elements = (object *)e_7312222;
c_7312195.elements[0] = loop_73536_732118_732786;

return_direct_with_clo1(data,(closure)&c_7310256,__lambda_472,  &c_7312195);; 
}

static void __lambda_719(void *data, object self_735050, int argc, object *args) /* object self_735050, object k_734580, object vector_91list_73537_732119_732787, object length_73538_732120_732788, object callee_73539_732121_732789 */
 {
 object k_734580 = args[0]; object vector_91list_73537_732119_732787 = args[1]; object length_73538_732120_732788 = args[2]; object callee_73539_732121_732789 = args[3];
    
if( (boolean_f != Cyc_is_null(vector_91list_73537_732119_732787)) ){ 
  return_direct_with_clo1(data,  k_734580, (((closure)  k_734580)->fn),  length_73538_732120_732788);
} else { 
  
closureN_type c_7312200;
object e_7312219 [5];
c_7312200.hdr.mark = gc_color_red;
 c_7312200.hdr.grayed = 0;
c_7312200.tag = closureN_tag;
 c_7312200.fn = (function_type)__lambda_720;
c_7312200.num_args = 1;
c_7312200.num_elements = 5;
c_7312200.elements = (object *)e_7312219;
c_7312200.elements[0] = callee_73539_732121_732789;
c_7312200.elements[1] = k_734580;
c_7312200.elements[2] = length_73538_732120_732788;
c_7312200.elements[3] = ((closureN)self_735050)->elements[0];
c_7312200.elements[4] = vector_91list_73537_732119_732787;



return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7312200, primitive_vector_127, Cyc_car(data, vector_91list_73537_732119_732787), callee_73539_732121_732789);}
;; 
}

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



return_direct_with_clo1(data,(closure)&c_7312202,__lambda_721,  Cyc_vector_length(data, r_734585));; 
}

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

return_direct_with_clo3(data,  __glo_min_scheme_base, (((closure)  __glo_min_scheme_base)->fn),  &c_7312204, r_734584, ((closureN)self_735052)->elements[2]);; 
}

static void __lambda_722(void *data, object self_735053, int argc, object *args) /* object self_735053, object r_734583 */
 {
 object r_734583 = args[0];
  



return_closcall4(data,  car(((closureN)self_735053)->elements[2]),  ((closureN)self_735053)->elements[1], Cyc_cdr(data, ((closureN)self_735053)->elements[3]), r_734583, ((closureN)self_735053)->elements[0]);; 
}

static void __lambda_472(void *data, object self_735054, int argc, object *args) /* object self_735054, object r_734579 */
 {
 object r_734579 = args[0];
  
closureN_type c_7310258;
object e_7312190 [2];
c_7310258.hdr.mark = gc_color_red;
 c_7310258.hdr.grayed = 0;
c_7310258.tag = closureN_tag;
 c_7310258.fn = (function_type)__lambda_473;
c_7310258.num_args = 1;
c_7310258.num_elements = 2;
c_7310258.elements = (object *)e_7312190;
c_7310258.elements[0] = ((closureN)self_735054)->elements[0];
c_7310258.elements[1] = ((closureN)self_735054)->elements[1];



return_direct_with_clo1(data,(closure)&c_7310258,__lambda_473,  Cyc_set_cell(data, ((closureN)self_735054)->elements[1], r_734579));; 
}

static void __lambda_473(void *data, object self_735055, int argc, object *args) /* object self_735055, object r_734578 */
 {

  
closureN_type c_7310260;
object e_7312186 [1];
c_7310260.hdr.mark = gc_color_red;
 c_7310260.hdr.grayed = 0;
c_7310260.tag = closureN_tag;
 c_7310260.fn = (function_type)__lambda_474;
c_7310260.num_args = 1;
c_7310260.num_elements = 1;
c_7310260.elements = (object *)e_7312186;
c_7310260.elements[0] = ((closureN)self_735055)->elements[0];



return_direct_with_clo1(data,(closure)&c_7310260,__lambda_474,  car(((closureN)self_735055)->elements[1]));; 
}

static void __lambda_474(void *data, object self_735056, int argc, object *args) /* object self_735056, object r_734577 */
 {
 object r_734577 = args[0];
  
closureN_type c_7310262;
object e_7312182 [1];
c_7310262.hdr.mark = gc_color_red;
 c_7310262.hdr.grayed = 0;
c_7310262.tag = closureN_tag;
 c_7310262.fn = (function_type)__lambda_475;
c_7310262.num_args = 1;
c_7310262.num_elements = 1;
c_7310262.elements = (object *)e_7312182;
c_7310262.elements[0] = ((closureN)self_735056)->elements[0];


object c_7312185 = global_set_cps_id(data,(closure)&c_7310262,"__glo__75smallest_91length_srfi_133", __glo__75smallest_91length_srfi_133, r_734577);
return_closcall1(data,(closure)&c_7310262,  c_7312185);; 
}

static void __lambda_475(void *data, object self_735057, int argc, object *args) /* object self_735057, object r_734255 */
 {

  
closureN_type c_7310264;
object e_7312181 [1];
c_7310264.hdr.mark = gc_color_red;
 c_7310264.hdr.grayed = 0;
c_7310264.tag = closureN_tag;
 c_7310264.fn = (function_type)__lambda_476;
c_7310264.num_args = 2;
c_7310264.num_elements = 1;
c_7310264.elements = (object *)e_7312181;
c_7310264.elements[0] = ((closureN)self_735057)->elements[0];

return_direct_with_clo2(data,(closure)&c_7310264,__lambda_476,  boolean_f, boolean_f);; 
}

static void __lambda_476(void *data, object self_735058, int argc, object *args) /* object self_735058, object loop_95l_91_125r_73540_732122_732790, object loop_95r_91_125l_73541_732123_732791 */
 {
 object loop_95l_91_125r_73540_732122_732790 = args[0]; object loop_95r_91_125l_73541_732123_732791 = args[1];
  
closureN_type c_7310266;
object e_7312177 [2];
c_7310266.hdr.mark = gc_color_red;
 c_7310266.hdr.grayed = 0;
c_7310266.tag = closureN_tag;
 c_7310266.fn = (function_type)__lambda_770;
c_7310266.num_args = 1;
c_7310266.num_elements = 2;
c_7310266.elements = (object *)e_7312177;
c_7310266.elements[0] = ((closureN)self_735058)->elements[0];
c_7310266.elements[1] = loop_95r_91_125l_73541_732123_732791;


pair_type local_7312180; 
return_direct_with_clo1(data,(closure)&c_7310266,__lambda_770,  set_cell_as_expr(&local_7312180, loop_95l_91_125r_73540_732122_732790));; 
}

static void __lambda_770(void *data, object self_735059, int argc, object *args) /* object self_735059, object loop_95l_91_125r_73540_732122_732790 */
 {
 object loop_95l_91_125r_73540_732122_732790 = args[0];
  
closureN_type c_7310268;
object e_7312172 [2];
c_7310268.hdr.mark = gc_color_red;
 c_7310268.hdr.grayed = 0;
c_7310268.tag = closureN_tag;
 c_7310268.fn = (function_type)__lambda_769;
c_7310268.num_args = 1;
c_7310268.num_elements = 2;
c_7310268.elements = (object *)e_7312172;
c_7310268.elements[0] = ((closureN)self_735059)->elements[0];
c_7310268.elements[1] = loop_95l_91_125r_73540_732122_732790;


pair_type local_7312175; 
return_direct_with_clo1(data,(closure)&c_7310268,__lambda_769,  set_cell_as_expr(&local_7312175, ((closureN)self_735059)->elements[1]));; 
}

static void __lambda_769(void *data, object self_735060, int argc, object *args) /* object self_735060, object loop_95r_91_125l_73541_732123_732791 */
 {
 object loop_95r_91_125l_73541_732123_732791 = args[0];
  
closureN_type c_7310270;
object e_7312137 [3];
c_7310270.hdr.mark = gc_color_red;
 c_7310270.hdr.grayed = 0;
c_7310270.tag = closureN_tag;
 c_7310270.fn = (function_type)__lambda_477;
c_7310270.num_args = 1;
c_7310270.num_elements = 3;
c_7310270.elements = (object *)e_7312137;
c_7310270.elements[0] = ((closureN)self_735060)->elements[0];
c_7310270.elements[1] = ((closureN)self_735060)->elements[1];
c_7310270.elements[2] = loop_95r_91_125l_73541_732123_732791;


closureN_type c_7312138;
object e_7312171 [1];
c_7312138.hdr.mark = gc_color_red;
 c_7312138.hdr.grayed = 0;
c_7312138.tag = closureN_tag;
 c_7312138.fn = (function_type)__lambda_716;
c_7312138.num_args = 5;
c_7312138.num_elements = 1;
c_7312138.elements = (object *)e_7312171;
c_7312138.elements[0] = ((closureN)self_735060)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310270,__lambda_477,  &c_7312138);; 
}

static void __lambda_716(void *data, object self_735061, int argc, object *args) /* object self_735061, object k_734571, object target_73542_732124_732792, object source_73543_732125_732793, object send_73544_732126_732794, object i_73545_732127_732795, object j_73546_732128_732796 */
 {
 object k_734571 = args[0]; object target_73542_732124_732792 = args[1]; object source_73543_732125_732793 = args[2]; object send_73544_732126_732794 = args[3]; object i_73545_732127_732795 = args[4]; object j_73546_732128_732796 = args[5];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, i_73545_732127_732795, send_73544_732126_732794)) ){ 
  
closureN_type c_7312142;
object e_7312167 [7];
c_7312142.hdr.mark = gc_color_red;
 c_7312142.hdr.grayed = 0;
c_7312142.tag = closureN_tag;
 c_7312142.fn = (function_type)__lambda_717;
c_7312142.num_args = 1;
c_7312142.num_elements = 7;
c_7312142.elements = (object *)e_7312167;
c_7312142.elements[0] = i_73545_732127_732795;
c_7312142.elements[1] = j_73546_732128_732796;
c_7312142.elements[2] = k_734571;
c_7312142.elements[3] = ((closureN)self_735061)->elements[0];
c_7312142.elements[4] = send_73544_732126_732794;
c_7312142.elements[5] = source_73543_732125_732793;
c_7312142.elements[6] = target_73542_732124_732792;



return_direct_with_clo1(data,(closure)&c_7312142,__lambda_717,  Cyc_vector_ref(data, source_73543_732125_732793, i_73545_732127_732795));
} else { 
  return_direct_with_clo1(data,  k_734571, (((closure)  k_734571)->fn),  boolean_f);}
;; 
}

static void __lambda_717(void *data, object self_735062, int argc, object *args) /* object self_735062, object r_734576 */
 {
 object r_734576 = args[0];
  
closureN_type c_7312144;
object e_7312161 [7];
c_7312144.hdr.mark = gc_color_red;
 c_7312144.hdr.grayed = 0;
c_7312144.tag = closureN_tag;
 c_7312144.fn = (function_type)__lambda_718;
c_7312144.num_args = 1;
c_7312144.num_elements = 7;
c_7312144.elements = (object *)e_7312161;
c_7312144.elements[0] = ((closureN)self_735062)->elements[0];
c_7312144.elements[1] = ((closureN)self_735062)->elements[1];
c_7312144.elements[2] = ((closureN)self_735062)->elements[2];
c_7312144.elements[3] = ((closureN)self_735062)->elements[3];
c_7312144.elements[4] = ((closureN)self_735062)->elements[4];
c_7312144.elements[5] = ((closureN)self_735062)->elements[5];
c_7312144.elements[6] = ((closureN)self_735062)->elements[6];


object c_7312164 = Cyc_vector_set_cps(data,(closure)&c_7312144,((closureN)self_735062)->elements[6], ((closureN)self_735062)->elements[1], r_734576);
return_closcall1(data,(closure)&c_7312144,  c_7312164);; 
}

static void __lambda_718(void *data, object self_735063, int argc, object *args) /* object self_735063, object r_734573 */
 {

  


complex_num_type local_7312155; 

complex_num_type local_7312159; 
return_closcall6(data,  car(((closureN)self_735063)->elements[3]),  ((closureN)self_735063)->elements[2], ((closureN)self_735063)->elements[6], ((closureN)self_735063)->elements[5], ((closureN)self_735063)->elements[4], Cyc_fast_sum(data,&local_7312155, ((closureN)self_735063)->elements[0], obj_int2obj(1)), Cyc_fast_sum(data,&local_7312159, ((closureN)self_735063)->elements[1], obj_int2obj(1)));; 
}

static void __lambda_477(void *data, object self_735064, int argc, object *args) /* object self_735064, object r_734570 */
 {
 object r_734570 = args[0];
  
closureN_type c_7310272;
object e_7312133 [3];
c_7310272.hdr.mark = gc_color_red;
 c_7310272.hdr.grayed = 0;
c_7310272.tag = closureN_tag;
 c_7310272.fn = (function_type)__lambda_478;
c_7310272.num_args = 1;
c_7310272.num_elements = 3;
c_7310272.elements = (object *)e_7312133;
c_7310272.elements[0] = ((closureN)self_735064)->elements[0];
c_7310272.elements[1] = ((closureN)self_735064)->elements[1];
c_7310272.elements[2] = ((closureN)self_735064)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310272,__lambda_478,  Cyc_set_cell(data, ((closureN)self_735064)->elements[1], r_734570));; 
}

static void __lambda_478(void *data, object self_735065, int argc, object *args) /* object self_735065, object r_734554 */
 {

  
closureN_type c_7310274;
object e_7312098 [3];
c_7310274.hdr.mark = gc_color_red;
 c_7310274.hdr.grayed = 0;
c_7310274.tag = closureN_tag;
 c_7310274.fn = (function_type)__lambda_479;
c_7310274.num_args = 1;
c_7310274.num_elements = 3;
c_7310274.elements = (object *)e_7312098;
c_7310274.elements[0] = ((closureN)self_735065)->elements[0];
c_7310274.elements[1] = ((closureN)self_735065)->elements[1];
c_7310274.elements[2] = ((closureN)self_735065)->elements[2];


closureN_type c_7312099;
object e_7312132 [1];
c_7312099.hdr.mark = gc_color_red;
 c_7312099.hdr.grayed = 0;
c_7312099.tag = closureN_tag;
 c_7312099.fn = (function_type)__lambda_713;
c_7312099.num_args = 5;
c_7312099.num_elements = 1;
c_7312099.elements = (object *)e_7312132;
c_7312099.elements[0] = ((closureN)self_735065)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310274,__lambda_479,  &c_7312099);; 
}

static void __lambda_713(void *data, object self_735066, int argc, object *args) /* object self_735066, object k_734564, object target_73550_732129_732797, object source_73551_732130_732798, object sstart_73552_732131_732799, object i_73553_732132_732800, object j_73554_732133_732801 */
 {
 object k_734564 = args[0]; object target_73550_732129_732797 = args[1]; object source_73551_732130_732798 = args[2]; object sstart_73552_732131_732799 = args[3]; object i_73553_732132_732800 = args[4]; object j_73554_732133_732801 = args[5];
    
if( (boolean_f != Cyc_num_fast_gte_op(data, i_73553_732132_732800, sstart_73552_732131_732799)) ){ 
  
closureN_type c_7312103;
object e_7312128 [7];
c_7312103.hdr.mark = gc_color_red;
 c_7312103.hdr.grayed = 0;
c_7312103.tag = closureN_tag;
 c_7312103.fn = (function_type)__lambda_714;
c_7312103.num_args = 1;
c_7312103.num_elements = 7;
c_7312103.elements = (object *)e_7312128;
c_7312103.elements[0] = i_73553_732132_732800;
c_7312103.elements[1] = j_73554_732133_732801;
c_7312103.elements[2] = k_734564;
c_7312103.elements[3] = ((closureN)self_735066)->elements[0];
c_7312103.elements[4] = source_73551_732130_732798;
c_7312103.elements[5] = sstart_73552_732131_732799;
c_7312103.elements[6] = target_73550_732129_732797;



return_direct_with_clo1(data,(closure)&c_7312103,__lambda_714,  Cyc_vector_ref(data, source_73551_732130_732798, i_73553_732132_732800));
} else { 
  return_direct_with_clo1(data,  k_734564, (((closure)  k_734564)->fn),  boolean_f);}
;; 
}

static void __lambda_714(void *data, object self_735067, int argc, object *args) /* object self_735067, object r_734569 */
 {
 object r_734569 = args[0];
  
closureN_type c_7312105;
object e_7312122 [7];
c_7312105.hdr.mark = gc_color_red;
 c_7312105.hdr.grayed = 0;
c_7312105.tag = closureN_tag;
 c_7312105.fn = (function_type)__lambda_715;
c_7312105.num_args = 1;
c_7312105.num_elements = 7;
c_7312105.elements = (object *)e_7312122;
c_7312105.elements[0] = ((closureN)self_735067)->elements[0];
c_7312105.elements[1] = ((closureN)self_735067)->elements[1];
c_7312105.elements[2] = ((closureN)self_735067)->elements[2];
c_7312105.elements[3] = ((closureN)self_735067)->elements[3];
c_7312105.elements[4] = ((closureN)self_735067)->elements[4];
c_7312105.elements[5] = ((closureN)self_735067)->elements[5];
c_7312105.elements[6] = ((closureN)self_735067)->elements[6];


object c_7312125 = Cyc_vector_set_cps(data,(closure)&c_7312105,((closureN)self_735067)->elements[6], ((closureN)self_735067)->elements[1], r_734569);
return_closcall1(data,(closure)&c_7312105,  c_7312125);; 
}

static void __lambda_715(void *data, object self_735068, int argc, object *args) /* object self_735068, object r_734566 */
 {

  


complex_num_type local_7312116; 

complex_num_type local_7312120; 
return_closcall6(data,  car(((closureN)self_735068)->elements[3]),  ((closureN)self_735068)->elements[2], ((closureN)self_735068)->elements[6], ((closureN)self_735068)->elements[4], ((closureN)self_735068)->elements[5], Cyc_fast_sub(data,&local_7312116, ((closureN)self_735068)->elements[0], obj_int2obj(1)), Cyc_fast_sub(data,&local_7312120, ((closureN)self_735068)->elements[1], obj_int2obj(1)));; 
}

static void __lambda_479(void *data, object self_735069, int argc, object *args) /* object self_735069, object r_734563 */
 {
 object r_734563 = args[0];
  
closureN_type c_7310276;
object e_7312094 [3];
c_7310276.hdr.mark = gc_color_red;
 c_7310276.hdr.grayed = 0;
c_7310276.tag = closureN_tag;
 c_7310276.fn = (function_type)__lambda_480;
c_7310276.num_args = 1;
c_7310276.num_elements = 3;
c_7310276.elements = (object *)e_7312094;
c_7310276.elements[0] = ((closureN)self_735069)->elements[0];
c_7310276.elements[1] = ((closureN)self_735069)->elements[1];
c_7310276.elements[2] = ((closureN)self_735069)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310276,__lambda_480,  Cyc_set_cell(data, ((closureN)self_735069)->elements[2], r_734563));; 
}

static void __lambda_480(void *data, object self_735070, int argc, object *args) /* object self_735070, object r_734555 */
 {

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


closureN_type c_7312067;
object e_7312093 [2];
c_7312067.hdr.mark = gc_color_red;
 c_7312067.hdr.grayed = 0;
c_7312067.tag = closureN_tag;
 c_7312067.fn = (function_type)__lambda_712;
c_7312067.num_args = 5;
c_7312067.num_elements = 2;
c_7312067.elements = (object *)e_7312093;
c_7312067.elements[0] = ((closureN)self_735070)->elements[1];
c_7312067.elements[1] = ((closureN)self_735070)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310278,__lambda_481,  &c_7312067);; 
}

static void __lambda_712(void *data, object self_735071, int argc, object *args) /* object self_735071, object k_734556, object target_73558_732134_732802, object tstart_73559_732135_732803, object source_73560_732136_732804, object sstart_73561_732137_732805, object send_73562_732138_732806 */
 {
 object k_734556 = args[0]; object target_73558_732134_732802 = args[1]; object tstart_73559_732135_732803 = args[2]; object source_73560_732136_732804 = args[3]; object sstart_73561_732137_732805 = args[4]; object send_73562_732138_732806 = args[5];
    
if( (boolean_f != Cyc_num_fast_gt_op(data, sstart_73561_732137_732805, tstart_73559_732135_732803)) ){ 
  

return_closcall6(data,  car(((closureN)self_735071)->elements[0]),  k_734556, target_73558_732134_732802, source_73560_732136_732804, send_73562_732138_732806, sstart_73561_732137_732805, tstart_73559_732135_732803);
} else { 
  


complex_num_type local_7312080; 

complex_num_type local_7312083; 

complex_num_type local_7312086; 

complex_num_type local_7312089; 

complex_num_type local_7312092; 
return_closcall6(data,  car(((closureN)self_735071)->elements[1]),  k_734556, target_73558_732134_732802, source_73560_732136_732804, sstart_73561_732137_732805, Cyc_fast_sub(data,&local_7312080, send_73562_732138_732806, obj_int2obj(1)), Cyc_fast_sum(data,&local_7312083, Cyc_fast_sum(data,&local_7312086, Cyc_fast_sum(data,&local_7312089, obj_int2obj(-1), tstart_73559_732135_732803), send_73562_732138_732806), Cyc_fast_sub(data,&local_7312092, obj_int2obj(0), sstart_73561_732137_732805)));}
;; 
}

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


object c_7312065 = global_set_cps_id(data,(closure)&c_7310280,"__glo__75vector_91copy_67_srfi_133", __glo__75vector_91copy_67_srfi_133, r_734553);
return_closcall1(data,(closure)&c_7310280,  c_7312065);; 
}

static void __lambda_482(void *data, object self_735073, int argc, object *args) /* object self_735073, object r_734256 */
 {

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

return_direct_with_clo1(data,(closure)&c_7310282,__lambda_483,  boolean_f);; 
}

static void __lambda_483(void *data, object self_735074, int argc, object *args) /* object self_735074, object loop_73563_732139_732807 */
 {
 object loop_73563_732139_732807 = args[0];
  
closureN_type c_7310284;
object e_7312057 [1];
c_7310284.hdr.mark = gc_color_red;
 c_7310284.hdr.grayed = 0;
c_7310284.tag = closureN_tag;
 c_7310284.fn = (function_type)__lambda_768;
c_7310284.num_args = 1;
c_7310284.num_elements = 1;
c_7310284.elements = (object *)e_7312057;
c_7310284.elements[0] = ((closureN)self_735074)->elements[0];


pair_type local_7312060; 
return_direct_with_clo1(data,(closure)&c_7310284,__lambda_768,  set_cell_as_expr(&local_7312060, loop_73563_732139_732807));; 
}

static void __lambda_768(void *data, object self_735075, int argc, object *args) /* object self_735075, object loop_73563_732139_732807 */
 {
 object loop_73563_732139_732807 = args[0];
  
closureN_type c_7310286;
object e_7312022 [2];
c_7310286.hdr.mark = gc_color_red;
 c_7310286.hdr.grayed = 0;
c_7310286.tag = closureN_tag;
 c_7310286.fn = (function_type)__lambda_484;
c_7310286.num_args = 1;
c_7310286.num_elements = 2;
c_7310286.elements = (object *)e_7312022;
c_7310286.elements[0] = ((closureN)self_735075)->elements[0];
c_7310286.elements[1] = loop_73563_732139_732807;


closureN_type c_7312023;
object e_7312056 [1];
c_7312023.hdr.mark = gc_color_red;
 c_7312023.hdr.grayed = 0;
c_7312023.tag = closureN_tag;
 c_7312023.fn = (function_type)__lambda_709;
c_7312023.num_args = 5;
c_7312023.num_elements = 1;
c_7312023.elements = (object *)e_7312056;
c_7312023.elements[0] = loop_73563_732139_732807;

return_direct_with_clo1(data,(closure)&c_7310286,__lambda_484,  &c_7312023);; 
}

static void __lambda_709(void *data, object self_735076, int argc, object *args) /* object self_735076, object k_734547, object target_73564_732140_732808, object source_73565_732141_732809, object sstart_73566_732142_732810, object i_73567_732143_732811, object j_73568_732144_732812 */
 {
 object k_734547 = args[0]; object target_73564_732140_732808 = args[1]; object source_73565_732141_732809 = args[2]; object sstart_73566_732142_732810 = args[3]; object i_73567_732143_732811 = args[4]; object j_73568_732144_732812 = args[5];
    
if( (boolean_f != Cyc_num_fast_gte_op(data, i_73567_732143_732811, sstart_73566_732142_732810)) ){ 
  
closureN_type c_7312027;
object e_7312052 [7];
c_7312027.hdr.mark = gc_color_red;
 c_7312027.hdr.grayed = 0;
c_7312027.tag = closureN_tag;
 c_7312027.fn = (function_type)__lambda_710;
c_7312027.num_args = 1;
c_7312027.num_elements = 7;
c_7312027.elements = (object *)e_7312052;
c_7312027.elements[0] = i_73567_732143_732811;
c_7312027.elements[1] = j_73568_732144_732812;
c_7312027.elements[2] = k_734547;
c_7312027.elements[3] = ((closureN)self_735076)->elements[0];
c_7312027.elements[4] = source_73565_732141_732809;
c_7312027.elements[5] = sstart_73566_732142_732810;
c_7312027.elements[6] = target_73564_732140_732808;



return_direct_with_clo1(data,(closure)&c_7312027,__lambda_710,  Cyc_vector_ref(data, source_73565_732141_732809, i_73567_732143_732811));
} else { 
  return_direct_with_clo1(data,  k_734547, (((closure)  k_734547)->fn),  boolean_f);}
;; 
}

static void __lambda_710(void *data, object self_735077, int argc, object *args) /* object self_735077, object r_734552 */
 {
 object r_734552 = args[0];
  
closureN_type c_7312029;
object e_7312046 [7];
c_7312029.hdr.mark = gc_color_red;
 c_7312029.hdr.grayed = 0;
c_7312029.tag = closureN_tag;
 c_7312029.fn = (function_type)__lambda_711;
c_7312029.num_args = 1;
c_7312029.num_elements = 7;
c_7312029.elements = (object *)e_7312046;
c_7312029.elements[0] = ((closureN)self_735077)->elements[0];
c_7312029.elements[1] = ((closureN)self_735077)->elements[1];
c_7312029.elements[2] = ((closureN)self_735077)->elements[2];
c_7312029.elements[3] = ((closureN)self_735077)->elements[3];
c_7312029.elements[4] = ((closureN)self_735077)->elements[4];
c_7312029.elements[5] = ((closureN)self_735077)->elements[5];
c_7312029.elements[6] = ((closureN)self_735077)->elements[6];


object c_7312049 = Cyc_vector_set_cps(data,(closure)&c_7312029,((closureN)self_735077)->elements[6], ((closureN)self_735077)->elements[1], r_734552);
return_closcall1(data,(closure)&c_7312029,  c_7312049);; 
}

static void __lambda_711(void *data, object self_735078, int argc, object *args) /* object self_735078, object r_734549 */
 {

  


complex_num_type local_7312040; 

complex_num_type local_7312044; 
return_closcall6(data,  car(((closureN)self_735078)->elements[3]),  ((closureN)self_735078)->elements[2], ((closureN)self_735078)->elements[6], ((closureN)self_735078)->elements[4], ((closureN)self_735078)->elements[5], Cyc_fast_sub(data,&local_7312040, ((closureN)self_735078)->elements[0], obj_int2obj(1)), Cyc_fast_sum(data,&local_7312044, ((closureN)self_735078)->elements[1], obj_int2obj(1)));; 
}

static void __lambda_484(void *data, object self_735079, int argc, object *args) /* object self_735079, object r_734546 */
 {
 object r_734546 = args[0];
  
closureN_type c_7310288;
object e_7312018 [2];
c_7310288.hdr.mark = gc_color_red;
 c_7310288.hdr.grayed = 0;
c_7310288.tag = closureN_tag;
 c_7310288.fn = (function_type)__lambda_485;
c_7310288.num_args = 1;
c_7310288.num_elements = 2;
c_7310288.elements = (object *)e_7312018;
c_7310288.elements[0] = ((closureN)self_735079)->elements[0];
c_7310288.elements[1] = ((closureN)self_735079)->elements[1];



return_direct_with_clo1(data,(closure)&c_7310288,__lambda_485,  Cyc_set_cell(data, ((closureN)self_735079)->elements[1], r_734546));; 
}

static void __lambda_485(void *data, object self_735080, int argc, object *args) /* object self_735080, object r_734543 */
 {

  
closureN_type c_7310290;
object e_7312008 [1];
c_7310290.hdr.mark = gc_color_red;
 c_7310290.hdr.grayed = 0;
c_7310290.tag = closureN_tag;
 c_7310290.fn = (function_type)__lambda_486;
c_7310290.num_args = 1;
c_7310290.num_elements = 1;
c_7310290.elements = (object *)e_7312008;
c_7310290.elements[0] = ((closureN)self_735080)->elements[0];


closureN_type c_7312009;
object e_7312017 [1];
c_7312009.hdr.mark = gc_color_red;
 c_7312009.hdr.grayed = 0;
c_7312009.tag = closureN_tag;
 c_7312009.fn = (function_type)__lambda_708;
c_7312009.num_args = 5;
c_7312009.num_elements = 1;
c_7312009.elements = (object *)e_7312017;
c_7312009.elements[0] = ((closureN)self_735080)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310290,__lambda_486,  &c_7312009);; 
}

static void __lambda_708(void *data, object self_735081, int argc, object *args) /* object self_735081, object k_734544, object target_73572_732145_732813, object tstart_73573_732146_732814, object source_73574_732147_732815, object sstart_73575_732148_732816, object send_73576_732149_732817 */
 {
 object k_734544 = args[0]; object target_73572_732145_732813 = args[1]; object tstart_73573_732146_732814 = args[2]; object source_73574_732147_732815 = args[3]; object sstart_73575_732148_732816 = args[4]; object send_73576_732149_732817 = args[5];
  


complex_num_type local_7312016; 
return_closcall6(data,  car(((closureN)self_735081)->elements[0]),  k_734544, target_73572_732145_732813, source_73574_732147_732815, sstart_73575_732148_732816, Cyc_fast_sub(data,&local_7312016, send_73576_732149_732817, obj_int2obj(1)), tstart_73573_732146_732814);; 
}

static void __lambda_486(void *data, object self_735082, int argc, object *args) /* object self_735082, object r_734542 */
 {
 object r_734542 = args[0];
  
closureN_type c_7310292;
object e_7312004 [1];
c_7310292.hdr.mark = gc_color_red;
 c_7310292.hdr.grayed = 0;
c_7310292.tag = closureN_tag;
 c_7310292.fn = (function_type)__lambda_487;
c_7310292.num_args = 1;
c_7310292.num_elements = 1;
c_7310292.elements = (object *)e_7312004;
c_7310292.elements[0] = ((closureN)self_735082)->elements[0];


object c_7312007 = global_set_cps_id(data,(closure)&c_7310292,"__glo__75vector_91reverse_91copy_67_srfi_133", __glo__75vector_91reverse_91copy_67_srfi_133, r_734542);
return_closcall1(data,(closure)&c_7310292,  c_7312007);; 
}

static void __lambda_487(void *data, object self_735083, int argc, object *args) /* object self_735083, object r_734257 */
 {

  
closureN_type c_7310294;
object e_7312003 [1];
c_7310294.hdr.mark = gc_color_red;
 c_7310294.hdr.grayed = 0;
c_7310294.tag = closureN_tag;
 c_7310294.fn = (function_type)__lambda_488;
c_7310294.num_args = 1;
c_7310294.num_elements = 1;
c_7310294.elements = (object *)e_7312003;
c_7310294.elements[0] = ((closureN)self_735083)->elements[0];

return_direct_with_clo1(data,(closure)&c_7310294,__lambda_488,  boolean_f);; 
}

static void __lambda_488(void *data, object self_735084, int argc, object *args) /* object self_735084, object loop_73577_732150_732818 */
 {
 object loop_73577_732150_732818 = args[0];
  
closureN_type c_7310296;
object e_7311999 [1];
c_7310296.hdr.mark = gc_color_red;
 c_7310296.hdr.grayed = 0;
c_7310296.tag = closureN_tag;
 c_7310296.fn = (function_type)__lambda_767;
c_7310296.num_args = 1;
c_7310296.num_elements = 1;
c_7310296.elements = (object *)e_7311999;
c_7310296.elements[0] = ((closureN)self_735084)->elements[0];


pair_type local_7312002; 
return_direct_with_clo1(data,(closure)&c_7310296,__lambda_767,  set_cell_as_expr(&local_7312002, loop_73577_732150_732818));; 
}

static void __lambda_767(void *data, object self_735085, int argc, object *args) /* object self_735085, object loop_73577_732150_732818 */
 {
 object loop_73577_732150_732818 = args[0];
  
closureN_type c_7310298;
object e_7311950 [2];
c_7310298.hdr.mark = gc_color_red;
 c_7310298.hdr.grayed = 0;
c_7310298.tag = closureN_tag;
 c_7310298.fn = (function_type)__lambda_489;
c_7310298.num_args = 1;
c_7310298.num_elements = 2;
c_7310298.elements = (object *)e_7311950;
c_7310298.elements[0] = ((closureN)self_735085)->elements[0];
c_7310298.elements[1] = loop_73577_732150_732818;


closureN_type c_7311951;
object e_7311998 [1];
c_7311951.hdr.mark = gc_color_red;
 c_7311951.hdr.grayed = 0;
c_7311951.tag = closureN_tag;
 c_7311951.fn = (function_type)__lambda_703;
c_7311951.num_args = 3;
c_7311951.num_elements = 1;
c_7311951.elements = (object *)e_7311998;
c_7311951.elements[0] = loop_73577_732150_732818;

return_direct_with_clo1(data,(closure)&c_7310298,__lambda_489,  &c_7311951);; 
}

static void __lambda_703(void *data, object self_735086, int argc, object *args) /* object self_735086, object k_734534, object vec_73578_732151_732819, object i_73579_732152_732820, object j_73580_732153_732821 */
 {
 object k_734534 = args[0]; object vec_73578_732151_732819 = args[1]; object i_73579_732152_732820 = args[2]; object j_73580_732153_732821 = args[3];
    
if( (boolean_f != Cyc_num_fast_lte_op(data, i_73579_732152_732820, j_73580_732153_732821)) ){ 
  
closureN_type c_7311955;
object e_7311994 [5];
c_7311955.hdr.mark = gc_color_red;
 c_7311955.hdr.grayed = 0;
c_7311955.tag = closureN_tag;
 c_7311955.fn = (function_type)__lambda_704;
c_7311955.num_args = 1;
c_7311955.num_elements = 5;
c_7311955.elements = (object *)e_7311994;
c_7311955.elements[0] = i_73579_732152_732820;
c_7311955.elements[1] = j_73580_732153_732821;
c_7311955.elements[2] = k_734534;
c_7311955.elements[3] = ((closureN)self_735086)->elements[0];
c_7311955.elements[4] = vec_73578_732151_732819;



return_direct_with_clo1(data,(closure)&c_7311955,__lambda_704,  Cyc_vector_ref(data, vec_73578_732151_732819, i_73579_732152_732820));
} else { 
  return_direct_with_clo1(data,  k_734534, (((closure)  k_734534)->fn),  boolean_f);}
;; 
}

static void __lambda_704(void *data, object self_735087, int argc, object *args) /* object self_735087, object v_73584_732154_732822 */
 {
 object v_73584_732154_732822 = args[0];
  
closureN_type c_7311957;
object e_7311989 [6];
c_7311957.hdr.mark = gc_color_red;
 c_7311957.hdr.grayed = 0;
c_7311957.tag = closureN_tag;
 c_7311957.fn = (function_type)__lambda_705;
c_7311957.num_args = 1;
c_7311957.num_elements = 6;
c_7311957.elements = (object *)e_7311989;
c_7311957.elements[0] = ((closureN)self_735087)->elements[0];
c_7311957.elements[1] = ((closureN)self_735087)->elements[1];
c_7311957.elements[2] = ((closureN)self_735087)->elements[2];
c_7311957.elements[3] = ((closureN)self_735087)->elements[3];
c_7311957.elements[4] = v_73584_732154_732822;
c_7311957.elements[5] = ((closureN)self_735087)->elements[4];



return_direct_with_clo1(data,(closure)&c_7311957,__lambda_705,  Cyc_vector_ref(data, ((closureN)self_735087)->elements[4], ((closureN)self_735087)->elements[1]));; 
}

static void __lambda_705(void *data, object self_735088, int argc, object *args) /* object self_735088, object r_734541 */
 {
 object r_734541 = args[0];
  
closureN_type c_7311959;
object e_7311983 [6];
c_7311959.hdr.mark = gc_color_red;
 c_7311959.hdr.grayed = 0;
c_7311959.tag = closureN_tag;
 c_7311959.fn = (function_type)__lambda_706;
c_7311959.num_args = 1;
c_7311959.num_elements = 6;
c_7311959.elements = (object *)e_7311983;
c_7311959.elements[0] = ((closureN)self_735088)->elements[0];
c_7311959.elements[1] = ((closureN)self_735088)->elements[1];
c_7311959.elements[2] = ((closureN)self_735088)->elements[2];
c_7311959.elements[3] = ((closureN)self_735088)->elements[3];
c_7311959.elements[4] = ((closureN)self_735088)->elements[4];
c_7311959.elements[5] = ((closureN)self_735088)->elements[5];


object c_7311986 = Cyc_vector_set_cps(data,(closure)&c_7311959,((closureN)self_735088)->elements[5], ((closureN)self_735088)->elements[0], r_734541);
return_closcall1(data,(closure)&c_7311959,  c_7311986);; 
}

static void __lambda_706(void *data, object self_735089, int argc, object *args) /* object self_735089, object r_734537 */
 {

  
closureN_type c_7311961;
object e_7311976 [5];
c_7311961.hdr.mark = gc_color_red;
 c_7311961.hdr.grayed = 0;
c_7311961.tag = closureN_tag;
 c_7311961.fn = (function_type)__lambda_707;
c_7311961.num_args = 1;
c_7311961.num_elements = 5;
c_7311961.elements = (object *)e_7311976;
c_7311961.elements[0] = ((closureN)self_735089)->elements[0];
c_7311961.elements[1] = ((closureN)self_735089)->elements[1];
c_7311961.elements[2] = ((closureN)self_735089)->elements[2];
c_7311961.elements[3] = ((closureN)self_735089)->elements[3];
c_7311961.elements[4] = ((closureN)self_735089)->elements[5];


object c_7311979 = Cyc_vector_set_cps(data,(closure)&c_7311961,((closureN)self_735089)->elements[5], ((closureN)self_735089)->elements[1], ((closureN)self_735089)->elements[4]);
return_closcall1(data,(closure)&c_7311961,  c_7311979);; 
}

static void __lambda_707(void *data, object self_735090, int argc, object *args) /* object self_735090, object r_734538 */
 {

  


complex_num_type local_7311970; 

complex_num_type local_7311974; 
return_closcall4(data,  car(((closureN)self_735090)->elements[3]),  ((closureN)self_735090)->elements[2], ((closureN)self_735090)->elements[4], Cyc_fast_sum(data,&local_7311970, ((closureN)self_735090)->elements[0], obj_int2obj(1)), Cyc_fast_sub(data,&local_7311974, ((closureN)self_735090)->elements[1], obj_int2obj(1)));; 
}

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



return_direct_with_clo1(data,(closure)&c_7310300,__lambda_490,  Cyc_set_cell(data, ((closureN)self_735091)->elements[1], r_734533));; 
}

static void __lambda_490(void *data, object self_735092, int argc, object *args) /* object self_735092, object r_734530 */
 {

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


closureN_type c_7311937;
object e_7311945 [1];
c_7311937.hdr.mark = gc_color_red;
 c_7311937.hdr.grayed = 0;
c_7311937.tag = closureN_tag;
 c_7311937.fn = (function_type)__lambda_702;
c_7311937.num_args = 3;
c_7311937.num_elements = 1;
c_7311937.elements = (object *)e_7311945;
c_7311937.elements[0] = ((closureN)self_735092)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310302,__lambda_491,  &c_7311937);; 
}

static void __lambda_702(void *data, object self_735093, int argc, object *args) /* object self_735093, object k_734531, object vec_73585_732155_732823, object start_73586_732156_732824, object end_73587_732157_732825 */
 {
 object k_734531 = args[0]; object vec_73585_732155_732823 = args[1]; object start_73586_732156_732824 = args[2]; object end_73587_732157_732825 = args[3];
  


complex_num_type local_7311944; 
return_closcall4(data,  car(((closureN)self_735093)->elements[0]),  k_734531, vec_73585_732155_732823, start_73586_732156_732824, Cyc_fast_sub(data,&local_7311944, end_73587_732157_732825, obj_int2obj(1)));; 
}

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


object c_7311935 = global_set_cps_id(data,(closure)&c_7310304,"__glo__75vector_91reverse_67_srfi_133", __glo__75vector_91reverse_67_srfi_133, r_734529);
return_closcall1(data,(closure)&c_7310304,  c_7311935);; 
}

static void __lambda_492(void *data, object self_735095, int argc, object *args) /* object self_735095, object r_734258 */
 {

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

return_direct_with_clo1(data,(closure)&c_7310306,__lambda_493,  boolean_f);; 
}

static void __lambda_493(void *data, object self_735096, int argc, object *args) /* object self_735096, object loop_73588_732158_732826 */
 {
 object loop_73588_732158_732826 = args[0];
  
closureN_type c_7310308;
object e_7311927 [1];
c_7310308.hdr.mark = gc_color_red;
 c_7310308.hdr.grayed = 0;
c_7310308.tag = closureN_tag;
 c_7310308.fn = (function_type)__lambda_766;
c_7310308.num_args = 1;
c_7310308.num_elements = 1;
c_7310308.elements = (object *)e_7311927;
c_7310308.elements[0] = ((closureN)self_735096)->elements[0];


pair_type local_7311930; 
return_direct_with_clo1(data,(closure)&c_7310308,__lambda_766,  set_cell_as_expr(&local_7311930, loop_73588_732158_732826));; 
}

static void __lambda_766(void *data, object self_735097, int argc, object *args) /* object self_735097, object loop_73588_732158_732826 */
 {
 object loop_73588_732158_732826 = args[0];
  
closureN_type c_7310310;
object e_7311899 [2];
c_7310310.hdr.mark = gc_color_red;
 c_7310310.hdr.grayed = 0;
c_7310310.tag = closureN_tag;
 c_7310310.fn = (function_type)__lambda_494;
c_7310310.num_args = 1;
c_7310310.num_elements = 2;
c_7310310.elements = (object *)e_7311899;
c_7310310.elements[0] = ((closureN)self_735097)->elements[0];
c_7310310.elements[1] = loop_73588_732158_732826;


closureN_type c_7311900;
object e_7311926 [1];
c_7311900.hdr.mark = gc_color_red;
 c_7311900.hdr.grayed = 0;
c_7311900.tag = closureN_tag;
 c_7311900.fn = (function_type)__lambda_699;
c_7311900.num_args = 5;
c_7311900.num_elements = 1;
c_7311900.elements = (object *)e_7311926;
c_7311900.elements[0] = loop_73588_732158_732826;

return_direct_with_clo1(data,(closure)&c_7310310,__lambda_494,  &c_7311900);; 
}

static void __lambda_699(void *data, object self_735098, int argc, object *args) /* object self_735098, object k_734524, object kons_73589_732159_732827, object knil_73590_732160_732828, object len_73591_732161_732829, object vec_73592_732162_732830, object i_73593_732163_732831 */
 {
 object k_734524 = args[0]; object kons_73589_732159_732827 = args[1]; object knil_73590_732160_732828 = args[2]; object len_73591_732161_732829 = args[3]; object vec_73592_732162_732830 = args[4]; object i_73593_732163_732831 = args[5];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, i_73593_732163_732831, len_73591_732161_732829)) ){ 
  return_direct_with_clo1(data,  k_734524, (((closure)  k_734524)->fn),  knil_73590_732160_732828);
} else { 
  
closureN_type c_7311905;
object e_7311923 [7];
c_7311905.hdr.mark = gc_color_red;
 c_7311905.hdr.grayed = 0;
c_7311905.tag = closureN_tag;
 c_7311905.fn = (function_type)__lambda_700;
c_7311905.num_args = 1;
c_7311905.num_elements = 7;
c_7311905.elements = (object *)e_7311923;
c_7311905.elements[0] = i_73593_732163_732831;
c_7311905.elements[1] = k_734524;
c_7311905.elements[2] = knil_73590_732160_732828;
c_7311905.elements[3] = kons_73589_732159_732827;
c_7311905.elements[4] = len_73591_732161_732829;
c_7311905.elements[5] = ((closureN)self_735098)->elements[0];
c_7311905.elements[6] = vec_73592_732162_732830;



return_direct_with_clo1(data,(closure)&c_7311905,__lambda_700,  Cyc_vector_ref(data, vec_73592_732162_732830, i_73593_732163_732831));}
;; 
}

static void __lambda_700(void *data, object self_735099, int argc, object *args) /* object self_735099, object r_734528 */
 {
 object r_734528 = args[0];
  
closureN_type c_7311908;
object e_7311921 [6];
c_7311908.hdr.mark = gc_color_red;
 c_7311908.hdr.grayed = 0;
c_7311908.tag = closureN_tag;
 c_7311908.fn = (function_type)__lambda_701;
c_7311908.num_args = 1;
c_7311908.num_elements = 6;
c_7311908.elements = (object *)e_7311921;
c_7311908.elements[0] = ((closureN)self_735099)->elements[0];
c_7311908.elements[1] = ((closureN)self_735099)->elements[1];
c_7311908.elements[2] = ((closureN)self_735099)->elements[3];
c_7311908.elements[3] = ((closureN)self_735099)->elements[4];
c_7311908.elements[4] = ((closureN)self_735099)->elements[5];
c_7311908.elements[5] = ((closureN)self_735099)->elements[6];

return_closcall3(data,  ((closureN)self_735099)->elements[3],  &c_7311908, ((closureN)self_735099)->elements[2], r_734528);; 
}

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


complex_num_type local_7311919; 
return_closcall6(data,  car(((closureN)self_735100)->elements[4]),  ((closureN)self_735100)->elements[1], ((closureN)self_735100)->elements[2], r_734526, ((closureN)self_735100)->elements[3], ((closureN)self_735100)->elements[5], Cyc_fast_sum(data,&local_7311919, ((closureN)self_735100)->elements[0], obj_int2obj(1)));; 
}

static void __lambda_494(void *data, object self_735101, int argc, object *args) /* object self_735101, object r_734523 */
 {
 object r_734523 = args[0];
  
closureN_type c_7310312;
object e_7311895 [2];
c_7310312.hdr.mark = gc_color_red;
 c_7310312.hdr.grayed = 0;
c_7310312.tag = closureN_tag;
 c_7310312.fn = (function_type)__lambda_495;
c_7310312.num_args = 1;
c_7310312.num_elements = 2;
c_7310312.elements = (object *)e_7311895;
c_7310312.elements[0] = ((closureN)self_735101)->elements[0];
c_7310312.elements[1] = ((closureN)self_735101)->elements[1];



return_direct_with_clo1(data,(closure)&c_7310312,__lambda_495,  Cyc_set_cell(data, ((closureN)self_735101)->elements[1], r_734523));; 
}

static void __lambda_495(void *data, object self_735102, int argc, object *args) /* object self_735102, object r_734521 */
 {

  
closureN_type c_7310314;
object e_7311888 [1];
c_7310314.hdr.mark = gc_color_red;
 c_7310314.hdr.grayed = 0;
c_7310314.tag = closureN_tag;
 c_7310314.fn = (function_type)__lambda_496;
c_7310314.num_args = 1;
c_7310314.num_elements = 1;
c_7310314.elements = (object *)e_7311888;
c_7310314.elements[0] = ((closureN)self_735102)->elements[0];


closureN_type c_7311889;
object e_7311894 [1];
c_7311889.hdr.mark = gc_color_red;
 c_7311889.hdr.grayed = 0;
c_7311889.tag = closureN_tag;
 c_7311889.fn = (function_type)__lambda_698;
c_7311889.num_args = 4;
c_7311889.num_elements = 1;
c_7311889.elements = (object *)e_7311894;
c_7311889.elements[0] = ((closureN)self_735102)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310314,__lambda_496,  &c_7311889);; 
}

static void __lambda_698(void *data, object self_735103, int argc, object *args) /* object self_735103, object k_734522, object kons_73594_732164_732832, object knil_73595_732165_732833, object len_73596_732166_732834, object vec_73597_732167_732835 */
 {
 object k_734522 = args[0]; object kons_73594_732164_732832 = args[1]; object knil_73595_732165_732833 = args[2]; object len_73596_732166_732834 = args[3]; object vec_73597_732167_732835 = args[4];
  

return_closcall6(data,  car(((closureN)self_735103)->elements[0]),  k_734522, kons_73594_732164_732832, knil_73595_732165_732833, len_73596_732166_732834, vec_73597_732167_732835, obj_int2obj(0));; 
}

static void __lambda_496(void *data, object self_735104, int argc, object *args) /* object self_735104, object r_734520 */
 {
 object r_734520 = args[0];
  
closureN_type c_7310316;
object e_7311884 [1];
c_7310316.hdr.mark = gc_color_red;
 c_7310316.hdr.grayed = 0;
c_7310316.tag = closureN_tag;
 c_7310316.fn = (function_type)__lambda_497;
c_7310316.num_args = 1;
c_7310316.num_elements = 1;
c_7310316.elements = (object *)e_7311884;
c_7310316.elements[0] = ((closureN)self_735104)->elements[0];


object c_7311887 = global_set_cps_id(data,(closure)&c_7310316,"__glo__75vector_91fold1_srfi_133", __glo__75vector_91fold1_srfi_133, r_734520);
return_closcall1(data,(closure)&c_7310316,  c_7311887);; 
}

static void __lambda_497(void *data, object self_735105, int argc, object *args) /* object self_735105, object r_734259 */
 {

  
closureN_type c_7310318;
object e_7311883 [1];
c_7310318.hdr.mark = gc_color_red;
 c_7310318.hdr.grayed = 0;
c_7310318.tag = closureN_tag;
 c_7310318.fn = (function_type)__lambda_498;
c_7310318.num_args = 1;
c_7310318.num_elements = 1;
c_7310318.elements = (object *)e_7311883;
c_7310318.elements[0] = ((closureN)self_735105)->elements[0];

return_direct_with_clo1(data,(closure)&c_7310318,__lambda_498,  boolean_f);; 
}

static void __lambda_498(void *data, object self_735106, int argc, object *args) /* object self_735106, object loop_73598_732168_732836 */
 {
 object loop_73598_732168_732836 = args[0];
  
closureN_type c_7310320;
object e_7311879 [1];
c_7310320.hdr.mark = gc_color_red;
 c_7310320.hdr.grayed = 0;
c_7310320.tag = closureN_tag;
 c_7310320.fn = (function_type)__lambda_765;
c_7310320.num_args = 1;
c_7310320.num_elements = 1;
c_7310320.elements = (object *)e_7311879;
c_7310320.elements[0] = ((closureN)self_735106)->elements[0];


pair_type local_7311882; 
return_direct_with_clo1(data,(closure)&c_7310320,__lambda_765,  set_cell_as_expr(&local_7311882, loop_73598_732168_732836));; 
}

static void __lambda_765(void *data, object self_735107, int argc, object *args) /* object self_735107, object loop_73598_732168_732836 */
 {
 object loop_73598_732168_732836 = args[0];
  
closureN_type c_7310322;
object e_7311850 [2];
c_7310322.hdr.mark = gc_color_red;
 c_7310322.hdr.grayed = 0;
c_7310322.tag = closureN_tag;
 c_7310322.fn = (function_type)__lambda_499;
c_7310322.num_args = 1;
c_7310322.num_elements = 2;
c_7310322.elements = (object *)e_7311850;
c_7310322.elements[0] = ((closureN)self_735107)->elements[0];
c_7310322.elements[1] = loop_73598_732168_732836;


closureN_type c_7311851;
object e_7311878 [1];
c_7311851.hdr.mark = gc_color_red;
 c_7311851.hdr.grayed = 0;
c_7311851.tag = closureN_tag;
 c_7311851.fn = (function_type)__lambda_695;
c_7311851.num_args = 5;
c_7311851.num_elements = 1;
c_7311851.elements = (object *)e_7311878;
c_7311851.elements[0] = loop_73598_732168_732836;

return_direct_with_clo1(data,(closure)&c_7310322,__lambda_499,  &c_7311851);; 
}

static void __lambda_695(void *data, object self_735108, int argc, object *args) /* object self_735108, object k_734515, object kons_73599_732169_732837, object knil_73600_732170_732838, object len_73601_732171_732839, object vectors_73602_732172_732840, object i_73603_732173_732841 */
 {
 object k_734515 = args[0]; object kons_73599_732169_732837 = args[1]; object knil_73600_732170_732838 = args[2]; object len_73601_732171_732839 = args[3]; object vectors_73602_732172_732840 = args[4]; object i_73603_732173_732841 = args[5];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, i_73603_732173_732841, len_73601_732171_732839)) ){ 
  return_direct_with_clo1(data,  k_734515, (((closure)  k_734515)->fn),  knil_73600_732170_732838);
} else { 
  
closureN_type c_7311856;
object e_7311877 [7];
c_7311856.hdr.mark = gc_color_red;
 c_7311856.hdr.grayed = 0;
c_7311856.tag = closureN_tag;
 c_7311856.fn = (function_type)__lambda_696;
c_7311856.num_args = 1;
c_7311856.num_elements = 7;
c_7311856.elements = (object *)e_7311877;
c_7311856.elements[0] = i_73603_732173_732841;
c_7311856.elements[1] = k_734515;
c_7311856.elements[2] = knil_73600_732170_732838;
c_7311856.elements[3] = kons_73599_732169_732837;
c_7311856.elements[4] = len_73601_732171_732839;
c_7311856.elements[5] = ((closureN)self_735108)->elements[0];
c_7311856.elements[6] = vectors_73602_732172_732840;

return_direct_with_clo3(data,  __glo_vectors_91ref_srfi_133, (((closure)  __glo_vectors_91ref_srfi_133)->fn),  &c_7311856, vectors_73602_732172_732840, i_73603_732173_732841);}
;; 
}

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


object c_7311874 = apply_va(data,(closure)&c_7311858,3,((closureN)self_735109)->elements[3], ((closureN)self_735109)->elements[2], r_734519);
return_closcall1(data,(closure)&c_7311858,  c_7311874);; 
}

static void __lambda_697(void *data, object self_735110, int argc, object *args) /* object self_735110, object r_734517 */
 {
 object r_734517 = args[0];
  


complex_num_type local_7311869; 
return_closcall6(data,  car(((closureN)self_735110)->elements[4]),  ((closureN)self_735110)->elements[1], ((closureN)self_735110)->elements[2], r_734517, ((closureN)self_735110)->elements[3], ((closureN)self_735110)->elements[5], Cyc_fast_sum(data,&local_7311869, ((closureN)self_735110)->elements[0], obj_int2obj(1)));; 
}

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



return_direct_with_clo1(data,(closure)&c_7310324,__lambda_500,  Cyc_set_cell(data, ((closureN)self_735111)->elements[1], r_734514));; 
}

static void __lambda_500(void *data, object self_735112, int argc, object *args) /* object self_735112, object r_734512 */
 {

  
closureN_type c_7310326;
object e_7311839 [1];
c_7310326.hdr.mark = gc_color_red;
 c_7310326.hdr.grayed = 0;
c_7310326.tag = closureN_tag;
 c_7310326.fn = (function_type)__lambda_501;
c_7310326.num_args = 1;
c_7310326.num_elements = 1;
c_7310326.elements = (object *)e_7311839;
c_7310326.elements[0] = ((closureN)self_735112)->elements[0];


closureN_type c_7311840;
object e_7311845 [1];
c_7311840.hdr.mark = gc_color_red;
 c_7311840.hdr.grayed = 0;
c_7311840.tag = closureN_tag;
 c_7311840.fn = (function_type)__lambda_694;
c_7311840.num_args = 4;
c_7311840.num_elements = 1;
c_7311840.elements = (object *)e_7311845;
c_7311840.elements[0] = ((closureN)self_735112)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310326,__lambda_501,  &c_7311840);; 
}

static void __lambda_694(void *data, object self_735113, int argc, object *args) /* object self_735113, object k_734513, object kons_73604_732174_732842, object knil_73605_732175_732843, object len_73606_732176_732844, object vectors_73607_732177_732845 */
 {
 object k_734513 = args[0]; object kons_73604_732174_732842 = args[1]; object knil_73605_732175_732843 = args[2]; object len_73606_732176_732844 = args[3]; object vectors_73607_732177_732845 = args[4];
  

return_closcall6(data,  car(((closureN)self_735113)->elements[0]),  k_734513, kons_73604_732174_732842, knil_73605_732175_732843, len_73606_732176_732844, vectors_73607_732177_732845, obj_int2obj(0));; 
}

static void __lambda_501(void *data, object self_735114, int argc, object *args) /* object self_735114, object r_734511 */
 {
 object r_734511 = args[0];
  
closureN_type c_7310328;
object e_7311835 [1];
c_7310328.hdr.mark = gc_color_red;
 c_7310328.hdr.grayed = 0;
c_7310328.tag = closureN_tag;
 c_7310328.fn = (function_type)__lambda_502;
c_7310328.num_args = 1;
c_7310328.num_elements = 1;
c_7310328.elements = (object *)e_7311835;
c_7310328.elements[0] = ((closureN)self_735114)->elements[0];


object c_7311838 = global_set_cps_id(data,(closure)&c_7310328,"__glo__75vector_91fold2_87_srfi_133", __glo__75vector_91fold2_87_srfi_133, r_734511);
return_closcall1(data,(closure)&c_7310328,  c_7311838);; 
}

static void __lambda_502(void *data, object self_735115, int argc, object *args) /* object self_735115, object r_734260 */
 {

  
closureN_type c_7310330;
object e_7311834 [1];
c_7310330.hdr.mark = gc_color_red;
 c_7310330.hdr.grayed = 0;
c_7310330.tag = closureN_tag;
 c_7310330.fn = (function_type)__lambda_503;
c_7310330.num_args = 1;
c_7310330.num_elements = 1;
c_7310330.elements = (object *)e_7311834;
c_7310330.elements[0] = ((closureN)self_735115)->elements[0];

return_direct_with_clo1(data,(closure)&c_7310330,__lambda_503,  boolean_f);; 
}

static void __lambda_503(void *data, object self_735116, int argc, object *args) /* object self_735116, object loop_73608_732178_732846 */
 {
 object loop_73608_732178_732846 = args[0];
  
closureN_type c_7310332;
object e_7311830 [1];
c_7310332.hdr.mark = gc_color_red;
 c_7310332.hdr.grayed = 0;
c_7310332.tag = closureN_tag;
 c_7310332.fn = (function_type)__lambda_764;
c_7310332.num_args = 1;
c_7310332.num_elements = 1;
c_7310332.elements = (object *)e_7311830;
c_7310332.elements[0] = ((closureN)self_735116)->elements[0];


pair_type local_7311833; 
return_direct_with_clo1(data,(closure)&c_7310332,__lambda_764,  set_cell_as_expr(&local_7311833, loop_73608_732178_732846));; 
}

static void __lambda_764(void *data, object self_735117, int argc, object *args) /* object self_735117, object loop_73608_732178_732846 */
 {
 object loop_73608_732178_732846 = args[0];
  
closureN_type c_7310334;
object e_7311788 [2];
c_7310334.hdr.mark = gc_color_red;
 c_7310334.hdr.grayed = 0;
c_7310334.tag = closureN_tag;
 c_7310334.fn = (function_type)__lambda_504;
c_7310334.num_args = 1;
c_7310334.num_elements = 2;
c_7310334.elements = (object *)e_7311788;
c_7310334.elements[0] = ((closureN)self_735117)->elements[0];
c_7310334.elements[1] = loop_73608_732178_732846;


closureN_type c_7311789;
object e_7311829 [1];
c_7311789.hdr.mark = gc_color_red;
 c_7311789.hdr.grayed = 0;
c_7311789.tag = closureN_tag;
 c_7311789.fn = (function_type)__lambda_690;
c_7311789.num_args = 4;
c_7311789.num_elements = 1;
c_7311789.elements = (object *)e_7311829;
c_7311789.elements[0] = loop_73608_732178_732846;

return_direct_with_clo1(data,(closure)&c_7310334,__lambda_504,  &c_7311789);; 
}

static void __lambda_690(void *data, object self_735118, int argc, object *args) /* object self_735118, object k_734505, object f_73609_732179_732847, object target_73610_732180_732848, object vec_73611_732181_732849, object i_73612_732182_732850 */
 {
 object k_734505 = args[0]; object f_73609_732179_732847 = args[1]; object target_73610_732180_732848 = args[2]; object vec_73611_732181_732849 = args[3]; object i_73612_732182_732850 = args[4];
    complex_num_type local_7311792; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_zero_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7311792, i_73612_732182_732850)) ){ 
  return_direct_with_clo1(data,  k_734505, (((closure)  k_734505)->fn),  target_73610_732180_732848);
} else { 
  
closureN_type c_7311795;
object e_7311823 [6];
c_7311795.hdr.mark = gc_color_red;
 c_7311795.hdr.grayed = 0;
c_7311795.tag = closureN_tag;
 c_7311795.fn = (function_type)__lambda_691;
c_7311795.num_args = 1;
c_7311795.num_elements = 6;
c_7311795.elements = (object *)e_7311823;
c_7311795.elements[0] = f_73609_732179_732847;
c_7311795.elements[1] = i_73612_732182_732850;
c_7311795.elements[2] = k_734505;
c_7311795.elements[3] = ((closureN)self_735118)->elements[0];
c_7311795.elements[4] = target_73610_732180_732848;
c_7311795.elements[5] = vec_73611_732181_732849;




complex_num_type local_7311828; 
return_direct_with_clo1(data,(closure)&c_7311795,__lambda_691,  Cyc_vector_ref(data, vec_73611_732181_732849, Cyc_fast_sub(data,&local_7311828, i_73612_732182_732850, obj_int2obj(1))));}
;; 
}

static void __lambda_691(void *data, object self_735119, int argc, object *args) /* object self_735119, object r_734510 */
 {
 object r_734510 = args[0];
  
closureN_type c_7311798;
object e_7311822 [6];
c_7311798.hdr.mark = gc_color_red;
 c_7311798.hdr.grayed = 0;
c_7311798.tag = closureN_tag;
 c_7311798.fn = (function_type)__lambda_692;
c_7311798.num_args = 1;
c_7311798.num_elements = 6;
c_7311798.elements = (object *)e_7311822;
c_7311798.elements[0] = ((closureN)self_735119)->elements[0];
c_7311798.elements[1] = ((closureN)self_735119)->elements[1];
c_7311798.elements[2] = ((closureN)self_735119)->elements[2];
c_7311798.elements[3] = ((closureN)self_735119)->elements[3];
c_7311798.elements[4] = ((closureN)self_735119)->elements[4];
c_7311798.elements[5] = ((closureN)self_735119)->elements[5];

return_closcall2(data,  ((closureN)self_735119)->elements[0],  &c_7311798, r_734510);; 
}

static void __lambda_692(void *data, object self_735120, int argc, object *args) /* object self_735120, object r_734509 */
 {
 object r_734509 = args[0];
  
closureN_type c_7311800;
object e_7311813 [6];
c_7311800.hdr.mark = gc_color_red;
 c_7311800.hdr.grayed = 0;
c_7311800.tag = closureN_tag;
 c_7311800.fn = (function_type)__lambda_693;
c_7311800.num_args = 1;
c_7311800.num_elements = 6;
c_7311800.elements = (object *)e_7311813;
c_7311800.elements[0] = ((closureN)self_735120)->elements[0];
c_7311800.elements[1] = ((closureN)self_735120)->elements[1];
c_7311800.elements[2] = ((closureN)self_735120)->elements[2];
c_7311800.elements[3] = ((closureN)self_735120)->elements[3];
c_7311800.elements[4] = ((closureN)self_735120)->elements[4];
c_7311800.elements[5] = ((closureN)self_735120)->elements[5];


complex_num_type local_7311820; 

object c_7311816 = Cyc_vector_set_cps(data,(closure)&c_7311800,((closureN)self_735120)->elements[4], Cyc_fast_sub(data,&local_7311820, ((closureN)self_735120)->elements[1], obj_int2obj(1)), r_734509);
return_closcall1(data,(closure)&c_7311800,  c_7311816);; 
}

static void __lambda_693(void *data, object self_735121, int argc, object *args) /* object self_735121, object r_734508 */
 {

  


complex_num_type local_7311811; 
return_closcall5(data,  car(((closureN)self_735121)->elements[3]),  ((closureN)self_735121)->elements[2], ((closureN)self_735121)->elements[0], ((closureN)self_735121)->elements[4], ((closureN)self_735121)->elements[5], Cyc_fast_sub(data,&local_7311811, ((closureN)self_735121)->elements[1], obj_int2obj(1)));; 
}

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



return_direct_with_clo1(data,(closure)&c_7310336,__lambda_505,  Cyc_set_cell(data, ((closureN)self_735122)->elements[1], r_734504));; 
}

static void __lambda_505(void *data, object self_735123, int argc, object *args) /* object self_735123, object r_734502 */
 {

  
closureN_type c_7310338;
object e_7311777 [1];
c_7310338.hdr.mark = gc_color_red;
 c_7310338.hdr.grayed = 0;
c_7310338.tag = closureN_tag;
 c_7310338.fn = (function_type)__lambda_506;
c_7310338.num_args = 1;
c_7310338.num_elements = 1;
c_7310338.elements = (object *)e_7311777;
c_7310338.elements[0] = ((closureN)self_735123)->elements[0];


closureN_type c_7311778;
object e_7311783 [1];
c_7311778.hdr.mark = gc_color_red;
 c_7311778.hdr.grayed = 0;
c_7311778.tag = closureN_tag;
 c_7311778.fn = (function_type)__lambda_689;
c_7311778.num_args = 4;
c_7311778.num_elements = 1;
c_7311778.elements = (object *)e_7311783;
c_7311778.elements[0] = ((closureN)self_735123)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310338,__lambda_506,  &c_7311778);; 
}

static void __lambda_689(void *data, object self_735124, int argc, object *args) /* object self_735124, object k_734503, object f_73614_732184_732852, object target_73615_732185_732853, object vec_73616_732186_732854, object len_73617_732187_732855 */
 {
 object k_734503 = args[0]; object f_73614_732184_732852 = args[1]; object target_73615_732185_732853 = args[2]; object vec_73616_732186_732854 = args[3]; object len_73617_732187_732855 = args[4];
  

return_closcall5(data,  car(((closureN)self_735124)->elements[0]),  k_734503, f_73614_732184_732852, target_73615_732185_732853, vec_73616_732186_732854, len_73617_732187_732855);; 
}

static void __lambda_506(void *data, object self_735125, int argc, object *args) /* object self_735125, object r_734501 */
 {
 object r_734501 = args[0];
  
closureN_type c_7310340;
object e_7311773 [1];
c_7310340.hdr.mark = gc_color_red;
 c_7310340.hdr.grayed = 0;
c_7310340.tag = closureN_tag;
 c_7310340.fn = (function_type)__lambda_507;
c_7310340.num_args = 1;
c_7310340.num_elements = 1;
c_7310340.elements = (object *)e_7311773;
c_7310340.elements[0] = ((closureN)self_735125)->elements[0];


object c_7311776 = global_set_cps_id(data,(closure)&c_7310340,"__glo__75vector_91map1_67_srfi_133", __glo__75vector_91map1_67_srfi_133, r_734501);
return_closcall1(data,(closure)&c_7310340,  c_7311776);; 
}

static void __lambda_507(void *data, object self_735126, int argc, object *args) /* object self_735126, object r_734261 */
 {

  
closureN_type c_7310342;
object e_7311772 [1];
c_7310342.hdr.mark = gc_color_red;
 c_7310342.hdr.grayed = 0;
c_7310342.tag = closureN_tag;
 c_7310342.fn = (function_type)__lambda_508;
c_7310342.num_args = 1;
c_7310342.num_elements = 1;
c_7310342.elements = (object *)e_7311772;
c_7310342.elements[0] = ((closureN)self_735126)->elements[0];

return_direct_with_clo1(data,(closure)&c_7310342,__lambda_508,  boolean_f);; 
}

static void __lambda_508(void *data, object self_735127, int argc, object *args) /* object self_735127, object loop_73618_732188_732856 */
 {
 object loop_73618_732188_732856 = args[0];
  
closureN_type c_7310344;
object e_7311768 [1];
c_7310344.hdr.mark = gc_color_red;
 c_7310344.hdr.grayed = 0;
c_7310344.tag = closureN_tag;
 c_7310344.fn = (function_type)__lambda_763;
c_7310344.num_args = 1;
c_7310344.num_elements = 1;
c_7310344.elements = (object *)e_7311768;
c_7310344.elements[0] = ((closureN)self_735127)->elements[0];


pair_type local_7311771; 
return_direct_with_clo1(data,(closure)&c_7310344,__lambda_763,  set_cell_as_expr(&local_7311771, loop_73618_732188_732856));; 
}

static void __lambda_763(void *data, object self_735128, int argc, object *args) /* object self_735128, object loop_73618_732188_732856 */
 {
 object loop_73618_732188_732856 = args[0];
  
closureN_type c_7310346;
object e_7311725 [2];
c_7310346.hdr.mark = gc_color_red;
 c_7310346.hdr.grayed = 0;
c_7310346.tag = closureN_tag;
 c_7310346.fn = (function_type)__lambda_509;
c_7310346.num_args = 1;
c_7310346.num_elements = 2;
c_7310346.elements = (object *)e_7311725;
c_7310346.elements[0] = ((closureN)self_735128)->elements[0];
c_7310346.elements[1] = loop_73618_732188_732856;


closureN_type c_7311726;
object e_7311767 [1];
c_7311726.hdr.mark = gc_color_red;
 c_7311726.hdr.grayed = 0;
c_7311726.tag = closureN_tag;
 c_7311726.fn = (function_type)__lambda_685;
c_7311726.num_args = 4;
c_7311726.num_elements = 1;
c_7311726.elements = (object *)e_7311767;
c_7311726.elements[0] = loop_73618_732188_732856;

return_direct_with_clo1(data,(closure)&c_7310346,__lambda_509,  &c_7311726);; 
}

static void __lambda_685(void *data, object self_735129, int argc, object *args) /* object self_735129, object k_734495, object f_73619_732189_732857, object target_73620_732190_732858, object vectors_73621_732191_732859, object i_73622_732192_732860 */
 {
 object k_734495 = args[0]; object f_73619_732189_732857 = args[1]; object target_73620_732190_732858 = args[2]; object vectors_73621_732191_732859 = args[3]; object i_73622_732192_732860 = args[4];
    complex_num_type local_7311729; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_zero_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7311729, i_73622_732192_732860)) ){ 
  return_direct_with_clo1(data,  k_734495, (((closure)  k_734495)->fn),  target_73620_732190_732858);
} else { 
  
closureN_type c_7311732;
object e_7311763 [6];
c_7311732.hdr.mark = gc_color_red;
 c_7311732.hdr.grayed = 0;
c_7311732.tag = closureN_tag;
 c_7311732.fn = (function_type)__lambda_686;
c_7311732.num_args = 1;
c_7311732.num_elements = 6;
c_7311732.elements = (object *)e_7311763;
c_7311732.elements[0] = f_73619_732189_732857;
c_7311732.elements[1] = i_73622_732192_732860;
c_7311732.elements[2] = k_734495;
c_7311732.elements[3] = ((closureN)self_735129)->elements[0];
c_7311732.elements[4] = target_73620_732190_732858;
c_7311732.elements[5] = vectors_73621_732191_732859;


complex_num_type local_7311766; 
return_direct_with_clo3(data,  __glo_vectors_91ref_srfi_133, (((closure)  __glo_vectors_91ref_srfi_133)->fn),  &c_7311732, vectors_73621_732191_732859, Cyc_fast_sub(data,&local_7311766, i_73622_732192_732860, obj_int2obj(1)));}
;; 
}

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


object c_7311761 = apply(data,(closure)&c_7311734,((closureN)self_735130)->elements[0], r_734500);
return_closcall1(data,(closure)&c_7311734,  c_7311761);; 
}

static void __lambda_687(void *data, object self_735131, int argc, object *args) /* object self_735131, object r_734499 */
 {
 object r_734499 = args[0];
  
closureN_type c_7311736;
object e_7311749 [6];
c_7311736.hdr.mark = gc_color_red;
 c_7311736.hdr.grayed = 0;
c_7311736.tag = closureN_tag;
 c_7311736.fn = (function_type)__lambda_688;
c_7311736.num_args = 1;
c_7311736.num_elements = 6;
c_7311736.elements = (object *)e_7311749;
c_7311736.elements[0] = ((closureN)self_735131)->elements[0];
c_7311736.elements[1] = ((closureN)self_735131)->elements[1];
c_7311736.elements[2] = ((closureN)self_735131)->elements[2];
c_7311736.elements[3] = ((closureN)self_735131)->elements[3];
c_7311736.elements[4] = ((closureN)self_735131)->elements[4];
c_7311736.elements[5] = ((closureN)self_735131)->elements[5];


complex_num_type local_7311756; 

object c_7311752 = Cyc_vector_set_cps(data,(closure)&c_7311736,((closureN)self_735131)->elements[4], Cyc_fast_sub(data,&local_7311756, ((closureN)self_735131)->elements[1], obj_int2obj(1)), r_734499);
return_closcall1(data,(closure)&c_7311736,  c_7311752);; 
}

static void __lambda_688(void *data, object self_735132, int argc, object *args) /* object self_735132, object r_734498 */
 {

  


complex_num_type local_7311747; 
return_closcall5(data,  car(((closureN)self_735132)->elements[3]),  ((closureN)self_735132)->elements[2], ((closureN)self_735132)->elements[0], ((closureN)self_735132)->elements[4], ((closureN)self_735132)->elements[5], Cyc_fast_sub(data,&local_7311747, ((closureN)self_735132)->elements[1], obj_int2obj(1)));; 
}

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



return_direct_with_clo1(data,(closure)&c_7310348,__lambda_510,  Cyc_set_cell(data, ((closureN)self_735133)->elements[1], r_734494));; 
}

static void __lambda_510(void *data, object self_735134, int argc, object *args) /* object self_735134, object r_734492 */
 {

  
closureN_type c_7310350;
object e_7311714 [1];
c_7310350.hdr.mark = gc_color_red;
 c_7310350.hdr.grayed = 0;
c_7310350.tag = closureN_tag;
 c_7310350.fn = (function_type)__lambda_511;
c_7310350.num_args = 1;
c_7310350.num_elements = 1;
c_7310350.elements = (object *)e_7311714;
c_7310350.elements[0] = ((closureN)self_735134)->elements[0];


closureN_type c_7311715;
object e_7311720 [1];
c_7311715.hdr.mark = gc_color_red;
 c_7311715.hdr.grayed = 0;
c_7311715.tag = closureN_tag;
 c_7311715.fn = (function_type)__lambda_684;
c_7311715.num_args = 4;
c_7311715.num_elements = 1;
c_7311715.elements = (object *)e_7311720;
c_7311715.elements[0] = ((closureN)self_735134)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310350,__lambda_511,  &c_7311715);; 
}

static void __lambda_684(void *data, object self_735135, int argc, object *args) /* object self_735135, object k_734493, object f_73624_732194_732862, object target_73625_732195_732863, object vectors_73626_732196_732864, object len_73627_732197_732865 */
 {
 object k_734493 = args[0]; object f_73624_732194_732862 = args[1]; object target_73625_732195_732863 = args[2]; object vectors_73626_732196_732864 = args[3]; object len_73627_732197_732865 = args[4];
  

return_closcall5(data,  car(((closureN)self_735135)->elements[0]),  k_734493, f_73624_732194_732862, target_73625_732195_732863, vectors_73626_732196_732864, len_73627_732197_732865);; 
}

static void __lambda_511(void *data, object self_735136, int argc, object *args) /* object self_735136, object r_734491 */
 {
 object r_734491 = args[0];
  
closureN_type c_7310352;
object e_7311710 [1];
c_7310352.hdr.mark = gc_color_red;
 c_7310352.hdr.grayed = 0;
c_7310352.tag = closureN_tag;
 c_7310352.fn = (function_type)__lambda_512;
c_7310352.num_args = 1;
c_7310352.num_elements = 1;
c_7310352.elements = (object *)e_7311710;
c_7310352.elements[0] = ((closureN)self_735136)->elements[0];


object c_7311713 = global_set_cps_id(data,(closure)&c_7310352,"__glo__75vector_91map2_87_67_srfi_133", __glo__75vector_91map2_87_67_srfi_133, r_734491);
return_closcall1(data,(closure)&c_7310352,  c_7311713);; 
}

static void __lambda_512(void *data, object self_735137, int argc, object *args) /* object self_735137, object r_734262 */
 {

  
closureN_type c_7310354;
object e_7311709 [1];
c_7310354.hdr.mark = gc_color_red;
 c_7310354.hdr.grayed = 0;
c_7310354.tag = closureN_tag;
 c_7310354.fn = (function_type)__lambda_513;
c_7310354.num_args = 3;
c_7310354.num_elements = 1;
c_7310354.elements = (object *)e_7311709;
c_7310354.elements[0] = ((closureN)self_735137)->elements[0];

return_direct_with_clo3(data,(closure)&c_7310354,__lambda_513,  boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_513(void *data, object self_735138, int argc, object *args) /* object self_735138, object tabulate_67_73631_732198_732866, object unfold1_67_73632_732199_732867, object unfold2_87_67_73633_732200_732868 */
 {
 object tabulate_67_73631_732198_732866 = args[0]; object unfold1_67_73632_732199_732867 = args[1]; object unfold2_87_67_73633_732200_732868 = args[2];
  
closureN_type c_7310356;
object e_7311705 [3];
c_7310356.hdr.mark = gc_color_red;
 c_7310356.hdr.grayed = 0;
c_7310356.tag = closureN_tag;
 c_7310356.fn = (function_type)__lambda_762;
c_7310356.num_args = 1;
c_7310356.num_elements = 3;
c_7310356.elements = (object *)e_7311705;
c_7310356.elements[0] = ((closureN)self_735138)->elements[0];
c_7310356.elements[1] = unfold1_67_73632_732199_732867;
c_7310356.elements[2] = unfold2_87_67_73633_732200_732868;


pair_type local_7311708; 
return_direct_with_clo1(data,(closure)&c_7310356,__lambda_762,  set_cell_as_expr(&local_7311708, tabulate_67_73631_732198_732866));; 
}

static void __lambda_762(void *data, object self_735139, int argc, object *args) /* object self_735139, object tabulate_67_73631_732198_732866 */
 {
 object tabulate_67_73631_732198_732866 = args[0];
  
closureN_type c_7310358;
object e_7311700 [3];
c_7310358.hdr.mark = gc_color_red;
 c_7310358.hdr.grayed = 0;
c_7310358.tag = closureN_tag;
 c_7310358.fn = (function_type)__lambda_761;
c_7310358.num_args = 1;
c_7310358.num_elements = 3;
c_7310358.elements = (object *)e_7311700;
c_7310358.elements[0] = ((closureN)self_735139)->elements[0];
c_7310358.elements[1] = tabulate_67_73631_732198_732866;
c_7310358.elements[2] = ((closureN)self_735139)->elements[2];


pair_type local_7311703; 
return_direct_with_clo1(data,(closure)&c_7310358,__lambda_761,  set_cell_as_expr(&local_7311703, ((closureN)self_735139)->elements[1]));; 
}

static void __lambda_761(void *data, object self_735140, int argc, object *args) /* object self_735140, object unfold1_67_73632_732199_732867 */
 {
 object unfold1_67_73632_732199_732867 = args[0];
  
closureN_type c_7310360;
object e_7311695 [3];
c_7310360.hdr.mark = gc_color_red;
 c_7310360.hdr.grayed = 0;
c_7310360.tag = closureN_tag;
 c_7310360.fn = (function_type)__lambda_760;
c_7310360.num_args = 1;
c_7310360.num_elements = 3;
c_7310360.elements = (object *)e_7311695;
c_7310360.elements[0] = ((closureN)self_735140)->elements[0];
c_7310360.elements[1] = ((closureN)self_735140)->elements[1];
c_7310360.elements[2] = unfold1_67_73632_732199_732867;


pair_type local_7311698; 
return_direct_with_clo1(data,(closure)&c_7310360,__lambda_760,  set_cell_as_expr(&local_7311698, ((closureN)self_735140)->elements[2]));; 
}

static void __lambda_760(void *data, object self_735141, int argc, object *args) /* object self_735141, object unfold2_87_67_73633_732200_732868 */
 {
 object unfold2_87_67_73633_732200_732868 = args[0];
  
closureN_type c_7310362;
object e_7311666 [4];
c_7310362.hdr.mark = gc_color_red;
 c_7310362.hdr.grayed = 0;
c_7310362.tag = closureN_tag;
 c_7310362.fn = (function_type)__lambda_514;
c_7310362.num_args = 1;
c_7310362.num_elements = 4;
c_7310362.elements = (object *)e_7311666;
c_7310362.elements[0] = ((closureN)self_735141)->elements[0];
c_7310362.elements[1] = ((closureN)self_735141)->elements[1];
c_7310362.elements[2] = ((closureN)self_735141)->elements[2];
c_7310362.elements[3] = unfold2_87_67_73633_732200_732868;


closureN_type c_7311667;
object e_7311694 [1];
c_7311667.hdr.mark = gc_color_red;
 c_7311667.hdr.grayed = 0;
c_7311667.tag = closureN_tag;
 c_7311667.fn = (function_type)__lambda_681;
c_7311667.num_args = 4;
c_7311667.num_elements = 1;
c_7311667.elements = (object *)e_7311694;
c_7311667.elements[0] = ((closureN)self_735141)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310362,__lambda_514,  &c_7311667);; 
}

static void __lambda_681(void *data, object self_735142, int argc, object *args) /* object self_735142, object k_734486, object f_73634_732201_732869, object vec_73635_732202_732870, object i_73636_732203_732871, object len_73637_732204_732872 */
 {
 object k_734486 = args[0]; object f_73634_732201_732869 = args[1]; object vec_73635_732202_732870 = args[2]; object i_73636_732203_732871 = args[3]; object len_73637_732204_732872 = args[4];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, i_73636_732203_732871, len_73637_732204_732872)) ){ 
  
closureN_type c_7311671;
object e_7311692 [6];
c_7311671.hdr.mark = gc_color_red;
 c_7311671.hdr.grayed = 0;
c_7311671.tag = closureN_tag;
 c_7311671.fn = (function_type)__lambda_682;
c_7311671.num_args = 1;
c_7311671.num_elements = 6;
c_7311671.elements = (object *)e_7311692;
c_7311671.elements[0] = f_73634_732201_732869;
c_7311671.elements[1] = i_73636_732203_732871;
c_7311671.elements[2] = k_734486;
c_7311671.elements[3] = len_73637_732204_732872;
c_7311671.elements[4] = ((closureN)self_735142)->elements[0];
c_7311671.elements[5] = vec_73635_732202_732870;

return_closcall2(data,  f_73634_732201_732869,  &c_7311671, i_73636_732203_732871);
} else { 
  return_direct_with_clo1(data,  k_734486, (((closure)  k_734486)->fn),  boolean_f);}
;; 
}

static void __lambda_682(void *data, object self_735143, int argc, object *args) /* object self_735143, object r_734490 */
 {
 object r_734490 = args[0];
  
closureN_type c_7311673;
object e_7311686 [6];
c_7311673.hdr.mark = gc_color_red;
 c_7311673.hdr.grayed = 0;
c_7311673.tag = closureN_tag;
 c_7311673.fn = (function_type)__lambda_683;
c_7311673.num_args = 1;
c_7311673.num_elements = 6;
c_7311673.elements = (object *)e_7311686;
c_7311673.elements[0] = ((closureN)self_735143)->elements[0];
c_7311673.elements[1] = ((closureN)self_735143)->elements[1];
c_7311673.elements[2] = ((closureN)self_735143)->elements[2];
c_7311673.elements[3] = ((closureN)self_735143)->elements[3];
c_7311673.elements[4] = ((closureN)self_735143)->elements[4];
c_7311673.elements[5] = ((closureN)self_735143)->elements[5];


object c_7311689 = Cyc_vector_set_cps(data,(closure)&c_7311673,((closureN)self_735143)->elements[5], ((closureN)self_735143)->elements[1], r_734490);
return_closcall1(data,(closure)&c_7311673,  c_7311689);; 
}

static void __lambda_683(void *data, object self_735144, int argc, object *args) /* object self_735144, object r_734488 */
 {

  


complex_num_type local_7311683; 
return_closcall5(data,  car(((closureN)self_735144)->elements[4]),  ((closureN)self_735144)->elements[2], ((closureN)self_735144)->elements[0], ((closureN)self_735144)->elements[5], Cyc_fast_sum(data,&local_7311683, ((closureN)self_735144)->elements[1], obj_int2obj(1)), ((closureN)self_735144)->elements[3]);; 
}

static void __lambda_514(void *data, object self_735145, int argc, object *args) /* object self_735145, object r_734485 */
 {
 object r_734485 = args[0];
  
closureN_type c_7310364;
object e_7311662 [4];
c_7310364.hdr.mark = gc_color_red;
 c_7310364.hdr.grayed = 0;
c_7310364.tag = closureN_tag;
 c_7310364.fn = (function_type)__lambda_515;
c_7310364.num_args = 1;
c_7310364.num_elements = 4;
c_7310364.elements = (object *)e_7311662;
c_7310364.elements[0] = ((closureN)self_735145)->elements[0];
c_7310364.elements[1] = ((closureN)self_735145)->elements[1];
c_7310364.elements[2] = ((closureN)self_735145)->elements[2];
c_7310364.elements[3] = ((closureN)self_735145)->elements[3];



return_direct_with_clo1(data,(closure)&c_7310364,__lambda_515,  Cyc_set_cell(data, ((closureN)self_735145)->elements[1], r_734485));; 
}

static void __lambda_515(void *data, object self_735146, int argc, object *args) /* object self_735146, object r_734456 */
 {

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


closureN_type c_7311619;
object e_7311661 [1];
c_7311619.hdr.mark = gc_color_red;
 c_7311619.hdr.grayed = 0;
c_7311619.tag = closureN_tag;
 c_7311619.fn = (function_type)__lambda_675;
c_7311619.num_args = 5;
c_7311619.num_elements = 1;
c_7311619.elements = (object *)e_7311661;
c_7311619.elements[0] = ((closureN)self_735146)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310366,__lambda_516,  &c_7311619);; 
}

static void __lambda_675(void *data, object self_735147, int argc, object *args) /* object self_735147, object k_734477, object f_73641_732205_732873, object vec_73642_732206_732874, object i_73643_732207_732875, object len_73644_732208_732876, object seed_73645_732209_732877 */
 {
 object k_734477 = args[0]; object f_73641_732205_732873 = args[1]; object vec_73642_732206_732874 = args[2]; object i_73643_732207_732875 = args[3]; object len_73644_732208_732876 = args[4]; object seed_73645_732209_732877 = args[5];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, i_73643_732207_732875, len_73644_732208_732876)) ){ 
  
closureN_type c_7311623;
object e_7311653 [6];
c_7311623.hdr.mark = gc_color_red;
 c_7311623.hdr.grayed = 0;
c_7311623.tag = closureN_tag;
 c_7311623.fn = (function_type)__lambda_676;
c_7311623.num_args = 1;
c_7311623.num_elements = 6;
c_7311623.elements = (object *)e_7311653;
c_7311623.elements[0] = f_73641_732205_732873;
c_7311623.elements[1] = i_73643_732207_732875;
c_7311623.elements[2] = k_734477;
c_7311623.elements[3] = len_73644_732208_732876;
c_7311623.elements[4] = ((closureN)self_735147)->elements[0];
c_7311623.elements[5] = vec_73642_732206_732874;


closureN_type c_7311654;
object e_7311659 [3];
c_7311654.hdr.mark = gc_color_red;
 c_7311654.hdr.grayed = 0;
c_7311654.tag = closureN_tag;
 c_7311654.fn = (function_type)__lambda_680;
c_7311654.num_args = 0;
c_7311654.num_elements = 3;
c_7311654.elements = (object *)e_7311659;
c_7311654.elements[0] = f_73641_732205_732873;
c_7311654.elements[1] = i_73643_732207_732875;
c_7311654.elements[2] = seed_73645_732209_732877;

return_direct_with_clo1(data,(closure)&c_7311623,__lambda_676,  &c_7311654);
} else { 
  return_direct_with_clo1(data,  k_734477, (((closure)  k_734477)->fn),  Cyc_VOID);}
;; 
}

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

static void __lambda_676(void *data, object self_735149, int argc, object *args) /* object self_735149, object r_734479 */
 {
 object r_734479 = args[0];
  
closureN_type c_7311625;
object e_7311629 [2];
c_7311625.hdr.mark = gc_color_red;
 c_7311625.hdr.grayed = 0;
c_7311625.tag = closureN_tag;
 c_7311625.fn = (function_type)__lambda_677;
c_7311625.num_args = 1;
c_7311625.num_elements = 2;
c_7311625.elements = (object *)e_7311629;
c_7311625.elements[0] = ((closureN)self_735149)->elements[2];
c_7311625.elements[1] = r_734479;


closureN_type c_7311630;
object e_7311652 [5];
c_7311630.hdr.mark = gc_color_red;
 c_7311630.hdr.grayed = 0;
c_7311630.tag = closureN_tag;
 c_7311630.fn = (function_type)__lambda_678;
c_7311630.num_args = 2;
c_7311630.num_elements = 5;
c_7311630.elements = (object *)e_7311652;
c_7311630.elements[0] = ((closureN)self_735149)->elements[0];
c_7311630.elements[1] = ((closureN)self_735149)->elements[1];
c_7311630.elements[2] = ((closureN)self_735149)->elements[3];
c_7311630.elements[3] = ((closureN)self_735149)->elements[4];
c_7311630.elements[4] = ((closureN)self_735149)->elements[5];

return_direct_with_clo1(data,(closure)&c_7311625,__lambda_677,  &c_7311630);; 
}

static void __lambda_678(void *data, object self_735150, int argc, object *args) /* object self_735150, object k_734481, object elt_73646_732210_732878, object new_91seed_73647_732211_732879 */
 {
 object k_734481 = args[0]; object elt_73646_732210_732878 = args[1]; object new_91seed_73647_732211_732879 = args[2];
  
closureN_type c_7311632;
object e_7311646 [7];
c_7311632.hdr.mark = gc_color_red;
 c_7311632.hdr.grayed = 0;
c_7311632.tag = closureN_tag;
 c_7311632.fn = (function_type)__lambda_679;
c_7311632.num_args = 1;
c_7311632.num_elements = 7;
c_7311632.elements = (object *)e_7311646;
c_7311632.elements[0] = ((closureN)self_735150)->elements[0];
c_7311632.elements[1] = ((closureN)self_735150)->elements[1];
c_7311632.elements[2] = k_734481;
c_7311632.elements[3] = ((closureN)self_735150)->elements[2];
c_7311632.elements[4] = new_91seed_73647_732211_732879;
c_7311632.elements[5] = ((closureN)self_735150)->elements[3];
c_7311632.elements[6] = ((closureN)self_735150)->elements[4];


object c_7311649 = Cyc_vector_set_cps(data,(closure)&c_7311632,((closureN)self_735150)->elements[4], ((closureN)self_735150)->elements[1], elt_73646_732210_732878);
return_closcall1(data,(closure)&c_7311632,  c_7311649);; 
}

static void __lambda_679(void *data, object self_735151, int argc, object *args) /* object self_735151, object r_734482 */
 {

  


complex_num_type local_7311642; 
return_closcall6(data,  car(((closureN)self_735151)->elements[5]),  ((closureN)self_735151)->elements[2], ((closureN)self_735151)->elements[0], ((closureN)self_735151)->elements[6], Cyc_fast_sum(data,&local_7311642, ((closureN)self_735151)->elements[1], obj_int2obj(1)), ((closureN)self_735151)->elements[3], ((closureN)self_735151)->elements[4]);; 
}

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

static void __lambda_516(void *data, object self_735153, int argc, object *args) /* object self_735153, object r_734476 */
 {
 object r_734476 = args[0];
  
closureN_type c_7310368;
object e_7311614 [4];
c_7310368.hdr.mark = gc_color_red;
 c_7310368.hdr.grayed = 0;
c_7310368.tag = closureN_tag;
 c_7310368.fn = (function_type)__lambda_517;
c_7310368.num_args = 1;
c_7310368.num_elements = 4;
c_7310368.elements = (object *)e_7311614;
c_7310368.elements[0] = ((closureN)self_735153)->elements[0];
c_7310368.elements[1] = ((closureN)self_735153)->elements[1];
c_7310368.elements[2] = ((closureN)self_735153)->elements[2];
c_7310368.elements[3] = ((closureN)self_735153)->elements[3];



return_direct_with_clo1(data,(closure)&c_7310368,__lambda_517,  Cyc_set_cell(data, ((closureN)self_735153)->elements[2], r_734476));; 
}

static void __lambda_517(void *data, object self_735154, int argc, object *args) /* object self_735154, object r_734457 */
 {

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


closureN_type c_7311568;
object e_7311613 [1];
c_7311568.hdr.mark = gc_color_red;
 c_7311568.hdr.grayed = 0;
c_7311568.tag = closureN_tag;
 c_7311568.fn = (function_type)__lambda_669;
c_7311568.num_args = 5;
c_7311568.num_elements = 1;
c_7311568.elements = (object *)e_7311613;
c_7311568.elements[0] = ((closureN)self_735154)->elements[3];

return_direct_with_clo1(data,(closure)&c_7310370,__lambda_518,  &c_7311568);; 
}

static void __lambda_669(void *data, object self_735155, int argc, object *args) /* object self_735155, object k_734468, object f_73648_732212_732880, object vec_73649_732213_732881, object i_73650_732214_732882, object len_73651_732215_732883, object seeds_73652_732216_732884 */
 {
 object k_734468 = args[0]; object f_73648_732212_732880 = args[1]; object vec_73649_732213_732881 = args[2]; object i_73650_732214_732882 = args[3]; object len_73651_732215_732883 = args[4]; object seeds_73652_732216_732884 = args[5];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, i_73650_732214_732882, len_73651_732215_732883)) ){ 
  
closureN_type c_7311572;
object e_7311602 [6];
c_7311572.hdr.mark = gc_color_red;
 c_7311572.hdr.grayed = 0;
c_7311572.tag = closureN_tag;
 c_7311572.fn = (function_type)__lambda_670;
c_7311572.num_args = 1;
c_7311572.num_elements = 6;
c_7311572.elements = (object *)e_7311602;
c_7311572.elements[0] = f_73648_732212_732880;
c_7311572.elements[1] = i_73650_732214_732882;
c_7311572.elements[2] = k_734468;
c_7311572.elements[3] = len_73651_732215_732883;
c_7311572.elements[4] = ((closureN)self_735155)->elements[0];
c_7311572.elements[5] = vec_73649_732213_732881;


closureN_type c_7311603;
object e_7311611 [3];
c_7311603.hdr.mark = gc_color_red;
 c_7311603.hdr.grayed = 0;
c_7311603.tag = closureN_tag;
 c_7311603.fn = (function_type)__lambda_674;
c_7311603.num_args = 0;
c_7311603.num_elements = 3;
c_7311603.elements = (object *)e_7311611;
c_7311603.elements[0] = f_73648_732212_732880;
c_7311603.elements[1] = i_73650_732214_732882;
c_7311603.elements[2] = seeds_73652_732216_732884;

return_direct_with_clo1(data,(closure)&c_7311572,__lambda_670,  &c_7311603);
} else { 
  return_direct_with_clo1(data,  k_734468, (((closure)  k_734468)->fn),  Cyc_VOID);}
;; 
}

static void __lambda_674(void *data, object self_735156, int argc, object *args) /* object self_735156, object k_734475 */
 {
 object k_734475 = args[0];
  
object c_7311607 = apply_va(data,  k_734475,3,((closureN)self_735156)->elements[0], ((closureN)self_735156)->elements[1], ((closureN)self_735156)->elements[2]);
return_direct_with_clo1(data,  k_734475, (((closure)  k_734475)->fn),  c_7311607);; 
}

static void __lambda_670(void *data, object self_735157, int argc, object *args) /* object self_735157, object r_734470 */
 {
 object r_734470 = args[0];
  
closureN_type c_7311574;
object e_7311578 [2];
c_7311574.hdr.mark = gc_color_red;
 c_7311574.hdr.grayed = 0;
c_7311574.tag = closureN_tag;
 c_7311574.fn = (function_type)__lambda_671;
c_7311574.num_args = 1;
c_7311574.num_elements = 2;
c_7311574.elements = (object *)e_7311578;
c_7311574.elements[0] = ((closureN)self_735157)->elements[2];
c_7311574.elements[1] = r_734470;


closureN_type c_7311579;
object e_7311601 [5];
c_7311579.hdr.mark = gc_color_red;
 c_7311579.hdr.grayed = 0;
c_7311579.tag = closureN_tag;
 c_7311579.fn = (function_type)__lambda_672;
c_7311579.num_args = 1;
c_7311579.num_elements = 5;
c_7311579.elements = (object *)e_7311601;
c_7311579.elements[0] = ((closureN)self_735157)->elements[0];
c_7311579.elements[1] = ((closureN)self_735157)->elements[1];
c_7311579.elements[2] = ((closureN)self_735157)->elements[3];
c_7311579.elements[3] = ((closureN)self_735157)->elements[4];
c_7311579.elements[4] = ((closureN)self_735157)->elements[5];

return_direct_with_clo1(data,(closure)&c_7311574,__lambda_671,  &c_7311579);; 
}

static void __lambda_672(void *data, object self_735158, int argc, object *args) /* object self_735158, object k_734472, object elt_73653_732217_732885, object new_91seeds_73654_732218_732886_raw, ... */
 {
 object k_734472 = args[0]; object elt_73653_732217_732885 = args[1];
load_varargs(new_91seeds_73654_732218_732886, args, 2, argc - 2);
  
closureN_type c_7311581;
object e_7311595 [7];
c_7311581.hdr.mark = gc_color_red;
 c_7311581.hdr.grayed = 0;
c_7311581.tag = closureN_tag;
 c_7311581.fn = (function_type)__lambda_673;
c_7311581.num_args = 1;
c_7311581.num_elements = 7;
c_7311581.elements = (object *)e_7311595;
c_7311581.elements[0] = ((closureN)self_735158)->elements[0];
c_7311581.elements[1] = ((closureN)self_735158)->elements[1];
c_7311581.elements[2] = k_734472;
c_7311581.elements[3] = ((closureN)self_735158)->elements[2];
c_7311581.elements[4] = new_91seeds_73654_732218_732886;
c_7311581.elements[5] = ((closureN)self_735158)->elements[3];
c_7311581.elements[6] = ((closureN)self_735158)->elements[4];


object c_7311598 = Cyc_vector_set_cps(data,(closure)&c_7311581,((closureN)self_735158)->elements[4], ((closureN)self_735158)->elements[1], elt_73653_732217_732885);
return_closcall1(data,(closure)&c_7311581,  c_7311598);; 
}

static void __lambda_673(void *data, object self_735159, int argc, object *args) /* object self_735159, object r_734473 */
 {

  


complex_num_type local_7311591; 
return_closcall6(data,  car(((closureN)self_735159)->elements[5]),  ((closureN)self_735159)->elements[2], ((closureN)self_735159)->elements[0], ((closureN)self_735159)->elements[6], Cyc_fast_sum(data,&local_7311591, ((closureN)self_735159)->elements[1], obj_int2obj(1)), ((closureN)self_735159)->elements[3], ((closureN)self_735159)->elements[4]);; 
}

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

static void __lambda_518(void *data, object self_735161, int argc, object *args) /* object self_735161, object r_734467 */
 {
 object r_734467 = args[0];
  
closureN_type c_7310372;
object e_7311563 [4];
c_7310372.hdr.mark = gc_color_red;
 c_7310372.hdr.grayed = 0;
c_7310372.tag = closureN_tag;
 c_7310372.fn = (function_type)__lambda_519;
c_7310372.num_args = 1;
c_7310372.num_elements = 4;
c_7310372.elements = (object *)e_7311563;
c_7310372.elements[0] = ((closureN)self_735161)->elements[0];
c_7310372.elements[1] = ((closureN)self_735161)->elements[1];
c_7310372.elements[2] = ((closureN)self_735161)->elements[2];
c_7310372.elements[3] = ((closureN)self_735161)->elements[3];



return_direct_with_clo1(data,(closure)&c_7310372,__lambda_519,  Cyc_set_cell(data, ((closureN)self_735161)->elements[3], r_734467));; 
}

static void __lambda_519(void *data, object self_735162, int argc, object *args) /* object self_735162, object r_734458 */
 {

  
closureN_type c_7310374;
object e_7311505 [1];
c_7310374.hdr.mark = gc_color_red;
 c_7310374.hdr.grayed = 0;
c_7310374.tag = closureN_tag;
 c_7310374.fn = (function_type)__lambda_520;
c_7310374.num_args = 1;
c_7310374.num_elements = 1;
c_7310374.elements = (object *)e_7311505;
c_7310374.elements[0] = ((closureN)self_735162)->elements[0];


closureN_type c_7311506;
object e_7311562 [3];
c_7311506.hdr.mark = gc_color_red;
 c_7311506.hdr.grayed = 0;
c_7311506.tag = closureN_tag;
 c_7311506.fn = (function_type)__lambda_663;
c_7311506.num_args = 4;
c_7311506.num_elements = 3;
c_7311506.elements = (object *)e_7311562;
c_7311506.elements[0] = ((closureN)self_735162)->elements[1];
c_7311506.elements[1] = ((closureN)self_735162)->elements[2];
c_7311506.elements[2] = ((closureN)self_735162)->elements[3];

return_direct_with_clo1(data,(closure)&c_7310374,__lambda_520,  &c_7311506);; 
}

static void __lambda_663(void *data, object self_735163, int argc, object *args) /* object self_735163, object k_734459, object f_73655_732219_732887, object vec_73656_732220_732888, object start_73657_732221_732889, object end_73658_732222_732890, object initial_91seeds_73659_732223_732891_raw, ... */
 {
 object k_734459 = args[0]; object f_73655_732219_732887 = args[1]; object vec_73656_732220_732888 = args[2]; object start_73657_732221_732889 = args[3]; object end_73658_732222_732890 = args[4];
load_varargs(initial_91seeds_73659_732223_732891, args, 5, argc - 5);
  
closureN_type c_7311508;
object e_7311561 [8];
c_7311508.hdr.mark = gc_color_red;
 c_7311508.hdr.grayed = 0;
c_7311508.tag = closureN_tag;
 c_7311508.fn = (function_type)__lambda_664;
c_7311508.num_args = 1;
c_7311508.num_elements = 8;
c_7311508.elements = (object *)e_7311561;
c_7311508.elements[0] = end_73658_732222_732890;
c_7311508.elements[1] = initial_91seeds_73659_732223_732891;
c_7311508.elements[2] = k_734459;
c_7311508.elements[3] = start_73657_732221_732889;
c_7311508.elements[4] = ((closureN)self_735163)->elements[0];
c_7311508.elements[5] = ((closureN)self_735163)->elements[1];
c_7311508.elements[6] = ((closureN)self_735163)->elements[2];
c_7311508.elements[7] = vec_73656_732220_732888;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7311508, primitive_procedure_127, f_73655_732219_732887, __glo_vector_91unfold_67_srfi_133);; 
}

static void __lambda_664(void *data, object self_735164, int argc, object *args) /* object self_735164, object r_734460 */
 {
 object r_734460 = args[0];
  
closureN_type c_7311510;
object e_7311559 [8];
c_7311510.hdr.mark = gc_color_red;
 c_7311510.hdr.grayed = 0;
c_7311510.tag = closureN_tag;
 c_7311510.fn = (function_type)__lambda_665;
c_7311510.num_args = 1;
c_7311510.num_elements = 8;
c_7311510.elements = (object *)e_7311559;
c_7311510.elements[0] = ((closureN)self_735164)->elements[0];
c_7311510.elements[1] = ((closureN)self_735164)->elements[1];
c_7311510.elements[2] = ((closureN)self_735164)->elements[2];
c_7311510.elements[3] = r_734460;
c_7311510.elements[4] = ((closureN)self_735164)->elements[4];
c_7311510.elements[5] = ((closureN)self_735164)->elements[5];
c_7311510.elements[6] = ((closureN)self_735164)->elements[6];
c_7311510.elements[7] = ((closureN)self_735164)->elements[7];

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7311510, __glo_nonneg_91int_127_srfi_133, ((closureN)self_735164)->elements[3], __glo_vector_91unfold_67_srfi_133);; 
}

static void __lambda_665(void *data, object self_735165, int argc, object *args) /* object self_735165, object r_734461 */
 {
 object r_734461 = args[0];
  
closureN_type c_7311512;
object e_7311557 [8];
c_7311512.hdr.mark = gc_color_red;
 c_7311512.hdr.grayed = 0;
c_7311512.tag = closureN_tag;
 c_7311512.fn = (function_type)__lambda_666;
c_7311512.num_args = 1;
c_7311512.num_elements = 8;
c_7311512.elements = (object *)e_7311557;
c_7311512.elements[0] = ((closureN)self_735165)->elements[1];
c_7311512.elements[1] = ((closureN)self_735165)->elements[2];
c_7311512.elements[2] = ((closureN)self_735165)->elements[3];
c_7311512.elements[3] = r_734461;
c_7311512.elements[4] = ((closureN)self_735165)->elements[4];
c_7311512.elements[5] = ((closureN)self_735165)->elements[5];
c_7311512.elements[6] = ((closureN)self_735165)->elements[6];
c_7311512.elements[7] = ((closureN)self_735165)->elements[7];

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7311512, __glo_nonneg_91int_127_srfi_133, ((closureN)self_735165)->elements[0], __glo_vector_91unfold_67_srfi_133);; 
}

static void __lambda_666(void *data, object self_735166, int argc, object *args) /* object self_735166, object r_734462 */
 {
 object r_734462 = args[0];
  
closureN_type c_7311514;
object e_7311554 [6];
c_7311514.hdr.mark = gc_color_red;
 c_7311514.hdr.grayed = 0;
c_7311514.tag = closureN_tag;
 c_7311514.fn = (function_type)__lambda_667;
c_7311514.num_args = 3;
c_7311514.num_elements = 6;
c_7311514.elements = (object *)e_7311554;
c_7311514.elements[0] = ((closureN)self_735166)->elements[0];
c_7311514.elements[1] = ((closureN)self_735166)->elements[1];
c_7311514.elements[2] = ((closureN)self_735166)->elements[4];
c_7311514.elements[3] = ((closureN)self_735166)->elements[5];
c_7311514.elements[4] = ((closureN)self_735166)->elements[6];
c_7311514.elements[5] = ((closureN)self_735166)->elements[7];

return_direct_with_clo3(data,(closure)&c_7311514,__lambda_667,  ((closureN)self_735166)->elements[2], ((closureN)self_735166)->elements[3], r_734462);; 
}

static void __lambda_667(void *data, object self_735167, int argc, object *args) /* object self_735167, object f_73660_732224_732892, object start_73661_732225_732893, object end_73662_732226_732894 */
 {
 object f_73660_732224_732892 = args[0]; object start_73661_732225_732893 = args[1]; object end_73662_732226_732894 = args[2];
    
if( (boolean_f != Cyc_is_null(((closureN)self_735167)->elements[0])) ){ 
  

return_closcall5(data,  car(((closureN)self_735167)->elements[2]),  ((closureN)self_735167)->elements[1], f_73660_732224_732892, ((closureN)self_735167)->elements[5], start_73661_732225_732893, end_73662_732226_732894);
} else { 
  
closureN_type c_7311525;
object e_7311550 [8];
c_7311525.hdr.mark = gc_color_red;
 c_7311525.hdr.grayed = 0;
c_7311525.tag = closureN_tag;
 c_7311525.fn = (function_type)__lambda_668;
c_7311525.num_args = 1;
c_7311525.num_elements = 8;
c_7311525.elements = (object *)e_7311550;
c_7311525.elements[0] = end_73662_732226_732894;
c_7311525.elements[1] = f_73660_732224_732892;
c_7311525.elements[2] = ((closureN)self_735167)->elements[0];
c_7311525.elements[3] = ((closureN)self_735167)->elements[1];
c_7311525.elements[4] = start_73661_732225_732893;
c_7311525.elements[5] = ((closureN)self_735167)->elements[3];
c_7311525.elements[6] = ((closureN)self_735167)->elements[4];
c_7311525.elements[7] = ((closureN)self_735167)->elements[5];



return_direct_with_clo1(data,(closure)&c_7311525,__lambda_668,  Cyc_cdr(data, ((closureN)self_735167)->elements[0]));}
;; 
}

static void __lambda_668(void *data, object self_735168, int argc, object *args) /* object self_735168, object r_734466 */
 {
 object r_734466 = args[0];
    
if( (boolean_f != Cyc_is_null(r_734466)) ){ 
  



return_closcall6(data,  car(((closureN)self_735168)->elements[5]),  ((closureN)self_735168)->elements[3], ((closureN)self_735168)->elements[1], ((closureN)self_735168)->elements[7], ((closureN)self_735168)->elements[4], ((closureN)self_735168)->elements[0], Cyc_car(data, ((closureN)self_735168)->elements[2]));
} else { 
  

return_closcall6(data,  car(((closureN)self_735168)->elements[6]),  ((closureN)self_735168)->elements[3], ((closureN)self_735168)->elements[1], ((closureN)self_735168)->elements[7], ((closureN)self_735168)->elements[4], ((closureN)self_735168)->elements[0], ((closureN)self_735168)->elements[2]);}
;; 
}

static void __lambda_520(void *data, object self_735169, int argc, object *args) /* object self_735169, object r_734455 */
 {
 object r_734455 = args[0];
  
closureN_type c_7310376;
object e_7311501 [1];
c_7310376.hdr.mark = gc_color_red;
 c_7310376.hdr.grayed = 0;
c_7310376.tag = closureN_tag;
 c_7310376.fn = (function_type)__lambda_521;
c_7310376.num_args = 1;
c_7310376.num_elements = 1;
c_7310376.elements = (object *)e_7311501;
c_7310376.elements[0] = ((closureN)self_735169)->elements[0];


object c_7311504 = global_set_cps_id(data,(closure)&c_7310376,"__glo_vector_91unfold_67_srfi_133", __glo_vector_91unfold_67_srfi_133, r_734455);
return_closcall1(data,(closure)&c_7310376,  c_7311504);; 
}

static void __lambda_521(void *data, object self_735170, int argc, object *args) /* object self_735170, object r_734263 */
 {

  
closureN_type c_7310378;
object e_7311500 [1];
c_7310378.hdr.mark = gc_color_red;
 c_7310378.hdr.grayed = 0;
c_7310378.tag = closureN_tag;
 c_7310378.fn = (function_type)__lambda_522;
c_7310378.num_args = 2;
c_7310378.num_elements = 1;
c_7310378.elements = (object *)e_7311500;
c_7310378.elements[0] = ((closureN)self_735170)->elements[0];

return_direct_with_clo2(data,(closure)&c_7310378,__lambda_522,  boolean_f, boolean_f);; 
}

static void __lambda_522(void *data, object self_735171, int argc, object *args) /* object self_735171, object compute_91length_73794_732227_732895, object concatenate_67_73795_732228_732896 */
 {
 object compute_91length_73794_732227_732895 = args[0]; object concatenate_67_73795_732228_732896 = args[1];
  
closureN_type c_7310380;
object e_7311496 [2];
c_7310380.hdr.mark = gc_color_red;
 c_7310380.hdr.grayed = 0;
c_7310380.tag = closureN_tag;
 c_7310380.fn = (function_type)__lambda_759;
c_7310380.num_args = 1;
c_7310380.num_elements = 2;
c_7310380.elements = (object *)e_7311496;
c_7310380.elements[0] = concatenate_67_73795_732228_732896;
c_7310380.elements[1] = ((closureN)self_735171)->elements[0];


pair_type local_7311499; 
return_direct_with_clo1(data,(closure)&c_7310380,__lambda_759,  set_cell_as_expr(&local_7311499, compute_91length_73794_732227_732895));; 
}

static void __lambda_759(void *data, object self_735172, int argc, object *args) /* object self_735172, object compute_91length_73794_732227_732895 */
 {
 object compute_91length_73794_732227_732895 = args[0];
  
closureN_type c_7310382;
object e_7311491 [2];
c_7310382.hdr.mark = gc_color_red;
 c_7310382.hdr.grayed = 0;
c_7310382.tag = closureN_tag;
 c_7310382.fn = (function_type)__lambda_758;
c_7310382.num_args = 1;
c_7310382.num_elements = 2;
c_7310382.elements = (object *)e_7311491;
c_7310382.elements[0] = compute_91length_73794_732227_732895;
c_7310382.elements[1] = ((closureN)self_735172)->elements[1];


pair_type local_7311494; 
return_direct_with_clo1(data,(closure)&c_7310382,__lambda_758,  set_cell_as_expr(&local_7311494, ((closureN)self_735172)->elements[0]));; 
}

static void __lambda_758(void *data, object self_735173, int argc, object *args) /* object self_735173, object concatenate_67_73795_732228_732896 */
 {
 object concatenate_67_73795_732228_732896 = args[0];
  
closureN_type c_7310384;
object e_7311465 [3];
c_7310384.hdr.mark = gc_color_red;
 c_7310384.hdr.grayed = 0;
c_7310384.tag = closureN_tag;
 c_7310384.fn = (function_type)__lambda_523;
c_7310384.num_args = 1;
c_7310384.num_elements = 3;
c_7310384.elements = (object *)e_7311465;
c_7310384.elements[0] = ((closureN)self_735173)->elements[0];
c_7310384.elements[1] = concatenate_67_73795_732228_732896;
c_7310384.elements[2] = ((closureN)self_735173)->elements[1];


closureN_type c_7311466;
object e_7311490 [1];
c_7311466.hdr.mark = gc_color_red;
 c_7311466.hdr.grayed = 0;
c_7311466.tag = closureN_tag;
 c_7311466.fn = (function_type)__lambda_661;
c_7311466.num_args = 3;
c_7311466.num_elements = 1;
c_7311466.elements = (object *)e_7311490;
c_7311466.elements[0] = ((closureN)self_735173)->elements[0];

return_direct_with_clo1(data,(closure)&c_7310384,__lambda_523,  &c_7311466);; 
}

static void __lambda_661(void *data, object self_735174, int argc, object *args) /* object self_735174, object k_734448, object vectors_73796_732229_732897, object len_73797_732230_732898, object callee_73798_732231_732899 */
 {
 object k_734448 = args[0]; object vectors_73796_732229_732897 = args[1]; object len_73797_732230_732898 = args[2]; object callee_73798_732231_732899 = args[3];
    
if( (boolean_f != Cyc_is_null(vectors_73796_732229_732897)) ){ 
  return_direct_with_clo1(data,  k_734448, (((closure)  k_734448)->fn),  len_73797_732230_732898);
} else { 
  
closureN_type c_7311471;
object e_7311487 [5];
c_7311471.hdr.mark = gc_color_red;
 c_7311471.hdr.grayed = 0;
c_7311471.tag = closureN_tag;
 c_7311471.fn = (function_type)__lambda_662;
c_7311471.num_args = 1;
c_7311471.num_elements = 5;
c_7311471.elements = (object *)e_7311487;
c_7311471.elements[0] = callee_73798_732231_732899;
c_7311471.elements[1] = ((closureN)self_735174)->elements[0];
c_7311471.elements[2] = k_734448;
c_7311471.elements[3] = len_73797_732230_732898;
c_7311471.elements[4] = vectors_73796_732229_732897;



return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7311471, primitive_vector_127, Cyc_car(data, vectors_73796_732229_732897), callee_73798_732231_732899);}
;; 
}

static void __lambda_662(void *data, object self_735175, int argc, object *args) /* object self_735175, object vec_73799_732232_732900 */
 {
 object vec_73799_732232_732900 = args[0];
  




complex_num_type local_7311482; 


return_closcall4(data,  car(((closureN)self_735175)->elements[1]),  ((closureN)self_735175)->elements[2], Cyc_cdr(data, ((closureN)self_735175)->elements[4]), Cyc_fast_sum(data,&local_7311482, Cyc_vector_length(data, vec_73799_732232_732900), ((closureN)self_735175)->elements[3]), ((closureN)self_735175)->elements[0]);; 
}

static void __lambda_523(void *data, object self_735176, int argc, object *args) /* object self_735176, object r_734447 */
 {
 object r_734447 = args[0];
  
closureN_type c_7310386;
object e_7311461 [3];
c_7310386.hdr.mark = gc_color_red;
 c_7310386.hdr.grayed = 0;
c_7310386.tag = closureN_tag;
 c_7310386.fn = (function_type)__lambda_524;
c_7310386.num_args = 1;
c_7310386.num_elements = 3;
c_7310386.elements = (object *)e_7311461;
c_7310386.elements[0] = ((closureN)self_735176)->elements[0];
c_7310386.elements[1] = ((closureN)self_735176)->elements[1];
c_7310386.elements[2] = ((closureN)self_735176)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310386,__lambda_524,  Cyc_set_cell(data, ((closureN)self_735176)->elements[0], r_734447));; 
}

static void __lambda_524(void *data, object self_735177, int argc, object *args) /* object self_735177, object r_734425 */
 {

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


closureN_type c_7311429;
object e_7311460 [1];
c_7311429.hdr.mark = gc_color_red;
 c_7311429.hdr.grayed = 0;
c_7311429.tag = closureN_tag;
 c_7311429.fn = (function_type)__lambda_659;
c_7311429.num_args = 3;
c_7311429.num_elements = 1;
c_7311429.elements = (object *)e_7311460;
c_7311429.elements[0] = ((closureN)self_735177)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310388,__lambda_525,  &c_7311429);; 
}

static void __lambda_659(void *data, object self_735178, int argc, object *args) /* object self_735178, object k_734440, object vectors_73800_732233_732901, object target_73801_732234_732902, object to_73802_732235_732903 */
 {
 object k_734440 = args[0]; object vectors_73800_732233_732901 = args[1]; object target_73801_732234_732902 = args[2]; object to_73802_732235_732903 = args[3];
    
if( (boolean_f != Cyc_is_null(vectors_73800_732233_732901)) ){ 
  return_direct_with_clo1(data,  k_734440, (((closure)  k_734440)->fn),  target_73801_732234_732902);
} else { 
  
closureN_type c_7311434;
object e_7311453 [5];
c_7311434.hdr.mark = gc_color_red;
 c_7311434.hdr.grayed = 0;
c_7311434.tag = closureN_tag;
 c_7311434.fn = (function_type)__lambda_660;
c_7311434.num_args = 1;
c_7311434.num_elements = 5;
c_7311434.elements = (object *)e_7311453;
c_7311434.elements[0] = ((closureN)self_735178)->elements[0];
c_7311434.elements[1] = k_734440;
c_7311434.elements[2] = target_73801_732234_732902;
c_7311434.elements[3] = to_73802_732235_732903;
c_7311434.elements[4] = vectors_73800_732233_732901;







return_direct_with_clo6(data,  __glo__75vector_91copy_67_srfi_133, (((closure)  __glo__75vector_91copy_67_srfi_133)->fn),  &c_7311434, target_73801_732234_732902, to_73802_732235_732903, Cyc_car(data, vectors_73800_732233_732901), obj_int2obj(0), Cyc_vector_length(data, Cyc_car(data, vectors_73800_732233_732901)));}
;; 
}

static void __lambda_660(void *data, object self_735179, int argc, object *args) /* object self_735179, object r_734444 */
 {

  




complex_num_type local_7311446; 




return_closcall4(data,  car(((closureN)self_735179)->elements[0]),  ((closureN)self_735179)->elements[1], Cyc_cdr(data, ((closureN)self_735179)->elements[4]), ((closureN)self_735179)->elements[2], Cyc_fast_sum(data,&local_7311446, ((closureN)self_735179)->elements[3], Cyc_vector_length(data, Cyc_car(data, ((closureN)self_735179)->elements[4]))));; 
}

static void __lambda_525(void *data, object self_735180, int argc, object *args) /* object self_735180, object r_734439 */
 {
 object r_734439 = args[0];
  
closureN_type c_7310390;
object e_7311424 [3];
c_7310390.hdr.mark = gc_color_red;
 c_7310390.hdr.grayed = 0;
c_7310390.tag = closureN_tag;
 c_7310390.fn = (function_type)__lambda_526;
c_7310390.num_args = 1;
c_7310390.num_elements = 3;
c_7310390.elements = (object *)e_7311424;
c_7310390.elements[0] = ((closureN)self_735180)->elements[0];
c_7310390.elements[1] = ((closureN)self_735180)->elements[1];
c_7310390.elements[2] = ((closureN)self_735180)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310390,__lambda_526,  Cyc_set_cell(data, ((closureN)self_735180)->elements[1], r_734439));; 
}

static void __lambda_526(void *data, object self_735181, int argc, object *args) /* object self_735181, object r_734426 */
 {

  
closureN_type c_7310392;
object e_7311358 [1];
c_7310392.hdr.mark = gc_color_red;
 c_7310392.hdr.grayed = 0;
c_7310392.tag = closureN_tag;
 c_7310392.fn = (function_type)__lambda_527;
c_7310392.num_args = 1;
c_7310392.num_elements = 1;
c_7310392.elements = (object *)e_7311358;
c_7310392.elements[0] = ((closureN)self_735181)->elements[2];


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

return_direct_with_clo1(data,(closure)&c_7310392,__lambda_527,  &c_7311359);; 
}

static void __lambda_650(void *data, object self_735182, int argc, object *args) /* object self_735182, object k_734427, object vectors_73810_732238_732906, object callee_73811_732239_732907 */
 {
 object k_734427 = args[0]; object vectors_73810_732238_732906 = args[1]; object callee_73811_732239_732907 = args[2];
    
if( (boolean_f != Cyc_is_null(vectors_73810_732238_732906)) ){ 
  
object c_7311365 = Cyc_make_vector(data,  k_734427,1,obj_int2obj(0));
return_direct_with_clo1(data,  k_734427, (((closure)  k_734427)->fn),  c_7311365);
} else { 
  
closureN_type c_7311367;
object e_7311420 [5];
c_7311367.hdr.mark = gc_color_red;
 c_7311367.hdr.grayed = 0;
c_7311367.tag = closureN_tag;
 c_7311367.fn = (function_type)__lambda_651;
c_7311367.num_args = 1;
c_7311367.num_elements = 5;
c_7311367.elements = (object *)e_7311420;
c_7311367.elements[0] = callee_73811_732239_732907;
c_7311367.elements[1] = ((closureN)self_735182)->elements[0];
c_7311367.elements[2] = ((closureN)self_735182)->elements[1];
c_7311367.elements[3] = k_734427;
c_7311367.elements[4] = vectors_73810_732238_732906;



return_direct_with_clo1(data,(closure)&c_7311367,__lambda_651,  Cyc_cdr(data, vectors_73810_732238_732906));}
;; 
}

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



return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7311371, primitive_vector_127, Cyc_car(data, ((closureN)self_735183)->elements[4]), ((closureN)self_735183)->elements[0]);
} else { 
  


closureN_type c_7311400;
object e_7311417 [3];
c_7311400.hdr.mark = gc_color_red;
 c_7311400.hdr.grayed = 0;
c_7311400.tag = closureN_tag;
 c_7311400.fn = (function_type)__lambda_656;
c_7311400.num_args = 1;
c_7311400.num_elements = 3;
c_7311400.elements = (object *)e_7311417;
c_7311400.elements[0] = ((closureN)self_735183)->elements[2];
c_7311400.elements[1] = ((closureN)self_735183)->elements[3];
c_7311400.elements[2] = ((closureN)self_735183)->elements[4];

return_closcall4(data,  car(((closureN)self_735183)->elements[1]),  &c_7311400, ((closureN)self_735183)->elements[4], obj_int2obj(0), ((closureN)self_735183)->elements[0]);}
;; 
}

static void __lambda_656(void *data, object self_735188, int argc, object *args) /* object self_735188, object r_734437 */
 {
 object r_734437 = args[0];
  
closureN_type c_7311402;
object e_7311413 [3];
c_7311402.hdr.mark = gc_color_red;
 c_7311402.hdr.grayed = 0;
c_7311402.tag = closureN_tag;
 c_7311402.fn = (function_type)__lambda_657;
c_7311402.num_args = 1;
c_7311402.num_elements = 3;
c_7311402.elements = (object *)e_7311413;
c_7311402.elements[0] = ((closureN)self_735188)->elements[0];
c_7311402.elements[1] = ((closureN)self_735188)->elements[1];
c_7311402.elements[2] = ((closureN)self_735188)->elements[2];


object c_7311416 = Cyc_make_vector(data,(closure)&c_7311402,1,r_734437);
return_closcall1(data,(closure)&c_7311402,  c_7311416);; 
}

static void __lambda_657(void *data, object self_735189, int argc, object *args) /* object self_735189, object new_91vector_73829_732243_732911 */
 {
 object new_91vector_73829_732243_732911 = args[0];
  


closureN_type c_7311407;
object e_7311411 [2];
c_7311407.hdr.mark = gc_color_red;
 c_7311407.hdr.grayed = 0;
c_7311407.tag = closureN_tag;
 c_7311407.fn = (function_type)__lambda_658;
c_7311407.num_args = 1;
c_7311407.num_elements = 2;
c_7311407.elements = (object *)e_7311411;
c_7311407.elements[0] = ((closureN)self_735189)->elements[1];
c_7311407.elements[1] = new_91vector_73829_732243_732911;

return_closcall4(data,  car(((closureN)self_735189)->elements[0]),  &c_7311407, ((closureN)self_735189)->elements[2], new_91vector_73829_732243_732911, obj_int2obj(0));; 
}

static void __lambda_658(void *data, object self_735190, int argc, object *args) /* object self_735190, object r_734436 */
 {

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

static void __lambda_652(void *data, object self_735184, int argc, object *args) /* object self_735184, object vec_73820_732240_732908 */
 {
 object vec_73820_732240_732908 = args[0];
  
closureN_type c_7311373;
object e_7311388 [2];
c_7311373.hdr.mark = gc_color_red;
 c_7311373.hdr.grayed = 0;
c_7311373.tag = closureN_tag;
 c_7311373.fn = (function_type)__lambda_653;
c_7311373.num_args = 1;
c_7311373.num_elements = 2;
c_7311373.elements = (object *)e_7311388;
c_7311373.elements[0] = ((closureN)self_735184)->elements[0];
c_7311373.elements[1] = vec_73820_732240_732908;



return_direct_with_clo1(data,(closure)&c_7311373,__lambda_653,  Cyc_vector_length(data, vec_73820_732240_732908));; 
}

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


object c_7311387 = Cyc_make_vector(data,(closure)&c_7311375,1,len_73823_732241_732909);
return_closcall1(data,(closure)&c_7311375,  c_7311387);; 
}

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

return_direct_with_clo6(data,  __glo__75vector_91copy_67_srfi_133, (((closure)  __glo__75vector_91copy_67_srfi_133)->fn),  &c_7311377, new_73826_732242_732910, obj_int2obj(0), ((closureN)self_735186)->elements[2], obj_int2obj(0), ((closureN)self_735186)->elements[1]);; 
}

static void __lambda_655(void *data, object self_735187, int argc, object *args) /* object self_735187, object r_734433 */
 {

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

static void __lambda_527(void *data, object self_735191, int argc, object *args) /* object self_735191, object r_734424 */
 {
 object r_734424 = args[0];
  
closureN_type c_7310394;
object e_7311354 [1];
c_7310394.hdr.mark = gc_color_red;
 c_7310394.hdr.grayed = 0;
c_7310394.tag = closureN_tag;
 c_7310394.fn = (function_type)__lambda_528;
c_7310394.num_args = 1;
c_7310394.num_elements = 1;
c_7310394.elements = (object *)e_7311354;
c_7310394.elements[0] = ((closureN)self_735191)->elements[0];


object c_7311357 = global_set_cps_id(data,(closure)&c_7310394,"__glo_vector_91concatenate_117aux_srfi_133", __glo_vector_91concatenate_117aux_srfi_133, r_734424);
return_closcall1(data,(closure)&c_7310394,  c_7311357);; 
}

static void __lambda_528(void *data, object self_735192, int argc, object *args) /* object self_735192, object r_734264 */
 {

  
closureN_type c_7310396;
object e_7311353 [1];
c_7310396.hdr.mark = gc_color_red;
 c_7310396.hdr.grayed = 0;
c_7310396.tag = closureN_tag;
 c_7310396.fn = (function_type)__lambda_529;
c_7310396.num_args = 2;
c_7310396.num_elements = 1;
c_7310396.elements = (object *)e_7311353;
c_7310396.elements[0] = ((closureN)self_735192)->elements[0];

return_direct_with_clo2(data,(closure)&c_7310396,__lambda_529,  boolean_f, boolean_f);; 
}

static void __lambda_529(void *data, object self_735193, int argc, object *args) /* object self_735193, object loop1_73929_732244_732912, object loop2_87_73930_732245_732913 */
 {
 object loop1_73929_732244_732912 = args[0]; object loop2_87_73930_732245_732913 = args[1];
  
closureN_type c_7310398;
object e_7311349 [2];
c_7310398.hdr.mark = gc_color_red;
 c_7310398.hdr.grayed = 0;
c_7310398.tag = closureN_tag;
 c_7310398.fn = (function_type)__lambda_757;
c_7310398.num_args = 1;
c_7310398.num_elements = 2;
c_7310398.elements = (object *)e_7311349;
c_7310398.elements[0] = ((closureN)self_735193)->elements[0];
c_7310398.elements[1] = loop2_87_73930_732245_732913;


pair_type local_7311352; 
return_direct_with_clo1(data,(closure)&c_7310398,__lambda_757,  set_cell_as_expr(&local_7311352, loop1_73929_732244_732912));; 
}

static void __lambda_757(void *data, object self_735194, int argc, object *args) /* object self_735194, object loop1_73929_732244_732912 */
 {
 object loop1_73929_732244_732912 = args[0];
  
closureN_type c_7310400;
object e_7311344 [2];
c_7310400.hdr.mark = gc_color_red;
 c_7310400.hdr.grayed = 0;
c_7310400.tag = closureN_tag;
 c_7310400.fn = (function_type)__lambda_756;
c_7310400.num_args = 1;
c_7310400.num_elements = 2;
c_7310400.elements = (object *)e_7311344;
c_7310400.elements[0] = ((closureN)self_735194)->elements[0];
c_7310400.elements[1] = loop1_73929_732244_732912;


pair_type local_7311347; 
return_direct_with_clo1(data,(closure)&c_7310400,__lambda_756,  set_cell_as_expr(&local_7311347, ((closureN)self_735194)->elements[1]));; 
}

static void __lambda_756(void *data, object self_735195, int argc, object *args) /* object self_735195, object loop2_87_73930_732245_732913 */
 {
 object loop2_87_73930_732245_732913 = args[0];
  
closureN_type c_7310402;
object e_7311316 [3];
c_7310402.hdr.mark = gc_color_red;
 c_7310402.hdr.grayed = 0;
c_7310402.tag = closureN_tag;
 c_7310402.fn = (function_type)__lambda_530;
c_7310402.num_args = 1;
c_7310402.num_elements = 3;
c_7310402.elements = (object *)e_7311316;
c_7310402.elements[0] = ((closureN)self_735195)->elements[0];
c_7310402.elements[1] = ((closureN)self_735195)->elements[1];
c_7310402.elements[2] = loop2_87_73930_732245_732913;


closureN_type c_7311317;
object e_7311343 [1];
c_7311317.hdr.mark = gc_color_red;
 c_7311317.hdr.grayed = 0;
c_7311317.tag = closureN_tag;
 c_7311317.fn = (function_type)__lambda_647;
c_7311317.num_args = 4;
c_7311317.num_elements = 1;
c_7311317.elements = (object *)e_7311343;
c_7311317.elements[0] = ((closureN)self_735195)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310402,__lambda_530,  &c_7311317);; 
}

static void __lambda_647(void *data, object self_735196, int argc, object *args) /* object self_735196, object k_734419, object kons_73931_732246_732914, object knil_73932_732247_732915, object vec_73933_732248_732916, object i_73934_732249_732917 */
 {
 object k_734419 = args[0]; object kons_73931_732246_732914 = args[1]; object knil_73932_732247_732915 = args[2]; object vec_73933_732248_732916 = args[3]; object i_73934_732249_732917 = args[4];
    complex_num_type local_7311320; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_negative_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7311320, i_73934_732249_732917)) ){ 
  return_direct_with_clo1(data,  k_734419, (((closure)  k_734419)->fn),  knil_73932_732247_732915);
} else { 
  
closureN_type c_7311323;
object e_7311340 [6];
c_7311323.hdr.mark = gc_color_red;
 c_7311323.hdr.grayed = 0;
c_7311323.tag = closureN_tag;
 c_7311323.fn = (function_type)__lambda_648;
c_7311323.num_args = 1;
c_7311323.num_elements = 6;
c_7311323.elements = (object *)e_7311340;
c_7311323.elements[0] = i_73934_732249_732917;
c_7311323.elements[1] = k_734419;
c_7311323.elements[2] = knil_73932_732247_732915;
c_7311323.elements[3] = kons_73931_732246_732914;
c_7311323.elements[4] = ((closureN)self_735196)->elements[0];
c_7311323.elements[5] = vec_73933_732248_732916;



return_direct_with_clo1(data,(closure)&c_7311323,__lambda_648,  Cyc_vector_ref(data, vec_73933_732248_732916, i_73934_732249_732917));}
;; 
}

static void __lambda_648(void *data, object self_735197, int argc, object *args) /* object self_735197, object r_734423 */
 {
 object r_734423 = args[0];
  
closureN_type c_7311326;
object e_7311338 [5];
c_7311326.hdr.mark = gc_color_red;
 c_7311326.hdr.grayed = 0;
c_7311326.tag = closureN_tag;
 c_7311326.fn = (function_type)__lambda_649;
c_7311326.num_args = 1;
c_7311326.num_elements = 5;
c_7311326.elements = (object *)e_7311338;
c_7311326.elements[0] = ((closureN)self_735197)->elements[0];
c_7311326.elements[1] = ((closureN)self_735197)->elements[1];
c_7311326.elements[2] = ((closureN)self_735197)->elements[3];
c_7311326.elements[3] = ((closureN)self_735197)->elements[4];
c_7311326.elements[4] = ((closureN)self_735197)->elements[5];

return_closcall3(data,  ((closureN)self_735197)->elements[3],  &c_7311326, ((closureN)self_735197)->elements[2], r_734423);; 
}

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


complex_num_type local_7311336; 
return_closcall5(data,  car(((closureN)self_735198)->elements[3]),  ((closureN)self_735198)->elements[1], ((closureN)self_735198)->elements[2], r_734421, ((closureN)self_735198)->elements[4], Cyc_fast_sub(data,&local_7311336, ((closureN)self_735198)->elements[0], obj_int2obj(1)));; 
}

static void __lambda_530(void *data, object self_735199, int argc, object *args) /* object self_735199, object r_734418 */
 {
 object r_734418 = args[0];
  
closureN_type c_7310404;
object e_7311312 [3];
c_7310404.hdr.mark = gc_color_red;
 c_7310404.hdr.grayed = 0;
c_7310404.tag = closureN_tag;
 c_7310404.fn = (function_type)__lambda_531;
c_7310404.num_args = 1;
c_7310404.num_elements = 3;
c_7310404.elements = (object *)e_7311312;
c_7310404.elements[0] = ((closureN)self_735199)->elements[0];
c_7310404.elements[1] = ((closureN)self_735199)->elements[1];
c_7310404.elements[2] = ((closureN)self_735199)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310404,__lambda_531,  Cyc_set_cell(data, ((closureN)self_735199)->elements[1], r_734418));; 
}

static void __lambda_531(void *data, object self_735200, int argc, object *args) /* object self_735200, object r_734400 */
 {

  
closureN_type c_7310406;
object e_7311283 [3];
c_7310406.hdr.mark = gc_color_red;
 c_7310406.hdr.grayed = 0;
c_7310406.tag = closureN_tag;
 c_7310406.fn = (function_type)__lambda_532;
c_7310406.num_args = 1;
c_7310406.num_elements = 3;
c_7310406.elements = (object *)e_7311283;
c_7310406.elements[0] = ((closureN)self_735200)->elements[0];
c_7310406.elements[1] = ((closureN)self_735200)->elements[1];
c_7310406.elements[2] = ((closureN)self_735200)->elements[2];


closureN_type c_7311284;
object e_7311311 [1];
c_7311284.hdr.mark = gc_color_red;
 c_7311284.hdr.grayed = 0;
c_7311284.tag = closureN_tag;
 c_7311284.fn = (function_type)__lambda_644;
c_7311284.num_args = 4;
c_7311284.num_elements = 1;
c_7311284.elements = (object *)e_7311311;
c_7311284.elements[0] = ((closureN)self_735200)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310406,__lambda_532,  &c_7311284);; 
}

static void __lambda_644(void *data, object self_735201, int argc, object *args) /* object self_735201, object k_734413, object kons_73935_732250_732918, object knil_73936_732251_732919, object vectors_73937_732252_732920, object i_73938_732253_732921 */
 {
 object k_734413 = args[0]; object kons_73935_732250_732918 = args[1]; object knil_73936_732251_732919 = args[2]; object vectors_73937_732252_732920 = args[3]; object i_73938_732253_732921 = args[4];
    complex_num_type local_7311287; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_negative_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7311287, i_73938_732253_732921)) ){ 
  return_direct_with_clo1(data,  k_734413, (((closure)  k_734413)->fn),  knil_73936_732251_732919);
} else { 
  
closureN_type c_7311290;
object e_7311310 [6];
c_7311290.hdr.mark = gc_color_red;
 c_7311290.hdr.grayed = 0;
c_7311290.tag = closureN_tag;
 c_7311290.fn = (function_type)__lambda_645;
c_7311290.num_args = 1;
c_7311290.num_elements = 6;
c_7311290.elements = (object *)e_7311310;
c_7311290.elements[0] = i_73938_732253_732921;
c_7311290.elements[1] = k_734413;
c_7311290.elements[2] = knil_73936_732251_732919;
c_7311290.elements[3] = kons_73935_732250_732918;
c_7311290.elements[4] = ((closureN)self_735201)->elements[0];
c_7311290.elements[5] = vectors_73937_732252_732920;

return_direct_with_clo3(data,  __glo_vectors_91ref_srfi_133, (((closure)  __glo_vectors_91ref_srfi_133)->fn),  &c_7311290, vectors_73937_732252_732920, i_73938_732253_732921);}
;; 
}

static void __lambda_645(void *data, object self_735202, int argc, object *args) /* object self_735202, object r_734417 */
 {
 object r_734417 = args[0];
  
closureN_type c_7311292;
object e_7311304 [5];
c_7311292.hdr.mark = gc_color_red;
 c_7311292.hdr.grayed = 0;
c_7311292.tag = closureN_tag;
 c_7311292.fn = (function_type)__lambda_646;
c_7311292.num_args = 1;
c_7311292.num_elements = 5;
c_7311292.elements = (object *)e_7311304;
c_7311292.elements[0] = ((closureN)self_735202)->elements[0];
c_7311292.elements[1] = ((closureN)self_735202)->elements[1];
c_7311292.elements[2] = ((closureN)self_735202)->elements[3];
c_7311292.elements[3] = ((closureN)self_735202)->elements[4];
c_7311292.elements[4] = ((closureN)self_735202)->elements[5];


object c_7311307 = apply_va(data,(closure)&c_7311292,3,((closureN)self_735202)->elements[3], ((closureN)self_735202)->elements[2], r_734417);
return_closcall1(data,(closure)&c_7311292,  c_7311307);; 
}

static void __lambda_646(void *data, object self_735203, int argc, object *args) /* object self_735203, object r_734415 */
 {
 object r_734415 = args[0];
  


complex_num_type local_7311302; 
return_closcall5(data,  car(((closureN)self_735203)->elements[3]),  ((closureN)self_735203)->elements[1], ((closureN)self_735203)->elements[2], r_734415, ((closureN)self_735203)->elements[4], Cyc_fast_sub(data,&local_7311302, ((closureN)self_735203)->elements[0], obj_int2obj(1)));; 
}

static void __lambda_532(void *data, object self_735204, int argc, object *args) /* object self_735204, object r_734412 */
 {
 object r_734412 = args[0];
  
closureN_type c_7310408;
object e_7311279 [3];
c_7310408.hdr.mark = gc_color_red;
 c_7310408.hdr.grayed = 0;
c_7310408.tag = closureN_tag;
 c_7310408.fn = (function_type)__lambda_533;
c_7310408.num_args = 1;
c_7310408.num_elements = 3;
c_7310408.elements = (object *)e_7311279;
c_7310408.elements[0] = ((closureN)self_735204)->elements[0];
c_7310408.elements[1] = ((closureN)self_735204)->elements[1];
c_7310408.elements[2] = ((closureN)self_735204)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310408,__lambda_533,  Cyc_set_cell(data, ((closureN)self_735204)->elements[2], r_734412));; 
}

static void __lambda_533(void *data, object self_735205, int argc, object *args) /* object self_735205, object r_734401 */
 {

  
closureN_type c_7310410;
object e_7311218 [1];
c_7310410.hdr.mark = gc_color_red;
 c_7310410.hdr.grayed = 0;
c_7310410.tag = closureN_tag;
 c_7310410.fn = (function_type)__lambda_534;
c_7310410.num_args = 1;
c_7310410.num_elements = 1;
c_7310410.elements = (object *)e_7311218;
c_7310410.elements[0] = ((closureN)self_735205)->elements[0];


closureN_type c_7311219;
object e_7311278 [2];
c_7311219.hdr.mark = gc_color_red;
 c_7311219.hdr.grayed = 0;
c_7311219.tag = closureN_tag;
 c_7311219.fn = (function_type)__lambda_636;
c_7311219.num_args = 3;
c_7311219.num_elements = 2;
c_7311219.elements = (object *)e_7311278;
c_7311219.elements[0] = ((closureN)self_735205)->elements[1];
c_7311219.elements[1] = ((closureN)self_735205)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310410,__lambda_534,  &c_7311219);; 
}

static void __lambda_636(void *data, object self_735206, int argc, object *args) /* object self_735206, object k_734402, object kons_73939_732254_732922, object knil_73940_732255_732923, object vec_73941_732256_732924, object vectors_73942_732257_732925_raw, ... */
 {
 object k_734402 = args[0]; object kons_73939_732254_732922 = args[1]; object knil_73940_732255_732923 = args[2]; object vec_73941_732256_732924 = args[3];
load_varargs(vectors_73942_732257_732925, args, 4, argc - 4);
  
closureN_type c_7311221;
object e_7311277 [6];
c_7311221.hdr.mark = gc_color_red;
 c_7311221.hdr.grayed = 0;
c_7311221.tag = closureN_tag;
 c_7311221.fn = (function_type)__lambda_637;
c_7311221.num_args = 1;
c_7311221.num_elements = 6;
c_7311221.elements = (object *)e_7311277;
c_7311221.elements[0] = k_734402;
c_7311221.elements[1] = knil_73940_732255_732923;
c_7311221.elements[2] = ((closureN)self_735206)->elements[0];
c_7311221.elements[3] = ((closureN)self_735206)->elements[1];
c_7311221.elements[4] = vec_73941_732256_732924;
c_7311221.elements[5] = vectors_73942_732257_732925;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7311221, primitive_procedure_127, kons_73939_732254_732922, __glo_vector_91fold_91right_srfi_133);; 
}

static void __lambda_637(void *data, object self_735207, int argc, object *args) /* object self_735207, object r_734403 */
 {
 object r_734403 = args[0];
  
closureN_type c_7311223;
object e_7311275 [6];
c_7311223.hdr.mark = gc_color_red;
 c_7311223.hdr.grayed = 0;
c_7311223.tag = closureN_tag;
 c_7311223.fn = (function_type)__lambda_638;
c_7311223.num_args = 1;
c_7311223.num_elements = 6;
c_7311223.elements = (object *)e_7311275;
c_7311223.elements[0] = ((closureN)self_735207)->elements[0];
c_7311223.elements[1] = ((closureN)self_735207)->elements[1];
c_7311223.elements[2] = ((closureN)self_735207)->elements[2];
c_7311223.elements[3] = ((closureN)self_735207)->elements[3];
c_7311223.elements[4] = r_734403;
c_7311223.elements[5] = ((closureN)self_735207)->elements[5];

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7311223, primitive_vector_127, ((closureN)self_735207)->elements[4], __glo_vector_91fold_91right_srfi_133);; 
}

static void __lambda_638(void *data, object self_735208, int argc, object *args) /* object self_735208, object r_734404 */
 {
 object r_734404 = args[0];
  
closureN_type c_7311225;
object e_7311273 [5];
c_7311225.hdr.mark = gc_color_red;
 c_7311225.hdr.grayed = 0;
c_7311225.tag = closureN_tag;
 c_7311225.fn = (function_type)__lambda_639;
c_7311225.num_args = 2;
c_7311225.num_elements = 5;
c_7311225.elements = (object *)e_7311273;
c_7311225.elements[0] = ((closureN)self_735208)->elements[0];
c_7311225.elements[1] = ((closureN)self_735208)->elements[1];
c_7311225.elements[2] = ((closureN)self_735208)->elements[2];
c_7311225.elements[3] = ((closureN)self_735208)->elements[3];
c_7311225.elements[4] = ((closureN)self_735208)->elements[5];

return_direct_with_clo2(data,(closure)&c_7311225,__lambda_639,  ((closureN)self_735208)->elements[4], r_734404);; 
}

static void __lambda_639(void *data, object self_735209, int argc, object *args) /* object self_735209, object kons_73943_732258_732926, object vec_73944_732259_732927 */
 {
 object kons_73943_732258_732926 = args[0]; object vec_73944_732259_732927 = args[1];
    
if( (boolean_f != Cyc_is_null(((closureN)self_735209)->elements[4])) ){ 
  
closureN_type c_7311230;
object e_7311242 [5];
c_7311230.hdr.mark = gc_color_red;
 c_7311230.hdr.grayed = 0;
c_7311230.tag = closureN_tag;
 c_7311230.fn = (function_type)__lambda_640;
c_7311230.num_args = 1;
c_7311230.num_elements = 5;
c_7311230.elements = (object *)e_7311242;
c_7311230.elements[0] = ((closureN)self_735209)->elements[0];
c_7311230.elements[1] = ((closureN)self_735209)->elements[1];
c_7311230.elements[2] = kons_73943_732258_732926;
c_7311230.elements[3] = ((closureN)self_735209)->elements[2];
c_7311230.elements[4] = vec_73944_732259_732927;



return_direct_with_clo1(data,(closure)&c_7311230,__lambda_640,  Cyc_vector_length(data, vec_73944_732259_732927));
} else { 
  
closureN_type c_7311246;
object e_7311268 [6];
c_7311246.hdr.mark = gc_color_red;
 c_7311246.hdr.grayed = 0;
c_7311246.tag = closureN_tag;
 c_7311246.fn = (function_type)__lambda_641;
c_7311246.num_args = 1;
c_7311246.num_elements = 6;
c_7311246.elements = (object *)e_7311268;
c_7311246.elements[0] = ((closureN)self_735209)->elements[0];
c_7311246.elements[1] = ((closureN)self_735209)->elements[1];
c_7311246.elements[2] = kons_73943_732258_732926;
c_7311246.elements[3] = ((closureN)self_735209)->elements[3];
c_7311246.elements[4] = vec_73944_732259_732927;
c_7311246.elements[5] = ((closureN)self_735209)->elements[4];


pair_type local_7311271; 
return_direct_with_clo1(data,(closure)&c_7311246,__lambda_641,  set_pair_as_expr(&local_7311271, vec_73944_732259_732927, ((closureN)self_735209)->elements[4]));}
;; 
}

static void __lambda_641(void *data, object self_735211, int argc, object *args) /* object self_735211, object r_734408 */
 {
 object r_734408 = args[0];
  
closureN_type c_7311248;
object e_7311263 [5];
c_7311248.hdr.mark = gc_color_red;
 c_7311248.hdr.grayed = 0;
c_7311248.tag = closureN_tag;
 c_7311248.fn = (function_type)__lambda_642;
c_7311248.num_args = 1;
c_7311248.num_elements = 5;
c_7311248.elements = (object *)e_7311263;
c_7311248.elements[0] = ((closureN)self_735211)->elements[0];
c_7311248.elements[1] = ((closureN)self_735211)->elements[1];
c_7311248.elements[2] = ((closureN)self_735211)->elements[2];
c_7311248.elements[3] = ((closureN)self_735211)->elements[3];
c_7311248.elements[4] = r_734408;



return_direct_with_clo4(data,  __glo__75smallest_91length_srfi_133, (((closure)  __glo__75smallest_91length_srfi_133)->fn),  &c_7311248, ((closureN)self_735211)->elements[5], Cyc_vector_length(data, ((closureN)self_735211)->elements[4]), __glo_vector_91fold_91right_srfi_133);; 
}

static void __lambda_642(void *data, object self_735212, int argc, object *args) /* object self_735212, object r_734410 */
 {
 object r_734410 = args[0];
  
closureN_type c_7311250;
object e_7311259 [5];
c_7311250.hdr.mark = gc_color_red;
 c_7311250.hdr.grayed = 0;
c_7311250.tag = closureN_tag;
 c_7311250.fn = (function_type)__lambda_643;
c_7311250.num_args = 1;
c_7311250.num_elements = 5;
c_7311250.elements = (object *)e_7311259;
c_7311250.elements[0] = ((closureN)self_735212)->elements[0];
c_7311250.elements[1] = ((closureN)self_735212)->elements[1];
c_7311250.elements[2] = ((closureN)self_735212)->elements[2];
c_7311250.elements[3] = ((closureN)self_735212)->elements[3];
c_7311250.elements[4] = ((closureN)self_735212)->elements[4];


complex_num_type local_7311262; 
return_direct_with_clo1(data,(closure)&c_7311250,__lambda_643,  Cyc_fast_sub(data,&local_7311262, r_734410, obj_int2obj(1)));; 
}

static void __lambda_643(void *data, object self_735213, int argc, object *args) /* object self_735213, object r_734409 */
 {
 object r_734409 = args[0];
  

return_closcall5(data,  car(((closureN)self_735213)->elements[3]),  ((closureN)self_735213)->elements[0], ((closureN)self_735213)->elements[2], ((closureN)self_735213)->elements[1], ((closureN)self_735213)->elements[4], r_734409);; 
}

static void __lambda_640(void *data, object self_735210, int argc, object *args) /* object self_735210, object r_734407 */
 {
 object r_734407 = args[0];
  


complex_num_type local_7311241; 
return_closcall5(data,  car(((closureN)self_735210)->elements[3]),  ((closureN)self_735210)->elements[0], ((closureN)self_735210)->elements[2], ((closureN)self_735210)->elements[1], ((closureN)self_735210)->elements[4], Cyc_fast_sub(data,&local_7311241, r_734407, obj_int2obj(1)));; 
}

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


object c_7311217 = global_set_cps_id(data,(closure)&c_7310412,"__glo_vector_91fold_91right_srfi_133", __glo_vector_91fold_91right_srfi_133, r_734399);
return_closcall1(data,(closure)&c_7310412,  c_7311217);; 
}

static void __lambda_535(void *data, object self_735215, int argc, object *args) /* object self_735215, object r_734265 */
 {

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

return_direct_with_clo2(data,(closure)&c_7310414,__lambda_536,  boolean_f, boolean_f);; 
}

static void __lambda_536(void *data, object self_735216, int argc, object *args) /* object self_735216, object for_91each1_73957_732260_732928, object for_91each2_87_73958_732261_732929 */
 {
 object for_91each1_73957_732260_732928 = args[0]; object for_91each2_87_73958_732261_732929 = args[1];
  
closureN_type c_7310416;
object e_7311209 [2];
c_7310416.hdr.mark = gc_color_red;
 c_7310416.hdr.grayed = 0;
c_7310416.tag = closureN_tag;
 c_7310416.fn = (function_type)__lambda_755;
c_7310416.num_args = 1;
c_7310416.num_elements = 2;
c_7310416.elements = (object *)e_7311209;
c_7310416.elements[0] = for_91each2_87_73958_732261_732929;
c_7310416.elements[1] = ((closureN)self_735216)->elements[0];


pair_type local_7311212; 
return_direct_with_clo1(data,(closure)&c_7310416,__lambda_755,  set_cell_as_expr(&local_7311212, for_91each1_73957_732260_732928));; 
}

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


pair_type local_7311207; 
return_direct_with_clo1(data,(closure)&c_7310418,__lambda_754,  set_cell_as_expr(&local_7311207, ((closureN)self_735217)->elements[0]));; 
}

static void __lambda_754(void *data, object self_735218, int argc, object *args) /* object self_735218, object for_91each2_87_73958_732261_732929 */
 {
 object for_91each2_87_73958_732261_732929 = args[0];
  
closureN_type c_7310420;
object e_7311177 [3];
c_7310420.hdr.mark = gc_color_red;
 c_7310420.hdr.grayed = 0;
c_7310420.tag = closureN_tag;
 c_7310420.fn = (function_type)__lambda_537;
c_7310420.num_args = 1;
c_7310420.num_elements = 3;
c_7310420.elements = (object *)e_7311177;
c_7310420.elements[0] = ((closureN)self_735218)->elements[0];
c_7310420.elements[1] = for_91each2_87_73958_732261_732929;
c_7310420.elements[2] = ((closureN)self_735218)->elements[1];


closureN_type c_7311178;
object e_7311203 [1];
c_7311178.hdr.mark = gc_color_red;
 c_7311178.hdr.grayed = 0;
c_7311178.tag = closureN_tag;
 c_7311178.fn = (function_type)__lambda_633;
c_7311178.num_args = 4;
c_7311178.num_elements = 1;
c_7311178.elements = (object *)e_7311203;
c_7311178.elements[0] = ((closureN)self_735218)->elements[0];

return_direct_with_clo1(data,(closure)&c_7310420,__lambda_537,  &c_7311178);; 
}

static void __lambda_633(void *data, object self_735219, int argc, object *args) /* object self_735219, object k_734394, object f_73959_732262_732930, object vec_73960_732263_732931, object i_73961_732264_732932, object len_73962_732265_732933 */
 {
 object k_734394 = args[0]; object f_73959_732262_732930 = args[1]; object vec_73960_732263_732931 = args[2]; object i_73961_732264_732932 = args[3]; object len_73962_732265_732933 = args[4];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, i_73961_732264_732932, len_73962_732265_732933)) ){ 
  
closureN_type c_7311182;
object e_7311199 [6];
c_7311182.hdr.mark = gc_color_red;
 c_7311182.hdr.grayed = 0;
c_7311182.tag = closureN_tag;
 c_7311182.fn = (function_type)__lambda_634;
c_7311182.num_args = 1;
c_7311182.num_elements = 6;
c_7311182.elements = (object *)e_7311199;
c_7311182.elements[0] = f_73959_732262_732930;
c_7311182.elements[1] = ((closureN)self_735219)->elements[0];
c_7311182.elements[2] = i_73961_732264_732932;
c_7311182.elements[3] = k_734394;
c_7311182.elements[4] = len_73962_732265_732933;
c_7311182.elements[5] = vec_73960_732263_732931;



return_direct_with_clo1(data,(closure)&c_7311182,__lambda_634,  Cyc_vector_ref(data, vec_73960_732263_732931, i_73961_732264_732932));
} else { 
  return_direct_with_clo1(data,  k_734394, (((closure)  k_734394)->fn),  boolean_f);}
;; 
}

static void __lambda_634(void *data, object self_735220, int argc, object *args) /* object self_735220, object r_734398 */
 {
 object r_734398 = args[0];
  
closureN_type c_7311185;
object e_7311198 [6];
c_7311185.hdr.mark = gc_color_red;
 c_7311185.hdr.grayed = 0;
c_7311185.tag = closureN_tag;
 c_7311185.fn = (function_type)__lambda_635;
c_7311185.num_args = 1;
c_7311185.num_elements = 6;
c_7311185.elements = (object *)e_7311198;
c_7311185.elements[0] = ((closureN)self_735220)->elements[0];
c_7311185.elements[1] = ((closureN)self_735220)->elements[1];
c_7311185.elements[2] = ((closureN)self_735220)->elements[2];
c_7311185.elements[3] = ((closureN)self_735220)->elements[3];
c_7311185.elements[4] = ((closureN)self_735220)->elements[4];
c_7311185.elements[5] = ((closureN)self_735220)->elements[5];

return_closcall2(data,  ((closureN)self_735220)->elements[0],  &c_7311185, r_734398);; 
}

static void __lambda_635(void *data, object self_735221, int argc, object *args) /* object self_735221, object r_734396 */
 {

  


complex_num_type local_7311195; 
return_closcall5(data,  car(((closureN)self_735221)->elements[1]),  ((closureN)self_735221)->elements[3], ((closureN)self_735221)->elements[0], ((closureN)self_735221)->elements[5], Cyc_fast_sum(data,&local_7311195, ((closureN)self_735221)->elements[2], obj_int2obj(1)), ((closureN)self_735221)->elements[4]);; 
}

static void __lambda_537(void *data, object self_735222, int argc, object *args) /* object self_735222, object r_734393 */
 {
 object r_734393 = args[0];
  
closureN_type c_7310422;
object e_7311173 [3];
c_7310422.hdr.mark = gc_color_red;
 c_7310422.hdr.grayed = 0;
c_7310422.tag = closureN_tag;
 c_7310422.fn = (function_type)__lambda_538;
c_7310422.num_args = 1;
c_7310422.num_elements = 3;
c_7310422.elements = (object *)e_7311173;
c_7310422.elements[0] = ((closureN)self_735222)->elements[0];
c_7310422.elements[1] = ((closureN)self_735222)->elements[1];
c_7310422.elements[2] = ((closureN)self_735222)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310422,__lambda_538,  Cyc_set_cell(data, ((closureN)self_735222)->elements[0], r_734393));; 
}

static void __lambda_538(void *data, object self_735223, int argc, object *args) /* object self_735223, object r_734377 */
 {

  
closureN_type c_7310424;
object e_7311145 [3];
c_7310424.hdr.mark = gc_color_red;
 c_7310424.hdr.grayed = 0;
c_7310424.tag = closureN_tag;
 c_7310424.fn = (function_type)__lambda_539;
c_7310424.num_args = 1;
c_7310424.num_elements = 3;
c_7310424.elements = (object *)e_7311145;
c_7310424.elements[0] = ((closureN)self_735223)->elements[0];
c_7310424.elements[1] = ((closureN)self_735223)->elements[1];
c_7310424.elements[2] = ((closureN)self_735223)->elements[2];


closureN_type c_7311146;
object e_7311172 [1];
c_7311146.hdr.mark = gc_color_red;
 c_7311146.hdr.grayed = 0;
c_7311146.tag = closureN_tag;
 c_7311146.fn = (function_type)__lambda_630;
c_7311146.num_args = 4;
c_7311146.num_elements = 1;
c_7311146.elements = (object *)e_7311172;
c_7311146.elements[0] = ((closureN)self_735223)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310424,__lambda_539,  &c_7311146);; 
}

static void __lambda_630(void *data, object self_735224, int argc, object *args) /* object self_735224, object k_734388, object f_73966_732266_732934, object vecs_73967_732267_732935, object i_73968_732268_732936, object len_73969_732269_732937 */
 {
 object k_734388 = args[0]; object f_73966_732266_732934 = args[1]; object vecs_73967_732267_732935 = args[2]; object i_73968_732268_732936 = args[3]; object len_73969_732269_732937 = args[4];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, i_73968_732268_732936, len_73969_732269_732937)) ){ 
  
closureN_type c_7311150;
object e_7311170 [6];
c_7311150.hdr.mark = gc_color_red;
 c_7311150.hdr.grayed = 0;
c_7311150.tag = closureN_tag;
 c_7311150.fn = (function_type)__lambda_631;
c_7311150.num_args = 1;
c_7311150.num_elements = 6;
c_7311150.elements = (object *)e_7311170;
c_7311150.elements[0] = f_73966_732266_732934;
c_7311150.elements[1] = ((closureN)self_735224)->elements[0];
c_7311150.elements[2] = i_73968_732268_732936;
c_7311150.elements[3] = k_734388;
c_7311150.elements[4] = len_73969_732269_732937;
c_7311150.elements[5] = vecs_73967_732267_732935;

return_direct_with_clo3(data,  __glo_vectors_91ref_srfi_133, (((closure)  __glo_vectors_91ref_srfi_133)->fn),  &c_7311150, vecs_73967_732267_732935, i_73968_732268_732936);
} else { 
  return_direct_with_clo1(data,  k_734388, (((closure)  k_734388)->fn),  boolean_f);}
;; 
}

static void __lambda_631(void *data, object self_735225, int argc, object *args) /* object self_735225, object r_734392 */
 {
 object r_734392 = args[0];
  
closureN_type c_7311152;
object e_7311165 [6];
c_7311152.hdr.mark = gc_color_red;
 c_7311152.hdr.grayed = 0;
c_7311152.tag = closureN_tag;
 c_7311152.fn = (function_type)__lambda_632;
c_7311152.num_args = 1;
c_7311152.num_elements = 6;
c_7311152.elements = (object *)e_7311165;
c_7311152.elements[0] = ((closureN)self_735225)->elements[0];
c_7311152.elements[1] = ((closureN)self_735225)->elements[1];
c_7311152.elements[2] = ((closureN)self_735225)->elements[2];
c_7311152.elements[3] = ((closureN)self_735225)->elements[3];
c_7311152.elements[4] = ((closureN)self_735225)->elements[4];
c_7311152.elements[5] = ((closureN)self_735225)->elements[5];


object c_7311168 = apply(data,(closure)&c_7311152,((closureN)self_735225)->elements[0], r_734392);
return_closcall1(data,(closure)&c_7311152,  c_7311168);; 
}

static void __lambda_632(void *data, object self_735226, int argc, object *args) /* object self_735226, object r_734390 */
 {

  


complex_num_type local_7311162; 
return_closcall5(data,  car(((closureN)self_735226)->elements[1]),  ((closureN)self_735226)->elements[3], ((closureN)self_735226)->elements[0], ((closureN)self_735226)->elements[5], Cyc_fast_sum(data,&local_7311162, ((closureN)self_735226)->elements[2], obj_int2obj(1)), ((closureN)self_735226)->elements[4]);; 
}

static void __lambda_539(void *data, object self_735227, int argc, object *args) /* object self_735227, object r_734387 */
 {
 object r_734387 = args[0];
  
closureN_type c_7310426;
object e_7311141 [3];
c_7310426.hdr.mark = gc_color_red;
 c_7310426.hdr.grayed = 0;
c_7310426.tag = closureN_tag;
 c_7310426.fn = (function_type)__lambda_540;
c_7310426.num_args = 1;
c_7310426.num_elements = 3;
c_7310426.elements = (object *)e_7311141;
c_7310426.elements[0] = ((closureN)self_735227)->elements[0];
c_7310426.elements[1] = ((closureN)self_735227)->elements[1];
c_7310426.elements[2] = ((closureN)self_735227)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310426,__lambda_540,  Cyc_set_cell(data, ((closureN)self_735227)->elements[1], r_734387));; 
}

static void __lambda_540(void *data, object self_735228, int argc, object *args) /* object self_735228, object r_734378 */
 {

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


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

return_direct_with_clo1(data,(closure)&c_7310428,__lambda_541,  &c_7311092);; 
}

static void __lambda_623(void *data, object self_735229, int argc, object *args) /* object self_735229, object k_734379, object f_73973_732270_732938, object vec_73974_732271_732939, object vectors_73975_732272_732940_raw, ... */
 {
 object k_734379 = args[0]; object f_73973_732270_732938 = args[1]; object vec_73974_732271_732939 = args[2];
load_varargs(vectors_73975_732272_732940, args, 3, argc - 3);
  
closureN_type c_7311094;
object e_7311139 [5];
c_7311094.hdr.mark = gc_color_red;
 c_7311094.hdr.grayed = 0;
c_7311094.tag = closureN_tag;
 c_7311094.fn = (function_type)__lambda_624;
c_7311094.num_args = 1;
c_7311094.num_elements = 5;
c_7311094.elements = (object *)e_7311139;
c_7311094.elements[0] = ((closureN)self_735229)->elements[0];
c_7311094.elements[1] = ((closureN)self_735229)->elements[1];
c_7311094.elements[2] = k_734379;
c_7311094.elements[3] = vec_73974_732271_732939;
c_7311094.elements[4] = vectors_73975_732272_732940;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7311094, primitive_procedure_127, f_73973_732270_732938, __glo_vector_91for_91each_srfi_133);; 
}

static void __lambda_624(void *data, object self_735230, int argc, object *args) /* object self_735230, object r_734380 */
 {
 object r_734380 = args[0];
  
closureN_type c_7311096;
object e_7311137 [5];
c_7311096.hdr.mark = gc_color_red;
 c_7311096.hdr.grayed = 0;
c_7311096.tag = closureN_tag;
 c_7311096.fn = (function_type)__lambda_625;
c_7311096.num_args = 1;
c_7311096.num_elements = 5;
c_7311096.elements = (object *)e_7311137;
c_7311096.elements[0] = ((closureN)self_735230)->elements[0];
c_7311096.elements[1] = ((closureN)self_735230)->elements[1];
c_7311096.elements[2] = ((closureN)self_735230)->elements[2];
c_7311096.elements[3] = r_734380;
c_7311096.elements[4] = ((closureN)self_735230)->elements[4];

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7311096, primitive_vector_127, ((closureN)self_735230)->elements[3], __glo_vector_91for_91each_srfi_133);; 
}

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

return_direct_with_clo2(data,(closure)&c_7311098,__lambda_626,  ((closureN)self_735231)->elements[3], r_734381);; 
}

static void __lambda_626(void *data, object self_735232, int argc, object *args) /* object self_735232, object f_73976_732273_732941, object vec_73977_732274_732942 */
 {
 object f_73976_732273_732941 = args[0]; object vec_73977_732274_732942 = args[1];
    
if( (boolean_f != Cyc_is_null(((closureN)self_735232)->elements[3])) ){ 
  
closureN_type c_7311103;
object e_7311111 [4];
c_7311103.hdr.mark = gc_color_red;
 c_7311103.hdr.grayed = 0;
c_7311103.tag = closureN_tag;
 c_7311103.fn = (function_type)__lambda_627;
c_7311103.num_args = 1;
c_7311103.num_elements = 4;
c_7311103.elements = (object *)e_7311111;
c_7311103.elements[0] = f_73976_732273_732941;
c_7311103.elements[1] = ((closureN)self_735232)->elements[0];
c_7311103.elements[2] = ((closureN)self_735232)->elements[2];
c_7311103.elements[3] = vec_73977_732274_732942;



return_direct_with_clo1(data,(closure)&c_7311103,__lambda_627,  Cyc_vector_length(data, vec_73977_732274_732942));
} else { 
  
closureN_type c_7311115;
object e_7311130 [5];
c_7311115.hdr.mark = gc_color_red;
 c_7311115.hdr.grayed = 0;
c_7311115.tag = closureN_tag;
 c_7311115.fn = (function_type)__lambda_628;
c_7311115.num_args = 1;
c_7311115.num_elements = 5;
c_7311115.elements = (object *)e_7311130;
c_7311115.elements[0] = f_73976_732273_732941;
c_7311115.elements[1] = ((closureN)self_735232)->elements[1];
c_7311115.elements[2] = ((closureN)self_735232)->elements[2];
c_7311115.elements[3] = vec_73977_732274_732942;
c_7311115.elements[4] = ((closureN)self_735232)->elements[3];


pair_type local_7311133; 
return_direct_with_clo1(data,(closure)&c_7311115,__lambda_628,  set_pair_as_expr(&local_7311133, vec_73977_732274_732942, ((closureN)self_735232)->elements[3]));}
;; 
}

static void __lambda_628(void *data, object self_735234, int argc, object *args) /* object self_735234, object r_734384 */
 {
 object r_734384 = args[0];
  
closureN_type c_7311117;
object e_7311125 [4];
c_7311117.hdr.mark = gc_color_red;
 c_7311117.hdr.grayed = 0;
c_7311117.tag = closureN_tag;
 c_7311117.fn = (function_type)__lambda_629;
c_7311117.num_args = 1;
c_7311117.num_elements = 4;
c_7311117.elements = (object *)e_7311125;
c_7311117.elements[0] = ((closureN)self_735234)->elements[0];
c_7311117.elements[1] = ((closureN)self_735234)->elements[1];
c_7311117.elements[2] = ((closureN)self_735234)->elements[2];
c_7311117.elements[3] = r_734384;



return_direct_with_clo4(data,  __glo__75smallest_91length_srfi_133, (((closure)  __glo__75smallest_91length_srfi_133)->fn),  &c_7311117, ((closureN)self_735234)->elements[4], Cyc_vector_length(data, ((closureN)self_735234)->elements[3]), __glo_vector_91for_91each_srfi_133);; 
}

static void __lambda_629(void *data, object self_735235, int argc, object *args) /* object self_735235, object r_734385 */
 {
 object r_734385 = args[0];
  

return_closcall5(data,  car(((closureN)self_735235)->elements[1]),  ((closureN)self_735235)->elements[2], ((closureN)self_735235)->elements[0], ((closureN)self_735235)->elements[3], obj_int2obj(0), r_734385);; 
}

static void __lambda_627(void *data, object self_735233, int argc, object *args) /* object self_735233, object r_734383 */
 {
 object r_734383 = args[0];
  

return_closcall5(data,  car(((closureN)self_735233)->elements[1]),  ((closureN)self_735233)->elements[2], ((closureN)self_735233)->elements[0], ((closureN)self_735233)->elements[3], obj_int2obj(0), r_734383);; 
}

static void __lambda_541(void *data, object self_735236, int argc, object *args) /* object self_735236, object r_734376 */
 {
 object r_734376 = args[0];
  
closureN_type c_7310430;
object e_7311087 [1];
c_7310430.hdr.mark = gc_color_red;
 c_7310430.hdr.grayed = 0;
c_7310430.tag = closureN_tag;
 c_7310430.fn = (function_type)__lambda_542;
c_7310430.num_args = 1;
c_7310430.num_elements = 1;
c_7310430.elements = (object *)e_7311087;
c_7310430.elements[0] = ((closureN)self_735236)->elements[0];


object c_7311090 = global_set_cps_id(data,(closure)&c_7310430,"__glo_vector_91for_91each_srfi_133", __glo_vector_91for_91each_srfi_133, r_734376);
return_closcall1(data,(closure)&c_7310430,  c_7311090);; 
}

static void __lambda_542(void *data, object self_735237, int argc, object *args) /* object self_735237, object r_734266 */
 {

  
closureN_type c_7310432;
object e_7311086 [1];
c_7310432.hdr.mark = gc_color_red;
 c_7310432.hdr.grayed = 0;
c_7310432.tag = closureN_tag;
 c_7310432.fn = (function_type)__lambda_543;
c_7310432.num_args = 2;
c_7310432.num_elements = 1;
c_7310432.elements = (object *)e_7311086;
c_7310432.elements[0] = ((closureN)self_735237)->elements[0];

return_direct_with_clo2(data,(closure)&c_7310432,__lambda_543,  boolean_f, boolean_f);; 
}

static void __lambda_543(void *data, object self_735238, int argc, object *args) /* object self_735238, object loop1_731017_732275_732943, object loop2_87_731018_732276_732944 */
 {
 object loop1_731017_732275_732943 = args[0]; object loop2_87_731018_732276_732944 = args[1];
  
closureN_type c_7310434;
object e_7311082 [2];
c_7310434.hdr.mark = gc_color_red;
 c_7310434.hdr.grayed = 0;
c_7310434.tag = closureN_tag;
 c_7310434.fn = (function_type)__lambda_753;
c_7310434.num_args = 1;
c_7310434.num_elements = 2;
c_7310434.elements = (object *)e_7311082;
c_7310434.elements[0] = ((closureN)self_735238)->elements[0];
c_7310434.elements[1] = loop2_87_731018_732276_732944;


pair_type local_7311085; 
return_direct_with_clo1(data,(closure)&c_7310434,__lambda_753,  set_cell_as_expr(&local_7311085, loop1_731017_732275_732943));; 
}

static void __lambda_753(void *data, object self_735239, int argc, object *args) /* object self_735239, object loop1_731017_732275_732943 */
 {
 object loop1_731017_732275_732943 = args[0];
  
closureN_type c_7310436;
object e_7311077 [2];
c_7310436.hdr.mark = gc_color_red;
 c_7310436.hdr.grayed = 0;
c_7310436.tag = closureN_tag;
 c_7310436.fn = (function_type)__lambda_752;
c_7310436.num_args = 1;
c_7310436.num_elements = 2;
c_7310436.elements = (object *)e_7311077;
c_7310436.elements[0] = ((closureN)self_735239)->elements[0];
c_7310436.elements[1] = loop1_731017_732275_732943;


pair_type local_7311080; 
return_direct_with_clo1(data,(closure)&c_7310436,__lambda_752,  set_cell_as_expr(&local_7311080, ((closureN)self_735239)->elements[1]));; 
}

static void __lambda_752(void *data, object self_735240, int argc, object *args) /* object self_735240, object loop2_87_731018_732276_732944 */
 {
 object loop2_87_731018_732276_732944 = args[0];
  
closureN_type c_7310438;
object e_7311047 [3];
c_7310438.hdr.mark = gc_color_red;
 c_7310438.hdr.grayed = 0;
c_7310438.tag = closureN_tag;
 c_7310438.fn = (function_type)__lambda_544;
c_7310438.num_args = 1;
c_7310438.num_elements = 3;
c_7310438.elements = (object *)e_7311047;
c_7310438.elements[0] = ((closureN)self_735240)->elements[0];
c_7310438.elements[1] = ((closureN)self_735240)->elements[1];
c_7310438.elements[2] = loop2_87_731018_732276_732944;


closureN_type c_7311048;
object e_7311076 [1];
c_7311048.hdr.mark = gc_color_red;
 c_7311048.hdr.grayed = 0;
c_7311048.tag = closureN_tag;
 c_7311048.fn = (function_type)__lambda_620;
c_7311048.num_args = 4;
c_7311048.num_elements = 1;
c_7311048.elements = (object *)e_7311076;
c_7311048.elements[0] = ((closureN)self_735240)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310438,__lambda_544,  &c_7311048);; 
}

static void __lambda_620(void *data, object self_735241, int argc, object *args) /* object self_735241, object k_734371, object pred_127_731019_732277_732945, object vec_731020_732278_732946, object len_731021_732279_732947, object i_731022_732280_732948 */
 {
 object k_734371 = args[0]; object pred_127_731019_732277_732945 = args[1]; object vec_731020_732278_732946 = args[2]; object len_731021_732279_732947 = args[3]; object i_731022_732280_732948 = args[4];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, i_731022_732280_732948, len_731021_732279_732947)) ){ 
  return_direct_with_clo1(data,  k_734371, (((closure)  k_734371)->fn),  boolean_f);
} else { 
  
closureN_type c_7311053;
object e_7311073 [6];
c_7311053.hdr.mark = gc_color_red;
 c_7311053.hdr.grayed = 0;
c_7311053.tag = closureN_tag;
 c_7311053.fn = (function_type)__lambda_621;
c_7311053.num_args = 1;
c_7311053.num_elements = 6;
c_7311053.elements = (object *)e_7311073;
c_7311053.elements[0] = i_731022_732280_732948;
c_7311053.elements[1] = k_734371;
c_7311053.elements[2] = len_731021_732279_732947;
c_7311053.elements[3] = ((closureN)self_735241)->elements[0];
c_7311053.elements[4] = pred_127_731019_732277_732945;
c_7311053.elements[5] = vec_731020_732278_732946;



return_direct_with_clo1(data,(closure)&c_7311053,__lambda_621,  Cyc_vector_ref(data, vec_731020_732278_732946, i_731022_732280_732948));}
;; 
}

static void __lambda_621(void *data, object self_735242, int argc, object *args) /* object self_735242, object r_734375 */
 {
 object r_734375 = args[0];
  
closureN_type c_7311056;
object e_7311072 [6];
c_7311056.hdr.mark = gc_color_red;
 c_7311056.hdr.grayed = 0;
c_7311056.tag = closureN_tag;
 c_7311056.fn = (function_type)__lambda_622;
c_7311056.num_args = 1;
c_7311056.num_elements = 6;
c_7311056.elements = (object *)e_7311072;
c_7311056.elements[0] = ((closureN)self_735242)->elements[0];
c_7311056.elements[1] = ((closureN)self_735242)->elements[1];
c_7311056.elements[2] = ((closureN)self_735242)->elements[2];
c_7311056.elements[3] = ((closureN)self_735242)->elements[3];
c_7311056.elements[4] = ((closureN)self_735242)->elements[4];
c_7311056.elements[5] = ((closureN)self_735242)->elements[5];

return_closcall2(data,  ((closureN)self_735242)->elements[4],  &c_7311056, r_734375);; 
}

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


complex_num_type local_7311070; 
return_closcall5(data,  car(((closureN)self_735243)->elements[3]),  ((closureN)self_735243)->elements[1], ((closureN)self_735243)->elements[4], ((closureN)self_735243)->elements[5], ((closureN)self_735243)->elements[2], Cyc_fast_sum(data,&local_7311070, ((closureN)self_735243)->elements[0], obj_int2obj(1)));}
;; 
}

static void __lambda_544(void *data, object self_735244, int argc, object *args) /* object self_735244, object r_734370 */
 {
 object r_734370 = args[0];
  
closureN_type c_7310440;
object e_7311043 [3];
c_7310440.hdr.mark = gc_color_red;
 c_7310440.hdr.grayed = 0;
c_7310440.tag = closureN_tag;
 c_7310440.fn = (function_type)__lambda_545;
c_7310440.num_args = 1;
c_7310440.num_elements = 3;
c_7310440.elements = (object *)e_7311043;
c_7310440.elements[0] = ((closureN)self_735244)->elements[0];
c_7310440.elements[1] = ((closureN)self_735244)->elements[1];
c_7310440.elements[2] = ((closureN)self_735244)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310440,__lambda_545,  Cyc_set_cell(data, ((closureN)self_735244)->elements[1], r_734370));; 
}

static void __lambda_545(void *data, object self_735245, int argc, object *args) /* object self_735245, object r_734354 */
 {

  
closureN_type c_7310442;
object e_7311012 [3];
c_7310442.hdr.mark = gc_color_red;
 c_7310442.hdr.grayed = 0;
c_7310442.tag = closureN_tag;
 c_7310442.fn = (function_type)__lambda_546;
c_7310442.num_args = 1;
c_7310442.num_elements = 3;
c_7310442.elements = (object *)e_7311012;
c_7310442.elements[0] = ((closureN)self_735245)->elements[0];
c_7310442.elements[1] = ((closureN)self_735245)->elements[1];
c_7310442.elements[2] = ((closureN)self_735245)->elements[2];


closureN_type c_7311013;
object e_7311042 [1];
c_7311013.hdr.mark = gc_color_red;
 c_7311013.hdr.grayed = 0;
c_7311013.tag = closureN_tag;
 c_7311013.fn = (function_type)__lambda_617;
c_7311013.num_args = 4;
c_7311013.num_elements = 1;
c_7311013.elements = (object *)e_7311042;
c_7311013.elements[0] = ((closureN)self_735245)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310442,__lambda_546,  &c_7311013);; 
}

static void __lambda_617(void *data, object self_735246, int argc, object *args) /* object self_735246, object k_734365, object pred_127_731030_732281_732949, object vectors_731031_732282_732950, object len_731032_732283_732951, object i_731033_732284_732952 */
 {
 object k_734365 = args[0]; object pred_127_731030_732281_732949 = args[1]; object vectors_731031_732282_732950 = args[2]; object len_731032_732283_732951 = args[3]; object i_731033_732284_732952 = args[4];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, i_731033_732284_732952, len_731032_732283_732951)) ){ 
  return_direct_with_clo1(data,  k_734365, (((closure)  k_734365)->fn),  boolean_f);
} else { 
  
closureN_type c_7311018;
object e_7311041 [6];
c_7311018.hdr.mark = gc_color_red;
 c_7311018.hdr.grayed = 0;
c_7311018.tag = closureN_tag;
 c_7311018.fn = (function_type)__lambda_618;
c_7311018.num_args = 1;
c_7311018.num_elements = 6;
c_7311018.elements = (object *)e_7311041;
c_7311018.elements[0] = i_731033_732284_732952;
c_7311018.elements[1] = k_734365;
c_7311018.elements[2] = len_731032_732283_732951;
c_7311018.elements[3] = ((closureN)self_735246)->elements[0];
c_7311018.elements[4] = pred_127_731030_732281_732949;
c_7311018.elements[5] = vectors_731031_732282_732950;

return_direct_with_clo3(data,  __glo_vectors_91ref_srfi_133, (((closure)  __glo_vectors_91ref_srfi_133)->fn),  &c_7311018, vectors_731031_732282_732950, i_731033_732284_732952);}
;; 
}

static void __lambda_618(void *data, object self_735247, int argc, object *args) /* object self_735247, object r_734369 */
 {
 object r_734369 = args[0];
  
closureN_type c_7311020;
object e_7311036 [6];
c_7311020.hdr.mark = gc_color_red;
 c_7311020.hdr.grayed = 0;
c_7311020.tag = closureN_tag;
 c_7311020.fn = (function_type)__lambda_619;
c_7311020.num_args = 1;
c_7311020.num_elements = 6;
c_7311020.elements = (object *)e_7311036;
c_7311020.elements[0] = ((closureN)self_735247)->elements[0];
c_7311020.elements[1] = ((closureN)self_735247)->elements[1];
c_7311020.elements[2] = ((closureN)self_735247)->elements[2];
c_7311020.elements[3] = ((closureN)self_735247)->elements[3];
c_7311020.elements[4] = ((closureN)self_735247)->elements[4];
c_7311020.elements[5] = ((closureN)self_735247)->elements[5];


object c_7311039 = apply(data,(closure)&c_7311020,((closureN)self_735247)->elements[4], r_734369);
return_closcall1(data,(closure)&c_7311020,  c_7311039);; 
}

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


complex_num_type local_7311034; 
return_closcall5(data,  car(((closureN)self_735248)->elements[3]),  ((closureN)self_735248)->elements[1], ((closureN)self_735248)->elements[4], ((closureN)self_735248)->elements[5], ((closureN)self_735248)->elements[2], Cyc_fast_sum(data,&local_7311034, ((closureN)self_735248)->elements[0], obj_int2obj(1)));}
;; 
}

static void __lambda_546(void *data, object self_735249, int argc, object *args) /* object self_735249, object r_734364 */
 {
 object r_734364 = args[0];
  
closureN_type c_7310444;
object e_7311008 [3];
c_7310444.hdr.mark = gc_color_red;
 c_7310444.hdr.grayed = 0;
c_7310444.tag = closureN_tag;
 c_7310444.fn = (function_type)__lambda_547;
c_7310444.num_args = 1;
c_7310444.num_elements = 3;
c_7310444.elements = (object *)e_7311008;
c_7310444.elements[0] = ((closureN)self_735249)->elements[0];
c_7310444.elements[1] = ((closureN)self_735249)->elements[1];
c_7310444.elements[2] = ((closureN)self_735249)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310444,__lambda_547,  Cyc_set_cell(data, ((closureN)self_735249)->elements[2], r_734364));; 
}

static void __lambda_547(void *data, object self_735250, int argc, object *args) /* object self_735250, object r_734355 */
 {

  
closureN_type c_7310446;
object e_7310956 [1];
c_7310446.hdr.mark = gc_color_red;
 c_7310446.hdr.grayed = 0;
c_7310446.tag = closureN_tag;
 c_7310446.fn = (function_type)__lambda_548;
c_7310446.num_args = 1;
c_7310446.num_elements = 1;
c_7310446.elements = (object *)e_7310956;
c_7310446.elements[0] = ((closureN)self_735250)->elements[0];


closureN_type c_7310957;
object e_7311007 [2];
c_7310957.hdr.mark = gc_color_red;
 c_7310957.hdr.grayed = 0;
c_7310957.tag = closureN_tag;
 c_7310957.fn = (function_type)__lambda_610;
c_7310957.num_args = 4;
c_7310957.num_elements = 2;
c_7310957.elements = (object *)e_7311007;
c_7310957.elements[0] = ((closureN)self_735250)->elements[1];
c_7310957.elements[1] = ((closureN)self_735250)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310446,__lambda_548,  &c_7310957);; 
}

static void __lambda_610(void *data, object self_735251, int argc, object *args) /* object self_735251, object k_734356, object pred_127_731041_732285_732953, object vec_731042_732286_732954, object vectors_731043_732287_732955, object callee_731044_732288_732956 */
 {
 object k_734356 = args[0]; object pred_127_731041_732285_732953 = args[1]; object vec_731042_732286_732954 = args[2]; object vectors_731043_732287_732955 = args[3]; object callee_731044_732288_732956 = args[4];
  
closureN_type c_7310959;
object e_7311006 [6];
c_7310959.hdr.mark = gc_color_red;
 c_7310959.hdr.grayed = 0;
c_7310959.tag = closureN_tag;
 c_7310959.fn = (function_type)__lambda_611;
c_7310959.num_args = 1;
c_7310959.num_elements = 6;
c_7310959.elements = (object *)e_7311006;
c_7310959.elements[0] = callee_731044_732288_732956;
c_7310959.elements[1] = k_734356;
c_7310959.elements[2] = ((closureN)self_735251)->elements[0];
c_7310959.elements[3] = ((closureN)self_735251)->elements[1];
c_7310959.elements[4] = vec_731042_732286_732954;
c_7310959.elements[5] = vectors_731043_732287_732955;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7310959, primitive_procedure_127, pred_127_731041_732285_732953, callee_731044_732288_732956);; 
}

static void __lambda_611(void *data, object self_735252, int argc, object *args) /* object self_735252, object r_734357 */
 {
 object r_734357 = args[0];
  
closureN_type c_7310961;
object e_7311003 [6];
c_7310961.hdr.mark = gc_color_red;
 c_7310961.hdr.grayed = 0;
c_7310961.tag = closureN_tag;
 c_7310961.fn = (function_type)__lambda_612;
c_7310961.num_args = 1;
c_7310961.num_elements = 6;
c_7310961.elements = (object *)e_7311003;
c_7310961.elements[0] = ((closureN)self_735252)->elements[0];
c_7310961.elements[1] = ((closureN)self_735252)->elements[1];
c_7310961.elements[2] = ((closureN)self_735252)->elements[2];
c_7310961.elements[3] = ((closureN)self_735252)->elements[3];
c_7310961.elements[4] = r_734357;
c_7310961.elements[5] = ((closureN)self_735252)->elements[5];

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7310961, primitive_vector_127, ((closureN)self_735252)->elements[4], ((closureN)self_735252)->elements[0]);; 
}

static void __lambda_612(void *data, object self_735253, int argc, object *args) /* object self_735253, object r_734358 */
 {
 object r_734358 = args[0];
  
closureN_type c_7310963;
object e_7311001 [5];
c_7310963.hdr.mark = gc_color_red;
 c_7310963.hdr.grayed = 0;
c_7310963.tag = closureN_tag;
 c_7310963.fn = (function_type)__lambda_613;
c_7310963.num_args = 2;
c_7310963.num_elements = 5;
c_7310963.elements = (object *)e_7311001;
c_7310963.elements[0] = ((closureN)self_735253)->elements[0];
c_7310963.elements[1] = ((closureN)self_735253)->elements[1];
c_7310963.elements[2] = ((closureN)self_735253)->elements[2];
c_7310963.elements[3] = ((closureN)self_735253)->elements[3];
c_7310963.elements[4] = ((closureN)self_735253)->elements[5];

return_direct_with_clo2(data,(closure)&c_7310963,__lambda_613,  ((closureN)self_735253)->elements[4], r_734358);; 
}

static void __lambda_613(void *data, object self_735254, int argc, object *args) /* object self_735254, object pred_127_731045_732289_732957, object vec_731046_732290_732958 */
 {
 object pred_127_731045_732289_732957 = args[0]; object vec_731046_732290_732958 = args[1];
    
if( (boolean_f != Cyc_is_null(((closureN)self_735254)->elements[4])) ){ 
  
closureN_type c_7310968;
object e_7310976 [4];
c_7310968.hdr.mark = gc_color_red;
 c_7310968.hdr.grayed = 0;
c_7310968.tag = closureN_tag;
 c_7310968.fn = (function_type)__lambda_614;
c_7310968.num_args = 1;
c_7310968.num_elements = 4;
c_7310968.elements = (object *)e_7310976;
c_7310968.elements[0] = ((closureN)self_735254)->elements[1];
c_7310968.elements[1] = ((closureN)self_735254)->elements[2];
c_7310968.elements[2] = pred_127_731045_732289_732957;
c_7310968.elements[3] = vec_731046_732290_732958;



return_direct_with_clo1(data,(closure)&c_7310968,__lambda_614,  Cyc_vector_length(data, vec_731046_732290_732958));
} else { 
  
closureN_type c_7310980;
object e_7310996 [6];
c_7310980.hdr.mark = gc_color_red;
 c_7310980.hdr.grayed = 0;
c_7310980.tag = closureN_tag;
 c_7310980.fn = (function_type)__lambda_615;
c_7310980.num_args = 1;
c_7310980.num_elements = 6;
c_7310980.elements = (object *)e_7310996;
c_7310980.elements[0] = ((closureN)self_735254)->elements[0];
c_7310980.elements[1] = ((closureN)self_735254)->elements[1];
c_7310980.elements[2] = ((closureN)self_735254)->elements[3];
c_7310980.elements[3] = pred_127_731045_732289_732957;
c_7310980.elements[4] = vec_731046_732290_732958;
c_7310980.elements[5] = ((closureN)self_735254)->elements[4];


pair_type local_7310999; 
return_direct_with_clo1(data,(closure)&c_7310980,__lambda_615,  set_pair_as_expr(&local_7310999, vec_731046_732290_732958, ((closureN)self_735254)->elements[4]));}
;; 
}

static void __lambda_615(void *data, object self_735256, int argc, object *args) /* object self_735256, object r_734361 */
 {
 object r_734361 = args[0];
  
closureN_type c_7310982;
object e_7310990 [4];
c_7310982.hdr.mark = gc_color_red;
 c_7310982.hdr.grayed = 0;
c_7310982.tag = closureN_tag;
 c_7310982.fn = (function_type)__lambda_616;
c_7310982.num_args = 1;
c_7310982.num_elements = 4;
c_7310982.elements = (object *)e_7310990;
c_7310982.elements[0] = ((closureN)self_735256)->elements[1];
c_7310982.elements[1] = ((closureN)self_735256)->elements[2];
c_7310982.elements[2] = ((closureN)self_735256)->elements[3];
c_7310982.elements[3] = r_734361;



return_direct_with_clo4(data,  __glo__75smallest_91length_srfi_133, (((closure)  __glo__75smallest_91length_srfi_133)->fn),  &c_7310982, ((closureN)self_735256)->elements[5], Cyc_vector_length(data, ((closureN)self_735256)->elements[4]), ((closureN)self_735256)->elements[0]);; 
}

static void __lambda_616(void *data, object self_735257, int argc, object *args) /* object self_735257, object r_734362 */
 {
 object r_734362 = args[0];
  

return_closcall5(data,  car(((closureN)self_735257)->elements[1]),  ((closureN)self_735257)->elements[0], ((closureN)self_735257)->elements[2], ((closureN)self_735257)->elements[3], r_734362, obj_int2obj(0));; 
}

static void __lambda_614(void *data, object self_735255, int argc, object *args) /* object self_735255, object r_734360 */
 {
 object r_734360 = args[0];
  

return_closcall5(data,  car(((closureN)self_735255)->elements[1]),  ((closureN)self_735255)->elements[0], ((closureN)self_735255)->elements[2], ((closureN)self_735255)->elements[3], r_734360, obj_int2obj(0));; 
}

static void __lambda_548(void *data, object self_735258, int argc, object *args) /* object self_735258, object r_734353 */
 {
 object r_734353 = args[0];
  
closureN_type c_7310448;
object e_7310952 [1];
c_7310448.hdr.mark = gc_color_red;
 c_7310448.hdr.grayed = 0;
c_7310448.tag = closureN_tag;
 c_7310448.fn = (function_type)__lambda_549;
c_7310448.num_args = 1;
c_7310448.num_elements = 1;
c_7310448.elements = (object *)e_7310952;
c_7310448.elements[0] = ((closureN)self_735258)->elements[0];


object c_7310955 = global_set_cps_id(data,(closure)&c_7310448,"__glo_vector_91index_95skip_srfi_133", __glo_vector_91index_95skip_srfi_133, r_734353);
return_closcall1(data,(closure)&c_7310448,  c_7310955);; 
}

static void __lambda_549(void *data, object self_735259, int argc, object *args) /* object self_735259, object r_734267 */
 {

  
closureN_type c_7310450;
object e_7310951 [1];
c_7310450.hdr.mark = gc_color_red;
 c_7310450.hdr.grayed = 0;
c_7310450.tag = closureN_tag;
 c_7310450.fn = (function_type)__lambda_550;
c_7310450.num_args = 2;
c_7310450.num_elements = 1;
c_7310450.elements = (object *)e_7310951;
c_7310450.elements[0] = ((closureN)self_735259)->elements[0];

return_direct_with_clo2(data,(closure)&c_7310450,__lambda_550,  boolean_f, boolean_f);; 
}

static void __lambda_550(void *data, object self_735260, int argc, object *args) /* object self_735260, object loop1_731054_732291_732959, object loop2_87_731055_732292_732960 */
 {
 object loop1_731054_732291_732959 = args[0]; object loop2_87_731055_732292_732960 = args[1];
  
closureN_type c_7310452;
object e_7310947 [2];
c_7310452.hdr.mark = gc_color_red;
 c_7310452.hdr.grayed = 0;
c_7310452.tag = closureN_tag;
 c_7310452.fn = (function_type)__lambda_751;
c_7310452.num_args = 1;
c_7310452.num_elements = 2;
c_7310452.elements = (object *)e_7310947;
c_7310452.elements[0] = ((closureN)self_735260)->elements[0];
c_7310452.elements[1] = loop2_87_731055_732292_732960;


pair_type local_7310950; 
return_direct_with_clo1(data,(closure)&c_7310452,__lambda_751,  set_cell_as_expr(&local_7310950, loop1_731054_732291_732959));; 
}

static void __lambda_751(void *data, object self_735261, int argc, object *args) /* object self_735261, object loop1_731054_732291_732959 */
 {
 object loop1_731054_732291_732959 = args[0];
  
closureN_type c_7310454;
object e_7310942 [2];
c_7310454.hdr.mark = gc_color_red;
 c_7310454.hdr.grayed = 0;
c_7310454.tag = closureN_tag;
 c_7310454.fn = (function_type)__lambda_750;
c_7310454.num_args = 1;
c_7310454.num_elements = 2;
c_7310454.elements = (object *)e_7310942;
c_7310454.elements[0] = ((closureN)self_735261)->elements[0];
c_7310454.elements[1] = loop1_731054_732291_732959;


pair_type local_7310945; 
return_direct_with_clo1(data,(closure)&c_7310454,__lambda_750,  set_cell_as_expr(&local_7310945, ((closureN)self_735261)->elements[1]));; 
}

static void __lambda_750(void *data, object self_735262, int argc, object *args) /* object self_735262, object loop2_87_731055_732292_732960 */
 {
 object loop2_87_731055_732292_732960 = args[0];
  
closureN_type c_7310456;
object e_7310912 [3];
c_7310456.hdr.mark = gc_color_red;
 c_7310456.hdr.grayed = 0;
c_7310456.tag = closureN_tag;
 c_7310456.fn = (function_type)__lambda_551;
c_7310456.num_args = 1;
c_7310456.num_elements = 3;
c_7310456.elements = (object *)e_7310912;
c_7310456.elements[0] = ((closureN)self_735262)->elements[0];
c_7310456.elements[1] = ((closureN)self_735262)->elements[1];
c_7310456.elements[2] = loop2_87_731055_732292_732960;


closureN_type c_7310913;
object e_7310941 [1];
c_7310913.hdr.mark = gc_color_red;
 c_7310913.hdr.grayed = 0;
c_7310913.tag = closureN_tag;
 c_7310913.fn = (function_type)__lambda_607;
c_7310913.num_args = 3;
c_7310913.num_elements = 1;
c_7310913.elements = (object *)e_7310941;
c_7310913.elements[0] = ((closureN)self_735262)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310456,__lambda_551,  &c_7310913);; 
}

static void __lambda_607(void *data, object self_735263, int argc, object *args) /* object self_735263, object k_734348, object pred_127_731056_732293_732961, object vec_731057_732294_732962, object i_731058_732295_732963 */
 {
 object k_734348 = args[0]; object pred_127_731056_732293_732961 = args[1]; object vec_731057_732294_732962 = args[2]; object i_731058_732295_732963 = args[3];
    complex_num_type local_7310916; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_negative_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7310916, i_731058_732295_732963)) ){ 
  return_direct_with_clo1(data,  k_734348, (((closure)  k_734348)->fn),  boolean_f);
} else { 
  
closureN_type c_7310919;
object e_7310938 [5];
c_7310919.hdr.mark = gc_color_red;
 c_7310919.hdr.grayed = 0;
c_7310919.tag = closureN_tag;
 c_7310919.fn = (function_type)__lambda_608;
c_7310919.num_args = 1;
c_7310919.num_elements = 5;
c_7310919.elements = (object *)e_7310938;
c_7310919.elements[0] = i_731058_732295_732963;
c_7310919.elements[1] = k_734348;
c_7310919.elements[2] = ((closureN)self_735263)->elements[0];
c_7310919.elements[3] = pred_127_731056_732293_732961;
c_7310919.elements[4] = vec_731057_732294_732962;



return_direct_with_clo1(data,(closure)&c_7310919,__lambda_608,  Cyc_vector_ref(data, vec_731057_732294_732962, i_731058_732295_732963));}
;; 
}

static void __lambda_608(void *data, object self_735264, int argc, object *args) /* object self_735264, object r_734352 */
 {
 object r_734352 = args[0];
  
closureN_type c_7310922;
object e_7310937 [5];
c_7310922.hdr.mark = gc_color_red;
 c_7310922.hdr.grayed = 0;
c_7310922.tag = closureN_tag;
 c_7310922.fn = (function_type)__lambda_609;
c_7310922.num_args = 1;
c_7310922.num_elements = 5;
c_7310922.elements = (object *)e_7310937;
c_7310922.elements[0] = ((closureN)self_735264)->elements[0];
c_7310922.elements[1] = ((closureN)self_735264)->elements[1];
c_7310922.elements[2] = ((closureN)self_735264)->elements[2];
c_7310922.elements[3] = ((closureN)self_735264)->elements[3];
c_7310922.elements[4] = ((closureN)self_735264)->elements[4];

return_closcall2(data,  ((closureN)self_735264)->elements[3],  &c_7310922, r_734352);; 
}

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


complex_num_type local_7310935; 
return_closcall4(data,  car(((closureN)self_735265)->elements[2]),  ((closureN)self_735265)->elements[1], ((closureN)self_735265)->elements[3], ((closureN)self_735265)->elements[4], Cyc_fast_sub(data,&local_7310935, ((closureN)self_735265)->elements[0], obj_int2obj(1)));}
;; 
}

static void __lambda_551(void *data, object self_735266, int argc, object *args) /* object self_735266, object r_734347 */
 {
 object r_734347 = args[0];
  
closureN_type c_7310458;
object e_7310908 [3];
c_7310458.hdr.mark = gc_color_red;
 c_7310458.hdr.grayed = 0;
c_7310458.tag = closureN_tag;
 c_7310458.fn = (function_type)__lambda_552;
c_7310458.num_args = 1;
c_7310458.num_elements = 3;
c_7310458.elements = (object *)e_7310908;
c_7310458.elements[0] = ((closureN)self_735266)->elements[0];
c_7310458.elements[1] = ((closureN)self_735266)->elements[1];
c_7310458.elements[2] = ((closureN)self_735266)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310458,__lambda_552,  Cyc_set_cell(data, ((closureN)self_735266)->elements[1], r_734347));; 
}

static void __lambda_552(void *data, object self_735267, int argc, object *args) /* object self_735267, object r_734329 */
 {

  
closureN_type c_7310460;
object e_7310877 [3];
c_7310460.hdr.mark = gc_color_red;
 c_7310460.hdr.grayed = 0;
c_7310460.tag = closureN_tag;
 c_7310460.fn = (function_type)__lambda_553;
c_7310460.num_args = 1;
c_7310460.num_elements = 3;
c_7310460.elements = (object *)e_7310877;
c_7310460.elements[0] = ((closureN)self_735267)->elements[0];
c_7310460.elements[1] = ((closureN)self_735267)->elements[1];
c_7310460.elements[2] = ((closureN)self_735267)->elements[2];


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

return_direct_with_clo1(data,(closure)&c_7310460,__lambda_553,  &c_7310878);; 
}

static void __lambda_604(void *data, object self_735268, int argc, object *args) /* object self_735268, object k_734342, object pred_127_731066_732296_732964, object vectors_731067_732297_732965, object i_731068_732298_732966 */
 {
 object k_734342 = args[0]; object pred_127_731066_732296_732964 = args[1]; object vectors_731067_732297_732965 = args[2]; object i_731068_732298_732966 = args[3];
    complex_num_type local_7310881; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_negative_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7310881, i_731068_732298_732966)) ){ 
  return_direct_with_clo1(data,  k_734342, (((closure)  k_734342)->fn),  boolean_f);
} else { 
  
closureN_type c_7310884;
object e_7310906 [5];
c_7310884.hdr.mark = gc_color_red;
 c_7310884.hdr.grayed = 0;
c_7310884.tag = closureN_tag;
 c_7310884.fn = (function_type)__lambda_605;
c_7310884.num_args = 1;
c_7310884.num_elements = 5;
c_7310884.elements = (object *)e_7310906;
c_7310884.elements[0] = i_731068_732298_732966;
c_7310884.elements[1] = k_734342;
c_7310884.elements[2] = ((closureN)self_735268)->elements[0];
c_7310884.elements[3] = pred_127_731066_732296_732964;
c_7310884.elements[4] = vectors_731067_732297_732965;

return_direct_with_clo3(data,  __glo_vectors_91ref_srfi_133, (((closure)  __glo_vectors_91ref_srfi_133)->fn),  &c_7310884, vectors_731067_732297_732965, i_731068_732298_732966);}
;; 
}

static void __lambda_605(void *data, object self_735269, int argc, object *args) /* object self_735269, object r_734346 */
 {
 object r_734346 = args[0];
  
closureN_type c_7310886;
object e_7310901 [5];
c_7310886.hdr.mark = gc_color_red;
 c_7310886.hdr.grayed = 0;
c_7310886.tag = closureN_tag;
 c_7310886.fn = (function_type)__lambda_606;
c_7310886.num_args = 1;
c_7310886.num_elements = 5;
c_7310886.elements = (object *)e_7310901;
c_7310886.elements[0] = ((closureN)self_735269)->elements[0];
c_7310886.elements[1] = ((closureN)self_735269)->elements[1];
c_7310886.elements[2] = ((closureN)self_735269)->elements[2];
c_7310886.elements[3] = ((closureN)self_735269)->elements[3];
c_7310886.elements[4] = ((closureN)self_735269)->elements[4];


object c_7310904 = apply(data,(closure)&c_7310886,((closureN)self_735269)->elements[3], r_734346);
return_closcall1(data,(closure)&c_7310886,  c_7310904);; 
}

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


complex_num_type local_7310899; 
return_closcall4(data,  car(((closureN)self_735270)->elements[2]),  ((closureN)self_735270)->elements[1], ((closureN)self_735270)->elements[3], ((closureN)self_735270)->elements[4], Cyc_fast_sub(data,&local_7310899, ((closureN)self_735270)->elements[0], obj_int2obj(1)));}
;; 
}

static void __lambda_553(void *data, object self_735271, int argc, object *args) /* object self_735271, object r_734341 */
 {
 object r_734341 = args[0];
  
closureN_type c_7310462;
object e_7310873 [3];
c_7310462.hdr.mark = gc_color_red;
 c_7310462.hdr.grayed = 0;
c_7310462.tag = closureN_tag;
 c_7310462.fn = (function_type)__lambda_554;
c_7310462.num_args = 1;
c_7310462.num_elements = 3;
c_7310462.elements = (object *)e_7310873;
c_7310462.elements[0] = ((closureN)self_735271)->elements[0];
c_7310462.elements[1] = ((closureN)self_735271)->elements[1];
c_7310462.elements[2] = ((closureN)self_735271)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310462,__lambda_554,  Cyc_set_cell(data, ((closureN)self_735271)->elements[2], r_734341));; 
}

static void __lambda_554(void *data, object self_735272, int argc, object *args) /* object self_735272, object r_734330 */
 {

  
closureN_type c_7310464;
object e_7310812 [1];
c_7310464.hdr.mark = gc_color_red;
 c_7310464.hdr.grayed = 0;
c_7310464.tag = closureN_tag;
 c_7310464.fn = (function_type)__lambda_555;
c_7310464.num_args = 1;
c_7310464.num_elements = 1;
c_7310464.elements = (object *)e_7310812;
c_7310464.elements[0] = ((closureN)self_735272)->elements[0];


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

return_direct_with_clo1(data,(closure)&c_7310464,__lambda_555,  &c_7310813);; 
}

static void __lambda_596(void *data, object self_735273, int argc, object *args) /* object self_735273, object k_734331, object pred_127_731076_732299_732967, object vec_731077_732300_732968, object vectors_731078_732301_732969, object callee_731079_732302_732970 */
 {
 object k_734331 = args[0]; object pred_127_731076_732299_732967 = args[1]; object vec_731077_732300_732968 = args[2]; object vectors_731078_732301_732969 = args[3]; object callee_731079_732302_732970 = args[4];
  
closureN_type c_7310815;
object e_7310871 [6];
c_7310815.hdr.mark = gc_color_red;
 c_7310815.hdr.grayed = 0;
c_7310815.tag = closureN_tag;
 c_7310815.fn = (function_type)__lambda_597;
c_7310815.num_args = 1;
c_7310815.num_elements = 6;
c_7310815.elements = (object *)e_7310871;
c_7310815.elements[0] = callee_731079_732302_732970;
c_7310815.elements[1] = k_734331;
c_7310815.elements[2] = ((closureN)self_735273)->elements[0];
c_7310815.elements[3] = ((closureN)self_735273)->elements[1];
c_7310815.elements[4] = vec_731077_732300_732968;
c_7310815.elements[5] = vectors_731078_732301_732969;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7310815, primitive_procedure_127, pred_127_731076_732299_732967, callee_731079_732302_732970);; 
}

static void __lambda_597(void *data, object self_735274, int argc, object *args) /* object self_735274, object r_734332 */
 {
 object r_734332 = args[0];
  
closureN_type c_7310817;
object e_7310868 [6];
c_7310817.hdr.mark = gc_color_red;
 c_7310817.hdr.grayed = 0;
c_7310817.tag = closureN_tag;
 c_7310817.fn = (function_type)__lambda_598;
c_7310817.num_args = 1;
c_7310817.num_elements = 6;
c_7310817.elements = (object *)e_7310868;
c_7310817.elements[0] = ((closureN)self_735274)->elements[0];
c_7310817.elements[1] = ((closureN)self_735274)->elements[1];
c_7310817.elements[2] = ((closureN)self_735274)->elements[2];
c_7310817.elements[3] = ((closureN)self_735274)->elements[3];
c_7310817.elements[4] = r_734332;
c_7310817.elements[5] = ((closureN)self_735274)->elements[5];

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7310817, primitive_vector_127, ((closureN)self_735274)->elements[4], ((closureN)self_735274)->elements[0]);; 
}

static void __lambda_598(void *data, object self_735275, int argc, object *args) /* object self_735275, object r_734333 */
 {
 object r_734333 = args[0];
  
closureN_type c_7310819;
object e_7310866 [5];
c_7310819.hdr.mark = gc_color_red;
 c_7310819.hdr.grayed = 0;
c_7310819.tag = closureN_tag;
 c_7310819.fn = (function_type)__lambda_599;
c_7310819.num_args = 2;
c_7310819.num_elements = 5;
c_7310819.elements = (object *)e_7310866;
c_7310819.elements[0] = ((closureN)self_735275)->elements[0];
c_7310819.elements[1] = ((closureN)self_735275)->elements[1];
c_7310819.elements[2] = ((closureN)self_735275)->elements[2];
c_7310819.elements[3] = ((closureN)self_735275)->elements[3];
c_7310819.elements[4] = ((closureN)self_735275)->elements[5];

return_direct_with_clo2(data,(closure)&c_7310819,__lambda_599,  ((closureN)self_735275)->elements[4], r_734333);; 
}

static void __lambda_599(void *data, object self_735276, int argc, object *args) /* object self_735276, object pred_127_731080_732303_732971, object vec_731081_732304_732972 */
 {
 object pred_127_731080_732303_732971 = args[0]; object vec_731081_732304_732972 = args[1];
    
if( (boolean_f != Cyc_is_null(((closureN)self_735276)->elements[4])) ){ 
  
closureN_type c_7310824;
object e_7310835 [4];
c_7310824.hdr.mark = gc_color_red;
 c_7310824.hdr.grayed = 0;
c_7310824.tag = closureN_tag;
 c_7310824.fn = (function_type)__lambda_600;
c_7310824.num_args = 1;
c_7310824.num_elements = 4;
c_7310824.elements = (object *)e_7310835;
c_7310824.elements[0] = ((closureN)self_735276)->elements[1];
c_7310824.elements[1] = ((closureN)self_735276)->elements[2];
c_7310824.elements[2] = pred_127_731080_732303_732971;
c_7310824.elements[3] = vec_731081_732304_732972;



return_direct_with_clo1(data,(closure)&c_7310824,__lambda_600,  Cyc_vector_length(data, vec_731081_732304_732972));
} else { 
  
closureN_type c_7310839;
object e_7310861 [6];
c_7310839.hdr.mark = gc_color_red;
 c_7310839.hdr.grayed = 0;
c_7310839.tag = closureN_tag;
 c_7310839.fn = (function_type)__lambda_601;
c_7310839.num_args = 1;
c_7310839.num_elements = 6;
c_7310839.elements = (object *)e_7310861;
c_7310839.elements[0] = ((closureN)self_735276)->elements[0];
c_7310839.elements[1] = ((closureN)self_735276)->elements[1];
c_7310839.elements[2] = ((closureN)self_735276)->elements[3];
c_7310839.elements[3] = pred_127_731080_732303_732971;
c_7310839.elements[4] = vec_731081_732304_732972;
c_7310839.elements[5] = ((closureN)self_735276)->elements[4];


pair_type local_7310864; 
return_direct_with_clo1(data,(closure)&c_7310839,__lambda_601,  set_pair_as_expr(&local_7310864, vec_731081_732304_732972, ((closureN)self_735276)->elements[4]));}
;; 
}

static void __lambda_601(void *data, object self_735278, int argc, object *args) /* object self_735278, object r_734337 */
 {
 object r_734337 = args[0];
  
closureN_type c_7310841;
object e_7310855 [4];
c_7310841.hdr.mark = gc_color_red;
 c_7310841.hdr.grayed = 0;
c_7310841.tag = closureN_tag;
 c_7310841.fn = (function_type)__lambda_602;
c_7310841.num_args = 1;
c_7310841.num_elements = 4;
c_7310841.elements = (object *)e_7310855;
c_7310841.elements[0] = ((closureN)self_735278)->elements[1];
c_7310841.elements[1] = ((closureN)self_735278)->elements[2];
c_7310841.elements[2] = ((closureN)self_735278)->elements[3];
c_7310841.elements[3] = r_734337;



return_direct_with_clo4(data,  __glo__75smallest_91length_srfi_133, (((closure)  __glo__75smallest_91length_srfi_133)->fn),  &c_7310841, ((closureN)self_735278)->elements[5], Cyc_vector_length(data, ((closureN)self_735278)->elements[4]), ((closureN)self_735278)->elements[0]);; 
}

static void __lambda_602(void *data, object self_735279, int argc, object *args) /* object self_735279, object r_734339 */
 {
 object r_734339 = args[0];
  
closureN_type c_7310843;
object e_7310851 [4];
c_7310843.hdr.mark = gc_color_red;
 c_7310843.hdr.grayed = 0;
c_7310843.tag = closureN_tag;
 c_7310843.fn = (function_type)__lambda_603;
c_7310843.num_args = 1;
c_7310843.num_elements = 4;
c_7310843.elements = (object *)e_7310851;
c_7310843.elements[0] = ((closureN)self_735279)->elements[0];
c_7310843.elements[1] = ((closureN)self_735279)->elements[1];
c_7310843.elements[2] = ((closureN)self_735279)->elements[2];
c_7310843.elements[3] = ((closureN)self_735279)->elements[3];


complex_num_type local_7310854; 
return_direct_with_clo1(data,(closure)&c_7310843,__lambda_603,  Cyc_fast_sub(data,&local_7310854, r_734339, obj_int2obj(1)));; 
}

static void __lambda_603(void *data, object self_735280, int argc, object *args) /* object self_735280, object r_734338 */
 {
 object r_734338 = args[0];
  

return_closcall4(data,  car(((closureN)self_735280)->elements[1]),  ((closureN)self_735280)->elements[0], ((closureN)self_735280)->elements[2], ((closureN)self_735280)->elements[3], r_734338);; 
}

static void __lambda_600(void *data, object self_735277, int argc, object *args) /* object self_735277, object r_734336 */
 {
 object r_734336 = args[0];
  


complex_num_type local_7310834; 
return_closcall4(data,  car(((closureN)self_735277)->elements[1]),  ((closureN)self_735277)->elements[0], ((closureN)self_735277)->elements[2], ((closureN)self_735277)->elements[3], Cyc_fast_sub(data,&local_7310834, r_734336, obj_int2obj(1)));; 
}

static void __lambda_555(void *data, object self_735281, int argc, object *args) /* object self_735281, object r_734328 */
 {
 object r_734328 = args[0];
  
closureN_type c_7310466;
object e_7310808 [1];
c_7310466.hdr.mark = gc_color_red;
 c_7310466.hdr.grayed = 0;
c_7310466.tag = closureN_tag;
 c_7310466.fn = (function_type)__lambda_556;
c_7310466.num_args = 1;
c_7310466.num_elements = 1;
c_7310466.elements = (object *)e_7310808;
c_7310466.elements[0] = ((closureN)self_735281)->elements[0];


object c_7310811 = global_set_cps_id(data,(closure)&c_7310466,"__glo_vector_91index_95skip_91right_srfi_133", __glo_vector_91index_95skip_91right_srfi_133, r_734328);
return_closcall1(data,(closure)&c_7310466,  c_7310811);; 
}

static void __lambda_556(void *data, object self_735282, int argc, object *args) /* object self_735282, object r_734268 */
 {

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

return_direct_with_clo2(data,(closure)&c_7310468,__lambda_557,  boolean_f, boolean_f);; 
}

static void __lambda_557(void *data, object self_735283, int argc, object *args) /* object self_735283, object loop1_731145_732305_732973, object loop2_87_731146_732306_732974 */
 {
 object loop1_731145_732305_732973 = args[0]; object loop2_87_731146_732306_732974 = args[1];
  
closureN_type c_7310470;
object e_7310803 [2];
c_7310470.hdr.mark = gc_color_red;
 c_7310470.hdr.grayed = 0;
c_7310470.tag = closureN_tag;
 c_7310470.fn = (function_type)__lambda_749;
c_7310470.num_args = 1;
c_7310470.num_elements = 2;
c_7310470.elements = (object *)e_7310803;
c_7310470.elements[0] = ((closureN)self_735283)->elements[0];
c_7310470.elements[1] = loop2_87_731146_732306_732974;


pair_type local_7310806; 
return_direct_with_clo1(data,(closure)&c_7310470,__lambda_749,  set_cell_as_expr(&local_7310806, loop1_731145_732305_732973));; 
}

static void __lambda_749(void *data, object self_735284, int argc, object *args) /* object self_735284, object loop1_731145_732305_732973 */
 {
 object loop1_731145_732305_732973 = args[0];
  
closureN_type c_7310472;
object e_7310798 [2];
c_7310472.hdr.mark = gc_color_red;
 c_7310472.hdr.grayed = 0;
c_7310472.tag = closureN_tag;
 c_7310472.fn = (function_type)__lambda_748;
c_7310472.num_args = 1;
c_7310472.num_elements = 2;
c_7310472.elements = (object *)e_7310798;
c_7310472.elements[0] = ((closureN)self_735284)->elements[0];
c_7310472.elements[1] = loop1_731145_732305_732973;


pair_type local_7310801; 
return_direct_with_clo1(data,(closure)&c_7310472,__lambda_748,  set_cell_as_expr(&local_7310801, ((closureN)self_735284)->elements[1]));; 
}

static void __lambda_748(void *data, object self_735285, int argc, object *args) /* object self_735285, object loop2_87_731146_732306_732974 */
 {
 object loop2_87_731146_732306_732974 = args[0];
  
closureN_type c_7310474;
object e_7310763 [3];
c_7310474.hdr.mark = gc_color_red;
 c_7310474.hdr.grayed = 0;
c_7310474.tag = closureN_tag;
 c_7310474.fn = (function_type)__lambda_558;
c_7310474.num_args = 1;
c_7310474.num_elements = 3;
c_7310474.elements = (object *)e_7310763;
c_7310474.elements[0] = ((closureN)self_735285)->elements[0];
c_7310474.elements[1] = ((closureN)self_735285)->elements[1];
c_7310474.elements[2] = loop2_87_731146_732306_732974;


closureN_type c_7310764;
object e_7310797 [1];
c_7310764.hdr.mark = gc_color_red;
 c_7310764.hdr.grayed = 0;
c_7310764.tag = closureN_tag;
 c_7310764.fn = (function_type)__lambda_593;
c_7310764.num_args = 5;
c_7310764.num_elements = 1;
c_7310764.elements = (object *)e_7310797;
c_7310764.elements[0] = ((closureN)self_735285)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310474,__lambda_558,  &c_7310764);; 
}

static void __lambda_593(void *data, object self_735286, int argc, object *args) /* object self_735286, object k_734321, object pred_127_731147_732307_732975, object vec_731148_732308_732976, object i_731149_732309_732977, object len_731150_732310_732978, object len_911_731151_732311_732979 */
 {
 object k_734321 = args[0]; object pred_127_731147_732307_732975 = args[1]; object vec_731148_732308_732976 = args[2]; object i_731149_732309_732977 = args[3]; object len_731150_732310_732978 = args[4]; object len_911_731151_732311_732979 = args[5];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, i_731149_732309_732977, len_731150_732310_732978)) ){ 
  return_direct_with_clo1(data,  k_734321, (((closure)  k_734321)->fn),  boolean_f);
} else { 
    
if( (boolean_f != Cyc_num_fast_eq_op(data, i_731149_732309_732977, len_911_731151_732311_732979)) ){ 
  

return_closcall2(data,  pred_127_731147_732307_732975,  k_734321, Cyc_vector_ref(data, vec_731148_732308_732976, i_731149_732309_732977));
} else { 
  
closureN_type c_7310774;
object e_7310794 [7];
c_7310774.hdr.mark = gc_color_red;
 c_7310774.hdr.grayed = 0;
c_7310774.tag = closureN_tag;
 c_7310774.fn = (function_type)__lambda_594;
c_7310774.num_args = 1;
c_7310774.num_elements = 7;
c_7310774.elements = (object *)e_7310794;
c_7310774.elements[0] = i_731149_732309_732977;
c_7310774.elements[1] = k_734321;
c_7310774.elements[2] = len_731150_732310_732978;
c_7310774.elements[3] = len_911_731151_732311_732979;
c_7310774.elements[4] = ((closureN)self_735286)->elements[0];
c_7310774.elements[5] = pred_127_731147_732307_732975;
c_7310774.elements[6] = vec_731148_732308_732976;



return_direct_with_clo1(data,(closure)&c_7310774,__lambda_594,  Cyc_vector_ref(data, vec_731148_732308_732976, i_731149_732309_732977));}
;}
;; 
}

static void __lambda_594(void *data, object self_735287, int argc, object *args) /* object self_735287, object r_734327 */
 {
 object r_734327 = args[0];
  
closureN_type c_7310777;
object e_7310793 [7];
c_7310777.hdr.mark = gc_color_red;
 c_7310777.hdr.grayed = 0;
c_7310777.tag = closureN_tag;
 c_7310777.fn = (function_type)__lambda_595;
c_7310777.num_args = 1;
c_7310777.num_elements = 7;
c_7310777.elements = (object *)e_7310793;
c_7310777.elements[0] = ((closureN)self_735287)->elements[0];
c_7310777.elements[1] = ((closureN)self_735287)->elements[1];
c_7310777.elements[2] = ((closureN)self_735287)->elements[2];
c_7310777.elements[3] = ((closureN)self_735287)->elements[3];
c_7310777.elements[4] = ((closureN)self_735287)->elements[4];
c_7310777.elements[5] = ((closureN)self_735287)->elements[5];
c_7310777.elements[6] = ((closureN)self_735287)->elements[6];

return_closcall2(data,  ((closureN)self_735287)->elements[5],  &c_7310777, r_734327);; 
}

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


complex_num_type local_7310789; 
return_closcall6(data,  car(((closureN)self_735288)->elements[4]),  ((closureN)self_735288)->elements[1], ((closureN)self_735288)->elements[5], ((closureN)self_735288)->elements[6], Cyc_fast_sum(data,&local_7310789, ((closureN)self_735288)->elements[0], obj_int2obj(1)), ((closureN)self_735288)->elements[2], ((closureN)self_735288)->elements[3]);}
;; 
}

static void __lambda_558(void *data, object self_735289, int argc, object *args) /* object self_735289, object r_734320 */
 {
 object r_734320 = args[0];
  
closureN_type c_7310476;
object e_7310759 [3];
c_7310476.hdr.mark = gc_color_red;
 c_7310476.hdr.grayed = 0;
c_7310476.tag = closureN_tag;
 c_7310476.fn = (function_type)__lambda_559;
c_7310476.num_args = 1;
c_7310476.num_elements = 3;
c_7310476.elements = (object *)e_7310759;
c_7310476.elements[0] = ((closureN)self_735289)->elements[0];
c_7310476.elements[1] = ((closureN)self_735289)->elements[1];
c_7310476.elements[2] = ((closureN)self_735289)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310476,__lambda_559,  Cyc_set_cell(data, ((closureN)self_735289)->elements[1], r_734320));; 
}

static void __lambda_559(void *data, object self_735290, int argc, object *args) /* object self_735290, object r_734300 */
 {

  
closureN_type c_7310478;
object e_7310717 [3];
c_7310478.hdr.mark = gc_color_red;
 c_7310478.hdr.grayed = 0;
c_7310478.tag = closureN_tag;
 c_7310478.fn = (function_type)__lambda_560;
c_7310478.num_args = 1;
c_7310478.num_elements = 3;
c_7310478.elements = (object *)e_7310717;
c_7310478.elements[0] = ((closureN)self_735290)->elements[0];
c_7310478.elements[1] = ((closureN)self_735290)->elements[1];
c_7310478.elements[2] = ((closureN)self_735290)->elements[2];


closureN_type c_7310718;
object e_7310758 [1];
c_7310718.hdr.mark = gc_color_red;
 c_7310718.hdr.grayed = 0;
c_7310718.tag = closureN_tag;
 c_7310718.fn = (function_type)__lambda_589;
c_7310718.num_args = 5;
c_7310718.num_elements = 1;
c_7310718.elements = (object *)e_7310758;
c_7310718.elements[0] = ((closureN)self_735290)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310478,__lambda_560,  &c_7310718);; 
}

static void __lambda_589(void *data, object self_735291, int argc, object *args) /* object self_735291, object k_734313, object pred_127_731157_732313_732981, object vectors_731158_732314_732982, object i_731159_732315_732983, object len_731160_732316_732984, object len_911_731161_732317_732985 */
 {
 object k_734313 = args[0]; object pred_127_731157_732313_732981 = args[1]; object vectors_731158_732314_732982 = args[2]; object i_731159_732315_732983 = args[3]; object len_731160_732316_732984 = args[4]; object len_911_731161_732317_732985 = args[5];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, i_731159_732315_732983, len_731160_732316_732984)) ){ 
  return_direct_with_clo1(data,  k_734313, (((closure)  k_734313)->fn),  boolean_f);
} else { 
    
if( (boolean_f != Cyc_num_fast_eq_op(data, i_731159_732315_732983, len_911_731161_732317_732985)) ){ 
  
closureN_type c_7310725;
object e_7310732 [2];
c_7310725.hdr.mark = gc_color_red;
 c_7310725.hdr.grayed = 0;
c_7310725.tag = closureN_tag;
 c_7310725.fn = (function_type)__lambda_590;
c_7310725.num_args = 1;
c_7310725.num_elements = 2;
c_7310725.elements = (object *)e_7310732;
c_7310725.elements[0] = k_734313;
c_7310725.elements[1] = pred_127_731157_732313_732981;

return_direct_with_clo3(data,  __glo_vectors_91ref_srfi_133, (((closure)  __glo_vectors_91ref_srfi_133)->fn),  &c_7310725, vectors_731158_732314_732982, i_731159_732315_732983);
} else { 
  
closureN_type c_7310734;
object e_7310757 [7];
c_7310734.hdr.mark = gc_color_red;
 c_7310734.hdr.grayed = 0;
c_7310734.tag = closureN_tag;
 c_7310734.fn = (function_type)__lambda_591;
c_7310734.num_args = 1;
c_7310734.num_elements = 7;
c_7310734.elements = (object *)e_7310757;
c_7310734.elements[0] = i_731159_732315_732983;
c_7310734.elements[1] = k_734313;
c_7310734.elements[2] = len_731160_732316_732984;
c_7310734.elements[3] = len_911_731161_732317_732985;
c_7310734.elements[4] = ((closureN)self_735291)->elements[0];
c_7310734.elements[5] = pred_127_731157_732313_732981;
c_7310734.elements[6] = vectors_731158_732314_732982;

return_direct_with_clo3(data,  __glo_vectors_91ref_srfi_133, (((closure)  __glo_vectors_91ref_srfi_133)->fn),  &c_7310734, vectors_731158_732314_732982, i_731159_732315_732983);}
;}
;; 
}

static void __lambda_591(void *data, object self_735293, int argc, object *args) /* object self_735293, object r_734319 */
 {
 object r_734319 = args[0];
  
closureN_type c_7310736;
object e_7310752 [7];
c_7310736.hdr.mark = gc_color_red;
 c_7310736.hdr.grayed = 0;
c_7310736.tag = closureN_tag;
 c_7310736.fn = (function_type)__lambda_592;
c_7310736.num_args = 1;
c_7310736.num_elements = 7;
c_7310736.elements = (object *)e_7310752;
c_7310736.elements[0] = ((closureN)self_735293)->elements[0];
c_7310736.elements[1] = ((closureN)self_735293)->elements[1];
c_7310736.elements[2] = ((closureN)self_735293)->elements[2];
c_7310736.elements[3] = ((closureN)self_735293)->elements[3];
c_7310736.elements[4] = ((closureN)self_735293)->elements[4];
c_7310736.elements[5] = ((closureN)self_735293)->elements[5];
c_7310736.elements[6] = ((closureN)self_735293)->elements[6];


object c_7310755 = apply(data,(closure)&c_7310736,((closureN)self_735293)->elements[5], r_734319);
return_closcall1(data,(closure)&c_7310736,  c_7310755);; 
}

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


complex_num_type local_7310748; 
return_closcall6(data,  car(((closureN)self_735294)->elements[4]),  ((closureN)self_735294)->elements[1], ((closureN)self_735294)->elements[5], ((closureN)self_735294)->elements[6], Cyc_fast_sum(data,&local_7310748, ((closureN)self_735294)->elements[0], obj_int2obj(1)), ((closureN)self_735294)->elements[2], ((closureN)self_735294)->elements[3]);}
;; 
}

static void __lambda_590(void *data, object self_735292, int argc, object *args) /* object self_735292, object r_734316 */
 {
 object r_734316 = args[0];
  
object c_7310730 = apply(data,  ((closureN)self_735292)->elements[0],((closureN)self_735292)->elements[1], r_734316);
return_direct_with_clo1(data,  ((closureN)self_735292)->elements[0], (((closure)  ((closureN)self_735292)->elements[0])->fn),  c_7310730);; 
}

static void __lambda_560(void *data, object self_735295, int argc, object *args) /* object self_735295, object r_734312 */
 {
 object r_734312 = args[0];
  
closureN_type c_7310480;
object e_7310713 [3];
c_7310480.hdr.mark = gc_color_red;
 c_7310480.hdr.grayed = 0;
c_7310480.tag = closureN_tag;
 c_7310480.fn = (function_type)__lambda_561;
c_7310480.num_args = 1;
c_7310480.num_elements = 3;
c_7310480.elements = (object *)e_7310713;
c_7310480.elements[0] = ((closureN)self_735295)->elements[0];
c_7310480.elements[1] = ((closureN)self_735295)->elements[1];
c_7310480.elements[2] = ((closureN)self_735295)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310480,__lambda_561,  Cyc_set_cell(data, ((closureN)self_735295)->elements[2], r_734312));; 
}

static void __lambda_561(void *data, object self_735296, int argc, object *args) /* object self_735296, object r_734301 */
 {

  
closureN_type c_7310482;
object e_7310661 [1];
c_7310482.hdr.mark = gc_color_red;
 c_7310482.hdr.grayed = 0;
c_7310482.tag = closureN_tag;
 c_7310482.fn = (function_type)__lambda_562;
c_7310482.num_args = 1;
c_7310482.num_elements = 1;
c_7310482.elements = (object *)e_7310661;
c_7310482.elements[0] = ((closureN)self_735296)->elements[0];


closureN_type c_7310662;
object e_7310712 [2];
c_7310662.hdr.mark = gc_color_red;
 c_7310662.hdr.grayed = 0;
c_7310662.tag = closureN_tag;
 c_7310662.fn = (function_type)__lambda_583;
c_7310662.num_args = 2;
c_7310662.num_elements = 2;
c_7310662.elements = (object *)e_7310712;
c_7310662.elements[0] = ((closureN)self_735296)->elements[1];
c_7310662.elements[1] = ((closureN)self_735296)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310482,__lambda_562,  &c_7310662);; 
}

static void __lambda_583(void *data, object self_735297, int argc, object *args) /* object self_735297, object k_734302, object pred_127_731167_732319_732987, object vec_731168_732320_732988, object vectors_731169_732321_732989_raw, ... */
 {
 object k_734302 = args[0]; object pred_127_731167_732319_732987 = args[1]; object vec_731168_732320_732988 = args[2];
load_varargs(vectors_731169_732321_732989, args, 3, argc - 3);
  
closureN_type c_7310664;
object e_7310711 [5];
c_7310664.hdr.mark = gc_color_red;
 c_7310664.hdr.grayed = 0;
c_7310664.tag = closureN_tag;
 c_7310664.fn = (function_type)__lambda_584;
c_7310664.num_args = 1;
c_7310664.num_elements = 5;
c_7310664.elements = (object *)e_7310711;
c_7310664.elements[0] = k_734302;
c_7310664.elements[1] = ((closureN)self_735297)->elements[0];
c_7310664.elements[2] = ((closureN)self_735297)->elements[1];
c_7310664.elements[3] = vec_731168_732320_732988;
c_7310664.elements[4] = vectors_731169_732321_732989;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7310664, primitive_procedure_127, pred_127_731167_732319_732987, __glo_vector_91any_srfi_133);; 
}

static void __lambda_584(void *data, object self_735298, int argc, object *args) /* object self_735298, object r_734303 */
 {
 object r_734303 = args[0];
  
closureN_type c_7310666;
object e_7310709 [5];
c_7310666.hdr.mark = gc_color_red;
 c_7310666.hdr.grayed = 0;
c_7310666.tag = closureN_tag;
 c_7310666.fn = (function_type)__lambda_585;
c_7310666.num_args = 1;
c_7310666.num_elements = 5;
c_7310666.elements = (object *)e_7310709;
c_7310666.elements[0] = ((closureN)self_735298)->elements[0];
c_7310666.elements[1] = ((closureN)self_735298)->elements[1];
c_7310666.elements[2] = ((closureN)self_735298)->elements[2];
c_7310666.elements[3] = r_734303;
c_7310666.elements[4] = ((closureN)self_735298)->elements[4];

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7310666, primitive_vector_127, ((closureN)self_735298)->elements[3], __glo_vector_91any_srfi_133);; 
}

static void __lambda_585(void *data, object self_735299, int argc, object *args) /* object self_735299, object r_734304 */
 {
 object r_734304 = args[0];
  
closureN_type c_7310668;
object e_7310707 [4];
c_7310668.hdr.mark = gc_color_red;
 c_7310668.hdr.grayed = 0;
c_7310668.tag = closureN_tag;
 c_7310668.fn = (function_type)__lambda_586;
c_7310668.num_args = 2;
c_7310668.num_elements = 4;
c_7310668.elements = (object *)e_7310707;
c_7310668.elements[0] = ((closureN)self_735299)->elements[0];
c_7310668.elements[1] = ((closureN)self_735299)->elements[1];
c_7310668.elements[2] = ((closureN)self_735299)->elements[2];
c_7310668.elements[3] = ((closureN)self_735299)->elements[4];

return_direct_with_clo2(data,(closure)&c_7310668,__lambda_586,  ((closureN)self_735299)->elements[3], r_734304);; 
}

static void __lambda_586(void *data, object self_735300, int argc, object *args) /* object self_735300, object pred_127_731170_732322_732990, object vec_731171_732323_732991 */
 {
 object pred_127_731170_732322_732990 = args[0]; object vec_731171_732323_732991 = args[1];
    
if( (boolean_f != Cyc_is_null(((closureN)self_735300)->elements[3])) ){ 
  
closureN_type c_7310673;
object e_7310684 [4];
c_7310673.hdr.mark = gc_color_red;
 c_7310673.hdr.grayed = 0;
c_7310673.tag = closureN_tag;
 c_7310673.fn = (function_type)__lambda_587;
c_7310673.num_args = 1;
c_7310673.num_elements = 4;
c_7310673.elements = (object *)e_7310684;
c_7310673.elements[0] = ((closureN)self_735300)->elements[0];
c_7310673.elements[1] = ((closureN)self_735300)->elements[1];
c_7310673.elements[2] = pred_127_731170_732322_732990;
c_7310673.elements[3] = vec_731171_732323_732991;



return_direct_with_clo1(data,(closure)&c_7310673,__lambda_587,  Cyc_vector_length(data, vec_731171_732323_732991));
} else { 
  
closureN_type c_7310688;
object e_7310703 [5];
c_7310688.hdr.mark = gc_color_red;
 c_7310688.hdr.grayed = 0;
c_7310688.tag = closureN_tag;
 c_7310688.fn = (function_type)__lambda_588;
c_7310688.num_args = 1;
c_7310688.num_elements = 5;
c_7310688.elements = (object *)e_7310703;
c_7310688.elements[0] = ((closureN)self_735300)->elements[0];
c_7310688.elements[1] = ((closureN)self_735300)->elements[2];
c_7310688.elements[2] = pred_127_731170_732322_732990;
c_7310688.elements[3] = vec_731171_732323_732991;
c_7310688.elements[4] = ((closureN)self_735300)->elements[3];



return_direct_with_clo4(data,  __glo__75smallest_91length_srfi_133, (((closure)  __glo__75smallest_91length_srfi_133)->fn),  &c_7310688, ((closureN)self_735300)->elements[3], Cyc_vector_length(data, vec_731171_732323_732991), __glo_vector_91any_srfi_133);}
;; 
}

static void __lambda_588(void *data, object self_735302, int argc, object *args) /* object self_735302, object len_731173_732325_732993 */
 {
 object len_731173_732325_732993 = args[0];
  


pair_type local_7310697; 

complex_num_type local_7310702; 
return_closcall6(data,  car(((closureN)self_735302)->elements[1]),  ((closureN)self_735302)->elements[0], ((closureN)self_735302)->elements[2], set_pair_as_expr(&local_7310697, ((closureN)self_735302)->elements[3], ((closureN)self_735302)->elements[4]), obj_int2obj(0), len_731173_732325_732993, Cyc_fast_sub(data,&local_7310702, len_731173_732325_732993, obj_int2obj(1)));; 
}

static void __lambda_587(void *data, object self_735301, int argc, object *args) /* object self_735301, object len_731172_732324_732992 */
 {
 object len_731172_732324_732992 = args[0];
  


complex_num_type local_7310683; 
return_closcall6(data,  car(((closureN)self_735301)->elements[1]),  ((closureN)self_735301)->elements[0], ((closureN)self_735301)->elements[2], ((closureN)self_735301)->elements[3], obj_int2obj(0), len_731172_732324_732992, Cyc_fast_sub(data,&local_7310683, len_731172_732324_732992, obj_int2obj(1)));; 
}

static void __lambda_562(void *data, object self_735303, int argc, object *args) /* object self_735303, object r_734299 */
 {
 object r_734299 = args[0];
  
closureN_type c_7310484;
object e_7310657 [1];
c_7310484.hdr.mark = gc_color_red;
 c_7310484.hdr.grayed = 0;
c_7310484.tag = closureN_tag;
 c_7310484.fn = (function_type)__lambda_563;
c_7310484.num_args = 1;
c_7310484.num_elements = 1;
c_7310484.elements = (object *)e_7310657;
c_7310484.elements[0] = ((closureN)self_735303)->elements[0];


object c_7310660 = global_set_cps_id(data,(closure)&c_7310484,"__glo_vector_91any_srfi_133", __glo_vector_91any_srfi_133, r_734299);
return_closcall1(data,(closure)&c_7310484,  c_7310660);; 
}

static void __lambda_563(void *data, object self_735304, int argc, object *args) /* object self_735304, object r_734269 */
 {

  
closureN_type c_7310486;
object e_7310656 [1];
c_7310486.hdr.mark = gc_color_red;
 c_7310486.hdr.grayed = 0;
c_7310486.tag = closureN_tag;
 c_7310486.fn = (function_type)__lambda_564;
c_7310486.num_args = 2;
c_7310486.num_elements = 1;
c_7310486.elements = (object *)e_7310656;
c_7310486.elements[0] = ((closureN)self_735304)->elements[0];

return_direct_with_clo2(data,(closure)&c_7310486,__lambda_564,  boolean_f, boolean_f);; 
}

static void __lambda_564(void *data, object self_735305, int argc, object *args) /* object self_735305, object loop1_731174_732326_732994, object loop2_87_731175_732327_732995 */
 {
 object loop1_731174_732326_732994 = args[0]; object loop2_87_731175_732327_732995 = args[1];
  
closureN_type c_7310488;
object e_7310652 [2];
c_7310488.hdr.mark = gc_color_red;
 c_7310488.hdr.grayed = 0;
c_7310488.tag = closureN_tag;
 c_7310488.fn = (function_type)__lambda_747;
c_7310488.num_args = 1;
c_7310488.num_elements = 2;
c_7310488.elements = (object *)e_7310652;
c_7310488.elements[0] = ((closureN)self_735305)->elements[0];
c_7310488.elements[1] = loop2_87_731175_732327_732995;


pair_type local_7310655; 
return_direct_with_clo1(data,(closure)&c_7310488,__lambda_747,  set_cell_as_expr(&local_7310655, loop1_731174_732326_732994));; 
}

static void __lambda_747(void *data, object self_735306, int argc, object *args) /* object self_735306, object loop1_731174_732326_732994 */
 {
 object loop1_731174_732326_732994 = args[0];
  
closureN_type c_7310490;
object e_7310647 [2];
c_7310490.hdr.mark = gc_color_red;
 c_7310490.hdr.grayed = 0;
c_7310490.tag = closureN_tag;
 c_7310490.fn = (function_type)__lambda_746;
c_7310490.num_args = 1;
c_7310490.num_elements = 2;
c_7310490.elements = (object *)e_7310647;
c_7310490.elements[0] = ((closureN)self_735306)->elements[0];
c_7310490.elements[1] = loop1_731174_732326_732994;


pair_type local_7310650; 
return_direct_with_clo1(data,(closure)&c_7310490,__lambda_746,  set_cell_as_expr(&local_7310650, ((closureN)self_735306)->elements[1]));; 
}

static void __lambda_746(void *data, object self_735307, int argc, object *args) /* object self_735307, object loop2_87_731175_732327_732995 */
 {
 object loop2_87_731175_732327_732995 = args[0];
  
closureN_type c_7310492;
object e_7310610 [3];
c_7310492.hdr.mark = gc_color_red;
 c_7310492.hdr.grayed = 0;
c_7310492.tag = closureN_tag;
 c_7310492.fn = (function_type)__lambda_565;
c_7310492.num_args = 1;
c_7310492.num_elements = 3;
c_7310492.elements = (object *)e_7310610;
c_7310492.elements[0] = ((closureN)self_735307)->elements[0];
c_7310492.elements[1] = ((closureN)self_735307)->elements[1];
c_7310492.elements[2] = loop2_87_731175_732327_732995;


closureN_type c_7310611;
object e_7310646 [1];
c_7310611.hdr.mark = gc_color_red;
 c_7310611.hdr.grayed = 0;
c_7310611.tag = closureN_tag;
 c_7310611.fn = (function_type)__lambda_580;
c_7310611.num_args = 5;
c_7310611.num_elements = 1;
c_7310611.elements = (object *)e_7310646;
c_7310611.elements[0] = ((closureN)self_735307)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310492,__lambda_565,  &c_7310611);; 
}

static void __lambda_580(void *data, object self_735308, int argc, object *args) /* object self_735308, object k_734292, object pred_127_731176_732328_732996, object vec_731177_732329_732997, object i_731178_732330_732998, object len_731179_732331_732999, object len_911_731180_732332_733000 */
 {
 object k_734292 = args[0]; object pred_127_731176_732328_732996 = args[1]; object vec_731177_732329_732997 = args[2]; object i_731178_732330_732998 = args[3]; object len_731179_732331_732999 = args[4]; object len_911_731180_732332_733000 = args[5];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, i_731178_732330_732998, len_731179_732331_732999)) ){ 
  

return_direct_with_clo1(data,  k_734292, (((closure)  k_734292)->fn),  Cyc_num_fast_eq_op(data, i_731178_732330_732998, len_731179_732331_732999));
} else { 
    
if( (boolean_f != Cyc_num_fast_eq_op(data, i_731178_732330_732998, len_911_731180_732332_733000)) ){ 
  

return_closcall2(data,  pred_127_731176_732328_732996,  k_734292, Cyc_vector_ref(data, vec_731177_732329_732997, i_731178_732330_732998));
} else { 
  
closureN_type c_7310623;
object e_7310643 [7];
c_7310623.hdr.mark = gc_color_red;
 c_7310623.hdr.grayed = 0;
c_7310623.tag = closureN_tag;
 c_7310623.fn = (function_type)__lambda_581;
c_7310623.num_args = 1;
c_7310623.num_elements = 7;
c_7310623.elements = (object *)e_7310643;
c_7310623.elements[0] = i_731178_732330_732998;
c_7310623.elements[1] = k_734292;
c_7310623.elements[2] = len_731179_732331_732999;
c_7310623.elements[3] = len_911_731180_732332_733000;
c_7310623.elements[4] = ((closureN)self_735308)->elements[0];
c_7310623.elements[5] = pred_127_731176_732328_732996;
c_7310623.elements[6] = vec_731177_732329_732997;



return_direct_with_clo1(data,(closure)&c_7310623,__lambda_581,  Cyc_vector_ref(data, vec_731177_732329_732997, i_731178_732330_732998));}
;}
;; 
}

static void __lambda_581(void *data, object self_735309, int argc, object *args) /* object self_735309, object r_734298 */
 {
 object r_734298 = args[0];
  
closureN_type c_7310626;
object e_7310642 [7];
c_7310626.hdr.mark = gc_color_red;
 c_7310626.hdr.grayed = 0;
c_7310626.tag = closureN_tag;
 c_7310626.fn = (function_type)__lambda_582;
c_7310626.num_args = 1;
c_7310626.num_elements = 7;
c_7310626.elements = (object *)e_7310642;
c_7310626.elements[0] = ((closureN)self_735309)->elements[0];
c_7310626.elements[1] = ((closureN)self_735309)->elements[1];
c_7310626.elements[2] = ((closureN)self_735309)->elements[2];
c_7310626.elements[3] = ((closureN)self_735309)->elements[3];
c_7310626.elements[4] = ((closureN)self_735309)->elements[4];
c_7310626.elements[5] = ((closureN)self_735309)->elements[5];
c_7310626.elements[6] = ((closureN)self_735309)->elements[6];

return_closcall2(data,  ((closureN)self_735309)->elements[5],  &c_7310626, r_734298);; 
}

static void __lambda_582(void *data, object self_735310, int argc, object *args) /* object self_735310, object r_734296 */
 {
 object r_734296 = args[0];
  if( (boolean_f != r_734296) ){ 
  


complex_num_type local_7310636; 
return_closcall6(data,  car(((closureN)self_735310)->elements[4]),  ((closureN)self_735310)->elements[1], ((closureN)self_735310)->elements[5], ((closureN)self_735310)->elements[6], Cyc_fast_sum(data,&local_7310636, ((closureN)self_735310)->elements[0], obj_int2obj(1)), ((closureN)self_735310)->elements[2], ((closureN)self_735310)->elements[3]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735310)->elements[1], (((closure)  ((closureN)self_735310)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_565(void *data, object self_735311, int argc, object *args) /* object self_735311, object r_734291 */
 {
 object r_734291 = args[0];
  
closureN_type c_7310494;
object e_7310606 [3];
c_7310494.hdr.mark = gc_color_red;
 c_7310494.hdr.grayed = 0;
c_7310494.tag = closureN_tag;
 c_7310494.fn = (function_type)__lambda_566;
c_7310494.num_args = 1;
c_7310494.num_elements = 3;
c_7310494.elements = (object *)e_7310606;
c_7310494.elements[0] = ((closureN)self_735311)->elements[0];
c_7310494.elements[1] = ((closureN)self_735311)->elements[1];
c_7310494.elements[2] = ((closureN)self_735311)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310494,__lambda_566,  Cyc_set_cell(data, ((closureN)self_735311)->elements[1], r_734291));; 
}

static void __lambda_566(void *data, object self_735312, int argc, object *args) /* object self_735312, object r_734271 */
 {

  
closureN_type c_7310496;
object e_7310562 [3];
c_7310496.hdr.mark = gc_color_red;
 c_7310496.hdr.grayed = 0;
c_7310496.tag = closureN_tag;
 c_7310496.fn = (function_type)__lambda_567;
c_7310496.num_args = 1;
c_7310496.num_elements = 3;
c_7310496.elements = (object *)e_7310562;
c_7310496.elements[0] = ((closureN)self_735312)->elements[0];
c_7310496.elements[1] = ((closureN)self_735312)->elements[1];
c_7310496.elements[2] = ((closureN)self_735312)->elements[2];


closureN_type c_7310563;
object e_7310605 [1];
c_7310563.hdr.mark = gc_color_red;
 c_7310563.hdr.grayed = 0;
c_7310563.tag = closureN_tag;
 c_7310563.fn = (function_type)__lambda_576;
c_7310563.num_args = 5;
c_7310563.num_elements = 1;
c_7310563.elements = (object *)e_7310605;
c_7310563.elements[0] = ((closureN)self_735312)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310496,__lambda_567,  &c_7310563);; 
}

static void __lambda_576(void *data, object self_735313, int argc, object *args) /* object self_735313, object k_734284, object pred_127_731186_732334_733002, object vectors_731187_732335_733003, object i_731188_732336_733004, object len_731189_732337_733005, object len_911_731190_732338_733006 */
 {
 object k_734284 = args[0]; object pred_127_731186_732334_733002 = args[1]; object vectors_731187_732335_733003 = args[2]; object i_731188_732336_733004 = args[3]; object len_731189_732337_733005 = args[4]; object len_911_731190_732338_733006 = args[5];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, i_731188_732336_733004, len_731189_732337_733005)) ){ 
  

return_direct_with_clo1(data,  k_734284, (((closure)  k_734284)->fn),  Cyc_num_fast_eq_op(data, i_731188_732336_733004, len_731189_732337_733005));
} else { 
    
if( (boolean_f != Cyc_num_fast_eq_op(data, i_731188_732336_733004, len_911_731190_732338_733006)) ){ 
  
closureN_type c_7310572;
object e_7310579 [2];
c_7310572.hdr.mark = gc_color_red;
 c_7310572.hdr.grayed = 0;
c_7310572.tag = closureN_tag;
 c_7310572.fn = (function_type)__lambda_577;
c_7310572.num_args = 1;
c_7310572.num_elements = 2;
c_7310572.elements = (object *)e_7310579;
c_7310572.elements[0] = k_734284;
c_7310572.elements[1] = pred_127_731186_732334_733002;

return_direct_with_clo3(data,  __glo_vectors_91ref_srfi_133, (((closure)  __glo_vectors_91ref_srfi_133)->fn),  &c_7310572, vectors_731187_732335_733003, i_731188_732336_733004);
} else { 
  
closureN_type c_7310581;
object e_7310604 [7];
c_7310581.hdr.mark = gc_color_red;
 c_7310581.hdr.grayed = 0;
c_7310581.tag = closureN_tag;
 c_7310581.fn = (function_type)__lambda_578;
c_7310581.num_args = 1;
c_7310581.num_elements = 7;
c_7310581.elements = (object *)e_7310604;
c_7310581.elements[0] = i_731188_732336_733004;
c_7310581.elements[1] = k_734284;
c_7310581.elements[2] = len_731189_732337_733005;
c_7310581.elements[3] = len_911_731190_732338_733006;
c_7310581.elements[4] = ((closureN)self_735313)->elements[0];
c_7310581.elements[5] = pred_127_731186_732334_733002;
c_7310581.elements[6] = vectors_731187_732335_733003;

return_direct_with_clo3(data,  __glo_vectors_91ref_srfi_133, (((closure)  __glo_vectors_91ref_srfi_133)->fn),  &c_7310581, vectors_731187_732335_733003, i_731188_732336_733004);}
;}
;; 
}

static void __lambda_578(void *data, object self_735315, int argc, object *args) /* object self_735315, object r_734290 */
 {
 object r_734290 = args[0];
  
closureN_type c_7310583;
object e_7310599 [7];
c_7310583.hdr.mark = gc_color_red;
 c_7310583.hdr.grayed = 0;
c_7310583.tag = closureN_tag;
 c_7310583.fn = (function_type)__lambda_579;
c_7310583.num_args = 1;
c_7310583.num_elements = 7;
c_7310583.elements = (object *)e_7310599;
c_7310583.elements[0] = ((closureN)self_735315)->elements[0];
c_7310583.elements[1] = ((closureN)self_735315)->elements[1];
c_7310583.elements[2] = ((closureN)self_735315)->elements[2];
c_7310583.elements[3] = ((closureN)self_735315)->elements[3];
c_7310583.elements[4] = ((closureN)self_735315)->elements[4];
c_7310583.elements[5] = ((closureN)self_735315)->elements[5];
c_7310583.elements[6] = ((closureN)self_735315)->elements[6];


object c_7310602 = apply(data,(closure)&c_7310583,((closureN)self_735315)->elements[5], r_734290);
return_closcall1(data,(closure)&c_7310583,  c_7310602);; 
}

static void __lambda_579(void *data, object self_735316, int argc, object *args) /* object self_735316, object r_734288 */
 {
 object r_734288 = args[0];
  if( (boolean_f != r_734288) ){ 
  


complex_num_type local_7310593; 
return_closcall6(data,  car(((closureN)self_735316)->elements[4]),  ((closureN)self_735316)->elements[1], ((closureN)self_735316)->elements[5], ((closureN)self_735316)->elements[6], Cyc_fast_sum(data,&local_7310593, ((closureN)self_735316)->elements[0], obj_int2obj(1)), ((closureN)self_735316)->elements[2], ((closureN)self_735316)->elements[3]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735316)->elements[1], (((closure)  ((closureN)self_735316)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_577(void *data, object self_735314, int argc, object *args) /* object self_735314, object r_734287 */
 {
 object r_734287 = args[0];
  
object c_7310577 = apply(data,  ((closureN)self_735314)->elements[0],((closureN)self_735314)->elements[1], r_734287);
return_direct_with_clo1(data,  ((closureN)self_735314)->elements[0], (((closure)  ((closureN)self_735314)->elements[0])->fn),  c_7310577);; 
}

static void __lambda_567(void *data, object self_735317, int argc, object *args) /* object self_735317, object r_734283 */
 {
 object r_734283 = args[0];
  
closureN_type c_7310498;
object e_7310558 [3];
c_7310498.hdr.mark = gc_color_red;
 c_7310498.hdr.grayed = 0;
c_7310498.tag = closureN_tag;
 c_7310498.fn = (function_type)__lambda_568;
c_7310498.num_args = 1;
c_7310498.num_elements = 3;
c_7310498.elements = (object *)e_7310558;
c_7310498.elements[0] = ((closureN)self_735317)->elements[0];
c_7310498.elements[1] = ((closureN)self_735317)->elements[1];
c_7310498.elements[2] = ((closureN)self_735317)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310498,__lambda_568,  Cyc_set_cell(data, ((closureN)self_735317)->elements[2], r_734283));; 
}

static void __lambda_568(void *data, object self_735318, int argc, object *args) /* object self_735318, object r_734272 */
 {

  
closureN_type c_7310500;
object e_7310506 [1];
c_7310500.hdr.mark = gc_color_red;
 c_7310500.hdr.grayed = 0;
c_7310500.tag = closureN_tag;
 c_7310500.fn = (function_type)__lambda_569;
c_7310500.num_args = 1;
c_7310500.num_elements = 1;
c_7310500.elements = (object *)e_7310506;
c_7310500.elements[0] = ((closureN)self_735318)->elements[0];


closureN_type c_7310507;
object e_7310557 [2];
c_7310507.hdr.mark = gc_color_red;
 c_7310507.hdr.grayed = 0;
c_7310507.tag = closureN_tag;
 c_7310507.fn = (function_type)__lambda_570;
c_7310507.num_args = 2;
c_7310507.num_elements = 2;
c_7310507.elements = (object *)e_7310557;
c_7310507.elements[0] = ((closureN)self_735318)->elements[1];
c_7310507.elements[1] = ((closureN)self_735318)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310500,__lambda_569,  &c_7310507);; 
}

static void __lambda_570(void *data, object self_735319, int argc, object *args) /* object self_735319, object k_734273, object pred_127_731196_732340_733008, object vec_731197_732341_733009, object vectors_731198_732342_733010_raw, ... */
 {
 object k_734273 = args[0]; object pred_127_731196_732340_733008 = args[1]; object vec_731197_732341_733009 = args[2];
load_varargs(vectors_731198_732342_733010, args, 3, argc - 3);
  
closureN_type c_7310509;
object e_7310556 [5];
c_7310509.hdr.mark = gc_color_red;
 c_7310509.hdr.grayed = 0;
c_7310509.tag = closureN_tag;
 c_7310509.fn = (function_type)__lambda_571;
c_7310509.num_args = 1;
c_7310509.num_elements = 5;
c_7310509.elements = (object *)e_7310556;
c_7310509.elements[0] = k_734273;
c_7310509.elements[1] = ((closureN)self_735319)->elements[0];
c_7310509.elements[2] = ((closureN)self_735319)->elements[1];
c_7310509.elements[3] = vec_731197_732341_733009;
c_7310509.elements[4] = vectors_731198_732342_733010;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7310509, primitive_procedure_127, pred_127_731196_732340_733008, __glo_vector_91every_srfi_133);; 
}

static void __lambda_571(void *data, object self_735320, int argc, object *args) /* object self_735320, object r_734274 */
 {
 object r_734274 = args[0];
  
closureN_type c_7310511;
object e_7310554 [5];
c_7310511.hdr.mark = gc_color_red;
 c_7310511.hdr.grayed = 0;
c_7310511.tag = closureN_tag;
 c_7310511.fn = (function_type)__lambda_572;
c_7310511.num_args = 1;
c_7310511.num_elements = 5;
c_7310511.elements = (object *)e_7310554;
c_7310511.elements[0] = ((closureN)self_735320)->elements[0];
c_7310511.elements[1] = ((closureN)self_735320)->elements[1];
c_7310511.elements[2] = ((closureN)self_735320)->elements[2];
c_7310511.elements[3] = r_734274;
c_7310511.elements[4] = ((closureN)self_735320)->elements[4];

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7310511, primitive_vector_127, ((closureN)self_735320)->elements[3], __glo_vector_91every_srfi_133);; 
}

static void __lambda_572(void *data, object self_735321, int argc, object *args) /* object self_735321, object r_734275 */
 {
 object r_734275 = args[0];
  
closureN_type c_7310513;
object e_7310552 [4];
c_7310513.hdr.mark = gc_color_red;
 c_7310513.hdr.grayed = 0;
c_7310513.tag = closureN_tag;
 c_7310513.fn = (function_type)__lambda_573;
c_7310513.num_args = 2;
c_7310513.num_elements = 4;
c_7310513.elements = (object *)e_7310552;
c_7310513.elements[0] = ((closureN)self_735321)->elements[0];
c_7310513.elements[1] = ((closureN)self_735321)->elements[1];
c_7310513.elements[2] = ((closureN)self_735321)->elements[2];
c_7310513.elements[3] = ((closureN)self_735321)->elements[4];

return_direct_with_clo2(data,(closure)&c_7310513,__lambda_573,  ((closureN)self_735321)->elements[3], r_734275);; 
}

static void __lambda_573(void *data, object self_735322, int argc, object *args) /* object self_735322, object pred_127_731199_732343_733011, object vec_731200_732344_733012 */
 {
 object pred_127_731199_732343_733011 = args[0]; object vec_731200_732344_733012 = args[1];
    
if( (boolean_f != Cyc_is_null(((closureN)self_735322)->elements[3])) ){ 
  
closureN_type c_7310518;
object e_7310529 [4];
c_7310518.hdr.mark = gc_color_red;
 c_7310518.hdr.grayed = 0;
c_7310518.tag = closureN_tag;
 c_7310518.fn = (function_type)__lambda_574;
c_7310518.num_args = 1;
c_7310518.num_elements = 4;
c_7310518.elements = (object *)e_7310529;
c_7310518.elements[0] = ((closureN)self_735322)->elements[0];
c_7310518.elements[1] = ((closureN)self_735322)->elements[1];
c_7310518.elements[2] = pred_127_731199_732343_733011;
c_7310518.elements[3] = vec_731200_732344_733012;



return_direct_with_clo1(data,(closure)&c_7310518,__lambda_574,  Cyc_vector_length(data, vec_731200_732344_733012));
} else { 
  
closureN_type c_7310533;
object e_7310548 [5];
c_7310533.hdr.mark = gc_color_red;
 c_7310533.hdr.grayed = 0;
c_7310533.tag = closureN_tag;
 c_7310533.fn = (function_type)__lambda_575;
c_7310533.num_args = 1;
c_7310533.num_elements = 5;
c_7310533.elements = (object *)e_7310548;
c_7310533.elements[0] = ((closureN)self_735322)->elements[0];
c_7310533.elements[1] = ((closureN)self_735322)->elements[2];
c_7310533.elements[2] = pred_127_731199_732343_733011;
c_7310533.elements[3] = vec_731200_732344_733012;
c_7310533.elements[4] = ((closureN)self_735322)->elements[3];



return_direct_with_clo4(data,  __glo__75smallest_91length_srfi_133, (((closure)  __glo__75smallest_91length_srfi_133)->fn),  &c_7310533, ((closureN)self_735322)->elements[3], Cyc_vector_length(data, vec_731200_732344_733012), __glo_vector_91every_srfi_133);}
;; 
}

static void __lambda_575(void *data, object self_735324, int argc, object *args) /* object self_735324, object len_731202_732346_733014 */
 {
 object len_731202_732346_733014 = args[0];
  


pair_type local_7310542; 

complex_num_type local_7310547; 
return_closcall6(data,  car(((closureN)self_735324)->elements[1]),  ((closureN)self_735324)->elements[0], ((closureN)self_735324)->elements[2], set_pair_as_expr(&local_7310542, ((closureN)self_735324)->elements[3], ((closureN)self_735324)->elements[4]), obj_int2obj(0), len_731202_732346_733014, Cyc_fast_sub(data,&local_7310547, len_731202_732346_733014, obj_int2obj(1)));; 
}

static void __lambda_574(void *data, object self_735323, int argc, object *args) /* object self_735323, object len_731201_732345_733013 */
 {
 object len_731201_732345_733013 = args[0];
  


complex_num_type local_7310528; 
return_closcall6(data,  car(((closureN)self_735323)->elements[1]),  ((closureN)self_735323)->elements[0], ((closureN)self_735323)->elements[2], ((closureN)self_735323)->elements[3], obj_int2obj(0), len_731201_732345_733013, Cyc_fast_sub(data,&local_7310528, len_731201_732345_733013, obj_int2obj(1)));; 
}

static void __lambda_569(void *data, object self_735325, int argc, object *args) /* object self_735325, object r_734270 */
 {
 object r_734270 = args[0];
  
object c_7310505 = global_set_cps_id(data,  ((closureN)self_735325)->elements[0],"__glo_vector_91every_srfi_133", __glo_vector_91every_srfi_133, r_734270);
return_direct_with_clo1(data,  ((closureN)self_735325)->elements[0], (((closure)  ((closureN)self_735325)->elements[0])->fn),  c_7310505);; 
}

static void __lambda_445(void *data, object _, int argc, object *args) /* closure _,object k_734129, object lst_731796_732762, object maybe_91start_87end_731797_732763_raw, ... */
 {
object k_734129 = args[0]; object lst_731796_732762 = args[1];
load_varargs(maybe_91start_87end_731797_732763, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/133.sld:reverse-list->vector");
  
if( (boolean_f != Cyc_is_null(maybe_91start_87end_731797_732763)) ){ 
  
closureN_type c_739945;
object e_7310033 [2];
c_739945.hdr.mark = gc_color_red;
 c_739945.hdr.grayed = 0;
c_739945.tag = closureN_tag;
 c_739945.fn = (function_type)__lambda_446;
c_739945.num_args = 1;
c_739945.num_elements = 2;
c_739945.elements = (object *)e_7310033;
c_739945.elements[0] = k_734129;
c_739945.elements[1] = lst_731796_732762;



return_direct_with_clo1(data,(closure)&c_739945,__lambda_446,  Cyc_length(data, lst_731796_732762));
} else { 
  
closureN_type c_7310037;
object e_7310247 [3];
c_7310037.hdr.mark = gc_color_red;
 c_7310037.hdr.grayed = 0;
c_7310037.tag = closureN_tag;
 c_7310037.fn = (function_type)__lambda_453;
c_7310037.num_args = 1;
c_7310037.num_elements = 3;
c_7310037.elements = (object *)e_7310247;
c_7310037.elements[0] = k_734129;
c_7310037.elements[1] = lst_731796_732762;
c_7310037.elements[2] = maybe_91start_87end_731797_732763;



return_direct_with_clo1(data,(closure)&c_7310037,__lambda_453,  Cyc_car(data, maybe_91start_87end_731797_732763));}
;; 
}

static void __lambda_453(void *data, object self_735031, int argc, object *args) /* object self_735031, object r_734169 */
 {
 object r_734169 = args[0];
  
closureN_type c_7310039;
object e_7310243 [4];
c_7310039.hdr.mark = gc_color_red;
 c_7310039.hdr.grayed = 0;
c_7310039.tag = closureN_tag;
 c_7310039.fn = (function_type)__lambda_454;
c_7310039.num_args = 1;
c_7310039.num_elements = 4;
c_7310039.elements = (object *)e_7310243;
c_7310039.elements[0] = ((closureN)self_735031)->elements[0];
c_7310039.elements[1] = ((closureN)self_735031)->elements[1];
c_7310039.elements[2] = ((closureN)self_735031)->elements[2];
c_7310039.elements[3] = r_734169;



return_direct_with_clo1(data,(closure)&c_7310039,__lambda_454,  Cyc_cdr(data, ((closureN)self_735031)->elements[2]));; 
}

static void __lambda_454(void *data, object self_735032, int argc, object *args) /* object self_735032, object r_734170 */
 {
 object r_734170 = args[0];
  
closureN_type c_7310041;
object e_7310241 [3];
c_7310041.hdr.mark = gc_color_red;
 c_7310041.hdr.grayed = 0;
c_7310041.tag = closureN_tag;
 c_7310041.fn = (function_type)__lambda_455;
c_7310041.num_args = 2;
c_7310041.num_elements = 3;
c_7310041.elements = (object *)e_7310241;
c_7310041.elements[0] = ((closureN)self_735032)->elements[0];
c_7310041.elements[1] = ((closureN)self_735032)->elements[1];
c_7310041.elements[2] = ((closureN)self_735032)->elements[2];

return_direct_with_clo2(data,(closure)&c_7310041,__lambda_455,  ((closureN)self_735032)->elements[3], r_734170);; 
}

static void __lambda_455(void *data, object self_735033, int argc, object *args) /* object self_735033, object start_731935_732771, object new_91args_731902_731936_732772 */
 {
 object start_731935_732771 = args[0]; object new_91args_731902_731936_732772 = args[1];
    
if( (boolean_f != Cyc_is_null(new_91args_731902_731936_732772)) ){ 
  
closureN_type c_7310045;
object e_7310134 [3];
c_7310045.hdr.mark = gc_color_red;
 c_7310045.hdr.grayed = 0;
c_7310045.tag = closureN_tag;
 c_7310045.fn = (function_type)__lambda_456;
c_7310045.num_args = 1;
c_7310045.num_elements = 3;
c_7310045.elements = (object *)e_7310134;
c_7310045.elements[0] = ((closureN)self_735033)->elements[0];
c_7310045.elements[1] = ((closureN)self_735033)->elements[1];
c_7310045.elements[2] = start_731935_732771;



return_direct_with_clo1(data,(closure)&c_7310045,__lambda_456,  Cyc_length(data, ((closureN)self_735033)->elements[1]));
} else { 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, new_91args_731902_731936_732772))) ){ 
  
closureN_type c_7310143;
object e_7310230 [3];
c_7310143.hdr.mark = gc_color_red;
 c_7310143.hdr.grayed = 0;
c_7310143.tag = closureN_tag;
 c_7310143.fn = (function_type)__lambda_463;
c_7310143.num_args = 1;
c_7310143.num_elements = 3;
c_7310143.elements = (object *)e_7310230;
c_7310143.elements[0] = ((closureN)self_735033)->elements[0];
c_7310143.elements[1] = ((closureN)self_735033)->elements[1];
c_7310143.elements[2] = new_91args_731902_731936_732772;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7310143, __glo_nonneg_91int_127_srfi_133, start_731935_732771, __glo_reverse_91list_91_125vector_srfi_133);
} else { 
  
closureN_type c_7310232;
object e_7310237 [2];
c_7310232.hdr.mark = gc_color_red;
 c_7310232.hdr.grayed = 0;
c_7310232.tag = closureN_tag;
 c_7310232.fn = (function_type)__lambda_469;
c_7310232.num_args = 1;
c_7310232.num_elements = 2;
c_7310232.elements = (object *)e_7310237;
c_7310232.elements[0] = ((closureN)self_735033)->elements[0];
c_7310232.elements[1] = ((closureN)self_735033)->elements[2];



return_direct_with_clo1(data,(closure)&c_7310232,__lambda_469,  Cyc_length(data, ((closureN)self_735033)->elements[2]));}
;}
;; 
}

static void __lambda_469(void *data, object self_735047, int argc, object *args) /* object self_735047, object r_734250 */
 {
 object r_734250 = args[0];
  
make_utf8_string_with_len(c_7310235, "too many arguments", 18, 18);
return_direct_with_clo4(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_735047)->elements[0], &c_7310235, r_734250, ((closureN)self_735047)->elements[1]);; 
}

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



return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7310145, __glo_nonneg_91int_127_srfi_133, Cyc_car(data, ((closureN)self_735041)->elements[2]), __glo_reverse_91list_91_125vector_srfi_133);; 
}

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

return_direct_with_clo2(data,(closure)&c_7310147,__lambda_465,  ((closureN)self_735042)->elements[2], r_734214);; 
}

static void __lambda_465(void *data, object self_735043, int argc, object *args) /* object self_735043, object start_732052_732781, object end_732053_732782 */
 {
 object start_732052_732781 = args[0]; object end_732053_732782 = args[1];
  
closureN_type c_7310149;
object e_7310163 [4];
c_7310149.hdr.mark = gc_color_red;
 c_7310149.hdr.grayed = 0;
c_7310149.tag = closureN_tag;
 c_7310149.fn = (function_type)__lambda_466;
c_7310149.num_args = 1;
c_7310149.num_elements = 4;
c_7310149.elements = (object *)e_7310163;
c_7310149.elements[0] = end_732053_732782;
c_7310149.elements[1] = ((closureN)self_735043)->elements[0];
c_7310149.elements[2] = ((closureN)self_735043)->elements[1];
c_7310149.elements[3] = start_732052_732781;


closureN_type c_7310164;
object e_7310223 [2];
c_7310164.hdr.mark = gc_color_red;
 c_7310164.hdr.grayed = 0;
c_7310164.tag = closureN_tag;
 c_7310164.fn = (function_type)__lambda_468;
c_7310164.num_args = 2;
c_7310164.num_elements = 2;
c_7310164.elements = (object *)e_7310223;
c_7310164.elements[0] = end_732053_732782;
c_7310164.elements[1] = ((closureN)self_735043)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310149,__lambda_466,  &c_7310164);; 
}

static void __lambda_468(void *data, object self_735044, int argc, object *args) /* object self_735044, object k_734218, object index_732055_732784, object l_732056_732785 */
 {
 object k_734218 = args[0]; object l_732056_732785 = args[2];
    
if( (boolean_f != Cyc_is_null(l_732056_732785)) ){ 
  
make_utf8_string_with_len(c_7310168, "list too short", 14, 14);

pair_type local_7310171; 

pair_type local_7310174; 

pair_type local_7310177; 

pair_type local_7310181; 

pair_type local_7310184; 

pair_type local_7310187; 

pair_type local_7310190; 

pair_type local_7310194; 

pair_type local_7310197; 

pair_type local_7310200; 
return_direct_with_clo5(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_734218, &c_7310168, set_pair_as_expr(&local_7310171, quote__list, set_pair_as_expr(&local_7310174, quote_was, set_pair_as_expr(&local_7310177, ((closureN)self_735044)->elements[1], NULL))), set_pair_as_expr(&local_7310181, quote_attempted, set_pair_as_expr(&local_7310184, quote_end, set_pair_as_expr(&local_7310187, quote_was, set_pair_as_expr(&local_7310190, ((closureN)self_735044)->elements[0], NULL)))), set_pair_as_expr(&local_7310194, quote__while, set_pair_as_expr(&local_7310197, quote_calling, set_pair_as_expr(&local_7310200, __glo_reverse_91list_91_125vector_srfi_133, NULL))));
} else { 
    
if( (boolean_f != Cyc_is_pair(l_732056_732785)) ){ 
  



return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_734218, Cyc_car(data, l_732056_732785), Cyc_cdr(data, l_732056_732785));
} else { 
  
make_utf8_string_with_len(c_7310209, "erroneous value", 15, 15);

list_2_type local_7310212; 

pair_type local_7310216; 

pair_type local_7310219; 

pair_type local_7310222; 
return_direct_with_clo4(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_734218, &c_7310209, Cyc_fast_list_2(&local_7310212, __glo_list_127_scheme_base, ((closureN)self_735044)->elements[1]), set_pair_as_expr(&local_7310216, quote__while, set_pair_as_expr(&local_7310219, quote_calling, set_pair_as_expr(&local_7310222, __glo_reverse_91list_91_125vector_srfi_133, NULL))));}
;}
;; 
}

static void __lambda_466(void *data, object self_735045, int argc, object *args) /* object self_735045, object f_732054_732783 */
 {
 object f_732054_732783 = args[0];
  
closureN_type c_7310151;
object e_7310160 [4];
c_7310151.hdr.mark = gc_color_red;
 c_7310151.hdr.grayed = 0;
c_7310151.tag = closureN_tag;
 c_7310151.fn = (function_type)__lambda_467;
c_7310151.num_args = 1;
c_7310151.num_elements = 4;
c_7310151.elements = (object *)e_7310160;
c_7310151.elements[0] = ((closureN)self_735045)->elements[0];
c_7310151.elements[1] = f_732054_732783;
c_7310151.elements[2] = ((closureN)self_735045)->elements[1];
c_7310151.elements[3] = ((closureN)self_735045)->elements[3];

return_direct_with_clo3(data,  __glo_list_91tail_scheme_base, (((closure)  __glo_list_91tail_scheme_base)->fn),  &c_7310151, ((closureN)self_735045)->elements[2], ((closureN)self_735045)->elements[3]);; 
}

static void __lambda_467(void *data, object self_735046, int argc, object *args) /* object self_735046, object r_734217 */
 {
 object r_734217 = args[0];
  
complex_num_type local_7310157; 
return_direct_with_clo4(data,  __glo_vector_91unfold_91right_srfi_133, (((closure)  __glo_vector_91unfold_91right_srfi_133)->fn),  ((closureN)self_735046)->elements[2], ((closureN)self_735046)->elements[1], Cyc_fast_sub(data,&local_7310157, ((closureN)self_735046)->elements[0], ((closureN)self_735046)->elements[3]), r_734217);; 
}

static void __lambda_456(void *data, object self_735034, int argc, object *args) /* object self_735034, object end_731983_732773 */
 {
 object end_731983_732773 = args[0];
  
closureN_type c_7310047;
object e_7310132 [3];
c_7310047.hdr.mark = gc_color_red;
 c_7310047.hdr.grayed = 0;
c_7310047.tag = closureN_tag;
 c_7310047.fn = (function_type)__lambda_457;
c_7310047.num_args = 1;
c_7310047.num_elements = 3;
c_7310047.elements = (object *)e_7310132;
c_7310047.elements[0] = end_731983_732773;
c_7310047.elements[1] = ((closureN)self_735034)->elements[0];
c_7310047.elements[2] = ((closureN)self_735034)->elements[1];

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7310047, __glo_nonneg_91int_127_srfi_133, ((closureN)self_735034)->elements[2], __glo_reverse_91list_91_125vector_srfi_133);; 
}

static void __lambda_457(void *data, object self_735035, int argc, object *args) /* object self_735035, object r_734173 */
 {
 object r_734173 = args[0];
  
closureN_type c_7310049;
object e_7310130 [3];
c_7310049.hdr.mark = gc_color_red;
 c_7310049.hdr.grayed = 0;
c_7310049.tag = closureN_tag;
 c_7310049.fn = (function_type)__lambda_458;
c_7310049.num_args = 1;
c_7310049.num_elements = 3;
c_7310049.elements = (object *)e_7310130;
c_7310049.elements[0] = ((closureN)self_735035)->elements[1];
c_7310049.elements[1] = ((closureN)self_735035)->elements[2];
c_7310049.elements[2] = r_734173;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_7310049, __glo_nonneg_91int_127_srfi_133, ((closureN)self_735035)->elements[0], __glo_reverse_91list_91_125vector_srfi_133);; 
}

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

return_direct_with_clo2(data,(closure)&c_7310051,__lambda_459,  ((closureN)self_735036)->elements[2], r_734174);; 
}

static void __lambda_459(void *data, object self_735037, int argc, object *args) /* object self_735037, object start_731985_732774, object end_731986_732775 */
 {
 object start_731985_732774 = args[0]; object end_731986_732775 = args[1];
  
closureN_type c_7310053;
object e_7310067 [4];
c_7310053.hdr.mark = gc_color_red;
 c_7310053.hdr.grayed = 0;
c_7310053.tag = closureN_tag;
 c_7310053.fn = (function_type)__lambda_460;
c_7310053.num_args = 1;
c_7310053.num_elements = 4;
c_7310053.elements = (object *)e_7310067;
c_7310053.elements[0] = end_731986_732775;
c_7310053.elements[1] = ((closureN)self_735037)->elements[0];
c_7310053.elements[2] = ((closureN)self_735037)->elements[1];
c_7310053.elements[3] = start_731985_732774;


closureN_type c_7310068;
object e_7310127 [2];
c_7310068.hdr.mark = gc_color_red;
 c_7310068.hdr.grayed = 0;
c_7310068.tag = closureN_tag;
 c_7310068.fn = (function_type)__lambda_462;
c_7310068.num_args = 2;
c_7310068.num_elements = 2;
c_7310068.elements = (object *)e_7310127;
c_7310068.elements[0] = end_731986_732775;
c_7310068.elements[1] = ((closureN)self_735037)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310053,__lambda_460,  &c_7310068);; 
}

static void __lambda_462(void *data, object self_735038, int argc, object *args) /* object self_735038, object k_734178, object index_731988_732777, object l_731989_732778 */
 {
 object k_734178 = args[0]; object l_731989_732778 = args[2];
    
if( (boolean_f != Cyc_is_null(l_731989_732778)) ){ 
  
make_utf8_string_with_len(c_7310072, "list too short", 14, 14);

pair_type local_7310075; 

pair_type local_7310078; 

pair_type local_7310081; 

pair_type local_7310085; 

pair_type local_7310088; 

pair_type local_7310091; 

pair_type local_7310094; 

pair_type local_7310098; 

pair_type local_7310101; 

pair_type local_7310104; 
return_direct_with_clo5(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_734178, &c_7310072, set_pair_as_expr(&local_7310075, quote__list, set_pair_as_expr(&local_7310078, quote_was, set_pair_as_expr(&local_7310081, ((closureN)self_735038)->elements[1], NULL))), set_pair_as_expr(&local_7310085, quote_attempted, set_pair_as_expr(&local_7310088, quote_end, set_pair_as_expr(&local_7310091, quote_was, set_pair_as_expr(&local_7310094, ((closureN)self_735038)->elements[0], NULL)))), set_pair_as_expr(&local_7310098, quote__while, set_pair_as_expr(&local_7310101, quote_calling, set_pair_as_expr(&local_7310104, __glo_reverse_91list_91_125vector_srfi_133, NULL))));
} else { 
    
if( (boolean_f != Cyc_is_pair(l_731989_732778)) ){ 
  



return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_734178, Cyc_car(data, l_731989_732778), Cyc_cdr(data, l_731989_732778));
} else { 
  
make_utf8_string_with_len(c_7310113, "erroneous value", 15, 15);

list_2_type local_7310116; 

pair_type local_7310120; 

pair_type local_7310123; 

pair_type local_7310126; 
return_direct_with_clo4(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_734178, &c_7310113, Cyc_fast_list_2(&local_7310116, __glo_list_127_scheme_base, ((closureN)self_735038)->elements[1]), set_pair_as_expr(&local_7310120, quote__while, set_pair_as_expr(&local_7310123, quote_calling, set_pair_as_expr(&local_7310126, __glo_reverse_91list_91_125vector_srfi_133, NULL))));}
;}
;; 
}

static void __lambda_460(void *data, object self_735039, int argc, object *args) /* object self_735039, object f_731987_732776 */
 {
 object f_731987_732776 = args[0];
  
closureN_type c_7310055;
object e_7310064 [4];
c_7310055.hdr.mark = gc_color_red;
 c_7310055.hdr.grayed = 0;
c_7310055.tag = closureN_tag;
 c_7310055.fn = (function_type)__lambda_461;
c_7310055.num_args = 1;
c_7310055.num_elements = 4;
c_7310055.elements = (object *)e_7310064;
c_7310055.elements[0] = ((closureN)self_735039)->elements[0];
c_7310055.elements[1] = f_731987_732776;
c_7310055.elements[2] = ((closureN)self_735039)->elements[1];
c_7310055.elements[3] = ((closureN)self_735039)->elements[3];

return_direct_with_clo3(data,  __glo_list_91tail_scheme_base, (((closure)  __glo_list_91tail_scheme_base)->fn),  &c_7310055, ((closureN)self_735039)->elements[2], ((closureN)self_735039)->elements[3]);; 
}

static void __lambda_461(void *data, object self_735040, int argc, object *args) /* object self_735040, object r_734177 */
 {
 object r_734177 = args[0];
  
complex_num_type local_7310061; 
return_direct_with_clo4(data,  __glo_vector_91unfold_91right_srfi_133, (((closure)  __glo_vector_91unfold_91right_srfi_133)->fn),  ((closureN)self_735040)->elements[2], ((closureN)self_735040)->elements[1], Cyc_fast_sub(data,&local_7310061, ((closureN)self_735040)->elements[0], ((closureN)self_735040)->elements[3]), r_734177);; 
}

static void __lambda_446(void *data, object self_735024, int argc, object *args) /* object self_735024, object end_731909_732765 */
 {
 object end_731909_732765 = args[0];
  
closureN_type c_739947;
object e_7310032 [3];
c_739947.hdr.mark = gc_color_red;
 c_739947.hdr.grayed = 0;
c_739947.tag = closureN_tag;
 c_739947.fn = (function_type)__lambda_447;
c_739947.num_args = 1;
c_739947.num_elements = 3;
c_739947.elements = (object *)e_7310032;
c_739947.elements[0] = end_731909_732765;
c_739947.elements[1] = ((closureN)self_735024)->elements[0];
c_739947.elements[2] = ((closureN)self_735024)->elements[1];

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_739947, __glo_nonneg_91int_127_srfi_133, obj_int2obj(0), __glo_reverse_91list_91_125vector_srfi_133);; 
}

static void __lambda_447(void *data, object self_735025, int argc, object *args) /* object self_735025, object r_734132 */
 {
 object r_734132 = args[0];
  
closureN_type c_739949;
object e_7310030 [3];
c_739949.hdr.mark = gc_color_red;
 c_739949.hdr.grayed = 0;
c_739949.tag = closureN_tag;
 c_739949.fn = (function_type)__lambda_448;
c_739949.num_args = 1;
c_739949.num_elements = 3;
c_739949.elements = (object *)e_7310030;
c_739949.elements[0] = ((closureN)self_735025)->elements[1];
c_739949.elements[1] = ((closureN)self_735025)->elements[2];
c_739949.elements[2] = r_734132;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_739949, __glo_nonneg_91int_127_srfi_133, ((closureN)self_735025)->elements[0], __glo_reverse_91list_91_125vector_srfi_133);; 
}

static void __lambda_448(void *data, object self_735026, int argc, object *args) /* object self_735026, object r_734133 */
 {
 object r_734133 = args[0];
  
closureN_type c_739951;
object e_7310028 [2];
c_739951.hdr.mark = gc_color_red;
 c_739951.hdr.grayed = 0;
c_739951.tag = closureN_tag;
 c_739951.fn = (function_type)__lambda_449;
c_739951.num_args = 2;
c_739951.num_elements = 2;
c_739951.elements = (object *)e_7310028;
c_739951.elements[0] = ((closureN)self_735026)->elements[0];
c_739951.elements[1] = ((closureN)self_735026)->elements[1];

return_direct_with_clo2(data,(closure)&c_739951,__lambda_449,  ((closureN)self_735026)->elements[2], r_734133);; 
}

static void __lambda_449(void *data, object self_735027, int argc, object *args) /* object self_735027, object start_731911_732766, object end_731912_732767 */
 {
 object start_731911_732766 = args[0]; object end_731912_732767 = args[1];
  
closureN_type c_739953;
object e_739967 [4];
c_739953.hdr.mark = gc_color_red;
 c_739953.hdr.grayed = 0;
c_739953.tag = closureN_tag;
 c_739953.fn = (function_type)__lambda_450;
c_739953.num_args = 1;
c_739953.num_elements = 4;
c_739953.elements = (object *)e_739967;
c_739953.elements[0] = end_731912_732767;
c_739953.elements[1] = ((closureN)self_735027)->elements[0];
c_739953.elements[2] = ((closureN)self_735027)->elements[1];
c_739953.elements[3] = start_731911_732766;


closureN_type c_739968;
object e_7310027 [2];
c_739968.hdr.mark = gc_color_red;
 c_739968.hdr.grayed = 0;
c_739968.tag = closureN_tag;
 c_739968.fn = (function_type)__lambda_452;
c_739968.num_args = 2;
c_739968.num_elements = 2;
c_739968.elements = (object *)e_7310027;
c_739968.elements[0] = end_731912_732767;
c_739968.elements[1] = ((closureN)self_735027)->elements[1];

return_direct_with_clo1(data,(closure)&c_739953,__lambda_450,  &c_739968);; 
}

static void __lambda_452(void *data, object self_735028, int argc, object *args) /* object self_735028, object k_734137, object index_731914_732769, object l_731915_732770 */
 {
 object k_734137 = args[0]; object l_731915_732770 = args[2];
    
if( (boolean_f != Cyc_is_null(l_731915_732770)) ){ 
  
make_utf8_string_with_len(c_739972, "list too short", 14, 14);

pair_type local_739975; 

pair_type local_739978; 

pair_type local_739981; 

pair_type local_739985; 

pair_type local_739988; 

pair_type local_739991; 

pair_type local_739994; 

pair_type local_739998; 

pair_type local_7310001; 

pair_type local_7310004; 
return_direct_with_clo5(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_734137, &c_739972, set_pair_as_expr(&local_739975, quote__list, set_pair_as_expr(&local_739978, quote_was, set_pair_as_expr(&local_739981, ((closureN)self_735028)->elements[1], NULL))), set_pair_as_expr(&local_739985, quote_attempted, set_pair_as_expr(&local_739988, quote_end, set_pair_as_expr(&local_739991, quote_was, set_pair_as_expr(&local_739994, ((closureN)self_735028)->elements[0], NULL)))), set_pair_as_expr(&local_739998, quote__while, set_pair_as_expr(&local_7310001, quote_calling, set_pair_as_expr(&local_7310004, __glo_reverse_91list_91_125vector_srfi_133, NULL))));
} else { 
    
if( (boolean_f != Cyc_is_pair(l_731915_732770)) ){ 
  



return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_734137, Cyc_car(data, l_731915_732770), Cyc_cdr(data, l_731915_732770));
} else { 
  
make_utf8_string_with_len(c_7310013, "erroneous value", 15, 15);

list_2_type local_7310016; 

pair_type local_7310020; 

pair_type local_7310023; 

pair_type local_7310026; 
return_direct_with_clo4(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_734137, &c_7310013, Cyc_fast_list_2(&local_7310016, __glo_list_127_scheme_base, ((closureN)self_735028)->elements[1]), set_pair_as_expr(&local_7310020, quote__while, set_pair_as_expr(&local_7310023, quote_calling, set_pair_as_expr(&local_7310026, __glo_reverse_91list_91_125vector_srfi_133, NULL))));}
;}
;; 
}

static void __lambda_450(void *data, object self_735029, int argc, object *args) /* object self_735029, object f_731913_732768 */
 {
 object f_731913_732768 = args[0];
  
closureN_type c_739955;
object e_739964 [4];
c_739955.hdr.mark = gc_color_red;
 c_739955.hdr.grayed = 0;
c_739955.tag = closureN_tag;
 c_739955.fn = (function_type)__lambda_451;
c_739955.num_args = 1;
c_739955.num_elements = 4;
c_739955.elements = (object *)e_739964;
c_739955.elements[0] = ((closureN)self_735029)->elements[0];
c_739955.elements[1] = f_731913_732768;
c_739955.elements[2] = ((closureN)self_735029)->elements[1];
c_739955.elements[3] = ((closureN)self_735029)->elements[3];

return_direct_with_clo3(data,  __glo_list_91tail_scheme_base, (((closure)  __glo_list_91tail_scheme_base)->fn),  &c_739955, ((closureN)self_735029)->elements[2], ((closureN)self_735029)->elements[3]);; 
}

static void __lambda_451(void *data, object self_735030, int argc, object *args) /* object self_735030, object r_734136 */
 {
 object r_734136 = args[0];
  
complex_num_type local_739961; 
return_direct_with_clo4(data,  __glo_vector_91unfold_91right_srfi_133, (((closure)  __glo_vector_91unfold_91right_srfi_133)->fn),  ((closureN)self_735030)->elements[2], ((closureN)self_735030)->elements[1], Cyc_fast_sub(data,&local_739961, ((closureN)self_735030)->elements[0], ((closureN)self_735030)->elements[3]), r_734136);; 
}

static void __lambda_434(void *data, object _, int argc, object *args) /* closure _,object k_734111, object vec_731473_732752, object maybe_91start_87end_731474_732753_raw, ... */
 {
object k_734111 = args[0]; object vec_731473_732752 = args[1];
load_varargs(maybe_91start_87end_731474_732753, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/133.sld:reverse-vector->list");

closureN_type c_739876;
object e_739940 [2];
c_739876.hdr.mark = gc_color_red;
 c_739876.hdr.grayed = 0;
c_739876.tag = closureN_tag;
 c_739876.fn = (function_type)__lambda_435;
c_739876.num_args = 1;
c_739876.num_elements = 2;
c_739876.elements = (object *)e_739940;
c_739876.elements[0] = k_734111;
c_739876.elements[1] = maybe_91start_87end_731474_732753;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_739876, primitive_vector_127, vec_731473_732752, __glo_reverse_91vector_91_125list_srfi_133);; 
}

static void __lambda_435(void *data, object self_735013, int argc, object *args) /* object self_735013, object vec_731505_732754 */
 {
 object vec_731505_732754 = args[0];
  
closureN_type c_739878;
object e_739934 [2];
c_739878.hdr.mark = gc_color_red;
 c_739878.hdr.grayed = 0;
c_739878.tag = closureN_tag;
 c_739878.fn = (function_type)__lambda_436;
c_739878.num_args = 1;
c_739878.num_elements = 2;
c_739878.elements = (object *)e_739934;
c_739878.elements[0] = ((closureN)self_735013)->elements[0];
c_739878.elements[1] = vec_731505_732754;


closureN_type c_739935;
object e_739939 [2];
c_739935.hdr.mark = gc_color_red;
 c_739935.hdr.grayed = 0;
c_739935.tag = closureN_tag;
 c_739935.fn = (function_type)__lambda_444;
c_739935.num_args = 0;
c_739935.num_elements = 2;
c_739935.elements = (object *)e_739939;
c_739935.elements[0] = ((closureN)self_735013)->elements[1];
c_739935.elements[1] = vec_731505_732754;

return_direct_with_clo1(data,(closure)&c_739878,__lambda_436,  &c_739935);; 
}

static void __lambda_444(void *data, object self_735014, int argc, object *args) /* object self_735014, object k_734124 */
 {
 object k_734124 = args[0];
  return_direct_with_clo6(data,  __glo_vector_91parse_91start_87end_srfi_133, (((closure)  __glo_vector_91parse_91start_87end_srfi_133)->fn),  k_734124, ((closureN)self_735014)->elements[1], ((closureN)self_735014)->elements[0], quote_start, quote_end, __glo_reverse_91vector_91_125list_srfi_133);; 
}

static void __lambda_436(void *data, object self_735015, int argc, object *args) /* object self_735015, object r_734113 */
 {
 object r_734113 = args[0];
  
closureN_type c_739880;
object e_739884 [2];
c_739880.hdr.mark = gc_color_red;
 c_739880.hdr.grayed = 0;
c_739880.tag = closureN_tag;
 c_739880.fn = (function_type)__lambda_437;
c_739880.num_args = 1;
c_739880.num_elements = 2;
c_739880.elements = (object *)e_739884;
c_739880.elements[0] = ((closureN)self_735015)->elements[0];
c_739880.elements[1] = r_734113;


closureN_type c_739885;
object e_739933 [1];
c_739885.hdr.mark = gc_color_red;
 c_739885.hdr.grayed = 0;
c_739885.tag = closureN_tag;
 c_739885.fn = (function_type)__lambda_438;
c_739885.num_args = 2;
c_739885.num_elements = 1;
c_739885.elements = (object *)e_739933;
c_739885.elements[0] = ((closureN)self_735015)->elements[1];

return_direct_with_clo1(data,(closure)&c_739880,__lambda_437,  &c_739885);; 
}

static void __lambda_438(void *data, object self_735016, int argc, object *args) /* object self_735016, object k_734115, object start_731506_732755, object end_731507_732756 */
 {
 object k_734115 = args[0]; object start_731506_732755 = args[1]; object end_731507_732756 = args[2];
  
closureN_type c_739887;
object e_739932 [3];
c_739887.hdr.mark = gc_color_red;
 c_739887.hdr.grayed = 0;
c_739887.tag = closureN_tag;
 c_739887.fn = (function_type)__lambda_439;
c_739887.num_args = 2;
c_739887.num_elements = 3;
c_739887.elements = (object *)e_739932;
c_739887.elements[0] = end_731507_732756;
c_739887.elements[1] = k_734115;
c_739887.elements[2] = ((closureN)self_735016)->elements[0];

return_direct_with_clo2(data,(closure)&c_739887,__lambda_439,  start_731506_732755, NULL);; 
}

static void __lambda_439(void *data, object self_735017, int argc, object *args) /* object self_735017, object i_731511_732757, object result_731512_732758 */
 {
 object i_731511_732757 = args[0]; object result_731512_732758 = args[1];
  
closureN_type c_739889;
object e_739931 [5];
c_739889.hdr.mark = gc_color_red;
 c_739889.hdr.grayed = 0;
c_739889.tag = closureN_tag;
 c_739889.fn = (function_type)__lambda_440;
c_739889.num_args = 1;
c_739889.num_elements = 5;
c_739889.elements = (object *)e_739931;
c_739889.elements[0] = ((closureN)self_735017)->elements[0];
c_739889.elements[1] = i_731511_732757;
c_739889.elements[2] = ((closureN)self_735017)->elements[1];
c_739889.elements[3] = result_731512_732758;
c_739889.elements[4] = ((closureN)self_735017)->elements[2];

return_direct_with_clo1(data,(closure)&c_739889,__lambda_440,  boolean_f);; 
}

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


pair_type local_739930; 
return_direct_with_clo1(data,(closure)&c_739891,__lambda_745,  set_cell_as_expr(&local_739930, lp_731508_731513_732759));; 
}

static void __lambda_745(void *data, object self_735019, int argc, object *args) /* object self_735019, object lp_731508_731513_732759 */
 {
 object lp_731508_731513_732759 = args[0];
  
closureN_type c_739893;
object e_739907 [4];
c_739893.hdr.mark = gc_color_red;
 c_739893.hdr.grayed = 0;
c_739893.tag = closureN_tag;
 c_739893.fn = (function_type)__lambda_441;
c_739893.num_args = 1;
c_739893.num_elements = 4;
c_739893.elements = (object *)e_739907;
c_739893.elements[0] = ((closureN)self_735019)->elements[1];
c_739893.elements[1] = ((closureN)self_735019)->elements[2];
c_739893.elements[2] = lp_731508_731513_732759;
c_739893.elements[3] = ((closureN)self_735019)->elements[3];


closureN_type c_739908;
object e_739926 [3];
c_739908.hdr.mark = gc_color_red;
 c_739908.hdr.grayed = 0;
c_739908.tag = closureN_tag;
 c_739908.fn = (function_type)__lambda_443;
c_739908.num_args = 2;
c_739908.num_elements = 3;
c_739908.elements = (object *)e_739926;
c_739908.elements[0] = ((closureN)self_735019)->elements[0];
c_739908.elements[1] = lp_731508_731513_732759;
c_739908.elements[2] = ((closureN)self_735019)->elements[4];

return_direct_with_clo1(data,(closure)&c_739893,__lambda_441,  &c_739908);; 
}

static void __lambda_443(void *data, object self_735020, int argc, object *args) /* object self_735020, object k_734119, object i_731514_732760, object result_731515_732761 */
 {
 object k_734119 = args[0]; object i_731514_732760 = args[1]; object result_731515_732761 = args[2];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, i_731514_732760, ((closureN)self_735020)->elements[0])) ){ 
  return_direct_with_clo1(data,  k_734119, (((closure)  k_734119)->fn),  result_731515_732761);
} else { 
  


complex_num_type local_739919; 

pair_type local_739922; 


return_closcall3(data,  car(((closureN)self_735020)->elements[1]),  k_734119, Cyc_fast_sum(data,&local_739919, i_731514_732760, obj_int2obj(1)), set_pair_as_expr(&local_739922, Cyc_vector_ref(data, ((closureN)self_735020)->elements[2], i_731514_732760), result_731515_732761));}
;; 
}

static void __lambda_441(void *data, object self_735021, int argc, object *args) /* object self_735021, object r_734118 */
 {
 object r_734118 = args[0];
  
closureN_type c_739895;
object e_739903 [4];
c_739895.hdr.mark = gc_color_red;
 c_739895.hdr.grayed = 0;
c_739895.tag = closureN_tag;
 c_739895.fn = (function_type)__lambda_442;
c_739895.num_args = 1;
c_739895.num_elements = 4;
c_739895.elements = (object *)e_739903;
c_739895.elements[0] = ((closureN)self_735021)->elements[0];
c_739895.elements[1] = ((closureN)self_735021)->elements[1];
c_739895.elements[2] = ((closureN)self_735021)->elements[2];
c_739895.elements[3] = ((closureN)self_735021)->elements[3];



return_direct_with_clo1(data,(closure)&c_739895,__lambda_442,  Cyc_set_cell(data, ((closureN)self_735021)->elements[2], r_734118));; 
}

static void __lambda_442(void *data, object self_735022, int argc, object *args) /* object self_735022, object r_734117 */
 {

  

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

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

static void __lambda_428(void *data, object _, int argc, object *args) /* closure _,object k_734101, object vec_731395_732747, object start_87end_731396_732748_raw, ... */
 {
object k_734101 = args[0]; object vec_731395_732747 = args[1];
load_varargs(start_87end_731396_732748, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/133.sld:vector-reverse!");

closureN_type c_739854;
object e_739873 [2];
c_739854.hdr.mark = gc_color_red;
 c_739854.hdr.grayed = 0;
c_739854.tag = closureN_tag;
 c_739854.fn = (function_type)__lambda_429;
c_739854.num_args = 1;
c_739854.num_elements = 2;
c_739854.elements = (object *)e_739873;
c_739854.elements[0] = k_734101;
c_739854.elements[1] = start_87end_731396_732748;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_739854, primitive_vector_127, vec_731395_732747, __glo_vector_91reverse_67_srfi_133);; 
}

static void __lambda_429(void *data, object self_735008, int argc, object *args) /* object self_735008, object vec_731427_732749 */
 {
 object vec_731427_732749 = args[0];
  
closureN_type c_739856;
object e_739867 [2];
c_739856.hdr.mark = gc_color_red;
 c_739856.hdr.grayed = 0;
c_739856.tag = closureN_tag;
 c_739856.fn = (function_type)__lambda_430;
c_739856.num_args = 1;
c_739856.num_elements = 2;
c_739856.elements = (object *)e_739867;
c_739856.elements[0] = ((closureN)self_735008)->elements[0];
c_739856.elements[1] = vec_731427_732749;


closureN_type c_739868;
object e_739872 [2];
c_739868.hdr.mark = gc_color_red;
 c_739868.hdr.grayed = 0;
c_739868.tag = closureN_tag;
 c_739868.fn = (function_type)__lambda_433;
c_739868.num_args = 0;
c_739868.num_elements = 2;
c_739868.elements = (object *)e_739872;
c_739868.elements[0] = ((closureN)self_735008)->elements[1];
c_739868.elements[1] = vec_731427_732749;

return_direct_with_clo1(data,(closure)&c_739856,__lambda_430,  &c_739868);; 
}

static void __lambda_433(void *data, object self_735009, int argc, object *args) /* object self_735009, object k_734106 */
 {
 object k_734106 = args[0];
  return_direct_with_clo6(data,  __glo_vector_91parse_91start_87end_srfi_133, (((closure)  __glo_vector_91parse_91start_87end_srfi_133)->fn),  k_734106, ((closureN)self_735009)->elements[1], ((closureN)self_735009)->elements[0], quote_start, quote_end, __glo_vector_91reverse_67_srfi_133);; 
}

static void __lambda_430(void *data, object self_735010, int argc, object *args) /* object self_735010, object r_734103 */
 {
 object r_734103 = args[0];
  
closureN_type c_739858;
object e_739862 [2];
c_739858.hdr.mark = gc_color_red;
 c_739858.hdr.grayed = 0;
c_739858.tag = closureN_tag;
 c_739858.fn = (function_type)__lambda_431;
c_739858.num_args = 1;
c_739858.num_elements = 2;
c_739858.elements = (object *)e_739862;
c_739858.elements[0] = ((closureN)self_735010)->elements[0];
c_739858.elements[1] = r_734103;


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

return_direct_with_clo1(data,(closure)&c_739858,__lambda_431,  &c_739863);; 
}

static void __lambda_432(void *data, object self_735011, int argc, object *args) /* object self_735011, object k_734105, object start_731428_732750, object end_731429_732751 */
 {
 object k_734105 = args[0]; object start_731428_732750 = args[1]; object end_731429_732751 = args[2];
  return_direct_with_clo4(data,  __glo__75vector_91reverse_67_srfi_133, (((closure)  __glo__75vector_91reverse_67_srfi_133)->fn),  k_734105, ((closureN)self_735011)->elements[0], start_731428_732750, end_731429_732751);; 
}

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

static void __lambda_413(void *data, object _, int argc, object *args) /* closure _,object k_733997, object target_731325_732732, object tstart_731326_732733, object source_731327_732734, object maybe_91sstart_87send_731328_732735_raw, ... */
 {
object k_733997 = args[0]; object target_731325_732732 = args[1]; object tstart_731326_732733 = args[2]; object source_731327_732734 = args[3];
load_varargs(maybe_91sstart_87send_731328_732735, args, 4, argc - 4);
  Cyc_st_add(data, "srfi/133.sld:vector-reverse-copy!");

closureN_type c_739561;
object e_739851 [5];
c_739561.hdr.mark = gc_color_red;
 c_739561.hdr.grayed = 0;
c_739561.tag = closureN_tag;
 c_739561.fn = (function_type)__lambda_414;
c_739561.num_args = 1;
c_739561.num_elements = 5;
c_739561.elements = (object *)e_739851;
c_739561.elements[0] = k_733997;
c_739561.elements[1] = maybe_91sstart_87send_731328_732735;
c_739561.elements[2] = source_731327_732734;
c_739561.elements[3] = target_731325_732732;
c_739561.elements[4] = tstart_731326_732733;

return_direct_with_clo1(data,(closure)&c_739561,__lambda_414,  boolean_f);; 
}

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


pair_type local_739850; 
return_direct_with_clo1(data,(closure)&c_739563,__lambda_744,  set_cell_as_expr(&local_739850, doit_67_732737));; 
}

static void __lambda_744(void *data, object self_734994, int argc, object *args) /* object self_734994, object doit_67_732737 */
 {
 object doit_67_732737 = args[0];
  
closureN_type c_739565;
object e_739630 [4];
c_739565.hdr.mark = gc_color_red;
 c_739565.hdr.grayed = 0;
c_739565.tag = closureN_tag;
 c_739565.fn = (function_type)__lambda_415;
c_739565.num_args = 1;
c_739565.num_elements = 4;
c_739565.elements = (object *)e_739630;
c_739565.elements[0] = doit_67_732737;
c_739565.elements[1] = ((closureN)self_734994)->elements[0];
c_739565.elements[2] = ((closureN)self_734994)->elements[1];
c_739565.elements[3] = ((closureN)self_734994)->elements[2];


closureN_type c_739631;
object e_739846 [3];
c_739631.hdr.mark = gc_color_red;
 c_739631.hdr.grayed = 0;
c_739631.tag = closureN_tag;
 c_739631.fn = (function_type)__lambda_417;
c_739631.num_args = 3;
c_739631.num_elements = 3;
c_739631.elements = (object *)e_739846;
c_739631.elements[0] = ((closureN)self_734994)->elements[2];
c_739631.elements[1] = ((closureN)self_734994)->elements[3];
c_739631.elements[2] = ((closureN)self_734994)->elements[4];

return_direct_with_clo1(data,(closure)&c_739565,__lambda_415,  &c_739631);; 
}

static void __lambda_417(void *data, object self_734995, int argc, object *args) /* object self_734995, object k_734010, object sstart_731329_732739, object send_731330_732740, object source_91length_731331_732741 */
 {
 object k_734010 = args[0]; object sstart_731329_732739 = args[1]; object send_731330_732740 = args[2]; object source_91length_731331_732741 = args[3];
  
closureN_type c_739633;
object e_739844 [6];
c_739633.hdr.mark = gc_color_red;
 c_739633.hdr.grayed = 0;
c_739633.tag = closureN_tag;
 c_739633.fn = (function_type)__lambda_418;
c_739633.num_args = 1;
c_739633.num_elements = 6;
c_739633.elements = (object *)e_739844;
c_739633.elements[0] = k_734010;
c_739633.elements[1] = send_731330_732740;
c_739633.elements[2] = ((closureN)self_734995)->elements[0];
c_739633.elements[3] = source_91length_731331_732741;
c_739633.elements[4] = sstart_731329_732739;
c_739633.elements[5] = ((closureN)self_734995)->elements[1];

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_739633, __glo_nonneg_91int_127_srfi_133, ((closureN)self_734995)->elements[2], __glo_vector_91reverse_91copy_67_srfi_133);; 
}

static void __lambda_418(void *data, object self_734996, int argc, object *args) /* object self_734996, object r_734011 */
 {
 object r_734011 = args[0];
  
closureN_type c_739635;
object e_739842 [6];
c_739635.hdr.mark = gc_color_red;
 c_739635.hdr.grayed = 0;
c_739635.tag = closureN_tag;
 c_739635.fn = (function_type)__lambda_419;
c_739635.num_args = 1;
c_739635.num_elements = 6;
c_739635.elements = (object *)e_739842;
c_739635.elements[0] = ((closureN)self_734996)->elements[0];
c_739635.elements[1] = r_734011;
c_739635.elements[2] = ((closureN)self_734996)->elements[1];
c_739635.elements[3] = ((closureN)self_734996)->elements[2];
c_739635.elements[4] = ((closureN)self_734996)->elements[3];
c_739635.elements[5] = ((closureN)self_734996)->elements[5];

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_739635, __glo_nonneg_91int_127_srfi_133, ((closureN)self_734996)->elements[4], __glo_vector_91reverse_91copy_67_srfi_133);; 
}

static void __lambda_419(void *data, object self_734997, int argc, object *args) /* object self_734997, object r_734012 */
 {
 object r_734012 = args[0];
  
closureN_type c_739637;
object e_739840 [6];
c_739637.hdr.mark = gc_color_red;
 c_739637.hdr.grayed = 0;
c_739637.tag = closureN_tag;
 c_739637.fn = (function_type)__lambda_420;
c_739637.num_args = 1;
c_739637.num_elements = 6;
c_739637.elements = (object *)e_739840;
c_739637.elements[0] = ((closureN)self_734997)->elements[0];
c_739637.elements[1] = ((closureN)self_734997)->elements[1];
c_739637.elements[2] = r_734012;
c_739637.elements[3] = ((closureN)self_734997)->elements[3];
c_739637.elements[4] = ((closureN)self_734997)->elements[4];
c_739637.elements[5] = ((closureN)self_734997)->elements[5];

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_739637, __glo_nonneg_91int_127_srfi_133, ((closureN)self_734997)->elements[2], __glo_vector_91reverse_91copy_67_srfi_133);; 
}

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

return_direct_with_clo3(data,(closure)&c_739639,__lambda_421,  ((closureN)self_734998)->elements[1], ((closureN)self_734998)->elements[2], r_734013);; 
}

static void __lambda_421(void *data, object self_734999, int argc, object *args) /* object self_734999, object tstart_731332_732742, object sstart_731333_732743, object send_731334_732744 */
 {
 object tstart_731332_732742 = args[0]; object sstart_731333_732743 = args[1]; object send_731334_732744 = args[2];
  
closureN_type c_739641;
object e_739668 [5];
c_739641.hdr.mark = gc_color_red;
 c_739641.hdr.grayed = 0;
c_739641.tag = closureN_tag;
 c_739641.fn = (function_type)__lambda_422;
c_739641.num_args = 0;
c_739641.num_elements = 5;
c_739641.elements = (object *)e_739668;
c_739641.elements[0] = send_731334_732744;
c_739641.elements[1] = ((closureN)self_734999)->elements[1];
c_739641.elements[2] = sstart_731333_732743;
c_739641.elements[3] = ((closureN)self_734999)->elements[3];
c_739641.elements[4] = tstart_731332_732742;


closureN_type c_739669;
object e_739836 [7];
c_739669.hdr.mark = gc_color_red;
 c_739669.hdr.grayed = 0;
c_739669.tag = closureN_tag;
 c_739669.fn = (function_type)__lambda_424;
c_739669.num_args = 1;
c_739669.num_elements = 7;
c_739669.elements = (object *)e_739836;
c_739669.elements[0] = ((closureN)self_734999)->elements[0];
c_739669.elements[1] = send_731334_732744;
c_739669.elements[2] = ((closureN)self_734999)->elements[1];
c_739669.elements[3] = ((closureN)self_734999)->elements[2];
c_739669.elements[4] = sstart_731333_732743;
c_739669.elements[5] = ((closureN)self_734999)->elements[3];
c_739669.elements[6] = tstart_731332_732742;

return_direct_with_clo1(data,(closure)&c_739641,__lambda_422,  &c_739669);; 
}

static void __lambda_424(void *data, object self_735000, int argc, object *args) /* object self_735000, object r_734014 */
 {
 object r_734014 = args[0];
  if( (boolean_f != r_734014) ){ 
  
make_utf8_string_with_len(c_739672, "vector range for self-copying overlaps", 38, 38);

pair_type local_739675; 

pair_type local_739678; 

pair_type local_739681; 

pair_type local_739685; 

pair_type local_739688; 

pair_type local_739691; 

pair_type local_739695; 

pair_type local_739698; 

pair_type local_739701; 

pair_type local_739705; 

pair_type local_739708; 

pair_type local_739711; 
return_direct_with_clo7(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_735000)->elements[0], &c_739672, __glo_vector_91reverse_91copy_67_srfi_133, set_pair_as_expr(&local_739675, quote_vector, set_pair_as_expr(&local_739678, quote_was, set_pair_as_expr(&local_739681, ((closureN)self_735000)->elements[5], NULL))), set_pair_as_expr(&local_739685, quote_tstart, set_pair_as_expr(&local_739688, quote_was, set_pair_as_expr(&local_739691, ((closureN)self_735000)->elements[6], NULL))), set_pair_as_expr(&local_739695, quote_sstart, set_pair_as_expr(&local_739698, quote_was, set_pair_as_expr(&local_739701, ((closureN)self_735000)->elements[4], NULL))), set_pair_as_expr(&local_739705, quote_send, set_pair_as_expr(&local_739708, quote_was, set_pair_as_expr(&local_739711, ((closureN)self_735000)->elements[1], NULL))));
} else { 
  
closureN_type c_739714;
object e_739742 [5];
c_739714.hdr.mark = gc_color_red;
 c_739714.hdr.grayed = 0;
c_739714.tag = closureN_tag;
 c_739714.fn = (function_type)__lambda_425;
c_739714.num_args = 0;
c_739714.num_elements = 5;
c_739714.elements = (object *)e_739742;
c_739714.elements[0] = ((closureN)self_735000)->elements[1];
c_739714.elements[1] = ((closureN)self_735000)->elements[3];
c_739714.elements[2] = ((closureN)self_735000)->elements[4];
c_739714.elements[3] = ((closureN)self_735000)->elements[5];
c_739714.elements[4] = ((closureN)self_735000)->elements[6];


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

return_direct_with_clo1(data,(closure)&c_739714,__lambda_425,  &c_739743);}
;; 
}

static void __lambda_427(void *data, object self_735001, int argc, object *args) /* object self_735001, object r_734039 */
 {
 object r_734039 = args[0];
  if( (boolean_f != r_734039) ){ 
  return_direct_with_clo6(data,  __glo__75vector_91reverse_91copy_67_srfi_133, (((closure)  __glo__75vector_91reverse_91copy_67_srfi_133)->fn),  ((closureN)self_735001)->elements[0], ((closureN)self_735001)->elements[5], ((closureN)self_735001)->elements[6], ((closureN)self_735001)->elements[2], ((closureN)self_735001)->elements[4], ((closureN)self_735001)->elements[1]);
} else { 
  
make_utf8_string_with_len(c_739753, "illegal arguments", 17, 17);

pair_type local_739756; 

pair_type local_739759; 

pair_type local_739762; 

pair_type local_739765; 

pair_type local_739768; 

pair_type local_739771; 

pair_type local_739775; 

pair_type local_739778; 

pair_type local_739781; 



pair_type local_739787; 

pair_type local_739790; 

pair_type local_739793; 

pair_type local_739797; 

pair_type local_739800; 

pair_type local_739803; 

pair_type local_739807; 

pair_type local_739810; 

pair_type local_739813; 

pair_type local_739817; 

pair_type local_739820; 

pair_type local_739823; 

pair_type local_739827; 

pair_type local_739830; 

pair_type local_739833; 
return_direct_with_clo10(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_735001)->elements[0], &c_739753, set_pair_as_expr(&local_739756, quote__while, set_pair_as_expr(&local_739759, quote_calling, set_pair_as_expr(&local_739762, __glo_vector_91reverse_91copy_67_srfi_133, NULL))), set_pair_as_expr(&local_739765, quote_target, set_pair_as_expr(&local_739768, quote_was, set_pair_as_expr(&local_739771, ((closureN)self_735001)->elements[5], NULL))), set_pair_as_expr(&local_739775, quote_target_91length, set_pair_as_expr(&local_739778, quote_was, set_pair_as_expr(&local_739781, Cyc_vector_length(data, ((closureN)self_735001)->elements[5]), NULL))), set_pair_as_expr(&local_739787, quote_tstart, set_pair_as_expr(&local_739790, quote_was, set_pair_as_expr(&local_739793, ((closureN)self_735001)->elements[6], NULL))), set_pair_as_expr(&local_739797, quote_source, set_pair_as_expr(&local_739800, quote_was, set_pair_as_expr(&local_739803, ((closureN)self_735001)->elements[2], NULL))), set_pair_as_expr(&local_739807, quote_source_91length, set_pair_as_expr(&local_739810, quote_was, set_pair_as_expr(&local_739813, ((closureN)self_735001)->elements[3], NULL))), set_pair_as_expr(&local_739817, quote_sstart, set_pair_as_expr(&local_739820, quote_was, set_pair_as_expr(&local_739823, ((closureN)self_735001)->elements[4], NULL))), set_pair_as_expr(&local_739827, quote_send, set_pair_as_expr(&local_739830, quote_was, set_pair_as_expr(&local_739833, ((closureN)self_735001)->elements[1], NULL))));}
;; 
}

static void __lambda_425(void *data, object self_735002, int argc, object *args) /* object self_735002, object k_734089 */
 {
 object k_734089 = args[0];
  
closureN_type c_739716;
object e_739735 [5];
c_739716.hdr.mark = gc_color_red;
 c_739716.hdr.grayed = 0;
c_739716.tag = closureN_tag;
 c_739716.fn = (function_type)__lambda_426;
c_739716.num_args = 1;
c_739716.num_elements = 5;
c_739716.elements = (object *)e_739735;
c_739716.elements[0] = k_734089;
c_739716.elements[1] = ((closureN)self_735002)->elements[0];
c_739716.elements[2] = ((closureN)self_735002)->elements[2];
c_739716.elements[3] = ((closureN)self_735002)->elements[3];
c_739716.elements[4] = ((closureN)self_735002)->elements[4];


object c_739738 = Cyc_num_lte(data,(closure)&c_739716,4,obj_int2obj(0), ((closureN)self_735002)->elements[2], ((closureN)self_735002)->elements[0], ((closureN)self_735002)->elements[1]);
return_closcall1(data,(closure)&c_739716,  c_739738);; 
}

static void __lambda_426(void *data, object self_735003, int argc, object *args) /* object self_735003, object r_734090 */
 {
 object r_734090 = args[0];
  if( (boolean_f != r_734090) ){ 
  


complex_num_type local_739723; 

complex_num_type local_739727; 


return_direct_with_clo1(data,  ((closureN)self_735003)->elements[0], (((closure)  ((closureN)self_735003)->elements[0])->fn),  Cyc_num_fast_lte_op(data, Cyc_fast_sum(data,&local_739723, ((closureN)self_735003)->elements[4], Cyc_fast_sub(data,&local_739727, ((closureN)self_735003)->elements[1], ((closureN)self_735003)->elements[2])), Cyc_vector_length(data, ((closureN)self_735003)->elements[3])));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_735003)->elements[0], (((closure)  ((closureN)self_735003)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_422(void *data, object self_735004, int argc, object *args) /* object self_735004, object k_734094 */
 {
 object k_734094 = args[0];
    
if( (boolean_f != Cyc_eq(((closureN)self_735004)->elements[3], ((closureN)self_735004)->elements[1])) ){ 
  
closureN_type c_739647;
object e_739663 [4];
c_739647.hdr.mark = gc_color_red;
 c_739647.hdr.grayed = 0;
c_739647.tag = closureN_tag;
 c_739647.fn = (function_type)__lambda_423;
c_739647.num_args = 1;
c_739647.num_elements = 4;
c_739647.elements = (object *)e_739663;
c_739647.elements[0] = k_734094;
c_739647.elements[1] = ((closureN)self_735004)->elements[0];
c_739647.elements[2] = ((closureN)self_735004)->elements[2];
c_739647.elements[3] = ((closureN)self_735004)->elements[4];

return_direct_with_clo4(data,  __glo_between_127_srfi_133, (((closure)  __glo_between_127_srfi_133)->fn),  &c_739647, ((closureN)self_735004)->elements[2], ((closureN)self_735004)->elements[4], ((closureN)self_735004)->elements[0]);
} else { 
  return_direct_with_clo1(data,  k_734094, (((closure)  k_734094)->fn),  boolean_f);}
;; 
}

static void __lambda_423(void *data, object self_735005, int argc, object *args) /* object self_735005, object tmp_731340_731342_732745 */
 {
 object tmp_731340_731342_732745 = args[0];
  if( (boolean_f != tmp_731340_731342_732745) ){ 
  return_direct_with_clo1(data,  ((closureN)self_735005)->elements[0], (((closure)  ((closureN)self_735005)->elements[0])->fn),  tmp_731340_731342_732745);
} else { 
  
complex_num_type local_739656; 

complex_num_type local_739660; 
return_direct_with_clo4(data,  __glo_between_127_srfi_133, (((closure)  __glo_between_127_srfi_133)->fn),  ((closureN)self_735005)->elements[0], ((closureN)self_735005)->elements[3], ((closureN)self_735005)->elements[2], Cyc_fast_sum(data,&local_739656, ((closureN)self_735005)->elements[3], Cyc_fast_sub(data,&local_739660, ((closureN)self_735005)->elements[1], ((closureN)self_735005)->elements[2])));}
;; 
}

static void __lambda_415(void *data, object self_735006, int argc, object *args) /* object self_735006, object r_734009 */
 {
 object r_734009 = args[0];
  
closureN_type c_739567;
object e_739626 [4];
c_739567.hdr.mark = gc_color_red;
 c_739567.hdr.grayed = 0;
c_739567.tag = closureN_tag;
 c_739567.fn = (function_type)__lambda_416;
c_739567.num_args = 1;
c_739567.num_elements = 4;
c_739567.elements = (object *)e_739626;
c_739567.elements[0] = ((closureN)self_735006)->elements[0];
c_739567.elements[1] = ((closureN)self_735006)->elements[1];
c_739567.elements[2] = ((closureN)self_735006)->elements[2];
c_739567.elements[3] = ((closureN)self_735006)->elements[3];



return_direct_with_clo1(data,(closure)&c_739567,__lambda_416,  Cyc_set_cell(data, ((closureN)self_735006)->elements[0], r_734009));; 
}

static void __lambda_416(void *data, object self_735007, int argc, object *args) /* object self_735007, object r_733998 */
 {

    
if( (boolean_f != Cyc_is_null(((closureN)self_735007)->elements[2])) ){ 
  





return_closcall4(data,  car(((closureN)self_735007)->elements[0]),  ((closureN)self_735007)->elements[1], obj_int2obj(0), Cyc_vector_length(data, ((closureN)self_735007)->elements[3]), Cyc_vector_length(data, ((closureN)self_735007)->elements[3]));
} else { 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_735007)->elements[2]))) ){ 
  







return_closcall4(data,  car(((closureN)self_735007)->elements[0]),  ((closureN)self_735007)->elements[1], Cyc_car(data, ((closureN)self_735007)->elements[2]), Cyc_vector_length(data, ((closureN)self_735007)->elements[3]), Cyc_vector_length(data, ((closureN)self_735007)->elements[3]));
} else { 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cddr(data, ((closureN)self_735007)->elements[2]))) ){ 
  







return_closcall4(data,  car(((closureN)self_735007)->elements[0]),  ((closureN)self_735007)->elements[1], Cyc_car(data, ((closureN)self_735007)->elements[2]), Cyc_cadr(data, ((closureN)self_735007)->elements[2]), Cyc_vector_length(data, ((closureN)self_735007)->elements[3]));
} else { 
  
make_utf8_string_with_len(c_739622, "too many arguments", 18, 18);


return_direct_with_clo4(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_735007)->elements[1], &c_739622, __glo_vector_91reverse_91copy_67_srfi_133, Cyc_cddr(data, ((closureN)self_735007)->elements[2]));}
;}
;}
;; 
}

static void __lambda_405(void *data, object _, int argc, object *args) /* closure _,object k_733988, object vec_731224_732725, object i_731225_732726, object j_731226_732727 */
 {
object k_733988 = args[0]; object vec_731224_732725 = args[1]; object i_731225_732726 = args[2]; object j_731226_732727 = args[3];
  Cyc_st_add(data, "srfi/133.sld:vector-swap!");

closureN_type c_739515;
object e_739558 [3];
c_739515.hdr.mark = gc_color_red;
 c_739515.hdr.grayed = 0;
c_739515.tag = closureN_tag;
 c_739515.fn = (function_type)__lambda_406;
c_739515.num_args = 1;
c_739515.num_elements = 3;
c_739515.elements = (object *)e_739558;
c_739515.elements[0] = i_731225_732726;
c_739515.elements[1] = j_731226_732727;
c_739515.elements[2] = k_733988;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_739515, primitive_vector_127, vec_731224_732725, __glo_vector_91swap_67_srfi_133);; 
}

static void __lambda_406(void *data, object self_734986, int argc, object *args) /* object self_734986, object vec_731227_732728 */
 {
 object vec_731227_732728 = args[0];
  
closureN_type c_739517;
object e_739556 [3];
c_739517.hdr.mark = gc_color_red;
 c_739517.hdr.grayed = 0;
c_739517.tag = closureN_tag;
 c_739517.fn = (function_type)__lambda_407;
c_739517.num_args = 1;
c_739517.num_elements = 3;
c_739517.elements = (object *)e_739556;
c_739517.elements[0] = ((closureN)self_734986)->elements[1];
c_739517.elements[1] = ((closureN)self_734986)->elements[2];
c_739517.elements[2] = vec_731227_732728;

return_direct_with_clo4(data,  __glo_check_91index_srfi_133, (((closure)  __glo_check_91index_srfi_133)->fn),  &c_739517, vec_731227_732728, ((closureN)self_734986)->elements[0], __glo_vector_91swap_67_srfi_133);; 
}

static void __lambda_407(void *data, object self_734987, int argc, object *args) /* object self_734987, object r_733990 */
 {
 object r_733990 = args[0];
  
closureN_type c_739519;
object e_739553 [3];
c_739519.hdr.mark = gc_color_red;
 c_739519.hdr.grayed = 0;
c_739519.tag = closureN_tag;
 c_739519.fn = (function_type)__lambda_408;
c_739519.num_args = 1;
c_739519.num_elements = 3;
c_739519.elements = (object *)e_739553;
c_739519.elements[0] = ((closureN)self_734987)->elements[1];
c_739519.elements[1] = r_733990;
c_739519.elements[2] = ((closureN)self_734987)->elements[2];

return_direct_with_clo4(data,  __glo_check_91index_srfi_133, (((closure)  __glo_check_91index_srfi_133)->fn),  &c_739519, ((closureN)self_734987)->elements[2], ((closureN)self_734987)->elements[0], __glo_vector_91swap_67_srfi_133);; 
}

static void __lambda_408(void *data, object self_734988, int argc, object *args) /* object self_734988, object r_733991 */
 {
 object r_733991 = args[0];
  
closureN_type c_739521;
object e_739551 [2];
c_739521.hdr.mark = gc_color_red;
 c_739521.hdr.grayed = 0;
c_739521.tag = closureN_tag;
 c_739521.fn = (function_type)__lambda_409;
c_739521.num_args = 2;
c_739521.num_elements = 2;
c_739521.elements = (object *)e_739551;
c_739521.elements[0] = ((closureN)self_734988)->elements[0];
c_739521.elements[1] = ((closureN)self_734988)->elements[2];

return_direct_with_clo2(data,(closure)&c_739521,__lambda_409,  ((closureN)self_734988)->elements[1], r_733991);; 
}

static void __lambda_409(void *data, object self_734989, int argc, object *args) /* object self_734989, object i_731228_732729, object j_731229_732730 */
 {
 object i_731228_732729 = args[0]; object j_731229_732730 = args[1];
  
closureN_type c_739523;
object e_739547 [4];
c_739523.hdr.mark = gc_color_red;
 c_739523.hdr.grayed = 0;
c_739523.tag = closureN_tag;
 c_739523.fn = (function_type)__lambda_410;
c_739523.num_args = 1;
c_739523.num_elements = 4;
c_739523.elements = (object *)e_739547;
c_739523.elements[0] = i_731228_732729;
c_739523.elements[1] = j_731229_732730;
c_739523.elements[2] = ((closureN)self_734989)->elements[0];
c_739523.elements[3] = ((closureN)self_734989)->elements[1];



return_direct_with_clo1(data,(closure)&c_739523,__lambda_410,  Cyc_vector_ref(data, ((closureN)self_734989)->elements[1], i_731228_732729));; 
}

static void __lambda_410(void *data, object self_734990, int argc, object *args) /* object self_734990, object x_731230_732731 */
 {
 object x_731230_732731 = args[0];
  
closureN_type c_739525;
object e_739542 [5];
c_739525.hdr.mark = gc_color_red;
 c_739525.hdr.grayed = 0;
c_739525.tag = closureN_tag;
 c_739525.fn = (function_type)__lambda_411;
c_739525.num_args = 1;
c_739525.num_elements = 5;
c_739525.elements = (object *)e_739542;
c_739525.elements[0] = ((closureN)self_734990)->elements[0];
c_739525.elements[1] = ((closureN)self_734990)->elements[1];
c_739525.elements[2] = ((closureN)self_734990)->elements[2];
c_739525.elements[3] = ((closureN)self_734990)->elements[3];
c_739525.elements[4] = x_731230_732731;



return_direct_with_clo1(data,(closure)&c_739525,__lambda_411,  Cyc_vector_ref(data, ((closureN)self_734990)->elements[3], ((closureN)self_734990)->elements[1]));; 
}

static void __lambda_411(void *data, object self_734991, int argc, object *args) /* object self_734991, object r_733994 */
 {
 object r_733994 = args[0];
  
closureN_type c_739527;
object e_739536 [4];
c_739527.hdr.mark = gc_color_red;
 c_739527.hdr.grayed = 0;
c_739527.tag = closureN_tag;
 c_739527.fn = (function_type)__lambda_412;
c_739527.num_args = 1;
c_739527.num_elements = 4;
c_739527.elements = (object *)e_739536;
c_739527.elements[0] = ((closureN)self_734991)->elements[1];
c_739527.elements[1] = ((closureN)self_734991)->elements[2];
c_739527.elements[2] = ((closureN)self_734991)->elements[3];
c_739527.elements[3] = ((closureN)self_734991)->elements[4];


object c_739539 = Cyc_vector_set_cps(data,(closure)&c_739527,((closureN)self_734991)->elements[3], ((closureN)self_734991)->elements[0], r_733994);
return_closcall1(data,(closure)&c_739527,  c_739539);; 
}

static void __lambda_412(void *data, object self_734992, int argc, object *args) /* object self_734992, object r_733993 */
 {

  
object c_739532 = Cyc_vector_set_cps(data,  ((closureN)self_734992)->elements[1],((closureN)self_734992)->elements[2], ((closureN)self_734992)->elements[0], ((closureN)self_734992)->elements[3]);
return_direct_with_clo1(data,  ((closureN)self_734992)->elements[1], (((closure)  ((closureN)self_734992)->elements[1])->fn),  c_739532);; 
}

static void __lambda_393(void *data, object _, int argc, object *args) /* closure _,object k_733970, object pred_127_731203_732712, object vec_731204_732713 */
 {
object k_733970 = args[0]; object pred_127_731203_732712 = args[1]; object vec_731204_732713 = args[2];
  Cyc_st_add(data, "srfi/133.sld:vector-partition");

closureN_type c_739402;
object e_739510 [3];
c_739402.hdr.mark = gc_color_red;
 c_739402.hdr.grayed = 0;
c_739402.tag = closureN_tag;
 c_739402.fn = (function_type)__lambda_394;
c_739402.num_args = 1;
c_739402.num_elements = 3;
c_739402.elements = (object *)e_739510;
c_739402.elements[0] = k_733970;
c_739402.elements[1] = pred_127_731203_732712;
c_739402.elements[2] = vec_731204_732713;



return_direct_with_clo1(data,(closure)&c_739402,__lambda_394,  Cyc_vector_length(data, vec_731204_732713));; 
}

static void __lambda_394(void *data, object self_734974, int argc, object *args) /* object self_734974, object len_731207_732714 */
 {
 object len_731207_732714 = args[0];
  
closureN_type c_739404;
object e_739507 [4];
c_739404.hdr.mark = gc_color_red;
 c_739404.hdr.grayed = 0;
c_739404.tag = closureN_tag;
 c_739404.fn = (function_type)__lambda_395;
c_739404.num_args = 1;
c_739404.num_elements = 4;
c_739404.elements = (object *)e_739507;
c_739404.elements[0] = ((closureN)self_734974)->elements[0];
c_739404.elements[1] = len_731207_732714;
c_739404.elements[2] = ((closureN)self_734974)->elements[1];
c_739404.elements[3] = ((closureN)self_734974)->elements[2];

return_direct_with_clo3(data,  __glo_vector_91count_srfi_133, (((closure)  __glo_vector_91count_srfi_133)->fn),  &c_739404, ((closureN)self_734974)->elements[1], ((closureN)self_734974)->elements[2]);; 
}

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


object c_739505 = Cyc_make_vector(data,(closure)&c_739406,1,((closureN)self_734975)->elements[1]);
return_closcall1(data,(closure)&c_739406,  c_739505);; 
}

static void __lambda_396(void *data, object self_734976, int argc, object *args) /* object self_734976, object result_731213_732716 */
 {
 object result_731213_732716 = args[0];
  
closureN_type c_739408;
object e_739500 [6];
c_739408.hdr.mark = gc_color_red;
 c_739408.hdr.grayed = 0;
c_739408.tag = closureN_tag;
 c_739408.fn = (function_type)__lambda_397;
c_739408.num_args = 1;
c_739408.num_elements = 6;
c_739408.elements = (object *)e_739500;
c_739408.elements[0] = ((closureN)self_734976)->elements[0];
c_739408.elements[1] = ((closureN)self_734976)->elements[1];
c_739408.elements[2] = ((closureN)self_734976)->elements[2];
c_739408.elements[3] = ((closureN)self_734976)->elements[3];
c_739408.elements[4] = result_731213_732716;
c_739408.elements[5] = ((closureN)self_734976)->elements[4];

return_direct_with_clo1(data,(closure)&c_739408,__lambda_397,  ((closureN)self_734976)->elements[0]);; 
}

static void __lambda_397(void *data, object self_734977, int argc, object *args) /* object self_734977, object no_731218_732719 */
 {
 object no_731218_732719 = args[0];
  
closureN_type c_739410;
object e_739499 [7];
c_739410.hdr.mark = gc_color_red;
 c_739410.hdr.grayed = 0;
c_739410.tag = closureN_tag;
 c_739410.fn = (function_type)__lambda_398;
c_739410.num_args = 1;
c_739410.num_elements = 7;
c_739410.elements = (object *)e_739499;
c_739410.elements[0] = ((closureN)self_734977)->elements[0];
c_739410.elements[1] = ((closureN)self_734977)->elements[1];
c_739410.elements[2] = ((closureN)self_734977)->elements[2];
c_739410.elements[3] = no_731218_732719;
c_739410.elements[4] = ((closureN)self_734977)->elements[3];
c_739410.elements[5] = ((closureN)self_734977)->elements[4];
c_739410.elements[6] = ((closureN)self_734977)->elements[5];

return_direct_with_clo1(data,(closure)&c_739410,__lambda_398,  boolean_f);; 
}

static void __lambda_398(void *data, object self_734978, int argc, object *args) /* object self_734978, object loop_731219_732720 */
 {
 object loop_731219_732720 = args[0];
  
closureN_type c_739412;
object e_739495 [7];
c_739412.hdr.mark = gc_color_red;
 c_739412.hdr.grayed = 0;
c_739412.tag = closureN_tag;
 c_739412.fn = (function_type)__lambda_743;
c_739412.num_args = 1;
c_739412.num_elements = 7;
c_739412.elements = (object *)e_739495;
c_739412.elements[0] = ((closureN)self_734978)->elements[0];
c_739412.elements[1] = ((closureN)self_734978)->elements[1];
c_739412.elements[2] = ((closureN)self_734978)->elements[2];
c_739412.elements[3] = ((closureN)self_734978)->elements[3];
c_739412.elements[4] = ((closureN)self_734978)->elements[4];
c_739412.elements[5] = ((closureN)self_734978)->elements[5];
c_739412.elements[6] = ((closureN)self_734978)->elements[6];


pair_type local_739498; 
return_direct_with_clo1(data,(closure)&c_739412,__lambda_743,  set_cell_as_expr(&local_739498, loop_731219_732720));; 
}

static void __lambda_743(void *data, object self_734979, int argc, object *args) /* object self_734979, object loop_731219_732720 */
 {
 object loop_731219_732720 = args[0];
  
closureN_type c_739414;
object e_739427 [3];
c_739414.hdr.mark = gc_color_red;
 c_739414.hdr.grayed = 0;
c_739414.tag = closureN_tag;
 c_739414.fn = (function_type)__lambda_399;
c_739414.num_args = 1;
c_739414.num_elements = 3;
c_739414.elements = (object *)e_739427;
c_739414.elements[0] = ((closureN)self_734979)->elements[1];
c_739414.elements[1] = loop_731219_732720;
c_739414.elements[2] = ((closureN)self_734979)->elements[3];


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

return_direct_with_clo1(data,(closure)&c_739414,__lambda_399,  &c_739428);; 
}

static void __lambda_401(void *data, object self_734980, int argc, object *args) /* object self_734980, object k_733976, object i_731220_732721, object yes_731221_732722, object no_731222_732723 */
 {
 object k_733976 = args[0]; object i_731220_732721 = args[1]; object yes_731221_732722 = args[2]; object no_731222_732723 = args[3];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, i_731220_732721, ((closureN)self_734980)->elements[1])) ){ 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_733976, ((closureN)self_734980)->elements[4], ((closureN)self_734980)->elements[0]);
} else { 
  
closureN_type c_739437;
object e_739490 [7];
c_739437.hdr.mark = gc_color_red;
 c_739437.hdr.grayed = 0;
c_739437.tag = closureN_tag;
 c_739437.fn = (function_type)__lambda_402;
c_739437.num_args = 1;
c_739437.num_elements = 7;
c_739437.elements = (object *)e_739490;
c_739437.elements[0] = i_731220_732721;
c_739437.elements[1] = k_733976;
c_739437.elements[2] = ((closureN)self_734980)->elements[2];
c_739437.elements[3] = no_731222_732723;
c_739437.elements[4] = ((closureN)self_734980)->elements[4];
c_739437.elements[5] = ((closureN)self_734980)->elements[5];
c_739437.elements[6] = yes_731221_732722;



return_closcall2(data,  ((closureN)self_734980)->elements[3],  &c_739437, Cyc_vector_ref(data, ((closureN)self_734980)->elements[5], i_731220_732721));}
;; 
}

static void __lambda_402(void *data, object self_734981, int argc, object *args) /* object self_734981, object r_733979 */
 {
 object r_733979 = args[0];
  if( (boolean_f != r_733979) ){ 
  
closureN_type c_739439;
object e_739454 [5];
c_739439.hdr.mark = gc_color_red;
 c_739439.hdr.grayed = 0;
c_739439.tag = closureN_tag;
 c_739439.fn = (function_type)__lambda_403;
c_739439.num_args = 1;
c_739439.num_elements = 5;
c_739439.elements = (object *)e_739454;
c_739439.elements[0] = ((closureN)self_734981)->elements[0];
c_739439.elements[1] = ((closureN)self_734981)->elements[1];
c_739439.elements[2] = ((closureN)self_734981)->elements[2];
c_739439.elements[3] = ((closureN)self_734981)->elements[3];
c_739439.elements[4] = ((closureN)self_734981)->elements[6];




object c_739457 = Cyc_vector_set_cps(data,(closure)&c_739439,((closureN)self_734981)->elements[4], ((closureN)self_734981)->elements[6], Cyc_vector_ref(data, ((closureN)self_734981)->elements[5], ((closureN)self_734981)->elements[0]));
return_closcall1(data,(closure)&c_739439,  c_739457);
} else { 
  
closureN_type c_739465;
object e_739480 [5];
c_739465.hdr.mark = gc_color_red;
 c_739465.hdr.grayed = 0;
c_739465.tag = closureN_tag;
 c_739465.fn = (function_type)__lambda_404;
c_739465.num_args = 1;
c_739465.num_elements = 5;
c_739465.elements = (object *)e_739480;
c_739465.elements[0] = ((closureN)self_734981)->elements[0];
c_739465.elements[1] = ((closureN)self_734981)->elements[1];
c_739465.elements[2] = ((closureN)self_734981)->elements[2];
c_739465.elements[3] = ((closureN)self_734981)->elements[3];
c_739465.elements[4] = ((closureN)self_734981)->elements[6];




object c_739483 = Cyc_vector_set_cps(data,(closure)&c_739465,((closureN)self_734981)->elements[4], ((closureN)self_734981)->elements[3], Cyc_vector_ref(data, ((closureN)self_734981)->elements[5], ((closureN)self_734981)->elements[0]));
return_closcall1(data,(closure)&c_739465,  c_739483);}
;; 
}

static void __lambda_404(void *data, object self_734983, int argc, object *args) /* object self_734983, object r_733983 */
 {

  


complex_num_type local_739473; 

complex_num_type local_739478; 
return_closcall4(data,  car(((closureN)self_734983)->elements[2]),  ((closureN)self_734983)->elements[1], Cyc_fast_sum(data,&local_739473, ((closureN)self_734983)->elements[0], obj_int2obj(1)), ((closureN)self_734983)->elements[4], Cyc_fast_sum(data,&local_739478, ((closureN)self_734983)->elements[3], obj_int2obj(1)));; 
}

static void __lambda_403(void *data, object self_734982, int argc, object *args) /* object self_734982, object r_733980 */
 {

  


complex_num_type local_739447; 

complex_num_type local_739451; 
return_closcall4(data,  car(((closureN)self_734982)->elements[2]),  ((closureN)self_734982)->elements[1], Cyc_fast_sum(data,&local_739447, ((closureN)self_734982)->elements[0], obj_int2obj(1)), Cyc_fast_sum(data,&local_739451, ((closureN)self_734982)->elements[4], obj_int2obj(1)), ((closureN)self_734982)->elements[3]);; 
}

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



return_direct_with_clo1(data,(closure)&c_739416,__lambda_400,  Cyc_set_cell(data, ((closureN)self_734984)->elements[1], r_733975));; 
}

static void __lambda_400(void *data, object self_734985, int argc, object *args) /* object self_734985, object r_733974 */
 {

  

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

static void __lambda_379(void *data, object _, int argc, object *args) /* closure _,object k_733937, object vec_731082_732694, object value_731083_732695, object cmp_731084_732696, object maybe_91start_87end_731085_732697_raw, ... */
 {
object k_733937 = args[0]; object vec_731082_732694 = args[1]; object value_731083_732695 = args[2]; object cmp_731084_732696 = args[3];
load_varargs(maybe_91start_87end_731085_732697, args, 4, argc - 4);
  Cyc_st_add(data, "srfi/133.sld:vector-binary-search");

closureN_type c_739244;
object e_739399 [4];
c_739244.hdr.mark = gc_color_red;
 c_739244.hdr.grayed = 0;
c_739244.tag = closureN_tag;
 c_739244.fn = (function_type)__lambda_380;
c_739244.num_args = 1;
c_739244.num_elements = 4;
c_739244.elements = (object *)e_739399;
c_739244.elements[0] = k_733937;
c_739244.elements[1] = maybe_91start_87end_731085_732697;
c_739244.elements[2] = value_731083_732695;
c_739244.elements[3] = vec_731082_732694;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_739244, primitive_procedure_127, cmp_731084_732696, __glo_vector_91binary_91search_srfi_133);; 
}

static void __lambda_380(void *data, object self_734960, int argc, object *args) /* object self_734960, object cmp_731086_732698 */
 {
 object cmp_731086_732698 = args[0];
  
closureN_type c_739246;
object e_739397 [4];
c_739246.hdr.mark = gc_color_red;
 c_739246.hdr.grayed = 0;
c_739246.tag = closureN_tag;
 c_739246.fn = (function_type)__lambda_381;
c_739246.num_args = 1;
c_739246.num_elements = 4;
c_739246.elements = (object *)e_739397;
c_739246.elements[0] = cmp_731086_732698;
c_739246.elements[1] = ((closureN)self_734960)->elements[0];
c_739246.elements[2] = ((closureN)self_734960)->elements[1];
c_739246.elements[3] = ((closureN)self_734960)->elements[2];

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_739246, primitive_vector_127, ((closureN)self_734960)->elements[3], __glo_vector_91binary_91search_srfi_133);; 
}

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


closureN_type c_739392;
object e_739396 [2];
c_739392.hdr.mark = gc_color_red;
 c_739392.hdr.grayed = 0;
c_739392.tag = closureN_tag;
 c_739392.fn = (function_type)__lambda_392;
c_739392.num_args = 0;
c_739392.num_elements = 2;
c_739392.elements = (object *)e_739396;
c_739392.elements[0] = ((closureN)self_734961)->elements[2];
c_739392.elements[1] = vec_731117_732699;

return_direct_with_clo1(data,(closure)&c_739248,__lambda_382,  &c_739392);; 
}

static void __lambda_392(void *data, object self_734962, int argc, object *args) /* object self_734962, object k_733961 */
 {
 object k_733961 = args[0];
  return_direct_with_clo6(data,  __glo_vector_91parse_91start_87end_srfi_133, (((closure)  __glo_vector_91parse_91start_87end_srfi_133)->fn),  k_733961, ((closureN)self_734962)->elements[1], ((closureN)self_734962)->elements[0], quote_start, quote_end, __glo_vector_91binary_91search_srfi_133);; 
}

static void __lambda_382(void *data, object self_734963, int argc, object *args) /* object self_734963, object r_733940 */
 {
 object r_733940 = args[0];
  
closureN_type c_739250;
object e_739254 [2];
c_739250.hdr.mark = gc_color_red;
 c_739250.hdr.grayed = 0;
c_739250.tag = closureN_tag;
 c_739250.fn = (function_type)__lambda_383;
c_739250.num_args = 1;
c_739250.num_elements = 2;
c_739250.elements = (object *)e_739254;
c_739250.elements[0] = ((closureN)self_734963)->elements[1];
c_739250.elements[1] = r_733940;


closureN_type c_739255;
object e_739390 [3];
c_739255.hdr.mark = gc_color_red;
 c_739255.hdr.grayed = 0;
c_739255.tag = closureN_tag;
 c_739255.fn = (function_type)__lambda_384;
c_739255.num_args = 2;
c_739255.num_elements = 3;
c_739255.elements = (object *)e_739390;
c_739255.elements[0] = ((closureN)self_734963)->elements[0];
c_739255.elements[1] = ((closureN)self_734963)->elements[2];
c_739255.elements[2] = ((closureN)self_734963)->elements[3];

return_direct_with_clo1(data,(closure)&c_739250,__lambda_383,  &c_739255);; 
}

static void __lambda_384(void *data, object self_734964, int argc, object *args) /* object self_734964, object k_733942, object start_731118_732700, object end_731119_732701 */
 {
 object k_733942 = args[0]; object start_731118_732700 = args[1]; object end_731119_732701 = args[2];
  
closureN_type c_739257;
object e_739389 [4];
c_739257.hdr.mark = gc_color_red;
 c_739257.hdr.grayed = 0;
c_739257.tag = closureN_tag;
 c_739257.fn = (function_type)__lambda_385;
c_739257.num_args = 2;
c_739257.num_elements = 4;
c_739257.elements = (object *)e_739389;
c_739257.elements[0] = ((closureN)self_734964)->elements[0];
c_739257.elements[1] = k_733942;
c_739257.elements[2] = ((closureN)self_734964)->elements[1];
c_739257.elements[3] = ((closureN)self_734964)->elements[2];

return_direct_with_clo2(data,(closure)&c_739257,__lambda_385,  start_731118_732700, end_731119_732701);; 
}

static void __lambda_385(void *data, object self_734965, int argc, object *args) /* object self_734965, object start_731121_732702, object end_731122_732703 */
 {
 object start_731121_732702 = args[0]; object end_731122_732703 = args[1];
  
closureN_type c_739259;
object e_739388 [6];
c_739259.hdr.mark = gc_color_red;
 c_739259.hdr.grayed = 0;
c_739259.tag = closureN_tag;
 c_739259.fn = (function_type)__lambda_386;
c_739259.num_args = 1;
c_739259.num_elements = 6;
c_739259.elements = (object *)e_739388;
c_739259.elements[0] = ((closureN)self_734965)->elements[0];
c_739259.elements[1] = end_731122_732703;
c_739259.elements[2] = ((closureN)self_734965)->elements[1];
c_739259.elements[3] = start_731121_732702;
c_739259.elements[4] = ((closureN)self_734965)->elements[2];
c_739259.elements[5] = ((closureN)self_734965)->elements[3];

return_direct_with_clo1(data,(closure)&c_739259,__lambda_386,  boolean_f);; 
}

static void __lambda_386(void *data, object self_734966, int argc, object *args) /* object self_734966, object loop_731124_732705 */
 {
 object loop_731124_732705 = args[0];
  
closureN_type c_739261;
object e_739384 [6];
c_739261.hdr.mark = gc_color_red;
 c_739261.hdr.grayed = 0;
c_739261.tag = closureN_tag;
 c_739261.fn = (function_type)__lambda_742;
c_739261.num_args = 1;
c_739261.num_elements = 6;
c_739261.elements = (object *)e_739384;
c_739261.elements[0] = ((closureN)self_734966)->elements[0];
c_739261.elements[1] = ((closureN)self_734966)->elements[1];
c_739261.elements[2] = ((closureN)self_734966)->elements[2];
c_739261.elements[3] = ((closureN)self_734966)->elements[3];
c_739261.elements[4] = ((closureN)self_734966)->elements[4];
c_739261.elements[5] = ((closureN)self_734966)->elements[5];


pair_type local_739387; 
return_direct_with_clo1(data,(closure)&c_739261,__lambda_742,  set_cell_as_expr(&local_739387, loop_731124_732705));; 
}

static void __lambda_742(void *data, object self_734967, int argc, object *args) /* object self_734967, object loop_731124_732705 */
 {
 object loop_731124_732705 = args[0];
  
closureN_type c_739263;
object e_739277 [4];
c_739263.hdr.mark = gc_color_red;
 c_739263.hdr.grayed = 0;
c_739263.tag = closureN_tag;
 c_739263.fn = (function_type)__lambda_387;
c_739263.num_args = 1;
c_739263.num_elements = 4;
c_739263.elements = (object *)e_739277;
c_739263.elements[0] = ((closureN)self_734967)->elements[1];
c_739263.elements[1] = ((closureN)self_734967)->elements[2];
c_739263.elements[2] = loop_731124_732705;
c_739263.elements[3] = ((closureN)self_734967)->elements[3];


closureN_type c_739278;
object e_739383 [4];
c_739278.hdr.mark = gc_color_red;
 c_739278.hdr.grayed = 0;
c_739278.tag = closureN_tag;
 c_739278.fn = (function_type)__lambda_389;
c_739278.num_args = 3;
c_739278.num_elements = 4;
c_739278.elements = (object *)e_739383;
c_739278.elements[0] = ((closureN)self_734967)->elements[0];
c_739278.elements[1] = loop_731124_732705;
c_739278.elements[2] = ((closureN)self_734967)->elements[4];
c_739278.elements[3] = ((closureN)self_734967)->elements[5];

return_direct_with_clo1(data,(closure)&c_739263,__lambda_387,  &c_739278);; 
}

static void __lambda_389(void *data, object self_734968, int argc, object *args) /* object self_734968, object k_733945, object start_731125_732706, object end_731126_732707, object j_731127_732708 */
 {
 object k_733945 = args[0]; object start_731125_732706 = args[1]; object end_731126_732707 = args[2]; object j_731127_732708 = args[3];
  object r_733947;
    
if( (boolean_f != Cyc_num_fast_eq_op(data, start_731125_732706, end_731126_732707)) ){ 
  
  r_733947 = Cyc_num_fast_eq_op(data, start_731125_732706, end_731126_732707);
} else { 
  if( (boolean_f != j_731127_732708) ){ 
  
  object local_739290 = alloca(sizeof(complex_num_type)); 
  object local_739293 = alloca(sizeof(complex_num_type)); 
  r_733947 = Cyc_num_fast_eq_op(data, ((inline_function_type)
                   ((closure)__glo_quotient_191_191inline_191_191_scheme_base)->fn)(data,local_739290, Cyc_fast_sum(data,local_739293, start_731125_732706, end_731126_732707), obj_int2obj(2)), j_731127_732708);
} else { 
  r_733947 = boolean_f;}
;}
;if( (boolean_f != r_733947) ){ 
  return_direct_with_clo1(data,  k_733945, (((closure)  k_733945)->fn),  boolean_f);
} else { 
  
closureN_type c_739298;
object e_739372 [5];
c_739298.hdr.mark = gc_color_red;
 c_739298.hdr.grayed = 0;
c_739298.tag = closureN_tag;
 c_739298.fn = (function_type)__lambda_390;
c_739298.num_args = 1;
c_739298.num_elements = 5;
c_739298.elements = (object *)e_739372;
c_739298.elements[0] = ((closureN)self_734968)->elements[0];
c_739298.elements[1] = end_731126_732707;
c_739298.elements[2] = k_733945;
c_739298.elements[3] = ((closureN)self_734968)->elements[1];
c_739298.elements[4] = start_731125_732706;




complex_num_type local_739378; 

complex_num_type local_739381; 
return_closcall3(data,  ((closureN)self_734968)->elements[0],  &c_739298, Cyc_vector_ref(data, ((closureN)self_734968)->elements[3], ((inline_function_type)
                   ((closure)__glo_quotient_191_191inline_191_191_scheme_base)->fn)(data,&local_739378, Cyc_fast_sum(data,&local_739381, start_731125_732706, end_731126_732707), obj_int2obj(2))), ((closureN)self_734968)->elements[2]);}
;; 
}

static void __lambda_390(void *data, object self_734969, int argc, object *args) /* object self_734969, object r_733951 */
 {
 object r_733951 = args[0];
  
closureN_type c_739300;
object e_739361 [4];
c_739300.hdr.mark = gc_color_red;
 c_739300.hdr.grayed = 0;
c_739300.tag = closureN_tag;
 c_739300.fn = (function_type)__lambda_391;
c_739300.num_args = 1;
c_739300.num_elements = 4;
c_739300.elements = (object *)e_739361;
c_739300.elements[0] = ((closureN)self_734969)->elements[1];
c_739300.elements[1] = ((closureN)self_734969)->elements[2];
c_739300.elements[2] = ((closureN)self_734969)->elements[3];
c_739300.elements[3] = ((closureN)self_734969)->elements[4];


pair_type local_739364; 

pair_type local_739368; 

pair_type local_739371; 
return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_739300, primitive_integer_127, r_733951, set_pair_as_expr(&local_739364, ((closureN)self_734969)->elements[0], set_pair_as_expr(&local_739368, quote__for, set_pair_as_expr(&local_739371, __glo_vector_91binary_91search_srfi_133, NULL))));; 
}

static void __lambda_391(void *data, object self_734970, int argc, object *args) /* object self_734970, object comparison_731134_732711 */
 {
 object comparison_731134_732711 = args[0];
    complex_num_type local_739303; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_zero_127_191_191inline_191_191_scheme_base)->fn)(data,&local_739303, comparison_731134_732711)) ){ 
  
complex_num_type local_739308; 

complex_num_type local_739311; 
return_direct_with_clo1(data,  ((closureN)self_734970)->elements[1], (((closure)  ((closureN)self_734970)->elements[1])->fn),  ((inline_function_type)
                   ((closure)__glo_quotient_191_191inline_191_191_scheme_base)->fn)(data,&local_739308, Cyc_fast_sum(data,&local_739311, ((closureN)self_734970)->elements[3], ((closureN)self_734970)->elements[0]), obj_int2obj(2)));
} else { 
    complex_num_type local_739316; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_positive_127_191_191inline_191_191_scheme_base)->fn)(data,&local_739316, comparison_731134_732711)) ){ 
  


complex_num_type local_739325; 

complex_num_type local_739328; 

complex_num_type local_739333; 

complex_num_type local_739336; 
return_closcall4(data,  car(((closureN)self_734970)->elements[2]),  ((closureN)self_734970)->elements[1], ((closureN)self_734970)->elements[3], ((inline_function_type)
                   ((closure)__glo_quotient_191_191inline_191_191_scheme_base)->fn)(data,&local_739325, Cyc_fast_sum(data,&local_739328, ((closureN)self_734970)->elements[3], ((closureN)self_734970)->elements[0]), obj_int2obj(2)), ((inline_function_type)
                   ((closure)__glo_quotient_191_191inline_191_191_scheme_base)->fn)(data,&local_739333, Cyc_fast_sum(data,&local_739336, ((closureN)self_734970)->elements[3], ((closureN)self_734970)->elements[0]), obj_int2obj(2)));
} else { 
  


complex_num_type local_739346; 

complex_num_type local_739349; 

complex_num_type local_739355; 

complex_num_type local_739358; 
return_closcall4(data,  car(((closureN)self_734970)->elements[2]),  ((closureN)self_734970)->elements[1], ((inline_function_type)
                   ((closure)__glo_quotient_191_191inline_191_191_scheme_base)->fn)(data,&local_739346, Cyc_fast_sum(data,&local_739349, ((closureN)self_734970)->elements[3], ((closureN)self_734970)->elements[0]), obj_int2obj(2)), ((closureN)self_734970)->elements[0], ((inline_function_type)
                   ((closure)__glo_quotient_191_191inline_191_191_scheme_base)->fn)(data,&local_739355, Cyc_fast_sum(data,&local_739358, ((closureN)self_734970)->elements[3], ((closureN)self_734970)->elements[0]), obj_int2obj(2)));}
;}
;; 
}

static void __lambda_387(void *data, object self_734971, int argc, object *args) /* object self_734971, object r_733944 */
 {
 object r_733944 = args[0];
  
closureN_type c_739265;
object e_739273 [4];
c_739265.hdr.mark = gc_color_red;
 c_739265.hdr.grayed = 0;
c_739265.tag = closureN_tag;
 c_739265.fn = (function_type)__lambda_388;
c_739265.num_args = 1;
c_739265.num_elements = 4;
c_739265.elements = (object *)e_739273;
c_739265.elements[0] = ((closureN)self_734971)->elements[0];
c_739265.elements[1] = ((closureN)self_734971)->elements[1];
c_739265.elements[2] = ((closureN)self_734971)->elements[2];
c_739265.elements[3] = ((closureN)self_734971)->elements[3];



return_direct_with_clo1(data,(closure)&c_739265,__lambda_388,  Cyc_set_cell(data, ((closureN)self_734971)->elements[2], r_733944));; 
}

static void __lambda_388(void *data, object self_734972, int argc, object *args) /* object self_734972, object r_733943 */
 {

  

return_closcall4(data,  car(((closureN)self_734972)->elements[2]),  ((closureN)self_734972)->elements[1], ((closureN)self_734972)->elements[3], ((closureN)self_734972)->elements[0], boolean_f);; 
}

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

static void __lambda_375(void *data, object _, int argc, object *args) /* closure _,object k_733929, object pred_127_731050_732690, object vec_731051_732691, object vectors_731052_732692_raw, ... */
 {
object k_733929 = args[0]; object pred_127_731050_732690 = args[1]; object vec_731051_732691 = args[2];
load_varargs(vectors_731052_732692, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/133.sld:vector-skip-right");

closureN_type c_739222;
object e_739227 [3];
c_739222.hdr.mark = gc_color_red;
 c_739222.hdr.grayed = 0;
c_739222.tag = closureN_tag;
 c_739222.fn = (function_type)__lambda_376;
c_739222.num_args = 1;
c_739222.num_elements = 3;
c_739222.elements = (object *)e_739227;
c_739222.elements[0] = k_733929;
c_739222.elements[1] = vec_731051_732691;
c_739222.elements[2] = vectors_731052_732692;


closureN_type c_739228;
object e_739241 [1];
c_739228.hdr.mark = gc_color_red;
 c_739228.hdr.grayed = 0;
c_739228.tag = closureN_tag;
 c_739228.fn = (function_type)__lambda_377;
c_739228.num_args = 0;
c_739228.num_elements = 1;
c_739228.elements = (object *)e_739241;
c_739228.elements[0] = pred_127_731050_732690;

return_direct_with_clo1(data,(closure)&c_739222,__lambda_376,  &c_739228);; 
}

static void __lambda_377(void *data, object self_734957, int argc, object *args) /* object self_734957, object k_733931, object elts_731053_732693_raw, ... */
 {
 object k_733931 = args[0];
load_varargs(elts_731053_732693, args, 1, argc - 1);
  
closureN_type c_739230;
object e_739236 [1];
c_739230.hdr.mark = gc_color_red;
 c_739230.hdr.grayed = 0;
c_739230.tag = closureN_tag;
 c_739230.fn = (function_type)__lambda_378;
c_739230.num_args = 1;
c_739230.num_elements = 1;
c_739230.elements = (object *)e_739236;
c_739230.elements[0] = k_733931;


object c_739239 = apply(data,(closure)&c_739230,((closureN)self_734957)->elements[0], elts_731053_732693);
return_closcall1(data,(closure)&c_739230,  c_739239);; 
}

static void __lambda_378(void *data, object self_734958, int argc, object *args) /* object self_734958, object r_733932 */
 {
 object r_733932 = args[0];
  
complex_num_type local_739235; 
return_direct_with_clo1(data,  ((closureN)self_734958)->elements[0], (((closure)  ((closureN)self_734958)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_739235, r_733932));; 
}

static void __lambda_376(void *data, object self_734959, int argc, object *args) /* object self_734959, object r_733930 */
 {
 object r_733930 = args[0];
  return_direct_with_clo5(data,  __glo_vector_91index_95skip_91right_srfi_133, (((closure)  __glo_vector_91index_95skip_91right_srfi_133)->fn),  ((closureN)self_734959)->elements[0], r_733930, ((closureN)self_734959)->elements[1], ((closureN)self_734959)->elements[2], __glo_vector_91index_91right_srfi_133);; 
}

static void __lambda_374(void *data, object _, int argc, object *args) /* closure _,object k_733926, object pred_127_731047_732687, object vec_731048_732688, object vectors_731049_732689_raw, ... */
 {
object k_733926 = args[0]; object pred_127_731047_732687 = args[1]; object vec_731048_732688 = args[2];
load_varargs(vectors_731049_732689, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/133.sld:vector-index-right");
return_direct_with_clo5(data,  __glo_vector_91index_95skip_91right_srfi_133, (((closure)  __glo_vector_91index_95skip_91right_srfi_133)->fn),  k_733926, pred_127_731047_732687, vec_731048_732688, vectors_731049_732689, __glo_vector_91index_91right_srfi_133);; 
}

static void __lambda_370(void *data, object _, int argc, object *args) /* closure _,object k_733918, object pred_127_731013_732683, object vec_731014_732684, object vectors_731015_732685_raw, ... */
 {
object k_733918 = args[0]; object pred_127_731013_732683 = args[1]; object vec_731014_732684 = args[2];
load_varargs(vectors_731015_732685, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/133.sld:vector-skip");

closureN_type c_739198;
object e_739203 [3];
c_739198.hdr.mark = gc_color_red;
 c_739198.hdr.grayed = 0;
c_739198.tag = closureN_tag;
 c_739198.fn = (function_type)__lambda_371;
c_739198.num_args = 1;
c_739198.num_elements = 3;
c_739198.elements = (object *)e_739203;
c_739198.elements[0] = k_733918;
c_739198.elements[1] = vec_731014_732684;
c_739198.elements[2] = vectors_731015_732685;


closureN_type c_739204;
object e_739217 [1];
c_739204.hdr.mark = gc_color_red;
 c_739204.hdr.grayed = 0;
c_739204.tag = closureN_tag;
 c_739204.fn = (function_type)__lambda_372;
c_739204.num_args = 0;
c_739204.num_elements = 1;
c_739204.elements = (object *)e_739217;
c_739204.elements[0] = pred_127_731013_732683;

return_direct_with_clo1(data,(closure)&c_739198,__lambda_371,  &c_739204);; 
}

static void __lambda_372(void *data, object self_734954, int argc, object *args) /* object self_734954, object k_733920, object elts_731016_732686_raw, ... */
 {
 object k_733920 = args[0];
load_varargs(elts_731016_732686, args, 1, argc - 1);
  
closureN_type c_739206;
object e_739212 [1];
c_739206.hdr.mark = gc_color_red;
 c_739206.hdr.grayed = 0;
c_739206.tag = closureN_tag;
 c_739206.fn = (function_type)__lambda_373;
c_739206.num_args = 1;
c_739206.num_elements = 1;
c_739206.elements = (object *)e_739212;
c_739206.elements[0] = k_733920;


object c_739215 = apply(data,(closure)&c_739206,((closureN)self_734954)->elements[0], elts_731016_732686);
return_closcall1(data,(closure)&c_739206,  c_739215);; 
}

static void __lambda_373(void *data, object self_734955, int argc, object *args) /* object self_734955, object r_733921 */
 {
 object r_733921 = args[0];
  
complex_num_type local_739211; 
return_direct_with_clo1(data,  ((closureN)self_734955)->elements[0], (((closure)  ((closureN)self_734955)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_739211, r_733921));; 
}

static void __lambda_371(void *data, object self_734956, int argc, object *args) /* object self_734956, object r_733919 */
 {
 object r_733919 = args[0];
  return_direct_with_clo5(data,  __glo_vector_91index_95skip_srfi_133, (((closure)  __glo_vector_91index_95skip_srfi_133)->fn),  ((closureN)self_734956)->elements[0], r_733919, ((closureN)self_734956)->elements[1], ((closureN)self_734956)->elements[2], __glo_vector_91skip_srfi_133);; 
}

static void __lambda_369(void *data, object _, int argc, object *args) /* closure _,object k_733915, object pred_127_731010_732680, object vec_731011_732681, object vectors_731012_732682_raw, ... */
 {
object k_733915 = args[0]; object pred_127_731010_732680 = args[1]; object vec_731011_732681 = args[2];
load_varargs(vectors_731012_732682, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/133.sld:vector-index");
return_direct_with_clo5(data,  __glo_vector_91index_95skip_srfi_133, (((closure)  __glo_vector_91index_95skip_srfi_133)->fn),  k_733915, pred_127_731010_732680, vec_731011_732681, vectors_731012_732682, __glo_vector_91index_srfi_133);; 
}

static void __lambda_359(void *data, object _, int argc, object *args) /* closure _,object k_733902, object f_73987_732668, object vec_73988_732669, object knil_73989_732670 */
 {
object k_733902 = args[0]; object f_73987_732668 = args[1]; object vec_73988_732669 = args[2]; object knil_73989_732670 = args[3];
  Cyc_st_add(data, "srfi/133.sld:vector-cumulate");

closureN_type c_739124;
object e_739191 [4];
c_739124.hdr.mark = gc_color_red;
 c_739124.hdr.grayed = 0;
c_739124.tag = closureN_tag;
 c_739124.fn = (function_type)__lambda_360;
c_739124.num_args = 1;
c_739124.num_elements = 4;
c_739124.elements = (object *)e_739191;
c_739124.elements[0] = f_73987_732668;
c_739124.elements[1] = k_733902;
c_739124.elements[2] = knil_73989_732670;
c_739124.elements[3] = vec_73988_732669;



return_direct_with_clo1(data,(closure)&c_739124,__lambda_360,  Cyc_vector_length(data, vec_73988_732669));; 
}

static void __lambda_360(void *data, object self_734944, int argc, object *args) /* object self_734944, object len_73992_732671 */
 {
 object len_73992_732671 = args[0];
  
closureN_type c_739126;
object e_739187 [5];
c_739126.hdr.mark = gc_color_red;
 c_739126.hdr.grayed = 0;
c_739126.tag = closureN_tag;
 c_739126.fn = (function_type)__lambda_361;
c_739126.num_args = 1;
c_739126.num_elements = 5;
c_739126.elements = (object *)e_739187;
c_739126.elements[0] = ((closureN)self_734944)->elements[0];
c_739126.elements[1] = ((closureN)self_734944)->elements[1];
c_739126.elements[2] = ((closureN)self_734944)->elements[2];
c_739126.elements[3] = len_73992_732671;
c_739126.elements[4] = ((closureN)self_734944)->elements[3];


object c_739190 = Cyc_make_vector(data,(closure)&c_739126,1,len_73992_732671);
return_closcall1(data,(closure)&c_739126,  c_739190);; 
}

static void __lambda_361(void *data, object self_734945, int argc, object *args) /* object self_734945, object result_73995_732672 */
 {
 object result_73995_732672 = args[0];
  
closureN_type c_739128;
object e_739185 [5];
c_739128.hdr.mark = gc_color_red;
 c_739128.hdr.grayed = 0;
c_739128.tag = closureN_tag;
 c_739128.fn = (function_type)__lambda_362;
c_739128.num_args = 1;
c_739128.num_elements = 5;
c_739128.elements = (object *)e_739185;
c_739128.elements[0] = ((closureN)self_734945)->elements[0];
c_739128.elements[1] = ((closureN)self_734945)->elements[1];
c_739128.elements[2] = ((closureN)self_734945)->elements[3];
c_739128.elements[3] = result_73995_732672;
c_739128.elements[4] = ((closureN)self_734945)->elements[4];

return_direct_with_clo1(data,(closure)&c_739128,__lambda_362,  ((closureN)self_734945)->elements[2]);; 
}

static void __lambda_362(void *data, object self_734946, int argc, object *args) /* object self_734946, object left_73999_732674 */
 {
 object left_73999_732674 = args[0];
  
closureN_type c_739130;
object e_739184 [6];
c_739130.hdr.mark = gc_color_red;
 c_739130.hdr.grayed = 0;
c_739130.tag = closureN_tag;
 c_739130.fn = (function_type)__lambda_363;
c_739130.num_args = 1;
c_739130.num_elements = 6;
c_739130.elements = (object *)e_739184;
c_739130.elements[0] = ((closureN)self_734946)->elements[0];
c_739130.elements[1] = ((closureN)self_734946)->elements[1];
c_739130.elements[2] = left_73999_732674;
c_739130.elements[3] = ((closureN)self_734946)->elements[2];
c_739130.elements[4] = ((closureN)self_734946)->elements[3];
c_739130.elements[5] = ((closureN)self_734946)->elements[4];

return_direct_with_clo1(data,(closure)&c_739130,__lambda_363,  boolean_f);; 
}

static void __lambda_363(void *data, object self_734947, int argc, object *args) /* object self_734947, object loop_731000_732675 */
 {
 object loop_731000_732675 = args[0];
  
closureN_type c_739132;
object e_739180 [6];
c_739132.hdr.mark = gc_color_red;
 c_739132.hdr.grayed = 0;
c_739132.tag = closureN_tag;
 c_739132.fn = (function_type)__lambda_741;
c_739132.num_args = 1;
c_739132.num_elements = 6;
c_739132.elements = (object *)e_739180;
c_739132.elements[0] = ((closureN)self_734947)->elements[0];
c_739132.elements[1] = ((closureN)self_734947)->elements[1];
c_739132.elements[2] = ((closureN)self_734947)->elements[2];
c_739132.elements[3] = ((closureN)self_734947)->elements[3];
c_739132.elements[4] = ((closureN)self_734947)->elements[4];
c_739132.elements[5] = ((closureN)self_734947)->elements[5];


pair_type local_739183; 
return_direct_with_clo1(data,(closure)&c_739132,__lambda_741,  set_cell_as_expr(&local_739183, loop_731000_732675));; 
}

static void __lambda_741(void *data, object self_734948, int argc, object *args) /* object self_734948, object loop_731000_732675 */
 {
 object loop_731000_732675 = args[0];
  
closureN_type c_739134;
object e_739147 [3];
c_739134.hdr.mark = gc_color_red;
 c_739134.hdr.grayed = 0;
c_739134.tag = closureN_tag;
 c_739134.fn = (function_type)__lambda_364;
c_739134.num_args = 1;
c_739134.num_elements = 3;
c_739134.elements = (object *)e_739147;
c_739134.elements[0] = ((closureN)self_734948)->elements[1];
c_739134.elements[1] = ((closureN)self_734948)->elements[2];
c_739134.elements[2] = loop_731000_732675;


closureN_type c_739148;
object e_739179 [5];
c_739148.hdr.mark = gc_color_red;
 c_739148.hdr.grayed = 0;
c_739148.tag = closureN_tag;
 c_739148.fn = (function_type)__lambda_366;
c_739148.num_args = 2;
c_739148.num_elements = 5;
c_739148.elements = (object *)e_739179;
c_739148.elements[0] = ((closureN)self_734948)->elements[0];
c_739148.elements[1] = ((closureN)self_734948)->elements[3];
c_739148.elements[2] = loop_731000_732675;
c_739148.elements[3] = ((closureN)self_734948)->elements[4];
c_739148.elements[4] = ((closureN)self_734948)->elements[5];

return_direct_with_clo1(data,(closure)&c_739134,__lambda_364,  &c_739148);; 
}

static void __lambda_366(void *data, object self_734949, int argc, object *args) /* object self_734949, object k_733907, object i_731001_732676, object left_731002_732677 */
 {
 object k_733907 = args[0]; object i_731001_732676 = args[1]; object left_731002_732677 = args[2];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, i_731001_732676, ((closureN)self_734949)->elements[1])) ){ 
  return_direct_with_clo1(data,  k_733907, (((closure)  k_733907)->fn),  ((closureN)self_734949)->elements[3]);
} else { 
  
closureN_type c_739156;
object e_739175 [4];
c_739156.hdr.mark = gc_color_red;
 c_739156.hdr.grayed = 0;
c_739156.tag = closureN_tag;
 c_739156.fn = (function_type)__lambda_367;
c_739156.num_args = 1;
c_739156.num_elements = 4;
c_739156.elements = (object *)e_739175;
c_739156.elements[0] = i_731001_732676;
c_739156.elements[1] = k_733907;
c_739156.elements[2] = ((closureN)self_734949)->elements[2];
c_739156.elements[3] = ((closureN)self_734949)->elements[3];



return_closcall3(data,  ((closureN)self_734949)->elements[0],  &c_739156, left_731002_732677, Cyc_vector_ref(data, ((closureN)self_734949)->elements[4], i_731001_732676));}
;; 
}

static void __lambda_367(void *data, object self_734950, int argc, object *args) /* object self_734950, object r_731008_732679 */
 {
 object r_731008_732679 = args[0];
  
closureN_type c_739158;
object e_739169 [4];
c_739158.hdr.mark = gc_color_red;
 c_739158.hdr.grayed = 0;
c_739158.tag = closureN_tag;
 c_739158.fn = (function_type)__lambda_368;
c_739158.num_args = 1;
c_739158.num_elements = 4;
c_739158.elements = (object *)e_739169;
c_739158.elements[0] = ((closureN)self_734950)->elements[0];
c_739158.elements[1] = ((closureN)self_734950)->elements[1];
c_739158.elements[2] = ((closureN)self_734950)->elements[2];
c_739158.elements[3] = r_731008_732679;


object c_739172 = Cyc_vector_set_cps(data,(closure)&c_739158,((closureN)self_734950)->elements[3], ((closureN)self_734950)->elements[0], r_731008_732679);
return_closcall1(data,(closure)&c_739158,  c_739172);; 
}

static void __lambda_368(void *data, object self_734951, int argc, object *args) /* object self_734951, object r_733911 */
 {

  


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

static void __lambda_364(void *data, object self_734952, int argc, object *args) /* object self_734952, object r_733906 */
 {
 object r_733906 = args[0];
  
closureN_type c_739136;
object e_739143 [3];
c_739136.hdr.mark = gc_color_red;
 c_739136.hdr.grayed = 0;
c_739136.tag = closureN_tag;
 c_739136.fn = (function_type)__lambda_365;
c_739136.num_args = 1;
c_739136.num_elements = 3;
c_739136.elements = (object *)e_739143;
c_739136.elements[0] = ((closureN)self_734952)->elements[0];
c_739136.elements[1] = ((closureN)self_734952)->elements[1];
c_739136.elements[2] = ((closureN)self_734952)->elements[2];



return_direct_with_clo1(data,(closure)&c_739136,__lambda_365,  Cyc_set_cell(data, ((closureN)self_734952)->elements[2], r_733906));; 
}

static void __lambda_365(void *data, object self_734953, int argc, object *args) /* object self_734953, object r_733905 */
 {

  

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

static void __lambda_346(void *data, object _, int argc, object *args) /* closure _,object k_733886, object pred_127_73978_732659, object vec_73979_732660, object vectors_73980_732661_raw, ... */
 {
object k_733886 = args[0]; object pred_127_73978_732659 = args[1]; object vec_73979_732660 = args[2];
load_varargs(vectors_73980_732661, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/133.sld:vector-count");

closureN_type c_739041;
object e_739121 [3];
c_739041.hdr.mark = gc_color_red;
 c_739041.hdr.grayed = 0;
c_739041.tag = closureN_tag;
 c_739041.fn = (function_type)__lambda_347;
c_739041.num_args = 1;
c_739041.num_elements = 3;
c_739041.elements = (object *)e_739121;
c_739041.elements[0] = k_733886;
c_739041.elements[1] = vec_73979_732660;
c_739041.elements[2] = vectors_73980_732661;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_739041, primitive_procedure_127, pred_127_73978_732659, __glo_vector_91count_srfi_133);; 
}

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

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_739043, primitive_vector_127, ((closureN)self_734932)->elements[1], __glo_vector_91count_srfi_133);; 
}

static void __lambda_348(void *data, object self_734933, int argc, object *args) /* object self_734933, object r_733888 */
 {
 object r_733888 = args[0];
  
closureN_type c_739045;
object e_739117 [2];
c_739045.hdr.mark = gc_color_red;
 c_739045.hdr.grayed = 0;
c_739045.tag = closureN_tag;
 c_739045.fn = (function_type)__lambda_349;
c_739045.num_args = 2;
c_739045.num_elements = 2;
c_739045.elements = (object *)e_739117;
c_739045.elements[0] = ((closureN)self_734933)->elements[0];
c_739045.elements[1] = ((closureN)self_734933)->elements[2];

return_direct_with_clo2(data,(closure)&c_739045,__lambda_349,  ((closureN)self_734933)->elements[1], r_733888);; 
}

static void __lambda_349(void *data, object self_734934, int argc, object *args) /* object self_734934, object pred_127_73981_732662, object vec_73982_732663 */
 {
 object pred_127_73981_732662 = args[0]; object vec_73982_732663 = args[1];
    
if( (boolean_f != Cyc_is_null(((closureN)self_734934)->elements[1])) ){ 
  
closureN_type c_739050;
object e_739061 [2];
c_739050.hdr.mark = gc_color_red;
 c_739050.hdr.grayed = 0;
c_739050.tag = closureN_tag;
 c_739050.fn = (function_type)__lambda_350;
c_739050.num_args = 1;
c_739050.num_elements = 2;
c_739050.elements = (object *)e_739061;
c_739050.elements[0] = ((closureN)self_734934)->elements[0];
c_739050.elements[1] = vec_73982_732663;


closureN_type c_739062;
object e_739076 [1];
c_739062.hdr.mark = gc_color_red;
 c_739062.hdr.grayed = 0;
c_739062.tag = closureN_tag;
 c_739062.fn = (function_type)__lambda_352;
c_739062.num_args = 2;
c_739062.num_elements = 1;
c_739062.elements = (object *)e_739076;
c_739062.elements[0] = pred_127_73981_732662;

return_direct_with_clo1(data,(closure)&c_739050,__lambda_350,  &c_739062);
} else { 
  
closureN_type c_739078;
object e_739098 [3];
c_739078.hdr.mark = gc_color_red;
 c_739078.hdr.grayed = 0;
c_739078.tag = closureN_tag;
 c_739078.fn = (function_type)__lambda_354;
c_739078.num_args = 1;
c_739078.num_elements = 3;
c_739078.elements = (object *)e_739098;
c_739078.elements[0] = ((closureN)self_734934)->elements[0];
c_739078.elements[1] = vec_73982_732663;
c_739078.elements[2] = ((closureN)self_734934)->elements[1];


closureN_type c_739099;
object e_739116 [1];
c_739099.hdr.mark = gc_color_red;
 c_739099.hdr.grayed = 0;
c_739099.tag = closureN_tag;
 c_739099.fn = (function_type)__lambda_357;
c_739099.num_args = 1;
c_739099.num_elements = 1;
c_739099.elements = (object *)e_739116;
c_739099.elements[0] = pred_127_73981_732662;

return_direct_with_clo1(data,(closure)&c_739078,__lambda_354,  &c_739099);}
;; 
}

static void __lambda_357(void *data, object self_734939, int argc, object *args) /* object self_734939, object k_733898, object count_73985_732666, object elts_73986_732667_raw, ... */
 {
 object k_733898 = args[0]; object count_73985_732666 = args[1];
load_varargs(elts_73986_732667, args, 2, argc - 2);
  
closureN_type c_739101;
object e_739111 [2];
c_739101.hdr.mark = gc_color_red;
 c_739101.hdr.grayed = 0;
c_739101.tag = closureN_tag;
 c_739101.fn = (function_type)__lambda_358;
c_739101.num_args = 1;
c_739101.num_elements = 2;
c_739101.elements = (object *)e_739111;
c_739101.elements[0] = count_73985_732666;
c_739101.elements[1] = k_733898;


object c_739114 = apply(data,(closure)&c_739101,((closureN)self_734939)->elements[0], elts_73986_732667);
return_closcall1(data,(closure)&c_739101,  c_739114);; 
}

static void __lambda_358(void *data, object self_734940, int argc, object *args) /* object self_734940, object r_733899 */
 {
 object r_733899 = args[0];
  if( (boolean_f != r_733899) ){ 
  
complex_num_type local_739106; 
return_direct_with_clo1(data,  ((closureN)self_734940)->elements[1], (((closure)  ((closureN)self_734940)->elements[1])->fn),  Cyc_fast_sum(data,&local_739106, ((closureN)self_734940)->elements[0], obj_int2obj(1)));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734940)->elements[1], (((closure)  ((closureN)self_734940)->elements[1])->fn),  ((closureN)self_734940)->elements[0]);}
;; 
}

static void __lambda_354(void *data, object self_734941, int argc, object *args) /* object self_734941, object r_733894 */
 {
 object r_733894 = args[0];
  
closureN_type c_739080;
object e_739093 [4];
c_739080.hdr.mark = gc_color_red;
 c_739080.hdr.grayed = 0;
c_739080.tag = closureN_tag;
 c_739080.fn = (function_type)__lambda_355;
c_739080.num_args = 1;
c_739080.num_elements = 4;
c_739080.elements = (object *)e_739093;
c_739080.elements[0] = ((closureN)self_734941)->elements[0];
c_739080.elements[1] = r_733894;
c_739080.elements[2] = ((closureN)self_734941)->elements[1];
c_739080.elements[3] = ((closureN)self_734941)->elements[2];



return_direct_with_clo4(data,  __glo__75smallest_91length_srfi_133, (((closure)  __glo__75smallest_91length_srfi_133)->fn),  &c_739080, ((closureN)self_734941)->elements[2], Cyc_vector_length(data, ((closureN)self_734941)->elements[1]), __glo_vector_91count_srfi_133);; 
}

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


pair_type local_739090; 
return_direct_with_clo1(data,(closure)&c_739082,__lambda_356,  set_pair_as_expr(&local_739090, ((closureN)self_734942)->elements[2], ((closureN)self_734942)->elements[3]));; 
}

static void __lambda_356(void *data, object self_734943, int argc, object *args) /* object self_734943, object r_733896 */
 {
 object r_733896 = args[0];
  return_direct_with_clo5(data,  __glo__75vector_91fold2_87_srfi_133, (((closure)  __glo__75vector_91fold2_87_srfi_133)->fn),  ((closureN)self_734943)->elements[0], ((closureN)self_734943)->elements[1], obj_int2obj(0), ((closureN)self_734943)->elements[2], r_733896);; 
}

static void __lambda_352(void *data, object self_734935, int argc, object *args) /* object self_734935, object k_733892, object count_73983_732664, object elt_73984_732665 */
 {
 object k_733892 = args[0]; object count_73983_732664 = args[1]; object elt_73984_732665 = args[2];
  
closureN_type c_739065;
object e_739075 [2];
c_739065.hdr.mark = gc_color_red;
 c_739065.hdr.grayed = 0;
c_739065.tag = closureN_tag;
 c_739065.fn = (function_type)__lambda_353;
c_739065.num_args = 1;
c_739065.num_elements = 2;
c_739065.elements = (object *)e_739075;
c_739065.elements[0] = count_73983_732664;
c_739065.elements[1] = k_733892;

return_closcall2(data,  ((closureN)self_734935)->elements[0],  &c_739065, elt_73984_732665);; 
}

static void __lambda_353(void *data, object self_734936, int argc, object *args) /* object self_734936, object r_733893 */
 {
 object r_733893 = args[0];
  if( (boolean_f != r_733893) ){ 
  
complex_num_type local_739070; 
return_direct_with_clo1(data,  ((closureN)self_734936)->elements[1], (((closure)  ((closureN)self_734936)->elements[1])->fn),  Cyc_fast_sum(data,&local_739070, ((closureN)self_734936)->elements[0], obj_int2obj(1)));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734936)->elements[1], (((closure)  ((closureN)self_734936)->elements[1])->fn),  ((closureN)self_734936)->elements[0]);}
;; 
}

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



return_direct_with_clo1(data,(closure)&c_739052,__lambda_351,  Cyc_vector_length(data, ((closureN)self_734937)->elements[1]));; 
}

static void __lambda_351(void *data, object self_734938, int argc, object *args) /* object self_734938, object r_733891 */
 {
 object r_733891 = args[0];
  return_direct_with_clo5(data,  __glo__75vector_91fold1_srfi_133, (((closure)  __glo__75vector_91fold1_srfi_133)->fn),  ((closureN)self_734938)->elements[0], ((closureN)self_734938)->elements[1], obj_int2obj(0), r_733891, ((closureN)self_734938)->elements[2]);; 
}

static void __lambda_336(void *data, object _, int argc, object *args) /* closure _,object k_733872, object f_73952_732654, object vec_73953_732655, object vectors_73954_732656_raw, ... */
 {
object k_733872 = args[0]; object f_73952_732654 = args[1]; object vec_73953_732655 = args[2];
load_varargs(vectors_73954_732656, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/133.sld:vector-map!");

closureN_type c_738985;
object e_739038 [3];
c_738985.hdr.mark = gc_color_red;
 c_738985.hdr.grayed = 0;
c_738985.tag = closureN_tag;
 c_738985.fn = (function_type)__lambda_337;
c_738985.num_args = 1;
c_738985.num_elements = 3;
c_738985.elements = (object *)e_739038;
c_738985.elements[0] = k_733872;
c_738985.elements[1] = vec_73953_732655;
c_738985.elements[2] = vectors_73954_732656;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_738985, primitive_procedure_127, f_73952_732654, __glo_vector_91map_67_srfi_133);; 
}

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

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_738987, primitive_vector_127, ((closureN)self_734923)->elements[1], __glo_vector_91map_67_srfi_133);; 
}

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

return_direct_with_clo2(data,(closure)&c_738989,__lambda_339,  ((closureN)self_734924)->elements[1], r_733874);; 
}

static void __lambda_339(void *data, object self_734925, int argc, object *args) /* object self_734925, object f_73955_732657, object vec_73956_732658 */
 {
 object f_73955_732657 = args[0]; object vec_73956_732658 = args[1];
  
closureN_type c_738991;
object e_739029 [3];
c_738991.hdr.mark = gc_color_red;
 c_738991.hdr.grayed = 0;
c_738991.tag = closureN_tag;
 c_738991.fn = (function_type)__lambda_340;
c_738991.num_args = 0;
c_738991.num_elements = 3;
c_738991.elements = (object *)e_739029;
c_738991.elements[0] = f_73955_732657;
c_738991.elements[1] = vec_73956_732658;
c_738991.elements[2] = ((closureN)self_734925)->elements[1];


closureN_type c_739030;
object e_739033 [1];
c_739030.hdr.mark = gc_color_red;
 c_739030.hdr.grayed = 0;
c_739030.tag = closureN_tag;
 c_739030.fn = (function_type)__lambda_345;
c_739030.num_args = 1;
c_739030.num_elements = 1;
c_739030.elements = (object *)e_739033;
c_739030.elements[0] = ((closureN)self_734925)->elements[0];

return_direct_with_clo1(data,(closure)&c_738991,__lambda_340,  &c_739030);; 
}

static void __lambda_345(void *data, object self_734926, int argc, object *args) /* object self_734926, object r_733875 */
 {

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

static void __lambda_340(void *data, object self_734927, int argc, object *args) /* object self_734927, object k_733876 */
 {
 object k_733876 = args[0];
    
if( (boolean_f != Cyc_is_null(((closureN)self_734927)->elements[2])) ){ 
  
closureN_type c_738996;
object e_739002 [3];
c_738996.hdr.mark = gc_color_red;
 c_738996.hdr.grayed = 0;
c_738996.tag = closureN_tag;
 c_738996.fn = (function_type)__lambda_341;
c_738996.num_args = 1;
c_738996.num_elements = 3;
c_738996.elements = (object *)e_739002;
c_738996.elements[0] = ((closureN)self_734927)->elements[0];
c_738996.elements[1] = k_733876;
c_738996.elements[2] = ((closureN)self_734927)->elements[1];



return_direct_with_clo1(data,(closure)&c_738996,__lambda_341,  Cyc_vector_length(data, ((closureN)self_734927)->elements[1]));
} else { 
  
closureN_type c_739007;
object e_739023 [4];
c_739007.hdr.mark = gc_color_red;
 c_739007.hdr.grayed = 0;
c_739007.tag = closureN_tag;
 c_739007.fn = (function_type)__lambda_342;
c_739007.num_args = 1;
c_739007.num_elements = 4;
c_739007.elements = (object *)e_739023;
c_739007.elements[0] = ((closureN)self_734927)->elements[0];
c_739007.elements[1] = k_733876;
c_739007.elements[2] = ((closureN)self_734927)->elements[1];
c_739007.elements[3] = ((closureN)self_734927)->elements[2];


pair_type local_739026; 
return_direct_with_clo1(data,(closure)&c_739007,__lambda_342,  set_pair_as_expr(&local_739026, ((closureN)self_734927)->elements[1], ((closureN)self_734927)->elements[2]));}
;; 
}

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



return_direct_with_clo1(data,(closure)&c_739009,__lambda_343,  Cyc_vector_length(data, ((closureN)self_734929)->elements[2]));; 
}

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

return_direct_with_clo4(data,  __glo__75smallest_91length_srfi_133, (((closure)  __glo__75smallest_91length_srfi_133)->fn),  &c_739011, ((closureN)self_734930)->elements[4], r_733881, __glo_vector_91map_67_srfi_133);; 
}

static void __lambda_344(void *data, object self_734931, int argc, object *args) /* object self_734931, object r_733880 */
 {
 object r_733880 = args[0];
  return_direct_with_clo5(data,  __glo__75vector_91map2_87_67_srfi_133, (((closure)  __glo__75vector_91map2_87_67_srfi_133)->fn),  ((closureN)self_734931)->elements[1], ((closureN)self_734931)->elements[0], ((closureN)self_734931)->elements[3], ((closureN)self_734931)->elements[2], r_733880);; 
}

static void __lambda_341(void *data, object self_734928, int argc, object *args) /* object self_734928, object r_733878 */
 {
 object r_733878 = args[0];
  return_direct_with_clo5(data,  __glo__75vector_91map1_67_srfi_133, (((closure)  __glo__75vector_91map1_67_srfi_133)->fn),  ((closureN)self_734928)->elements[1], ((closureN)self_734928)->elements[0], ((closureN)self_734928)->elements[2], ((closureN)self_734928)->elements[2], r_733878);; 
}

static void __lambda_329(void *data, object _, int argc, object *args) /* closure _,object k_733860, object kons_73923_732648, object knil_73924_732649, object vec_73925_732650, object vectors_73926_732651_raw, ... */
 {
object k_733860 = args[0]; object kons_73923_732648 = args[1]; object knil_73924_732649 = args[2]; object vec_73925_732650 = args[3];
load_varargs(vectors_73926_732651, args, 4, argc - 4);
  Cyc_st_add(data, "srfi/133.sld:vector-fold");

closureN_type c_738941;
object e_738982 [4];
c_738941.hdr.mark = gc_color_red;
 c_738941.hdr.grayed = 0;
c_738941.tag = closureN_tag;
 c_738941.fn = (function_type)__lambda_330;
c_738941.num_args = 1;
c_738941.num_elements = 4;
c_738941.elements = (object *)e_738982;
c_738941.elements[0] = k_733860;
c_738941.elements[1] = knil_73924_732649;
c_738941.elements[2] = vec_73925_732650;
c_738941.elements[3] = vectors_73926_732651;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_738941, primitive_procedure_127, kons_73923_732648, __glo_vector_91fold_srfi_133);; 
}

static void __lambda_330(void *data, object self_734917, int argc, object *args) /* object self_734917, object r_733861 */
 {
 object r_733861 = args[0];
  
closureN_type c_738943;
object e_738980 [4];
c_738943.hdr.mark = gc_color_red;
 c_738943.hdr.grayed = 0;
c_738943.tag = closureN_tag;
 c_738943.fn = (function_type)__lambda_331;
c_738943.num_args = 1;
c_738943.num_elements = 4;
c_738943.elements = (object *)e_738980;
c_738943.elements[0] = ((closureN)self_734917)->elements[0];
c_738943.elements[1] = ((closureN)self_734917)->elements[1];
c_738943.elements[2] = r_733861;
c_738943.elements[3] = ((closureN)self_734917)->elements[3];

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_738943, primitive_vector_127, ((closureN)self_734917)->elements[2], __glo_vector_91fold_srfi_133);; 
}

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

return_direct_with_clo2(data,(closure)&c_738945,__lambda_332,  ((closureN)self_734918)->elements[2], r_733862);; 
}

static void __lambda_332(void *data, object self_734919, int argc, object *args) /* object self_734919, object kons_73927_732652, object vec_73928_732653 */
 {
 object kons_73927_732652 = args[0]; object vec_73928_732653 = args[1];
    
if( (boolean_f != Cyc_is_null(((closureN)self_734919)->elements[2])) ){ 
  
closureN_type c_738950;
object e_738956 [4];
c_738950.hdr.mark = gc_color_red;
 c_738950.hdr.grayed = 0;
c_738950.tag = closureN_tag;
 c_738950.fn = (function_type)__lambda_333;
c_738950.num_args = 1;
c_738950.num_elements = 4;
c_738950.elements = (object *)e_738956;
c_738950.elements[0] = ((closureN)self_734919)->elements[0];
c_738950.elements[1] = ((closureN)self_734919)->elements[1];
c_738950.elements[2] = kons_73927_732652;
c_738950.elements[3] = vec_73928_732653;



return_direct_with_clo1(data,(closure)&c_738950,__lambda_333,  Cyc_vector_length(data, vec_73928_732653));
} else { 
  
closureN_type c_738960;
object e_738974 [5];
c_738960.hdr.mark = gc_color_red;
 c_738960.hdr.grayed = 0;
c_738960.tag = closureN_tag;
 c_738960.fn = (function_type)__lambda_334;
c_738960.num_args = 1;
c_738960.num_elements = 5;
c_738960.elements = (object *)e_738974;
c_738960.elements[0] = ((closureN)self_734919)->elements[0];
c_738960.elements[1] = ((closureN)self_734919)->elements[1];
c_738960.elements[2] = kons_73927_732652;
c_738960.elements[3] = vec_73928_732653;
c_738960.elements[4] = ((closureN)self_734919)->elements[2];



return_direct_with_clo4(data,  __glo__75smallest_91length_srfi_133, (((closure)  __glo__75smallest_91length_srfi_133)->fn),  &c_738960, ((closureN)self_734919)->elements[2], Cyc_vector_length(data, vec_73928_732653), __glo_vector_91fold_srfi_133);}
;; 
}

static void __lambda_334(void *data, object self_734921, int argc, object *args) /* object self_734921, object r_733865 */
 {
 object r_733865 = args[0];
  
closureN_type c_738962;
object e_738968 [4];
c_738962.hdr.mark = gc_color_red;
 c_738962.hdr.grayed = 0;
c_738962.tag = closureN_tag;
 c_738962.fn = (function_type)__lambda_335;
c_738962.num_args = 1;
c_738962.num_elements = 4;
c_738962.elements = (object *)e_738968;
c_738962.elements[0] = ((closureN)self_734921)->elements[0];
c_738962.elements[1] = ((closureN)self_734921)->elements[1];
c_738962.elements[2] = ((closureN)self_734921)->elements[2];
c_738962.elements[3] = r_733865;


pair_type local_738971; 
return_direct_with_clo1(data,(closure)&c_738962,__lambda_335,  set_pair_as_expr(&local_738971, ((closureN)self_734921)->elements[3], ((closureN)self_734921)->elements[4]));; 
}

static void __lambda_335(void *data, object self_734922, int argc, object *args) /* object self_734922, object r_733866 */
 {
 object r_733866 = args[0];
  return_direct_with_clo5(data,  __glo__75vector_91fold2_87_srfi_133, (((closure)  __glo__75vector_91fold2_87_srfi_133)->fn),  ((closureN)self_734922)->elements[0], ((closureN)self_734922)->elements[2], ((closureN)self_734922)->elements[1], ((closureN)self_734922)->elements[3], r_733866);; 
}

static void __lambda_333(void *data, object self_734920, int argc, object *args) /* object self_734920, object r_733864 */
 {
 object r_733864 = args[0];
  return_direct_with_clo5(data,  __glo__75vector_91fold1_srfi_133, (((closure)  __glo__75vector_91fold1_srfi_133)->fn),  ((closureN)self_734920)->elements[0], ((closureN)self_734920)->elements[2], ((closureN)self_734920)->elements[1], r_733864, ((closureN)self_734920)->elements[3]);; 
}

static void __lambda_316(void *data, object _, int argc, object *args) /* closure _,object k_733839, object elt_123_127_73897_732634, object vector_91a_73898_732635, object vector_91b_73899_732636 */
 {
object k_733839 = args[0]; object elt_123_127_73897_732634 = args[1]; object vector_91a_73898_732635 = args[2]; object vector_91b_73899_732636 = args[3];
  Cyc_st_add(data, "srfi/133.sld:binary-vector=");
  
if( (boolean_f != Cyc_eq(vector_91a_73898_732635, vector_91b_73899_732636)) ){ 
  

return_direct_with_clo1(data,  k_733839, (((closure)  k_733839)->fn),  Cyc_eq(vector_91a_73898_732635, vector_91b_73899_732636));
} else { 
  
closureN_type c_738822;
object e_738938 [4];
c_738822.hdr.mark = gc_color_red;
 c_738822.hdr.grayed = 0;
c_738822.tag = closureN_tag;
 c_738822.fn = (function_type)__lambda_317;
c_738822.num_args = 2;
c_738822.num_elements = 4;
c_738822.elements = (object *)e_738938;
c_738822.elements[0] = elt_123_127_73897_732634;
c_738822.elements[1] = k_733839;
c_738822.elements[2] = vector_91a_73898_732635;
c_738822.elements[3] = vector_91b_73899_732636;

return_direct_with_clo2(data,(closure)&c_738822,__lambda_317,  boolean_f, boolean_f);}
;; 
}

static void __lambda_317(void *data, object self_734903, int argc, object *args) /* object self_734903, object loop_73906_732640, object test_73907_732641 */
 {
 object loop_73906_732640 = args[0]; object test_73907_732641 = args[1];
  
closureN_type c_738824;
object e_738934 [5];
c_738824.hdr.mark = gc_color_red;
 c_738824.hdr.grayed = 0;
c_738824.tag = closureN_tag;
 c_738824.fn = (function_type)__lambda_740;
c_738824.num_args = 1;
c_738824.num_elements = 5;
c_738824.elements = (object *)e_738934;
c_738824.elements[0] = ((closureN)self_734903)->elements[0];
c_738824.elements[1] = ((closureN)self_734903)->elements[1];
c_738824.elements[2] = test_73907_732641;
c_738824.elements[3] = ((closureN)self_734903)->elements[2];
c_738824.elements[4] = ((closureN)self_734903)->elements[3];


pair_type local_738937; 
return_direct_with_clo1(data,(closure)&c_738824,__lambda_740,  set_cell_as_expr(&local_738937, loop_73906_732640));; 
}

static void __lambda_740(void *data, object self_734904, int argc, object *args) /* object self_734904, object loop_73906_732640 */
 {
 object loop_73906_732640 = args[0];
  
closureN_type c_738826;
object e_738929 [5];
c_738826.hdr.mark = gc_color_red;
 c_738826.hdr.grayed = 0;
c_738826.tag = closureN_tag;
 c_738826.fn = (function_type)__lambda_739;
c_738826.num_args = 1;
c_738826.num_elements = 5;
c_738826.elements = (object *)e_738929;
c_738826.elements[0] = ((closureN)self_734904)->elements[0];
c_738826.elements[1] = ((closureN)self_734904)->elements[1];
c_738826.elements[2] = loop_73906_732640;
c_738826.elements[3] = ((closureN)self_734904)->elements[3];
c_738826.elements[4] = ((closureN)self_734904)->elements[4];


pair_type local_738932; 
return_direct_with_clo1(data,(closure)&c_738826,__lambda_739,  set_cell_as_expr(&local_738932, ((closureN)self_734904)->elements[2]));; 
}

static void __lambda_739(void *data, object self_734905, int argc, object *args) /* object self_734905, object test_73907_732641 */
 {
 object test_73907_732641 = args[0];
  
closureN_type c_738828;
object e_738889 [6];
c_738828.hdr.mark = gc_color_red;
 c_738828.hdr.grayed = 0;
c_738828.tag = closureN_tag;
 c_738828.fn = (function_type)__lambda_318;
c_738828.num_args = 1;
c_738828.num_elements = 6;
c_738828.elements = (object *)e_738889;
c_738828.elements[0] = ((closureN)self_734905)->elements[0];
c_738828.elements[1] = ((closureN)self_734905)->elements[1];
c_738828.elements[2] = ((closureN)self_734905)->elements[2];
c_738828.elements[3] = test_73907_732641;
c_738828.elements[4] = ((closureN)self_734905)->elements[3];
c_738828.elements[5] = ((closureN)self_734905)->elements[4];


closureN_type c_738890;
object e_738928 [3];
c_738890.hdr.mark = gc_color_red;
 c_738890.hdr.grayed = 0;
c_738890.tag = closureN_tag;
 c_738890.fn = (function_type)__lambda_326;
c_738890.num_args = 1;
c_738890.num_elements = 3;
c_738890.elements = (object *)e_738928;
c_738890.elements[0] = test_73907_732641;
c_738890.elements[1] = ((closureN)self_734905)->elements[3];
c_738890.elements[2] = ((closureN)self_734905)->elements[4];

return_direct_with_clo1(data,(closure)&c_738828,__lambda_318,  &c_738890);; 
}

static void __lambda_326(void *data, object self_734906, int argc, object *args) /* object self_734906, object k_733853, object i_73908_732642 */
 {
 object k_733853 = args[0]; object i_73908_732642 = args[1];
    
  
if( (boolean_f != Cyc_num_fast_eq_op(data, i_73908_732642, Cyc_vector_length(data, ((closureN)self_734906)->elements[1]))) ){ 
  



return_direct_with_clo1(data,  k_733853, (((closure)  k_733853)->fn),  Cyc_num_fast_eq_op(data, i_73908_732642, Cyc_vector_length(data, ((closureN)self_734906)->elements[1])));
} else { 
    
  
if( (boolean_f != Cyc_num_fast_lt_op(data, i_73908_732642, Cyc_vector_length(data, ((closureN)self_734906)->elements[2]))) ){ 
  
closureN_type c_738908;
object e_738923 [4];
c_738908.hdr.mark = gc_color_red;
 c_738908.hdr.grayed = 0;
c_738908.tag = closureN_tag;
 c_738908.fn = (function_type)__lambda_327;
c_738908.num_args = 1;
c_738908.num_elements = 4;
c_738908.elements = (object *)e_738923;
c_738908.elements[0] = i_73908_732642;
c_738908.elements[1] = k_733853;
c_738908.elements[2] = ((closureN)self_734906)->elements[0];
c_738908.elements[3] = ((closureN)self_734906)->elements[2];



return_direct_with_clo1(data,(closure)&c_738908,__lambda_327,  Cyc_vector_ref(data, ((closureN)self_734906)->elements[1], i_73908_732642));
} else { 
  return_direct_with_clo1(data,  k_733853, (((closure)  k_733853)->fn),  boolean_f);}
;}
;; 
}

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



return_direct_with_clo1(data,(closure)&c_738910,__lambda_328,  Cyc_vector_ref(data, ((closureN)self_734907)->elements[3], ((closureN)self_734907)->elements[0]));; 
}

static void __lambda_328(void *data, object self_734908, int argc, object *args) /* object self_734908, object r_733857 */
 {
 object r_733857 = args[0];
  

return_closcall4(data,  car(((closureN)self_734908)->elements[3]),  ((closureN)self_734908)->elements[1], ((closureN)self_734908)->elements[2], r_733857, ((closureN)self_734908)->elements[0]);; 
}

static void __lambda_318(void *data, object self_734909, int argc, object *args) /* object self_734909, object r_733852 */
 {
 object r_733852 = args[0];
  
closureN_type c_738830;
object e_738885 [6];
c_738830.hdr.mark = gc_color_red;
 c_738830.hdr.grayed = 0;
c_738830.tag = closureN_tag;
 c_738830.fn = (function_type)__lambda_319;
c_738830.num_args = 1;
c_738830.num_elements = 6;
c_738830.elements = (object *)e_738885;
c_738830.elements[0] = ((closureN)self_734909)->elements[0];
c_738830.elements[1] = ((closureN)self_734909)->elements[1];
c_738830.elements[2] = ((closureN)self_734909)->elements[2];
c_738830.elements[3] = ((closureN)self_734909)->elements[3];
c_738830.elements[4] = ((closureN)self_734909)->elements[4];
c_738830.elements[5] = ((closureN)self_734909)->elements[5];



return_direct_with_clo1(data,(closure)&c_738830,__lambda_319,  Cyc_set_cell(data, ((closureN)self_734909)->elements[2], r_733852));; 
}

static void __lambda_319(void *data, object self_734910, int argc, object *args) /* object self_734910, object r_733843 */
 {

  
closureN_type c_738832;
object e_738854 [5];
c_738832.hdr.mark = gc_color_red;
 c_738832.hdr.grayed = 0;
c_738832.tag = closureN_tag;
 c_738832.fn = (function_type)__lambda_320;
c_738832.num_args = 1;
c_738832.num_elements = 5;
c_738832.elements = (object *)e_738854;
c_738832.elements[0] = ((closureN)self_734910)->elements[1];
c_738832.elements[1] = ((closureN)self_734910)->elements[2];
c_738832.elements[2] = ((closureN)self_734910)->elements[3];
c_738832.elements[3] = ((closureN)self_734910)->elements[4];
c_738832.elements[4] = ((closureN)self_734910)->elements[5];


closureN_type c_738855;
object e_738884 [2];
c_738855.hdr.mark = gc_color_red;
 c_738855.hdr.grayed = 0;
c_738855.tag = closureN_tag;
 c_738855.fn = (function_type)__lambda_322;
c_738855.num_args = 3;
c_738855.num_elements = 2;
c_738855.elements = (object *)e_738884;
c_738855.elements[0] = ((closureN)self_734910)->elements[0];
c_738855.elements[1] = ((closureN)self_734910)->elements[2];

return_direct_with_clo1(data,(closure)&c_738832,__lambda_320,  &c_738855);; 
}

static void __lambda_322(void *data, object self_734911, int argc, object *args) /* object self_734911, object k_733847, object elt_91a_73914_732644, object elt_91b_73915_732645, object i_73916_732646 */
 {
 object k_733847 = args[0]; object elt_91a_73914_732644 = args[1]; object elt_91b_73915_732645 = args[2]; object i_73916_732646 = args[3];
  
closureN_type c_738857;
object e_738881 [6];
c_738857.hdr.mark = gc_color_red;
 c_738857.hdr.grayed = 0;
c_738857.tag = closureN_tag;
 c_738857.fn = (function_type)__lambda_323;
c_738857.num_args = 1;
c_738857.num_elements = 6;
c_738857.elements = (object *)e_738881;
c_738857.elements[0] = elt_91a_73914_732644;
c_738857.elements[1] = elt_91b_73915_732645;
c_738857.elements[2] = ((closureN)self_734911)->elements[0];
c_738857.elements[3] = i_73916_732646;
c_738857.elements[4] = k_733847;
c_738857.elements[5] = ((closureN)self_734911)->elements[1];



return_direct_with_clo1(data,(closure)&c_738857,__lambda_323,  Cyc_eq(elt_91a_73914_732644, elt_91b_73915_732645));; 
}

static void __lambda_323(void *data, object self_734912, int argc, object *args) /* object self_734912, object tmp_73919_73921_732647 */
 {
 object tmp_73919_73921_732647 = args[0];
  
closureN_type c_738859;
object e_738867 [4];
c_738859.hdr.mark = gc_color_red;
 c_738859.hdr.grayed = 0;
c_738859.tag = closureN_tag;
 c_738859.fn = (function_type)__lambda_324;
c_738859.num_args = 0;
c_738859.num_elements = 4;
c_738859.elements = (object *)e_738867;
c_738859.elements[0] = ((closureN)self_734912)->elements[0];
c_738859.elements[1] = ((closureN)self_734912)->elements[1];
c_738859.elements[2] = ((closureN)self_734912)->elements[2];
c_738859.elements[3] = tmp_73919_73921_732647;


closureN_type c_738868;
object e_738880 [3];
c_738868.hdr.mark = gc_color_red;
 c_738868.hdr.grayed = 0;
c_738868.tag = closureN_tag;
 c_738868.fn = (function_type)__lambda_325;
c_738868.num_args = 1;
c_738868.num_elements = 3;
c_738868.elements = (object *)e_738880;
c_738868.elements[0] = ((closureN)self_734912)->elements[3];
c_738868.elements[1] = ((closureN)self_734912)->elements[4];
c_738868.elements[2] = ((closureN)self_734912)->elements[5];

return_direct_with_clo1(data,(closure)&c_738859,__lambda_324,  &c_738868);; 
}

static void __lambda_325(void *data, object self_734913, int argc, object *args) /* object self_734913, object r_733848 */
 {
 object r_733848 = args[0];
  if( (boolean_f != r_733848) ){ 
  


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

static void __lambda_324(void *data, object self_734914, int argc, object *args) /* object self_734914, object k_733851 */
 {
 object k_733851 = args[0];
  if( (boolean_f != ((closureN)self_734914)->elements[3]) ){ 
  return_direct_with_clo1(data,  k_733851, (((closure)  k_733851)->fn),  ((closureN)self_734914)->elements[3]);
} else { 
  return_closcall3(data,  ((closureN)self_734914)->elements[2],  k_733851, ((closureN)self_734914)->elements[0], ((closureN)self_734914)->elements[1]);}
;; 
}

static void __lambda_320(void *data, object self_734915, int argc, object *args) /* object self_734915, object r_733846 */
 {
 object r_733846 = args[0];
  
closureN_type c_738834;
object e_738850 [4];
c_738834.hdr.mark = gc_color_red;
 c_738834.hdr.grayed = 0;
c_738834.tag = closureN_tag;
 c_738834.fn = (function_type)__lambda_321;
c_738834.num_args = 1;
c_738834.num_elements = 4;
c_738834.elements = (object *)e_738850;
c_738834.elements[0] = ((closureN)self_734915)->elements[0];
c_738834.elements[1] = ((closureN)self_734915)->elements[1];
c_738834.elements[2] = ((closureN)self_734915)->elements[3];
c_738834.elements[3] = ((closureN)self_734915)->elements[4];



return_direct_with_clo1(data,(closure)&c_738834,__lambda_321,  Cyc_set_cell(data, ((closureN)self_734915)->elements[2], r_733846));; 
}

static void __lambda_321(void *data, object self_734916, int argc, object *args) /* object self_734916, object r_733844 */
 {

    
  
  
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_vector_length(data, ((closureN)self_734916)->elements[2]), Cyc_vector_length(data, ((closureN)self_734916)->elements[3]))) ){ 
  

return_closcall2(data,  car(((closureN)self_734916)->elements[1]),  ((closureN)self_734916)->elements[0], obj_int2obj(0));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734916)->elements[0], (((closure)  ((closureN)self_734916)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_303(void *data, object _, int argc, object *args) /* closure _,object k_733821, object elt_123_127_73876_732625, object vectors_73877_732626_raw, ... */
 {
object k_733821 = args[0]; object elt_123_127_73876_732625 = args[1];
load_varargs(vectors_73877_732626, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/133.sld:vector=");

closureN_type c_738727;
object e_738814 [2];
c_738727.hdr.mark = gc_color_red;
 c_738727.hdr.grayed = 0;
c_738727.tag = closureN_tag;
 c_738727.fn = (function_type)__lambda_304;
c_738727.num_args = 1;
c_738727.num_elements = 2;
c_738727.elements = (object *)e_738814;
c_738727.elements[0] = k_733821;
c_738727.elements[1] = vectors_73877_732626;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_738727, primitive_procedure_127, elt_123_127_73876_732625, __glo_vector_123_srfi_133);; 
}

static void __lambda_304(void *data, object self_734890, int argc, object *args) /* object self_734890, object elt_123_127_73878_732627 */
 {
 object elt_123_127_73878_732627 = args[0];
    
if( (boolean_f != Cyc_is_null(((closureN)self_734890)->elements[1])) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734890)->elements[0], (((closure)  ((closureN)self_734890)->elements[0])->fn),  boolean_t);
} else { 
  
closureN_type c_738734;
object e_738810 [3];
c_738734.hdr.mark = gc_color_red;
 c_738734.hdr.grayed = 0;
c_738734.tag = closureN_tag;
 c_738734.fn = (function_type)__lambda_305;
c_738734.num_args = 1;
c_738734.num_elements = 3;
c_738734.elements = (object *)e_738810;
c_738734.elements[0] = elt_123_127_73878_732627;
c_738734.elements[1] = ((closureN)self_734890)->elements[0];
c_738734.elements[2] = ((closureN)self_734890)->elements[1];



return_direct_with_clo1(data,(closure)&c_738734,__lambda_305,  Cyc_cdr(data, ((closureN)self_734890)->elements[1]));}
;; 
}

static void __lambda_305(void *data, object self_734891, int argc, object *args) /* object self_734891, object r_733836 */
 {
 object r_733836 = args[0];
    
if( (boolean_f != Cyc_is_null(r_733836)) ){ 
  
closureN_type c_738738;
object e_738741 [1];
c_738738.hdr.mark = gc_color_red;
 c_738738.hdr.grayed = 0;
c_738738.tag = closureN_tag;
 c_738738.fn = (function_type)__lambda_306;
c_738738.num_args = 1;
c_738738.num_elements = 1;
c_738738.elements = (object *)e_738741;
c_738738.elements[0] = ((closureN)self_734891)->elements[1];



return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_738738, primitive_vector_127, Cyc_car(data, ((closureN)self_734891)->elements[2]), __glo_vector_123_srfi_133);
} else { 
  
closureN_type c_738746;
object e_738808 [2];
c_738746.hdr.mark = gc_color_red;
 c_738746.hdr.grayed = 0;
c_738746.tag = closureN_tag;
 c_738746.fn = (function_type)__lambda_307;
c_738746.num_args = 1;
c_738746.num_elements = 2;
c_738746.elements = (object *)e_738808;
c_738746.elements[0] = ((closureN)self_734891)->elements[0];
c_738746.elements[1] = ((closureN)self_734891)->elements[1];

return_direct_with_clo1(data,(closure)&c_738746,__lambda_307,  ((closureN)self_734891)->elements[2]);}
;; 
}

static void __lambda_307(void *data, object self_734893, int argc, object *args) /* object self_734893, object vecs_73887_732628 */
 {
 object vecs_73887_732628 = args[0];
  
closureN_type c_738748;
object e_738807 [3];
c_738748.hdr.mark = gc_color_red;
 c_738748.hdr.grayed = 0;
c_738748.tag = closureN_tag;
 c_738748.fn = (function_type)__lambda_308;
c_738748.num_args = 1;
c_738748.num_elements = 3;
c_738748.elements = (object *)e_738807;
c_738748.elements[0] = ((closureN)self_734893)->elements[0];
c_738748.elements[1] = ((closureN)self_734893)->elements[1];
c_738748.elements[2] = vecs_73887_732628;

return_direct_with_clo1(data,(closure)&c_738748,__lambda_308,  boolean_f);; 
}

static void __lambda_308(void *data, object self_734894, int argc, object *args) /* object self_734894, object loop_73888_732629 */
 {
 object loop_73888_732629 = args[0];
  
closureN_type c_738750;
object e_738803 [3];
c_738750.hdr.mark = gc_color_red;
 c_738750.hdr.grayed = 0;
c_738750.tag = closureN_tag;
 c_738750.fn = (function_type)__lambda_738;
c_738750.num_args = 1;
c_738750.num_elements = 3;
c_738750.elements = (object *)e_738803;
c_738750.elements[0] = ((closureN)self_734894)->elements[0];
c_738750.elements[1] = ((closureN)self_734894)->elements[1];
c_738750.elements[2] = ((closureN)self_734894)->elements[2];


pair_type local_738806; 
return_direct_with_clo1(data,(closure)&c_738750,__lambda_738,  set_cell_as_expr(&local_738806, loop_73888_732629));; 
}

static void __lambda_738(void *data, object self_734895, int argc, object *args) /* object self_734895, object loop_73888_732629 */
 {
 object loop_73888_732629 = args[0];
  
closureN_type c_738752;
object e_738765 [3];
c_738752.hdr.mark = gc_color_red;
 c_738752.hdr.grayed = 0;
c_738752.tag = closureN_tag;
 c_738752.fn = (function_type)__lambda_309;
c_738752.num_args = 1;
c_738752.num_elements = 3;
c_738752.elements = (object *)e_738765;
c_738752.elements[0] = ((closureN)self_734895)->elements[1];
c_738752.elements[1] = loop_73888_732629;
c_738752.elements[2] = ((closureN)self_734895)->elements[2];


closureN_type c_738766;
object e_738802 [2];
c_738766.hdr.mark = gc_color_red;
 c_738766.hdr.grayed = 0;
c_738766.tag = closureN_tag;
 c_738766.fn = (function_type)__lambda_311;
c_738766.num_args = 1;
c_738766.num_elements = 2;
c_738766.elements = (object *)e_738802;
c_738766.elements[0] = ((closureN)self_734895)->elements[0];
c_738766.elements[1] = loop_73888_732629;

return_direct_with_clo1(data,(closure)&c_738752,__lambda_309,  &c_738766);; 
}

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



return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_738768, primitive_vector_127, Cyc_car(data, vecs_73889_732630), __glo_vector_123_srfi_133);; 
}

static void __lambda_312(void *data, object self_734897, int argc, object *args) /* object self_734897, object r_733830 */
 {
 object r_733830 = args[0];
  
closureN_type c_738770;
object e_738795 [3];
c_738770.hdr.mark = gc_color_red;
 c_738770.hdr.grayed = 0;
c_738770.tag = closureN_tag;
 c_738770.fn = (function_type)__lambda_313;
c_738770.num_args = 2;
c_738770.num_elements = 3;
c_738770.elements = (object *)e_738795;
c_738770.elements[0] = ((closureN)self_734897)->elements[0];
c_738770.elements[1] = ((closureN)self_734897)->elements[1];
c_738770.elements[2] = ((closureN)self_734897)->elements[2];



return_direct_with_clo2(data,(closure)&c_738770,__lambda_313,  r_733830, Cyc_cdr(data, ((closureN)self_734897)->elements[3]));; 
}

static void __lambda_313(void *data, object self_734898, int argc, object *args) /* object self_734898, object vec1_73890_732631, object vec2_87_73891_732632 */
 {
 object vec1_73890_732631 = args[0]; object vec2_87_73891_732632 = args[1];
    
if( (boolean_f != Cyc_is_null(vec2_87_73891_732632)) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_734898)->elements[1], (((closure)  ((closureN)self_734898)->elements[1])->fn),  Cyc_is_null(vec2_87_73891_732632));
} else { 
  
closureN_type c_738778;
object e_738792 [5];
c_738778.hdr.mark = gc_color_red;
 c_738778.hdr.grayed = 0;
c_738778.tag = closureN_tag;
 c_738778.fn = (function_type)__lambda_314;
c_738778.num_args = 1;
c_738778.num_elements = 5;
c_738778.elements = (object *)e_738792;
c_738778.elements[0] = ((closureN)self_734898)->elements[0];
c_738778.elements[1] = ((closureN)self_734898)->elements[1];
c_738778.elements[2] = ((closureN)self_734898)->elements[2];
c_738778.elements[3] = vec1_73890_732631;
c_738778.elements[4] = vec2_87_73891_732632;



return_direct_with_clo1(data,(closure)&c_738778,__lambda_314,  Cyc_car(data, vec2_87_73891_732632));}
;; 
}

static void __lambda_314(void *data, object self_734899, int argc, object *args) /* object self_734899, object r_733834 */
 {
 object r_733834 = args[0];
  
closureN_type c_738780;
object e_738789 [3];
c_738780.hdr.mark = gc_color_red;
 c_738780.hdr.grayed = 0;
c_738780.tag = closureN_tag;
 c_738780.fn = (function_type)__lambda_315;
c_738780.num_args = 1;
c_738780.num_elements = 3;
c_738780.elements = (object *)e_738789;
c_738780.elements[0] = ((closureN)self_734899)->elements[1];
c_738780.elements[1] = ((closureN)self_734899)->elements[2];
c_738780.elements[2] = ((closureN)self_734899)->elements[4];

return_direct_with_clo4(data,  __glo_binary_91vector_123_srfi_133, (((closure)  __glo_binary_91vector_123_srfi_133)->fn),  &c_738780, ((closureN)self_734899)->elements[0], ((closureN)self_734899)->elements[3], r_733834);; 
}

static void __lambda_315(void *data, object self_734900, int argc, object *args) /* object self_734900, object r_733833 */
 {
 object r_733833 = args[0];
  if( (boolean_f != r_733833) ){ 
  

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

static void __lambda_309(void *data, object self_734901, int argc, object *args) /* object self_734901, object r_733828 */
 {
 object r_733828 = args[0];
  
closureN_type c_738754;
object e_738761 [3];
c_738754.hdr.mark = gc_color_red;
 c_738754.hdr.grayed = 0;
c_738754.tag = closureN_tag;
 c_738754.fn = (function_type)__lambda_310;
c_738754.num_args = 1;
c_738754.num_elements = 3;
c_738754.elements = (object *)e_738761;
c_738754.elements[0] = ((closureN)self_734901)->elements[0];
c_738754.elements[1] = ((closureN)self_734901)->elements[1];
c_738754.elements[2] = ((closureN)self_734901)->elements[2];



return_direct_with_clo1(data,(closure)&c_738754,__lambda_310,  Cyc_set_cell(data, ((closureN)self_734901)->elements[1], r_733828));; 
}

static void __lambda_310(void *data, object self_734902, int argc, object *args) /* object self_734902, object r_733827 */
 {

  

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

static void __lambda_306(void *data, object self_734892, int argc, object *args) /* object self_734892, object r_733825 */
 {

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

static void __lambda_301(void *data, object _, int argc, object *args) /* closure _,object k_733816, object vec_73874_732623 */
 {
object k_733816 = args[0]; object vec_73874_732623 = args[1];
  Cyc_st_add(data, "srfi/133.sld:vector-empty?");

closureN_type c_738716;
object e_738724 [1];
c_738716.hdr.mark = gc_color_red;
 c_738716.hdr.grayed = 0;
c_738716.tag = closureN_tag;
 c_738716.fn = (function_type)__lambda_302;
c_738716.num_args = 1;
c_738716.num_elements = 1;
c_738716.elements = (object *)e_738724;
c_738716.elements[0] = k_733816;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_738716, primitive_vector_127, vec_73874_732623, __glo_vector_91empty_127_srfi_133);; 
}

static void __lambda_302(void *data, object self_734889, int argc, object *args) /* object self_734889, object vec_73875_732624 */
 {
 object vec_73875_732624 = args[0];
  
complex_num_type local_738721; 


return_direct_with_clo1(data,  ((closureN)self_734889)->elements[0], (((closure)  ((closureN)self_734889)->elements[0])->fn),  ((inline_function_type)
                   ((closure)__glo_zero_127_191_191inline_191_191_scheme_base)->fn)(data,&local_738721, Cyc_vector_length(data, vec_73875_732624)));; 
}

static void __lambda_263(void *data, object _, int argc, object *args) /* closure _,object k_733757, object args_73830_732571_raw, ... */
 {
object k_733757 = args[0];
load_varargs(args_73830_732571, args, 1, argc - 1);
  Cyc_st_add(data, "srfi/133.sld:vector-append-subvectors");

closureN_type c_738411;
object e_738713 [2];
c_738411.hdr.mark = gc_color_red;
 c_738411.hdr.grayed = 0;
c_738411.tag = closureN_tag;
 c_738411.fn = (function_type)__lambda_264;
c_738411.num_args = 3;
c_738411.num_elements = 2;
c_738411.elements = (object *)e_738713;
c_738411.elements[0] = args_73830_732571;
c_738411.elements[1] = k_733757;

return_direct_with_clo3(data,(closure)&c_738411,__lambda_264,  boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_264(void *data, object self_734845, int argc, object *args) /* object self_734845, object copy_91each_67_732575, object gather_91args_732576, object total_91length_732578 */
 {
 object copy_91each_67_732575 = args[0]; object gather_91args_732576 = args[1]; object total_91length_732578 = args[2];
  
closureN_type c_738413;
object e_738709 [4];
c_738413.hdr.mark = gc_color_red;
 c_738413.hdr.grayed = 0;
c_738413.tag = closureN_tag;
 c_738413.fn = (function_type)__lambda_737;
c_738413.num_args = 1;
c_738413.num_elements = 4;
c_738413.elements = (object *)e_738709;
c_738413.elements[0] = ((closureN)self_734845)->elements[0];
c_738413.elements[1] = gather_91args_732576;
c_738413.elements[2] = ((closureN)self_734845)->elements[1];
c_738413.elements[3] = total_91length_732578;


pair_type local_738712; 
return_direct_with_clo1(data,(closure)&c_738413,__lambda_737,  set_cell_as_expr(&local_738712, copy_91each_67_732575));; 
}

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


pair_type local_738707; 
return_direct_with_clo1(data,(closure)&c_738415,__lambda_736,  set_cell_as_expr(&local_738707, ((closureN)self_734846)->elements[1]));; 
}

static void __lambda_736(void *data, object self_734847, int argc, object *args) /* object self_734847, object gather_91args_732576 */
 {
 object gather_91args_732576 = args[0];
  
closureN_type c_738417;
object e_738699 [4];
c_738417.hdr.mark = gc_color_red;
 c_738417.hdr.grayed = 0;
c_738417.tag = closureN_tag;
 c_738417.fn = (function_type)__lambda_735;
c_738417.num_args = 1;
c_738417.num_elements = 4;
c_738417.elements = (object *)e_738699;
c_738417.elements[0] = ((closureN)self_734847)->elements[0];
c_738417.elements[1] = ((closureN)self_734847)->elements[1];
c_738417.elements[2] = gather_91args_732576;
c_738417.elements[3] = ((closureN)self_734847)->elements[2];


pair_type local_738702; 
return_direct_with_clo1(data,(closure)&c_738417,__lambda_735,  set_cell_as_expr(&local_738702, ((closureN)self_734847)->elements[3]));; 
}

static void __lambda_735(void *data, object self_734848, int argc, object *args) /* object self_734848, object total_91length_732578 */
 {
 object total_91length_732578 = args[0];
  
closureN_type c_738419;
object e_738627 [5];
c_738419.hdr.mark = gc_color_red;
 c_738419.hdr.grayed = 0;
c_738419.tag = closureN_tag;
 c_738419.fn = (function_type)__lambda_265;
c_738419.num_args = 1;
c_738419.num_elements = 5;
c_738419.elements = (object *)e_738627;
c_738419.elements[0] = ((closureN)self_734848)->elements[0];
c_738419.elements[1] = ((closureN)self_734848)->elements[1];
c_738419.elements[2] = ((closureN)self_734848)->elements[2];
c_738419.elements[3] = ((closureN)self_734848)->elements[3];
c_738419.elements[4] = total_91length_732578;


mclosure0(c_738628, (function_type)__lambda_292);c_738628.num_args = 1;
return_direct_with_clo1(data,(closure)&c_738419,__lambda_265,  &c_738628);; 
}

static void __lambda_292(void *data, object self_734849, int argc, object *args) /* object self_734849, object k_733796, object args_73831_732582 */
 {
 object k_733796 = args[0]; object args_73831_732582 = args[1];
  
closureN_type c_738630;
object e_738698 [1];
c_738630.hdr.mark = gc_color_red;
 c_738630.hdr.grayed = 0;
c_738630.tag = closureN_tag;
 c_738630.fn = (function_type)__lambda_293;
c_738630.num_args = 4;
c_738630.num_elements = 1;
c_738630.elements = (object *)e_738698;
c_738630.elements[0] = k_733796;

return_direct_with_clo4(data,(closure)&c_738630,__lambda_293,  args_73831_732582, NULL, NULL, NULL);; 
}

static void __lambda_293(void *data, object self_734850, int argc, object *args) /* object self_734850, object args_73833_732583, object vecs_73834_732584, object starts_73835_732585, object ends_73836_732586 */
 {
 object args_73833_732583 = args[0]; object vecs_73834_732584 = args[1]; object starts_73835_732585 = args[2]; object ends_73836_732586 = args[3];
  
closureN_type c_738632;
object e_738697 [5];
c_738632.hdr.mark = gc_color_red;
 c_738632.hdr.grayed = 0;
c_738632.tag = closureN_tag;
 c_738632.fn = (function_type)__lambda_294;
c_738632.num_args = 1;
c_738632.num_elements = 5;
c_738632.elements = (object *)e_738697;
c_738632.elements[0] = args_73833_732583;
c_738632.elements[1] = ends_73836_732586;
c_738632.elements[2] = ((closureN)self_734850)->elements[0];
c_738632.elements[3] = starts_73835_732585;
c_738632.elements[4] = vecs_73834_732584;

return_direct_with_clo1(data,(closure)&c_738632,__lambda_294,  boolean_f);; 
}

static void __lambda_294(void *data, object self_734851, int argc, object *args) /* object self_734851, object loop_73837_732587 */
 {
 object loop_73837_732587 = args[0];
  
closureN_type c_738634;
object e_738693 [5];
c_738634.hdr.mark = gc_color_red;
 c_738634.hdr.grayed = 0;
c_738634.tag = closureN_tag;
 c_738634.fn = (function_type)__lambda_734;
c_738634.num_args = 1;
c_738634.num_elements = 5;
c_738634.elements = (object *)e_738693;
c_738634.elements[0] = ((closureN)self_734851)->elements[0];
c_738634.elements[1] = ((closureN)self_734851)->elements[1];
c_738634.elements[2] = ((closureN)self_734851)->elements[2];
c_738634.elements[3] = ((closureN)self_734851)->elements[3];
c_738634.elements[4] = ((closureN)self_734851)->elements[4];


pair_type local_738696; 
return_direct_with_clo1(data,(closure)&c_738634,__lambda_734,  set_cell_as_expr(&local_738696, loop_73837_732587));; 
}

static void __lambda_734(void *data, object self_734852, int argc, object *args) /* object self_734852, object loop_73837_732587 */
 {
 object loop_73837_732587 = args[0];
  
closureN_type c_738636;
object e_738652 [6];
c_738636.hdr.mark = gc_color_red;
 c_738636.hdr.grayed = 0;
c_738636.tag = closureN_tag;
 c_738636.fn = (function_type)__lambda_295;
c_738636.num_args = 1;
c_738636.num_elements = 6;
c_738636.elements = (object *)e_738652;
c_738636.elements[0] = ((closureN)self_734852)->elements[0];
c_738636.elements[1] = ((closureN)self_734852)->elements[1];
c_738636.elements[2] = ((closureN)self_734852)->elements[2];
c_738636.elements[3] = loop_73837_732587;
c_738636.elements[4] = ((closureN)self_734852)->elements[3];
c_738636.elements[5] = ((closureN)self_734852)->elements[4];


closureN_type c_738653;
object e_738692 [1];
c_738653.hdr.mark = gc_color_red;
 c_738653.hdr.grayed = 0;
c_738653.tag = closureN_tag;
 c_738653.fn = (function_type)__lambda_297;
c_738653.num_args = 4;
c_738653.num_elements = 1;
c_738653.elements = (object *)e_738692;
c_738653.elements[0] = loop_73837_732587;

return_direct_with_clo1(data,(closure)&c_738636,__lambda_295,  &c_738653);; 
}

static void __lambda_297(void *data, object self_734853, int argc, object *args) /* object self_734853, object k_733802, object args_73838_732588, object vecs_73839_732589, object starts_73840_732590, object ends_73841_732591 */
 {
 object k_733802 = args[0]; object args_73838_732588 = args[1]; object vecs_73839_732589 = args[2]; object starts_73840_732590 = args[3]; object ends_73841_732591 = args[4];
    
if( (boolean_f != Cyc_is_null(args_73838_732588)) ){ 
  
closureN_type c_738657;
object e_738670 [3];
c_738657.hdr.mark = gc_color_red;
 c_738657.hdr.grayed = 0;
c_738657.tag = closureN_tag;
 c_738657.fn = (function_type)__lambda_298;
c_738657.num_args = 1;
c_738657.num_elements = 3;
c_738657.elements = (object *)e_738670;
c_738657.elements[0] = ends_73841_732591;
c_738657.elements[1] = k_733802;
c_738657.elements[2] = starts_73840_732590;

return_direct_with_clo2(data,  __glo_reverse_scheme_base, (((closure)  __glo_reverse_scheme_base)->fn),  &c_738657, vecs_73839_732589);
} else { 
  




pair_type local_738679; 



pair_type local_738684; 



pair_type local_738689; 


return_closcall5(data,  car(((closureN)self_734853)->elements[0]),  k_733802, Cyc_cdddr(data, args_73838_732588), set_pair_as_expr(&local_738679, Cyc_car(data, args_73838_732588), vecs_73839_732589), set_pair_as_expr(&local_738684, Cyc_cadr(data, args_73838_732588), starts_73840_732590), set_pair_as_expr(&local_738689, Cyc_caddr(data, args_73838_732588), ends_73841_732591));}
;; 
}

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

return_direct_with_clo2(data,  __glo_reverse_scheme_base, (((closure)  __glo_reverse_scheme_base)->fn),  &c_738659, ((closureN)self_734854)->elements[2]);; 
}

static void __lambda_299(void *data, object self_734855, int argc, object *args) /* object self_734855, object r_733805 */
 {
 object r_733805 = args[0];
  
closureN_type c_738661;
object e_738666 [3];
c_738661.hdr.mark = gc_color_red;
 c_738661.hdr.grayed = 0;
c_738661.tag = closureN_tag;
 c_738661.fn = (function_type)__lambda_300;
c_738661.num_args = 1;
c_738661.num_elements = 3;
c_738661.elements = (object *)e_738666;
c_738661.elements[0] = ((closureN)self_734855)->elements[1];
c_738661.elements[1] = ((closureN)self_734855)->elements[2];
c_738661.elements[2] = r_733805;

return_direct_with_clo2(data,  __glo_reverse_scheme_base, (((closure)  __glo_reverse_scheme_base)->fn),  &c_738661, ((closureN)self_734855)->elements[0]);; 
}

static void __lambda_300(void *data, object self_734856, int argc, object *args) /* object self_734856, object r_733806 */
 {
 object r_733806 = args[0];
  return_direct_with_clo4(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734856)->elements[0], ((closureN)self_734856)->elements[1], ((closureN)self_734856)->elements[2], r_733806);; 
}

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



return_direct_with_clo1(data,(closure)&c_738638,__lambda_296,  Cyc_set_cell(data, ((closureN)self_734857)->elements[3], r_733801));; 
}

static void __lambda_296(void *data, object self_734858, int argc, object *args) /* object self_734858, object r_733800 */
 {

  

return_closcall5(data,  car(((closureN)self_734858)->elements[3]),  ((closureN)self_734858)->elements[2], ((closureN)self_734858)->elements[0], ((closureN)self_734858)->elements[5], ((closureN)self_734858)->elements[4], ((closureN)self_734858)->elements[1]);; 
}

static void __lambda_265(void *data, object self_734859, int argc, object *args) /* object self_734859, object r_733795 */
 {
 object r_733795 = args[0];
  
closureN_type c_738421;
object e_738623 [5];
c_738421.hdr.mark = gc_color_red;
 c_738421.hdr.grayed = 0;
c_738421.tag = closureN_tag;
 c_738421.fn = (function_type)__lambda_266;
c_738421.num_args = 1;
c_738421.num_elements = 5;
c_738421.elements = (object *)e_738623;
c_738421.elements[0] = ((closureN)self_734859)->elements[0];
c_738421.elements[1] = ((closureN)self_734859)->elements[1];
c_738421.elements[2] = ((closureN)self_734859)->elements[2];
c_738421.elements[3] = ((closureN)self_734859)->elements[3];
c_738421.elements[4] = ((closureN)self_734859)->elements[4];



return_direct_with_clo1(data,(closure)&c_738421,__lambda_266,  Cyc_set_cell(data, ((closureN)self_734859)->elements[2], r_733795));; 
}

static void __lambda_266(void *data, object self_734860, int argc, object *args) /* object self_734860, object r_733758 */
 {

  
closureN_type c_738423;
object e_738570 [5];
c_738423.hdr.mark = gc_color_red;
 c_738423.hdr.grayed = 0;
c_738423.tag = closureN_tag;
 c_738423.fn = (function_type)__lambda_267;
c_738423.num_args = 1;
c_738423.num_elements = 5;
c_738423.elements = (object *)e_738570;
c_738423.elements[0] = ((closureN)self_734860)->elements[0];
c_738423.elements[1] = ((closureN)self_734860)->elements[1];
c_738423.elements[2] = ((closureN)self_734860)->elements[2];
c_738423.elements[3] = ((closureN)self_734860)->elements[3];
c_738423.elements[4] = ((closureN)self_734860)->elements[4];


mclosure0(c_738571, (function_type)__lambda_286);c_738571.num_args = 2;
return_direct_with_clo1(data,(closure)&c_738423,__lambda_267,  &c_738571);; 
}

static void __lambda_286(void *data, object self_734861, int argc, object *args) /* object self_734861, object k_733784, object starts_73842_732592, object ends_73843_732593 */
 {
 object k_733784 = args[0]; object starts_73842_732592 = args[1]; object ends_73843_732593 = args[2];
  
closureN_type c_738573;
object e_738622 [1];
c_738573.hdr.mark = gc_color_red;
 c_738573.hdr.grayed = 0;
c_738573.tag = closureN_tag;
 c_738573.fn = (function_type)__lambda_287;
c_738573.num_args = 2;
c_738573.num_elements = 1;
c_738573.elements = (object *)e_738622;
c_738573.elements[0] = k_733784;

return_direct_with_clo2(data,(closure)&c_738573,__lambda_287,  starts_73842_732592, ends_73843_732593);; 
}

static void __lambda_287(void *data, object self_734862, int argc, object *args) /* object self_734862, object starts_73846_732595, object ends_73847_732596 */
 {
 object starts_73846_732595 = args[0]; object ends_73847_732596 = args[1];
  
closureN_type c_738575;
object e_738621 [3];
c_738575.hdr.mark = gc_color_red;
 c_738575.hdr.grayed = 0;
c_738575.tag = closureN_tag;
 c_738575.fn = (function_type)__lambda_288;
c_738575.num_args = 1;
c_738575.num_elements = 3;
c_738575.elements = (object *)e_738621;
c_738575.elements[0] = ends_73847_732596;
c_738575.elements[1] = ((closureN)self_734862)->elements[0];
c_738575.elements[2] = starts_73846_732595;

return_direct_with_clo1(data,(closure)&c_738575,__lambda_288,  boolean_f);; 
}

static void __lambda_288(void *data, object self_734863, int argc, object *args) /* object self_734863, object loop_73848_732597 */
 {
 object loop_73848_732597 = args[0];
  
closureN_type c_738577;
object e_738617 [3];
c_738577.hdr.mark = gc_color_red;
 c_738577.hdr.grayed = 0;
c_738577.tag = closureN_tag;
 c_738577.fn = (function_type)__lambda_733;
c_738577.num_args = 1;
c_738577.num_elements = 3;
c_738577.elements = (object *)e_738617;
c_738577.elements[0] = ((closureN)self_734863)->elements[0];
c_738577.elements[1] = ((closureN)self_734863)->elements[1];
c_738577.elements[2] = ((closureN)self_734863)->elements[2];


pair_type local_738620; 
return_direct_with_clo1(data,(closure)&c_738577,__lambda_733,  set_cell_as_expr(&local_738620, loop_73848_732597));; 
}

static void __lambda_733(void *data, object self_734864, int argc, object *args) /* object self_734864, object loop_73848_732597 */
 {
 object loop_73848_732597 = args[0];
  
closureN_type c_738579;
object e_738593 [4];
c_738579.hdr.mark = gc_color_red;
 c_738579.hdr.grayed = 0;
c_738579.tag = closureN_tag;
 c_738579.fn = (function_type)__lambda_289;
c_738579.num_args = 1;
c_738579.num_elements = 4;
c_738579.elements = (object *)e_738593;
c_738579.elements[0] = ((closureN)self_734864)->elements[0];
c_738579.elements[1] = ((closureN)self_734864)->elements[1];
c_738579.elements[2] = loop_73848_732597;
c_738579.elements[3] = ((closureN)self_734864)->elements[2];


closureN_type c_738594;
object e_738616 [1];
c_738594.hdr.mark = gc_color_red;
 c_738594.hdr.grayed = 0;
c_738594.tag = closureN_tag;
 c_738594.fn = (function_type)__lambda_291;
c_738594.num_args = 3;
c_738594.num_elements = 1;
c_738594.elements = (object *)e_738616;
c_738594.elements[0] = loop_73848_732597;

return_direct_with_clo1(data,(closure)&c_738579,__lambda_289,  &c_738594);; 
}

static void __lambda_291(void *data, object self_734865, int argc, object *args) /* object self_734865, object k_733787, object count_73849_732598, object starts_73850_732599, object ends_73851_732600 */
 {
 object k_733787 = args[0]; object count_73849_732598 = args[1]; object starts_73850_732599 = args[2]; object ends_73851_732600 = args[3];
    
if( (boolean_f != Cyc_is_null(starts_73850_732599)) ){ 
  return_direct_with_clo1(data,  k_733787, (((closure)  k_733787)->fn),  count_73849_732598);
} else { 
  


complex_num_type local_738604; 

complex_num_type local_738607; 








return_closcall4(data,  car(((closureN)self_734865)->elements[0]),  k_733787, Cyc_fast_sum(data,&local_738604, count_73849_732598, Cyc_fast_sub(data,&local_738607, Cyc_car(data, ends_73851_732600), Cyc_car(data, starts_73850_732599))), Cyc_cdr(data, starts_73850_732599), Cyc_cdr(data, ends_73851_732600));}
;; 
}

static void __lambda_289(void *data, object self_734866, int argc, object *args) /* object self_734866, object r_733786 */
 {
 object r_733786 = args[0];
  
closureN_type c_738581;
object e_738589 [4];
c_738581.hdr.mark = gc_color_red;
 c_738581.hdr.grayed = 0;
c_738581.tag = closureN_tag;
 c_738581.fn = (function_type)__lambda_290;
c_738581.num_args = 1;
c_738581.num_elements = 4;
c_738581.elements = (object *)e_738589;
c_738581.elements[0] = ((closureN)self_734866)->elements[0];
c_738581.elements[1] = ((closureN)self_734866)->elements[1];
c_738581.elements[2] = ((closureN)self_734866)->elements[2];
c_738581.elements[3] = ((closureN)self_734866)->elements[3];



return_direct_with_clo1(data,(closure)&c_738581,__lambda_290,  Cyc_set_cell(data, ((closureN)self_734866)->elements[2], r_733786));; 
}

static void __lambda_290(void *data, object self_734867, int argc, object *args) /* object self_734867, object r_733785 */
 {

  

return_closcall4(data,  car(((closureN)self_734867)->elements[2]),  ((closureN)self_734867)->elements[1], obj_int2obj(0), ((closureN)self_734867)->elements[3], ((closureN)self_734867)->elements[0]);; 
}

static void __lambda_267(void *data, object self_734868, int argc, object *args) /* object self_734868, object r_733783 */
 {
 object r_733783 = args[0];
  
closureN_type c_738425;
object e_738566 [5];
c_738425.hdr.mark = gc_color_red;
 c_738425.hdr.grayed = 0;
c_738425.tag = closureN_tag;
 c_738425.fn = (function_type)__lambda_268;
c_738425.num_args = 1;
c_738425.num_elements = 5;
c_738425.elements = (object *)e_738566;
c_738425.elements[0] = ((closureN)self_734868)->elements[0];
c_738425.elements[1] = ((closureN)self_734868)->elements[1];
c_738425.elements[2] = ((closureN)self_734868)->elements[2];
c_738425.elements[3] = ((closureN)self_734868)->elements[3];
c_738425.elements[4] = ((closureN)self_734868)->elements[4];



return_direct_with_clo1(data,(closure)&c_738425,__lambda_268,  Cyc_set_cell(data, ((closureN)self_734868)->elements[4], r_733783));; 
}

static void __lambda_268(void *data, object self_734869, int argc, object *args) /* object self_734869, object r_733759 */
 {

  
closureN_type c_738427;
object e_738492 [5];
c_738427.hdr.mark = gc_color_red;
 c_738427.hdr.grayed = 0;
c_738427.tag = closureN_tag;
 c_738427.fn = (function_type)__lambda_269;
c_738427.num_args = 1;
c_738427.num_elements = 5;
c_738427.elements = (object *)e_738492;
c_738427.elements[0] = ((closureN)self_734869)->elements[0];
c_738427.elements[1] = ((closureN)self_734869)->elements[1];
c_738427.elements[2] = ((closureN)self_734869)->elements[2];
c_738427.elements[3] = ((closureN)self_734869)->elements[3];
c_738427.elements[4] = ((closureN)self_734869)->elements[4];


mclosure0(c_738493, (function_type)__lambda_279);c_738493.num_args = 4;
return_direct_with_clo1(data,(closure)&c_738427,__lambda_269,  &c_738493);; 
}

static void __lambda_279(void *data, object self_734870, int argc, object *args) /* object self_734870, object k_733769, object result_73854_732603, object vecs_73855_732604, object starts_73856_732605, object ends_73857_732606 */
 {
 object k_733769 = args[0]; object result_73854_732603 = args[1]; object vecs_73855_732604 = args[2]; object starts_73856_732605 = args[3]; object ends_73857_732606 = args[4];
  
closureN_type c_738495;
object e_738565 [2];
c_738495.hdr.mark = gc_color_red;
 c_738495.hdr.grayed = 0;
c_738495.tag = closureN_tag;
 c_738495.fn = (function_type)__lambda_280;
c_738495.num_args = 3;
c_738495.num_elements = 2;
c_738495.elements = (object *)e_738565;
c_738495.elements[0] = k_733769;
c_738495.elements[1] = result_73854_732603;

return_direct_with_clo3(data,(closure)&c_738495,__lambda_280,  vecs_73855_732604, starts_73856_732605, ends_73857_732606);; 
}

static void __lambda_280(void *data, object self_734871, int argc, object *args) /* object self_734871, object vecs_73860_732608, object starts_73861_732609, object ends_73862_732610 */
 {
 object vecs_73860_732608 = args[0]; object starts_73861_732609 = args[1]; object ends_73862_732610 = args[2];
  
closureN_type c_738497;
object e_738564 [5];
c_738497.hdr.mark = gc_color_red;
 c_738497.hdr.grayed = 0;
c_738497.tag = closureN_tag;
 c_738497.fn = (function_type)__lambda_281;
c_738497.num_args = 1;
c_738497.num_elements = 5;
c_738497.elements = (object *)e_738564;
c_738497.elements[0] = ends_73862_732610;
c_738497.elements[1] = ((closureN)self_734871)->elements[0];
c_738497.elements[2] = ((closureN)self_734871)->elements[1];
c_738497.elements[3] = starts_73861_732609;
c_738497.elements[4] = vecs_73860_732608;

return_direct_with_clo1(data,(closure)&c_738497,__lambda_281,  boolean_f);; 
}

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


pair_type local_738563; 
return_direct_with_clo1(data,(closure)&c_738499,__lambda_732,  set_cell_as_expr(&local_738563, loop_73863_732611));; 
}

static void __lambda_732(void *data, object self_734873, int argc, object *args) /* object self_734873, object loop_73863_732611 */
 {
 object loop_73863_732611 = args[0];
  
closureN_type c_738501;
object e_738516 [5];
c_738501.hdr.mark = gc_color_red;
 c_738501.hdr.grayed = 0;
c_738501.tag = closureN_tag;
 c_738501.fn = (function_type)__lambda_282;
c_738501.num_args = 1;
c_738501.num_elements = 5;
c_738501.elements = (object *)e_738516;
c_738501.elements[0] = ((closureN)self_734873)->elements[0];
c_738501.elements[1] = ((closureN)self_734873)->elements[1];
c_738501.elements[2] = loop_73863_732611;
c_738501.elements[3] = ((closureN)self_734873)->elements[3];
c_738501.elements[4] = ((closureN)self_734873)->elements[4];


closureN_type c_738517;
object e_738559 [2];
c_738517.hdr.mark = gc_color_red;
 c_738517.hdr.grayed = 0;
c_738517.tag = closureN_tag;
 c_738517.fn = (function_type)__lambda_284;
c_738517.num_args = 4;
c_738517.num_elements = 2;
c_738517.elements = (object *)e_738559;
c_738517.elements[0] = loop_73863_732611;
c_738517.elements[1] = ((closureN)self_734873)->elements[2];

return_direct_with_clo1(data,(closure)&c_738501,__lambda_282,  &c_738517);; 
}

static void __lambda_284(void *data, object self_734874, int argc, object *args) /* object self_734874, object k_733772, object at_73864_732612, object vecs_73865_732613, object starts_73866_732614, object ends_73867_732615 */
 {
 object k_733772 = args[0]; object at_73864_732612 = args[1]; object vecs_73865_732613 = args[2]; object starts_73866_732614 = args[3]; object ends_73867_732615 = args[4];
    
if( (boolean_f != Cyc_is_null(vecs_73865_732613)) ){ 
  return_direct_with_clo1(data,  k_733772, (((closure)  k_733772)->fn),  ((closureN)self_734874)->elements[1]);
} else { 
  
closureN_type c_738523;
object e_738551 [6];
c_738523.hdr.mark = gc_color_red;
 c_738523.hdr.grayed = 0;
c_738523.tag = closureN_tag;
 c_738523.fn = (function_type)__lambda_285;
c_738523.num_args = 1;
c_738523.num_elements = 6;
c_738523.elements = (object *)e_738551;
c_738523.elements[0] = at_73864_732612;
c_738523.elements[1] = ends_73867_732615;
c_738523.elements[2] = k_733772;
c_738523.elements[3] = ((closureN)self_734874)->elements[0];
c_738523.elements[4] = starts_73866_732614;
c_738523.elements[5] = vecs_73865_732613;







return_direct_with_clo6(data,  __glo__75vector_91copy_67_srfi_133, (((closure)  __glo__75vector_91copy_67_srfi_133)->fn),  &c_738523, ((closureN)self_734874)->elements[1], at_73864_732612, Cyc_car(data, vecs_73865_732613), Cyc_car(data, starts_73866_732614), Cyc_car(data, ends_73867_732615));}
;; 
}

static void __lambda_285(void *data, object self_734875, int argc, object *args) /* object self_734875, object r_733777 */
 {

  


complex_num_type local_738531; 

complex_num_type local_738535; 










return_closcall5(data,  car(((closureN)self_734875)->elements[3]),  ((closureN)self_734875)->elements[2], Cyc_fast_sum(data,&local_738531, ((closureN)self_734875)->elements[0], Cyc_fast_sub(data,&local_738535, Cyc_car(data, ((closureN)self_734875)->elements[1]), Cyc_car(data, ((closureN)self_734875)->elements[4]))), Cyc_cdr(data, ((closureN)self_734875)->elements[5]), Cyc_cdr(data, ((closureN)self_734875)->elements[4]), Cyc_cdr(data, ((closureN)self_734875)->elements[1]));; 
}

static void __lambda_282(void *data, object self_734876, int argc, object *args) /* object self_734876, object r_733771 */
 {
 object r_733771 = args[0];
  
closureN_type c_738503;
object e_738512 [5];
c_738503.hdr.mark = gc_color_red;
 c_738503.hdr.grayed = 0;
c_738503.tag = closureN_tag;
 c_738503.fn = (function_type)__lambda_283;
c_738503.num_args = 1;
c_738503.num_elements = 5;
c_738503.elements = (object *)e_738512;
c_738503.elements[0] = ((closureN)self_734876)->elements[0];
c_738503.elements[1] = ((closureN)self_734876)->elements[1];
c_738503.elements[2] = ((closureN)self_734876)->elements[2];
c_738503.elements[3] = ((closureN)self_734876)->elements[3];
c_738503.elements[4] = ((closureN)self_734876)->elements[4];



return_direct_with_clo1(data,(closure)&c_738503,__lambda_283,  Cyc_set_cell(data, ((closureN)self_734876)->elements[2], r_733771));; 
}

static void __lambda_283(void *data, object self_734877, int argc, object *args) /* object self_734877, object r_733770 */
 {

  

return_closcall5(data,  car(((closureN)self_734877)->elements[2]),  ((closureN)self_734877)->elements[1], obj_int2obj(0), ((closureN)self_734877)->elements[4], ((closureN)self_734877)->elements[3], ((closureN)self_734877)->elements[0]);; 
}

static void __lambda_269(void *data, object self_734878, int argc, object *args) /* object self_734878, object r_733768 */
 {
 object r_733768 = args[0];
  
closureN_type c_738429;
object e_738488 [5];
c_738429.hdr.mark = gc_color_red;
 c_738429.hdr.grayed = 0;
c_738429.tag = closureN_tag;
 c_738429.fn = (function_type)__lambda_270;
c_738429.num_args = 1;
c_738429.num_elements = 5;
c_738429.elements = (object *)e_738488;
c_738429.elements[0] = ((closureN)self_734878)->elements[0];
c_738429.elements[1] = ((closureN)self_734878)->elements[1];
c_738429.elements[2] = ((closureN)self_734878)->elements[2];
c_738429.elements[3] = ((closureN)self_734878)->elements[3];
c_738429.elements[4] = ((closureN)self_734878)->elements[4];



return_direct_with_clo1(data,(closure)&c_738429,__lambda_270,  Cyc_set_cell(data, ((closureN)self_734878)->elements[1], r_733768));; 
}

static void __lambda_270(void *data, object self_734879, int argc, object *args) /* object self_734879, object r_733760 */
 {

  
closureN_type c_738431;
object e_738480 [3];
c_738431.hdr.mark = gc_color_red;
 c_738431.hdr.grayed = 0;
c_738431.tag = closureN_tag;
 c_738431.fn = (function_type)__lambda_271;
c_738431.num_args = 1;
c_738431.num_elements = 3;
c_738431.elements = (object *)e_738480;
c_738431.elements[0] = ((closureN)self_734879)->elements[1];
c_738431.elements[1] = ((closureN)self_734879)->elements[3];
c_738431.elements[2] = ((closureN)self_734879)->elements[4];


closureN_type c_738481;
object e_738487 [2];
c_738481.hdr.mark = gc_color_red;
 c_738481.hdr.grayed = 0;
c_738481.tag = closureN_tag;
 c_738481.fn = (function_type)__lambda_278;
c_738481.num_args = 0;
c_738481.num_elements = 2;
c_738481.elements = (object *)e_738487;
c_738481.elements[0] = ((closureN)self_734879)->elements[0];
c_738481.elements[1] = ((closureN)self_734879)->elements[2];

return_direct_with_clo1(data,(closure)&c_738431,__lambda_271,  &c_738481);; 
}

static void __lambda_278(void *data, object self_734880, int argc, object *args) /* object self_734880, object k_733767 */
 {
 object k_733767 = args[0];
  

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

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


closureN_type c_738438;
object e_738479 [2];
c_738438.hdr.mark = gc_color_red;
 c_738438.hdr.grayed = 0;
c_738438.tag = closureN_tag;
 c_738438.fn = (function_type)__lambda_273;
c_738438.num_args = 3;
c_738438.num_elements = 2;
c_738438.elements = (object *)e_738479;
c_738438.elements[0] = ((closureN)self_734881)->elements[0];
c_738438.elements[1] = ((closureN)self_734881)->elements[2];

return_direct_with_clo1(data,(closure)&c_738433,__lambda_272,  &c_738438);; 
}

static void __lambda_273(void *data, object self_734882, int argc, object *args) /* object self_734882, object k_733763, object vecs_73871_732619, object starts_73872_732620, object ends_73873_732621 */
 {
 object k_733763 = args[0]; object vecs_73871_732619 = args[1]; object starts_73872_732620 = args[2]; object ends_73873_732621 = args[3];
  
closureN_type c_738440;
object e_738478 [6];
c_738440.hdr.mark = gc_color_red;
 c_738440.hdr.grayed = 0;
c_738440.tag = closureN_tag;
 c_738440.fn = (function_type)__lambda_274;
c_738440.num_args = 1;
c_738440.num_elements = 6;
c_738440.elements = (object *)e_738478;
c_738440.elements[0] = ((closureN)self_734882)->elements[0];
c_738440.elements[1] = ends_73873_732621;
c_738440.elements[2] = k_733763;
c_738440.elements[3] = starts_73872_732620;
c_738440.elements[4] = ((closureN)self_734882)->elements[1];
c_738440.elements[5] = vecs_73871_732619;

return_direct_with_clo1(data,(closure)&c_738440,__lambda_274,  boolean_f);; 
}

static void __lambda_274(void *data, object self_734883, int argc, object *args) /* object self_734883, object result_732622 */
 {
 object result_732622 = args[0];
  
closureN_type c_738442;
object e_738474 [6];
c_738442.hdr.mark = gc_color_red;
 c_738442.hdr.grayed = 0;
c_738442.tag = closureN_tag;
 c_738442.fn = (function_type)__lambda_731;
c_738442.num_args = 1;
c_738442.num_elements = 6;
c_738442.elements = (object *)e_738474;
c_738442.elements[0] = ((closureN)self_734883)->elements[0];
c_738442.elements[1] = ((closureN)self_734883)->elements[1];
c_738442.elements[2] = ((closureN)self_734883)->elements[2];
c_738442.elements[3] = ((closureN)self_734883)->elements[3];
c_738442.elements[4] = ((closureN)self_734883)->elements[4];
c_738442.elements[5] = ((closureN)self_734883)->elements[5];


pair_type local_738477; 
return_direct_with_clo1(data,(closure)&c_738442,__lambda_731,  set_cell_as_expr(&local_738477, result_732622));; 
}

static void __lambda_731(void *data, object self_734884, int argc, object *args) /* object self_734884, object result_732622 */
 {
 object result_732622 = args[0];
  


closureN_type c_738447;
object e_738471 [6];
c_738447.hdr.mark = gc_color_red;
 c_738447.hdr.grayed = 0;
c_738447.tag = closureN_tag;
 c_738447.fn = (function_type)__lambda_275;
c_738447.num_args = 1;
c_738447.num_elements = 6;
c_738447.elements = (object *)e_738471;
c_738447.elements[0] = ((closureN)self_734884)->elements[0];
c_738447.elements[1] = ((closureN)self_734884)->elements[1];
c_738447.elements[2] = ((closureN)self_734884)->elements[2];
c_738447.elements[3] = result_732622;
c_738447.elements[4] = ((closureN)self_734884)->elements[3];
c_738447.elements[5] = ((closureN)self_734884)->elements[5];

return_closcall3(data,  car(((closureN)self_734884)->elements[4]),  &c_738447, ((closureN)self_734884)->elements[3], ((closureN)self_734884)->elements[1]);; 
}

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


object c_738470 = Cyc_make_vector(data,(closure)&c_738449,1,r_733766);
return_closcall1(data,(closure)&c_738449,  c_738470);; 
}

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



return_direct_with_clo1(data,(closure)&c_738451,__lambda_277,  Cyc_set_cell(data, ((closureN)self_734886)->elements[3], r_733765));; 
}

static void __lambda_277(void *data, object self_734887, int argc, object *args) /* object self_734887, object r_733764 */
 {

  



return_closcall5(data,  car(((closureN)self_734887)->elements[0]),  ((closureN)self_734887)->elements[2], car(((closureN)self_734887)->elements[3]), ((closureN)self_734887)->elements[5], ((closureN)self_734887)->elements[4], ((closureN)self_734887)->elements[1]);; 
}

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

static void __lambda_262(void *data, object _, int argc, object *args) /* closure _,object k_733752, object vector_91list_73793_732570 */
 {
object k_733752 = args[0]; object vector_91list_73793_732570 = args[1];
  Cyc_st_add(data, "srfi/133.sld:vector-concatenate");
return_direct_with_clo3(data,  __glo_vector_91concatenate_117aux_srfi_133, (((closure)  __glo_vector_91concatenate_117aux_srfi_133)->fn),  k_733752, vector_91list_73793_732570, __glo_vector_91concatenate_srfi_133);; 
}

static void __lambda_254(void *data, object _, int argc, object *args) /* closure _,object k_733739, object vec_73756_732564, object maybe_91start_87end_73757_732565_raw, ... */
 {
object k_733739 = args[0]; object vec_73756_732564 = args[1];
load_varargs(maybe_91start_87end_73757_732565, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/133.sld:vector-reverse-copy");

closureN_type c_738371;
object e_738406 [2];
c_738371.hdr.mark = gc_color_red;
 c_738371.hdr.grayed = 0;
c_738371.tag = closureN_tag;
 c_738371.fn = (function_type)__lambda_255;
c_738371.num_args = 1;
c_738371.num_elements = 2;
c_738371.elements = (object *)e_738406;
c_738371.elements[0] = k_733739;
c_738371.elements[1] = maybe_91start_87end_73757_732565;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_738371, primitive_vector_127, vec_73756_732564, __glo_vector_91reverse_91copy_srfi_133);; 
}

static void __lambda_255(void *data, object self_734838, int argc, object *args) /* object self_734838, object vec_73788_732566 */
 {
 object vec_73788_732566 = args[0];
  
closureN_type c_738373;
object e_738400 [2];
c_738373.hdr.mark = gc_color_red;
 c_738373.hdr.grayed = 0;
c_738373.tag = closureN_tag;
 c_738373.fn = (function_type)__lambda_256;
c_738373.num_args = 1;
c_738373.num_elements = 2;
c_738373.elements = (object *)e_738400;
c_738373.elements[0] = ((closureN)self_734838)->elements[0];
c_738373.elements[1] = vec_73788_732566;


closureN_type c_738401;
object e_738405 [2];
c_738401.hdr.mark = gc_color_red;
 c_738401.hdr.grayed = 0;
c_738401.tag = closureN_tag;
 c_738401.fn = (function_type)__lambda_261;
c_738401.num_args = 0;
c_738401.num_elements = 2;
c_738401.elements = (object *)e_738405;
c_738401.elements[0] = ((closureN)self_734838)->elements[1];
c_738401.elements[1] = vec_73788_732566;

return_direct_with_clo1(data,(closure)&c_738373,__lambda_256,  &c_738401);; 
}

static void __lambda_261(void *data, object self_734839, int argc, object *args) /* object self_734839, object k_733747 */
 {
 object k_733747 = args[0];
  return_direct_with_clo6(data,  __glo_vector_91parse_91start_87end_srfi_133, (((closure)  __glo_vector_91parse_91start_87end_srfi_133)->fn),  k_733747, ((closureN)self_734839)->elements[1], ((closureN)self_734839)->elements[0], quote_start, quote_end, __glo_vector_91reverse_91copy_srfi_133);; 
}

static void __lambda_256(void *data, object self_734840, int argc, object *args) /* object self_734840, object r_733741 */
 {
 object r_733741 = args[0];
  
closureN_type c_738375;
object e_738379 [2];
c_738375.hdr.mark = gc_color_red;
 c_738375.hdr.grayed = 0;
c_738375.tag = closureN_tag;
 c_738375.fn = (function_type)__lambda_257;
c_738375.num_args = 1;
c_738375.num_elements = 2;
c_738375.elements = (object *)e_738379;
c_738375.elements[0] = ((closureN)self_734840)->elements[0];
c_738375.elements[1] = r_733741;


closureN_type c_738380;
object e_738399 [1];
c_738380.hdr.mark = gc_color_red;
 c_738380.hdr.grayed = 0;
c_738380.tag = closureN_tag;
 c_738380.fn = (function_type)__lambda_258;
c_738380.num_args = 2;
c_738380.num_elements = 1;
c_738380.elements = (object *)e_738399;
c_738380.elements[0] = ((closureN)self_734840)->elements[1];

return_direct_with_clo1(data,(closure)&c_738375,__lambda_257,  &c_738380);; 
}

static void __lambda_258(void *data, object self_734841, int argc, object *args) /* object self_734841, object k_733743, object start_73789_732567, object end_73790_732568 */
 {
 object k_733743 = args[0]; object start_73789_732567 = args[1]; object end_73790_732568 = args[2];
  
closureN_type c_738382;
object e_738392 [4];
c_738382.hdr.mark = gc_color_red;
 c_738382.hdr.grayed = 0;
c_738382.tag = closureN_tag;
 c_738382.fn = (function_type)__lambda_259;
c_738382.num_args = 1;
c_738382.num_elements = 4;
c_738382.elements = (object *)e_738392;
c_738382.elements[0] = end_73790_732568;
c_738382.elements[1] = k_733743;
c_738382.elements[2] = start_73789_732567;
c_738382.elements[3] = ((closureN)self_734841)->elements[0];


complex_num_type local_738398; 

object c_738395 = Cyc_make_vector(data,(closure)&c_738382,1,Cyc_fast_sub(data,&local_738398, end_73790_732568, start_73789_732567));
return_closcall1(data,(closure)&c_738382,  c_738395);; 
}

static void __lambda_259(void *data, object self_734842, int argc, object *args) /* object self_734842, object new_73791_732569 */
 {
 object new_73791_732569 = args[0];
  
closureN_type c_738384;
object e_738388 [2];
c_738384.hdr.mark = gc_color_red;
 c_738384.hdr.grayed = 0;
c_738384.tag = closureN_tag;
 c_738384.fn = (function_type)__lambda_260;
c_738384.num_args = 1;
c_738384.num_elements = 2;
c_738384.elements = (object *)e_738388;
c_738384.elements[0] = ((closureN)self_734842)->elements[1];
c_738384.elements[1] = new_73791_732569;

return_direct_with_clo6(data,  __glo__75vector_91reverse_91copy_67_srfi_133, (((closure)  __glo__75vector_91reverse_91copy_67_srfi_133)->fn),  &c_738384, new_73791_732569, obj_int2obj(0), ((closureN)self_734842)->elements[3], ((closureN)self_734842)->elements[2], ((closureN)self_734842)->elements[0]);; 
}

static void __lambda_260(void *data, object self_734843, int argc, object *args) /* object self_734843, object r_733745 */
 {

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

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

static void __lambda_243(void *data, object _, int argc, object *args) /* closure _,object k_733686, object vec_73717_732552, object args_73718_732553 */
 {
object k_733686 = args[0]; object vec_73717_732552 = args[1]; object args_73718_732553 = args[2];
  Cyc_st_add(data, "srfi/133.sld:vector-copy:parse-args");

closureN_type c_738191;
object e_738368 [3];
c_738191.hdr.mark = gc_color_red;
 c_738191.hdr.grayed = 0;
c_738191.tag = closureN_tag;
 c_738191.fn = (function_type)__lambda_244;
c_738191.num_args = 1;
c_738191.num_elements = 3;
c_738191.elements = (object *)e_738368;
c_738191.elements[0] = args_73718_732553;
c_738191.elements[1] = k_733686;
c_738191.elements[2] = vec_73717_732552;

return_direct_with_clo1(data,(closure)&c_738191,__lambda_244,  boolean_f);; 
}

static void __lambda_244(void *data, object self_734827, int argc, object *args) /* object self_734827, object parse_91args_732555 */
 {
 object parse_91args_732555 = args[0];
  
closureN_type c_738193;
object e_738364 [3];
c_738193.hdr.mark = gc_color_red;
 c_738193.hdr.grayed = 0;
c_738193.tag = closureN_tag;
 c_738193.fn = (function_type)__lambda_730;
c_738193.num_args = 1;
c_738193.num_elements = 3;
c_738193.elements = (object *)e_738364;
c_738193.elements[0] = ((closureN)self_734827)->elements[0];
c_738193.elements[1] = ((closureN)self_734827)->elements[1];
c_738193.elements[2] = ((closureN)self_734827)->elements[2];


pair_type local_738367; 
return_direct_with_clo1(data,(closure)&c_738193,__lambda_730,  set_cell_as_expr(&local_738367, parse_91args_732555));; 
}

static void __lambda_730(void *data, object self_734828, int argc, object *args) /* object self_734828, object parse_91args_732555 */
 {
 object parse_91args_732555 = args[0];
  
closureN_type c_738195;
object e_738282 [4];
c_738195.hdr.mark = gc_color_red;
 c_738195.hdr.grayed = 0;
c_738195.tag = closureN_tag;
 c_738195.fn = (function_type)__lambda_245;
c_738195.num_args = 1;
c_738195.num_elements = 4;
c_738195.elements = (object *)e_738282;
c_738195.elements[0] = ((closureN)self_734828)->elements[0];
c_738195.elements[1] = ((closureN)self_734828)->elements[1];
c_738195.elements[2] = parse_91args_732555;
c_738195.elements[3] = ((closureN)self_734828)->elements[2];


closureN_type c_738283;
object e_738363 [1];
c_738283.hdr.mark = gc_color_red;
 c_738283.hdr.grayed = 0;
c_738283.tag = closureN_tag;
 c_738283.fn = (function_type)__lambda_247;
c_738283.num_args = 4;
c_738283.num_elements = 1;
c_738283.elements = (object *)e_738363;
c_738283.elements[0] = ((closureN)self_734828)->elements[2];

return_direct_with_clo1(data,(closure)&c_738195,__lambda_245,  &c_738283);; 
}

static void __lambda_247(void *data, object self_734829, int argc, object *args) /* object self_734829, object k_733707, object start_73719_732557, object end_73720_732558, object n_73721_732559, object fill_73722_732560 */
 {
 object k_733707 = args[0]; object start_73719_732557 = args[1]; object end_73720_732558 = args[2]; object n_73721_732559 = args[3]; object fill_73722_732560 = args[4];
  
closureN_type c_738285;
object e_738362 [5];
c_738285.hdr.mark = gc_color_red;
 c_738285.hdr.grayed = 0;
c_738285.tag = closureN_tag;
 c_738285.fn = (function_type)__lambda_248;
c_738285.num_args = 1;
c_738285.num_elements = 5;
c_738285.elements = (object *)e_738362;
c_738285.elements[0] = end_73720_732558;
c_738285.elements[1] = fill_73722_732560;
c_738285.elements[2] = k_733707;
c_738285.elements[3] = n_73721_732559;
c_738285.elements[4] = ((closureN)self_734829)->elements[0];

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_738285, __glo_nonneg_91int_127_srfi_133, start_73719_732557, __glo_vector_91copy_srfi_133);; 
}

static void __lambda_248(void *data, object self_734830, int argc, object *args) /* object self_734830, object r_733708 */
 {
 object r_733708 = args[0];
  
closureN_type c_738287;
object e_738360 [5];
c_738287.hdr.mark = gc_color_red;
 c_738287.hdr.grayed = 0;
c_738287.tag = closureN_tag;
 c_738287.fn = (function_type)__lambda_249;
c_738287.num_args = 1;
c_738287.num_elements = 5;
c_738287.elements = (object *)e_738360;
c_738287.elements[0] = ((closureN)self_734830)->elements[1];
c_738287.elements[1] = ((closureN)self_734830)->elements[2];
c_738287.elements[2] = ((closureN)self_734830)->elements[3];
c_738287.elements[3] = r_733708;
c_738287.elements[4] = ((closureN)self_734830)->elements[4];

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_738287, __glo_nonneg_91int_127_srfi_133, ((closureN)self_734830)->elements[0], __glo_vector_91copy_srfi_133);; 
}

static void __lambda_249(void *data, object self_734831, int argc, object *args) /* object self_734831, object r_733709 */
 {
 object r_733709 = args[0];
  
closureN_type c_738289;
object e_738358 [4];
c_738289.hdr.mark = gc_color_red;
 c_738289.hdr.grayed = 0;
c_738289.tag = closureN_tag;
 c_738289.fn = (function_type)__lambda_250;
c_738289.num_args = 2;
c_738289.num_elements = 4;
c_738289.elements = (object *)e_738358;
c_738289.elements[0] = ((closureN)self_734831)->elements[0];
c_738289.elements[1] = ((closureN)self_734831)->elements[1];
c_738289.elements[2] = ((closureN)self_734831)->elements[2];
c_738289.elements[3] = ((closureN)self_734831)->elements[4];

return_direct_with_clo2(data,(closure)&c_738289,__lambda_250,  ((closureN)self_734831)->elements[3], r_733709);; 
}

static void __lambda_250(void *data, object self_734832, int argc, object *args) /* object self_734832, object start_73723_732561, object end_73724_732562 */
 {
 object start_73723_732561 = args[0]; object end_73724_732562 = args[1];
  
closureN_type c_738291;
object e_738308 [3];
c_738291.hdr.mark = gc_color_red;
 c_738291.hdr.grayed = 0;
c_738291.tag = closureN_tag;
 c_738291.fn = (function_type)__lambda_251;
c_738291.num_args = 0;
c_738291.num_elements = 3;
c_738291.elements = (object *)e_738308;
c_738291.elements[0] = end_73724_732562;
c_738291.elements[1] = ((closureN)self_734832)->elements[2];
c_738291.elements[2] = start_73723_732561;


closureN_type c_738309;
object e_738357 [5];
c_738309.hdr.mark = gc_color_red;
 c_738309.hdr.grayed = 0;
c_738309.tag = closureN_tag;
 c_738309.fn = (function_type)__lambda_253;
c_738309.num_args = 1;
c_738309.num_elements = 5;
c_738309.elements = (object *)e_738357;
c_738309.elements[0] = end_73724_732562;
c_738309.elements[1] = ((closureN)self_734832)->elements[0];
c_738309.elements[2] = ((closureN)self_734832)->elements[1];
c_738309.elements[3] = start_73723_732561;
c_738309.elements[4] = ((closureN)self_734832)->elements[3];

return_direct_with_clo1(data,(closure)&c_738291,__lambda_251,  &c_738309);; 
}

static void __lambda_253(void *data, object self_734833, int argc, object *args) /* object self_734833, object r_733710 */
 {
 object r_733710 = args[0];
  if( (boolean_f != r_733710) ){ 
  return_direct_with_clo4(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734833)->elements[2], ((closureN)self_734833)->elements[3], ((closureN)self_734833)->elements[0], ((closureN)self_734833)->elements[1]);
} else { 
  
make_utf8_string_with_len(c_738317, "illegal arguments", 17, 17);

pair_type local_738320; 

pair_type local_738323; 

pair_type local_738326; 

pair_type local_738329; 

pair_type local_738332; 

pair_type local_738335; 

pair_type local_738339; 

pair_type local_738342; 

pair_type local_738345; 

pair_type local_738349; 

pair_type local_738352; 

pair_type local_738355; 
return_direct_with_clo6(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_734833)->elements[2], &c_738317, set_pair_as_expr(&local_738320, quote__while, set_pair_as_expr(&local_738323, quote_calling, set_pair_as_expr(&local_738326, __glo_vector_91copy_srfi_133, NULL))), set_pair_as_expr(&local_738329, quote_start, set_pair_as_expr(&local_738332, quote_was, set_pair_as_expr(&local_738335, ((closureN)self_734833)->elements[3], NULL))), set_pair_as_expr(&local_738339, quote_end, set_pair_as_expr(&local_738342, quote_was, set_pair_as_expr(&local_738345, ((closureN)self_734833)->elements[0], NULL))), set_pair_as_expr(&local_738349, quote_vector, set_pair_as_expr(&local_738352, quote_was, set_pair_as_expr(&local_738355, ((closureN)self_734833)->elements[4], NULL))));}
;; 
}

static void __lambda_251(void *data, object self_734834, int argc, object *args) /* object self_734834, object k_733735 */
 {
 object k_733735 = args[0];
  
closureN_type c_738293;
object e_738302 [3];
c_738293.hdr.mark = gc_color_red;
 c_738293.hdr.grayed = 0;
c_738293.tag = closureN_tag;
 c_738293.fn = (function_type)__lambda_252;
c_738293.num_args = 1;
c_738293.num_elements = 3;
c_738293.elements = (object *)e_738302;
c_738293.elements[0] = k_733735;
c_738293.elements[1] = ((closureN)self_734834)->elements[1];
c_738293.elements[2] = ((closureN)self_734834)->elements[2];


object c_738305 = Cyc_num_lte(data,(closure)&c_738293,3,obj_int2obj(0), ((closureN)self_734834)->elements[2], ((closureN)self_734834)->elements[0]);
return_closcall1(data,(closure)&c_738293,  c_738305);; 
}

static void __lambda_252(void *data, object self_734835, int argc, object *args) /* object self_734835, object r_733736 */
 {
 object r_733736 = args[0];
  if( (boolean_f != r_733736) ){ 
  

return_direct_with_clo1(data,  ((closureN)self_734835)->elements[0], (((closure)  ((closureN)self_734835)->elements[0])->fn),  Cyc_num_fast_lte_op(data, ((closureN)self_734835)->elements[2], ((closureN)self_734835)->elements[1]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734835)->elements[0], (((closure)  ((closureN)self_734835)->elements[0])->fn),  boolean_f);}
;; 
}

static void __lambda_245(void *data, object self_734836, int argc, object *args) /* object self_734836, object r_733706 */
 {
 object r_733706 = args[0];
  
closureN_type c_738197;
object e_738278 [4];
c_738197.hdr.mark = gc_color_red;
 c_738197.hdr.grayed = 0;
c_738197.tag = closureN_tag;
 c_738197.fn = (function_type)__lambda_246;
c_738197.num_args = 1;
c_738197.num_elements = 4;
c_738197.elements = (object *)e_738278;
c_738197.elements[0] = ((closureN)self_734836)->elements[0];
c_738197.elements[1] = ((closureN)self_734836)->elements[1];
c_738197.elements[2] = ((closureN)self_734836)->elements[2];
c_738197.elements[3] = ((closureN)self_734836)->elements[3];



return_direct_with_clo1(data,(closure)&c_738197,__lambda_246,  Cyc_set_cell(data, ((closureN)self_734836)->elements[2], r_733706));; 
}

static void __lambda_246(void *data, object self_734837, int argc, object *args) /* object self_734837, object r_733687 */
 {

    
if( (boolean_f != Cyc_is_null(((closureN)self_734837)->elements[0])) ){ 
  





return_closcall5(data,  car(((closureN)self_734837)->elements[2]),  ((closureN)self_734837)->elements[1], obj_int2obj(0), Cyc_vector_length(data, ((closureN)self_734837)->elements[3]), Cyc_vector_length(data, ((closureN)self_734837)->elements[3]), Cyc_VOID);
} else { 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_734837)->elements[0]))) ){ 
  







return_closcall5(data,  car(((closureN)self_734837)->elements[2]),  ((closureN)self_734837)->elements[1], Cyc_car(data, ((closureN)self_734837)->elements[0]), Cyc_vector_length(data, ((closureN)self_734837)->elements[3]), Cyc_vector_length(data, ((closureN)self_734837)->elements[3]), Cyc_VOID);
} else { 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cddr(data, ((closureN)self_734837)->elements[0]))) ){ 
  







return_closcall5(data,  car(((closureN)self_734837)->elements[2]),  ((closureN)self_734837)->elements[1], Cyc_car(data, ((closureN)self_734837)->elements[0]), Cyc_cadr(data, ((closureN)self_734837)->elements[0]), Cyc_vector_length(data, ((closureN)self_734837)->elements[3]), Cyc_VOID);
} else { 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdddr(data, ((closureN)self_734837)->elements[0]))) ){ 
  









return_closcall5(data,  car(((closureN)self_734837)->elements[2]),  ((closureN)self_734837)->elements[1], Cyc_car(data, ((closureN)self_734837)->elements[0]), Cyc_cadr(data, ((closureN)self_734837)->elements[0]), Cyc_vector_length(data, ((closureN)self_734837)->elements[3]), Cyc_caddr(data, ((closureN)self_734837)->elements[0]));
} else { 
  
make_utf8_string_with_len(c_738274, "too many arguments", 18, 18);


return_direct_with_clo4(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_734837)->elements[1], &c_738274, __glo_vector_91copy_srfi_133, Cyc_cdddr(data, ((closureN)self_734837)->elements[0]));}
;}
;}
;}
;; 
}

static void __lambda_235(void *data, object _, int argc, object *args) /* closure _,object k_733671, object vec_73710_732545, object args_73711_732546_raw, ... */
 {
object k_733671 = args[0]; object vec_73710_732545 = args[1];
load_varargs(args_73711_732546, args, 2, argc - 2);
  Cyc_st_add(data, "srfi/133.sld:vector-copy");

closureN_type c_738141;
object e_738188 [2];
c_738141.hdr.mark = gc_color_red;
 c_738141.hdr.grayed = 0;
c_738141.tag = closureN_tag;
 c_738141.fn = (function_type)__lambda_236;
c_738141.num_args = 1;
c_738141.num_elements = 2;
c_738141.elements = (object *)e_738188;
c_738141.elements[0] = args_73711_732546;
c_738141.elements[1] = k_733671;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_738141, primitive_vector_127, vec_73710_732545, __glo_vector_91copy_srfi_133);; 
}

static void __lambda_236(void *data, object self_734820, int argc, object *args) /* object self_734820, object vec_73712_732547 */
 {
 object vec_73712_732547 = args[0];
  
closureN_type c_738143;
object e_738182 [2];
c_738143.hdr.mark = gc_color_red;
 c_738143.hdr.grayed = 0;
c_738143.tag = closureN_tag;
 c_738143.fn = (function_type)__lambda_237;
c_738143.num_args = 1;
c_738143.num_elements = 2;
c_738143.elements = (object *)e_738182;
c_738143.elements[0] = ((closureN)self_734820)->elements[1];
c_738143.elements[1] = vec_73712_732547;


closureN_type c_738183;
object e_738187 [2];
c_738183.hdr.mark = gc_color_red;
 c_738183.hdr.grayed = 0;
c_738183.tag = closureN_tag;
 c_738183.fn = (function_type)__lambda_242;
c_738183.num_args = 0;
c_738183.num_elements = 2;
c_738183.elements = (object *)e_738187;
c_738183.elements[0] = ((closureN)self_734820)->elements[0];
c_738183.elements[1] = vec_73712_732547;

return_direct_with_clo1(data,(closure)&c_738143,__lambda_237,  &c_738183);; 
}

static void __lambda_242(void *data, object self_734821, int argc, object *args) /* object self_734821, object k_733683 */
 {
 object k_733683 = args[0];
  return_direct_with_clo3(data,  __glo_vector_91copy_117parse_91args_srfi_133, (((closure)  __glo_vector_91copy_117parse_91args_srfi_133)->fn),  k_733683, ((closureN)self_734821)->elements[1], ((closureN)self_734821)->elements[0]);; 
}

static void __lambda_237(void *data, object self_734822, int argc, object *args) /* object self_734822, object r_733673 */
 {
 object r_733673 = args[0];
  
closureN_type c_738145;
object e_738149 [2];
c_738145.hdr.mark = gc_color_red;
 c_738145.hdr.grayed = 0;
c_738145.tag = closureN_tag;
 c_738145.fn = (function_type)__lambda_238;
c_738145.num_args = 1;
c_738145.num_elements = 2;
c_738145.elements = (object *)e_738149;
c_738145.elements[0] = ((closureN)self_734822)->elements[0];
c_738145.elements[1] = r_733673;


closureN_type c_738150;
object e_738181 [1];
c_738150.hdr.mark = gc_color_red;
 c_738150.hdr.grayed = 0;
c_738150.tag = closureN_tag;
 c_738150.fn = (function_type)__lambda_239;
c_738150.num_args = 3;
c_738150.num_elements = 1;
c_738150.elements = (object *)e_738181;
c_738150.elements[0] = ((closureN)self_734822)->elements[1];

return_direct_with_clo1(data,(closure)&c_738145,__lambda_238,  &c_738150);; 
}

static void __lambda_239(void *data, object self_734823, int argc, object *args) /* object self_734823, object k_733675, object start_73713_732548, object end_73714_732549, object fill_73715_732550 */
 {
 object k_733675 = args[0]; object start_73713_732548 = args[1]; object end_73714_732549 = args[2]; object fill_73715_732550 = args[3];
  
closureN_type c_738152;
object e_738174 [4];
c_738152.hdr.mark = gc_color_red;
 c_738152.hdr.grayed = 0;
c_738152.tag = closureN_tag;
 c_738152.fn = (function_type)__lambda_240;
c_738152.num_args = 1;
c_738152.num_elements = 4;
c_738152.elements = (object *)e_738174;
c_738152.elements[0] = end_73714_732549;
c_738152.elements[1] = k_733675;
c_738152.elements[2] = start_73713_732548;
c_738152.elements[3] = ((closureN)self_734823)->elements[0];


complex_num_type local_738180; 

object c_738177 = Cyc_make_vector(data,(closure)&c_738152,2,Cyc_fast_sub(data,&local_738180, end_73714_732549, start_73713_732548), fill_73715_732550);
return_closcall1(data,(closure)&c_738152,  c_738177);; 
}

static void __lambda_240(void *data, object self_734824, int argc, object *args) /* object self_734824, object new_91vector_73716_732551 */
 {
 object new_91vector_73716_732551 = args[0];
  object r_733678;
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, ((closureN)self_734824)->elements[0], Cyc_vector_length(data, ((closureN)self_734824)->elements[3]))) ){ 
  
  r_733678 = Cyc_vector_length(data, ((closureN)self_734824)->elements[3]);
} else { 
  r_733678 = ((closureN)self_734824)->elements[0];}
;
closureN_type c_738167;
object e_738171 [2];
c_738167.hdr.mark = gc_color_red;
 c_738167.hdr.grayed = 0;
c_738167.tag = closureN_tag;
 c_738167.fn = (function_type)__lambda_241;
c_738167.num_args = 1;
c_738167.num_elements = 2;
c_738167.elements = (object *)e_738171;
c_738167.elements[0] = ((closureN)self_734824)->elements[1];
c_738167.elements[1] = new_91vector_73716_732551;

return_direct_with_clo6(data,  __glo__75vector_91copy_67_srfi_133, (((closure)  __glo__75vector_91copy_67_srfi_133)->fn),  &c_738167, new_91vector_73716_732551, obj_int2obj(0), ((closureN)self_734824)->elements[3], ((closureN)self_734824)->elements[2], r_733678);; 
}

static void __lambda_241(void *data, object self_734825, int argc, object *args) /* object self_734825, object r_733677 */
 {

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

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

static void __lambda_207(void *data, object _, int argc, object *args) /* closure _,object k_733633, object f_73673_732518, object vec_73674_732519, object start_73675_732520, object end_73676_732521, object initial_91seeds_73677_732522_raw, ... */
 {
object k_733633 = args[0]; object f_73673_732518 = args[1]; object vec_73674_732519 = args[2]; object start_73675_732520 = args[3]; object end_73676_732521 = args[4];
load_varargs(initial_91seeds_73677_732522, args, 5, argc - 5);
  Cyc_st_add(data, "srfi/133.sld:vector-unfold-right!");

closureN_type c_737910;
object e_738138 [6];
c_737910.hdr.mark = gc_color_red;
 c_737910.hdr.grayed = 0;
c_737910.tag = closureN_tag;
 c_737910.fn = (function_type)__lambda_208;
c_737910.num_args = 3;
c_737910.num_elements = 6;
c_737910.elements = (object *)e_738138;
c_737910.elements[0] = end_73676_732521;
c_737910.elements[1] = f_73673_732518;
c_737910.elements[2] = initial_91seeds_73677_732522;
c_737910.elements[3] = k_733633;
c_737910.elements[4] = start_73675_732520;
c_737910.elements[5] = vec_73674_732519;

return_direct_with_clo3(data,(closure)&c_737910,__lambda_208,  boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_208(void *data, object self_734790, int argc, object *args) /* object self_734790, object tabulate_67_73678_732523, object unfold1_67_73679_732524, object unfold2_87_67_73680_732525 */
 {
 object tabulate_67_73678_732523 = args[0]; object unfold1_67_73679_732524 = args[1]; object unfold2_87_67_73680_732525 = args[2];
  
closureN_type c_737912;
object e_738134 [8];
c_737912.hdr.mark = gc_color_red;
 c_737912.hdr.grayed = 0;
c_737912.tag = closureN_tag;
 c_737912.fn = (function_type)__lambda_729;
c_737912.num_args = 1;
c_737912.num_elements = 8;
c_737912.elements = (object *)e_738134;
c_737912.elements[0] = ((closureN)self_734790)->elements[0];
c_737912.elements[1] = ((closureN)self_734790)->elements[1];
c_737912.elements[2] = ((closureN)self_734790)->elements[2];
c_737912.elements[3] = ((closureN)self_734790)->elements[3];
c_737912.elements[4] = ((closureN)self_734790)->elements[4];
c_737912.elements[5] = unfold1_67_73679_732524;
c_737912.elements[6] = unfold2_87_67_73680_732525;
c_737912.elements[7] = ((closureN)self_734790)->elements[5];


pair_type local_738137; 
return_direct_with_clo1(data,(closure)&c_737912,__lambda_729,  set_cell_as_expr(&local_738137, tabulate_67_73678_732523));; 
}

static void __lambda_729(void *data, object self_734791, int argc, object *args) /* object self_734791, object tabulate_67_73678_732523 */
 {
 object tabulate_67_73678_732523 = args[0];
  
closureN_type c_737914;
object e_738129 [8];
c_737914.hdr.mark = gc_color_red;
 c_737914.hdr.grayed = 0;
c_737914.tag = closureN_tag;
 c_737914.fn = (function_type)__lambda_728;
c_737914.num_args = 1;
c_737914.num_elements = 8;
c_737914.elements = (object *)e_738129;
c_737914.elements[0] = ((closureN)self_734791)->elements[0];
c_737914.elements[1] = ((closureN)self_734791)->elements[1];
c_737914.elements[2] = ((closureN)self_734791)->elements[2];
c_737914.elements[3] = ((closureN)self_734791)->elements[3];
c_737914.elements[4] = ((closureN)self_734791)->elements[4];
c_737914.elements[5] = tabulate_67_73678_732523;
c_737914.elements[6] = ((closureN)self_734791)->elements[6];
c_737914.elements[7] = ((closureN)self_734791)->elements[7];


pair_type local_738132; 
return_direct_with_clo1(data,(closure)&c_737914,__lambda_728,  set_cell_as_expr(&local_738132, ((closureN)self_734791)->elements[5]));; 
}

static void __lambda_728(void *data, object self_734792, int argc, object *args) /* object self_734792, object unfold1_67_73679_732524 */
 {
 object unfold1_67_73679_732524 = args[0];
  
closureN_type c_737916;
object e_738124 [8];
c_737916.hdr.mark = gc_color_red;
 c_737916.hdr.grayed = 0;
c_737916.tag = closureN_tag;
 c_737916.fn = (function_type)__lambda_727;
c_737916.num_args = 1;
c_737916.num_elements = 8;
c_737916.elements = (object *)e_738124;
c_737916.elements[0] = ((closureN)self_734792)->elements[0];
c_737916.elements[1] = ((closureN)self_734792)->elements[1];
c_737916.elements[2] = ((closureN)self_734792)->elements[2];
c_737916.elements[3] = ((closureN)self_734792)->elements[3];
c_737916.elements[4] = ((closureN)self_734792)->elements[4];
c_737916.elements[5] = ((closureN)self_734792)->elements[5];
c_737916.elements[6] = unfold1_67_73679_732524;
c_737916.elements[7] = ((closureN)self_734792)->elements[7];


pair_type local_738127; 
return_direct_with_clo1(data,(closure)&c_737916,__lambda_727,  set_cell_as_expr(&local_738127, ((closureN)self_734792)->elements[6]));; 
}

static void __lambda_727(void *data, object self_734793, int argc, object *args) /* object self_734793, object unfold2_87_67_73680_732525 */
 {
 object unfold2_87_67_73680_732525 = args[0];
  
closureN_type c_737918;
object e_738095 [9];
c_737918.hdr.mark = gc_color_red;
 c_737918.hdr.grayed = 0;
c_737918.tag = closureN_tag;
 c_737918.fn = (function_type)__lambda_209;
c_737918.num_args = 1;
c_737918.num_elements = 9;
c_737918.elements = (object *)e_738095;
c_737918.elements[0] = ((closureN)self_734793)->elements[0];
c_737918.elements[1] = ((closureN)self_734793)->elements[1];
c_737918.elements[2] = ((closureN)self_734793)->elements[2];
c_737918.elements[3] = ((closureN)self_734793)->elements[3];
c_737918.elements[4] = ((closureN)self_734793)->elements[4];
c_737918.elements[5] = ((closureN)self_734793)->elements[5];
c_737918.elements[6] = ((closureN)self_734793)->elements[6];
c_737918.elements[7] = unfold2_87_67_73680_732525;
c_737918.elements[8] = ((closureN)self_734793)->elements[7];


closureN_type c_738096;
object e_738123 [2];
c_738096.hdr.mark = gc_color_red;
 c_738096.hdr.grayed = 0;
c_738096.tag = closureN_tag;
 c_738096.fn = (function_type)__lambda_232;
c_738096.num_args = 3;
c_738096.num_elements = 2;
c_738096.elements = (object *)e_738123;
c_738096.elements[0] = ((closureN)self_734793)->elements[4];
c_738096.elements[1] = ((closureN)self_734793)->elements[5];

return_direct_with_clo1(data,(closure)&c_737918,__lambda_209,  &c_738096);; 
}

static void __lambda_232(void *data, object self_734794, int argc, object *args) /* object self_734794, object k_733664, object f_73681_732526, object vec_73682_732527, object i_73683_732528 */
 {
 object k_733664 = args[0]; object f_73681_732526 = args[1]; object vec_73682_732527 = args[2]; object i_73683_732528 = args[3];
    
if( (boolean_f != Cyc_num_fast_gte_op(data, i_73683_732528, ((closureN)self_734794)->elements[0])) ){ 
  
closureN_type c_738101;
object e_738121 [5];
c_738101.hdr.mark = gc_color_red;
 c_738101.hdr.grayed = 0;
c_738101.tag = closureN_tag;
 c_738101.fn = (function_type)__lambda_233;
c_738101.num_args = 1;
c_738101.num_elements = 5;
c_738101.elements = (object *)e_738121;
c_738101.elements[0] = f_73681_732526;
c_738101.elements[1] = i_73683_732528;
c_738101.elements[2] = k_733664;
c_738101.elements[3] = ((closureN)self_734794)->elements[1];
c_738101.elements[4] = vec_73682_732527;

return_closcall2(data,  f_73681_732526,  &c_738101, i_73683_732528);
} else { 
  return_direct_with_clo1(data,  k_733664, (((closure)  k_733664)->fn),  boolean_f);}
;; 
}

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


object c_738118 = Cyc_vector_set_cps(data,(closure)&c_738103,((closureN)self_734795)->elements[4], ((closureN)self_734795)->elements[1], r_733668);
return_closcall1(data,(closure)&c_738103,  c_738118);; 
}

static void __lambda_234(void *data, object self_734796, int argc, object *args) /* object self_734796, object r_733666 */
 {

  


complex_num_type local_738113; 
return_closcall4(data,  car(((closureN)self_734796)->elements[3]),  ((closureN)self_734796)->elements[2], ((closureN)self_734796)->elements[0], ((closureN)self_734796)->elements[4], Cyc_fast_sub(data,&local_738113, ((closureN)self_734796)->elements[1], obj_int2obj(1)));; 
}

static void __lambda_209(void *data, object self_734797, int argc, object *args) /* object self_734797, object r_733663 */
 {
 object r_733663 = args[0];
  
closureN_type c_737920;
object e_738091 [9];
c_737920.hdr.mark = gc_color_red;
 c_737920.hdr.grayed = 0;
c_737920.tag = closureN_tag;
 c_737920.fn = (function_type)__lambda_210;
c_737920.num_args = 1;
c_737920.num_elements = 9;
c_737920.elements = (object *)e_738091;
c_737920.elements[0] = ((closureN)self_734797)->elements[0];
c_737920.elements[1] = ((closureN)self_734797)->elements[1];
c_737920.elements[2] = ((closureN)self_734797)->elements[2];
c_737920.elements[3] = ((closureN)self_734797)->elements[3];
c_737920.elements[4] = ((closureN)self_734797)->elements[4];
c_737920.elements[5] = ((closureN)self_734797)->elements[5];
c_737920.elements[6] = ((closureN)self_734797)->elements[6];
c_737920.elements[7] = ((closureN)self_734797)->elements[7];
c_737920.elements[8] = ((closureN)self_734797)->elements[8];



return_direct_with_clo1(data,(closure)&c_737920,__lambda_210,  Cyc_set_cell(data, ((closureN)self_734797)->elements[5], r_733663));; 
}

static void __lambda_210(void *data, object self_734798, int argc, object *args) /* object self_734798, object r_733634 */
 {

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


closureN_type c_738048;
object e_738090 [2];
c_738048.hdr.mark = gc_color_red;
 c_738048.hdr.grayed = 0;
c_738048.tag = closureN_tag;
 c_738048.fn = (function_type)__lambda_226;
c_738048.num_args = 4;
c_738048.num_elements = 2;
c_738048.elements = (object *)e_738090;
c_738048.elements[0] = ((closureN)self_734798)->elements[4];
c_738048.elements[1] = ((closureN)self_734798)->elements[6];

return_direct_with_clo1(data,(closure)&c_737922,__lambda_211,  &c_738048);; 
}

static void __lambda_226(void *data, object self_734799, int argc, object *args) /* object self_734799, object k_733655, object f_73687_732529, object vec_73688_732530, object i_73689_732531, object seed_73690_732532 */
 {
 object k_733655 = args[0]; object f_73687_732529 = args[1]; object vec_73688_732530 = args[2]; object i_73689_732531 = args[3]; object seed_73690_732532 = args[4];
    
if( (boolean_f != Cyc_num_fast_gte_op(data, i_73689_732531, ((closureN)self_734799)->elements[0])) ){ 
  
closureN_type c_738053;
object e_738082 [5];
c_738053.hdr.mark = gc_color_red;
 c_738053.hdr.grayed = 0;
c_738053.tag = closureN_tag;
 c_738053.fn = (function_type)__lambda_227;
c_738053.num_args = 1;
c_738053.num_elements = 5;
c_738053.elements = (object *)e_738082;
c_738053.elements[0] = f_73687_732529;
c_738053.elements[1] = i_73689_732531;
c_738053.elements[2] = k_733655;
c_738053.elements[3] = ((closureN)self_734799)->elements[1];
c_738053.elements[4] = vec_73688_732530;


closureN_type c_738083;
object e_738088 [3];
c_738083.hdr.mark = gc_color_red;
 c_738083.hdr.grayed = 0;
c_738083.tag = closureN_tag;
 c_738083.fn = (function_type)__lambda_231;
c_738083.num_args = 0;
c_738083.num_elements = 3;
c_738083.elements = (object *)e_738088;
c_738083.elements[0] = f_73687_732529;
c_738083.elements[1] = i_73689_732531;
c_738083.elements[2] = seed_73690_732532;

return_direct_with_clo1(data,(closure)&c_738053,__lambda_227,  &c_738083);
} else { 
  return_direct_with_clo1(data,  k_733655, (((closure)  k_733655)->fn),  Cyc_VOID);}
;; 
}

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

static void __lambda_227(void *data, object self_734801, int argc, object *args) /* object self_734801, object r_733657 */
 {
 object r_733657 = args[0];
  
closureN_type c_738055;
object e_738059 [2];
c_738055.hdr.mark = gc_color_red;
 c_738055.hdr.grayed = 0;
c_738055.tag = closureN_tag;
 c_738055.fn = (function_type)__lambda_228;
c_738055.num_args = 1;
c_738055.num_elements = 2;
c_738055.elements = (object *)e_738059;
c_738055.elements[0] = ((closureN)self_734801)->elements[2];
c_738055.elements[1] = r_733657;


closureN_type c_738060;
object e_738081 [4];
c_738060.hdr.mark = gc_color_red;
 c_738060.hdr.grayed = 0;
c_738060.tag = closureN_tag;
 c_738060.fn = (function_type)__lambda_229;
c_738060.num_args = 2;
c_738060.num_elements = 4;
c_738060.elements = (object *)e_738081;
c_738060.elements[0] = ((closureN)self_734801)->elements[0];
c_738060.elements[1] = ((closureN)self_734801)->elements[1];
c_738060.elements[2] = ((closureN)self_734801)->elements[3];
c_738060.elements[3] = ((closureN)self_734801)->elements[4];

return_direct_with_clo1(data,(closure)&c_738055,__lambda_228,  &c_738060);; 
}

static void __lambda_229(void *data, object self_734802, int argc, object *args) /* object self_734802, object k_733659, object elt_73691_732533, object new_91seed_73692_732534 */
 {
 object k_733659 = args[0]; object elt_73691_732533 = args[1]; object new_91seed_73692_732534 = args[2];
  
closureN_type c_738062;
object e_738075 [6];
c_738062.hdr.mark = gc_color_red;
 c_738062.hdr.grayed = 0;
c_738062.tag = closureN_tag;
 c_738062.fn = (function_type)__lambda_230;
c_738062.num_args = 1;
c_738062.num_elements = 6;
c_738062.elements = (object *)e_738075;
c_738062.elements[0] = ((closureN)self_734802)->elements[0];
c_738062.elements[1] = ((closureN)self_734802)->elements[1];
c_738062.elements[2] = k_733659;
c_738062.elements[3] = new_91seed_73692_732534;
c_738062.elements[4] = ((closureN)self_734802)->elements[2];
c_738062.elements[5] = ((closureN)self_734802)->elements[3];


object c_738078 = Cyc_vector_set_cps(data,(closure)&c_738062,((closureN)self_734802)->elements[3], ((closureN)self_734802)->elements[1], elt_73691_732533);
return_closcall1(data,(closure)&c_738062,  c_738078);; 
}

static void __lambda_230(void *data, object self_734803, int argc, object *args) /* object self_734803, object r_733660 */
 {

  


complex_num_type local_738072; 
return_closcall5(data,  car(((closureN)self_734803)->elements[4]),  ((closureN)self_734803)->elements[2], ((closureN)self_734803)->elements[0], ((closureN)self_734803)->elements[5], Cyc_fast_sub(data,&local_738072, ((closureN)self_734803)->elements[1], obj_int2obj(1)), ((closureN)self_734803)->elements[3]);; 
}

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

static void __lambda_211(void *data, object self_734805, int argc, object *args) /* object self_734805, object r_733654 */
 {
 object r_733654 = args[0];
  
closureN_type c_737924;
object e_738043 [9];
c_737924.hdr.mark = gc_color_red;
 c_737924.hdr.grayed = 0;
c_737924.tag = closureN_tag;
 c_737924.fn = (function_type)__lambda_212;
c_737924.num_args = 1;
c_737924.num_elements = 9;
c_737924.elements = (object *)e_738043;
c_737924.elements[0] = ((closureN)self_734805)->elements[0];
c_737924.elements[1] = ((closureN)self_734805)->elements[1];
c_737924.elements[2] = ((closureN)self_734805)->elements[2];
c_737924.elements[3] = ((closureN)self_734805)->elements[3];
c_737924.elements[4] = ((closureN)self_734805)->elements[4];
c_737924.elements[5] = ((closureN)self_734805)->elements[5];
c_737924.elements[6] = ((closureN)self_734805)->elements[6];
c_737924.elements[7] = ((closureN)self_734805)->elements[7];
c_737924.elements[8] = ((closureN)self_734805)->elements[8];



return_direct_with_clo1(data,(closure)&c_737924,__lambda_212,  Cyc_set_cell(data, ((closureN)self_734805)->elements[6], r_733654));; 
}

static void __lambda_212(void *data, object self_734806, int argc, object *args) /* object self_734806, object r_733635 */
 {

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


closureN_type c_737997;
object e_738042 [2];
c_737997.hdr.mark = gc_color_red;
 c_737997.hdr.grayed = 0;
c_737997.tag = closureN_tag;
 c_737997.fn = (function_type)__lambda_220;
c_737997.num_args = 4;
c_737997.num_elements = 2;
c_737997.elements = (object *)e_738042;
c_737997.elements[0] = ((closureN)self_734806)->elements[4];
c_737997.elements[1] = ((closureN)self_734806)->elements[7];

return_direct_with_clo1(data,(closure)&c_737926,__lambda_213,  &c_737997);; 
}

static void __lambda_220(void *data, object self_734807, int argc, object *args) /* object self_734807, object k_733646, object f_73693_732535, object vec_73694_732536, object i_73695_732537, object seeds_73696_732538 */
 {
 object k_733646 = args[0]; object f_73693_732535 = args[1]; object vec_73694_732536 = args[2]; object i_73695_732537 = args[3]; object seeds_73696_732538 = args[4];
    
if( (boolean_f != Cyc_num_fast_gte_op(data, i_73695_732537, ((closureN)self_734807)->elements[0])) ){ 
  
closureN_type c_738002;
object e_738031 [5];
c_738002.hdr.mark = gc_color_red;
 c_738002.hdr.grayed = 0;
c_738002.tag = closureN_tag;
 c_738002.fn = (function_type)__lambda_221;
c_738002.num_args = 1;
c_738002.num_elements = 5;
c_738002.elements = (object *)e_738031;
c_738002.elements[0] = f_73693_732535;
c_738002.elements[1] = i_73695_732537;
c_738002.elements[2] = k_733646;
c_738002.elements[3] = ((closureN)self_734807)->elements[1];
c_738002.elements[4] = vec_73694_732536;


closureN_type c_738032;
object e_738040 [3];
c_738032.hdr.mark = gc_color_red;
 c_738032.hdr.grayed = 0;
c_738032.tag = closureN_tag;
 c_738032.fn = (function_type)__lambda_225;
c_738032.num_args = 0;
c_738032.num_elements = 3;
c_738032.elements = (object *)e_738040;
c_738032.elements[0] = f_73693_732535;
c_738032.elements[1] = i_73695_732537;
c_738032.elements[2] = seeds_73696_732538;

return_direct_with_clo1(data,(closure)&c_738002,__lambda_221,  &c_738032);
} else { 
  return_direct_with_clo1(data,  k_733646, (((closure)  k_733646)->fn),  Cyc_VOID);}
;; 
}

static void __lambda_225(void *data, object self_734808, int argc, object *args) /* object self_734808, object k_733653 */
 {
 object k_733653 = args[0];
  
object c_738036 = apply_va(data,  k_733653,3,((closureN)self_734808)->elements[0], ((closureN)self_734808)->elements[1], ((closureN)self_734808)->elements[2]);
return_direct_with_clo1(data,  k_733653, (((closure)  k_733653)->fn),  c_738036);; 
}

static void __lambda_221(void *data, object self_734809, int argc, object *args) /* object self_734809, object r_733648 */
 {
 object r_733648 = args[0];
  
closureN_type c_738004;
object e_738008 [2];
c_738004.hdr.mark = gc_color_red;
 c_738004.hdr.grayed = 0;
c_738004.tag = closureN_tag;
 c_738004.fn = (function_type)__lambda_222;
c_738004.num_args = 1;
c_738004.num_elements = 2;
c_738004.elements = (object *)e_738008;
c_738004.elements[0] = ((closureN)self_734809)->elements[2];
c_738004.elements[1] = r_733648;


closureN_type c_738009;
object e_738030 [4];
c_738009.hdr.mark = gc_color_red;
 c_738009.hdr.grayed = 0;
c_738009.tag = closureN_tag;
 c_738009.fn = (function_type)__lambda_223;
c_738009.num_args = 1;
c_738009.num_elements = 4;
c_738009.elements = (object *)e_738030;
c_738009.elements[0] = ((closureN)self_734809)->elements[0];
c_738009.elements[1] = ((closureN)self_734809)->elements[1];
c_738009.elements[2] = ((closureN)self_734809)->elements[3];
c_738009.elements[3] = ((closureN)self_734809)->elements[4];

return_direct_with_clo1(data,(closure)&c_738004,__lambda_222,  &c_738009);; 
}

static void __lambda_223(void *data, object self_734810, int argc, object *args) /* object self_734810, object k_733650, object elt_73697_732539, object new_91seeds_73698_732540_raw, ... */
 {
 object k_733650 = args[0]; object elt_73697_732539 = args[1];
load_varargs(new_91seeds_73698_732540, args, 2, argc - 2);
  
closureN_type c_738011;
object e_738024 [6];
c_738011.hdr.mark = gc_color_red;
 c_738011.hdr.grayed = 0;
c_738011.tag = closureN_tag;
 c_738011.fn = (function_type)__lambda_224;
c_738011.num_args = 1;
c_738011.num_elements = 6;
c_738011.elements = (object *)e_738024;
c_738011.elements[0] = ((closureN)self_734810)->elements[0];
c_738011.elements[1] = ((closureN)self_734810)->elements[1];
c_738011.elements[2] = k_733650;
c_738011.elements[3] = new_91seeds_73698_732540;
c_738011.elements[4] = ((closureN)self_734810)->elements[2];
c_738011.elements[5] = ((closureN)self_734810)->elements[3];


object c_738027 = Cyc_vector_set_cps(data,(closure)&c_738011,((closureN)self_734810)->elements[3], ((closureN)self_734810)->elements[1], elt_73697_732539);
return_closcall1(data,(closure)&c_738011,  c_738027);; 
}

static void __lambda_224(void *data, object self_734811, int argc, object *args) /* object self_734811, object r_733651 */
 {

  


complex_num_type local_738021; 
return_closcall5(data,  car(((closureN)self_734811)->elements[4]),  ((closureN)self_734811)->elements[2], ((closureN)self_734811)->elements[0], ((closureN)self_734811)->elements[5], Cyc_fast_sub(data,&local_738021, ((closureN)self_734811)->elements[1], obj_int2obj(1)), ((closureN)self_734811)->elements[3]);; 
}

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

static void __lambda_213(void *data, object self_734813, int argc, object *args) /* object self_734813, object r_733645 */
 {
 object r_733645 = args[0];
  
closureN_type c_737928;
object e_737992 [9];
c_737928.hdr.mark = gc_color_red;
 c_737928.hdr.grayed = 0;
c_737928.tag = closureN_tag;
 c_737928.fn = (function_type)__lambda_214;
c_737928.num_args = 1;
c_737928.num_elements = 9;
c_737928.elements = (object *)e_737992;
c_737928.elements[0] = ((closureN)self_734813)->elements[0];
c_737928.elements[1] = ((closureN)self_734813)->elements[1];
c_737928.elements[2] = ((closureN)self_734813)->elements[2];
c_737928.elements[3] = ((closureN)self_734813)->elements[3];
c_737928.elements[4] = ((closureN)self_734813)->elements[4];
c_737928.elements[5] = ((closureN)self_734813)->elements[5];
c_737928.elements[6] = ((closureN)self_734813)->elements[6];
c_737928.elements[7] = ((closureN)self_734813)->elements[7];
c_737928.elements[8] = ((closureN)self_734813)->elements[8];



return_direct_with_clo1(data,(closure)&c_737928,__lambda_214,  Cyc_set_cell(data, ((closureN)self_734813)->elements[7], r_733645));; 
}

static void __lambda_214(void *data, object self_734814, int argc, object *args) /* object self_734814, object r_733636 */
 {

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

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_737930, primitive_procedure_127, ((closureN)self_734814)->elements[1], __glo_vector_91unfold_91right_67_srfi_133);; 
}

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

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_737932, __glo_nonneg_91int_127_srfi_133, ((closureN)self_734815)->elements[3], __glo_vector_91unfold_91right_67_srfi_133);; 
}

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

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_737934, __glo_nonneg_91int_127_srfi_133, ((closureN)self_734816)->elements[0], __glo_vector_91unfold_91right_67_srfi_133);; 
}

static void __lambda_217(void *data, object self_734817, int argc, object *args) /* object self_734817, object r_733639 */
 {
 object r_733639 = args[0];
  
closureN_type c_737936;
object e_737983 [6];
c_737936.hdr.mark = gc_color_red;
 c_737936.hdr.grayed = 0;
c_737936.tag = closureN_tag;
 c_737936.fn = (function_type)__lambda_218;
c_737936.num_args = 3;
c_737936.num_elements = 6;
c_737936.elements = (object *)e_737983;
c_737936.elements[0] = ((closureN)self_734817)->elements[0];
c_737936.elements[1] = ((closureN)self_734817)->elements[1];
c_737936.elements[2] = ((closureN)self_734817)->elements[4];
c_737936.elements[3] = ((closureN)self_734817)->elements[5];
c_737936.elements[4] = ((closureN)self_734817)->elements[6];
c_737936.elements[5] = ((closureN)self_734817)->elements[7];

return_direct_with_clo3(data,(closure)&c_737936,__lambda_218,  ((closureN)self_734817)->elements[2], ((closureN)self_734817)->elements[3], r_733639);; 
}

static void __lambda_218(void *data, object self_734818, int argc, object *args) /* object self_734818, object f_73699_732541, object start_73700_732542, object end_73701_732543 */
 {
 object f_73699_732541 = args[0]; object end_73701_732543 = args[2];
    
if( (boolean_f != Cyc_is_null(((closureN)self_734818)->elements[0])) ){ 
  


complex_num_type local_737948; 
return_closcall4(data,  car(((closureN)self_734818)->elements[2]),  ((closureN)self_734818)->elements[1], f_73699_732541, ((closureN)self_734818)->elements[5], Cyc_fast_sub(data,&local_737948, end_73701_732543, obj_int2obj(1)));
} else { 
  
closureN_type c_737950;
object e_737979 [7];
c_737950.hdr.mark = gc_color_red;
 c_737950.hdr.grayed = 0;
c_737950.tag = closureN_tag;
 c_737950.fn = (function_type)__lambda_219;
c_737950.num_args = 1;
c_737950.num_elements = 7;
c_737950.elements = (object *)e_737979;
c_737950.elements[0] = end_73701_732543;
c_737950.elements[1] = f_73699_732541;
c_737950.elements[2] = ((closureN)self_734818)->elements[0];
c_737950.elements[3] = ((closureN)self_734818)->elements[1];
c_737950.elements[4] = ((closureN)self_734818)->elements[3];
c_737950.elements[5] = ((closureN)self_734818)->elements[4];
c_737950.elements[6] = ((closureN)self_734818)->elements[5];



return_direct_with_clo1(data,(closure)&c_737950,__lambda_219,  Cyc_cdr(data, ((closureN)self_734818)->elements[0]));}
;; 
}

static void __lambda_219(void *data, object self_734819, int argc, object *args) /* object self_734819, object r_733644 */
 {
 object r_733644 = args[0];
    
if( (boolean_f != Cyc_is_null(r_733644)) ){ 
  


complex_num_type local_737962; 


return_closcall5(data,  car(((closureN)self_734819)->elements[4]),  ((closureN)self_734819)->elements[3], ((closureN)self_734819)->elements[1], ((closureN)self_734819)->elements[6], Cyc_fast_sub(data,&local_737962, ((closureN)self_734819)->elements[0], obj_int2obj(1)), Cyc_car(data, ((closureN)self_734819)->elements[2]));
} else { 
  


complex_num_type local_737976; 
return_closcall5(data,  car(((closureN)self_734819)->elements[5]),  ((closureN)self_734819)->elements[3], ((closureN)self_734819)->elements[1], ((closureN)self_734819)->elements[6], Cyc_fast_sub(data,&local_737976, ((closureN)self_734819)->elements[0], obj_int2obj(1)), ((closureN)self_734819)->elements[2]);}
;; 
}

static void __lambda_202(void *data, object _, int argc, object *args) /* closure _,object k_733627, object f_73670_732512, object len_73671_732513, object initial_91seeds_73672_732514_raw, ... */
 {
object k_733627 = args[0]; object f_73670_732512 = args[1]; object len_73671_732513 = args[2];
load_varargs(initial_91seeds_73672_732514, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/133.sld:vector-unfold-right");

closureN_type c_737870;
object e_737907 [4];
c_737870.hdr.mark = gc_color_red;
 c_737870.hdr.grayed = 0;
c_737870.tag = closureN_tag;
 c_737870.fn = (function_type)__lambda_203;
c_737870.num_args = 1;
c_737870.num_elements = 4;
c_737870.elements = (object *)e_737907;
c_737870.elements[0] = f_73670_732512;
c_737870.elements[1] = initial_91seeds_73672_732514;
c_737870.elements[2] = k_733627;
c_737870.elements[3] = len_73671_732513;

return_direct_with_clo1(data,(closure)&c_737870,__lambda_203,  boolean_f);; 
}

static void __lambda_203(void *data, object self_734785, int argc, object *args) /* object self_734785, object vec_732516 */
 {
 object vec_732516 = args[0];
  
closureN_type c_737872;
object e_737903 [4];
c_737872.hdr.mark = gc_color_red;
 c_737872.hdr.grayed = 0;
c_737872.tag = closureN_tag;
 c_737872.fn = (function_type)__lambda_726;
c_737872.num_args = 1;
c_737872.num_elements = 4;
c_737872.elements = (object *)e_737903;
c_737872.elements[0] = ((closureN)self_734785)->elements[0];
c_737872.elements[1] = ((closureN)self_734785)->elements[1];
c_737872.elements[2] = ((closureN)self_734785)->elements[2];
c_737872.elements[3] = ((closureN)self_734785)->elements[3];


pair_type local_737906; 
return_direct_with_clo1(data,(closure)&c_737872,__lambda_726,  set_cell_as_expr(&local_737906, vec_732516));; 
}

static void __lambda_726(void *data, object self_734786, int argc, object *args) /* object self_734786, object vec_732516 */
 {
 object vec_732516 = args[0];
  
closureN_type c_737874;
object e_737898 [5];
c_737874.hdr.mark = gc_color_red;
 c_737874.hdr.grayed = 0;
c_737874.tag = closureN_tag;
 c_737874.fn = (function_type)__lambda_204;
c_737874.num_args = 1;
c_737874.num_elements = 5;
c_737874.elements = (object *)e_737898;
c_737874.elements[0] = ((closureN)self_734786)->elements[0];
c_737874.elements[1] = ((closureN)self_734786)->elements[1];
c_737874.elements[2] = ((closureN)self_734786)->elements[2];
c_737874.elements[3] = ((closureN)self_734786)->elements[3];
c_737874.elements[4] = vec_732516;


object c_737901 = Cyc_make_vector(data,(closure)&c_737874,1,((closureN)self_734786)->elements[3]);
return_closcall1(data,(closure)&c_737874,  c_737901);; 
}

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



return_direct_with_clo1(data,(closure)&c_737876,__lambda_205,  Cyc_set_cell(data, ((closureN)self_734787)->elements[4], r_733630));; 
}

static void __lambda_205(void *data, object self_734788, int argc, object *args) /* object self_734788, object r_733628 */
 {

  
closureN_type c_737878;
object e_737884 [2];
c_737878.hdr.mark = gc_color_red;
 c_737878.hdr.grayed = 0;
c_737878.tag = closureN_tag;
 c_737878.fn = (function_type)__lambda_206;
c_737878.num_args = 1;
c_737878.num_elements = 2;
c_737878.elements = (object *)e_737884;
c_737878.elements[0] = ((closureN)self_734788)->elements[2];
c_737878.elements[1] = ((closureN)self_734788)->elements[4];




object c_737887 = apply_va(data,(closure)&c_737878,6,__glo_vector_91unfold_91right_67_srfi_133, ((closureN)self_734788)->elements[0], car(((closureN)self_734788)->elements[4]), obj_int2obj(0), ((closureN)self_734788)->elements[3], ((closureN)self_734788)->elements[1]);
return_closcall1(data,(closure)&c_737878,  c_737887);; 
}

static void __lambda_206(void *data, object self_734789, int argc, object *args) /* object self_734789, object r_733629 */
 {

  

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

static void __lambda_197(void *data, object _, int argc, object *args) /* closure _,object k_733619, object f_73628_732506, object length_73629_732507, object initial_91seeds_73630_732508_raw, ... */
 {
object k_733619 = args[0]; object f_73628_732506 = args[1]; object length_73629_732507 = args[2];
load_varargs(initial_91seeds_73630_732508, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/133.sld:vector-unfold");

closureN_type c_737830;
object e_737867 [4];
c_737830.hdr.mark = gc_color_red;
 c_737830.hdr.grayed = 0;
c_737830.tag = closureN_tag;
 c_737830.fn = (function_type)__lambda_198;
c_737830.num_args = 1;
c_737830.num_elements = 4;
c_737830.elements = (object *)e_737867;
c_737830.elements[0] = f_73628_732506;
c_737830.elements[1] = initial_91seeds_73630_732508;
c_737830.elements[2] = k_733619;
c_737830.elements[3] = length_73629_732507;

return_direct_with_clo1(data,(closure)&c_737830,__lambda_198,  boolean_f);; 
}

static void __lambda_198(void *data, object self_734780, int argc, object *args) /* object self_734780, object vec_732510 */
 {
 object vec_732510 = args[0];
  
closureN_type c_737832;
object e_737863 [4];
c_737832.hdr.mark = gc_color_red;
 c_737832.hdr.grayed = 0;
c_737832.tag = closureN_tag;
 c_737832.fn = (function_type)__lambda_725;
c_737832.num_args = 1;
c_737832.num_elements = 4;
c_737832.elements = (object *)e_737863;
c_737832.elements[0] = ((closureN)self_734780)->elements[0];
c_737832.elements[1] = ((closureN)self_734780)->elements[1];
c_737832.elements[2] = ((closureN)self_734780)->elements[2];
c_737832.elements[3] = ((closureN)self_734780)->elements[3];


pair_type local_737866; 
return_direct_with_clo1(data,(closure)&c_737832,__lambda_725,  set_cell_as_expr(&local_737866, vec_732510));; 
}

static void __lambda_725(void *data, object self_734781, int argc, object *args) /* object self_734781, object vec_732510 */
 {
 object vec_732510 = args[0];
  
closureN_type c_737834;
object e_737858 [5];
c_737834.hdr.mark = gc_color_red;
 c_737834.hdr.grayed = 0;
c_737834.tag = closureN_tag;
 c_737834.fn = (function_type)__lambda_199;
c_737834.num_args = 1;
c_737834.num_elements = 5;
c_737834.elements = (object *)e_737858;
c_737834.elements[0] = ((closureN)self_734781)->elements[0];
c_737834.elements[1] = ((closureN)self_734781)->elements[1];
c_737834.elements[2] = ((closureN)self_734781)->elements[2];
c_737834.elements[3] = ((closureN)self_734781)->elements[3];
c_737834.elements[4] = vec_732510;


object c_737861 = Cyc_make_vector(data,(closure)&c_737834,1,((closureN)self_734781)->elements[3]);
return_closcall1(data,(closure)&c_737834,  c_737861);; 
}

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



return_direct_with_clo1(data,(closure)&c_737836,__lambda_200,  Cyc_set_cell(data, ((closureN)self_734782)->elements[4], r_733622));; 
}

static void __lambda_200(void *data, object self_734783, int argc, object *args) /* object self_734783, object r_733620 */
 {

  
closureN_type c_737838;
object e_737844 [2];
c_737838.hdr.mark = gc_color_red;
 c_737838.hdr.grayed = 0;
c_737838.tag = closureN_tag;
 c_737838.fn = (function_type)__lambda_201;
c_737838.num_args = 1;
c_737838.num_elements = 2;
c_737838.elements = (object *)e_737844;
c_737838.elements[0] = ((closureN)self_734783)->elements[2];
c_737838.elements[1] = ((closureN)self_734783)->elements[4];




object c_737847 = apply_va(data,(closure)&c_737838,6,__glo_vector_91unfold_67_srfi_133, ((closureN)self_734783)->elements[0], car(((closureN)self_734783)->elements[4]), obj_int2obj(0), ((closureN)self_734783)->elements[3], ((closureN)self_734783)->elements[1]);
return_closcall1(data,(closure)&c_737838,  c_737847);; 
}

static void __lambda_201(void *data, object self_734784, int argc, object *args) /* object self_734784, object r_733621 */
 {

  

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

static void __lambda_157(void *data, object _, int argc, object *args) /* closure _,object k_733497, object expr_73449_73472_73510_732480, object rename_73450_73473_73511_732481, object compare_73451_73474_73512_732482 */
 {
object k_733497 = args[0]; object expr_73449_73472_73510_732480 = args[1]; object rename_73450_73473_73511_732481 = args[2];
  Cyc_st_add(data, "srfi/133.sld:let-vector-start+end");

closureN_type c_737277;
object e_737825 [3];
c_737277.hdr.mark = gc_color_red;
 c_737277.hdr.grayed = 0;
c_737277.tag = closureN_tag;
 c_737277.fn = (function_type)__lambda_158;
c_737277.num_args = 1;
c_737277.num_elements = 3;
c_737277.elements = (object *)e_737825;
c_737277.elements[0] = expr_73449_73472_73510_732480;
c_737277.elements[1] = k_733497;
c_737277.elements[2] = rename_73450_73473_73511_732481;



return_direct_with_clo1(data,(closure)&c_737277,__lambda_158,  Cyc_cdr(data, expr_73449_73472_73510_732480));; 
}

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


closureN_type c_737801;
object e_737824 [2];
c_737801.hdr.mark = gc_color_red;
 c_737801.hdr.grayed = 0;
c_737801.tag = closureN_tag;
 c_737801.fn = (function_type)__lambda_193;
c_737801.num_args = 1;
c_737801.num_elements = 2;
c_737801.elements = (object *)e_737824;
c_737801.elements[0] = ((closureN)self_734741)->elements[0];
c_737801.elements[1] = ((closureN)self_734741)->elements[1];

return_direct_with_clo1(data,(closure)&c_737279,__lambda_159,  &c_737801);; 
}

static void __lambda_193(void *data, object self_734742, int argc, object *args) /* object self_734742, object tmp_73476_73478_73513_732483 */
 {
 object tmp_73476_73478_73513_732483 = args[0];
  
closureN_type c_737803;
object e_737817 [2];
c_737803.hdr.mark = gc_color_red;
 c_737803.hdr.grayed = 0;
c_737803.tag = closureN_tag;
 c_737803.fn = (function_type)__lambda_194;
c_737803.num_args = 0;
c_737803.num_elements = 2;
c_737803.elements = (object *)e_737817;
c_737803.elements[0] = ((closureN)self_734742)->elements[0];
c_737803.elements[1] = tmp_73476_73478_73513_732483;


closureN_type c_737818;
object e_737823 [1];
c_737818.hdr.mark = gc_color_red;
 c_737818.hdr.grayed = 0;
c_737818.tag = closureN_tag;
 c_737818.fn = (function_type)__lambda_196;
c_737818.num_args = 1;
c_737818.num_elements = 1;
c_737818.elements = (object *)e_737823;
c_737818.elements[0] = ((closureN)self_734742)->elements[1];

return_direct_with_clo1(data,(closure)&c_737803,__lambda_194,  &c_737818);; 
}

static void __lambda_196(void *data, object self_734743, int argc, object *args) /* object self_734743, object r_733498 */
 {
 object r_733498 = args[0];
  

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

static void __lambda_194(void *data, object self_734744, int argc, object *args) /* object self_734744, object k_733500 */
 {
 object k_733500 = args[0];
  if( (boolean_f != ((closureN)self_734744)->elements[1]) ){ 
  return_direct_with_clo1(data,  k_733500, (((closure)  k_733500)->fn),  ((closureN)self_734744)->elements[1]);
} else { 
  
closureN_type c_737808;
object e_737814 [1];
c_737808.hdr.mark = gc_color_red;
 c_737808.hdr.grayed = 0;
c_737808.tag = closureN_tag;
 c_737808.fn = (function_type)__lambda_195;
c_737808.num_args = 1;
c_737808.num_elements = 1;
c_737808.elements = (object *)e_737814;
c_737808.elements[0] = k_733500;


make_utf8_string_with_len(c_737815, "no expansion for", 16, 16);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_737808, &c_737815, ((closureN)self_734744)->elements[0]);}
;; 
}

static void __lambda_195(void *data, object self_734745, int argc, object *args) /* object self_734745, object r_733501 */
 {
 object r_733501 = args[0];
  
pair_type local_737813; 
return_direct_with_clo1(data,  ((closureN)self_734745)->elements[0], (((closure)  ((closureN)self_734745)->elements[0])->fn),  set_pair_as_expr(&local_737813, r_733501, boolean_f));; 
}

static void __lambda_159(void *data, object self_734746, int argc, object *args) /* object self_734746, object k_733503 */
 {
 object k_733503 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_734746)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_734746)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734746)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734746)->elements[1]))))) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734746)->elements[1])))))) ){ 
    
  
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734746)->elements[1]))))))) ){ 
    
  
  
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734746)->elements[1])))))))) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734746)->elements[1])))))) ){ 
    complex_num_type local_737356; 
  
  
  
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_737356, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734746)->elements[1]))))))) ){ 
  
closureN_type c_737370;
object e_737790 [3];
c_737370.hdr.mark = gc_color_red;
 c_737370.hdr.grayed = 0;
c_737370.tag = closureN_tag;
 c_737370.fn = (function_type)__lambda_160;
c_737370.num_args = 1;
c_737370.num_elements = 3;
c_737370.elements = (object *)e_737790;
c_737370.elements[0] = k_733503;
c_737370.elements[1] = ((closureN)self_734746)->elements[0];
c_737370.elements[2] = ((closureN)self_734746)->elements[1];

return_closcall2(data,  ((closureN)self_734746)->elements[0],  &c_737370, quote_let);
} else { 
  return_direct_with_clo1(data,  k_733503, (((closure)  k_733503)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733503, (((closure)  k_733503)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733503, (((closure)  k_733503)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733503, (((closure)  k_733503)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733503, (((closure)  k_733503)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733503, (((closure)  k_733503)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733503, (((closure)  k_733503)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733503, (((closure)  k_733503)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733503, (((closure)  k_733503)->fn),  boolean_f);}
;; 
}

static void __lambda_160(void *data, object self_734747, int argc, object *args) /* object self_734747, object r_733528 */
 {
 object r_733528 = args[0];
  
closureN_type c_737373;
object e_737789 [4];
c_737373.hdr.mark = gc_color_red;
 c_737373.hdr.grayed = 0;
c_737373.tag = closureN_tag;
 c_737373.fn = (function_type)__lambda_161;
c_737373.num_args = 1;
c_737373.num_elements = 4;
c_737373.elements = (object *)e_737789;
c_737373.elements[0] = ((closureN)self_734747)->elements[0];
c_737373.elements[1] = r_733528;
c_737373.elements[2] = ((closureN)self_734747)->elements[1];
c_737373.elements[3] = ((closureN)self_734747)->elements[2];

return_closcall2(data,  ((closureN)self_734747)->elements[1],  &c_737373, quote_check_91type);; 
}

static void __lambda_161(void *data, object self_734748, int argc, object *args) /* object self_734748, object r_733588 */
 {
 object r_733588 = args[0];
  
closureN_type c_737376;
object e_737788 [5];
c_737376.hdr.mark = gc_color_red;
 c_737376.hdr.grayed = 0;
c_737376.tag = closureN_tag;
 c_737376.fn = (function_type)__lambda_162;
c_737376.num_args = 1;
c_737376.num_elements = 5;
c_737376.elements = (object *)e_737788;
c_737376.elements[0] = ((closureN)self_734748)->elements[0];
c_737376.elements[1] = ((closureN)self_734748)->elements[1];
c_737376.elements[2] = r_733588;
c_737376.elements[3] = ((closureN)self_734748)->elements[2];
c_737376.elements[4] = ((closureN)self_734748)->elements[3];

return_closcall2(data,  ((closureN)self_734748)->elements[2],  &c_737376, quote_vector_127);; 
}

static void __lambda_162(void *data, object self_734749, int argc, object *args) /* object self_734749, object r_733591 */
 {
 object r_733591 = args[0];
  
closureN_type c_737378;
object e_737783 [6];
c_737378.hdr.mark = gc_color_red;
 c_737378.hdr.grayed = 0;
c_737378.tag = closureN_tag;
 c_737378.fn = (function_type)__lambda_163;
c_737378.num_args = 1;
c_737378.num_elements = 6;
c_737378.elements = (object *)e_737783;
c_737378.elements[0] = ((closureN)self_734749)->elements[0];
c_737378.elements[1] = ((closureN)self_734749)->elements[1];
c_737378.elements[2] = ((closureN)self_734749)->elements[2];
c_737378.elements[3] = r_733591;
c_737378.elements[4] = ((closureN)self_734749)->elements[3];
c_737378.elements[5] = ((closureN)self_734749)->elements[4];




make_pair(c_737787,quote__127callee,NULL);c_737787.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737378, Cyc_car(data, ((closureN)self_734749)->elements[4]), NULL, &c_737787);; 
}

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






make_pair(c_737782,quote__127callee,NULL);c_737782.hdr.immutable = 1;

make_pair(c_737781,quote__127vec,&c_737782);c_737781.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737380, Cyc_car(data, Cyc_cdr(data, ((closureN)self_734750)->elements[5])), r_733594, &c_737781);; 
}

static void __lambda_164(void *data, object self_734751, int argc, object *args) /* object self_734751, object r_733592 */
 {
 object r_733592 = args[0];
  
closureN_type c_737382;
object e_737770 [5];
c_737382.hdr.mark = gc_color_red;
 c_737382.hdr.grayed = 0;
c_737382.tag = closureN_tag;
 c_737382.fn = (function_type)__lambda_165;
c_737382.num_args = 1;
c_737382.num_elements = 5;
c_737382.elements = (object *)e_737770;
c_737382.elements[0] = ((closureN)self_734751)->elements[0];
c_737382.elements[1] = ((closureN)self_734751)->elements[1];
c_737382.elements[2] = ((closureN)self_734751)->elements[2];
c_737382.elements[3] = ((closureN)self_734751)->elements[4];
c_737382.elements[4] = ((closureN)self_734751)->elements[5];


make_pair(c_737774,quote__127callee,NULL);c_737774.hdr.immutable = 1;

make_pair(c_737773,quote__127vec,&c_737774);c_737773.hdr.immutable = 1;

make_pair(c_737772,quote_vector_127,&c_737773);c_737772.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737382, ((closureN)self_734751)->elements[3], r_733592, &c_737772);; 
}

static void __lambda_165(void *data, object self_734752, int argc, object *args) /* object self_734752, object r_733589 */
 {
 object r_733589 = args[0];
  
closureN_type c_737384;
object e_737764 [4];
c_737384.hdr.mark = gc_color_red;
 c_737384.hdr.grayed = 0;
c_737384.tag = closureN_tag;
 c_737384.fn = (function_type)__lambda_166;
c_737384.num_args = 1;
c_737384.num_elements = 4;
c_737384.elements = (object *)e_737764;
c_737384.elements[0] = ((closureN)self_734752)->elements[0];
c_737384.elements[1] = ((closureN)self_734752)->elements[1];
c_737384.elements[2] = ((closureN)self_734752)->elements[3];
c_737384.elements[3] = ((closureN)self_734752)->elements[4];


make_pair(c_737769,quote__127callee,NULL);c_737769.hdr.immutable = 1;

make_pair(c_737768,quote__127vec,&c_737769);c_737768.hdr.immutable = 1;

make_pair(c_737767,quote_vector_127,&c_737768);c_737767.hdr.immutable = 1;

make_pair(c_737766,quote_check_91type,&c_737767);c_737766.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737384, ((closureN)self_734752)->elements[2], r_733589, &c_737766);; 
}

static void __lambda_166(void *data, object self_734753, int argc, object *args) /* object self_734753, object r_733585 */
 {
 object r_733585 = args[0];
  
closureN_type c_737386;
object e_737758 [4];
c_737386.hdr.mark = gc_color_red;
 c_737386.hdr.grayed = 0;
c_737386.tag = closureN_tag;
 c_737386.fn = (function_type)__lambda_167;
c_737386.num_args = 1;
c_737386.num_elements = 4;
c_737386.elements = (object *)e_737758;
c_737386.elements[0] = ((closureN)self_734753)->elements[0];
c_737386.elements[1] = ((closureN)self_734753)->elements[1];
c_737386.elements[2] = ((closureN)self_734753)->elements[2];
c_737386.elements[3] = ((closureN)self_734753)->elements[3];


make_pair(c_737763,quote__127callee,NULL);c_737763.hdr.immutable = 1;

make_pair(c_737762,quote__127vec,&c_737763);c_737762.hdr.immutable = 1;

make_pair(c_737761,quote_vector_127,&c_737762);c_737761.hdr.immutable = 1;

make_pair(c_737760,quote_check_91type,&c_737761);c_737760.hdr.immutable = 1;

make_pair(c_737759,&c_737760,NULL);c_737759.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737386, r_733585, NULL, &c_737759);; 
}

static void __lambda_167(void *data, object self_734754, int argc, object *args) /* object self_734754, object r_733583 */
 {
 object r_733583 = args[0];
  
closureN_type c_737388;
object e_737746 [4];
c_737388.hdr.mark = gc_color_red;
 c_737388.hdr.grayed = 0;
c_737388.tag = closureN_tag;
 c_737388.fn = (function_type)__lambda_168;
c_737388.num_args = 1;
c_737388.num_elements = 4;
c_737388.elements = (object *)e_737746;
c_737388.elements[0] = ((closureN)self_734754)->elements[0];
c_737388.elements[1] = ((closureN)self_734754)->elements[1];
c_737388.elements[2] = ((closureN)self_734754)->elements[2];
c_737388.elements[3] = ((closureN)self_734754)->elements[3];






make_pair(c_737757,quote__127callee,NULL);c_737757.hdr.immutable = 1;

make_pair(c_737756,quote__127vec,&c_737757);c_737756.hdr.immutable = 1;

make_pair(c_737755,quote_vector_127,&c_737756);c_737755.hdr.immutable = 1;

make_pair(c_737754,quote_check_91type,&c_737755);c_737754.hdr.immutable = 1;

make_pair(c_737753,&c_737754,NULL);c_737753.hdr.immutable = 1;

make_pair(c_737752,quote__127vec,&c_737753);c_737752.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737388, Cyc_car(data, Cyc_cdr(data, ((closureN)self_734754)->elements[3])), r_733583, &c_737752);; 
}

static void __lambda_168(void *data, object self_734755, int argc, object *args) /* object self_734755, object r_733580 */
 {
 object r_733580 = args[0];
  
closureN_type c_737390;
object e_737738 [4];
c_737390.hdr.mark = gc_color_red;
 c_737390.hdr.grayed = 0;
c_737390.tag = closureN_tag;
 c_737390.fn = (function_type)__lambda_169;
c_737390.num_args = 1;
c_737390.num_elements = 4;
c_737390.elements = (object *)e_737738;
c_737390.elements[0] = ((closureN)self_734755)->elements[0];
c_737390.elements[1] = ((closureN)self_734755)->elements[1];
c_737390.elements[2] = ((closureN)self_734755)->elements[2];
c_737390.elements[3] = ((closureN)self_734755)->elements[3];


make_pair(c_737745,quote__127callee,NULL);c_737745.hdr.immutable = 1;

make_pair(c_737744,quote__127vec,&c_737745);c_737744.hdr.immutable = 1;

make_pair(c_737743,quote_vector_127,&c_737744);c_737743.hdr.immutable = 1;

make_pair(c_737742,quote_check_91type,&c_737743);c_737742.hdr.immutable = 1;

make_pair(c_737741,&c_737742,NULL);c_737741.hdr.immutable = 1;

make_pair(c_737740,quote__127vec,&c_737741);c_737740.hdr.immutable = 1;

make_pair(c_737739,&c_737740,NULL);c_737739.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737390, r_733580, NULL, &c_737739);; 
}

static void __lambda_169(void *data, object self_734756, int argc, object *args) /* object self_734756, object r_733531 */
 {
 object r_733531 = args[0];
  
closureN_type c_737393;
object e_737737 [5];
c_737393.hdr.mark = gc_color_red;
 c_737393.hdr.grayed = 0;
c_737393.tag = closureN_tag;
 c_737393.fn = (function_type)__lambda_170;
c_737393.num_args = 1;
c_737393.num_elements = 5;
c_737393.elements = (object *)e_737737;
c_737393.elements[0] = ((closureN)self_734756)->elements[0];
c_737393.elements[1] = ((closureN)self_734756)->elements[1];
c_737393.elements[2] = r_733531;
c_737393.elements[3] = ((closureN)self_734756)->elements[2];
c_737393.elements[4] = ((closureN)self_734756)->elements[3];

return_closcall2(data,  ((closureN)self_734756)->elements[2],  &c_737393, quote_receive);; 
}

static void __lambda_170(void *data, object self_734757, int argc, object *args) /* object self_734757, object r_733537 */
 {
 object r_733537 = args[0];
  
closureN_type c_737395;
object e_737722 [6];
c_737395.hdr.mark = gc_color_red;
 c_737395.hdr.grayed = 0;
c_737395.tag = closureN_tag;
 c_737395.fn = (function_type)__lambda_171;
c_737395.num_args = 1;
c_737395.num_elements = 6;
c_737395.elements = (object *)e_737722;
c_737395.elements[0] = ((closureN)self_734757)->elements[0];
c_737395.elements[1] = ((closureN)self_734757)->elements[1];
c_737395.elements[2] = ((closureN)self_734757)->elements[2];
c_737395.elements[3] = r_733537;
c_737395.elements[4] = ((closureN)self_734757)->elements[3];
c_737395.elements[5] = ((closureN)self_734757)->elements[4];














make_pair(c_737736,quote__127end,NULL);c_737736.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737395, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734757)->elements[4])))))), NULL, &c_737736);; 
}

static void __lambda_171(void *data, object self_734758, int argc, object *args) /* object self_734758, object r_733575 */
 {
 object r_733575 = args[0];
  
closureN_type c_737397;
object e_737708 [6];
c_737397.hdr.mark = gc_color_red;
 c_737397.hdr.grayed = 0;
c_737397.tag = closureN_tag;
 c_737397.fn = (function_type)__lambda_172;
c_737397.num_args = 1;
c_737397.num_elements = 6;
c_737397.elements = (object *)e_737708;
c_737397.elements[0] = ((closureN)self_734758)->elements[0];
c_737397.elements[1] = ((closureN)self_734758)->elements[1];
c_737397.elements[2] = ((closureN)self_734758)->elements[2];
c_737397.elements[3] = ((closureN)self_734758)->elements[3];
c_737397.elements[4] = ((closureN)self_734758)->elements[4];
c_737397.elements[5] = ((closureN)self_734758)->elements[5];












make_pair(c_737721,quote__127end,NULL);c_737721.hdr.immutable = 1;

make_pair(c_737720,quote__127start,&c_737721);c_737720.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737397, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734758)->elements[5]))))), r_733575, &c_737720);; 
}

static void __lambda_172(void *data, object self_734759, int argc, object *args) /* object self_734759, object r_733540 */
 {
 object r_733540 = args[0];
  
closureN_type c_737400;
object e_737707 [7];
c_737400.hdr.mark = gc_color_red;
 c_737400.hdr.grayed = 0;
c_737400.tag = closureN_tag;
 c_737400.fn = (function_type)__lambda_173;
c_737400.num_args = 1;
c_737400.num_elements = 7;
c_737400.elements = (object *)e_737707;
c_737400.elements[0] = ((closureN)self_734759)->elements[0];
c_737400.elements[1] = ((closureN)self_734759)->elements[1];
c_737400.elements[2] = ((closureN)self_734759)->elements[2];
c_737400.elements[3] = ((closureN)self_734759)->elements[3];
c_737400.elements[4] = r_733540;
c_737400.elements[5] = ((closureN)self_734759)->elements[4];
c_737400.elements[6] = ((closureN)self_734759)->elements[5];

return_closcall2(data,  ((closureN)self_734759)->elements[4],  &c_737400, quote_vector_91parse_91start_87end);; 
}

static void __lambda_173(void *data, object self_734760, int argc, object *args) /* object self_734760, object r_733547 */
 {
 object r_733547 = args[0];
  
closureN_type c_737403;
object e_737706 [8];
c_737403.hdr.mark = gc_color_red;
 c_737403.hdr.grayed = 0;
c_737403.tag = closureN_tag;
 c_737403.fn = (function_type)__lambda_174;
c_737403.num_args = 1;
c_737403.num_elements = 8;
c_737403.elements = (object *)e_737706;
c_737403.elements[0] = ((closureN)self_734760)->elements[0];
c_737403.elements[1] = ((closureN)self_734760)->elements[1];
c_737403.elements[2] = ((closureN)self_734760)->elements[2];
c_737403.elements[3] = ((closureN)self_734760)->elements[3];
c_737403.elements[4] = ((closureN)self_734760)->elements[4];
c_737403.elements[5] = r_733547;
c_737403.elements[6] = ((closureN)self_734760)->elements[5];
c_737403.elements[7] = ((closureN)self_734760)->elements[6];

return_closcall2(data,  ((closureN)self_734760)->elements[5],  &c_737403, quote_quote);; 
}

static void __lambda_174(void *data, object self_734761, int argc, object *args) /* object self_734761, object r_733568 */
 {
 object r_733568 = args[0];
  
closureN_type c_737405;
object e_737693 [9];
c_737405.hdr.mark = gc_color_red;
 c_737405.hdr.grayed = 0;
c_737405.tag = closureN_tag;
 c_737405.fn = (function_type)__lambda_175;
c_737405.num_args = 1;
c_737405.num_elements = 9;
c_737405.elements = (object *)e_737693;
c_737405.elements[0] = ((closureN)self_734761)->elements[0];
c_737405.elements[1] = ((closureN)self_734761)->elements[1];
c_737405.elements[2] = ((closureN)self_734761)->elements[2];
c_737405.elements[3] = ((closureN)self_734761)->elements[3];
c_737405.elements[4] = ((closureN)self_734761)->elements[4];
c_737405.elements[5] = ((closureN)self_734761)->elements[5];
c_737405.elements[6] = r_733568;
c_737405.elements[7] = ((closureN)self_734761)->elements[6];
c_737405.elements[8] = ((closureN)self_734761)->elements[7];












make_pair(c_737705,quote__127start,NULL);c_737705.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737405, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734761)->elements[7]))))), NULL, &c_737705);; 
}

static void __lambda_175(void *data, object self_734762, int argc, object *args) /* object self_734762, object r_733569 */
 {
 object r_733569 = args[0];
  
closureN_type c_737407;
object e_737689 [8];
c_737407.hdr.mark = gc_color_red;
 c_737407.hdr.grayed = 0;
c_737407.tag = closureN_tag;
 c_737407.fn = (function_type)__lambda_176;
c_737407.num_args = 1;
c_737407.num_elements = 8;
c_737407.elements = (object *)e_737689;
c_737407.elements[0] = ((closureN)self_734762)->elements[0];
c_737407.elements[1] = ((closureN)self_734762)->elements[1];
c_737407.elements[2] = ((closureN)self_734762)->elements[2];
c_737407.elements[3] = ((closureN)self_734762)->elements[3];
c_737407.elements[4] = ((closureN)self_734762)->elements[4];
c_737407.elements[5] = ((closureN)self_734762)->elements[5];
c_737407.elements[6] = ((closureN)self_734762)->elements[7];
c_737407.elements[7] = ((closureN)self_734762)->elements[8];


make_pair(c_737692,quote__127start,NULL);c_737692.hdr.immutable = 1;

make_pair(c_737691,quote_quote,&c_737692);c_737691.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737407, ((closureN)self_734762)->elements[6], r_733569, &c_737691);; 
}

static void __lambda_176(void *data, object self_734763, int argc, object *args) /* object self_734763, object r_733554 */
 {
 object r_733554 = args[0];
  
closureN_type c_737410;
object e_737688 [8];
c_737410.hdr.mark = gc_color_red;
 c_737410.hdr.grayed = 0;
c_737410.tag = closureN_tag;
 c_737410.fn = (function_type)__lambda_177;
c_737410.num_args = 1;
c_737410.num_elements = 8;
c_737410.elements = (object *)e_737688;
c_737410.elements[0] = ((closureN)self_734763)->elements[0];
c_737410.elements[1] = ((closureN)self_734763)->elements[1];
c_737410.elements[2] = ((closureN)self_734763)->elements[2];
c_737410.elements[3] = ((closureN)self_734763)->elements[3];
c_737410.elements[4] = ((closureN)self_734763)->elements[4];
c_737410.elements[5] = ((closureN)self_734763)->elements[5];
c_737410.elements[6] = r_733554;
c_737410.elements[7] = ((closureN)self_734763)->elements[7];

return_closcall2(data,  ((closureN)self_734763)->elements[6],  &c_737410, quote_quote);; 
}

static void __lambda_177(void *data, object self_734764, int argc, object *args) /* object self_734764, object r_733562 */
 {
 object r_733562 = args[0];
  
closureN_type c_737412;
object e_737673 [9];
c_737412.hdr.mark = gc_color_red;
 c_737412.hdr.grayed = 0;
c_737412.tag = closureN_tag;
 c_737412.fn = (function_type)__lambda_178;
c_737412.num_args = 1;
c_737412.num_elements = 9;
c_737412.elements = (object *)e_737673;
c_737412.elements[0] = ((closureN)self_734764)->elements[0];
c_737412.elements[1] = ((closureN)self_734764)->elements[1];
c_737412.elements[2] = ((closureN)self_734764)->elements[2];
c_737412.elements[3] = ((closureN)self_734764)->elements[3];
c_737412.elements[4] = ((closureN)self_734764)->elements[4];
c_737412.elements[5] = ((closureN)self_734764)->elements[5];
c_737412.elements[6] = ((closureN)self_734764)->elements[6];
c_737412.elements[7] = r_733562;
c_737412.elements[8] = ((closureN)self_734764)->elements[7];














make_pair(c_737687,quote__127end,NULL);c_737687.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737412, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734764)->elements[7])))))), NULL, &c_737687);; 
}

static void __lambda_178(void *data, object self_734765, int argc, object *args) /* object self_734765, object r_733563 */
 {
 object r_733563 = args[0];
  
closureN_type c_737414;
object e_737669 [8];
c_737414.hdr.mark = gc_color_red;
 c_737414.hdr.grayed = 0;
c_737414.tag = closureN_tag;
 c_737414.fn = (function_type)__lambda_179;
c_737414.num_args = 1;
c_737414.num_elements = 8;
c_737414.elements = (object *)e_737669;
c_737414.elements[0] = ((closureN)self_734765)->elements[0];
c_737414.elements[1] = ((closureN)self_734765)->elements[1];
c_737414.elements[2] = ((closureN)self_734765)->elements[2];
c_737414.elements[3] = ((closureN)self_734765)->elements[3];
c_737414.elements[4] = ((closureN)self_734765)->elements[4];
c_737414.elements[5] = ((closureN)self_734765)->elements[5];
c_737414.elements[6] = ((closureN)self_734765)->elements[6];
c_737414.elements[7] = ((closureN)self_734765)->elements[8];


make_pair(c_737672,quote__127end,NULL);c_737672.hdr.immutable = 1;

make_pair(c_737671,quote_quote,&c_737672);c_737671.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737414, ((closureN)self_734765)->elements[7], r_733563, &c_737671);; 
}

static void __lambda_179(void *data, object self_734766, int argc, object *args) /* object self_734766, object r_733557 */
 {
 object r_733557 = args[0];
  
closureN_type c_737416;
object e_737664 [9];
c_737416.hdr.mark = gc_color_red;
 c_737416.hdr.grayed = 0;
c_737416.tag = closureN_tag;
 c_737416.fn = (function_type)__lambda_180;
c_737416.num_args = 1;
c_737416.num_elements = 9;
c_737416.elements = (object *)e_737664;
c_737416.elements[0] = ((closureN)self_734766)->elements[0];
c_737416.elements[1] = ((closureN)self_734766)->elements[1];
c_737416.elements[2] = ((closureN)self_734766)->elements[2];
c_737416.elements[3] = ((closureN)self_734766)->elements[3];
c_737416.elements[4] = ((closureN)self_734766)->elements[4];
c_737416.elements[5] = ((closureN)self_734766)->elements[5];
c_737416.elements[6] = ((closureN)self_734766)->elements[6];
c_737416.elements[7] = r_733557;
c_737416.elements[8] = ((closureN)self_734766)->elements[7];




make_pair(c_737668,quote__127callee,NULL);c_737668.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737416, Cyc_car(data, ((closureN)self_734766)->elements[7]), NULL, &c_737668);; 
}

static void __lambda_180(void *data, object self_734767, int argc, object *args) /* object self_734767, object r_733558 */
 {
 object r_733558 = args[0];
  
closureN_type c_737418;
object e_737658 [8];
c_737418.hdr.mark = gc_color_red;
 c_737418.hdr.grayed = 0;
c_737418.tag = closureN_tag;
 c_737418.fn = (function_type)__lambda_181;
c_737418.num_args = 1;
c_737418.num_elements = 8;
c_737418.elements = (object *)e_737658;
c_737418.elements[0] = ((closureN)self_734767)->elements[0];
c_737418.elements[1] = ((closureN)self_734767)->elements[1];
c_737418.elements[2] = ((closureN)self_734767)->elements[2];
c_737418.elements[3] = ((closureN)self_734767)->elements[3];
c_737418.elements[4] = ((closureN)self_734767)->elements[4];
c_737418.elements[5] = ((closureN)self_734767)->elements[5];
c_737418.elements[6] = ((closureN)self_734767)->elements[6];
c_737418.elements[7] = ((closureN)self_734767)->elements[8];


make_pair(c_737662,quote__127end,NULL);c_737662.hdr.immutable = 1;

make_pair(c_737661,quote_quote,&c_737662);c_737661.hdr.immutable = 1;

make_pair(c_737663,quote__127callee,NULL);c_737663.hdr.immutable = 1;

make_pair(c_737660,&c_737661,&c_737663);c_737660.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737418, ((closureN)self_734767)->elements[7], r_733558, &c_737660);; 
}

static void __lambda_181(void *data, object self_734768, int argc, object *args) /* object self_734768, object r_733555 */
 {
 object r_733555 = args[0];
  
closureN_type c_737420;
object e_737649 [7];
c_737420.hdr.mark = gc_color_red;
 c_737420.hdr.grayed = 0;
c_737420.tag = closureN_tag;
 c_737420.fn = (function_type)__lambda_182;
c_737420.num_args = 1;
c_737420.num_elements = 7;
c_737420.elements = (object *)e_737649;
c_737420.elements[0] = ((closureN)self_734768)->elements[0];
c_737420.elements[1] = ((closureN)self_734768)->elements[1];
c_737420.elements[2] = ((closureN)self_734768)->elements[2];
c_737420.elements[3] = ((closureN)self_734768)->elements[3];
c_737420.elements[4] = ((closureN)self_734768)->elements[4];
c_737420.elements[5] = ((closureN)self_734768)->elements[5];
c_737420.elements[6] = ((closureN)self_734768)->elements[7];


make_pair(c_737653,quote__127start,NULL);c_737653.hdr.immutable = 1;

make_pair(c_737652,quote_quote,&c_737653);c_737652.hdr.immutable = 1;

make_pair(c_737656,quote__127end,NULL);c_737656.hdr.immutable = 1;

make_pair(c_737655,quote_quote,&c_737656);c_737655.hdr.immutable = 1;

make_pair(c_737657,quote__127callee,NULL);c_737657.hdr.immutable = 1;

make_pair(c_737654,&c_737655,&c_737657);c_737654.hdr.immutable = 1;

make_pair(c_737651,&c_737652,&c_737654);c_737651.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737420, ((closureN)self_734768)->elements[6], r_733555, &c_737651);; 
}

static void __lambda_182(void *data, object self_734769, int argc, object *args) /* object self_734769, object r_733552 */
 {
 object r_733552 = args[0];
  
closureN_type c_737422;
object e_737633 [7];
c_737422.hdr.mark = gc_color_red;
 c_737422.hdr.grayed = 0;
c_737422.tag = closureN_tag;
 c_737422.fn = (function_type)__lambda_183;
c_737422.num_args = 1;
c_737422.num_elements = 7;
c_737422.elements = (object *)e_737633;
c_737422.elements[0] = ((closureN)self_734769)->elements[0];
c_737422.elements[1] = ((closureN)self_734769)->elements[1];
c_737422.elements[2] = ((closureN)self_734769)->elements[2];
c_737422.elements[3] = ((closureN)self_734769)->elements[3];
c_737422.elements[4] = ((closureN)self_734769)->elements[4];
c_737422.elements[5] = ((closureN)self_734769)->elements[5];
c_737422.elements[6] = ((closureN)self_734769)->elements[6];








make_pair(c_737644,quote__127start,NULL);c_737644.hdr.immutable = 1;

make_pair(c_737643,quote_quote,&c_737644);c_737643.hdr.immutable = 1;

make_pair(c_737647,quote__127end,NULL);c_737647.hdr.immutable = 1;

make_pair(c_737646,quote_quote,&c_737647);c_737646.hdr.immutable = 1;

make_pair(c_737648,quote__127callee,NULL);c_737648.hdr.immutable = 1;

make_pair(c_737645,&c_737646,&c_737648);c_737645.hdr.immutable = 1;

make_pair(c_737642,&c_737643,&c_737645);c_737642.hdr.immutable = 1;

make_pair(c_737641,quote__127args,&c_737642);c_737641.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737422, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734769)->elements[6]))), r_733552, &c_737641);; 
}

static void __lambda_183(void *data, object self_734770, int argc, object *args) /* object self_734770, object r_733550 */
 {
 object r_733550 = args[0];
  
closureN_type c_737424;
object e_737618 [7];
c_737424.hdr.mark = gc_color_red;
 c_737424.hdr.grayed = 0;
c_737424.tag = closureN_tag;
 c_737424.fn = (function_type)__lambda_184;
c_737424.num_args = 1;
c_737424.num_elements = 7;
c_737424.elements = (object *)e_737618;
c_737424.elements[0] = ((closureN)self_734770)->elements[0];
c_737424.elements[1] = ((closureN)self_734770)->elements[1];
c_737424.elements[2] = ((closureN)self_734770)->elements[2];
c_737424.elements[3] = ((closureN)self_734770)->elements[3];
c_737424.elements[4] = ((closureN)self_734770)->elements[4];
c_737424.elements[5] = ((closureN)self_734770)->elements[5];
c_737424.elements[6] = ((closureN)self_734770)->elements[6];






make_pair(c_737628,quote__127start,NULL);c_737628.hdr.immutable = 1;

make_pair(c_737627,quote_quote,&c_737628);c_737627.hdr.immutable = 1;

make_pair(c_737631,quote__127end,NULL);c_737631.hdr.immutable = 1;

make_pair(c_737630,quote_quote,&c_737631);c_737630.hdr.immutable = 1;

make_pair(c_737632,quote__127callee,NULL);c_737632.hdr.immutable = 1;

make_pair(c_737629,&c_737630,&c_737632);c_737629.hdr.immutable = 1;

make_pair(c_737626,&c_737627,&c_737629);c_737626.hdr.immutable = 1;

make_pair(c_737625,quote__127args,&c_737626);c_737625.hdr.immutable = 1;

make_pair(c_737624,quote__127vec,&c_737625);c_737624.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737424, Cyc_car(data, Cyc_cdr(data, ((closureN)self_734770)->elements[6])), r_733550, &c_737624);; 
}

static void __lambda_184(void *data, object self_734771, int argc, object *args) /* object self_734771, object r_733548 */
 {
 object r_733548 = args[0];
  
closureN_type c_737426;
object e_737606 [6];
c_737426.hdr.mark = gc_color_red;
 c_737426.hdr.grayed = 0;
c_737426.tag = closureN_tag;
 c_737426.fn = (function_type)__lambda_185;
c_737426.num_args = 1;
c_737426.num_elements = 6;
c_737426.elements = (object *)e_737606;
c_737426.elements[0] = ((closureN)self_734771)->elements[0];
c_737426.elements[1] = ((closureN)self_734771)->elements[1];
c_737426.elements[2] = ((closureN)self_734771)->elements[2];
c_737426.elements[3] = ((closureN)self_734771)->elements[3];
c_737426.elements[4] = ((closureN)self_734771)->elements[4];
c_737426.elements[5] = ((closureN)self_734771)->elements[6];


make_pair(c_737613,quote__127start,NULL);c_737613.hdr.immutable = 1;

make_pair(c_737612,quote_quote,&c_737613);c_737612.hdr.immutable = 1;

make_pair(c_737616,quote__127end,NULL);c_737616.hdr.immutable = 1;

make_pair(c_737615,quote_quote,&c_737616);c_737615.hdr.immutable = 1;

make_pair(c_737617,quote__127callee,NULL);c_737617.hdr.immutable = 1;

make_pair(c_737614,&c_737615,&c_737617);c_737614.hdr.immutable = 1;

make_pair(c_737611,&c_737612,&c_737614);c_737611.hdr.immutable = 1;

make_pair(c_737610,quote__127args,&c_737611);c_737610.hdr.immutable = 1;

make_pair(c_737609,quote__127vec,&c_737610);c_737609.hdr.immutable = 1;

make_pair(c_737608,quote_vector_91parse_91start_87end,&c_737609);c_737608.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737426, ((closureN)self_734771)->elements[5], r_733548, &c_737608);; 
}

static void __lambda_185(void *data, object self_734772, int argc, object *args) /* object self_734772, object r_733543 */
 {
 object r_733543 = args[0];
  
closureN_type c_737428;
object e_737580 [6];
c_737428.hdr.mark = gc_color_red;
 c_737428.hdr.grayed = 0;
c_737428.tag = closureN_tag;
 c_737428.fn = (function_type)__lambda_186;
c_737428.num_args = 1;
c_737428.num_elements = 6;
c_737428.elements = (object *)e_737580;
c_737428.elements[0] = ((closureN)self_734772)->elements[0];
c_737428.elements[1] = ((closureN)self_734772)->elements[1];
c_737428.elements[2] = ((closureN)self_734772)->elements[2];
c_737428.elements[3] = ((closureN)self_734772)->elements[3];
c_737428.elements[4] = ((closureN)self_734772)->elements[4];
c_737428.elements[5] = r_733543;






















make_pair(c_737605,quote__93_93_93,NULL);c_737605.hdr.immutable = 1;

make_pair(c_737604,quote__127body2,&c_737605);c_737604.hdr.immutable = 1;

make_pair(c_737603,quote__127body1,&c_737604);c_737603.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737428, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734772)->elements[5]))))), Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734772)->elements[5]))))), &c_737603);; 
}

static void __lambda_186(void *data, object self_734773, int argc, object *args) /* object self_734773, object r_733544 */
 {
 object r_733544 = args[0];
  
closureN_type c_737430;
object e_737564 [5];
c_737430.hdr.mark = gc_color_red;
 c_737430.hdr.grayed = 0;
c_737430.tag = closureN_tag;
 c_737430.fn = (function_type)__lambda_187;
c_737430.num_args = 1;
c_737430.num_elements = 5;
c_737430.elements = (object *)e_737564;
c_737430.elements[0] = ((closureN)self_734773)->elements[0];
c_737430.elements[1] = ((closureN)self_734773)->elements[1];
c_737430.elements[2] = ((closureN)self_734773)->elements[2];
c_737430.elements[3] = ((closureN)self_734773)->elements[3];
c_737430.elements[4] = ((closureN)self_734773)->elements[4];


make_pair(c_737572,quote__127start,NULL);c_737572.hdr.immutable = 1;

make_pair(c_737571,quote_quote,&c_737572);c_737571.hdr.immutable = 1;

make_pair(c_737575,quote__127end,NULL);c_737575.hdr.immutable = 1;

make_pair(c_737574,quote_quote,&c_737575);c_737574.hdr.immutable = 1;

make_pair(c_737576,quote__127callee,NULL);c_737576.hdr.immutable = 1;

make_pair(c_737573,&c_737574,&c_737576);c_737573.hdr.immutable = 1;

make_pair(c_737570,&c_737571,&c_737573);c_737570.hdr.immutable = 1;

make_pair(c_737569,quote__127args,&c_737570);c_737569.hdr.immutable = 1;

make_pair(c_737568,quote__127vec,&c_737569);c_737568.hdr.immutable = 1;

make_pair(c_737567,quote_vector_91parse_91start_87end,&c_737568);c_737567.hdr.immutable = 1;

make_pair(c_737579,quote__93_93_93,NULL);c_737579.hdr.immutable = 1;

make_pair(c_737578,quote__127body2,&c_737579);c_737578.hdr.immutable = 1;

make_pair(c_737577,quote__127body1,&c_737578);c_737577.hdr.immutable = 1;

make_pair(c_737566,&c_737567,&c_737577);c_737566.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737430, ((closureN)self_734773)->elements[5], r_733544, &c_737566);; 
}

static void __lambda_187(void *data, object self_734774, int argc, object *args) /* object self_734774, object r_733541 */
 {
 object r_733541 = args[0];
  
closureN_type c_737432;
object e_737545 [4];
c_737432.hdr.mark = gc_color_red;
 c_737432.hdr.grayed = 0;
c_737432.tag = closureN_tag;
 c_737432.fn = (function_type)__lambda_188;
c_737432.num_args = 1;
c_737432.num_elements = 4;
c_737432.elements = (object *)e_737545;
c_737432.elements[0] = ((closureN)self_734774)->elements[0];
c_737432.elements[1] = ((closureN)self_734774)->elements[1];
c_737432.elements[2] = ((closureN)self_734774)->elements[2];
c_737432.elements[3] = ((closureN)self_734774)->elements[3];


make_pair(c_737549,quote__127end,NULL);c_737549.hdr.immutable = 1;

make_pair(c_737548,quote__127start,&c_737549);c_737548.hdr.immutable = 1;

make_pair(c_737556,quote__127start,NULL);c_737556.hdr.immutable = 1;

make_pair(c_737555,quote_quote,&c_737556);c_737555.hdr.immutable = 1;

make_pair(c_737559,quote__127end,NULL);c_737559.hdr.immutable = 1;

make_pair(c_737558,quote_quote,&c_737559);c_737558.hdr.immutable = 1;

make_pair(c_737560,quote__127callee,NULL);c_737560.hdr.immutable = 1;

make_pair(c_737557,&c_737558,&c_737560);c_737557.hdr.immutable = 1;

make_pair(c_737554,&c_737555,&c_737557);c_737554.hdr.immutable = 1;

make_pair(c_737553,quote__127args,&c_737554);c_737553.hdr.immutable = 1;

make_pair(c_737552,quote__127vec,&c_737553);c_737552.hdr.immutable = 1;

make_pair(c_737551,quote_vector_91parse_91start_87end,&c_737552);c_737551.hdr.immutable = 1;

make_pair(c_737563,quote__93_93_93,NULL);c_737563.hdr.immutable = 1;

make_pair(c_737562,quote__127body2,&c_737563);c_737562.hdr.immutable = 1;

make_pair(c_737561,quote__127body1,&c_737562);c_737561.hdr.immutable = 1;

make_pair(c_737550,&c_737551,&c_737561);c_737550.hdr.immutable = 1;

make_pair(c_737547,&c_737548,&c_737550);c_737547.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737432, ((closureN)self_734774)->elements[4], r_733541, &c_737547);; 
}

static void __lambda_188(void *data, object self_734775, int argc, object *args) /* object self_734775, object r_733538 */
 {
 object r_733538 = args[0];
  
closureN_type c_737434;
object e_737525 [3];
c_737434.hdr.mark = gc_color_red;
 c_737434.hdr.grayed = 0;
c_737434.tag = closureN_tag;
 c_737434.fn = (function_type)__lambda_189;
c_737434.num_args = 1;
c_737434.num_elements = 3;
c_737434.elements = (object *)e_737525;
c_737434.elements[0] = ((closureN)self_734775)->elements[0];
c_737434.elements[1] = ((closureN)self_734775)->elements[1];
c_737434.elements[2] = ((closureN)self_734775)->elements[2];


make_pair(c_737530,quote__127end,NULL);c_737530.hdr.immutable = 1;

make_pair(c_737529,quote__127start,&c_737530);c_737529.hdr.immutable = 1;

make_pair(c_737537,quote__127start,NULL);c_737537.hdr.immutable = 1;

make_pair(c_737536,quote_quote,&c_737537);c_737536.hdr.immutable = 1;

make_pair(c_737540,quote__127end,NULL);c_737540.hdr.immutable = 1;

make_pair(c_737539,quote_quote,&c_737540);c_737539.hdr.immutable = 1;

make_pair(c_737541,quote__127callee,NULL);c_737541.hdr.immutable = 1;

make_pair(c_737538,&c_737539,&c_737541);c_737538.hdr.immutable = 1;

make_pair(c_737535,&c_737536,&c_737538);c_737535.hdr.immutable = 1;

make_pair(c_737534,quote__127args,&c_737535);c_737534.hdr.immutable = 1;

make_pair(c_737533,quote__127vec,&c_737534);c_737533.hdr.immutable = 1;

make_pair(c_737532,quote_vector_91parse_91start_87end,&c_737533);c_737532.hdr.immutable = 1;

make_pair(c_737544,quote__93_93_93,NULL);c_737544.hdr.immutable = 1;

make_pair(c_737543,quote__127body2,&c_737544);c_737543.hdr.immutable = 1;

make_pair(c_737542,quote__127body1,&c_737543);c_737542.hdr.immutable = 1;

make_pair(c_737531,&c_737532,&c_737542);c_737531.hdr.immutable = 1;

make_pair(c_737528,&c_737529,&c_737531);c_737528.hdr.immutable = 1;

make_pair(c_737527,quote_receive,&c_737528);c_737527.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737434, ((closureN)self_734775)->elements[3], r_733538, &c_737527);; 
}

static void __lambda_189(void *data, object self_734776, int argc, object *args) /* object self_734776, object r_733534 */
 {
 object r_733534 = args[0];
  
closureN_type c_737436;
object e_737505 [3];
c_737436.hdr.mark = gc_color_red;
 c_737436.hdr.grayed = 0;
c_737436.tag = closureN_tag;
 c_737436.fn = (function_type)__lambda_190;
c_737436.num_args = 1;
c_737436.num_elements = 3;
c_737436.elements = (object *)e_737505;
c_737436.elements[0] = ((closureN)self_734776)->elements[0];
c_737436.elements[1] = ((closureN)self_734776)->elements[1];
c_737436.elements[2] = ((closureN)self_734776)->elements[2];


make_pair(c_737510,quote__127end,NULL);c_737510.hdr.immutable = 1;

make_pair(c_737509,quote__127start,&c_737510);c_737509.hdr.immutable = 1;

make_pair(c_737517,quote__127start,NULL);c_737517.hdr.immutable = 1;

make_pair(c_737516,quote_quote,&c_737517);c_737516.hdr.immutable = 1;

make_pair(c_737520,quote__127end,NULL);c_737520.hdr.immutable = 1;

make_pair(c_737519,quote_quote,&c_737520);c_737519.hdr.immutable = 1;

make_pair(c_737521,quote__127callee,NULL);c_737521.hdr.immutable = 1;

make_pair(c_737518,&c_737519,&c_737521);c_737518.hdr.immutable = 1;

make_pair(c_737515,&c_737516,&c_737518);c_737515.hdr.immutable = 1;

make_pair(c_737514,quote__127args,&c_737515);c_737514.hdr.immutable = 1;

make_pair(c_737513,quote__127vec,&c_737514);c_737513.hdr.immutable = 1;

make_pair(c_737512,quote_vector_91parse_91start_87end,&c_737513);c_737512.hdr.immutable = 1;

make_pair(c_737524,quote__93_93_93,NULL);c_737524.hdr.immutable = 1;

make_pair(c_737523,quote__127body2,&c_737524);c_737523.hdr.immutable = 1;

make_pair(c_737522,quote__127body1,&c_737523);c_737522.hdr.immutable = 1;

make_pair(c_737511,&c_737512,&c_737522);c_737511.hdr.immutable = 1;

make_pair(c_737508,&c_737509,&c_737511);c_737508.hdr.immutable = 1;

make_pair(c_737507,quote_receive,&c_737508);c_737507.hdr.immutable = 1;

make_pair(c_737506,&c_737507,NULL);c_737506.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737436, r_733534, NULL, &c_737506);; 
}

static void __lambda_190(void *data, object self_734777, int argc, object *args) /* object self_734777, object r_733532 */
 {
 object r_733532 = args[0];
  
closureN_type c_737438;
object e_737476 [2];
c_737438.hdr.mark = gc_color_red;
 c_737438.hdr.grayed = 0;
c_737438.tag = closureN_tag;
 c_737438.fn = (function_type)__lambda_191;
c_737438.num_args = 1;
c_737438.num_elements = 2;
c_737438.elements = (object *)e_737476;
c_737438.elements[0] = ((closureN)self_734777)->elements[0];
c_737438.elements[1] = ((closureN)self_734777)->elements[1];


make_pair(c_737485,quote__127callee,NULL);c_737485.hdr.immutable = 1;

make_pair(c_737484,quote__127vec,&c_737485);c_737484.hdr.immutable = 1;

make_pair(c_737483,quote_vector_127,&c_737484);c_737483.hdr.immutable = 1;

make_pair(c_737482,quote_check_91type,&c_737483);c_737482.hdr.immutable = 1;

make_pair(c_737481,&c_737482,NULL);c_737481.hdr.immutable = 1;

make_pair(c_737480,quote__127vec,&c_737481);c_737480.hdr.immutable = 1;

make_pair(c_737479,&c_737480,NULL);c_737479.hdr.immutable = 1;

make_pair(c_737490,quote__127end,NULL);c_737490.hdr.immutable = 1;

make_pair(c_737489,quote__127start,&c_737490);c_737489.hdr.immutable = 1;

make_pair(c_737497,quote__127start,NULL);c_737497.hdr.immutable = 1;

make_pair(c_737496,quote_quote,&c_737497);c_737496.hdr.immutable = 1;

make_pair(c_737500,quote__127end,NULL);c_737500.hdr.immutable = 1;

make_pair(c_737499,quote_quote,&c_737500);c_737499.hdr.immutable = 1;

make_pair(c_737501,quote__127callee,NULL);c_737501.hdr.immutable = 1;

make_pair(c_737498,&c_737499,&c_737501);c_737498.hdr.immutable = 1;

make_pair(c_737495,&c_737496,&c_737498);c_737495.hdr.immutable = 1;

make_pair(c_737494,quote__127args,&c_737495);c_737494.hdr.immutable = 1;

make_pair(c_737493,quote__127vec,&c_737494);c_737493.hdr.immutable = 1;

make_pair(c_737492,quote_vector_91parse_91start_87end,&c_737493);c_737492.hdr.immutable = 1;

make_pair(c_737504,quote__93_93_93,NULL);c_737504.hdr.immutable = 1;

make_pair(c_737503,quote__127body2,&c_737504);c_737503.hdr.immutable = 1;

make_pair(c_737502,quote__127body1,&c_737503);c_737502.hdr.immutable = 1;

make_pair(c_737491,&c_737492,&c_737502);c_737491.hdr.immutable = 1;

make_pair(c_737488,&c_737489,&c_737491);c_737488.hdr.immutable = 1;

make_pair(c_737487,quote_receive,&c_737488);c_737487.hdr.immutable = 1;

make_pair(c_737486,&c_737487,NULL);c_737486.hdr.immutable = 1;

make_pair(c_737478,&c_737479,&c_737486);c_737478.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737438, ((closureN)self_734777)->elements[2], r_733532, &c_737478);; 
}

static void __lambda_191(void *data, object self_734778, int argc, object *args) /* object self_734778, object r_733529 */
 {
 object r_733529 = args[0];
  
closureN_type c_737440;
object e_737446 [1];
c_737440.hdr.mark = gc_color_red;
 c_737440.hdr.grayed = 0;
c_737440.tag = closureN_tag;
 c_737440.fn = (function_type)__lambda_192;
c_737440.num_args = 1;
c_737440.num_elements = 1;
c_737440.elements = (object *)e_737446;
c_737440.elements[0] = ((closureN)self_734778)->elements[0];


make_pair(c_737456,quote__127callee,NULL);c_737456.hdr.immutable = 1;

make_pair(c_737455,quote__127vec,&c_737456);c_737455.hdr.immutable = 1;

make_pair(c_737454,quote_vector_127,&c_737455);c_737454.hdr.immutable = 1;

make_pair(c_737453,quote_check_91type,&c_737454);c_737453.hdr.immutable = 1;

make_pair(c_737452,&c_737453,NULL);c_737452.hdr.immutable = 1;

make_pair(c_737451,quote__127vec,&c_737452);c_737451.hdr.immutable = 1;

make_pair(c_737450,&c_737451,NULL);c_737450.hdr.immutable = 1;

make_pair(c_737461,quote__127end,NULL);c_737461.hdr.immutable = 1;

make_pair(c_737460,quote__127start,&c_737461);c_737460.hdr.immutable = 1;

make_pair(c_737468,quote__127start,NULL);c_737468.hdr.immutable = 1;

make_pair(c_737467,quote_quote,&c_737468);c_737467.hdr.immutable = 1;

make_pair(c_737471,quote__127end,NULL);c_737471.hdr.immutable = 1;

make_pair(c_737470,quote_quote,&c_737471);c_737470.hdr.immutable = 1;

make_pair(c_737472,quote__127callee,NULL);c_737472.hdr.immutable = 1;

make_pair(c_737469,&c_737470,&c_737472);c_737469.hdr.immutable = 1;

make_pair(c_737466,&c_737467,&c_737469);c_737466.hdr.immutable = 1;

make_pair(c_737465,quote__127args,&c_737466);c_737465.hdr.immutable = 1;

make_pair(c_737464,quote__127vec,&c_737465);c_737464.hdr.immutable = 1;

make_pair(c_737463,quote_vector_91parse_91start_87end,&c_737464);c_737463.hdr.immutable = 1;

make_pair(c_737475,quote__93_93_93,NULL);c_737475.hdr.immutable = 1;

make_pair(c_737474,quote__127body2,&c_737475);c_737474.hdr.immutable = 1;

make_pair(c_737473,quote__127body1,&c_737474);c_737473.hdr.immutable = 1;

make_pair(c_737462,&c_737463,&c_737473);c_737462.hdr.immutable = 1;

make_pair(c_737459,&c_737460,&c_737462);c_737459.hdr.immutable = 1;

make_pair(c_737458,quote_receive,&c_737459);c_737458.hdr.immutable = 1;

make_pair(c_737457,&c_737458,NULL);c_737457.hdr.immutable = 1;

make_pair(c_737449,&c_737450,&c_737457);c_737449.hdr.immutable = 1;

make_pair(c_737448,quote_let,&c_737449);c_737448.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_737440, ((closureN)self_734778)->elements[1], r_733529, &c_737448);; 
}

static void __lambda_192(void *data, object self_734779, int argc, object *args) /* object self_734779, object r_733527 */
 {
 object r_733527 = args[0];
  
pair_type local_737445; 
return_direct_with_clo1(data,  ((closureN)self_734779)->elements[0], (((closure)  ((closureN)self_734779)->elements[0])->fn),  set_pair_as_expr(&local_737445, r_733527, boolean_f));; 
}

static void __lambda_155(void *data, object _, int argc, object *args) /* closure _,object k_733470, object vec_73423_732474, object args_73424_732475, object start_91name_73425_732476, object end_91name_73426_732477, object callee_73427_732478 */
 {
object k_733470 = args[0]; object vec_73423_732474 = args[1]; object args_73424_732475 = args[2]; object start_91name_73425_732476 = args[3]; object end_91name_73426_732477 = args[4]; object callee_73427_732478 = args[5];
  Cyc_st_add(data, "srfi/133.sld:vector-parse-start+end");

closureN_type c_737207;
object e_737272 [6];
c_737207.hdr.mark = gc_color_red;
 c_737207.hdr.grayed = 0;
c_737207.tag = closureN_tag;
 c_737207.fn = (function_type)__lambda_156;
c_737207.num_args = 1;
c_737207.num_elements = 6;
c_737207.elements = (object *)e_737272;
c_737207.elements[0] = args_73424_732475;
c_737207.elements[1] = callee_73427_732478;
c_737207.elements[2] = end_91name_73426_732477;
c_737207.elements[3] = k_733470;
c_737207.elements[4] = start_91name_73425_732476;
c_737207.elements[5] = vec_73423_732474;



return_direct_with_clo1(data,(closure)&c_737207,__lambda_156,  Cyc_vector_length(data, vec_73423_732474));; 
}

static void __lambda_156(void *data, object self_734740, int argc, object *args) /* object self_734740, object len_73428_732479 */
 {
 object len_73428_732479 = args[0];
    
if( (boolean_f != Cyc_is_null(((closureN)self_734740)->elements[0])) ){ 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734740)->elements[3], obj_int2obj(0), len_73428_732479);
} else { 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_734740)->elements[0]))) ){ 
  

return_direct_with_clo7(data,  __glo_check_91indices_srfi_133, (((closure)  __glo_check_91indices_srfi_133)->fn),  ((closureN)self_734740)->elements[3], ((closureN)self_734740)->elements[5], Cyc_car(data, ((closureN)self_734740)->elements[0]), ((closureN)self_734740)->elements[4], len_73428_732479, ((closureN)self_734740)->elements[2], ((closureN)self_734740)->elements[1]);
} else { 
    
  
if( (boolean_f != Cyc_is_null(Cyc_cddr(data, ((closureN)self_734740)->elements[0]))) ){ 
  



return_direct_with_clo7(data,  __glo_check_91indices_srfi_133, (((closure)  __glo_check_91indices_srfi_133)->fn),  ((closureN)self_734740)->elements[3], ((closureN)self_734740)->elements[5], Cyc_car(data, ((closureN)self_734740)->elements[0]), ((closureN)self_734740)->elements[4], Cyc_cadr(data, ((closureN)self_734740)->elements[0]), ((closureN)self_734740)->elements[2], ((closureN)self_734740)->elements[1]);
} else { 
  
make_utf8_string_with_len(c_737246, "too many arguments", 18, 18);

pair_type local_737249; 

pair_type local_737252; 

pair_type local_737255; 

pair_type local_737258; 



pair_type local_737264; 

pair_type local_737267; 

pair_type local_737270; 
return_direct_with_clo4(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_734740)->elements[3], &c_737246, set_pair_as_expr(&local_737249, quote_extra, set_pair_as_expr(&local_737252, quote_args, set_pair_as_expr(&local_737255, quote_were, set_pair_as_expr(&local_737258, Cyc_cddr(data, ((closureN)self_734740)->elements[0]), NULL)))), set_pair_as_expr(&local_737264, quote__while, set_pair_as_expr(&local_737267, quote_calling, set_pair_as_expr(&local_737270, ((closureN)self_734740)->elements[1], NULL))));}
;}
;}
;; 
}

static void __lambda_141(void *data, object _, int argc, object *args) /* closure _,object k_733391, object vec_73368_732462, object start_73369_732463, object start_91name_73370_732464, object end_73371_732465, object end_91name_73372_732466, object callee_73373_732467 */
 {
object k_733391 = args[0]; object vec_73368_732462 = args[1]; object start_73369_732463 = args[2]; object start_91name_73370_732464 = args[3]; object end_73371_732465 = args[4]; object end_91name_73372_732466 = args[5]; object callee_73373_732467 = args[6];
  Cyc_st_add(data, "srfi/133.sld:check-indices");

closureN_type c_737004;
object e_737151 [7];
c_737004.hdr.mark = gc_color_red;
 c_737004.hdr.grayed = 0;
c_737004.tag = closureN_tag;
 c_737004.fn = (function_type)__lambda_142;
c_737004.num_args = 1;
c_737004.num_elements = 7;
c_737004.elements = (object *)e_737151;
c_737004.elements[0] = callee_73373_732467;
c_737004.elements[1] = end_73371_732465;
c_737004.elements[2] = end_91name_73372_732466;
c_737004.elements[3] = k_733391;
c_737004.elements[4] = start_73369_732463;
c_737004.elements[5] = start_91name_73370_732464;
c_737004.elements[6] = vec_73368_732462;


closureN_type c_737152;
object e_737204 [6];
c_737152.hdr.mark = gc_color_red;
 c_737152.hdr.grayed = 0;
c_737152.tag = closureN_tag;
 c_737152.fn = (function_type)__lambda_153;
c_737152.num_args = 0;
c_737152.num_elements = 6;
c_737152.elements = (object *)e_737204;
c_737152.elements[0] = callee_73373_732467;
c_737152.elements[1] = end_73371_732465;
c_737152.elements[2] = end_91name_73372_732466;
c_737152.elements[3] = start_73369_732463;
c_737152.elements[4] = start_91name_73370_732464;
c_737152.elements[5] = vec_73368_732462;

return_direct_with_clo1(data,(closure)&c_737004,__lambda_142,  &c_737152);; 
}

static void __lambda_153(void *data, object self_734727, int argc, object *args) /* object self_734727, object k_733444, object things_73410_732473_raw, ... */
 {
 object k_733444 = args[0];
load_varargs(things_73410_732473, args, 1, argc - 1);
  
closureN_type c_737154;
object e_737161 [1];
c_737154.hdr.mark = gc_color_red;
 c_737154.hdr.grayed = 0;
c_737154.tag = closureN_tag;
 c_737154.fn = (function_type)__lambda_154;
c_737154.num_args = 1;
c_737154.num_elements = 1;
c_737154.elements = (object *)e_737161;
c_737154.elements[0] = k_733444;


pair_type local_737164; 

pair_type local_737167; 

pair_type local_737170; 

pair_type local_737174; 

pair_type local_737178; 

pair_type local_737181; 

pair_type local_737185; 

pair_type local_737189; 

pair_type local_737192; 

pair_type local_737196; 

pair_type local_737199; 

pair_type local_737202; 
return_direct_with_clo6(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_737154, things_73410_732473, set_pair_as_expr(&local_737164, quote_vector, set_pair_as_expr(&local_737167, quote_was, set_pair_as_expr(&local_737170, ((closureN)self_734727)->elements[5], NULL))), set_pair_as_expr(&local_737174, ((closureN)self_734727)->elements[4], set_pair_as_expr(&local_737178, quote_was, set_pair_as_expr(&local_737181, ((closureN)self_734727)->elements[3], NULL))), set_pair_as_expr(&local_737185, ((closureN)self_734727)->elements[2], set_pair_as_expr(&local_737189, quote_was, set_pair_as_expr(&local_737192, ((closureN)self_734727)->elements[1], NULL))), set_pair_as_expr(&local_737196, quote__while, set_pair_as_expr(&local_737199, quote_calling, set_pair_as_expr(&local_737202, ((closureN)self_734727)->elements[0], NULL))));; 
}

static void __lambda_154(void *data, object self_734728, int argc, object *args) /* object self_734728, object r_733445 */
 {
 object r_733445 = args[0];
  
make_utf8_string_with_len(c_737160, "vector range out of bounds", 26, 26);

object c_737159 = apply_va(data,  ((closureN)self_734728)->elements[0],3,__glo_error_scheme_base, &c_737160, r_733445);
return_direct_with_clo1(data,  ((closureN)self_734728)->elements[0], (((closure)  ((closureN)self_734728)->elements[0])->fn),  c_737159);; 
}

static void __lambda_142(void *data, object self_734729, int argc, object *args) /* object self_734729, object r_733392 */
 {
 object r_733392 = args[0];
  
closureN_type c_737006;
object e_737148 [7];
c_737006.hdr.mark = gc_color_red;
 c_737006.hdr.grayed = 0;
c_737006.tag = closureN_tag;
 c_737006.fn = (function_type)__lambda_143;
c_737006.num_args = 1;
c_737006.num_elements = 7;
c_737006.elements = (object *)e_737148;
c_737006.elements[0] = ((closureN)self_734729)->elements[0];
c_737006.elements[1] = ((closureN)self_734729)->elements[1];
c_737006.elements[2] = ((closureN)self_734729)->elements[2];
c_737006.elements[3] = ((closureN)self_734729)->elements[3];
c_737006.elements[4] = r_733392;
c_737006.elements[5] = ((closureN)self_734729)->elements[5];
c_737006.elements[6] = ((closureN)self_734729)->elements[6];

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_737006, primitive_integer_127, ((closureN)self_734729)->elements[4], ((closureN)self_734729)->elements[0]);; 
}

static void __lambda_143(void *data, object self_734730, int argc, object *args) /* object self_734730, object r_733393 */
 {
 object r_733393 = args[0];
  
closureN_type c_737008;
object e_737145 [7];
c_737008.hdr.mark = gc_color_red;
 c_737008.hdr.grayed = 0;
c_737008.tag = closureN_tag;
 c_737008.fn = (function_type)__lambda_144;
c_737008.num_args = 1;
c_737008.num_elements = 7;
c_737008.elements = (object *)e_737145;
c_737008.elements[0] = ((closureN)self_734730)->elements[0];
c_737008.elements[1] = ((closureN)self_734730)->elements[2];
c_737008.elements[2] = ((closureN)self_734730)->elements[3];
c_737008.elements[3] = ((closureN)self_734730)->elements[4];
c_737008.elements[4] = r_733393;
c_737008.elements[5] = ((closureN)self_734730)->elements[5];
c_737008.elements[6] = ((closureN)self_734730)->elements[6];

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_737008, primitive_integer_127, ((closureN)self_734730)->elements[1], ((closureN)self_734730)->elements[0]);; 
}

static void __lambda_144(void *data, object self_734731, int argc, object *args) /* object self_734731, object r_733394 */
 {
 object r_733394 = args[0];
  
closureN_type c_737010;
object e_737142 [5];
c_737010.hdr.mark = gc_color_red;
 c_737010.hdr.grayed = 0;
c_737010.tag = closureN_tag;
 c_737010.fn = (function_type)__lambda_145;
c_737010.num_args = 3;
c_737010.num_elements = 5;
c_737010.elements = (object *)e_737142;
c_737010.elements[0] = ((closureN)self_734731)->elements[0];
c_737010.elements[1] = ((closureN)self_734731)->elements[1];
c_737010.elements[2] = ((closureN)self_734731)->elements[2];
c_737010.elements[3] = ((closureN)self_734731)->elements[5];
c_737010.elements[4] = ((closureN)self_734731)->elements[6];

return_direct_with_clo3(data,(closure)&c_737010,__lambda_145,  ((closureN)self_734731)->elements[3], ((closureN)self_734731)->elements[4], r_733394);; 
}

static void __lambda_145(void *data, object self_734732, int argc, object *args) /* object self_734732, object lose_73374_732468, object start_73375_732469, object end_73376_732470 */
 {
 object lose_73374_732468 = args[0]; object start_73375_732469 = args[1]; object end_73376_732470 = args[2];
    
if( (boolean_f != Cyc_num_fast_gt_op(data, start_73375_732469, end_73376_732470)) ){ 
  
closureN_type c_737014;
object e_737028 [5];
c_737014.hdr.mark = gc_color_red;
 c_737014.hdr.grayed = 0;
c_737014.tag = closureN_tag;
 c_737014.fn = (function_type)__lambda_146;
c_737014.num_args = 1;
c_737014.num_elements = 5;
c_737014.elements = (object *)e_737028;
c_737014.elements[0] = ((closureN)self_734732)->elements[0];
c_737014.elements[1] = ((closureN)self_734732)->elements[1];
c_737014.elements[2] = ((closureN)self_734732)->elements[2];
c_737014.elements[3] = ((closureN)self_734732)->elements[3];
c_737014.elements[4] = ((closureN)self_734732)->elements[4];


closureN_type c_737029;
object e_737043 [3];
c_737029.hdr.mark = gc_color_red;
 c_737029.hdr.grayed = 0;
c_737029.tag = closureN_tag;
 c_737029.fn = (function_type)__lambda_149;
c_737029.num_args = 0;
c_737029.num_elements = 3;
c_737029.elements = (object *)e_737043;
c_737029.elements[0] = ((closureN)self_734732)->elements[1];
c_737029.elements[1] = lose_73374_732468;
c_737029.elements[2] = ((closureN)self_734732)->elements[3];

return_direct_with_clo1(data,(closure)&c_737014,__lambda_146,  &c_737029);
} else { 
    
if( (boolean_f != Cyc_num_fast_lt_op(data, start_73375_732469, obj_int2obj(0))) ){ 
  
closureN_type c_737047;
object e_737055 [6];
c_737047.hdr.mark = gc_color_red;
 c_737047.hdr.grayed = 0;
c_737047.tag = closureN_tag;
 c_737047.fn = (function_type)__lambda_150;
c_737047.num_args = 1;
c_737047.num_elements = 6;
c_737047.elements = (object *)e_737055;
c_737047.elements[0] = ((closureN)self_734732)->elements[0];
c_737047.elements[1] = end_73376_732470;
c_737047.elements[2] = ((closureN)self_734732)->elements[1];
c_737047.elements[3] = ((closureN)self_734732)->elements[2];
c_737047.elements[4] = ((closureN)self_734732)->elements[3];
c_737047.elements[5] = ((closureN)self_734732)->elements[4];


pair_type local_737058; 

pair_type local_737062; 

pair_type local_737065; 
return_closcall2(data,  lose_73374_732468,  &c_737047, set_pair_as_expr(&local_737058, ((closureN)self_734732)->elements[3], set_pair_as_expr(&local_737062, quote__121, set_pair_as_expr(&local_737065, obj_int2obj(0), NULL))));
} else { 
    
  
if( (boolean_f != Cyc_num_fast_gte_op(data, start_73375_732469, Cyc_vector_length(data, ((closureN)self_734732)->elements[4]))) ){ 
  
closureN_type c_737072;
object e_737080 [6];
c_737072.hdr.mark = gc_color_red;
 c_737072.hdr.grayed = 0;
c_737072.tag = closureN_tag;
 c_737072.fn = (function_type)__lambda_151;
c_737072.num_args = 1;
c_737072.num_elements = 6;
c_737072.elements = (object *)e_737080;
c_737072.elements[0] = ((closureN)self_734732)->elements[0];
c_737072.elements[1] = end_73376_732470;
c_737072.elements[2] = ((closureN)self_734732)->elements[1];
c_737072.elements[3] = ((closureN)self_734732)->elements[2];
c_737072.elements[4] = ((closureN)self_734732)->elements[3];
c_737072.elements[5] = ((closureN)self_734732)->elements[4];


pair_type local_737083; 

pair_type local_737087; 

pair_type local_737090; 

pair_type local_737093; 

pair_type local_737096; 

pair_type local_737099; 


return_closcall3(data,  lose_73374_732468,  &c_737072, set_pair_as_expr(&local_737083, ((closureN)self_734732)->elements[3], set_pair_as_expr(&local_737087, quote__125, set_pair_as_expr(&local_737090, quote_len, NULL))), set_pair_as_expr(&local_737093, quote_len, set_pair_as_expr(&local_737096, quote_was, set_pair_as_expr(&local_737099, Cyc_vector_length(data, ((closureN)self_734732)->elements[4]), NULL))));
} else { 
    
  
if( (boolean_f != Cyc_num_fast_gt_op(data, end_73376_732470, Cyc_vector_length(data, ((closureN)self_734732)->elements[4]))) ){ 
  
closureN_type c_737109;
object e_737117 [6];
c_737109.hdr.mark = gc_color_red;
 c_737109.hdr.grayed = 0;
c_737109.tag = closureN_tag;
 c_737109.fn = (function_type)__lambda_152;
c_737109.num_args = 1;
c_737109.num_elements = 6;
c_737109.elements = (object *)e_737117;
c_737109.elements[0] = ((closureN)self_734732)->elements[0];
c_737109.elements[1] = ((closureN)self_734732)->elements[1];
c_737109.elements[2] = ((closureN)self_734732)->elements[2];
c_737109.elements[3] = start_73375_732469;
c_737109.elements[4] = ((closureN)self_734732)->elements[3];
c_737109.elements[5] = ((closureN)self_734732)->elements[4];


pair_type local_737120; 

pair_type local_737124; 

pair_type local_737127; 

pair_type local_737130; 

pair_type local_737133; 

pair_type local_737136; 


return_closcall3(data,  lose_73374_732468,  &c_737109, set_pair_as_expr(&local_737120, ((closureN)self_734732)->elements[1], set_pair_as_expr(&local_737124, quote__125, set_pair_as_expr(&local_737127, quote_len, NULL))), set_pair_as_expr(&local_737130, quote_len, set_pair_as_expr(&local_737133, quote_was, set_pair_as_expr(&local_737136, Cyc_vector_length(data, ((closureN)self_734732)->elements[4]), NULL))));
} else { 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734732)->elements[2], start_73375_732469, end_73376_732470);}
;}
;}
;}
;; 
}

static void __lambda_152(void *data, object self_734739, int argc, object *args) /* object self_734739, object r_733428 */
 {
 object r_733428 = args[0];
  return_direct_with_clo7(data,  __glo_check_91indices_srfi_133, (((closure)  __glo_check_91indices_srfi_133)->fn),  ((closureN)self_734739)->elements[2], ((closureN)self_734739)->elements[5], ((closureN)self_734739)->elements[3], ((closureN)self_734739)->elements[4], r_733428, ((closureN)self_734739)->elements[1], ((closureN)self_734739)->elements[0]);; 
}

static void __lambda_151(void *data, object self_734738, int argc, object *args) /* object self_734738, object r_733413 */
 {
 object r_733413 = args[0];
  return_direct_with_clo7(data,  __glo_check_91indices_srfi_133, (((closure)  __glo_check_91indices_srfi_133)->fn),  ((closureN)self_734738)->elements[3], ((closureN)self_734738)->elements[5], r_733413, ((closureN)self_734738)->elements[4], ((closureN)self_734738)->elements[1], ((closureN)self_734738)->elements[2], ((closureN)self_734738)->elements[0]);; 
}

static void __lambda_150(void *data, object self_734737, int argc, object *args) /* object self_734737, object r_733406 */
 {
 object r_733406 = args[0];
  return_direct_with_clo7(data,  __glo_check_91indices_srfi_133, (((closure)  __glo_check_91indices_srfi_133)->fn),  ((closureN)self_734737)->elements[3], ((closureN)self_734737)->elements[5], r_733406, ((closureN)self_734737)->elements[4], ((closureN)self_734737)->elements[1], ((closureN)self_734737)->elements[2], ((closureN)self_734737)->elements[0]);; 
}

static void __lambda_149(void *data, object self_734733, int argc, object *args) /* object self_734733, object k_733399 */
 {
 object k_733399 = args[0];
  
pair_type local_737034; 

pair_type local_737038; 

pair_type local_737041; 
return_closcall2(data,  ((closureN)self_734733)->elements[1],  k_733399, set_pair_as_expr(&local_737034, ((closureN)self_734733)->elements[0], set_pair_as_expr(&local_737038, quote__121, set_pair_as_expr(&local_737041, ((closureN)self_734733)->elements[2], NULL))));; 
}

static void __lambda_146(void *data, object self_734734, int argc, object *args) /* object self_734734, object r_733396 */
 {
 object r_733396 = args[0];
  
closureN_type c_737016;
object e_737020 [2];
c_737016.hdr.mark = gc_color_red;
 c_737016.hdr.grayed = 0;
c_737016.tag = closureN_tag;
 c_737016.fn = (function_type)__lambda_147;
c_737016.num_args = 1;
c_737016.num_elements = 2;
c_737016.elements = (object *)e_737020;
c_737016.elements[0] = ((closureN)self_734734)->elements[2];
c_737016.elements[1] = r_733396;


closureN_type c_737021;
object e_737027 [4];
c_737021.hdr.mark = gc_color_red;
 c_737021.hdr.grayed = 0;
c_737021.tag = closureN_tag;
 c_737021.fn = (function_type)__lambda_148;
c_737021.num_args = 2;
c_737021.num_elements = 4;
c_737021.elements = (object *)e_737027;
c_737021.elements[0] = ((closureN)self_734734)->elements[0];
c_737021.elements[1] = ((closureN)self_734734)->elements[1];
c_737021.elements[2] = ((closureN)self_734734)->elements[3];
c_737021.elements[3] = ((closureN)self_734734)->elements[4];

return_direct_with_clo1(data,(closure)&c_737016,__lambda_147,  &c_737021);; 
}

static void __lambda_148(void *data, object self_734735, int argc, object *args) /* object self_734735, object k_733398, object new_91start_73383_732471, object new_91end_73384_732472 */
 {
 object k_733398 = args[0]; object new_91start_73383_732471 = args[1]; object new_91end_73384_732472 = args[2];
  return_direct_with_clo7(data,  __glo_check_91indices_srfi_133, (((closure)  __glo_check_91indices_srfi_133)->fn),  k_733398, ((closureN)self_734735)->elements[3], new_91start_73383_732471, ((closureN)self_734735)->elements[2], new_91end_73384_732472, ((closureN)self_734735)->elements[1], ((closureN)self_734735)->elements[0]);; 
}

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

static void __lambda_137(void *data, object _, int argc, object *args) /* closure _,object k_733358, object vec_73345_732458, object index_73346_732459, object callee_73347_732460 */
 {
object k_733358 = args[0]; object vec_73345_732458 = args[1]; object index_73346_732459 = args[2]; object callee_73347_732460 = args[3];
  Cyc_st_add(data, "srfi/133.sld:check-index");

closureN_type c_736935;
object e_737001 [3];
c_736935.hdr.mark = gc_color_red;
 c_736935.hdr.grayed = 0;
c_736935.tag = closureN_tag;
 c_736935.fn = (function_type)__lambda_138;
c_736935.num_args = 1;
c_736935.num_elements = 3;
c_736935.elements = (object *)e_737001;
c_736935.elements[0] = callee_73347_732460;
c_736935.elements[1] = k_733358;
c_736935.elements[2] = vec_73345_732458;

return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  &c_736935, primitive_integer_127, index_73346_732459, callee_73347_732460);; 
}

static void __lambda_138(void *data, object self_734724, int argc, object *args) /* object self_734724, object index_73348_732461 */
 {
 object index_73348_732461 = args[0];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, index_73348_732461, obj_int2obj(0))) ){ 
  
closureN_type c_736939;
object e_736944 [3];
c_736939.hdr.mark = gc_color_red;
 c_736939.hdr.grayed = 0;
c_736939.tag = closureN_tag;
 c_736939.fn = (function_type)__lambda_139;
c_736939.num_args = 1;
c_736939.num_elements = 3;
c_736939.elements = (object *)e_736944;
c_736939.elements[0] = ((closureN)self_734724)->elements[0];
c_736939.elements[1] = ((closureN)self_734724)->elements[1];
c_736939.elements[2] = ((closureN)self_734724)->elements[2];


make_utf8_string_with_len(c_736945, "vector index too low", 20, 20);

pair_type local_736948; 

pair_type local_736951; 

pair_type local_736954; 

pair_type local_736958; 

pair_type local_736961; 

pair_type local_736964; 
return_direct_with_clo5(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  &c_736939, &c_736945, index_73348_732461, set_pair_as_expr(&local_736948, quote_into, set_pair_as_expr(&local_736951, quote_vector, set_pair_as_expr(&local_736954, ((closureN)self_734724)->elements[2], NULL))), set_pair_as_expr(&local_736958, quote__while, set_pair_as_expr(&local_736961, quote_calling, set_pair_as_expr(&local_736964, ((closureN)self_734724)->elements[0], NULL))));
} else { 
    
  
if( (boolean_f != Cyc_num_fast_gte_op(data, index_73348_732461, Cyc_vector_length(data, ((closureN)self_734724)->elements[2]))) ){ 
  
closureN_type c_736972;
object e_736977 [3];
c_736972.hdr.mark = gc_color_red;
 c_736972.hdr.grayed = 0;
c_736972.tag = closureN_tag;
 c_736972.fn = (function_type)__lambda_140;
c_736972.num_args = 1;
c_736972.num_elements = 3;
c_736972.elements = (object *)e_736977;
c_736972.elements[0] = ((closureN)self_734724)->elements[0];
c_736972.elements[1] = ((closureN)self_734724)->elements[1];
c_736972.elements[2] = ((closureN)self_734724)->elements[2];


make_utf8_string_with_len(c_736978, "vector index too high", 21, 21);

pair_type local_736981; 

pair_type local_736984; 

pair_type local_736987; 

pair_type local_736991; 

pair_type local_736994; 

pair_type local_736997; 
return_direct_with_clo5(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  &c_736972, &c_736978, index_73348_732461, set_pair_as_expr(&local_736981, quote_into, set_pair_as_expr(&local_736984, quote_vector, set_pair_as_expr(&local_736987, ((closureN)self_734724)->elements[2], NULL))), set_pair_as_expr(&local_736991, quote__while, set_pair_as_expr(&local_736994, quote_calling, set_pair_as_expr(&local_736997, ((closureN)self_734724)->elements[0], NULL))));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734724)->elements[1], (((closure)  ((closureN)self_734724)->elements[1])->fn),  index_73348_732461);}
;}
;; 
}

static void __lambda_140(void *data, object self_734726, int argc, object *args) /* object self_734726, object r_733375 */
 {
 object r_733375 = args[0];
  return_direct_with_clo4(data,  __glo_check_91index_srfi_133, (((closure)  __glo_check_91index_srfi_133)->fn),  ((closureN)self_734726)->elements[1], ((closureN)self_734726)->elements[2], r_733375, ((closureN)self_734726)->elements[0]);; 
}

static void __lambda_139(void *data, object self_734725, int argc, object *args) /* object self_734725, object r_733361 */
 {
 object r_733361 = args[0];
  return_direct_with_clo4(data,  __glo_check_91index_srfi_133, (((closure)  __glo_check_91index_srfi_133)->fn),  ((closureN)self_734725)->elements[1], ((closureN)self_734725)->elements[2], r_733361, ((closureN)self_734725)->elements[0]);; 
}

static void __lambda_134(void *data, object _, int argc, object *args) /* closure _,object k_733346, object pred_127_73339_732455, object value_73340_732456, object callee_73341_732457 */
 {
object k_733346 = args[0]; object pred_127_73339_732455 = args[1]; object value_73340_732456 = args[2]; object callee_73341_732457 = args[3];
  Cyc_st_add(data, "srfi/133.sld:check-type");

closureN_type c_736905;
object e_736932 [4];
c_736905.hdr.mark = gc_color_red;
 c_736905.hdr.grayed = 0;
c_736905.tag = closureN_tag;
 c_736905.fn = (function_type)__lambda_135;
c_736905.num_args = 1;
c_736905.num_elements = 4;
c_736905.elements = (object *)e_736932;
c_736905.elements[0] = callee_73341_732457;
c_736905.elements[1] = k_733346;
c_736905.elements[2] = pred_127_73339_732455;
c_736905.elements[3] = value_73340_732456;

return_closcall2(data,  pred_127_73339_732455,  &c_736905, value_73340_732456);; 
}

static void __lambda_135(void *data, object self_734722, int argc, object *args) /* object self_734722, object r_733347 */
 {
 object r_733347 = args[0];
  if( (boolean_f != r_733347) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734722)->elements[1], (((closure)  ((closureN)self_734722)->elements[1])->fn),  ((closureN)self_734722)->elements[3]);
} else { 
  
closureN_type c_736910;
object e_736915 [3];
c_736910.hdr.mark = gc_color_red;
 c_736910.hdr.grayed = 0;
c_736910.tag = closureN_tag;
 c_736910.fn = (function_type)__lambda_136;
c_736910.num_args = 1;
c_736910.num_elements = 3;
c_736910.elements = (object *)e_736915;
c_736910.elements[0] = ((closureN)self_734722)->elements[0];
c_736910.elements[1] = ((closureN)self_734722)->elements[1];
c_736910.elements[2] = ((closureN)self_734722)->elements[2];


make_utf8_string_with_len(c_736916, "erroneous value", 15, 15);

list_2_type local_736919; 

pair_type local_736924; 

pair_type local_736927; 

pair_type local_736930; 
return_direct_with_clo4(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  &c_736910, &c_736916, Cyc_fast_list_2(&local_736919, ((closureN)self_734722)->elements[2], ((closureN)self_734722)->elements[3]), set_pair_as_expr(&local_736924, quote__while, set_pair_as_expr(&local_736927, quote_calling, set_pair_as_expr(&local_736930, ((closureN)self_734722)->elements[0], NULL))));}
;; 
}

static void __lambda_136(void *data, object self_734723, int argc, object *args) /* object self_734723, object r_733348 */
 {
 object r_733348 = args[0];
  return_direct_with_clo4(data,  __glo_check_91type_srfi_133, (((closure)  __glo_check_91type_srfi_133)->fn),  ((closureN)self_734723)->elements[1], ((closureN)self_734723)->elements[2], r_733348, ((closureN)self_734723)->elements[0]);; 
}

static void __lambda_131(void *data, object _, int argc, object *args) /* closure _,object k_733341, object vectors_73336_732452, object i_73337_732453 */
 {
object k_733341 = args[0]; object vectors_73336_732452 = args[1]; object i_73337_732453 = args[2];
  Cyc_st_add(data, "srfi/133.sld:vectors-ref");

closureN_type c_736892;
object e_736896 [2];
c_736892.hdr.mark = gc_color_red;
 c_736892.hdr.grayed = 0;
c_736892.tag = closureN_tag;
 c_736892.fn = (function_type)__lambda_132;
c_736892.num_args = 1;
c_736892.num_elements = 2;
c_736892.elements = (object *)e_736896;
c_736892.elements[0] = k_733341;
c_736892.elements[1] = vectors_73336_732452;


closureN_type c_736897;
object e_736902 [1];
c_736897.hdr.mark = gc_color_red;
 c_736897.hdr.grayed = 0;
c_736897.tag = closureN_tag;
 c_736897.fn = (function_type)__lambda_133;
c_736897.num_args = 1;
c_736897.num_elements = 1;
c_736897.elements = (object *)e_736902;
c_736897.elements[0] = i_73337_732453;

return_direct_with_clo1(data,(closure)&c_736892,__lambda_132,  &c_736897);; 
}

static void __lambda_133(void *data, object self_734720, int argc, object *args) /* object self_734720, object k_733343, object v_73338_732454 */
 {
 object k_733343 = args[0]; object v_73338_732454 = args[1];
  

return_direct_with_clo1(data,  k_733343, (((closure)  k_733343)->fn),  Cyc_vector_ref(data, v_73338_732454, ((closureN)self_734720)->elements[0]));; 
}

static void __lambda_132(void *data, object self_734721, int argc, object *args) /* object self_734721, object r_733342 */
 {
 object r_733342 = 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_734721)->elements[0], r_733342, ((closureN)self_734721)->elements[1]);; 
}

static object __lambda_774(void *data, object ptr) {

  Cyc_st_add(data, "srfi/133.sld:unspecified-value");
return_copy(ptr,  Cyc_VOID);; 
}

static void __lambda_130(void *data, object _, int argc, object *args) /* closure _,object k_733338 */
 {
object k_733338 = args[0];
  Cyc_st_add(data, "srfi/133.sld:unspecified-value");
return_direct_with_clo1(data,  k_733338, (((closure)  k_733338)->fn),  Cyc_VOID);; 
}

static object __lambda_773(void *data, object ptr,object x_73332_732449, object y_73333_732450, object z_73334_732451) {

  Cyc_st_add(data, "srfi/133.sld:between?");
  
if( (boolean_f != Cyc_num_fast_lt_op(data, x_73332_732449, y_73333_732450)) ){ 
  

return_copy(ptr,  Cyc_num_fast_lte_op(data, y_73333_732450, z_73334_732451));
} else { 
  return_copy(ptr,  boolean_f);}
;; 
}

static void __lambda_129(void *data, object _, int argc, object *args) /* closure _,object k_733334, object x_73332_732449, object y_73333_732450, object z_73334_732451 */
 {
object k_733334 = args[0]; object x_73332_732449 = args[1]; object y_73333_732450 = args[2]; object z_73334_732451 = args[3];
  Cyc_st_add(data, "srfi/133.sld:between?");
  
if( (boolean_f != Cyc_num_fast_lt_op(data, x_73332_732449, y_73333_732450)) ){ 
  

return_direct_with_clo1(data,  k_733334, (((closure)  k_733334)->fn),  Cyc_num_fast_lte_op(data, y_73333_732450, z_73334_732451));
} else { 
  return_direct_with_clo1(data,  k_733334, (((closure)  k_733334)->fn),  boolean_f);}
;; 
}

static object __lambda_772(void *data, object ptr,object x_73330_732448) {

  Cyc_st_add(data, "srfi/133.sld:nonneg-int?");
  
if( (boolean_f != Cyc_is_integer(x_73330_732448)) ){ 
  
complex_num_type local_736867; 

complex_num_type local_736870; 
return_copy(ptr,  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_736867, ((inline_function_type)
                   ((closure)__glo_negative_127_191_191inline_191_191_scheme_base)->fn)(data,&local_736870, x_73330_732448)));
} else { 
  return_copy(ptr,  boolean_f);}
;; 
}

static void __lambda_128(void *data, object _, int argc, object *args) /* closure _,object k_733329, object x_73330_732448 */
 {
object k_733329 = args[0]; object x_73330_732448 = args[1];
  Cyc_st_add(data, "srfi/133.sld:nonneg-int?");
  
if( (boolean_f != Cyc_is_integer(x_73330_732448)) ){ 
  
complex_num_type local_736856; 

complex_num_type local_736859; 
return_direct_with_clo1(data,  k_733329, (((closure)  k_733329)->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_736856, ((inline_function_type)
                   ((closure)__glo_negative_127_191_191inline_191_191_scheme_base)->fn)(data,&local_736859, x_73330_732448)));
} else { 
  return_direct_with_clo1(data,  k_733329, (((closure)  k_733329)->fn),  boolean_f);}
;; 
}

static void __lambda_59(void *data, object _, int argc, object *args) /* closure _,object k_733147, object expr_73196_73228_73290_732408, object rename_73197_73229_73291_732409, object compare_73198_73230_73292_732410 */
 {
object k_733147 = args[0]; object expr_73196_73228_73290_732408 = args[1]; object rename_73197_73229_73291_732409 = args[2];
  Cyc_st_add(data, "srfi/133.sld:let*-optionals:aux");

closureN_type c_735910;
object e_736847 [3];
c_735910.hdr.mark = gc_color_red;
 c_735910.hdr.grayed = 0;
c_735910.tag = closureN_tag;
 c_735910.fn = (function_type)__lambda_60;
c_735910.num_args = 1;
c_735910.num_elements = 3;
c_735910.elements = (object *)e_736847;
c_735910.elements[0] = expr_73196_73228_73290_732408;
c_735910.elements[1] = k_733147;
c_735910.elements[2] = rename_73197_73229_73291_732409;



return_direct_with_clo1(data,(closure)&c_735910,__lambda_60,  Cyc_cdr(data, expr_73196_73228_73290_732408));; 
}

static void __lambda_60(void *data, object self_734652, int argc, object *args) /* object self_734652, object v_931_73204_73271_73317_732435 */
 {
 object v_931_73204_73271_73317_732435 = args[0];
  
closureN_type c_735912;
object e_736165 [2];
c_735912.hdr.mark = gc_color_red;
 c_735912.hdr.grayed = 0;
c_735912.tag = closureN_tag;
 c_735912.fn = (function_type)__lambda_61;
c_735912.num_args = 0;
c_735912.num_elements = 2;
c_735912.elements = (object *)e_736165;
c_735912.elements[0] = ((closureN)self_734652)->elements[2];
c_735912.elements[1] = v_931_73204_73271_73317_732435;


closureN_type c_736166;
object e_736846 [3];
c_736166.hdr.mark = gc_color_red;
 c_736166.hdr.grayed = 0;
c_736166.tag = closureN_tag;
 c_736166.fn = (function_type)__lambda_82;
c_736166.num_args = 1;
c_736166.num_elements = 3;
c_736166.elements = (object *)e_736846;
c_736166.elements[0] = ((closureN)self_734652)->elements[0];
c_736166.elements[1] = ((closureN)self_734652)->elements[1];
c_736166.elements[2] = ((closureN)self_734652)->elements[2];

return_direct_with_clo1(data,(closure)&c_735912,__lambda_61,  &c_736166);; 
}

static void __lambda_82(void *data, object self_734653, int argc, object *args) /* object self_734653, object tmp_73232_73234_73293_732411 */
 {
 object tmp_73232_73234_73293_732411 = args[0];
  
closureN_type c_736168;
object e_736839 [3];
c_736168.hdr.mark = gc_color_red;
 c_736168.hdr.grayed = 0;
c_736168.tag = closureN_tag;
 c_736168.fn = (function_type)__lambda_83;
c_736168.num_args = 0;
c_736168.num_elements = 3;
c_736168.elements = (object *)e_736839;
c_736168.elements[0] = ((closureN)self_734653)->elements[0];
c_736168.elements[1] = ((closureN)self_734653)->elements[2];
c_736168.elements[2] = tmp_73232_73234_73293_732411;


closureN_type c_736840;
object e_736845 [1];
c_736840.hdr.mark = gc_color_red;
 c_736840.hdr.grayed = 0;
c_736840.tag = closureN_tag;
 c_736840.fn = (function_type)__lambda_127;
c_736840.num_args = 1;
c_736840.num_elements = 1;
c_736840.elements = (object *)e_736845;
c_736840.elements[0] = ((closureN)self_734653)->elements[1];

return_direct_with_clo1(data,(closure)&c_736168,__lambda_83,  &c_736840);; 
}

static void __lambda_127(void *data, object self_734654, int argc, object *args) /* object self_734654, object r_733148 */
 {
 object r_733148 = args[0];
  

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

static void __lambda_83(void *data, object self_734655, int argc, object *args) /* object self_734655, object k_733150 */
 {
 object k_733150 = args[0];
  if( (boolean_f != ((closureN)self_734655)->elements[2]) ){ 
  return_direct_with_clo1(data,  k_733150, (((closure)  k_733150)->fn),  ((closureN)self_734655)->elements[2]);
} else { 
  
closureN_type c_736173;
object e_736835 [3];
c_736173.hdr.mark = gc_color_red;
 c_736173.hdr.grayed = 0;
c_736173.tag = closureN_tag;
 c_736173.fn = (function_type)__lambda_84;
c_736173.num_args = 1;
c_736173.num_elements = 3;
c_736173.elements = (object *)e_736835;
c_736173.elements[0] = ((closureN)self_734655)->elements[0];
c_736173.elements[1] = k_733150;
c_736173.elements[2] = ((closureN)self_734655)->elements[1];



return_direct_with_clo1(data,(closure)&c_736173,__lambda_84,  Cyc_cdr(data, ((closureN)self_734655)->elements[0]));}
;; 
}

static void __lambda_84(void *data, object self_734656, int argc, object *args) /* object self_734656, object v_9310_73213_73239_73295_732413 */
 {
 object v_9310_73213_73239_73295_732413 = args[0];
  
closureN_type c_736175;
object e_736820 [2];
c_736175.hdr.mark = gc_color_red;
 c_736175.hdr.grayed = 0;
c_736175.tag = closureN_tag;
 c_736175.fn = (function_type)__lambda_85;
c_736175.num_args = 0;
c_736175.num_elements = 2;
c_736175.elements = (object *)e_736820;
c_736175.elements[0] = ((closureN)self_734656)->elements[2];
c_736175.elements[1] = v_9310_73213_73239_73295_732413;


closureN_type c_736821;
object e_736834 [2];
c_736821.hdr.mark = gc_color_red;
 c_736821.hdr.grayed = 0;
c_736821.tag = closureN_tag;
 c_736821.fn = (function_type)__lambda_125;
c_736821.num_args = 1;
c_736821.num_elements = 2;
c_736821.elements = (object *)e_736834;
c_736821.elements[0] = ((closureN)self_734656)->elements[0];
c_736821.elements[1] = ((closureN)self_734656)->elements[1];

return_direct_with_clo1(data,(closure)&c_736175,__lambda_85,  &c_736821);; 
}

static void __lambda_125(void *data, object self_734657, int argc, object *args) /* object self_734657, object tmp_73236_73238_73294_732412 */
 {
 object tmp_73236_73238_73294_732412 = args[0];
  if( (boolean_f != tmp_73236_73238_73294_732412) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734657)->elements[1], (((closure)  ((closureN)self_734657)->elements[1])->fn),  tmp_73236_73238_73294_732412);
} else { 
  
closureN_type c_736825;
object e_736831 [1];
c_736825.hdr.mark = gc_color_red;
 c_736825.hdr.grayed = 0;
c_736825.tag = closureN_tag;
 c_736825.fn = (function_type)__lambda_126;
c_736825.num_args = 1;
c_736825.num_elements = 1;
c_736825.elements = (object *)e_736831;
c_736825.elements[0] = ((closureN)self_734657)->elements[1];


make_utf8_string_with_len(c_736832, "no expansion for", 16, 16);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_736825, &c_736832, ((closureN)self_734657)->elements[0]);}
;; 
}

static void __lambda_126(void *data, object self_734658, int argc, object *args) /* object self_734658, object r_733152 */
 {
 object r_733152 = args[0];
  
pair_type local_736830; 
return_direct_with_clo1(data,  ((closureN)self_734658)->elements[0], (((closure)  ((closureN)self_734658)->elements[0])->fn),  set_pair_as_expr(&local_736830, r_733152, boolean_f));; 
}

static void __lambda_85(void *data, object self_734659, int argc, object *args) /* object self_734659, object k_733154 */
 {
 object k_733154 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_734659)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_734659)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734659)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734659)->elements[1]))))) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734659)->elements[1])))))) ){ 
    
  
  
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734659)->elements[1]))))))) ){ 
    
  
  
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734659)->elements[1])))))))) ){ 
    complex_num_type local_736241; 
  
  
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_736241, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734659)->elements[1])))))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734659)->elements[1]))))) ){ 
    complex_num_type local_736262; 
  
  
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_736262, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734659)->elements[1])))))) ){ 
  
closureN_type c_736274;
object e_736809 [3];
c_736274.hdr.mark = gc_color_red;
 c_736274.hdr.grayed = 0;
c_736274.tag = closureN_tag;
 c_736274.fn = (function_type)__lambda_86;
c_736274.num_args = 1;
c_736274.num_elements = 3;
c_736274.elements = (object *)e_736809;
c_736274.elements[0] = k_733154;
c_736274.elements[1] = ((closureN)self_734659)->elements[0];
c_736274.elements[2] = ((closureN)self_734659)->elements[1];

return_closcall2(data,  ((closureN)self_734659)->elements[0],  &c_736274, quote__if);
} else { 
  return_direct_with_clo1(data,  k_733154, (((closure)  k_733154)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733154, (((closure)  k_733154)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733154, (((closure)  k_733154)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733154, (((closure)  k_733154)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733154, (((closure)  k_733154)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733154, (((closure)  k_733154)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733154, (((closure)  k_733154)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733154, (((closure)  k_733154)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733154, (((closure)  k_733154)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733154, (((closure)  k_733154)->fn),  boolean_f);}
;; 
}

static void __lambda_86(void *data, object self_734660, int argc, object *args) /* object self_734660, object r_733180 */
 {
 object r_733180 = args[0];
  
closureN_type c_736277;
object e_736808 [4];
c_736277.hdr.mark = gc_color_red;
 c_736277.hdr.grayed = 0;
c_736277.tag = closureN_tag;
 c_736277.fn = (function_type)__lambda_87;
c_736277.num_args = 1;
c_736277.num_elements = 4;
c_736277.elements = (object *)e_736808;
c_736277.elements[0] = ((closureN)self_734660)->elements[0];
c_736277.elements[1] = r_733180;
c_736277.elements[2] = ((closureN)self_734660)->elements[1];
c_736277.elements[3] = ((closureN)self_734660)->elements[2];

return_closcall2(data,  ((closureN)self_734660)->elements[1],  &c_736277, quote_null_127);; 
}

static void __lambda_87(void *data, object self_734661, int argc, object *args) /* object self_734661, object r_733259 */
 {
 object r_733259 = args[0];
  
closureN_type c_736279;
object e_736801 [5];
c_736279.hdr.mark = gc_color_red;
 c_736279.hdr.grayed = 0;
c_736279.tag = closureN_tag;
 c_736279.fn = (function_type)__lambda_88;
c_736279.num_args = 1;
c_736279.num_elements = 5;
c_736279.elements = (object *)e_736801;
c_736279.elements[0] = ((closureN)self_734661)->elements[0];
c_736279.elements[1] = ((closureN)self_734661)->elements[1];
c_736279.elements[2] = r_733259;
c_736279.elements[3] = ((closureN)self_734661)->elements[2];
c_736279.elements[4] = ((closureN)self_734661)->elements[3];






make_pair(c_736807,quote__127args_91var,NULL);c_736807.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736279, Cyc_car(data, Cyc_cdr(data, ((closureN)self_734661)->elements[3])), NULL, &c_736807);; 
}

static void __lambda_88(void *data, object self_734662, int argc, object *args) /* object self_734662, object r_733260 */
 {
 object r_733260 = args[0];
  
closureN_type c_736281;
object e_736797 [4];
c_736281.hdr.mark = gc_color_red;
 c_736281.hdr.grayed = 0;
c_736281.tag = closureN_tag;
 c_736281.fn = (function_type)__lambda_89;
c_736281.num_args = 1;
c_736281.num_elements = 4;
c_736281.elements = (object *)e_736797;
c_736281.elements[0] = ((closureN)self_734662)->elements[0];
c_736281.elements[1] = ((closureN)self_734662)->elements[1];
c_736281.elements[2] = ((closureN)self_734662)->elements[3];
c_736281.elements[3] = ((closureN)self_734662)->elements[4];


make_pair(c_736800,quote__127args_91var,NULL);c_736800.hdr.immutable = 1;

make_pair(c_736799,quote_null_127,&c_736800);c_736799.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736281, ((closureN)self_734662)->elements[2], r_733260, &c_736799);; 
}

static void __lambda_89(void *data, object self_734663, int argc, object *args) /* object self_734663, object r_733183 */
 {
 object r_733183 = args[0];
  
closureN_type c_736284;
object e_736796 [5];
c_736284.hdr.mark = gc_color_red;
 c_736284.hdr.grayed = 0;
c_736284.tag = closureN_tag;
 c_736284.fn = (function_type)__lambda_90;
c_736284.num_args = 1;
c_736284.num_elements = 5;
c_736284.elements = (object *)e_736796;
c_736284.elements[0] = ((closureN)self_734663)->elements[0];
c_736284.elements[1] = ((closureN)self_734663)->elements[1];
c_736284.elements[2] = r_733183;
c_736284.elements[3] = ((closureN)self_734663)->elements[2];
c_736284.elements[4] = ((closureN)self_734663)->elements[3];

return_closcall2(data,  ((closureN)self_734663)->elements[2],  &c_736284, quote_let_85);; 
}

static void __lambda_90(void *data, object self_734664, int argc, object *args) /* object self_734664, object r_733245 */
 {
 object r_733245 = args[0];
  
closureN_type c_736286;
object e_736781 [6];
c_736286.hdr.mark = gc_color_red;
 c_736286.hdr.grayed = 0;
c_736286.tag = closureN_tag;
 c_736286.fn = (function_type)__lambda_91;
c_736286.num_args = 1;
c_736286.num_elements = 6;
c_736286.elements = (object *)e_736781;
c_736286.elements[0] = ((closureN)self_734664)->elements[0];
c_736286.elements[1] = ((closureN)self_734664)->elements[1];
c_736286.elements[2] = ((closureN)self_734664)->elements[2];
c_736286.elements[3] = r_733245;
c_736286.elements[4] = ((closureN)self_734664)->elements[3];
c_736286.elements[5] = ((closureN)self_734664)->elements[4];














make_pair(c_736795,quote__127default,NULL);c_736795.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736286, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734664)->elements[4])))))), NULL, &c_736795);; 
}

static void __lambda_91(void *data, object self_734665, int argc, object *args) /* object self_734665, object r_733254 */
 {
 object r_733254 = args[0];
  
closureN_type c_736288;
object e_736767 [6];
c_736288.hdr.mark = gc_color_red;
 c_736288.hdr.grayed = 0;
c_736288.tag = closureN_tag;
 c_736288.fn = (function_type)__lambda_92;
c_736288.num_args = 1;
c_736288.num_elements = 6;
c_736288.elements = (object *)e_736767;
c_736288.elements[0] = ((closureN)self_734665)->elements[0];
c_736288.elements[1] = ((closureN)self_734665)->elements[1];
c_736288.elements[2] = ((closureN)self_734665)->elements[2];
c_736288.elements[3] = ((closureN)self_734665)->elements[3];
c_736288.elements[4] = ((closureN)self_734665)->elements[4];
c_736288.elements[5] = ((closureN)self_734665)->elements[5];












make_pair(c_736780,quote__127default,NULL);c_736780.hdr.immutable = 1;

make_pair(c_736779,quote__127var,&c_736780);c_736779.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736288, Cyc_car(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734665)->elements[5]))))), r_733254, &c_736779);; 
}

static void __lambda_92(void *data, object self_734666, int argc, object *args) /* object self_734666, object r_733252 */
 {
 object r_733252 = args[0];
  
closureN_type c_736290;
object e_736752 [6];
c_736290.hdr.mark = gc_color_red;
 c_736290.hdr.grayed = 0;
c_736290.tag = closureN_tag;
 c_736290.fn = (function_type)__lambda_93;
c_736290.num_args = 1;
c_736290.num_elements = 6;
c_736290.elements = (object *)e_736752;
c_736290.elements[0] = ((closureN)self_734666)->elements[0];
c_736290.elements[1] = ((closureN)self_734666)->elements[1];
c_736290.elements[2] = ((closureN)self_734666)->elements[2];
c_736290.elements[3] = ((closureN)self_734666)->elements[3];
c_736290.elements[4] = ((closureN)self_734666)->elements[4];
c_736290.elements[5] = ((closureN)self_734666)->elements[5];










make_pair(c_736764,quote__127default,NULL);c_736764.hdr.immutable = 1;

make_pair(c_736763,quote__127var,&c_736764);c_736763.hdr.immutable = 1;

make_pair(c_736766,quote__93_93_93,NULL);c_736766.hdr.immutable = 1;

make_pair(c_736765,quote__127more,&c_736766);c_736765.hdr.immutable = 1;

make_pair(c_736762,&c_736763,&c_736765);c_736762.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736290, r_733252, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734666)->elements[5])))), &c_736762);; 
}

static void __lambda_93(void *data, object self_734667, int argc, object *args) /* object self_734667, object r_733248 */
 {
 object r_733248 = args[0];
  
closureN_type c_736292;
object e_736730 [7];
c_736292.hdr.mark = gc_color_red;
 c_736292.hdr.grayed = 0;
c_736292.tag = closureN_tag;
 c_736292.fn = (function_type)__lambda_94;
c_736292.num_args = 1;
c_736292.num_elements = 7;
c_736292.elements = (object *)e_736730;
c_736292.elements[0] = ((closureN)self_734667)->elements[0];
c_736292.elements[1] = ((closureN)self_734667)->elements[1];
c_736292.elements[2] = ((closureN)self_734667)->elements[2];
c_736292.elements[3] = ((closureN)self_734667)->elements[3];
c_736292.elements[4] = r_733248;
c_736292.elements[5] = ((closureN)self_734667)->elements[4];
c_736292.elements[6] = ((closureN)self_734667)->elements[5];


















make_pair(c_736751,quote__93_93_93,NULL);c_736751.hdr.immutable = 1;

make_pair(c_736750,quote__127body2,&c_736751);c_736750.hdr.immutable = 1;

make_pair(c_736749,quote__127body1,&c_736750);c_736749.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736292, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734667)->elements[5])))), Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734667)->elements[5])))), &c_736749);; 
}

static void __lambda_94(void *data, object self_734668, int argc, object *args) /* object self_734668, object r_733249 */
 {
 object r_733249 = args[0];
  
closureN_type c_736294;
object e_736719 [6];
c_736294.hdr.mark = gc_color_red;
 c_736294.hdr.grayed = 0;
c_736294.tag = closureN_tag;
 c_736294.fn = (function_type)__lambda_95;
c_736294.num_args = 1;
c_736294.num_elements = 6;
c_736294.elements = (object *)e_736719;
c_736294.elements[0] = ((closureN)self_734668)->elements[0];
c_736294.elements[1] = ((closureN)self_734668)->elements[1];
c_736294.elements[2] = ((closureN)self_734668)->elements[2];
c_736294.elements[3] = ((closureN)self_734668)->elements[3];
c_736294.elements[4] = ((closureN)self_734668)->elements[5];
c_736294.elements[5] = ((closureN)self_734668)->elements[6];


make_pair(c_736724,quote__127default,NULL);c_736724.hdr.immutable = 1;

make_pair(c_736723,quote__127var,&c_736724);c_736723.hdr.immutable = 1;

make_pair(c_736726,quote__93_93_93,NULL);c_736726.hdr.immutable = 1;

make_pair(c_736725,quote__127more,&c_736726);c_736725.hdr.immutable = 1;

make_pair(c_736722,&c_736723,&c_736725);c_736722.hdr.immutable = 1;

make_pair(c_736729,quote__93_93_93,NULL);c_736729.hdr.immutable = 1;

make_pair(c_736728,quote__127body2,&c_736729);c_736728.hdr.immutable = 1;

make_pair(c_736727,quote__127body1,&c_736728);c_736727.hdr.immutable = 1;

make_pair(c_736721,&c_736722,&c_736727);c_736721.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736294, ((closureN)self_734668)->elements[4], r_733249, &c_736721);; 
}

static void __lambda_95(void *data, object self_734669, int argc, object *args) /* object self_734669, object r_733246 */
 {
 object r_733246 = args[0];
  
closureN_type c_736296;
object e_736707 [5];
c_736296.hdr.mark = gc_color_red;
 c_736296.hdr.grayed = 0;
c_736296.tag = closureN_tag;
 c_736296.fn = (function_type)__lambda_96;
c_736296.num_args = 1;
c_736296.num_elements = 5;
c_736296.elements = (object *)e_736707;
c_736296.elements[0] = ((closureN)self_734669)->elements[0];
c_736296.elements[1] = ((closureN)self_734669)->elements[1];
c_736296.elements[2] = ((closureN)self_734669)->elements[2];
c_736296.elements[3] = ((closureN)self_734669)->elements[4];
c_736296.elements[4] = ((closureN)self_734669)->elements[5];


make_pair(c_736713,quote__127default,NULL);c_736713.hdr.immutable = 1;

make_pair(c_736712,quote__127var,&c_736713);c_736712.hdr.immutable = 1;

make_pair(c_736715,quote__93_93_93,NULL);c_736715.hdr.immutable = 1;

make_pair(c_736714,quote__127more,&c_736715);c_736714.hdr.immutable = 1;

make_pair(c_736711,&c_736712,&c_736714);c_736711.hdr.immutable = 1;

make_pair(c_736718,quote__93_93_93,NULL);c_736718.hdr.immutable = 1;

make_pair(c_736717,quote__127body2,&c_736718);c_736717.hdr.immutable = 1;

make_pair(c_736716,quote__127body1,&c_736717);c_736716.hdr.immutable = 1;

make_pair(c_736710,&c_736711,&c_736716);c_736710.hdr.immutable = 1;

make_pair(c_736709,quote_let_85,&c_736710);c_736709.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736296, ((closureN)self_734669)->elements[3], r_733246, &c_736709);; 
}

static void __lambda_96(void *data, object self_734670, int argc, object *args) /* object self_734670, object r_733186 */
 {
 object r_733186 = args[0];
  
closureN_type c_736299;
object e_736706 [6];
c_736299.hdr.mark = gc_color_red;
 c_736299.hdr.grayed = 0;
c_736299.tag = closureN_tag;
 c_736299.fn = (function_type)__lambda_97;
c_736299.num_args = 1;
c_736299.num_elements = 6;
c_736299.elements = (object *)e_736706;
c_736299.elements[0] = ((closureN)self_734670)->elements[0];
c_736299.elements[1] = ((closureN)self_734670)->elements[1];
c_736299.elements[2] = ((closureN)self_734670)->elements[2];
c_736299.elements[3] = r_733186;
c_736299.elements[4] = ((closureN)self_734670)->elements[3];
c_736299.elements[5] = ((closureN)self_734670)->elements[4];

return_closcall2(data,  ((closureN)self_734670)->elements[3],  &c_736299, quote_let);; 
}

static void __lambda_97(void *data, object self_734671, int argc, object *args) /* object self_734671, object r_733192 */
 {
 object r_733192 = args[0];
  
closureN_type c_736302;
object e_736705 [7];
c_736302.hdr.mark = gc_color_red;
 c_736302.hdr.grayed = 0;
c_736302.tag = closureN_tag;
 c_736302.fn = (function_type)__lambda_98;
c_736302.num_args = 1;
c_736302.num_elements = 7;
c_736302.elements = (object *)e_736705;
c_736302.elements[0] = ((closureN)self_734671)->elements[0];
c_736302.elements[1] = ((closureN)self_734671)->elements[1];
c_736302.elements[2] = ((closureN)self_734671)->elements[2];
c_736302.elements[3] = ((closureN)self_734671)->elements[3];
c_736302.elements[4] = r_733192;
c_736302.elements[5] = ((closureN)self_734671)->elements[4];
c_736302.elements[6] = ((closureN)self_734671)->elements[5];

return_closcall2(data,  ((closureN)self_734671)->elements[4],  &c_736302, quote_car);; 
}

static void __lambda_98(void *data, object self_734672, int argc, object *args) /* object self_734672, object r_733238 */
 {
 object r_733238 = args[0];
  
closureN_type c_736304;
object e_736698 [8];
c_736304.hdr.mark = gc_color_red;
 c_736304.hdr.grayed = 0;
c_736304.tag = closureN_tag;
 c_736304.fn = (function_type)__lambda_99;
c_736304.num_args = 1;
c_736304.num_elements = 8;
c_736304.elements = (object *)e_736698;
c_736304.elements[0] = ((closureN)self_734672)->elements[0];
c_736304.elements[1] = ((closureN)self_734672)->elements[1];
c_736304.elements[2] = ((closureN)self_734672)->elements[2];
c_736304.elements[3] = ((closureN)self_734672)->elements[3];
c_736304.elements[4] = ((closureN)self_734672)->elements[4];
c_736304.elements[5] = r_733238;
c_736304.elements[6] = ((closureN)self_734672)->elements[5];
c_736304.elements[7] = ((closureN)self_734672)->elements[6];






make_pair(c_736704,quote__127args_91var,NULL);c_736704.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736304, Cyc_car(data, Cyc_cdr(data, ((closureN)self_734672)->elements[6])), NULL, &c_736704);; 
}

static void __lambda_99(void *data, object self_734673, int argc, object *args) /* object self_734673, object r_733239 */
 {
 object r_733239 = args[0];
  
closureN_type c_736306;
object e_736694 [7];
c_736306.hdr.mark = gc_color_red;
 c_736306.hdr.grayed = 0;
c_736306.tag = closureN_tag;
 c_736306.fn = (function_type)__lambda_100;
c_736306.num_args = 1;
c_736306.num_elements = 7;
c_736306.elements = (object *)e_736694;
c_736306.elements[0] = ((closureN)self_734673)->elements[0];
c_736306.elements[1] = ((closureN)self_734673)->elements[1];
c_736306.elements[2] = ((closureN)self_734673)->elements[2];
c_736306.elements[3] = ((closureN)self_734673)->elements[3];
c_736306.elements[4] = ((closureN)self_734673)->elements[4];
c_736306.elements[5] = ((closureN)self_734673)->elements[6];
c_736306.elements[6] = ((closureN)self_734673)->elements[7];


make_pair(c_736697,quote__127args_91var,NULL);c_736697.hdr.immutable = 1;

make_pair(c_736696,quote_car,&c_736697);c_736696.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736306, ((closureN)self_734673)->elements[5], r_733239, &c_736696);; 
}

static void __lambda_100(void *data, object self_734674, int argc, object *args) /* object self_734674, object r_733235 */
 {
 object r_733235 = args[0];
  
closureN_type c_736308;
object e_736690 [7];
c_736308.hdr.mark = gc_color_red;
 c_736308.hdr.grayed = 0;
c_736308.tag = closureN_tag;
 c_736308.fn = (function_type)__lambda_101;
c_736308.num_args = 1;
c_736308.num_elements = 7;
c_736308.elements = (object *)e_736690;
c_736308.elements[0] = ((closureN)self_734674)->elements[0];
c_736308.elements[1] = ((closureN)self_734674)->elements[1];
c_736308.elements[2] = ((closureN)self_734674)->elements[2];
c_736308.elements[3] = ((closureN)self_734674)->elements[3];
c_736308.elements[4] = ((closureN)self_734674)->elements[4];
c_736308.elements[5] = ((closureN)self_734674)->elements[5];
c_736308.elements[6] = ((closureN)self_734674)->elements[6];


make_pair(c_736693,quote__127args_91var,NULL);c_736693.hdr.immutable = 1;

make_pair(c_736692,quote_car,&c_736693);c_736692.hdr.immutable = 1;

make_pair(c_736691,&c_736692,NULL);c_736691.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736308, r_733235, NULL, &c_736691);; 
}

static void __lambda_101(void *data, object self_734675, int argc, object *args) /* object self_734675, object r_733233 */
 {
 object r_733233 = args[0];
  
closureN_type c_736310;
object e_736674 [7];
c_736310.hdr.mark = gc_color_red;
 c_736310.hdr.grayed = 0;
c_736310.tag = closureN_tag;
 c_736310.fn = (function_type)__lambda_102;
c_736310.num_args = 1;
c_736310.num_elements = 7;
c_736310.elements = (object *)e_736674;
c_736310.elements[0] = ((closureN)self_734675)->elements[0];
c_736310.elements[1] = ((closureN)self_734675)->elements[1];
c_736310.elements[2] = ((closureN)self_734675)->elements[2];
c_736310.elements[3] = ((closureN)self_734675)->elements[3];
c_736310.elements[4] = ((closureN)self_734675)->elements[4];
c_736310.elements[5] = ((closureN)self_734675)->elements[5];
c_736310.elements[6] = ((closureN)self_734675)->elements[6];












make_pair(c_736689,quote__127args_91var,NULL);c_736689.hdr.immutable = 1;

make_pair(c_736688,quote_car,&c_736689);c_736688.hdr.immutable = 1;

make_pair(c_736687,&c_736688,NULL);c_736687.hdr.immutable = 1;

make_pair(c_736686,quote__127var,&c_736687);c_736686.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736310, Cyc_car(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734675)->elements[6]))))), r_733233, &c_736686);; 
}

static void __lambda_102(void *data, object self_734676, int argc, object *args) /* object self_734676, object r_733214 */
 {
 object r_733214 = args[0];
  
closureN_type c_736313;
object e_736673 [8];
c_736313.hdr.mark = gc_color_red;
 c_736313.hdr.grayed = 0;
c_736313.tag = closureN_tag;
 c_736313.fn = (function_type)__lambda_103;
c_736313.num_args = 1;
c_736313.num_elements = 8;
c_736313.elements = (object *)e_736673;
c_736313.elements[0] = ((closureN)self_734676)->elements[0];
c_736313.elements[1] = ((closureN)self_734676)->elements[1];
c_736313.elements[2] = ((closureN)self_734676)->elements[2];
c_736313.elements[3] = ((closureN)self_734676)->elements[3];
c_736313.elements[4] = ((closureN)self_734676)->elements[4];
c_736313.elements[5] = r_733214;
c_736313.elements[6] = ((closureN)self_734676)->elements[5];
c_736313.elements[7] = ((closureN)self_734676)->elements[6];

return_closcall2(data,  ((closureN)self_734676)->elements[5],  &c_736313, quote_new_91args);; 
}

static void __lambda_103(void *data, object self_734677, int argc, object *args) /* object self_734677, object r_733220 */
 {
 object r_733220 = args[0];
  
closureN_type c_736316;
object e_736672 [9];
c_736316.hdr.mark = gc_color_red;
 c_736316.hdr.grayed = 0;
c_736316.tag = closureN_tag;
 c_736316.fn = (function_type)__lambda_104;
c_736316.num_args = 1;
c_736316.num_elements = 9;
c_736316.elements = (object *)e_736672;
c_736316.elements[0] = ((closureN)self_734677)->elements[0];
c_736316.elements[1] = ((closureN)self_734677)->elements[1];
c_736316.elements[2] = ((closureN)self_734677)->elements[2];
c_736316.elements[3] = ((closureN)self_734677)->elements[3];
c_736316.elements[4] = ((closureN)self_734677)->elements[4];
c_736316.elements[5] = ((closureN)self_734677)->elements[5];
c_736316.elements[6] = r_733220;
c_736316.elements[7] = ((closureN)self_734677)->elements[6];
c_736316.elements[8] = ((closureN)self_734677)->elements[7];

return_closcall2(data,  ((closureN)self_734677)->elements[6],  &c_736316, quote_cdr);; 
}

static void __lambda_104(void *data, object self_734678, int argc, object *args) /* object self_734678, object r_733226 */
 {
 object r_733226 = args[0];
  
closureN_type c_736318;
object e_736665 [10];
c_736318.hdr.mark = gc_color_red;
 c_736318.hdr.grayed = 0;
c_736318.tag = closureN_tag;
 c_736318.fn = (function_type)__lambda_105;
c_736318.num_args = 1;
c_736318.num_elements = 10;
c_736318.elements = (object *)e_736665;
c_736318.elements[0] = ((closureN)self_734678)->elements[0];
c_736318.elements[1] = ((closureN)self_734678)->elements[1];
c_736318.elements[2] = ((closureN)self_734678)->elements[2];
c_736318.elements[3] = ((closureN)self_734678)->elements[3];
c_736318.elements[4] = ((closureN)self_734678)->elements[4];
c_736318.elements[5] = ((closureN)self_734678)->elements[5];
c_736318.elements[6] = ((closureN)self_734678)->elements[6];
c_736318.elements[7] = r_733226;
c_736318.elements[8] = ((closureN)self_734678)->elements[7];
c_736318.elements[9] = ((closureN)self_734678)->elements[8];






make_pair(c_736671,quote__127args_91var,NULL);c_736671.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736318, Cyc_car(data, Cyc_cdr(data, ((closureN)self_734678)->elements[8])), NULL, &c_736671);; 
}

static void __lambda_105(void *data, object self_734679, int argc, object *args) /* object self_734679, object r_733227 */
 {
 object r_733227 = args[0];
  
closureN_type c_736320;
object e_736661 [9];
c_736320.hdr.mark = gc_color_red;
 c_736320.hdr.grayed = 0;
c_736320.tag = closureN_tag;
 c_736320.fn = (function_type)__lambda_106;
c_736320.num_args = 1;
c_736320.num_elements = 9;
c_736320.elements = (object *)e_736661;
c_736320.elements[0] = ((closureN)self_734679)->elements[0];
c_736320.elements[1] = ((closureN)self_734679)->elements[1];
c_736320.elements[2] = ((closureN)self_734679)->elements[2];
c_736320.elements[3] = ((closureN)self_734679)->elements[3];
c_736320.elements[4] = ((closureN)self_734679)->elements[4];
c_736320.elements[5] = ((closureN)self_734679)->elements[5];
c_736320.elements[6] = ((closureN)self_734679)->elements[6];
c_736320.elements[7] = ((closureN)self_734679)->elements[8];
c_736320.elements[8] = ((closureN)self_734679)->elements[9];


make_pair(c_736664,quote__127args_91var,NULL);c_736664.hdr.immutable = 1;

make_pair(c_736663,quote_cdr,&c_736664);c_736663.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736320, ((closureN)self_734679)->elements[7], r_733227, &c_736663);; 
}

static void __lambda_106(void *data, object self_734680, int argc, object *args) /* object self_734680, object r_733223 */
 {
 object r_733223 = args[0];
  
closureN_type c_736322;
object e_736657 [9];
c_736322.hdr.mark = gc_color_red;
 c_736322.hdr.grayed = 0;
c_736322.tag = closureN_tag;
 c_736322.fn = (function_type)__lambda_107;
c_736322.num_args = 1;
c_736322.num_elements = 9;
c_736322.elements = (object *)e_736657;
c_736322.elements[0] = ((closureN)self_734680)->elements[0];
c_736322.elements[1] = ((closureN)self_734680)->elements[1];
c_736322.elements[2] = ((closureN)self_734680)->elements[2];
c_736322.elements[3] = ((closureN)self_734680)->elements[3];
c_736322.elements[4] = ((closureN)self_734680)->elements[4];
c_736322.elements[5] = ((closureN)self_734680)->elements[5];
c_736322.elements[6] = ((closureN)self_734680)->elements[6];
c_736322.elements[7] = ((closureN)self_734680)->elements[7];
c_736322.elements[8] = ((closureN)self_734680)->elements[8];


make_pair(c_736660,quote__127args_91var,NULL);c_736660.hdr.immutable = 1;

make_pair(c_736659,quote_cdr,&c_736660);c_736659.hdr.immutable = 1;

make_pair(c_736658,&c_736659,NULL);c_736658.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736322, r_733223, NULL, &c_736658);; 
}

static void __lambda_107(void *data, object self_734681, int argc, object *args) /* object self_734681, object r_733221 */
 {
 object r_733221 = args[0];
  
closureN_type c_736324;
object e_736651 [8];
c_736324.hdr.mark = gc_color_red;
 c_736324.hdr.grayed = 0;
c_736324.tag = closureN_tag;
 c_736324.fn = (function_type)__lambda_108;
c_736324.num_args = 1;
c_736324.num_elements = 8;
c_736324.elements = (object *)e_736651;
c_736324.elements[0] = ((closureN)self_734681)->elements[0];
c_736324.elements[1] = ((closureN)self_734681)->elements[1];
c_736324.elements[2] = ((closureN)self_734681)->elements[2];
c_736324.elements[3] = ((closureN)self_734681)->elements[3];
c_736324.elements[4] = ((closureN)self_734681)->elements[4];
c_736324.elements[5] = ((closureN)self_734681)->elements[5];
c_736324.elements[6] = ((closureN)self_734681)->elements[7];
c_736324.elements[7] = ((closureN)self_734681)->elements[8];


make_pair(c_736656,quote__127args_91var,NULL);c_736656.hdr.immutable = 1;

make_pair(c_736655,quote_cdr,&c_736656);c_736655.hdr.immutable = 1;

make_pair(c_736654,&c_736655,NULL);c_736654.hdr.immutable = 1;

make_pair(c_736653,quote_new_91args,&c_736654);c_736653.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736324, ((closureN)self_734681)->elements[6], r_733221, &c_736653);; 
}

static void __lambda_108(void *data, object self_734682, int argc, object *args) /* object self_734682, object r_733217 */
 {
 object r_733217 = args[0];
  
closureN_type c_736326;
object e_736645 [8];
c_736326.hdr.mark = gc_color_red;
 c_736326.hdr.grayed = 0;
c_736326.tag = closureN_tag;
 c_736326.fn = (function_type)__lambda_109;
c_736326.num_args = 1;
c_736326.num_elements = 8;
c_736326.elements = (object *)e_736645;
c_736326.elements[0] = ((closureN)self_734682)->elements[0];
c_736326.elements[1] = ((closureN)self_734682)->elements[1];
c_736326.elements[2] = ((closureN)self_734682)->elements[2];
c_736326.elements[3] = ((closureN)self_734682)->elements[3];
c_736326.elements[4] = ((closureN)self_734682)->elements[4];
c_736326.elements[5] = ((closureN)self_734682)->elements[5];
c_736326.elements[6] = ((closureN)self_734682)->elements[6];
c_736326.elements[7] = ((closureN)self_734682)->elements[7];


make_pair(c_736650,quote__127args_91var,NULL);c_736650.hdr.immutable = 1;

make_pair(c_736649,quote_cdr,&c_736650);c_736649.hdr.immutable = 1;

make_pair(c_736648,&c_736649,NULL);c_736648.hdr.immutable = 1;

make_pair(c_736647,quote_new_91args,&c_736648);c_736647.hdr.immutable = 1;

make_pair(c_736646,&c_736647,NULL);c_736646.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736326, r_733217, NULL, &c_736646);; 
}

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


make_pair(c_736639,quote__127args_91var,NULL);c_736639.hdr.immutable = 1;

make_pair(c_736638,quote_car,&c_736639);c_736638.hdr.immutable = 1;

make_pair(c_736637,&c_736638,NULL);c_736637.hdr.immutable = 1;

make_pair(c_736636,quote__127var,&c_736637);c_736636.hdr.immutable = 1;

make_pair(c_736644,quote__127args_91var,NULL);c_736644.hdr.immutable = 1;

make_pair(c_736643,quote_cdr,&c_736644);c_736643.hdr.immutable = 1;

make_pair(c_736642,&c_736643,NULL);c_736642.hdr.immutable = 1;

make_pair(c_736641,quote_new_91args,&c_736642);c_736641.hdr.immutable = 1;

make_pair(c_736640,&c_736641,NULL);c_736640.hdr.immutable = 1;

make_pair(c_736635,&c_736636,&c_736640);c_736635.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736328, ((closureN)self_734683)->elements[5], r_733215, &c_736635);; 
}

static void __lambda_110(void *data, object self_734684, int argc, object *args) /* object self_734684, object r_733195 */
 {
 object r_733195 = args[0];
  
closureN_type c_736331;
object e_736632 [8];
c_736331.hdr.mark = gc_color_red;
 c_736331.hdr.grayed = 0;
c_736331.tag = closureN_tag;
 c_736331.fn = (function_type)__lambda_111;
c_736331.num_args = 1;
c_736331.num_elements = 8;
c_736331.elements = (object *)e_736632;
c_736331.elements[0] = ((closureN)self_734684)->elements[0];
c_736331.elements[1] = ((closureN)self_734684)->elements[1];
c_736331.elements[2] = ((closureN)self_734684)->elements[2];
c_736331.elements[3] = ((closureN)self_734684)->elements[3];
c_736331.elements[4] = ((closureN)self_734684)->elements[4];
c_736331.elements[5] = r_733195;
c_736331.elements[6] = ((closureN)self_734684)->elements[5];
c_736331.elements[7] = ((closureN)self_734684)->elements[6];

return_closcall2(data,  ((closureN)self_734684)->elements[5],  &c_736331, quote_let_85_91optionals_117aux);; 
}

static void __lambda_111(void *data, object self_734685, int argc, object *args) /* object self_734685, object r_733201 */
 {
 object r_733201 = args[0];
  
closureN_type c_736334;
object e_736631 [8];
c_736334.hdr.mark = gc_color_red;
 c_736334.hdr.grayed = 0;
c_736334.tag = closureN_tag;
 c_736334.fn = (function_type)__lambda_112;
c_736334.num_args = 1;
c_736334.num_elements = 8;
c_736334.elements = (object *)e_736631;
c_736334.elements[0] = ((closureN)self_734685)->elements[0];
c_736334.elements[1] = ((closureN)self_734685)->elements[1];
c_736334.elements[2] = ((closureN)self_734685)->elements[2];
c_736334.elements[3] = ((closureN)self_734685)->elements[3];
c_736334.elements[4] = ((closureN)self_734685)->elements[4];
c_736334.elements[5] = ((closureN)self_734685)->elements[5];
c_736334.elements[6] = r_733201;
c_736334.elements[7] = ((closureN)self_734685)->elements[7];

return_closcall2(data,  ((closureN)self_734685)->elements[6],  &c_736334, quote_new_91args);; 
}

static void __lambda_112(void *data, object self_734686, int argc, object *args) /* object self_734686, object r_733206 */
 {
 object r_733206 = args[0];
  
closureN_type c_736336;
object e_736609 [9];
c_736336.hdr.mark = gc_color_red;
 c_736336.hdr.grayed = 0;
c_736336.tag = closureN_tag;
 c_736336.fn = (function_type)__lambda_113;
c_736336.num_args = 1;
c_736336.num_elements = 9;
c_736336.elements = (object *)e_736609;
c_736336.elements[0] = ((closureN)self_734686)->elements[0];
c_736336.elements[1] = ((closureN)self_734686)->elements[1];
c_736336.elements[2] = ((closureN)self_734686)->elements[2];
c_736336.elements[3] = ((closureN)self_734686)->elements[3];
c_736336.elements[4] = ((closureN)self_734686)->elements[4];
c_736336.elements[5] = ((closureN)self_734686)->elements[5];
c_736336.elements[6] = ((closureN)self_734686)->elements[6];
c_736336.elements[7] = r_733206;
c_736336.elements[8] = ((closureN)self_734686)->elements[7];


















make_pair(c_736630,quote__93_93_93,NULL);c_736630.hdr.immutable = 1;

make_pair(c_736629,quote__127body2,&c_736630);c_736629.hdr.immutable = 1;

make_pair(c_736628,quote__127body1,&c_736629);c_736628.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736336, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734686)->elements[7])))), Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734686)->elements[7])))), &c_736628);; 
}

static void __lambda_113(void *data, object self_734687, int argc, object *args) /* object self_734687, object r_733209 */
 {
 object r_733209 = args[0];
  
closureN_type c_736338;
object e_736593 [9];
c_736338.hdr.mark = gc_color_red;
 c_736338.hdr.grayed = 0;
c_736338.tag = closureN_tag;
 c_736338.fn = (function_type)__lambda_114;
c_736338.num_args = 1;
c_736338.num_elements = 9;
c_736338.elements = (object *)e_736593;
c_736338.elements[0] = ((closureN)self_734687)->elements[0];
c_736338.elements[1] = ((closureN)self_734687)->elements[1];
c_736338.elements[2] = ((closureN)self_734687)->elements[2];
c_736338.elements[3] = ((closureN)self_734687)->elements[3];
c_736338.elements[4] = ((closureN)self_734687)->elements[4];
c_736338.elements[5] = ((closureN)self_734687)->elements[5];
c_736338.elements[6] = ((closureN)self_734687)->elements[6];
c_736338.elements[7] = ((closureN)self_734687)->elements[7];
c_736338.elements[8] = ((closureN)self_734687)->elements[8];










make_pair(c_736605,quote__93_93_93,NULL);c_736605.hdr.immutable = 1;

make_pair(c_736604,quote__127more,&c_736605);c_736604.hdr.immutable = 1;

make_pair(c_736608,quote__93_93_93,NULL);c_736608.hdr.immutable = 1;

make_pair(c_736607,quote__127body2,&c_736608);c_736607.hdr.immutable = 1;

make_pair(c_736606,quote__127body1,&c_736607);c_736606.hdr.immutable = 1;

make_pair(c_736603,&c_736604,&c_736606);c_736603.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736338, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734687)->elements[8])))), r_733209, &c_736603);; 
}

static void __lambda_114(void *data, object self_734688, int argc, object *args) /* object self_734688, object r_733207 */
 {
 object r_733207 = args[0];
  
closureN_type c_736340;
object e_736584 [8];
c_736340.hdr.mark = gc_color_red;
 c_736340.hdr.grayed = 0;
c_736340.tag = closureN_tag;
 c_736340.fn = (function_type)__lambda_115;
c_736340.num_args = 1;
c_736340.num_elements = 8;
c_736340.elements = (object *)e_736584;
c_736340.elements[0] = ((closureN)self_734688)->elements[0];
c_736340.elements[1] = ((closureN)self_734688)->elements[1];
c_736340.elements[2] = ((closureN)self_734688)->elements[2];
c_736340.elements[3] = ((closureN)self_734688)->elements[3];
c_736340.elements[4] = ((closureN)self_734688)->elements[4];
c_736340.elements[5] = ((closureN)self_734688)->elements[5];
c_736340.elements[6] = ((closureN)self_734688)->elements[6];
c_736340.elements[7] = ((closureN)self_734688)->elements[8];


make_pair(c_736589,quote__93_93_93,NULL);c_736589.hdr.immutable = 1;

make_pair(c_736588,quote__127more,&c_736589);c_736588.hdr.immutable = 1;

make_pair(c_736592,quote__93_93_93,NULL);c_736592.hdr.immutable = 1;

make_pair(c_736591,quote__127body2,&c_736592);c_736591.hdr.immutable = 1;

make_pair(c_736590,quote__127body1,&c_736591);c_736590.hdr.immutable = 1;

make_pair(c_736587,&c_736588,&c_736590);c_736587.hdr.immutable = 1;

make_pair(c_736586,quote_new_91args,&c_736587);c_736586.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736340, ((closureN)self_734688)->elements[7], r_733207, &c_736586);; 
}

static void __lambda_115(void *data, object self_734689, int argc, object *args) /* object self_734689, object r_733204 */
 {
 object r_733204 = args[0];
  
closureN_type c_736342;
object e_736572 [7];
c_736342.hdr.mark = gc_color_red;
 c_736342.hdr.grayed = 0;
c_736342.tag = closureN_tag;
 c_736342.fn = (function_type)__lambda_116;
c_736342.num_args = 1;
c_736342.num_elements = 7;
c_736342.elements = (object *)e_736572;
c_736342.elements[0] = ((closureN)self_734689)->elements[0];
c_736342.elements[1] = ((closureN)self_734689)->elements[1];
c_736342.elements[2] = ((closureN)self_734689)->elements[2];
c_736342.elements[3] = ((closureN)self_734689)->elements[3];
c_736342.elements[4] = ((closureN)self_734689)->elements[4];
c_736342.elements[5] = ((closureN)self_734689)->elements[5];
c_736342.elements[6] = ((closureN)self_734689)->elements[6];




make_pair(c_736580,quote__93_93_93,NULL);c_736580.hdr.immutable = 1;

make_pair(c_736579,quote__127more,&c_736580);c_736579.hdr.immutable = 1;

make_pair(c_736583,quote__93_93_93,NULL);c_736583.hdr.immutable = 1;

make_pair(c_736582,quote__127body2,&c_736583);c_736582.hdr.immutable = 1;

make_pair(c_736581,quote__127body1,&c_736582);c_736581.hdr.immutable = 1;

make_pair(c_736578,&c_736579,&c_736581);c_736578.hdr.immutable = 1;

make_pair(c_736577,quote_new_91args,&c_736578);c_736577.hdr.immutable = 1;

make_pair(c_736576,quote__127orig_91args_91var,&c_736577);c_736576.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736342, Cyc_car(data, ((closureN)self_734689)->elements[7]), r_733204, &c_736576);; 
}

static void __lambda_116(void *data, object self_734690, int argc, object *args) /* object self_734690, object r_733202 */
 {
 object r_733202 = args[0];
  
closureN_type c_736344;
object e_736561 [6];
c_736344.hdr.mark = gc_color_red;
 c_736344.hdr.grayed = 0;
c_736344.tag = closureN_tag;
 c_736344.fn = (function_type)__lambda_117;
c_736344.num_args = 1;
c_736344.num_elements = 6;
c_736344.elements = (object *)e_736561;
c_736344.elements[0] = ((closureN)self_734690)->elements[0];
c_736344.elements[1] = ((closureN)self_734690)->elements[1];
c_736344.elements[2] = ((closureN)self_734690)->elements[2];
c_736344.elements[3] = ((closureN)self_734690)->elements[3];
c_736344.elements[4] = ((closureN)self_734690)->elements[4];
c_736344.elements[5] = ((closureN)self_734690)->elements[5];


make_pair(c_736568,quote__93_93_93,NULL);c_736568.hdr.immutable = 1;

make_pair(c_736567,quote__127more,&c_736568);c_736567.hdr.immutable = 1;

make_pair(c_736571,quote__93_93_93,NULL);c_736571.hdr.immutable = 1;

make_pair(c_736570,quote__127body2,&c_736571);c_736570.hdr.immutable = 1;

make_pair(c_736569,quote__127body1,&c_736570);c_736569.hdr.immutable = 1;

make_pair(c_736566,&c_736567,&c_736569);c_736566.hdr.immutable = 1;

make_pair(c_736565,quote_new_91args,&c_736566);c_736565.hdr.immutable = 1;

make_pair(c_736564,quote__127orig_91args_91var,&c_736565);c_736564.hdr.immutable = 1;

make_pair(c_736563,quote_let_85_91optionals_117aux,&c_736564);c_736563.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736344, ((closureN)self_734690)->elements[6], r_733202, &c_736563);; 
}

static void __lambda_117(void *data, object self_734691, int argc, object *args) /* object self_734691, object r_733198 */
 {
 object r_733198 = args[0];
  
closureN_type c_736346;
object e_736550 [6];
c_736346.hdr.mark = gc_color_red;
 c_736346.hdr.grayed = 0;
c_736346.tag = closureN_tag;
 c_736346.fn = (function_type)__lambda_118;
c_736346.num_args = 1;
c_736346.num_elements = 6;
c_736346.elements = (object *)e_736550;
c_736346.elements[0] = ((closureN)self_734691)->elements[0];
c_736346.elements[1] = ((closureN)self_734691)->elements[1];
c_736346.elements[2] = ((closureN)self_734691)->elements[2];
c_736346.elements[3] = ((closureN)self_734691)->elements[3];
c_736346.elements[4] = ((closureN)self_734691)->elements[4];
c_736346.elements[5] = ((closureN)self_734691)->elements[5];


make_pair(c_736557,quote__93_93_93,NULL);c_736557.hdr.immutable = 1;

make_pair(c_736556,quote__127more,&c_736557);c_736556.hdr.immutable = 1;

make_pair(c_736560,quote__93_93_93,NULL);c_736560.hdr.immutable = 1;

make_pair(c_736559,quote__127body2,&c_736560);c_736559.hdr.immutable = 1;

make_pair(c_736558,quote__127body1,&c_736559);c_736558.hdr.immutable = 1;

make_pair(c_736555,&c_736556,&c_736558);c_736555.hdr.immutable = 1;

make_pair(c_736554,quote_new_91args,&c_736555);c_736554.hdr.immutable = 1;

make_pair(c_736553,quote__127orig_91args_91var,&c_736554);c_736553.hdr.immutable = 1;

make_pair(c_736552,quote_let_85_91optionals_117aux,&c_736553);c_736552.hdr.immutable = 1;

make_pair(c_736551,&c_736552,NULL);c_736551.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736346, r_733198, NULL, &c_736551);; 
}

static void __lambda_118(void *data, object self_734692, int argc, object *args) /* object self_734692, object r_733196 */
 {
 object r_733196 = args[0];
  
closureN_type c_736348;
object e_736527 [5];
c_736348.hdr.mark = gc_color_red;
 c_736348.hdr.grayed = 0;
c_736348.tag = closureN_tag;
 c_736348.fn = (function_type)__lambda_119;
c_736348.num_args = 1;
c_736348.num_elements = 5;
c_736348.elements = (object *)e_736527;
c_736348.elements[0] = ((closureN)self_734692)->elements[0];
c_736348.elements[1] = ((closureN)self_734692)->elements[1];
c_736348.elements[2] = ((closureN)self_734692)->elements[2];
c_736348.elements[3] = ((closureN)self_734692)->elements[3];
c_736348.elements[4] = ((closureN)self_734692)->elements[4];


make_pair(c_736534,quote__127args_91var,NULL);c_736534.hdr.immutable = 1;

make_pair(c_736533,quote_car,&c_736534);c_736533.hdr.immutable = 1;

make_pair(c_736532,&c_736533,NULL);c_736532.hdr.immutable = 1;

make_pair(c_736531,quote__127var,&c_736532);c_736531.hdr.immutable = 1;

make_pair(c_736539,quote__127args_91var,NULL);c_736539.hdr.immutable = 1;

make_pair(c_736538,quote_cdr,&c_736539);c_736538.hdr.immutable = 1;

make_pair(c_736537,&c_736538,NULL);c_736537.hdr.immutable = 1;

make_pair(c_736536,quote_new_91args,&c_736537);c_736536.hdr.immutable = 1;

make_pair(c_736535,&c_736536,NULL);c_736535.hdr.immutable = 1;

make_pair(c_736530,&c_736531,&c_736535);c_736530.hdr.immutable = 1;

make_pair(c_736546,quote__93_93_93,NULL);c_736546.hdr.immutable = 1;

make_pair(c_736545,quote__127more,&c_736546);c_736545.hdr.immutable = 1;

make_pair(c_736549,quote__93_93_93,NULL);c_736549.hdr.immutable = 1;

make_pair(c_736548,quote__127body2,&c_736549);c_736548.hdr.immutable = 1;

make_pair(c_736547,quote__127body1,&c_736548);c_736547.hdr.immutable = 1;

make_pair(c_736544,&c_736545,&c_736547);c_736544.hdr.immutable = 1;

make_pair(c_736543,quote_new_91args,&c_736544);c_736543.hdr.immutable = 1;

make_pair(c_736542,quote__127orig_91args_91var,&c_736543);c_736542.hdr.immutable = 1;

make_pair(c_736541,quote_let_85_91optionals_117aux,&c_736542);c_736541.hdr.immutable = 1;

make_pair(c_736540,&c_736541,NULL);c_736540.hdr.immutable = 1;

make_pair(c_736529,&c_736530,&c_736540);c_736529.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736348, ((closureN)self_734692)->elements[5], r_733196, &c_736529);; 
}

static void __lambda_119(void *data, object self_734693, int argc, object *args) /* object self_734693, object r_733193 */
 {
 object r_733193 = args[0];
  
closureN_type c_736350;
object e_736503 [4];
c_736350.hdr.mark = gc_color_red;
 c_736350.hdr.grayed = 0;
c_736350.tag = closureN_tag;
 c_736350.fn = (function_type)__lambda_120;
c_736350.num_args = 1;
c_736350.num_elements = 4;
c_736350.elements = (object *)e_736503;
c_736350.elements[0] = ((closureN)self_734693)->elements[0];
c_736350.elements[1] = ((closureN)self_734693)->elements[1];
c_736350.elements[2] = ((closureN)self_734693)->elements[2];
c_736350.elements[3] = ((closureN)self_734693)->elements[3];


make_pair(c_736511,quote__127args_91var,NULL);c_736511.hdr.immutable = 1;

make_pair(c_736510,quote_car,&c_736511);c_736510.hdr.immutable = 1;

make_pair(c_736509,&c_736510,NULL);c_736509.hdr.immutable = 1;

make_pair(c_736508,quote__127var,&c_736509);c_736508.hdr.immutable = 1;

make_pair(c_736516,quote__127args_91var,NULL);c_736516.hdr.immutable = 1;

make_pair(c_736515,quote_cdr,&c_736516);c_736515.hdr.immutable = 1;

make_pair(c_736514,&c_736515,NULL);c_736514.hdr.immutable = 1;

make_pair(c_736513,quote_new_91args,&c_736514);c_736513.hdr.immutable = 1;

make_pair(c_736512,&c_736513,NULL);c_736512.hdr.immutable = 1;

make_pair(c_736507,&c_736508,&c_736512);c_736507.hdr.immutable = 1;

make_pair(c_736523,quote__93_93_93,NULL);c_736523.hdr.immutable = 1;

make_pair(c_736522,quote__127more,&c_736523);c_736522.hdr.immutable = 1;

make_pair(c_736526,quote__93_93_93,NULL);c_736526.hdr.immutable = 1;

make_pair(c_736525,quote__127body2,&c_736526);c_736525.hdr.immutable = 1;

make_pair(c_736524,quote__127body1,&c_736525);c_736524.hdr.immutable = 1;

make_pair(c_736521,&c_736522,&c_736524);c_736521.hdr.immutable = 1;

make_pair(c_736520,quote_new_91args,&c_736521);c_736520.hdr.immutable = 1;

make_pair(c_736519,quote__127orig_91args_91var,&c_736520);c_736519.hdr.immutable = 1;

make_pair(c_736518,quote_let_85_91optionals_117aux,&c_736519);c_736518.hdr.immutable = 1;

make_pair(c_736517,&c_736518,NULL);c_736517.hdr.immutable = 1;

make_pair(c_736506,&c_736507,&c_736517);c_736506.hdr.immutable = 1;

make_pair(c_736505,quote_let,&c_736506);c_736505.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736350, ((closureN)self_734693)->elements[4], r_733193, &c_736505);; 
}

static void __lambda_120(void *data, object self_734694, int argc, object *args) /* object self_734694, object r_733189 */
 {
 object r_733189 = args[0];
  
closureN_type c_736352;
object e_736479 [4];
c_736352.hdr.mark = gc_color_red;
 c_736352.hdr.grayed = 0;
c_736352.tag = closureN_tag;
 c_736352.fn = (function_type)__lambda_121;
c_736352.num_args = 1;
c_736352.num_elements = 4;
c_736352.elements = (object *)e_736479;
c_736352.elements[0] = ((closureN)self_734694)->elements[0];
c_736352.elements[1] = ((closureN)self_734694)->elements[1];
c_736352.elements[2] = ((closureN)self_734694)->elements[2];
c_736352.elements[3] = ((closureN)self_734694)->elements[3];


make_pair(c_736487,quote__127args_91var,NULL);c_736487.hdr.immutable = 1;

make_pair(c_736486,quote_car,&c_736487);c_736486.hdr.immutable = 1;

make_pair(c_736485,&c_736486,NULL);c_736485.hdr.immutable = 1;

make_pair(c_736484,quote__127var,&c_736485);c_736484.hdr.immutable = 1;

make_pair(c_736492,quote__127args_91var,NULL);c_736492.hdr.immutable = 1;

make_pair(c_736491,quote_cdr,&c_736492);c_736491.hdr.immutable = 1;

make_pair(c_736490,&c_736491,NULL);c_736490.hdr.immutable = 1;

make_pair(c_736489,quote_new_91args,&c_736490);c_736489.hdr.immutable = 1;

make_pair(c_736488,&c_736489,NULL);c_736488.hdr.immutable = 1;

make_pair(c_736483,&c_736484,&c_736488);c_736483.hdr.immutable = 1;

make_pair(c_736499,quote__93_93_93,NULL);c_736499.hdr.immutable = 1;

make_pair(c_736498,quote__127more,&c_736499);c_736498.hdr.immutable = 1;

make_pair(c_736502,quote__93_93_93,NULL);c_736502.hdr.immutable = 1;

make_pair(c_736501,quote__127body2,&c_736502);c_736501.hdr.immutable = 1;

make_pair(c_736500,quote__127body1,&c_736501);c_736500.hdr.immutable = 1;

make_pair(c_736497,&c_736498,&c_736500);c_736497.hdr.immutable = 1;

make_pair(c_736496,quote_new_91args,&c_736497);c_736496.hdr.immutable = 1;

make_pair(c_736495,quote__127orig_91args_91var,&c_736496);c_736495.hdr.immutable = 1;

make_pair(c_736494,quote_let_85_91optionals_117aux,&c_736495);c_736494.hdr.immutable = 1;

make_pair(c_736493,&c_736494,NULL);c_736493.hdr.immutable = 1;

make_pair(c_736482,&c_736483,&c_736493);c_736482.hdr.immutable = 1;

make_pair(c_736481,quote_let,&c_736482);c_736481.hdr.immutable = 1;

make_pair(c_736480,&c_736481,NULL);c_736480.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736352, r_733189, NULL, &c_736480);; 
}

static void __lambda_121(void *data, object self_734695, int argc, object *args) /* object self_734695, object r_733187 */
 {
 object r_733187 = args[0];
  
closureN_type c_736354;
object e_736443 [3];
c_736354.hdr.mark = gc_color_red;
 c_736354.hdr.grayed = 0;
c_736354.tag = closureN_tag;
 c_736354.fn = (function_type)__lambda_122;
c_736354.num_args = 1;
c_736354.num_elements = 3;
c_736354.elements = (object *)e_736443;
c_736354.elements[0] = ((closureN)self_734695)->elements[0];
c_736354.elements[1] = ((closureN)self_734695)->elements[1];
c_736354.elements[2] = ((closureN)self_734695)->elements[2];


make_pair(c_736450,quote__127default,NULL);c_736450.hdr.immutable = 1;

make_pair(c_736449,quote__127var,&c_736450);c_736449.hdr.immutable = 1;

make_pair(c_736452,quote__93_93_93,NULL);c_736452.hdr.immutable = 1;

make_pair(c_736451,quote__127more,&c_736452);c_736451.hdr.immutable = 1;

make_pair(c_736448,&c_736449,&c_736451);c_736448.hdr.immutable = 1;

make_pair(c_736455,quote__93_93_93,NULL);c_736455.hdr.immutable = 1;

make_pair(c_736454,quote__127body2,&c_736455);c_736454.hdr.immutable = 1;

make_pair(c_736453,quote__127body1,&c_736454);c_736453.hdr.immutable = 1;

make_pair(c_736447,&c_736448,&c_736453);c_736447.hdr.immutable = 1;

make_pair(c_736446,quote_let_85,&c_736447);c_736446.hdr.immutable = 1;

make_pair(c_736463,quote__127args_91var,NULL);c_736463.hdr.immutable = 1;

make_pair(c_736462,quote_car,&c_736463);c_736462.hdr.immutable = 1;

make_pair(c_736461,&c_736462,NULL);c_736461.hdr.immutable = 1;

make_pair(c_736460,quote__127var,&c_736461);c_736460.hdr.immutable = 1;

make_pair(c_736468,quote__127args_91var,NULL);c_736468.hdr.immutable = 1;

make_pair(c_736467,quote_cdr,&c_736468);c_736467.hdr.immutable = 1;

make_pair(c_736466,&c_736467,NULL);c_736466.hdr.immutable = 1;

make_pair(c_736465,quote_new_91args,&c_736466);c_736465.hdr.immutable = 1;

make_pair(c_736464,&c_736465,NULL);c_736464.hdr.immutable = 1;

make_pair(c_736459,&c_736460,&c_736464);c_736459.hdr.immutable = 1;

make_pair(c_736475,quote__93_93_93,NULL);c_736475.hdr.immutable = 1;

make_pair(c_736474,quote__127more,&c_736475);c_736474.hdr.immutable = 1;

make_pair(c_736478,quote__93_93_93,NULL);c_736478.hdr.immutable = 1;

make_pair(c_736477,quote__127body2,&c_736478);c_736477.hdr.immutable = 1;

make_pair(c_736476,quote__127body1,&c_736477);c_736476.hdr.immutable = 1;

make_pair(c_736473,&c_736474,&c_736476);c_736473.hdr.immutable = 1;

make_pair(c_736472,quote_new_91args,&c_736473);c_736472.hdr.immutable = 1;

make_pair(c_736471,quote__127orig_91args_91var,&c_736472);c_736471.hdr.immutable = 1;

make_pair(c_736470,quote_let_85_91optionals_117aux,&c_736471);c_736470.hdr.immutable = 1;

make_pair(c_736469,&c_736470,NULL);c_736469.hdr.immutable = 1;

make_pair(c_736458,&c_736459,&c_736469);c_736458.hdr.immutable = 1;

make_pair(c_736457,quote_let,&c_736458);c_736457.hdr.immutable = 1;

make_pair(c_736456,&c_736457,NULL);c_736456.hdr.immutable = 1;

make_pair(c_736445,&c_736446,&c_736456);c_736445.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736354, ((closureN)self_734695)->elements[3], r_733187, &c_736445);; 
}

static void __lambda_122(void *data, object self_734696, int argc, object *args) /* object self_734696, object r_733184 */
 {
 object r_733184 = args[0];
  
closureN_type c_736356;
object e_736404 [2];
c_736356.hdr.mark = gc_color_red;
 c_736356.hdr.grayed = 0;
c_736356.tag = closureN_tag;
 c_736356.fn = (function_type)__lambda_123;
c_736356.num_args = 1;
c_736356.num_elements = 2;
c_736356.elements = (object *)e_736404;
c_736356.elements[0] = ((closureN)self_734696)->elements[0];
c_736356.elements[1] = ((closureN)self_734696)->elements[1];


make_pair(c_736408,quote__127args_91var,NULL);c_736408.hdr.immutable = 1;

make_pair(c_736407,quote_null_127,&c_736408);c_736407.hdr.immutable = 1;

make_pair(c_736414,quote__127default,NULL);c_736414.hdr.immutable = 1;

make_pair(c_736413,quote__127var,&c_736414);c_736413.hdr.immutable = 1;

make_pair(c_736416,quote__93_93_93,NULL);c_736416.hdr.immutable = 1;

make_pair(c_736415,quote__127more,&c_736416);c_736415.hdr.immutable = 1;

make_pair(c_736412,&c_736413,&c_736415);c_736412.hdr.immutable = 1;

make_pair(c_736419,quote__93_93_93,NULL);c_736419.hdr.immutable = 1;

make_pair(c_736418,quote__127body2,&c_736419);c_736418.hdr.immutable = 1;

make_pair(c_736417,quote__127body1,&c_736418);c_736417.hdr.immutable = 1;

make_pair(c_736411,&c_736412,&c_736417);c_736411.hdr.immutable = 1;

make_pair(c_736410,quote_let_85,&c_736411);c_736410.hdr.immutable = 1;

make_pair(c_736427,quote__127args_91var,NULL);c_736427.hdr.immutable = 1;

make_pair(c_736426,quote_car,&c_736427);c_736426.hdr.immutable = 1;

make_pair(c_736425,&c_736426,NULL);c_736425.hdr.immutable = 1;

make_pair(c_736424,quote__127var,&c_736425);c_736424.hdr.immutable = 1;

make_pair(c_736432,quote__127args_91var,NULL);c_736432.hdr.immutable = 1;

make_pair(c_736431,quote_cdr,&c_736432);c_736431.hdr.immutable = 1;

make_pair(c_736430,&c_736431,NULL);c_736430.hdr.immutable = 1;

make_pair(c_736429,quote_new_91args,&c_736430);c_736429.hdr.immutable = 1;

make_pair(c_736428,&c_736429,NULL);c_736428.hdr.immutable = 1;

make_pair(c_736423,&c_736424,&c_736428);c_736423.hdr.immutable = 1;

make_pair(c_736439,quote__93_93_93,NULL);c_736439.hdr.immutable = 1;

make_pair(c_736438,quote__127more,&c_736439);c_736438.hdr.immutable = 1;

make_pair(c_736442,quote__93_93_93,NULL);c_736442.hdr.immutable = 1;

make_pair(c_736441,quote__127body2,&c_736442);c_736441.hdr.immutable = 1;

make_pair(c_736440,quote__127body1,&c_736441);c_736440.hdr.immutable = 1;

make_pair(c_736437,&c_736438,&c_736440);c_736437.hdr.immutable = 1;

make_pair(c_736436,quote_new_91args,&c_736437);c_736436.hdr.immutable = 1;

make_pair(c_736435,quote__127orig_91args_91var,&c_736436);c_736435.hdr.immutable = 1;

make_pair(c_736434,quote_let_85_91optionals_117aux,&c_736435);c_736434.hdr.immutable = 1;

make_pair(c_736433,&c_736434,NULL);c_736433.hdr.immutable = 1;

make_pair(c_736422,&c_736423,&c_736433);c_736422.hdr.immutable = 1;

make_pair(c_736421,quote_let,&c_736422);c_736421.hdr.immutable = 1;

make_pair(c_736420,&c_736421,NULL);c_736420.hdr.immutable = 1;

make_pair(c_736409,&c_736410,&c_736420);c_736409.hdr.immutable = 1;

make_pair(c_736406,&c_736407,&c_736409);c_736406.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736356, ((closureN)self_734696)->elements[2], r_733184, &c_736406);; 
}

static void __lambda_123(void *data, object self_734697, int argc, object *args) /* object self_734697, object r_733181 */
 {
 object r_733181 = args[0];
  
closureN_type c_736358;
object e_736364 [1];
c_736358.hdr.mark = gc_color_red;
 c_736358.hdr.grayed = 0;
c_736358.tag = closureN_tag;
 c_736358.fn = (function_type)__lambda_124;
c_736358.num_args = 1;
c_736358.num_elements = 1;
c_736358.elements = (object *)e_736364;
c_736358.elements[0] = ((closureN)self_734697)->elements[0];


make_pair(c_736369,quote__127args_91var,NULL);c_736369.hdr.immutable = 1;

make_pair(c_736368,quote_null_127,&c_736369);c_736368.hdr.immutable = 1;

make_pair(c_736375,quote__127default,NULL);c_736375.hdr.immutable = 1;

make_pair(c_736374,quote__127var,&c_736375);c_736374.hdr.immutable = 1;

make_pair(c_736377,quote__93_93_93,NULL);c_736377.hdr.immutable = 1;

make_pair(c_736376,quote__127more,&c_736377);c_736376.hdr.immutable = 1;

make_pair(c_736373,&c_736374,&c_736376);c_736373.hdr.immutable = 1;

make_pair(c_736380,quote__93_93_93,NULL);c_736380.hdr.immutable = 1;

make_pair(c_736379,quote__127body2,&c_736380);c_736379.hdr.immutable = 1;

make_pair(c_736378,quote__127body1,&c_736379);c_736378.hdr.immutable = 1;

make_pair(c_736372,&c_736373,&c_736378);c_736372.hdr.immutable = 1;

make_pair(c_736371,quote_let_85,&c_736372);c_736371.hdr.immutable = 1;

make_pair(c_736388,quote__127args_91var,NULL);c_736388.hdr.immutable = 1;

make_pair(c_736387,quote_car,&c_736388);c_736387.hdr.immutable = 1;

make_pair(c_736386,&c_736387,NULL);c_736386.hdr.immutable = 1;

make_pair(c_736385,quote__127var,&c_736386);c_736385.hdr.immutable = 1;

make_pair(c_736393,quote__127args_91var,NULL);c_736393.hdr.immutable = 1;

make_pair(c_736392,quote_cdr,&c_736393);c_736392.hdr.immutable = 1;

make_pair(c_736391,&c_736392,NULL);c_736391.hdr.immutable = 1;

make_pair(c_736390,quote_new_91args,&c_736391);c_736390.hdr.immutable = 1;

make_pair(c_736389,&c_736390,NULL);c_736389.hdr.immutable = 1;

make_pair(c_736384,&c_736385,&c_736389);c_736384.hdr.immutable = 1;

make_pair(c_736400,quote__93_93_93,NULL);c_736400.hdr.immutable = 1;

make_pair(c_736399,quote__127more,&c_736400);c_736399.hdr.immutable = 1;

make_pair(c_736403,quote__93_93_93,NULL);c_736403.hdr.immutable = 1;

make_pair(c_736402,quote__127body2,&c_736403);c_736402.hdr.immutable = 1;

make_pair(c_736401,quote__127body1,&c_736402);c_736401.hdr.immutable = 1;

make_pair(c_736398,&c_736399,&c_736401);c_736398.hdr.immutable = 1;

make_pair(c_736397,quote_new_91args,&c_736398);c_736397.hdr.immutable = 1;

make_pair(c_736396,quote__127orig_91args_91var,&c_736397);c_736396.hdr.immutable = 1;

make_pair(c_736395,quote_let_85_91optionals_117aux,&c_736396);c_736395.hdr.immutable = 1;

make_pair(c_736394,&c_736395,NULL);c_736394.hdr.immutable = 1;

make_pair(c_736383,&c_736384,&c_736394);c_736383.hdr.immutable = 1;

make_pair(c_736382,quote_let,&c_736383);c_736382.hdr.immutable = 1;

make_pair(c_736381,&c_736382,NULL);c_736381.hdr.immutable = 1;

make_pair(c_736370,&c_736371,&c_736381);c_736370.hdr.immutable = 1;

make_pair(c_736367,&c_736368,&c_736370);c_736367.hdr.immutable = 1;

make_pair(c_736366,quote__if,&c_736367);c_736366.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736358, ((closureN)self_734697)->elements[1], r_733181, &c_736366);; 
}

static void __lambda_124(void *data, object self_734698, int argc, object *args) /* object self_734698, object r_733179 */
 {
 object r_733179 = args[0];
  
pair_type local_736363; 
return_direct_with_clo1(data,  ((closureN)self_734698)->elements[0], (((closure)  ((closureN)self_734698)->elements[0])->fn),  set_pair_as_expr(&local_736363, r_733179, boolean_f));; 
}

static void __lambda_61(void *data, object self_734699, int argc, object *args) /* object self_734699, object k_733267 */
 {
 object k_733267 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_734699)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_734699)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734699)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734699)->elements[1]))))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734699)->elements[1]))))) ){ 
    complex_num_type local_735948; 
  
  
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_735948, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734699)->elements[1])))))) ){ 
  
closureN_type c_735960;
object e_736158 [3];
c_735960.hdr.mark = gc_color_red;
 c_735960.hdr.grayed = 0;
c_735960.tag = closureN_tag;
 c_735960.fn = (function_type)__lambda_62;
c_735960.num_args = 1;
c_735960.num_elements = 3;
c_735960.elements = (object *)e_736158;
c_735960.elements[0] = k_733267;
c_735960.elements[1] = ((closureN)self_734699)->elements[0];
c_735960.elements[2] = ((closureN)self_734699)->elements[1];

return_closcall2(data,  ((closureN)self_734699)->elements[0],  &c_735960, quote__if);
} else { 
  return_direct_with_clo1(data,  k_733267, (((closure)  k_733267)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733267, (((closure)  k_733267)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733267, (((closure)  k_733267)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733267, (((closure)  k_733267)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733267, (((closure)  k_733267)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733267, (((closure)  k_733267)->fn),  boolean_f);}
;; 
}

static void __lambda_62(void *data, object self_734700, int argc, object *args) /* object self_734700, object r_733283 */
 {
 object r_733283 = args[0];
  
closureN_type c_735963;
object e_736157 [4];
c_735963.hdr.mark = gc_color_red;
 c_735963.hdr.grayed = 0;
c_735963.tag = closureN_tag;
 c_735963.fn = (function_type)__lambda_63;
c_735963.num_args = 1;
c_735963.num_elements = 4;
c_735963.elements = (object *)e_736157;
c_735963.elements[0] = ((closureN)self_734700)->elements[0];
c_735963.elements[1] = r_733283;
c_735963.elements[2] = ((closureN)self_734700)->elements[1];
c_735963.elements[3] = ((closureN)self_734700)->elements[2];

return_closcall2(data,  ((closureN)self_734700)->elements[1],  &c_735963, quote_null_127);; 
}

static void __lambda_63(void *data, object self_734701, int argc, object *args) /* object self_734701, object r_733320 */
 {
 object r_733320 = args[0];
  
closureN_type c_735965;
object e_736150 [5];
c_735965.hdr.mark = gc_color_red;
 c_735965.hdr.grayed = 0;
c_735965.tag = closureN_tag;
 c_735965.fn = (function_type)__lambda_64;
c_735965.num_args = 1;
c_735965.num_elements = 5;
c_735965.elements = (object *)e_736150;
c_735965.elements[0] = ((closureN)self_734701)->elements[0];
c_735965.elements[1] = ((closureN)self_734701)->elements[1];
c_735965.elements[2] = r_733320;
c_735965.elements[3] = ((closureN)self_734701)->elements[2];
c_735965.elements[4] = ((closureN)self_734701)->elements[3];






make_pair(c_736156,quote__127args_91var,NULL);c_736156.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735965, Cyc_car(data, Cyc_cdr(data, ((closureN)self_734701)->elements[3])), NULL, &c_736156);; 
}

static void __lambda_64(void *data, object self_734702, int argc, object *args) /* object self_734702, object r_733321 */
 {
 object r_733321 = args[0];
  
closureN_type c_735967;
object e_736146 [4];
c_735967.hdr.mark = gc_color_red;
 c_735967.hdr.grayed = 0;
c_735967.tag = closureN_tag;
 c_735967.fn = (function_type)__lambda_65;
c_735967.num_args = 1;
c_735967.num_elements = 4;
c_735967.elements = (object *)e_736146;
c_735967.elements[0] = ((closureN)self_734702)->elements[0];
c_735967.elements[1] = ((closureN)self_734702)->elements[1];
c_735967.elements[2] = ((closureN)self_734702)->elements[3];
c_735967.elements[3] = ((closureN)self_734702)->elements[4];


make_pair(c_736149,quote__127args_91var,NULL);c_736149.hdr.immutable = 1;

make_pair(c_736148,quote_null_127,&c_736149);c_736148.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735967, ((closureN)self_734702)->elements[2], r_733321, &c_736148);; 
}

static void __lambda_65(void *data, object self_734703, int argc, object *args) /* object self_734703, object r_733286 */
 {
 object r_733286 = args[0];
  
closureN_type c_735970;
object e_736145 [5];
c_735970.hdr.mark = gc_color_red;
 c_735970.hdr.grayed = 0;
c_735970.tag = closureN_tag;
 c_735970.fn = (function_type)__lambda_66;
c_735970.num_args = 1;
c_735970.num_elements = 5;
c_735970.elements = (object *)e_736145;
c_735970.elements[0] = ((closureN)self_734703)->elements[0];
c_735970.elements[1] = ((closureN)self_734703)->elements[1];
c_735970.elements[2] = r_733286;
c_735970.elements[3] = ((closureN)self_734703)->elements[2];
c_735970.elements[4] = ((closureN)self_734703)->elements[3];

return_closcall2(data,  ((closureN)self_734703)->elements[2],  &c_735970, quote_let);; 
}

static void __lambda_66(void *data, object self_734704, int argc, object *args) /* object self_734704, object r_733312 */
 {
 object r_733312 = args[0];
  
closureN_type c_735972;
object e_736123 [6];
c_735972.hdr.mark = gc_color_red;
 c_735972.hdr.grayed = 0;
c_735972.tag = closureN_tag;
 c_735972.fn = (function_type)__lambda_67;
c_735972.num_args = 1;
c_735972.num_elements = 6;
c_735972.elements = (object *)e_736123;
c_735972.elements[0] = ((closureN)self_734704)->elements[0];
c_735972.elements[1] = ((closureN)self_734704)->elements[1];
c_735972.elements[2] = ((closureN)self_734704)->elements[2];
c_735972.elements[3] = r_733312;
c_735972.elements[4] = ((closureN)self_734704)->elements[3];
c_735972.elements[5] = ((closureN)self_734704)->elements[4];


















make_pair(c_736144,quote__93_93_93,NULL);c_736144.hdr.immutable = 1;

make_pair(c_736143,quote__127body2,&c_736144);c_736143.hdr.immutable = 1;

make_pair(c_736142,quote__127body1,&c_736143);c_736142.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735972, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734704)->elements[4])))), Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734704)->elements[4])))), &c_736142);; 
}

static void __lambda_67(void *data, object self_734705, int argc, object *args) /* object self_734705, object r_733316 */
 {
 object r_733316 = args[0];
  
closureN_type c_735974;
object e_736118 [6];
c_735974.hdr.mark = gc_color_red;
 c_735974.hdr.grayed = 0;
c_735974.tag = closureN_tag;
 c_735974.fn = (function_type)__lambda_68;
c_735974.num_args = 1;
c_735974.num_elements = 6;
c_735974.elements = (object *)e_736118;
c_735974.elements[0] = ((closureN)self_734705)->elements[0];
c_735974.elements[1] = ((closureN)self_734705)->elements[1];
c_735974.elements[2] = ((closureN)self_734705)->elements[2];
c_735974.elements[3] = ((closureN)self_734705)->elements[3];
c_735974.elements[4] = ((closureN)self_734705)->elements[4];
c_735974.elements[5] = ((closureN)self_734705)->elements[5];


make_pair(c_736122,quote__93_93_93,NULL);c_736122.hdr.immutable = 1;

make_pair(c_736121,quote__127body2,&c_736122);c_736121.hdr.immutable = 1;

make_pair(c_736120,quote__127body1,&c_736121);c_736120.hdr.immutable = 1;

make_pair(c_736119,NULL,&c_736120);c_736119.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735974, NULL, r_733316, &c_736119);; 
}

static void __lambda_68(void *data, object self_734706, int argc, object *args) /* object self_734706, object r_733313 */
 {
 object r_733313 = args[0];
  
closureN_type c_735976;
object e_736111 [5];
c_735976.hdr.mark = gc_color_red;
 c_735976.hdr.grayed = 0;
c_735976.tag = closureN_tag;
 c_735976.fn = (function_type)__lambda_69;
c_735976.num_args = 1;
c_735976.num_elements = 5;
c_735976.elements = (object *)e_736111;
c_735976.elements[0] = ((closureN)self_734706)->elements[0];
c_735976.elements[1] = ((closureN)self_734706)->elements[1];
c_735976.elements[2] = ((closureN)self_734706)->elements[2];
c_735976.elements[3] = ((closureN)self_734706)->elements[4];
c_735976.elements[4] = ((closureN)self_734706)->elements[5];


make_pair(c_736117,quote__93_93_93,NULL);c_736117.hdr.immutable = 1;

make_pair(c_736116,quote__127body2,&c_736117);c_736116.hdr.immutable = 1;

make_pair(c_736115,quote__127body1,&c_736116);c_736115.hdr.immutable = 1;

make_pair(c_736114,NULL,&c_736115);c_736114.hdr.immutable = 1;

make_pair(c_736113,quote_let,&c_736114);c_736113.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735976, ((closureN)self_734706)->elements[3], r_733313, &c_736113);; 
}

static void __lambda_69(void *data, object self_734707, int argc, object *args) /* object self_734707, object r_733289 */
 {
 object r_733289 = args[0];
  
closureN_type c_735979;
object e_736110 [6];
c_735979.hdr.mark = gc_color_red;
 c_735979.hdr.grayed = 0;
c_735979.tag = closureN_tag;
 c_735979.fn = (function_type)__lambda_70;
c_735979.num_args = 1;
c_735979.num_elements = 6;
c_735979.elements = (object *)e_736110;
c_735979.elements[0] = ((closureN)self_734707)->elements[0];
c_735979.elements[1] = ((closureN)self_734707)->elements[1];
c_735979.elements[2] = ((closureN)self_734707)->elements[2];
c_735979.elements[3] = r_733289;
c_735979.elements[4] = ((closureN)self_734707)->elements[3];
c_735979.elements[5] = ((closureN)self_734707)->elements[4];

return_closcall2(data,  ((closureN)self_734707)->elements[3],  &c_735979, quote_error);; 
}

static void __lambda_70(void *data, object self_734708, int argc, object *args) /* object self_734708, object r_733295 */
 {
 object r_733295 = args[0];
  
closureN_type c_735982;
object e_736109 [6];
c_735982.hdr.mark = gc_color_red;
 c_735982.hdr.grayed = 0;
c_735982.tag = closureN_tag;
 c_735982.fn = (function_type)__lambda_71;
c_735982.num_args = 1;
c_735982.num_elements = 6;
c_735982.elements = (object *)e_736109;
c_735982.elements[0] = ((closureN)self_734708)->elements[0];
c_735982.elements[1] = ((closureN)self_734708)->elements[1];
c_735982.elements[2] = ((closureN)self_734708)->elements[2];
c_735982.elements[3] = ((closureN)self_734708)->elements[3];
c_735982.elements[4] = r_733295;
c_735982.elements[5] = ((closureN)self_734708)->elements[5];

return_closcall2(data,  ((closureN)self_734708)->elements[4],  &c_735982, quote_length);; 
}

static void __lambda_71(void *data, object self_734709, int argc, object *args) /* object self_734709, object r_733305 */
 {
 object r_733305 = args[0];
  
closureN_type c_735984;
object e_736104 [7];
c_735984.hdr.mark = gc_color_red;
 c_735984.hdr.grayed = 0;
c_735984.tag = closureN_tag;
 c_735984.fn = (function_type)__lambda_72;
c_735984.num_args = 1;
c_735984.num_elements = 7;
c_735984.elements = (object *)e_736104;
c_735984.elements[0] = ((closureN)self_734709)->elements[0];
c_735984.elements[1] = ((closureN)self_734709)->elements[1];
c_735984.elements[2] = ((closureN)self_734709)->elements[2];
c_735984.elements[3] = ((closureN)self_734709)->elements[3];
c_735984.elements[4] = ((closureN)self_734709)->elements[4];
c_735984.elements[5] = r_733305;
c_735984.elements[6] = ((closureN)self_734709)->elements[5];




make_pair(c_736108,quote__127orig_91args_91var,NULL);c_736108.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735984, Cyc_car(data, ((closureN)self_734709)->elements[5]), NULL, &c_736108);; 
}

static void __lambda_72(void *data, object self_734710, int argc, object *args) /* object self_734710, object r_733306 */
 {
 object r_733306 = args[0];
  
closureN_type c_735986;
object e_736100 [6];
c_735986.hdr.mark = gc_color_red;
 c_735986.hdr.grayed = 0;
c_735986.tag = closureN_tag;
 c_735986.fn = (function_type)__lambda_73;
c_735986.num_args = 1;
c_735986.num_elements = 6;
c_735986.elements = (object *)e_736100;
c_735986.elements[0] = ((closureN)self_734710)->elements[0];
c_735986.elements[1] = ((closureN)self_734710)->elements[1];
c_735986.elements[2] = ((closureN)self_734710)->elements[2];
c_735986.elements[3] = ((closureN)self_734710)->elements[3];
c_735986.elements[4] = ((closureN)self_734710)->elements[4];
c_735986.elements[5] = ((closureN)self_734710)->elements[6];


make_pair(c_736103,quote__127orig_91args_91var,NULL);c_736103.hdr.immutable = 1;

make_pair(c_736102,quote_length,&c_736103);c_736102.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735986, ((closureN)self_734710)->elements[5], r_733306, &c_736102);; 
}

static void __lambda_73(void *data, object self_734711, int argc, object *args) /* object self_734711, object r_733300 */
 {
 object r_733300 = args[0];
  
closureN_type c_735988;
object e_736095 [6];
c_735988.hdr.mark = gc_color_red;
 c_735988.hdr.grayed = 0;
c_735988.tag = closureN_tag;
 c_735988.fn = (function_type)__lambda_74;
c_735988.num_args = 1;
c_735988.num_elements = 6;
c_735988.elements = (object *)e_736095;
c_735988.elements[0] = ((closureN)self_734711)->elements[0];
c_735988.elements[1] = ((closureN)self_734711)->elements[1];
c_735988.elements[2] = ((closureN)self_734711)->elements[2];
c_735988.elements[3] = ((closureN)self_734711)->elements[3];
c_735988.elements[4] = ((closureN)self_734711)->elements[4];
c_735988.elements[5] = r_733300;




make_pair(c_736099,quote__127orig_91args_91var,NULL);c_736099.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735988, Cyc_car(data, ((closureN)self_734711)->elements[5]), NULL, &c_736099);; 
}

static void __lambda_74(void *data, object self_734712, int argc, object *args) /* object self_734712, object r_733301 */
 {
 object r_733301 = args[0];
  
closureN_type c_735990;
object e_736089 [5];
c_735990.hdr.mark = gc_color_red;
 c_735990.hdr.grayed = 0;
c_735990.tag = closureN_tag;
 c_735990.fn = (function_type)__lambda_75;
c_735990.num_args = 1;
c_735990.num_elements = 5;
c_735990.elements = (object *)e_736089;
c_735990.elements[0] = ((closureN)self_734712)->elements[0];
c_735990.elements[1] = ((closureN)self_734712)->elements[1];
c_735990.elements[2] = ((closureN)self_734712)->elements[2];
c_735990.elements[3] = ((closureN)self_734712)->elements[3];
c_735990.elements[4] = ((closureN)self_734712)->elements[4];


make_pair(c_736093,quote__127orig_91args_91var,NULL);c_736093.hdr.immutable = 1;

make_pair(c_736092,quote_length,&c_736093);c_736092.hdr.immutable = 1;

make_pair(c_736094,quote__127orig_91args_91var,NULL);c_736094.hdr.immutable = 1;

make_pair(c_736091,&c_736092,&c_736094);c_736091.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735990, ((closureN)self_734712)->elements[5], r_733301, &c_736091);; 
}

static void __lambda_75(void *data, object self_734713, int argc, object *args) /* object self_734713, object r_733298 */
 {
 object r_733298 = args[0];
  
closureN_type c_735992;
object e_736081 [5];
c_735992.hdr.mark = gc_color_red;
 c_735992.hdr.grayed = 0;
c_735992.tag = closureN_tag;
 c_735992.fn = (function_type)__lambda_76;
c_735992.num_args = 1;
c_735992.num_elements = 5;
c_735992.elements = (object *)e_736081;
c_735992.elements[0] = ((closureN)self_734713)->elements[0];
c_735992.elements[1] = ((closureN)self_734713)->elements[1];
c_735992.elements[2] = ((closureN)self_734713)->elements[2];
c_735992.elements[3] = ((closureN)self_734713)->elements[3];
c_735992.elements[4] = ((closureN)self_734713)->elements[4];


make_utf8_string_with_len(c_736082, "too many arguments", 18, 18);

make_utf8_string_with_len(c_736084, "too many arguments", 18, 18);c_736084.hdr.immutable = 1;

make_pair(c_736087,quote__127orig_91args_91var,NULL);c_736087.hdr.immutable = 1;

make_pair(c_736086,quote_length,&c_736087);c_736086.hdr.immutable = 1;

make_pair(c_736088,quote__127orig_91args_91var,NULL);c_736088.hdr.immutable = 1;

make_pair(c_736085,&c_736086,&c_736088);c_736085.hdr.immutable = 1;

make_pair(c_736083,&c_736084,&c_736085);c_736083.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735992, &c_736082, r_733298, &c_736083);; 
}

static void __lambda_76(void *data, object self_734714, int argc, object *args) /* object self_734714, object r_733296 */
 {
 object r_733296 = args[0];
  
closureN_type c_735994;
object e_736072 [4];
c_735994.hdr.mark = gc_color_red;
 c_735994.hdr.grayed = 0;
c_735994.tag = closureN_tag;
 c_735994.fn = (function_type)__lambda_77;
c_735994.num_args = 1;
c_735994.num_elements = 4;
c_735994.elements = (object *)e_736072;
c_735994.elements[0] = ((closureN)self_734714)->elements[0];
c_735994.elements[1] = ((closureN)self_734714)->elements[1];
c_735994.elements[2] = ((closureN)self_734714)->elements[2];
c_735994.elements[3] = ((closureN)self_734714)->elements[3];


make_utf8_string_with_len(c_736076, "too many arguments", 18, 18);c_736076.hdr.immutable = 1;

make_pair(c_736079,quote__127orig_91args_91var,NULL);c_736079.hdr.immutable = 1;

make_pair(c_736078,quote_length,&c_736079);c_736078.hdr.immutable = 1;

make_pair(c_736080,quote__127orig_91args_91var,NULL);c_736080.hdr.immutable = 1;

make_pair(c_736077,&c_736078,&c_736080);c_736077.hdr.immutable = 1;

make_pair(c_736075,&c_736076,&c_736077);c_736075.hdr.immutable = 1;

make_pair(c_736074,quote_error,&c_736075);c_736074.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735994, ((closureN)self_734714)->elements[4], r_733296, &c_736074);; 
}

static void __lambda_77(void *data, object self_734715, int argc, object *args) /* object self_734715, object r_733292 */
 {
 object r_733292 = args[0];
  
closureN_type c_735996;
object e_736063 [4];
c_735996.hdr.mark = gc_color_red;
 c_735996.hdr.grayed = 0;
c_735996.tag = closureN_tag;
 c_735996.fn = (function_type)__lambda_78;
c_735996.num_args = 1;
c_735996.num_elements = 4;
c_735996.elements = (object *)e_736063;
c_735996.elements[0] = ((closureN)self_734715)->elements[0];
c_735996.elements[1] = ((closureN)self_734715)->elements[1];
c_735996.elements[2] = ((closureN)self_734715)->elements[2];
c_735996.elements[3] = ((closureN)self_734715)->elements[3];


make_utf8_string_with_len(c_736067, "too many arguments", 18, 18);c_736067.hdr.immutable = 1;

make_pair(c_736070,quote__127orig_91args_91var,NULL);c_736070.hdr.immutable = 1;

make_pair(c_736069,quote_length,&c_736070);c_736069.hdr.immutable = 1;

make_pair(c_736071,quote__127orig_91args_91var,NULL);c_736071.hdr.immutable = 1;

make_pair(c_736068,&c_736069,&c_736071);c_736068.hdr.immutable = 1;

make_pair(c_736066,&c_736067,&c_736068);c_736066.hdr.immutable = 1;

make_pair(c_736065,quote_error,&c_736066);c_736065.hdr.immutable = 1;

make_pair(c_736064,&c_736065,NULL);c_736064.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735996, r_733292, NULL, &c_736064);; 
}

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


make_pair(c_736054,quote__93_93_93,NULL);c_736054.hdr.immutable = 1;

make_pair(c_736053,quote__127body2,&c_736054);c_736053.hdr.immutable = 1;

make_pair(c_736052,quote__127body1,&c_736053);c_736052.hdr.immutable = 1;

make_pair(c_736051,NULL,&c_736052);c_736051.hdr.immutable = 1;

make_pair(c_736050,quote_let,&c_736051);c_736050.hdr.immutable = 1;

make_utf8_string_with_len(c_736058, "too many arguments", 18, 18);c_736058.hdr.immutable = 1;

make_pair(c_736061,quote__127orig_91args_91var,NULL);c_736061.hdr.immutable = 1;

make_pair(c_736060,quote_length,&c_736061);c_736060.hdr.immutable = 1;

make_pair(c_736062,quote__127orig_91args_91var,NULL);c_736062.hdr.immutable = 1;

make_pair(c_736059,&c_736060,&c_736062);c_736059.hdr.immutable = 1;

make_pair(c_736057,&c_736058,&c_736059);c_736057.hdr.immutable = 1;

make_pair(c_736056,quote_error,&c_736057);c_736056.hdr.immutable = 1;

make_pair(c_736055,&c_736056,NULL);c_736055.hdr.immutable = 1;

make_pair(c_736049,&c_736050,&c_736055);c_736049.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735998, ((closureN)self_734716)->elements[3], r_733290, &c_736049);; 
}

static void __lambda_79(void *data, object self_734717, int argc, object *args) /* object self_734717, object r_733287 */
 {
 object r_733287 = args[0];
  
closureN_type c_736000;
object e_736028 [2];
c_736000.hdr.mark = gc_color_red;
 c_736000.hdr.grayed = 0;
c_736000.tag = closureN_tag;
 c_736000.fn = (function_type)__lambda_80;
c_736000.num_args = 1;
c_736000.num_elements = 2;
c_736000.elements = (object *)e_736028;
c_736000.elements[0] = ((closureN)self_734717)->elements[0];
c_736000.elements[1] = ((closureN)self_734717)->elements[1];


make_pair(c_736032,quote__127args_91var,NULL);c_736032.hdr.immutable = 1;

make_pair(c_736031,quote_null_127,&c_736032);c_736031.hdr.immutable = 1;

make_pair(c_736038,quote__93_93_93,NULL);c_736038.hdr.immutable = 1;

make_pair(c_736037,quote__127body2,&c_736038);c_736037.hdr.immutable = 1;

make_pair(c_736036,quote__127body1,&c_736037);c_736036.hdr.immutable = 1;

make_pair(c_736035,NULL,&c_736036);c_736035.hdr.immutable = 1;

make_pair(c_736034,quote_let,&c_736035);c_736034.hdr.immutable = 1;

make_utf8_string_with_len(c_736042, "too many arguments", 18, 18);c_736042.hdr.immutable = 1;

make_pair(c_736045,quote__127orig_91args_91var,NULL);c_736045.hdr.immutable = 1;

make_pair(c_736044,quote_length,&c_736045);c_736044.hdr.immutable = 1;

make_pair(c_736046,quote__127orig_91args_91var,NULL);c_736046.hdr.immutable = 1;

make_pair(c_736043,&c_736044,&c_736046);c_736043.hdr.immutable = 1;

make_pair(c_736041,&c_736042,&c_736043);c_736041.hdr.immutable = 1;

make_pair(c_736040,quote_error,&c_736041);c_736040.hdr.immutable = 1;

make_pair(c_736039,&c_736040,NULL);c_736039.hdr.immutable = 1;

make_pair(c_736033,&c_736034,&c_736039);c_736033.hdr.immutable = 1;

make_pair(c_736030,&c_736031,&c_736033);c_736030.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736000, ((closureN)self_734717)->elements[2], r_733287, &c_736030);; 
}

static void __lambda_80(void *data, object self_734718, int argc, object *args) /* object self_734718, object r_733284 */
 {
 object r_733284 = args[0];
  
closureN_type c_736002;
object e_736008 [1];
c_736002.hdr.mark = gc_color_red;
 c_736002.hdr.grayed = 0;
c_736002.tag = closureN_tag;
 c_736002.fn = (function_type)__lambda_81;
c_736002.num_args = 1;
c_736002.num_elements = 1;
c_736002.elements = (object *)e_736008;
c_736002.elements[0] = ((closureN)self_734718)->elements[0];


make_pair(c_736013,quote__127args_91var,NULL);c_736013.hdr.immutable = 1;

make_pair(c_736012,quote_null_127,&c_736013);c_736012.hdr.immutable = 1;

make_pair(c_736019,quote__93_93_93,NULL);c_736019.hdr.immutable = 1;

make_pair(c_736018,quote__127body2,&c_736019);c_736018.hdr.immutable = 1;

make_pair(c_736017,quote__127body1,&c_736018);c_736017.hdr.immutable = 1;

make_pair(c_736016,NULL,&c_736017);c_736016.hdr.immutable = 1;

make_pair(c_736015,quote_let,&c_736016);c_736015.hdr.immutable = 1;

make_utf8_string_with_len(c_736023, "too many arguments", 18, 18);c_736023.hdr.immutable = 1;

make_pair(c_736026,quote__127orig_91args_91var,NULL);c_736026.hdr.immutable = 1;

make_pair(c_736025,quote_length,&c_736026);c_736025.hdr.immutable = 1;

make_pair(c_736027,quote__127orig_91args_91var,NULL);c_736027.hdr.immutable = 1;

make_pair(c_736024,&c_736025,&c_736027);c_736024.hdr.immutable = 1;

make_pair(c_736022,&c_736023,&c_736024);c_736022.hdr.immutable = 1;

make_pair(c_736021,quote_error,&c_736022);c_736021.hdr.immutable = 1;

make_pair(c_736020,&c_736021,NULL);c_736020.hdr.immutable = 1;

make_pair(c_736014,&c_736015,&c_736020);c_736014.hdr.immutable = 1;

make_pair(c_736011,&c_736012,&c_736014);c_736011.hdr.immutable = 1;

make_pair(c_736010,quote__if,&c_736011);c_736010.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736002, ((closureN)self_734718)->elements[1], r_733284, &c_736010);; 
}

static void __lambda_81(void *data, object self_734719, int argc, object *args) /* object self_734719, object r_733282 */
 {
 object r_733282 = args[0];
  
pair_type local_736007; 
return_direct_with_clo1(data,  ((closureN)self_734719)->elements[0], (((closure)  ((closureN)self_734719)->elements[0])->fn),  set_pair_as_expr(&local_736007, r_733282, boolean_f));; 
}

static void __lambda_1(void *data, object _, int argc, object *args) /* closure _,object k_733017, object expr_735_7345_73131_732347, object rename_736_7346_73132_732348, object compare_737_7347_73133_732349 */
 {
object k_733017 = args[0]; object expr_735_7345_73131_732347 = args[1]; object rename_736_7346_73132_732348 = args[2];
  Cyc_st_add(data, "srfi/133.sld:let*-optionals");

closureN_type c_735328;
object e_735905 [3];
c_735328.hdr.mark = gc_color_red;
 c_735328.hdr.grayed = 0;
c_735328.tag = closureN_tag;
 c_735328.fn = (function_type)__lambda_2;
c_735328.num_args = 1;
c_735328.num_elements = 3;
c_735328.elements = (object *)e_735905;
c_735328.elements[0] = expr_735_7345_73131_732347;
c_735328.elements[1] = k_733017;
c_735328.elements[2] = rename_736_7346_73132_732348;



return_direct_with_clo1(data,(closure)&c_735328,__lambda_2,  Cyc_cdr(data, expr_735_7345_73131_732347));; 
}

static void __lambda_2(void *data, object self_734593, int argc, object *args) /* object self_734593, object v_931_7313_7393_73164_732380 */
 {
 object v_931_7313_7393_73164_732380 = args[0];
  
closureN_type c_735330;
object e_735641 [2];
c_735330.hdr.mark = gc_color_red;
 c_735330.hdr.grayed = 0;
c_735330.tag = closureN_tag;
 c_735330.fn = (function_type)__lambda_3;
c_735330.num_args = 0;
c_735330.num_elements = 2;
c_735330.elements = (object *)e_735641;
c_735330.elements[0] = ((closureN)self_734593)->elements[2];
c_735330.elements[1] = v_931_7313_7393_73164_732380;


closureN_type c_735642;
object e_735904 [3];
c_735642.hdr.mark = gc_color_red;
 c_735642.hdr.grayed = 0;
c_735642.tag = closureN_tag;
 c_735642.fn = (function_type)__lambda_32;
c_735642.num_args = 1;
c_735642.num_elements = 3;
c_735642.elements = (object *)e_735904;
c_735642.elements[0] = ((closureN)self_734593)->elements[0];
c_735642.elements[1] = ((closureN)self_734593)->elements[1];
c_735642.elements[2] = ((closureN)self_734593)->elements[2];

return_direct_with_clo1(data,(closure)&c_735330,__lambda_3,  &c_735642);; 
}

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


closureN_type c_735898;
object e_735903 [1];
c_735898.hdr.mark = gc_color_red;
 c_735898.hdr.grayed = 0;
c_735898.tag = closureN_tag;
 c_735898.fn = (function_type)__lambda_58;
c_735898.num_args = 1;
c_735898.num_elements = 1;
c_735898.elements = (object *)e_735903;
c_735898.elements[0] = ((closureN)self_734594)->elements[1];

return_direct_with_clo1(data,(closure)&c_735644,__lambda_33,  &c_735898);; 
}

static void __lambda_58(void *data, object self_734595, int argc, object *args) /* object self_734595, object r_733018 */
 {
 object r_733018 = args[0];
  

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

static void __lambda_33(void *data, object self_734596, int argc, object *args) /* object self_734596, object k_733020 */
 {
 object k_733020 = args[0];
  if( (boolean_f != ((closureN)self_734596)->elements[2]) ){ 
  return_direct_with_clo1(data,  k_733020, (((closure)  k_733020)->fn),  ((closureN)self_734596)->elements[2]);
} else { 
  
closureN_type c_735649;
object e_735893 [3];
c_735649.hdr.mark = gc_color_red;
 c_735649.hdr.grayed = 0;
c_735649.tag = closureN_tag;
 c_735649.fn = (function_type)__lambda_34;
c_735649.num_args = 1;
c_735649.num_elements = 3;
c_735649.elements = (object *)e_735893;
c_735649.elements[0] = ((closureN)self_734596)->elements[0];
c_735649.elements[1] = k_733020;
c_735649.elements[2] = ((closureN)self_734596)->elements[1];



return_direct_with_clo1(data,(closure)&c_735649,__lambda_34,  Cyc_cdr(data, ((closureN)self_734596)->elements[0]));}
;; 
}

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


closureN_type c_735879;
object e_735892 [2];
c_735879.hdr.mark = gc_color_red;
 c_735879.hdr.grayed = 0;
c_735879.tag = closureN_tag;
 c_735879.fn = (function_type)__lambda_56;
c_735879.num_args = 1;
c_735879.num_elements = 2;
c_735879.elements = (object *)e_735892;
c_735879.elements[0] = ((closureN)self_734597)->elements[0];
c_735879.elements[1] = ((closureN)self_734597)->elements[1];

return_direct_with_clo1(data,(closure)&c_735651,__lambda_35,  &c_735879);; 
}

static void __lambda_56(void *data, object self_734598, int argc, object *args) /* object self_734598, object tmp_7353_7355_73135_732351 */
 {
 object tmp_7353_7355_73135_732351 = args[0];
  if( (boolean_f != tmp_7353_7355_73135_732351) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734598)->elements[1], (((closure)  ((closureN)self_734598)->elements[1])->fn),  tmp_7353_7355_73135_732351);
} else { 
  
closureN_type c_735883;
object e_735889 [1];
c_735883.hdr.mark = gc_color_red;
 c_735883.hdr.grayed = 0;
c_735883.tag = closureN_tag;
 c_735883.fn = (function_type)__lambda_57;
c_735883.num_args = 1;
c_735883.num_elements = 1;
c_735883.elements = (object *)e_735889;
c_735883.elements[0] = ((closureN)self_734598)->elements[1];


make_utf8_string_with_len(c_735890, "no expansion for", 16, 16);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_735883, &c_735890, ((closureN)self_734598)->elements[0]);}
;; 
}

static void __lambda_57(void *data, object self_734599, int argc, object *args) /* object self_734599, object r_733022 */
 {
 object r_733022 = args[0];
  
pair_type local_735888; 
return_direct_with_clo1(data,  ((closureN)self_734599)->elements[0], (((closure)  ((closureN)self_734599)->elements[0])->fn),  set_pair_as_expr(&local_735888, r_733022, boolean_f));; 
}

static void __lambda_35(void *data, object self_734600, int argc, object *args) /* object self_734600, object k_733024 */
 {
 object k_733024 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_734600)->elements[1])) ){ 
  
closureN_type c_735656;
object e_735873 [3];
c_735656.hdr.mark = gc_color_red;
 c_735656.hdr.grayed = 0;
c_735656.tag = closureN_tag;
 c_735656.fn = (function_type)__lambda_36;
c_735656.num_args = 1;
c_735656.num_elements = 3;
c_735656.elements = (object *)e_735873;
c_735656.elements[0] = k_733024;
c_735656.elements[1] = ((closureN)self_734600)->elements[0];
c_735656.elements[2] = ((closureN)self_734600)->elements[1];



return_direct_with_clo1(data,(closure)&c_735656,__lambda_36,  Cyc_car(data, ((closureN)self_734600)->elements[1]));
} else { 
  return_direct_with_clo1(data,  k_733024, (((closure)  k_733024)->fn),  boolean_f);}
;; 
}

static void __lambda_36(void *data, object self_734601, int argc, object *args) /* object self_734601, object _127args_7359_73138_732354 */
 {
 object _127args_7359_73138_732354 = args[0];
  
closureN_type c_735658;
object e_735869 [3];
c_735658.hdr.mark = gc_color_red;
 c_735658.hdr.grayed = 0;
c_735658.tag = closureN_tag;
 c_735658.fn = (function_type)__lambda_37;
c_735658.num_args = 1;
c_735658.num_elements = 3;
c_735658.elements = (object *)e_735869;
c_735658.elements[0] = _127args_7359_73138_732354;
c_735658.elements[1] = ((closureN)self_734601)->elements[0];
c_735658.elements[2] = ((closureN)self_734601)->elements[1];



return_direct_with_clo1(data,(closure)&c_735658,__lambda_37,  Cyc_cdr(data, ((closureN)self_734601)->elements[2]));; 
}

static void __lambda_37(void *data, object self_734602, int argc, object *args) /* object self_734602, object v_9319_7331_7360_73139_732355 */
 {
 object v_9319_7331_7360_73139_732355 = args[0];
    
if( (boolean_f != Cyc_is_pair(v_9319_7331_7360_73139_732355)) ){ 
  
closureN_type c_735662;
object e_735864 [4];
c_735662.hdr.mark = gc_color_red;
 c_735662.hdr.grayed = 0;
c_735662.tag = closureN_tag;
 c_735662.fn = (function_type)__lambda_38;
c_735662.num_args = 3;
c_735662.num_elements = 4;
c_735662.elements = (object *)e_735864;
c_735662.elements[0] = ((closureN)self_734602)->elements[0];
c_735662.elements[1] = ((closureN)self_734602)->elements[1];
c_735662.elements[2] = ((closureN)self_734602)->elements[2];
c_735662.elements[3] = v_9319_7331_7360_73139_732355;



return_direct_with_clo3(data,(closure)&c_735662,__lambda_38,  Cyc_car(data, v_9319_7331_7360_73139_732355), NULL, NULL);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734602)->elements[1], (((closure)  ((closureN)self_734602)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_38(void *data, object self_734603, int argc, object *args) /* object self_734603, object w_9321_7333_7364_73141_732357, object _127var_91ls23_7335_7365_73142_732358, object _127default_91ls24_7336_7366_73143_732359 */
 {
 object w_9321_7333_7364_73141_732357 = args[0]; object _127var_91ls23_7335_7365_73142_732358 = args[1]; object _127default_91ls24_7336_7366_73143_732359 = args[2];
  
closureN_type c_735664;
object e_735863 [7];
c_735664.hdr.mark = gc_color_red;
 c_735664.hdr.grayed = 0;
c_735664.tag = closureN_tag;
 c_735664.fn = (function_type)__lambda_39;
c_735664.num_args = 1;
c_735664.num_elements = 7;
c_735664.elements = (object *)e_735863;
c_735664.elements[0] = ((closureN)self_734603)->elements[0];
c_735664.elements[1] = _127default_91ls24_7336_7366_73143_732359;
c_735664.elements[2] = _127var_91ls23_7335_7365_73142_732358;
c_735664.elements[3] = ((closureN)self_734603)->elements[1];
c_735664.elements[4] = ((closureN)self_734603)->elements[2];
c_735664.elements[5] = ((closureN)self_734603)->elements[3];
c_735664.elements[6] = w_9321_7333_7364_73141_732357;

return_direct_with_clo1(data,(closure)&c_735664,__lambda_39,  boolean_f);; 
}

static void __lambda_39(void *data, object self_734604, int argc, object *args) /* object self_734604, object lp_9322_7334_7367_73144_732360 */
 {
 object lp_9322_7334_7367_73144_732360 = args[0];
  
closureN_type c_735666;
object e_735859 [7];
c_735666.hdr.mark = gc_color_red;
 c_735666.hdr.grayed = 0;
c_735666.tag = closureN_tag;
 c_735666.fn = (function_type)__lambda_724;
c_735666.num_args = 1;
c_735666.num_elements = 7;
c_735666.elements = (object *)e_735859;
c_735666.elements[0] = ((closureN)self_734604)->elements[0];
c_735666.elements[1] = ((closureN)self_734604)->elements[1];
c_735666.elements[2] = ((closureN)self_734604)->elements[2];
c_735666.elements[3] = ((closureN)self_734604)->elements[3];
c_735666.elements[4] = ((closureN)self_734604)->elements[4];
c_735666.elements[5] = ((closureN)self_734604)->elements[5];
c_735666.elements[6] = ((closureN)self_734604)->elements[6];


pair_type local_735862; 
return_direct_with_clo1(data,(closure)&c_735666,__lambda_724,  set_cell_as_expr(&local_735862, lp_9322_7334_7367_73144_732360));; 
}

static void __lambda_724(void *data, object self_734605, int argc, object *args) /* object self_734605, object lp_9322_7334_7367_73144_732360 */
 {
 object lp_9322_7334_7367_73144_732360 = args[0];
  
closureN_type c_735668;
object e_735683 [5];
c_735668.hdr.mark = gc_color_red;
 c_735668.hdr.grayed = 0;
c_735668.tag = closureN_tag;
 c_735668.fn = (function_type)__lambda_40;
c_735668.num_args = 1;
c_735668.num_elements = 5;
c_735668.elements = (object *)e_735683;
c_735668.elements[0] = ((closureN)self_734605)->elements[1];
c_735668.elements[1] = ((closureN)self_734605)->elements[2];
c_735668.elements[2] = ((closureN)self_734605)->elements[3];
c_735668.elements[3] = lp_9322_7334_7367_73144_732360;
c_735668.elements[4] = ((closureN)self_734605)->elements[6];


closureN_type c_735684;
object e_735858 [4];
c_735684.hdr.mark = gc_color_red;
 c_735684.hdr.grayed = 0;
c_735684.tag = closureN_tag;
 c_735684.fn = (function_type)__lambda_42;
c_735684.num_args = 3;
c_735684.num_elements = 4;
c_735684.elements = (object *)e_735858;
c_735684.elements[0] = ((closureN)self_734605)->elements[0];
c_735684.elements[1] = lp_9322_7334_7367_73144_732360;
c_735684.elements[2] = ((closureN)self_734605)->elements[4];
c_735684.elements[3] = ((closureN)self_734605)->elements[5];

return_direct_with_clo1(data,(closure)&c_735668,__lambda_40,  &c_735684);; 
}

static void __lambda_42(void *data, object self_734606, int argc, object *args) /* object self_734606, object k_733034, object w_9321_7333_7368_73145_732361, object _127var_91ls23_7335_7369_73146_732362, object _127default_91ls24_7336_7370_73147_732363 */
 {
 object k_733034 = args[0]; object w_9321_7333_7368_73145_732361 = args[1]; object _127var_91ls23_7335_7369_73146_732362 = args[2]; object _127default_91ls24_7336_7370_73147_732363 = args[3];
    
if( (boolean_f != Cyc_is_null(w_9321_7333_7368_73145_732361)) ){ 
  
closureN_type c_735688;
object e_735811 [5];
c_735688.hdr.mark = gc_color_red;
 c_735688.hdr.grayed = 0;
c_735688.tag = closureN_tag;
 c_735688.fn = (function_type)__lambda_43;
c_735688.num_args = 1;
c_735688.num_elements = 5;
c_735688.elements = (object *)e_735811;
c_735688.elements[0] = ((closureN)self_734606)->elements[0];
c_735688.elements[1] = _127default_91ls24_7336_7370_73147_732363;
c_735688.elements[2] = k_733034;
c_735688.elements[3] = ((closureN)self_734606)->elements[2];
c_735688.elements[4] = ((closureN)self_734606)->elements[3];

return_direct_with_clo2(data,  __glo_reverse_scheme_base, (((closure)  __glo_reverse_scheme_base)->fn),  &c_735688, _127var_91ls23_7335_7369_73146_732362);
} else { 
    
if( (boolean_f != Cyc_is_pair(w_9321_7333_7368_73145_732361)) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, w_9321_7333_7368_73145_732361))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, w_9321_7333_7368_73145_732361)))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_9321_7333_7368_73145_732361))))) ){ 
  




pair_type local_735840; 





pair_type local_735847; 






return_closcall4(data,  car(((closureN)self_734606)->elements[1]),  k_733034, Cyc_cdr(data, w_9321_7333_7368_73145_732361), set_pair_as_expr(&local_735840, Cyc_car(data, Cyc_car(data, w_9321_7333_7368_73145_732361)), _127var_91ls23_7335_7369_73146_732362), set_pair_as_expr(&local_735847, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, w_9321_7333_7368_73145_732361))), _127default_91ls24_7336_7370_73147_732363));
} else { 
  return_direct_with_clo1(data,  k_733034, (((closure)  k_733034)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733034, (((closure)  k_733034)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733034, (((closure)  k_733034)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733034, (((closure)  k_733034)->fn),  boolean_f);}
;}
;; 
}

static void __lambda_43(void *data, object self_734607, int argc, object *args) /* object self_734607, object r_733036 */
 {
 object r_733036 = args[0];
  
closureN_type c_735690;
object e_735809 [5];
c_735690.hdr.mark = gc_color_red;
 c_735690.hdr.grayed = 0;
c_735690.tag = closureN_tag;
 c_735690.fn = (function_type)__lambda_44;
c_735690.num_args = 1;
c_735690.num_elements = 5;
c_735690.elements = (object *)e_735809;
c_735690.elements[0] = ((closureN)self_734607)->elements[0];
c_735690.elements[1] = ((closureN)self_734607)->elements[2];
c_735690.elements[2] = r_733036;
c_735690.elements[3] = ((closureN)self_734607)->elements[3];
c_735690.elements[4] = ((closureN)self_734607)->elements[4];

return_direct_with_clo2(data,  __glo_reverse_scheme_base, (((closure)  __glo_reverse_scheme_base)->fn),  &c_735690, ((closureN)self_734607)->elements[1]);; 
}

static void __lambda_44(void *data, object self_734608, int argc, object *args) /* object self_734608, object r_733037 */
 {
 object r_733037 = args[0];
  
closureN_type c_735692;
object e_735807 [4];
c_735692.hdr.mark = gc_color_red;
 c_735692.hdr.grayed = 0;
c_735692.tag = closureN_tag;
 c_735692.fn = (function_type)__lambda_45;
c_735692.num_args = 2;
c_735692.num_elements = 4;
c_735692.elements = (object *)e_735807;
c_735692.elements[0] = ((closureN)self_734608)->elements[0];
c_735692.elements[1] = ((closureN)self_734608)->elements[1];
c_735692.elements[2] = ((closureN)self_734608)->elements[3];
c_735692.elements[3] = ((closureN)self_734608)->elements[4];

return_direct_with_clo2(data,(closure)&c_735692,__lambda_45,  ((closureN)self_734608)->elements[2], r_733037);; 
}

static void __lambda_45(void *data, object self_734609, int argc, object *args) /* object self_734609, object _127var_7371_73148_732364, object _127default_7372_73149_732365 */
 {
 object _127var_7371_73148_732364 = args[0]; object _127default_7372_73149_732365 = args[1];
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_734609)->elements[3]))) ){ 
    complex_num_type local_735700; 
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_735700, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734609)->elements[3])))) ){ 
  
closureN_type c_735708;
object e_735802 [5];
c_735708.hdr.mark = gc_color_red;
 c_735708.hdr.grayed = 0;
c_735708.tag = closureN_tag;
 c_735708.fn = (function_type)__lambda_46;
c_735708.num_args = 1;
c_735708.num_elements = 5;
c_735708.elements = (object *)e_735802;
c_735708.elements[0] = ((closureN)self_734609)->elements[0];
c_735708.elements[1] = _127default_7372_73149_732365;
c_735708.elements[2] = _127var_7371_73148_732364;
c_735708.elements[3] = ((closureN)self_734609)->elements[1];
c_735708.elements[4] = ((closureN)self_734609)->elements[3];

return_closcall2(data,  ((closureN)self_734609)->elements[2],  &c_735708, quote_let_85_91optionals_117aux);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734609)->elements[1], (((closure)  ((closureN)self_734609)->elements[1])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734609)->elements[1], (((closure)  ((closureN)self_734609)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_46(void *data, object self_734610, int argc, object *args) /* object self_734610, object r_733044 */
 {
 object r_733044 = args[0];
  
closureN_type c_735710;
object e_735791 [6];
c_735710.hdr.mark = gc_color_red;
 c_735710.hdr.grayed = 0;
c_735710.tag = closureN_tag;
 c_735710.fn = (function_type)__lambda_47;
c_735710.num_args = 1;
c_735710.num_elements = 6;
c_735710.elements = (object *)e_735791;
c_735710.elements[0] = ((closureN)self_734610)->elements[0];
c_735710.elements[1] = ((closureN)self_734610)->elements[1];
c_735710.elements[2] = ((closureN)self_734610)->elements[2];
c_735710.elements[3] = ((closureN)self_734610)->elements[3];
c_735710.elements[4] = r_733044;
c_735710.elements[5] = ((closureN)self_734610)->elements[4];


mmacro(c_735792, (function_type)__lambda_54);c_735792.num_args = 2;
return_direct_with_clo1(data,(closure)&c_735710,__lambda_47,  &c_735792);; 
}

static void __lambda_54(void *data, object self_734611, int argc, object *args) /* object self_734611, object k_733056, object _127var_7380_73155_732371, object _127default_7381_73156_732372 */
 {
 object k_733056 = args[0]; object _127var_7380_73155_732371 = args[1]; object _127default_7381_73156_732372 = args[2];
  
closureN_type c_735794;
object e_735800 [2];
c_735794.hdr.mark = gc_color_red;
 c_735794.hdr.grayed = 0;
c_735794.tag = closureN_tag;
 c_735794.fn = (function_type)__lambda_55;
c_735794.num_args = 1;
c_735794.num_elements = 2;
c_735794.elements = (object *)e_735800;
c_735794.elements[0] = _127var_7380_73155_732371;
c_735794.elements[1] = k_733056;


make_pair(c_735801,quote__127default,NULL);c_735801.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735794, _127default_7381_73156_732372, NULL, &c_735801);; 
}

static void __lambda_55(void *data, object self_734612, int argc, object *args) /* object self_734612, object r_733057 */
 {
 object r_733057 = args[0];
  
make_pair(c_735799,quote__127default,NULL);c_735799.hdr.immutable = 1;

make_pair(c_735798,quote__127var,&c_735799);c_735798.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  ((closureN)self_734612)->elements[1], ((closureN)self_734612)->elements[0], r_733057, &c_735798);; 
}

static void __lambda_47(void *data, object self_734613, int argc, object *args) /* object self_734613, object r_733055 */
 {
 object r_733055 = args[0];
  
closureN_type c_735712;
object e_735788 [4];
c_735712.hdr.mark = gc_color_red;
 c_735712.hdr.grayed = 0;
c_735712.tag = closureN_tag;
 c_735712.fn = (function_type)__lambda_48;
c_735712.num_args = 1;
c_735712.num_elements = 4;
c_735712.elements = (object *)e_735788;
c_735712.elements[0] = ((closureN)self_734613)->elements[0];
c_735712.elements[1] = ((closureN)self_734613)->elements[3];
c_735712.elements[2] = ((closureN)self_734613)->elements[4];
c_735712.elements[3] = ((closureN)self_734613)->elements[5];

return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_735712, r_733055, ((closureN)self_734613)->elements[2], ((closureN)self_734613)->elements[1]);; 
}

static void __lambda_48(void *data, object self_734614, int argc, object *args) /* object self_734614, object r_733051 */
 {
 object r_733051 = args[0];
  
closureN_type c_735714;
object e_735774 [4];
c_735714.hdr.mark = gc_color_red;
 c_735714.hdr.grayed = 0;
c_735714.tag = closureN_tag;
 c_735714.fn = (function_type)__lambda_49;
c_735714.num_args = 1;
c_735714.num_elements = 4;
c_735714.elements = (object *)e_735774;
c_735714.elements[0] = ((closureN)self_734614)->elements[0];
c_735714.elements[1] = ((closureN)self_734614)->elements[1];
c_735714.elements[2] = ((closureN)self_734614)->elements[2];
c_735714.elements[3] = r_733051;










make_pair(c_735787,quote__93_93_93,NULL);c_735787.hdr.immutable = 1;

make_pair(c_735786,quote__127body2,&c_735787);c_735786.hdr.immutable = 1;

make_pair(c_735785,quote__127body1,&c_735786);c_735785.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735714, Cyc_car(data, Cyc_cdr(data, ((closureN)self_734614)->elements[3])), Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734614)->elements[3])), &c_735785);; 
}

static void __lambda_49(void *data, object self_734615, int argc, object *args) /* object self_734615, object r_733052 */
 {
 object r_733052 = args[0];
  
closureN_type c_735716;
object e_735764 [3];
c_735716.hdr.mark = gc_color_red;
 c_735716.hdr.grayed = 0;
c_735716.tag = closureN_tag;
 c_735716.fn = (function_type)__lambda_50;
c_735716.num_args = 1;
c_735716.num_elements = 3;
c_735716.elements = (object *)e_735764;
c_735716.elements[0] = ((closureN)self_734615)->elements[0];
c_735716.elements[1] = ((closureN)self_734615)->elements[1];
c_735716.elements[2] = ((closureN)self_734615)->elements[2];


make_pair(c_735769,quote__127default,NULL);c_735769.hdr.immutable = 1;

make_pair(c_735768,quote__127var,&c_735769);c_735768.hdr.immutable = 1;

make_pair(c_735770,quote__93_93_93,NULL);c_735770.hdr.immutable = 1;

make_pair(c_735767,&c_735768,&c_735770);c_735767.hdr.immutable = 1;

make_pair(c_735773,quote__93_93_93,NULL);c_735773.hdr.immutable = 1;

make_pair(c_735772,quote__127body2,&c_735773);c_735772.hdr.immutable = 1;

make_pair(c_735771,quote__127body1,&c_735772);c_735771.hdr.immutable = 1;

make_pair(c_735766,&c_735767,&c_735771);c_735766.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735716, ((closureN)self_734615)->elements[3], r_733052, &c_735766);; 
}

static void __lambda_50(void *data, object self_734616, int argc, object *args) /* object self_734616, object r_733049 */
 {
 object r_733049 = args[0];
  
closureN_type c_735718;
object e_735753 [3];
c_735718.hdr.mark = gc_color_red;
 c_735718.hdr.grayed = 0;
c_735718.tag = closureN_tag;
 c_735718.fn = (function_type)__lambda_51;
c_735718.num_args = 1;
c_735718.num_elements = 3;
c_735718.elements = (object *)e_735753;
c_735718.elements[0] = ((closureN)self_734616)->elements[0];
c_735718.elements[1] = ((closureN)self_734616)->elements[1];
c_735718.elements[2] = ((closureN)self_734616)->elements[2];


make_pair(c_735759,quote__127default,NULL);c_735759.hdr.immutable = 1;

make_pair(c_735758,quote__127var,&c_735759);c_735758.hdr.immutable = 1;

make_pair(c_735760,quote__93_93_93,NULL);c_735760.hdr.immutable = 1;

make_pair(c_735757,&c_735758,&c_735760);c_735757.hdr.immutable = 1;

make_pair(c_735763,quote__93_93_93,NULL);c_735763.hdr.immutable = 1;

make_pair(c_735762,quote__127body2,&c_735763);c_735762.hdr.immutable = 1;

make_pair(c_735761,quote__127body1,&c_735762);c_735761.hdr.immutable = 1;

make_pair(c_735756,&c_735757,&c_735761);c_735756.hdr.immutable = 1;

make_pair(c_735755,quote__127args,&c_735756);c_735755.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735718, ((closureN)self_734616)->elements[0], r_733049, &c_735755);; 
}

static void __lambda_51(void *data, object self_734617, int argc, object *args) /* object self_734617, object r_733047 */
 {
 object r_733047 = args[0];
  
closureN_type c_735720;
object e_735741 [2];
c_735720.hdr.mark = gc_color_red;
 c_735720.hdr.grayed = 0;
c_735720.tag = closureN_tag;
 c_735720.fn = (function_type)__lambda_52;
c_735720.num_args = 1;
c_735720.num_elements = 2;
c_735720.elements = (object *)e_735741;
c_735720.elements[0] = ((closureN)self_734617)->elements[1];
c_735720.elements[1] = ((closureN)self_734617)->elements[2];


make_pair(c_735748,quote__127default,NULL);c_735748.hdr.immutable = 1;

make_pair(c_735747,quote__127var,&c_735748);c_735747.hdr.immutable = 1;

make_pair(c_735749,quote__93_93_93,NULL);c_735749.hdr.immutable = 1;

make_pair(c_735746,&c_735747,&c_735749);c_735746.hdr.immutable = 1;

make_pair(c_735752,quote__93_93_93,NULL);c_735752.hdr.immutable = 1;

make_pair(c_735751,quote__127body2,&c_735752);c_735751.hdr.immutable = 1;

make_pair(c_735750,quote__127body1,&c_735751);c_735750.hdr.immutable = 1;

make_pair(c_735745,&c_735746,&c_735750);c_735745.hdr.immutable = 1;

make_pair(c_735744,quote__127args,&c_735745);c_735744.hdr.immutable = 1;

make_pair(c_735743,quote__127args,&c_735744);c_735743.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735720, ((closureN)self_734617)->elements[0], r_733047, &c_735743);; 
}

static void __lambda_52(void *data, object self_734618, int argc, object *args) /* object self_734618, object r_733045 */
 {
 object r_733045 = args[0];
  
closureN_type c_735722;
object e_735728 [1];
c_735722.hdr.mark = gc_color_red;
 c_735722.hdr.grayed = 0;
c_735722.tag = closureN_tag;
 c_735722.fn = (function_type)__lambda_53;
c_735722.num_args = 1;
c_735722.num_elements = 1;
c_735722.elements = (object *)e_735728;
c_735722.elements[0] = ((closureN)self_734618)->elements[0];


make_pair(c_735736,quote__127default,NULL);c_735736.hdr.immutable = 1;

make_pair(c_735735,quote__127var,&c_735736);c_735735.hdr.immutable = 1;

make_pair(c_735737,quote__93_93_93,NULL);c_735737.hdr.immutable = 1;

make_pair(c_735734,&c_735735,&c_735737);c_735734.hdr.immutable = 1;

make_pair(c_735740,quote__93_93_93,NULL);c_735740.hdr.immutable = 1;

make_pair(c_735739,quote__127body2,&c_735740);c_735739.hdr.immutable = 1;

make_pair(c_735738,quote__127body1,&c_735739);c_735738.hdr.immutable = 1;

make_pair(c_735733,&c_735734,&c_735738);c_735733.hdr.immutable = 1;

make_pair(c_735732,quote__127args,&c_735733);c_735732.hdr.immutable = 1;

make_pair(c_735731,quote__127args,&c_735732);c_735731.hdr.immutable = 1;

make_pair(c_735730,quote_let_85_91optionals_117aux,&c_735731);c_735730.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735722, ((closureN)self_734618)->elements[1], r_733045, &c_735730);; 
}

static void __lambda_53(void *data, object self_734619, int argc, object *args) /* object self_734619, object r_733043 */
 {
 object r_733043 = args[0];
  
pair_type local_735727; 
return_direct_with_clo1(data,  ((closureN)self_734619)->elements[0], (((closure)  ((closureN)self_734619)->elements[0])->fn),  set_pair_as_expr(&local_735727, r_733043, boolean_f));; 
}

static void __lambda_40(void *data, object self_734620, int argc, object *args) /* object self_734620, object r_733033 */
 {
 object r_733033 = args[0];
  
closureN_type c_735670;
object e_735679 [5];
c_735670.hdr.mark = gc_color_red;
 c_735670.hdr.grayed = 0;
c_735670.tag = closureN_tag;
 c_735670.fn = (function_type)__lambda_41;
c_735670.num_args = 1;
c_735670.num_elements = 5;
c_735670.elements = (object *)e_735679;
c_735670.elements[0] = ((closureN)self_734620)->elements[0];
c_735670.elements[1] = ((closureN)self_734620)->elements[1];
c_735670.elements[2] = ((closureN)self_734620)->elements[2];
c_735670.elements[3] = ((closureN)self_734620)->elements[3];
c_735670.elements[4] = ((closureN)self_734620)->elements[4];



return_direct_with_clo1(data,(closure)&c_735670,__lambda_41,  Cyc_set_cell(data, ((closureN)self_734620)->elements[3], r_733033));; 
}

static void __lambda_41(void *data, object self_734621, int argc, object *args) /* object self_734621, object r_733032 */
 {

  

return_closcall4(data,  car(((closureN)self_734621)->elements[3]),  ((closureN)self_734621)->elements[2], ((closureN)self_734621)->elements[4], ((closureN)self_734621)->elements[1], ((closureN)self_734621)->elements[0]);; 
}

static void __lambda_3(void *data, object self_734622, int argc, object *args) /* object self_734622, object k_733075 */
 {
 object k_733075 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_734622)->elements[1])) ){ 
    complex_num_type local_735336; 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_735336, Cyc_car(data, ((closureN)self_734622)->elements[1]))) ){ 
  
closureN_type c_735341;
object e_735635 [3];
c_735341.hdr.mark = gc_color_red;
 c_735341.hdr.grayed = 0;
c_735341.tag = closureN_tag;
 c_735341.fn = (function_type)__lambda_4;
c_735341.num_args = 1;
c_735341.num_elements = 3;
c_735341.elements = (object *)e_735635;
c_735341.elements[0] = k_733075;
c_735341.elements[1] = ((closureN)self_734622)->elements[0];
c_735341.elements[2] = ((closureN)self_734622)->elements[1];



return_direct_with_clo1(data,(closure)&c_735341,__lambda_4,  Cyc_car(data, ((closureN)self_734622)->elements[1]));
} else { 
  return_direct_with_clo1(data,  k_733075, (((closure)  k_733075)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733075, (((closure)  k_733075)->fn),  boolean_f);}
;; 
}

static void __lambda_4(void *data, object self_734623, int argc, object *args) /* object self_734623, object _127x_7397_73166_732382 */
 {
 object _127x_7397_73166_732382 = args[0];
  
closureN_type c_735343;
object e_735631 [3];
c_735343.hdr.mark = gc_color_red;
 c_735343.hdr.grayed = 0;
c_735343.tag = closureN_tag;
 c_735343.fn = (function_type)__lambda_5;
c_735343.num_args = 1;
c_735343.num_elements = 3;
c_735343.elements = (object *)e_735631;
c_735343.elements[0] = _127x_7397_73166_732382;
c_735343.elements[1] = ((closureN)self_734623)->elements[0];
c_735343.elements[2] = ((closureN)self_734623)->elements[1];



return_direct_with_clo1(data,(closure)&c_735343,__lambda_5,  Cyc_cdr(data, ((closureN)self_734623)->elements[2]));; 
}

static void __lambda_5(void *data, object self_734624, int argc, object *args) /* object self_734624, object v_933_7315_7398_73167_732383 */
 {
 object v_933_7315_7398_73167_732383 = args[0];
    
if( (boolean_f != Cyc_is_pair(v_933_7315_7398_73167_732383)) ){ 
  
closureN_type c_735347;
object e_735626 [4];
c_735347.hdr.mark = gc_color_red;
 c_735347.hdr.grayed = 0;
c_735347.tag = closureN_tag;
 c_735347.fn = (function_type)__lambda_6;
c_735347.num_args = 3;
c_735347.num_elements = 4;
c_735347.elements = (object *)e_735626;
c_735347.elements[0] = ((closureN)self_734624)->elements[0];
c_735347.elements[1] = ((closureN)self_734624)->elements[1];
c_735347.elements[2] = ((closureN)self_734624)->elements[2];
c_735347.elements[3] = v_933_7315_7398_73167_732383;



return_direct_with_clo3(data,(closure)&c_735347,__lambda_6,  Cyc_car(data, v_933_7315_7398_73167_732383), NULL, NULL);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734624)->elements[1], (((closure)  ((closureN)self_734624)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_6(void *data, object self_734625, int argc, object *args) /* object self_734625, object w_935_7317_73102_73169_732385, object _127var_91ls7_7319_73103_73170_732386, object _127default_91ls8_7320_73104_73171_732387 */
 {
 object w_935_7317_73102_73169_732385 = args[0]; object _127var_91ls7_7319_73103_73170_732386 = args[1]; object _127default_91ls8_7320_73104_73171_732387 = args[2];
  
closureN_type c_735349;
object e_735625 [7];
c_735349.hdr.mark = gc_color_red;
 c_735349.hdr.grayed = 0;
c_735349.tag = closureN_tag;
 c_735349.fn = (function_type)__lambda_7;
c_735349.num_args = 1;
c_735349.num_elements = 7;
c_735349.elements = (object *)e_735625;
c_735349.elements[0] = _127default_91ls8_7320_73104_73171_732387;
c_735349.elements[1] = _127var_91ls7_7319_73103_73170_732386;
c_735349.elements[2] = ((closureN)self_734625)->elements[0];
c_735349.elements[3] = ((closureN)self_734625)->elements[1];
c_735349.elements[4] = ((closureN)self_734625)->elements[2];
c_735349.elements[5] = ((closureN)self_734625)->elements[3];
c_735349.elements[6] = w_935_7317_73102_73169_732385;

return_direct_with_clo1(data,(closure)&c_735349,__lambda_7,  boolean_f);; 
}

static void __lambda_7(void *data, object self_734626, int argc, object *args) /* object self_734626, object lp_936_7318_73105_73172_732388 */
 {
 object lp_936_7318_73105_73172_732388 = args[0];
  
closureN_type c_735351;
object e_735621 [7];
c_735351.hdr.mark = gc_color_red;
 c_735351.hdr.grayed = 0;
c_735351.tag = closureN_tag;
 c_735351.fn = (function_type)__lambda_723;
c_735351.num_args = 1;
c_735351.num_elements = 7;
c_735351.elements = (object *)e_735621;
c_735351.elements[0] = ((closureN)self_734626)->elements[0];
c_735351.elements[1] = ((closureN)self_734626)->elements[1];
c_735351.elements[2] = ((closureN)self_734626)->elements[2];
c_735351.elements[3] = ((closureN)self_734626)->elements[3];
c_735351.elements[4] = ((closureN)self_734626)->elements[4];
c_735351.elements[5] = ((closureN)self_734626)->elements[5];
c_735351.elements[6] = ((closureN)self_734626)->elements[6];


pair_type local_735624; 
return_direct_with_clo1(data,(closure)&c_735351,__lambda_723,  set_cell_as_expr(&local_735624, lp_936_7318_73105_73172_732388));; 
}

static void __lambda_723(void *data, object self_734627, int argc, object *args) /* object self_734627, object lp_936_7318_73105_73172_732388 */
 {
 object lp_936_7318_73105_73172_732388 = args[0];
  
closureN_type c_735353;
object e_735368 [5];
c_735353.hdr.mark = gc_color_red;
 c_735353.hdr.grayed = 0;
c_735353.tag = closureN_tag;
 c_735353.fn = (function_type)__lambda_8;
c_735353.num_args = 1;
c_735353.num_elements = 5;
c_735353.elements = (object *)e_735368;
c_735353.elements[0] = ((closureN)self_734627)->elements[0];
c_735353.elements[1] = ((closureN)self_734627)->elements[1];
c_735353.elements[2] = ((closureN)self_734627)->elements[3];
c_735353.elements[3] = lp_936_7318_73105_73172_732388;
c_735353.elements[4] = ((closureN)self_734627)->elements[6];


closureN_type c_735369;
object e_735620 [4];
c_735369.hdr.mark = gc_color_red;
 c_735369.hdr.grayed = 0;
c_735369.tag = closureN_tag;
 c_735369.fn = (function_type)__lambda_10;
c_735369.num_args = 3;
c_735369.num_elements = 4;
c_735369.elements = (object *)e_735620;
c_735369.elements[0] = ((closureN)self_734627)->elements[2];
c_735369.elements[1] = lp_936_7318_73105_73172_732388;
c_735369.elements[2] = ((closureN)self_734627)->elements[4];
c_735369.elements[3] = ((closureN)self_734627)->elements[5];

return_direct_with_clo1(data,(closure)&c_735353,__lambda_8,  &c_735369);; 
}

static void __lambda_10(void *data, object self_734628, int argc, object *args) /* object self_734628, object k_733086, object w_935_7317_73106_73173_732389, object _127var_91ls7_7319_73107_73174_732390, object _127default_91ls8_7320_73108_73175_732391 */
 {
 object k_733086 = args[0]; object w_935_7317_73106_73173_732389 = args[1]; object _127var_91ls7_7319_73107_73174_732390 = args[2]; object _127default_91ls8_7320_73108_73175_732391 = args[3];
    
if( (boolean_f != Cyc_is_null(w_935_7317_73106_73173_732389)) ){ 
  
closureN_type c_735373;
object e_735573 [5];
c_735373.hdr.mark = gc_color_red;
 c_735373.hdr.grayed = 0;
c_735373.tag = closureN_tag;
 c_735373.fn = (function_type)__lambda_11;
c_735373.num_args = 1;
c_735373.num_elements = 5;
c_735373.elements = (object *)e_735573;
c_735373.elements[0] = _127default_91ls8_7320_73108_73175_732391;
c_735373.elements[1] = ((closureN)self_734628)->elements[0];
c_735373.elements[2] = k_733086;
c_735373.elements[3] = ((closureN)self_734628)->elements[2];
c_735373.elements[4] = ((closureN)self_734628)->elements[3];

return_direct_with_clo2(data,  __glo_reverse_scheme_base, (((closure)  __glo_reverse_scheme_base)->fn),  &c_735373, _127var_91ls7_7319_73107_73174_732390);
} else { 
    
if( (boolean_f != Cyc_is_pair(w_935_7317_73106_73173_732389)) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, w_935_7317_73106_73173_732389))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, w_935_7317_73106_73173_732389)))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_935_7317_73106_73173_732389))))) ){ 
  




pair_type local_735602; 





pair_type local_735609; 






return_closcall4(data,  car(((closureN)self_734628)->elements[1]),  k_733086, Cyc_cdr(data, w_935_7317_73106_73173_732389), set_pair_as_expr(&local_735602, Cyc_car(data, Cyc_car(data, w_935_7317_73106_73173_732389)), _127var_91ls7_7319_73107_73174_732390), set_pair_as_expr(&local_735609, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, w_935_7317_73106_73173_732389))), _127default_91ls8_7320_73108_73175_732391));
} else { 
  return_direct_with_clo1(data,  k_733086, (((closure)  k_733086)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733086, (((closure)  k_733086)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733086, (((closure)  k_733086)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733086, (((closure)  k_733086)->fn),  boolean_f);}
;}
;; 
}

static void __lambda_11(void *data, object self_734629, int argc, object *args) /* object self_734629, object r_733088 */
 {
 object r_733088 = args[0];
  
closureN_type c_735375;
object e_735571 [5];
c_735375.hdr.mark = gc_color_red;
 c_735375.hdr.grayed = 0;
c_735375.tag = closureN_tag;
 c_735375.fn = (function_type)__lambda_12;
c_735375.num_args = 1;
c_735375.num_elements = 5;
c_735375.elements = (object *)e_735571;
c_735375.elements[0] = ((closureN)self_734629)->elements[1];
c_735375.elements[1] = ((closureN)self_734629)->elements[2];
c_735375.elements[2] = r_733088;
c_735375.elements[3] = ((closureN)self_734629)->elements[3];
c_735375.elements[4] = ((closureN)self_734629)->elements[4];

return_direct_with_clo2(data,  __glo_reverse_scheme_base, (((closure)  __glo_reverse_scheme_base)->fn),  &c_735375, ((closureN)self_734629)->elements[0]);; 
}

static void __lambda_12(void *data, object self_734630, int argc, object *args) /* object self_734630, object r_733089 */
 {
 object r_733089 = args[0];
  
closureN_type c_735377;
object e_735569 [4];
c_735377.hdr.mark = gc_color_red;
 c_735377.hdr.grayed = 0;
c_735377.tag = closureN_tag;
 c_735377.fn = (function_type)__lambda_13;
c_735377.num_args = 2;
c_735377.num_elements = 4;
c_735377.elements = (object *)e_735569;
c_735377.elements[0] = ((closureN)self_734630)->elements[0];
c_735377.elements[1] = ((closureN)self_734630)->elements[1];
c_735377.elements[2] = ((closureN)self_734630)->elements[3];
c_735377.elements[3] = ((closureN)self_734630)->elements[4];

return_direct_with_clo2(data,(closure)&c_735377,__lambda_13,  ((closureN)self_734630)->elements[2], r_733089);; 
}

static void __lambda_13(void *data, object self_734631, int argc, object *args) /* object self_734631, object _127var_73109_73176_732392, object _127default_73110_73177_732393 */
 {
 object _127var_73109_73176_732392 = args[0]; object _127default_73110_73177_732393 = args[1];
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_734631)->elements[3]))) ){ 
    complex_num_type local_735385; 
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_735385, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734631)->elements[3])))) ){ 
  
closureN_type c_735393;
object e_735564 [6];
c_735393.hdr.mark = gc_color_red;
 c_735393.hdr.grayed = 0;
c_735393.tag = closureN_tag;
 c_735393.fn = (function_type)__lambda_14;
c_735393.num_args = 1;
c_735393.num_elements = 6;
c_735393.elements = (object *)e_735564;
c_735393.elements[0] = _127default_73110_73177_732393;
c_735393.elements[1] = _127var_73109_73176_732392;
c_735393.elements[2] = ((closureN)self_734631)->elements[0];
c_735393.elements[3] = ((closureN)self_734631)->elements[1];
c_735393.elements[4] = ((closureN)self_734631)->elements[2];
c_735393.elements[5] = ((closureN)self_734631)->elements[3];

return_closcall2(data,  ((closureN)self_734631)->elements[2],  &c_735393, quote_let);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734631)->elements[1], (((closure)  ((closureN)self_734631)->elements[1])->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734631)->elements[1], (((closure)  ((closureN)self_734631)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_14(void *data, object self_734632, int argc, object *args) /* object self_734632, object r_733096 */
 {
 object r_733096 = args[0];
  
closureN_type c_735396;
object e_735563 [7];
c_735396.hdr.mark = gc_color_red;
 c_735396.hdr.grayed = 0;
c_735396.tag = closureN_tag;
 c_735396.fn = (function_type)__lambda_15;
c_735396.num_args = 1;
c_735396.num_elements = 7;
c_735396.elements = (object *)e_735563;
c_735396.elements[0] = ((closureN)self_734632)->elements[0];
c_735396.elements[1] = ((closureN)self_734632)->elements[1];
c_735396.elements[2] = ((closureN)self_734632)->elements[2];
c_735396.elements[3] = ((closureN)self_734632)->elements[3];
c_735396.elements[4] = r_733096;
c_735396.elements[5] = ((closureN)self_734632)->elements[4];
c_735396.elements[6] = ((closureN)self_734632)->elements[5];

return_closcall2(data,  ((closureN)self_734632)->elements[4],  &c_735396, quote_args);; 
}

static void __lambda_15(void *data, object self_734633, int argc, object *args) /* object self_734633, object r_733126 */
 {
 object r_733126 = args[0];
  
closureN_type c_735398;
object e_735558 [7];
c_735398.hdr.mark = gc_color_red;
 c_735398.hdr.grayed = 0;
c_735398.tag = closureN_tag;
 c_735398.fn = (function_type)__lambda_16;
c_735398.num_args = 1;
c_735398.num_elements = 7;
c_735398.elements = (object *)e_735558;
c_735398.elements[0] = ((closureN)self_734633)->elements[0];
c_735398.elements[1] = ((closureN)self_734633)->elements[1];
c_735398.elements[2] = ((closureN)self_734633)->elements[3];
c_735398.elements[3] = ((closureN)self_734633)->elements[4];
c_735398.elements[4] = r_733126;
c_735398.elements[5] = ((closureN)self_734633)->elements[5];
c_735398.elements[6] = ((closureN)self_734633)->elements[6];


make_pair(c_735562,quote__93_93_93,NULL);c_735562.hdr.immutable = 1;

make_pair(c_735561,quote__127x,&c_735562);c_735561.hdr.immutable = 1;

make_pair(c_735560,&c_735561,NULL);c_735560.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735398, ((closureN)self_734633)->elements[2], NULL, &c_735560);; 
}

static void __lambda_16(void *data, object self_734634, int argc, object *args) /* object self_734634, object r_733127 */
 {
 object r_733127 = args[0];
  
closureN_type c_735400;
object e_735552 [6];
c_735400.hdr.mark = gc_color_red;
 c_735400.hdr.grayed = 0;
c_735400.tag = closureN_tag;
 c_735400.fn = (function_type)__lambda_17;
c_735400.num_args = 1;
c_735400.num_elements = 6;
c_735400.elements = (object *)e_735552;
c_735400.elements[0] = ((closureN)self_734634)->elements[0];
c_735400.elements[1] = ((closureN)self_734634)->elements[1];
c_735400.elements[2] = ((closureN)self_734634)->elements[2];
c_735400.elements[3] = ((closureN)self_734634)->elements[3];
c_735400.elements[4] = ((closureN)self_734634)->elements[5];
c_735400.elements[5] = ((closureN)self_734634)->elements[6];


make_pair(c_735557,quote__93_93_93,NULL);c_735557.hdr.immutable = 1;

make_pair(c_735556,quote__127x,&c_735557);c_735556.hdr.immutable = 1;

make_pair(c_735555,&c_735556,NULL);c_735555.hdr.immutable = 1;

make_pair(c_735554,quote_args,&c_735555);c_735554.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735400, ((closureN)self_734634)->elements[4], r_733127, &c_735554);; 
}

static void __lambda_17(void *data, object self_734635, int argc, object *args) /* object self_734635, object r_733123 */
 {
 object r_733123 = args[0];
  
closureN_type c_735402;
object e_735546 [6];
c_735402.hdr.mark = gc_color_red;
 c_735402.hdr.grayed = 0;
c_735402.tag = closureN_tag;
 c_735402.fn = (function_type)__lambda_18;
c_735402.num_args = 1;
c_735402.num_elements = 6;
c_735402.elements = (object *)e_735546;
c_735402.elements[0] = ((closureN)self_734635)->elements[0];
c_735402.elements[1] = ((closureN)self_734635)->elements[1];
c_735402.elements[2] = ((closureN)self_734635)->elements[2];
c_735402.elements[3] = ((closureN)self_734635)->elements[3];
c_735402.elements[4] = ((closureN)self_734635)->elements[4];
c_735402.elements[5] = ((closureN)self_734635)->elements[5];


make_pair(c_735551,quote__93_93_93,NULL);c_735551.hdr.immutable = 1;

make_pair(c_735550,quote__127x,&c_735551);c_735550.hdr.immutable = 1;

make_pair(c_735549,&c_735550,NULL);c_735549.hdr.immutable = 1;

make_pair(c_735548,quote_args,&c_735549);c_735548.hdr.immutable = 1;

make_pair(c_735547,&c_735548,NULL);c_735547.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735402, r_733123, NULL, &c_735547);; 
}

static void __lambda_18(void *data, object self_734636, int argc, object *args) /* object self_734636, object r_733099 */
 {
 object r_733099 = args[0];
  
closureN_type c_735405;
object e_735545 [7];
c_735405.hdr.mark = gc_color_red;
 c_735405.hdr.grayed = 0;
c_735405.tag = closureN_tag;
 c_735405.fn = (function_type)__lambda_19;
c_735405.num_args = 1;
c_735405.num_elements = 7;
c_735405.elements = (object *)e_735545;
c_735405.elements[0] = ((closureN)self_734636)->elements[0];
c_735405.elements[1] = ((closureN)self_734636)->elements[1];
c_735405.elements[2] = ((closureN)self_734636)->elements[2];
c_735405.elements[3] = ((closureN)self_734636)->elements[3];
c_735405.elements[4] = r_733099;
c_735405.elements[5] = ((closureN)self_734636)->elements[4];
c_735405.elements[6] = ((closureN)self_734636)->elements[5];

return_closcall2(data,  ((closureN)self_734636)->elements[4],  &c_735405, quote_let_85_91optionals);; 
}

static void __lambda_19(void *data, object self_734637, int argc, object *args) /* object self_734637, object r_733105 */
 {
 object r_733105 = args[0];
  
closureN_type c_735408;
object e_735544 [7];
c_735408.hdr.mark = gc_color_red;
 c_735408.hdr.grayed = 0;
c_735408.tag = closureN_tag;
 c_735408.fn = (function_type)__lambda_20;
c_735408.num_args = 1;
c_735408.num_elements = 7;
c_735408.elements = (object *)e_735544;
c_735408.elements[0] = ((closureN)self_734637)->elements[0];
c_735408.elements[1] = ((closureN)self_734637)->elements[1];
c_735408.elements[2] = ((closureN)self_734637)->elements[2];
c_735408.elements[3] = ((closureN)self_734637)->elements[3];
c_735408.elements[4] = ((closureN)self_734637)->elements[4];
c_735408.elements[5] = r_733105;
c_735408.elements[6] = ((closureN)self_734637)->elements[6];

return_closcall2(data,  ((closureN)self_734637)->elements[5],  &c_735408, quote_args);; 
}

static void __lambda_20(void *data, object self_734638, int argc, object *args) /* object self_734638, object r_733108 */
 {
 object r_733108 = args[0];
  
closureN_type c_735410;
object e_735533 [8];
c_735410.hdr.mark = gc_color_red;
 c_735410.hdr.grayed = 0;
c_735410.tag = closureN_tag;
 c_735410.fn = (function_type)__lambda_21;
c_735410.num_args = 1;
c_735410.num_elements = 8;
c_735410.elements = (object *)e_735533;
c_735410.elements[0] = ((closureN)self_734638)->elements[0];
c_735410.elements[1] = ((closureN)self_734638)->elements[1];
c_735410.elements[2] = ((closureN)self_734638)->elements[2];
c_735410.elements[3] = ((closureN)self_734638)->elements[3];
c_735410.elements[4] = ((closureN)self_734638)->elements[4];
c_735410.elements[5] = ((closureN)self_734638)->elements[5];
c_735410.elements[6] = r_733108;
c_735410.elements[7] = ((closureN)self_734638)->elements[6];


mmacro(c_735534, (function_type)__lambda_30);c_735534.num_args = 2;
return_direct_with_clo1(data,(closure)&c_735410,__lambda_21,  &c_735534);; 
}

static void __lambda_30(void *data, object self_734639, int argc, object *args) /* object self_734639, object k_733116, object _127var_73118_73183_732399, object _127default_73119_73184_732400 */
 {
 object k_733116 = args[0]; object _127var_73118_73183_732399 = args[1]; object _127default_73119_73184_732400 = args[2];
  
closureN_type c_735536;
object e_735542 [2];
c_735536.hdr.mark = gc_color_red;
 c_735536.hdr.grayed = 0;
c_735536.tag = closureN_tag;
 c_735536.fn = (function_type)__lambda_31;
c_735536.num_args = 1;
c_735536.num_elements = 2;
c_735536.elements = (object *)e_735542;
c_735536.elements[0] = _127var_73118_73183_732399;
c_735536.elements[1] = k_733116;


make_pair(c_735543,quote__127default,NULL);c_735543.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735536, _127default_73119_73184_732400, NULL, &c_735543);; 
}

static void __lambda_31(void *data, object self_734640, int argc, object *args) /* object self_734640, object r_733117 */
 {
 object r_733117 = args[0];
  
make_pair(c_735541,quote__127default,NULL);c_735541.hdr.immutable = 1;

make_pair(c_735540,quote__127var,&c_735541);c_735540.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  ((closureN)self_734640)->elements[1], ((closureN)self_734640)->elements[0], r_733117, &c_735540);; 
}

static void __lambda_21(void *data, object self_734641, int argc, object *args) /* object self_734641, object r_733115 */
 {
 object r_733115 = args[0];
  
closureN_type c_735412;
object e_735530 [6];
c_735412.hdr.mark = gc_color_red;
 c_735412.hdr.grayed = 0;
c_735412.tag = closureN_tag;
 c_735412.fn = (function_type)__lambda_22;
c_735412.num_args = 1;
c_735412.num_elements = 6;
c_735412.elements = (object *)e_735530;
c_735412.elements[0] = ((closureN)self_734641)->elements[2];
c_735412.elements[1] = ((closureN)self_734641)->elements[3];
c_735412.elements[2] = ((closureN)self_734641)->elements[4];
c_735412.elements[3] = ((closureN)self_734641)->elements[5];
c_735412.elements[4] = ((closureN)self_734641)->elements[6];
c_735412.elements[5] = ((closureN)self_734641)->elements[7];

return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_735412, r_733115, ((closureN)self_734641)->elements[1], ((closureN)self_734641)->elements[0]);; 
}

static void __lambda_22(void *data, object self_734642, int argc, object *args) /* object self_734642, object r_733111 */
 {
 object r_733111 = args[0];
  
closureN_type c_735414;
object e_735516 [6];
c_735414.hdr.mark = gc_color_red;
 c_735414.hdr.grayed = 0;
c_735414.tag = closureN_tag;
 c_735414.fn = (function_type)__lambda_23;
c_735414.num_args = 1;
c_735414.num_elements = 6;
c_735414.elements = (object *)e_735516;
c_735414.elements[0] = ((closureN)self_734642)->elements[0];
c_735414.elements[1] = ((closureN)self_734642)->elements[1];
c_735414.elements[2] = ((closureN)self_734642)->elements[2];
c_735414.elements[3] = ((closureN)self_734642)->elements[3];
c_735414.elements[4] = ((closureN)self_734642)->elements[4];
c_735414.elements[5] = r_733111;










make_pair(c_735529,quote__93_93_93,NULL);c_735529.hdr.immutable = 1;

make_pair(c_735528,quote__127body2,&c_735529);c_735528.hdr.immutable = 1;

make_pair(c_735527,quote__127body1,&c_735528);c_735527.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735414, Cyc_car(data, Cyc_cdr(data, ((closureN)self_734642)->elements[5])), Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_734642)->elements[5])), &c_735527);; 
}

static void __lambda_23(void *data, object self_734643, int argc, object *args) /* object self_734643, object r_733112 */
 {
 object r_733112 = args[0];
  
closureN_type c_735416;
object e_735506 [5];
c_735416.hdr.mark = gc_color_red;
 c_735416.hdr.grayed = 0;
c_735416.tag = closureN_tag;
 c_735416.fn = (function_type)__lambda_24;
c_735416.num_args = 1;
c_735416.num_elements = 5;
c_735416.elements = (object *)e_735506;
c_735416.elements[0] = ((closureN)self_734643)->elements[0];
c_735416.elements[1] = ((closureN)self_734643)->elements[1];
c_735416.elements[2] = ((closureN)self_734643)->elements[2];
c_735416.elements[3] = ((closureN)self_734643)->elements[3];
c_735416.elements[4] = ((closureN)self_734643)->elements[4];


make_pair(c_735511,quote__127default,NULL);c_735511.hdr.immutable = 1;

make_pair(c_735510,quote__127var,&c_735511);c_735510.hdr.immutable = 1;

make_pair(c_735512,quote__93_93_93,NULL);c_735512.hdr.immutable = 1;

make_pair(c_735509,&c_735510,&c_735512);c_735509.hdr.immutable = 1;

make_pair(c_735515,quote__93_93_93,NULL);c_735515.hdr.immutable = 1;

make_pair(c_735514,quote__127body2,&c_735515);c_735514.hdr.immutable = 1;

make_pair(c_735513,quote__127body1,&c_735514);c_735513.hdr.immutable = 1;

make_pair(c_735508,&c_735509,&c_735513);c_735508.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735416, ((closureN)self_734643)->elements[5], r_733112, &c_735508);; 
}

static void __lambda_24(void *data, object self_734644, int argc, object *args) /* object self_734644, object r_733109 */
 {
 object r_733109 = args[0];
  
closureN_type c_735418;
object e_735495 [4];
c_735418.hdr.mark = gc_color_red;
 c_735418.hdr.grayed = 0;
c_735418.tag = closureN_tag;
 c_735418.fn = (function_type)__lambda_25;
c_735418.num_args = 1;
c_735418.num_elements = 4;
c_735418.elements = (object *)e_735495;
c_735418.elements[0] = ((closureN)self_734644)->elements[0];
c_735418.elements[1] = ((closureN)self_734644)->elements[1];
c_735418.elements[2] = ((closureN)self_734644)->elements[2];
c_735418.elements[3] = ((closureN)self_734644)->elements[3];


make_pair(c_735501,quote__127default,NULL);c_735501.hdr.immutable = 1;

make_pair(c_735500,quote__127var,&c_735501);c_735500.hdr.immutable = 1;

make_pair(c_735502,quote__93_93_93,NULL);c_735502.hdr.immutable = 1;

make_pair(c_735499,&c_735500,&c_735502);c_735499.hdr.immutable = 1;

make_pair(c_735505,quote__93_93_93,NULL);c_735505.hdr.immutable = 1;

make_pair(c_735504,quote__127body2,&c_735505);c_735504.hdr.immutable = 1;

make_pair(c_735503,quote__127body1,&c_735504);c_735503.hdr.immutable = 1;

make_pair(c_735498,&c_735499,&c_735503);c_735498.hdr.immutable = 1;

make_pair(c_735497,quote_args,&c_735498);c_735497.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735418, ((closureN)self_734644)->elements[4], r_733109, &c_735497);; 
}

static void __lambda_25(void *data, object self_734645, int argc, object *args) /* object self_734645, object r_733106 */
 {
 object r_733106 = args[0];
  
closureN_type c_735420;
object e_735483 [3];
c_735420.hdr.mark = gc_color_red;
 c_735420.hdr.grayed = 0;
c_735420.tag = closureN_tag;
 c_735420.fn = (function_type)__lambda_26;
c_735420.num_args = 1;
c_735420.num_elements = 3;
c_735420.elements = (object *)e_735483;
c_735420.elements[0] = ((closureN)self_734645)->elements[0];
c_735420.elements[1] = ((closureN)self_734645)->elements[1];
c_735420.elements[2] = ((closureN)self_734645)->elements[2];


make_pair(c_735490,quote__127default,NULL);c_735490.hdr.immutable = 1;

make_pair(c_735489,quote__127var,&c_735490);c_735489.hdr.immutable = 1;

make_pair(c_735491,quote__93_93_93,NULL);c_735491.hdr.immutable = 1;

make_pair(c_735488,&c_735489,&c_735491);c_735488.hdr.immutable = 1;

make_pair(c_735494,quote__93_93_93,NULL);c_735494.hdr.immutable = 1;

make_pair(c_735493,quote__127body2,&c_735494);c_735493.hdr.immutable = 1;

make_pair(c_735492,quote__127body1,&c_735493);c_735492.hdr.immutable = 1;

make_pair(c_735487,&c_735488,&c_735492);c_735487.hdr.immutable = 1;

make_pair(c_735486,quote_args,&c_735487);c_735486.hdr.immutable = 1;

make_pair(c_735485,quote_let_85_91optionals,&c_735486);c_735485.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735420, ((closureN)self_734645)->elements[3], r_733106, &c_735485);; 
}

static void __lambda_26(void *data, object self_734646, int argc, object *args) /* object self_734646, object r_733102 */
 {
 object r_733102 = args[0];
  
closureN_type c_735422;
object e_735471 [3];
c_735422.hdr.mark = gc_color_red;
 c_735422.hdr.grayed = 0;
c_735422.tag = closureN_tag;
 c_735422.fn = (function_type)__lambda_27;
c_735422.num_args = 1;
c_735422.num_elements = 3;
c_735422.elements = (object *)e_735471;
c_735422.elements[0] = ((closureN)self_734646)->elements[0];
c_735422.elements[1] = ((closureN)self_734646)->elements[1];
c_735422.elements[2] = ((closureN)self_734646)->elements[2];


make_pair(c_735478,quote__127default,NULL);c_735478.hdr.immutable = 1;

make_pair(c_735477,quote__127var,&c_735478);c_735477.hdr.immutable = 1;

make_pair(c_735479,quote__93_93_93,NULL);c_735479.hdr.immutable = 1;

make_pair(c_735476,&c_735477,&c_735479);c_735476.hdr.immutable = 1;

make_pair(c_735482,quote__93_93_93,NULL);c_735482.hdr.immutable = 1;

make_pair(c_735481,quote__127body2,&c_735482);c_735481.hdr.immutable = 1;

make_pair(c_735480,quote__127body1,&c_735481);c_735480.hdr.immutable = 1;

make_pair(c_735475,&c_735476,&c_735480);c_735475.hdr.immutable = 1;

make_pair(c_735474,quote_args,&c_735475);c_735474.hdr.immutable = 1;

make_pair(c_735473,quote_let_85_91optionals,&c_735474);c_735473.hdr.immutable = 1;

make_pair(c_735472,&c_735473,NULL);c_735472.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735422, r_733102, NULL, &c_735472);; 
}

static void __lambda_27(void *data, object self_734647, int argc, object *args) /* object self_734647, object r_733100 */
 {
 object r_733100 = args[0];
  
closureN_type c_735424;
object e_735452 [2];
c_735424.hdr.mark = gc_color_red;
 c_735424.hdr.grayed = 0;
c_735424.tag = closureN_tag;
 c_735424.fn = (function_type)__lambda_28;
c_735424.num_args = 1;
c_735424.num_elements = 2;
c_735424.elements = (object *)e_735452;
c_735424.elements[0] = ((closureN)self_734647)->elements[0];
c_735424.elements[1] = ((closureN)self_734647)->elements[1];


make_pair(c_735459,quote__93_93_93,NULL);c_735459.hdr.immutable = 1;

make_pair(c_735458,quote__127x,&c_735459);c_735458.hdr.immutable = 1;

make_pair(c_735457,&c_735458,NULL);c_735457.hdr.immutable = 1;

make_pair(c_735456,quote_args,&c_735457);c_735456.hdr.immutable = 1;

make_pair(c_735455,&c_735456,NULL);c_735455.hdr.immutable = 1;

make_pair(c_735466,quote__127default,NULL);c_735466.hdr.immutable = 1;

make_pair(c_735465,quote__127var,&c_735466);c_735465.hdr.immutable = 1;

make_pair(c_735467,quote__93_93_93,NULL);c_735467.hdr.immutable = 1;

make_pair(c_735464,&c_735465,&c_735467);c_735464.hdr.immutable = 1;

make_pair(c_735470,quote__93_93_93,NULL);c_735470.hdr.immutable = 1;

make_pair(c_735469,quote__127body2,&c_735470);c_735469.hdr.immutable = 1;

make_pair(c_735468,quote__127body1,&c_735469);c_735468.hdr.immutable = 1;

make_pair(c_735463,&c_735464,&c_735468);c_735463.hdr.immutable = 1;

make_pair(c_735462,quote_args,&c_735463);c_735462.hdr.immutable = 1;

make_pair(c_735461,quote_let_85_91optionals,&c_735462);c_735461.hdr.immutable = 1;

make_pair(c_735460,&c_735461,NULL);c_735460.hdr.immutable = 1;

make_pair(c_735454,&c_735455,&c_735460);c_735454.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735424, ((closureN)self_734647)->elements[2], r_733100, &c_735454);; 
}

static void __lambda_28(void *data, object self_734648, int argc, object *args) /* object self_734648, object r_733097 */
 {
 object r_733097 = args[0];
  
closureN_type c_735426;
object e_735432 [1];
c_735426.hdr.mark = gc_color_red;
 c_735426.hdr.grayed = 0;
c_735426.tag = closureN_tag;
 c_735426.fn = (function_type)__lambda_29;
c_735426.num_args = 1;
c_735426.num_elements = 1;
c_735426.elements = (object *)e_735432;
c_735426.elements[0] = ((closureN)self_734648)->elements[0];


make_pair(c_735440,quote__93_93_93,NULL);c_735440.hdr.immutable = 1;

make_pair(c_735439,quote__127x,&c_735440);c_735439.hdr.immutable = 1;

make_pair(c_735438,&c_735439,NULL);c_735438.hdr.immutable = 1;

make_pair(c_735437,quote_args,&c_735438);c_735437.hdr.immutable = 1;

make_pair(c_735436,&c_735437,NULL);c_735436.hdr.immutable = 1;

make_pair(c_735447,quote__127default,NULL);c_735447.hdr.immutable = 1;

make_pair(c_735446,quote__127var,&c_735447);c_735446.hdr.immutable = 1;

make_pair(c_735448,quote__93_93_93,NULL);c_735448.hdr.immutable = 1;

make_pair(c_735445,&c_735446,&c_735448);c_735445.hdr.immutable = 1;

make_pair(c_735451,quote__93_93_93,NULL);c_735451.hdr.immutable = 1;

make_pair(c_735450,quote__127body2,&c_735451);c_735450.hdr.immutable = 1;

make_pair(c_735449,quote__127body1,&c_735450);c_735449.hdr.immutable = 1;

make_pair(c_735444,&c_735445,&c_735449);c_735444.hdr.immutable = 1;

make_pair(c_735443,quote_args,&c_735444);c_735443.hdr.immutable = 1;

make_pair(c_735442,quote_let_85_91optionals,&c_735443);c_735442.hdr.immutable = 1;

make_pair(c_735441,&c_735442,NULL);c_735441.hdr.immutable = 1;

make_pair(c_735435,&c_735436,&c_735441);c_735435.hdr.immutable = 1;

make_pair(c_735434,quote_let,&c_735435);c_735434.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735426, ((closureN)self_734648)->elements[1], r_733097, &c_735434);; 
}

static void __lambda_29(void *data, object self_734649, int argc, object *args) /* object self_734649, object r_733095 */
 {
 object r_733095 = args[0];
  
pair_type local_735431; 
return_direct_with_clo1(data,  ((closureN)self_734649)->elements[0], (((closure)  ((closureN)self_734649)->elements[0])->fn),  set_pair_as_expr(&local_735431, r_733095, boolean_f));; 
}

static void __lambda_8(void *data, object self_734650, int argc, object *args) /* object self_734650, object r_733085 */
 {
 object r_733085 = args[0];
  
closureN_type c_735355;
object e_735364 [5];
c_735355.hdr.mark = gc_color_red;
 c_735355.hdr.grayed = 0;
c_735355.tag = closureN_tag;
 c_735355.fn = (function_type)__lambda_9;
c_735355.num_args = 1;
c_735355.num_elements = 5;
c_735355.elements = (object *)e_735364;
c_735355.elements[0] = ((closureN)self_734650)->elements[0];
c_735355.elements[1] = ((closureN)self_734650)->elements[1];
c_735355.elements[2] = ((closureN)self_734650)->elements[2];
c_735355.elements[3] = ((closureN)self_734650)->elements[3];
c_735355.elements[4] = ((closureN)self_734650)->elements[4];



return_direct_with_clo1(data,(closure)&c_735355,__lambda_9,  Cyc_set_cell(data, ((closureN)self_734650)->elements[3], r_733085));; 
}

static void __lambda_9(void *data, object self_734651, int argc, object *args) /* object self_734651, object r_733084 */
 {

  

return_closcall4(data,  car(((closureN)self_734651)->elements[3]),  ((closureN)self_734651)->elements[2], ((closureN)self_734651)->elements[4], ((closureN)self_734651)->elements[1], ((closureN)self_734651)->elements[0]);; 
}

void c_srfi133_inlinable_lambdas(void *data, object clo, int argc, object *args){ 
make_pair(pair_7312228, find_or_add_symbol("unspecified-value"), find_or_add_symbol("unspecified-value__inline__"));
make_pair(pair_7312229, find_or_add_symbol("between?"), find_or_add_symbol("between?__inline__"));
make_pair(pair_7312230, find_or_add_symbol("nonneg-int?"), find_or_add_symbol("nonneg-int?__inline__"));
make_pair(c_7312233, &pair_7312228, NULL);
make_pair(c_7312232, &pair_7312229, &c_7312233);
make_pair(c_7312231, &pair_7312230, &c_7312232);
object buf[1]; object cont = args[0];
buf[0] = &c_7312231; (((closure)cont)->fn)(data, cont, 1, buf);
 } 
void c_srfi133_entry_pt_first_lambda(void *data, object clo, int argc, object *args){ 
Cyc_set_globals_changed((gc_thread_data *)data);
  quote__75smallest_91length = find_or_add_symbol("%smallest-length");
  quote__75vector_91copy_67 = find_or_add_symbol("%vector-copy!");
  quote__75vector_91reverse_91copy_67 = find_or_add_symbol("%vector-reverse-copy!");
  quote__75vector_91reverse_67 = find_or_add_symbol("%vector-reverse!");
  quote__75vector_91fold1 = find_or_add_symbol("%vector-fold1");
  quote__75vector_91fold2_87 = find_or_add_symbol("%vector-fold2+");
  quote__75vector_91map1_67 = find_or_add_symbol("%vector-map1!");
  quote__75vector_91map2_87_67 = find_or_add_symbol("%vector-map2+!");
  quote_vector_91unfold_67 = find_or_add_symbol("vector-unfold!");
  quote_vector_91concatenate_117aux = find_or_add_symbol("vector-concatenate:aux");
  quote_vector_91fold_91right = find_or_add_symbol("vector-fold-right");
  quote_vector_91for_91each = find_or_add_symbol("vector-for-each");
  quote_vector_91index_95skip = find_or_add_symbol("vector-index/skip");
  quote_vector_91index_95skip_91right = find_or_add_symbol("vector-index/skip-right");
  quote_vector_91any = find_or_add_symbol("vector-any");
  quote_vector_91every = find_or_add_symbol("vector-every");
  quote_attempted = find_or_add_symbol("attempted");
  quote__list = find_or_add_symbol("list");
  quote_source_91length = find_or_add_symbol("source-length");
  quote_source = find_or_add_symbol("source");
  quote_target_91length = find_or_add_symbol("target-length");
  quote_target = find_or_add_symbol("target");
  quote_send = find_or_add_symbol("send");
  quote_sstart = find_or_add_symbol("sstart");
  quote_tstart = find_or_add_symbol("tstart");
  quote__for = find_or_add_symbol("for");
  quote_end = find_or_add_symbol("end");
  quote_start = find_or_add_symbol("start");
  quote_quote = find_or_add_symbol("quote");
  quote_vector_91parse_91start_87end = find_or_add_symbol("vector-parse-start+end");
  quote__127end = find_or_add_symbol("?end");
  quote__127start = find_or_add_symbol("?start");
  quote_receive = find_or_add_symbol("receive");
  quote__127callee = find_or_add_symbol("?callee");
  quote_vector_127 = find_or_add_symbol("vector?");
  quote_check_91type = find_or_add_symbol("check-type");
  quote__127vec = find_or_add_symbol("?vec");
  quote_were = find_or_add_symbol("were");
  quote_extra = find_or_add_symbol("extra");
  quote_was = find_or_add_symbol("was");
  quote_len = find_or_add_symbol("len");
  quote__125 = find_or_add_symbol(">");
  quote__121 = find_or_add_symbol("<");
  quote_vector = find_or_add_symbol("vector");
  quote_into = find_or_add_symbol("into");
  quote_calling = find_or_add_symbol("calling");
  quote__while = find_or_add_symbol("while");
  quote_cdr = find_or_add_symbol("cdr");
  quote_new_91args = find_or_add_symbol("new-args");
  quote_car = find_or_add_symbol("car");
  quote__127more = find_or_add_symbol("?more");
  quote_let_85 = find_or_add_symbol("let*");
  quote__127orig_91args_91var = find_or_add_symbol("?orig-args-var");
  quote_length = find_or_add_symbol("length");
  quote_error = find_or_add_symbol("error");
  quote__127args_91var = find_or_add_symbol("?args-var");
  quote_null_127 = find_or_add_symbol("null?");
  quote__if = find_or_add_symbol("if");
  quote__127args = find_or_add_symbol("?args");
  quote_let_85_91optionals_117aux = find_or_add_symbol("let*-optionals:aux");
  quote__127body2 = find_or_add_symbol("?body2");
  quote__127body1 = find_or_add_symbol("?body1");
  quote__127default = find_or_add_symbol("?default");
  quote__127var = find_or_add_symbol("?var");
  quote_let_85_91optionals = find_or_add_symbol("let*-optionals");
  quote__93_93_93 = find_or_add_symbol("...");
  quote__127x = find_or_add_symbol("?x");
  quote_args = find_or_add_symbol("args");
  quote_let = find_or_add_symbol("let");

  add_global("__glo_lib_91init_117srfi133_srfi_133", (object *) &__glo_lib_91init_117srfi133_srfi_133);
  add_global("__glo_reverse_91list_91_125vector_srfi_133", (object *) &__glo_reverse_91list_91_125vector_srfi_133);
  add_global("__glo_reverse_91vector_91_125list_srfi_133", (object *) &__glo_reverse_91vector_91_125list_srfi_133);
  add_global("__glo_vector_91reverse_67_srfi_133", (object *) &__glo_vector_91reverse_67_srfi_133);
  add_global("__glo_vector_91reverse_91copy_67_srfi_133", (object *) &__glo_vector_91reverse_91copy_67_srfi_133);
  add_global("__glo_vector_91swap_67_srfi_133", (object *) &__glo_vector_91swap_67_srfi_133);
  add_global("__glo_vector_91partition_srfi_133", (object *) &__glo_vector_91partition_srfi_133);
  add_global("__glo_vector_91every_srfi_133", (object *) &__glo_vector_91every_srfi_133);
  add_global("__glo_vector_91any_srfi_133", (object *) &__glo_vector_91any_srfi_133);
  add_global("__glo_vector_91binary_91search_srfi_133", (object *) &__glo_vector_91binary_91search_srfi_133);
  add_global("__glo_vector_91index_95skip_91right_srfi_133", (object *) &__glo_vector_91index_95skip_91right_srfi_133);
  add_global("__glo_vector_91skip_91right_srfi_133", (object *) &__glo_vector_91skip_91right_srfi_133);
  add_global("__glo_vector_91index_91right_srfi_133", (object *) &__glo_vector_91index_91right_srfi_133);
  add_global("__glo_vector_91index_95skip_srfi_133", (object *) &__glo_vector_91index_95skip_srfi_133);
  add_global("__glo_vector_91skip_srfi_133", (object *) &__glo_vector_91skip_srfi_133);
  add_global("__glo_vector_91index_srfi_133", (object *) &__glo_vector_91index_srfi_133);
  add_global("__glo_vector_91cumulate_srfi_133", (object *) &__glo_vector_91cumulate_srfi_133);
  add_global("__glo_vector_91count_srfi_133", (object *) &__glo_vector_91count_srfi_133);
  add_global("__glo_vector_91for_91each_srfi_133", (object *) &__glo_vector_91for_91each_srfi_133);
  add_global("__glo_vector_91map_67_srfi_133", (object *) &__glo_vector_91map_67_srfi_133);
  add_global("__glo_vector_91fold_91right_srfi_133", (object *) &__glo_vector_91fold_91right_srfi_133);
  add_global("__glo_vector_91fold_srfi_133", (object *) &__glo_vector_91fold_srfi_133);
  add_global("__glo_binary_91vector_123_srfi_133", (object *) &__glo_binary_91vector_123_srfi_133);
  add_global("__glo_vector_123_srfi_133", (object *) &__glo_vector_123_srfi_133);
  add_global("__glo_vector_91empty_127_srfi_133", (object *) &__glo_vector_91empty_127_srfi_133);
  add_global("__glo_vector_91append_91subvectors_srfi_133", (object *) &__glo_vector_91append_91subvectors_srfi_133);
  add_global("__glo_vector_91concatenate_117aux_srfi_133", (object *) &__glo_vector_91concatenate_117aux_srfi_133);
  add_global("__glo_vector_91concatenate_srfi_133", (object *) &__glo_vector_91concatenate_srfi_133);
  add_global("__glo_vector_91reverse_91copy_srfi_133", (object *) &__glo_vector_91reverse_91copy_srfi_133);
  add_global("__glo_vector_91copy_117parse_91args_srfi_133", (object *) &__glo_vector_91copy_117parse_91args_srfi_133);
  add_global("__glo_vector_91copy_srfi_133", (object *) &__glo_vector_91copy_srfi_133);
  add_global("__glo_vector_91unfold_91right_67_srfi_133", (object *) &__glo_vector_91unfold_91right_67_srfi_133);
  add_global("__glo_vector_91unfold_91right_srfi_133", (object *) &__glo_vector_91unfold_91right_srfi_133);
  add_global("__glo_vector_91unfold_67_srfi_133", (object *) &__glo_vector_91unfold_67_srfi_133);
  add_global("__glo_vector_91unfold_srfi_133", (object *) &__glo_vector_91unfold_srfi_133);
  add_global("__glo__75vector_91map2_87_67_srfi_133", (object *) &__glo__75vector_91map2_87_67_srfi_133);
  add_global("__glo__75vector_91map1_67_srfi_133", (object *) &__glo__75vector_91map1_67_srfi_133);
  add_global("__glo__75vector_91fold2_87_srfi_133", (object *) &__glo__75vector_91fold2_87_srfi_133);
  add_global("__glo__75vector_91fold1_srfi_133", (object *) &__glo__75vector_91fold1_srfi_133);
  add_global("__glo__75vector_91reverse_67_srfi_133", (object *) &__glo__75vector_91reverse_67_srfi_133);
  add_global("__glo__75vector_91reverse_91copy_67_srfi_133", (object *) &__glo__75vector_91reverse_91copy_67_srfi_133);
  add_global("__glo__75vector_91copy_67_srfi_133", (object *) &__glo__75vector_91copy_67_srfi_133);
  add_global("__glo__75smallest_91length_srfi_133", (object *) &__glo__75smallest_91length_srfi_133);
  add_global("__glo_let_91vector_91start_87end_srfi_133", (object *) &__glo_let_91vector_91start_87end_srfi_133);
  add_global("__glo_vector_91parse_91start_87end_srfi_133", (object *) &__glo_vector_91parse_91start_87end_srfi_133);
  add_global("__glo_check_91indices_srfi_133", (object *) &__glo_check_91indices_srfi_133);
  add_global("__glo_check_91index_srfi_133", (object *) &__glo_check_91index_srfi_133);
  add_global("__glo_check_91type_srfi_133", (object *) &__glo_check_91type_srfi_133);
  add_global("__glo_vectors_91ref_srfi_133", (object *) &__glo_vectors_91ref_srfi_133);
  add_global("__glo_unspecified_91value_191_191inline_191_191_srfi_133", (object *) &__glo_unspecified_91value_191_191inline_191_191_srfi_133);
  add_global("__glo_unspecified_91value_srfi_133", (object *) &__glo_unspecified_91value_srfi_133);
  add_global("__glo_between_127_191_191inline_191_191_srfi_133", (object *) &__glo_between_127_191_191inline_191_191_srfi_133);
  add_global("__glo_between_127_srfi_133", (object *) &__glo_between_127_srfi_133);
  add_global("__glo_nonneg_91int_127_191_191inline_191_191_srfi_133", (object *) &__glo_nonneg_91int_127_191_191inline_191_191_srfi_133);
  add_global("__glo_nonneg_91int_127_srfi_133", (object *) &__glo_nonneg_91int_127_srfi_133);
  add_global("__glo_let_85_91optionals_117aux_srfi_133", (object *) &__glo_let_85_91optionals_117aux_srfi_133);
  add_global("__glo_let_85_91optionals_srfi_133", (object *) &__glo_let_85_91optionals_srfi_133);
  mclosure0(c_7310250, (function_type)__lambda_470);c_7310250.num_args = 0; 
  __glo_lib_91init_117srfi133_srfi_133 = &c_7310250; 
  mclosure0(c_739941, (function_type)__lambda_445);c_739941.num_args = 1; 
  __glo_reverse_91list_91_125vector_srfi_133 = &c_739941; 
  mclosure0(c_739874, (function_type)__lambda_434);c_739874.num_args = 1; 
  __glo_reverse_91vector_91_125list_srfi_133 = &c_739874; 
  mclosure0(c_739852, (function_type)__lambda_428);c_739852.num_args = 1; 
  __glo_vector_91reverse_67_srfi_133 = &c_739852; 
  mclosure0(c_739559, (function_type)__lambda_413);c_739559.num_args = 3; 
  __glo_vector_91reverse_91copy_67_srfi_133 = &c_739559; 
  mclosure0(c_739513, (function_type)__lambda_405);c_739513.num_args = 3; 
  __glo_vector_91swap_67_srfi_133 = &c_739513; 
  mclosure0(c_739400, (function_type)__lambda_393);c_739400.num_args = 2; 
  __glo_vector_91partition_srfi_133 = &c_739400; 
  mclosure0(c_739242, (function_type)__lambda_379);c_739242.num_args = 3; 
  __glo_vector_91binary_91search_srfi_133 = &c_739242; 
  mclosure0(c_739220, (function_type)__lambda_375);c_739220.num_args = 2; 
  __glo_vector_91skip_91right_srfi_133 = &c_739220; 
  mclosure0(c_739218, (function_type)__lambda_374);c_739218.num_args = 2; 
  __glo_vector_91index_91right_srfi_133 = &c_739218; 
  mclosure0(c_739196, (function_type)__lambda_370);c_739196.num_args = 2; 
  __glo_vector_91skip_srfi_133 = &c_739196; 
  mclosure0(c_739194, (function_type)__lambda_369);c_739194.num_args = 2; 
  __glo_vector_91index_srfi_133 = &c_739194; 
  mclosure0(c_739122, (function_type)__lambda_359);c_739122.num_args = 3; 
  __glo_vector_91cumulate_srfi_133 = &c_739122; 
  mclosure0(c_739039, (function_type)__lambda_346);c_739039.num_args = 2; 
  __glo_vector_91count_srfi_133 = &c_739039; 
  mclosure0(c_738983, (function_type)__lambda_336);c_738983.num_args = 2; 
  __glo_vector_91map_67_srfi_133 = &c_738983; 
  mclosure0(c_738939, (function_type)__lambda_329);c_738939.num_args = 3; 
  __glo_vector_91fold_srfi_133 = &c_738939; 
  mclosure0(c_738815, (function_type)__lambda_316);c_738815.num_args = 3; 
  __glo_binary_91vector_123_srfi_133 = &c_738815; 
  mclosure0(c_738725, (function_type)__lambda_303);c_738725.num_args = 1; 
  __glo_vector_123_srfi_133 = &c_738725; 
  mclosure0(c_738714, (function_type)__lambda_301);c_738714.num_args = 1; 
  __glo_vector_91empty_127_srfi_133 = &c_738714; 
  mclosure0(c_738409, (function_type)__lambda_263);c_738409.num_args = 0; 
  __glo_vector_91append_91subvectors_srfi_133 = &c_738409; 
  mclosure0(c_738407, (function_type)__lambda_262);c_738407.num_args = 1; 
  __glo_vector_91concatenate_srfi_133 = &c_738407; 
  mclosure0(c_738369, (function_type)__lambda_254);c_738369.num_args = 1; 
  __glo_vector_91reverse_91copy_srfi_133 = &c_738369; 
  mclosure0(c_738189, (function_type)__lambda_243);c_738189.num_args = 2; 
  __glo_vector_91copy_117parse_91args_srfi_133 = &c_738189; 
  mclosure0(c_738139, (function_type)__lambda_235);c_738139.num_args = 1; 
  __glo_vector_91copy_srfi_133 = &c_738139; 
  mclosure0(c_737908, (function_type)__lambda_207);c_737908.num_args = 4; 
  __glo_vector_91unfold_91right_67_srfi_133 = &c_737908; 
  mclosure0(c_737868, (function_type)__lambda_202);c_737868.num_args = 2; 
  __glo_vector_91unfold_91right_srfi_133 = &c_737868; 
  mclosure0(c_737828, (function_type)__lambda_197);c_737828.num_args = 2; 
  __glo_vector_91unfold_srfi_133 = &c_737828; 
  mmacro(c_737275, (function_type)__lambda_157);c_737275.num_args = 3; 
  __glo_let_91vector_91start_87end_srfi_133 = &c_737275; 
  mclosure0(c_737205, (function_type)__lambda_155);c_737205.num_args = 5; 
  __glo_vector_91parse_91start_87end_srfi_133 = &c_737205; 
  mclosure0(c_737002, (function_type)__lambda_141);c_737002.num_args = 6; 
  __glo_check_91indices_srfi_133 = &c_737002; 
  mclosure0(c_736933, (function_type)__lambda_137);c_736933.num_args = 3; 
  __glo_check_91index_srfi_133 = &c_736933; 
  mclosure0(c_736903, (function_type)__lambda_134);c_736903.num_args = 3; 
  __glo_check_91type_srfi_133 = &c_736903; 
  mclosure0(c_736890, (function_type)__lambda_131);c_736890.num_args = 2; 
  __glo_vectors_91ref_srfi_133 = &c_736890; 
  mclosure0(c_736888, (function_type)__lambda_774);c_736888.num_args = 0; 
  __glo_unspecified_91value_191_191inline_191_191_srfi_133 = &c_736888; 
  mclosure0(c_736886, (function_type)__lambda_130);c_736886.num_args = 0; 
  __glo_unspecified_91value_srfi_133 = &c_736886; 
  mclosure0(c_736879, (function_type)__lambda_773);c_736879.num_args = 3; 
  __glo_between_127_191_191inline_191_191_srfi_133 = &c_736879; 
  mclosure0(c_736872, (function_type)__lambda_129);c_736872.num_args = 3; 
  __glo_between_127_srfi_133 = &c_736872; 
  mclosure0(c_736861, (function_type)__lambda_772);c_736861.num_args = 1; 
  __glo_nonneg_91int_127_191_191inline_191_191_srfi_133 = &c_736861; 
  mclosure0(c_736850, (function_type)__lambda_128);c_736850.num_args = 1; 
  __glo_nonneg_91int_127_srfi_133 = &c_736850; 
  mmacro(c_735908, (function_type)__lambda_59);c_735908.num_args = 3; 
  __glo_let_85_91optionals_117aux_srfi_133 = &c_735908; 
  mmacro(c_735326, (function_type)__lambda_1);c_735326.num_args = 3; 
  __glo_let_85_91optionals_srfi_133 = &c_735326; 
  __glo_vector_91every_srfi_133 = boolean_f; 
  __glo_vector_91any_srfi_133 = boolean_f; 
  __glo_vector_91index_95skip_91right_srfi_133 = boolean_f; 
  __glo_vector_91index_95skip_srfi_133 = boolean_f; 
  __glo_vector_91for_91each_srfi_133 = boolean_f; 
  __glo_vector_91fold_91right_srfi_133 = boolean_f; 
  __glo_vector_91concatenate_117aux_srfi_133 = boolean_f; 
  __glo_vector_91unfold_67_srfi_133 = boolean_f; 
  __glo__75vector_91map2_87_67_srfi_133 = boolean_f; 
  __glo__75vector_91map1_67_srfi_133 = boolean_f; 
  __glo__75vector_91fold2_87_srfi_133 = boolean_f; 
  __glo__75vector_91fold1_srfi_133 = boolean_f; 
  __glo__75vector_91reverse_67_srfi_133 = boolean_f; 
  __glo__75vector_91reverse_91copy_67_srfi_133 = boolean_f; 
  __glo__75vector_91copy_67_srfi_133 = boolean_f; 
  __glo__75smallest_91length_srfi_133 = boolean_f; 

  mclosure0(clo_7312235, c_srfi133_inlinable_lambdas); make_pair(pair_7312234, find_or_add_symbol("c_srfi133_inlinable_lambdas"), &clo_7312235);
  make_cvar(cvar_7312236, (object *)&__glo_lib_91init_117srfi133_srfi_133);make_pair(pair_7312237, find_or_add_symbol("lib-init:srfi133"), &cvar_7312236);
  make_cvar(cvar_7312238, (object *)&__glo_reverse_91list_91_125vector_srfi_133);make_pair(pair_7312239, find_or_add_symbol("reverse-list->vector"), &cvar_7312238);
  make_cvar(cvar_7312240, (object *)&__glo_reverse_91vector_91_125list_srfi_133);make_pair(pair_7312241, find_or_add_symbol("reverse-vector->list"), &cvar_7312240);
  make_cvar(cvar_7312242, (object *)&__glo_vector_91reverse_67_srfi_133);make_pair(pair_7312243, find_or_add_symbol("vector-reverse!"), &cvar_7312242);
  make_cvar(cvar_7312244, (object *)&__glo_vector_91reverse_91copy_67_srfi_133);make_pair(pair_7312245, find_or_add_symbol("vector-reverse-copy!"), &cvar_7312244);
  make_cvar(cvar_7312246, (object *)&__glo_vector_91swap_67_srfi_133);make_pair(pair_7312247, find_or_add_symbol("vector-swap!"), &cvar_7312246);
  make_cvar(cvar_7312248, (object *)&__glo_vector_91partition_srfi_133);make_pair(pair_7312249, find_or_add_symbol("vector-partition"), &cvar_7312248);
  make_cvar(cvar_7312250, (object *)&__glo_vector_91every_srfi_133);make_pair(pair_7312251, find_or_add_symbol("vector-every"), &cvar_7312250);
  make_cvar(cvar_7312252, (object *)&__glo_vector_91any_srfi_133);make_pair(pair_7312253, find_or_add_symbol("vector-any"), &cvar_7312252);
  make_cvar(cvar_7312254, (object *)&__glo_vector_91binary_91search_srfi_133);make_pair(pair_7312255, find_or_add_symbol("vector-binary-search"), &cvar_7312254);
  make_cvar(cvar_7312256, (object *)&__glo_vector_91index_95skip_91right_srfi_133);make_pair(pair_7312257, find_or_add_symbol("vector-index/skip-right"), &cvar_7312256);
  make_cvar(cvar_7312258, (object *)&__glo_vector_91skip_91right_srfi_133);make_pair(pair_7312259, find_or_add_symbol("vector-skip-right"), &cvar_7312258);
  make_cvar(cvar_7312260, (object *)&__glo_vector_91index_91right_srfi_133);make_pair(pair_7312261, find_or_add_symbol("vector-index-right"), &cvar_7312260);
  make_cvar(cvar_7312262, (object *)&__glo_vector_91index_95skip_srfi_133);make_pair(pair_7312263, find_or_add_symbol("vector-index/skip"), &cvar_7312262);
  make_cvar(cvar_7312264, (object *)&__glo_vector_91skip_srfi_133);make_pair(pair_7312265, find_or_add_symbol("vector-skip"), &cvar_7312264);
  make_cvar(cvar_7312266, (object *)&__glo_vector_91index_srfi_133);make_pair(pair_7312267, find_or_add_symbol("vector-index"), &cvar_7312266);
  make_cvar(cvar_7312268, (object *)&__glo_vector_91cumulate_srfi_133);make_pair(pair_7312269, find_or_add_symbol("vector-cumulate"), &cvar_7312268);
  make_cvar(cvar_7312270, (object *)&__glo_vector_91count_srfi_133);make_pair(pair_7312271, find_or_add_symbol("vector-count"), &cvar_7312270);
  make_cvar(cvar_7312272, (object *)&__glo_vector_91for_91each_srfi_133);make_pair(pair_7312273, find_or_add_symbol("vector-for-each"), &cvar_7312272);
  make_cvar(cvar_7312274, (object *)&__glo_vector_91map_67_srfi_133);make_pair(pair_7312275, find_or_add_symbol("vector-map!"), &cvar_7312274);
  make_cvar(cvar_7312276, (object *)&__glo_vector_91fold_91right_srfi_133);make_pair(pair_7312277, find_or_add_symbol("vector-fold-right"), &cvar_7312276);
  make_cvar(cvar_7312278, (object *)&__glo_vector_91fold_srfi_133);make_pair(pair_7312279, find_or_add_symbol("vector-fold"), &cvar_7312278);
  make_cvar(cvar_7312280, (object *)&__glo_binary_91vector_123_srfi_133);make_pair(pair_7312281, find_or_add_symbol("binary-vector="), &cvar_7312280);
  make_cvar(cvar_7312282, (object *)&__glo_vector_123_srfi_133);make_pair(pair_7312283, find_or_add_symbol("vector="), &cvar_7312282);
  make_cvar(cvar_7312284, (object *)&__glo_vector_91empty_127_srfi_133);make_pair(pair_7312285, find_or_add_symbol("vector-empty?"), &cvar_7312284);
  make_cvar(cvar_7312286, (object *)&__glo_vector_91append_91subvectors_srfi_133);make_pair(pair_7312287, find_or_add_symbol("vector-append-subvectors"), &cvar_7312286);
  make_cvar(cvar_7312288, (object *)&__glo_vector_91concatenate_117aux_srfi_133);make_pair(pair_7312289, find_or_add_symbol("vector-concatenate:aux"), &cvar_7312288);
  make_cvar(cvar_7312290, (object *)&__glo_vector_91concatenate_srfi_133);make_pair(pair_7312291, find_or_add_symbol("vector-concatenate"), &cvar_7312290);
  make_cvar(cvar_7312292, (object *)&__glo_vector_91reverse_91copy_srfi_133);make_pair(pair_7312293, find_or_add_symbol("vector-reverse-copy"), &cvar_7312292);
  make_cvar(cvar_7312294, (object *)&__glo_vector_91copy_117parse_91args_srfi_133);make_pair(pair_7312295, find_or_add_symbol("vector-copy:parse-args"), &cvar_7312294);
  make_cvar(cvar_7312296, (object *)&__glo_vector_91copy_srfi_133);make_pair(pair_7312297, find_or_add_symbol("vector-copy"), &cvar_7312296);
  make_cvar(cvar_7312298, (object *)&__glo_vector_91unfold_91right_67_srfi_133);make_pair(pair_7312299, find_or_add_symbol("vector-unfold-right!"), &cvar_7312298);
  make_cvar(cvar_7312300, (object *)&__glo_vector_91unfold_91right_srfi_133);make_pair(pair_7312301, find_or_add_symbol("vector-unfold-right"), &cvar_7312300);
  make_cvar(cvar_7312302, (object *)&__glo_vector_91unfold_67_srfi_133);make_pair(pair_7312303, find_or_add_symbol("vector-unfold!"), &cvar_7312302);
  make_cvar(cvar_7312304, (object *)&__glo_vector_91unfold_srfi_133);make_pair(pair_7312305, find_or_add_symbol("vector-unfold"), &cvar_7312304);
  make_cvar(cvar_7312306, (object *)&__glo__75vector_91map2_87_67_srfi_133);make_pair(pair_7312307, find_or_add_symbol("%vector-map2+!"), &cvar_7312306);
  make_cvar(cvar_7312308, (object *)&__glo__75vector_91map1_67_srfi_133);make_pair(pair_7312309, find_or_add_symbol("%vector-map1!"), &cvar_7312308);
  make_cvar(cvar_7312310, (object *)&__glo__75vector_91fold2_87_srfi_133);make_pair(pair_7312311, find_or_add_symbol("%vector-fold2+"), &cvar_7312310);
  make_cvar(cvar_7312312, (object *)&__glo__75vector_91fold1_srfi_133);make_pair(pair_7312313, find_or_add_symbol("%vector-fold1"), &cvar_7312312);
  make_cvar(cvar_7312314, (object *)&__glo__75vector_91reverse_67_srfi_133);make_pair(pair_7312315, find_or_add_symbol("%vector-reverse!"), &cvar_7312314);
  make_cvar(cvar_7312316, (object *)&__glo__75vector_91reverse_91copy_67_srfi_133);make_pair(pair_7312317, find_or_add_symbol("%vector-reverse-copy!"), &cvar_7312316);
  make_cvar(cvar_7312318, (object *)&__glo__75vector_91copy_67_srfi_133);make_pair(pair_7312319, find_or_add_symbol("%vector-copy!"), &cvar_7312318);
  make_cvar(cvar_7312320, (object *)&__glo__75smallest_91length_srfi_133);make_pair(pair_7312321, find_or_add_symbol("%smallest-length"), &cvar_7312320);
  make_cvar(cvar_7312322, (object *)&__glo_let_91vector_91start_87end_srfi_133);make_pair(pair_7312323, find_or_add_symbol("let-vector-start+end"), &cvar_7312322);
  make_cvar(cvar_7312324, (object *)&__glo_vector_91parse_91start_87end_srfi_133);make_pair(pair_7312325, find_or_add_symbol("vector-parse-start+end"), &cvar_7312324);
  make_cvar(cvar_7312326, (object *)&__glo_check_91indices_srfi_133);make_pair(pair_7312327, find_or_add_symbol("check-indices"), &cvar_7312326);
  make_cvar(cvar_7312328, (object *)&__glo_check_91index_srfi_133);make_pair(pair_7312329, find_or_add_symbol("check-index"), &cvar_7312328);
  make_cvar(cvar_7312330, (object *)&__glo_check_91type_srfi_133);make_pair(pair_7312331, find_or_add_symbol("check-type"), &cvar_7312330);
  make_cvar(cvar_7312332, (object *)&__glo_vectors_91ref_srfi_133);make_pair(pair_7312333, find_or_add_symbol("vectors-ref"), &cvar_7312332);
  make_cvar(cvar_7312334, (object *)&__glo_unspecified_91value_191_191inline_191_191_srfi_133);make_pair(pair_7312335, find_or_add_symbol("unspecified-value__inline__"), &cvar_7312334);
  make_cvar(cvar_7312336, (object *)&__glo_unspecified_91value_srfi_133);make_pair(pair_7312337, find_or_add_symbol("unspecified-value"), &cvar_7312336);
  make_cvar(cvar_7312338, (object *)&__glo_between_127_191_191inline_191_191_srfi_133);make_pair(pair_7312339, find_or_add_symbol("between?__inline__"), &cvar_7312338);
  make_cvar(cvar_7312340, (object *)&__glo_between_127_srfi_133);make_pair(pair_7312341, find_or_add_symbol("between?"), &cvar_7312340);
  make_cvar(cvar_7312342, (object *)&__glo_nonneg_91int_127_191_191inline_191_191_srfi_133);make_pair(pair_7312343, find_or_add_symbol("nonneg-int?__inline__"), &cvar_7312342);
  make_cvar(cvar_7312344, (object *)&__glo_nonneg_91int_127_srfi_133);make_pair(pair_7312345, find_or_add_symbol("nonneg-int?"), &cvar_7312344);
  make_cvar(cvar_7312346, (object *)&__glo_let_85_91optionals_117aux_srfi_133);make_pair(pair_7312347, find_or_add_symbol("let*-optionals:aux"), &cvar_7312346);
  make_cvar(cvar_7312348, (object *)&__glo_let_85_91optionals_srfi_133);make_pair(pair_7312349, find_or_add_symbol("let*-optionals"), &cvar_7312348);
make_pair(c_7312407, &pair_7312234,Cyc_global_variables);
make_pair(c_7312406, &pair_7312237, &c_7312407);
make_pair(c_7312405, &pair_7312239, &c_7312406);
make_pair(c_7312404, &pair_7312241, &c_7312405);
make_pair(c_7312403, &pair_7312243, &c_7312404);
make_pair(c_7312402, &pair_7312245, &c_7312403);
make_pair(c_7312401, &pair_7312247, &c_7312402);
make_pair(c_7312400, &pair_7312249, &c_7312401);
make_pair(c_7312399, &pair_7312251, &c_7312400);
make_pair(c_7312398, &pair_7312253, &c_7312399);
make_pair(c_7312397, &pair_7312255, &c_7312398);
make_pair(c_7312396, &pair_7312257, &c_7312397);
make_pair(c_7312395, &pair_7312259, &c_7312396);
make_pair(c_7312394, &pair_7312261, &c_7312395);
make_pair(c_7312393, &pair_7312263, &c_7312394);
make_pair(c_7312392, &pair_7312265, &c_7312393);
make_pair(c_7312391, &pair_7312267, &c_7312392);
make_pair(c_7312390, &pair_7312269, &c_7312391);
make_pair(c_7312389, &pair_7312271, &c_7312390);
make_pair(c_7312388, &pair_7312273, &c_7312389);
make_pair(c_7312387, &pair_7312275, &c_7312388);
make_pair(c_7312386, &pair_7312277, &c_7312387);
make_pair(c_7312385, &pair_7312279, &c_7312386);
make_pair(c_7312384, &pair_7312281, &c_7312385);
make_pair(c_7312383, &pair_7312283, &c_7312384);
make_pair(c_7312382, &pair_7312285, &c_7312383);
make_pair(c_7312381, &pair_7312287, &c_7312382);
make_pair(c_7312380, &pair_7312289, &c_7312381);
make_pair(c_7312379, &pair_7312291, &c_7312380);
make_pair(c_7312378, &pair_7312293, &c_7312379);
make_pair(c_7312377, &pair_7312295, &c_7312378);
make_pair(c_7312376, &pair_7312297, &c_7312377);
make_pair(c_7312375, &pair_7312299, &c_7312376);
make_pair(c_7312374, &pair_7312301, &c_7312375);
make_pair(c_7312373, &pair_7312303, &c_7312374);
make_pair(c_7312372, &pair_7312305, &c_7312373);
make_pair(c_7312371, &pair_7312307, &c_7312372);
make_pair(c_7312370, &pair_7312309, &c_7312371);
make_pair(c_7312369, &pair_7312311, &c_7312370);
make_pair(c_7312368, &pair_7312313, &c_7312369);
make_pair(c_7312367, &pair_7312315, &c_7312368);
make_pair(c_7312366, &pair_7312317, &c_7312367);
make_pair(c_7312365, &pair_7312319, &c_7312366);
make_pair(c_7312364, &pair_7312321, &c_7312365);
make_pair(c_7312363, &pair_7312323, &c_7312364);
make_pair(c_7312362, &pair_7312325, &c_7312363);
make_pair(c_7312361, &pair_7312327, &c_7312362);
make_pair(c_7312360, &pair_7312329, &c_7312361);
make_pair(c_7312359, &pair_7312331, &c_7312360);
make_pair(c_7312358, &pair_7312333, &c_7312359);
make_pair(c_7312357, &pair_7312335, &c_7312358);
make_pair(c_7312356, &pair_7312337, &c_7312357);
make_pair(c_7312355, &pair_7312339, &c_7312356);
make_pair(c_7312354, &pair_7312341, &c_7312355);
make_pair(c_7312353, &pair_7312343, &c_7312354);
make_pair(c_7312352, &pair_7312345, &c_7312353);
make_pair(c_7312351, &pair_7312347, &c_7312352);
make_pair(c_7312350, &pair_7312349, &c_7312351);
Cyc_global_variables = &c_7312350;
object buf[1]; buf[0] = ((closure1_type *)clo)->element;
(((closure)__glo_lib_91init_117srfi133_srfi_133)->fn)(data, buf[0], 1, buf);
}
void c_srfi133_entry_pt(void *data, object cont, int argc, object value){ 
  register_library("srfi_133");
  c_srfi133_entry_pt_first_lambda(data, cont, argc, value);
}
