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

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

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

#define return_direct_with_clo8(td, clo, _fn,a1,a2,a3,a4,a5,a6,a7,a8) { \
 char top; \
 object buf[8]; buf[0] = a1;buf[1] = a2;buf[2] = a3;buf[3] = a4;buf[4] = a5;buf[5] = a6;buf[6] = a7;buf[7] = a8;\
 if (stack_overflow(&top, (((gc_thread_data *)data)->stack_limit))) { \
     GC(td, clo, buf, 8); \
     return; \
 } else { \
     (_fn)(td, (closure)(clo), 8, 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_117srfi132_srfi_132 = NULL;
object __glo_vector_91stable_91sort_67_srfi_132 = NULL;
object __glo_vector_91stable_91sort_srfi_132 = NULL;
object __glo_vector_91sort_67_srfi_132 = NULL;
object __glo_vector_91sort_srfi_132 = NULL;
object __glo_list_91stable_91sort_67_srfi_132 = NULL;
object __glo_list_91stable_91sort_srfi_132 = NULL;
object __glo_list_91sort_67_srfi_132 = NULL;
object __glo_list_91sort_srfi_132 = NULL;
object __glo_assert_srfi_132 = NULL;
object __glo_copy_91bigger_67_srfi_132 = NULL;
object __glo_copy_91smaller_67_srfi_132 = NULL;
object __glo_count_91smaller_srfi_132 = NULL;
object __glo__75_75vector_91select2_srfi_132 = NULL;
object __glo__75_75vector_91select_srfi_132 = NULL;
object __glo__75vector_91select2_srfi_132 = NULL;
object __glo__75vector_91select_srfi_132 = NULL;
object __glo_just_91sort_91it_91threshold_srfi_132 = NULL;
object __glo_vector_91separate_67_srfi_132 = NULL;
object __glo_vector_91select_67_srfi_132 = NULL;
object __glo_vector_91select_srfi_132 = NULL;
object __glo_vector_91find_91median_67_srfi_132 = NULL;
object __glo_vector_91find_91median_srfi_132 = NULL;
object __glo__75quick_91sort_67_srfi_132 = NULL;
object __glo_vector_91quick_91sort_srfi_132 = NULL;
object __glo_vector_91quick_91sort_67_srfi_132 = NULL;
object __glo__75vector_91merge_91sort_67_srfi_132 = NULL;
object __glo_vector_91merge_91sort_srfi_132 = NULL;
object __glo_vector_91merge_91sort_67_srfi_132 = NULL;
object __glo__75vector_91merge_67_srfi_132 = NULL;
object __glo_vector_91merge_67_srfi_132 = NULL;
object __glo_vector_91merge_srfi_132 = NULL;
object __glo__75vector_91insert_91sort_67_srfi_132 = NULL;
object __glo_vector_91heap_91sort_67_srfi_132 = NULL;
object __glo_really_91vector_91heap_91sort_67_srfi_132 = NULL;
object __glo_vectors_91start_87end_912_srfi_132 = NULL;
object __glo_vector_91start_87end_srfi_132 = NULL;
object __glo_list_91ref_91or_91default_srfi_132 = NULL;
object __glo_has_91element_srfi_132 = NULL;
object __glo_vector_91portion_91copy_67_srfi_132 = NULL;
object __glo_vector_91copy_srfi_132 = NULL;
object __glo_vector_91portion_91copy_srfi_132 = NULL;
object __glo_vector_91sorted_127_srfi_132 = NULL;
object __glo_list_91sorted_127_srfi_132 = NULL;
object __glo_list_91merge_67_srfi_132 = NULL;
object __glo_list_91merge_srfi_132 = NULL;
object __glo_list_91merge_91sort_67_srfi_132 = NULL;
object __glo_list_91merge_91sort_srfi_132 = NULL;
object __glo_mlet_srfi_132 = NULL;
object __glo_vector_91delete_91neighbor_91dups_67_srfi_132 = NULL;
object __glo_vector_91delete_91neighbor_91dups_srfi_132 = NULL;
object __glo_list_91delete_91neighbor_91dups_67_srfi_132 = NULL;
object __glo_list_91delete_91neighbor_91dups_srfi_132 = 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_91fill_67_scheme_base;
extern object __glo_vector_91_125list_scheme_base;
extern object __glo_vector_91_125string_scheme_base;
extern object __glo_vector_91map_scheme_base;
extern object __glo_vector_91for_91each_scheme_base;
extern object __glo_make_91string_scheme_base;
extern object __glo_string_scheme_base;
extern object __glo_string_91copy_scheme_base;
extern object __glo_string_91copy_67_scheme_base;
extern object __glo_string_91fill_67_scheme_base;
extern object __glo_string_91_125list_scheme_base;
extern object __glo_string_91_125vector_scheme_base;
extern object __glo_string_91map_scheme_base;
extern object __glo_string_91for_91each_scheme_base;
extern object __glo_make_91parameter_scheme_base;
extern object __glo_current_91output_91port_scheme_base;
extern object __glo_current_91input_91port_scheme_base;
extern object __glo_current_91error_91port_scheme_base;
extern object __glo_call_91with_91port_scheme_base;
extern object __glo_error_91object_127_scheme_base;
extern object __glo_error_91object_91message_scheme_base;
extern object __glo_error_91object_91irritants_scheme_base;
extern object __glo_error_95loc_scheme_base;
extern object __glo_error_scheme_base;
extern object __glo_raise_scheme_base;
extern object __glo_raise_91continuable_scheme_base;
extern object __glo_with_91handler_scheme_base;
extern object __glo_with_91exception_91handler_scheme_base;
extern object __glo_Cyc_91add_91exception_91handler_scheme_base;
extern object __glo_Cyc_91remove_91exception_91handler_scheme_base;
extern object __glo_newline_scheme_base;
extern object __glo_write_91char_scheme_base;
extern object __glo_write_91string_scheme_base;
extern object __glo_write_91string_911_scheme_base;
extern object __glo_write_91string_912_scheme_base;
extern object __glo_flush_91output_91port_scheme_base;
extern object __glo_char_91ready_127_scheme_base;
extern object __glo_peek_91char_scheme_base;
extern object __glo_read_91char_scheme_base;
extern object __glo_read_91line_scheme_base;
extern object __glo_read_91string_scheme_base;
extern object __glo_input_91port_127_scheme_base;
extern object __glo_output_91port_127_scheme_base;
extern object __glo_input_91port_91open_127_scheme_base;
extern object __glo_output_91port_91open_127_scheme_base;
extern object __glo_get_91output_91string_scheme_base;
extern object __glo_open_91output_91string_scheme_base;
extern object __glo_open_91input_91string_scheme_base;
extern object __glo_get_91output_91bytevector_scheme_base;
extern object __glo_open_91input_91bytevector_scheme_base;
extern object __glo_open_91output_91bytevector_scheme_base;
extern object __glo_features_scheme_base;
extern object __glo_Cyc_91add_91feature_67_scheme_base;
extern object __glo_Cyc_91version_scheme_base;
extern object __glo_any_scheme_base;
extern object __glo_every_scheme_base;
extern object __glo_and_scheme_base;
extern object __glo_or_scheme_base;
extern object __glo_let_scheme_base;
extern object __glo_let_85_scheme_base;
extern object __glo_letrec_scheme_base;
extern object __glo_let_85_91values_scheme_base;
extern object __glo_let_91values_scheme_base;
extern object __glo_define_91values_scheme_base;
extern object __glo_begin_scheme_base;
extern object __glo__case_scheme_base;
extern object __glo_cond_scheme_base;
extern object __glo_cond_91expand_scheme_base;
extern object __glo__do_scheme_base;
extern object __glo_when_scheme_base;
extern object __glo_unless_scheme_base;
extern object __glo_quasiquote_scheme_base;
extern object __glo_floor_scheme_base;
extern object __glo_ceiling_scheme_base;
extern object __glo_truncate_scheme_base;
extern object __glo_round_scheme_base;
extern object __glo_exact_scheme_base;
extern object __glo_inexact_scheme_base;
extern object __glo_eof_91object_scheme_base;
extern object __glo__void_scheme_base;
extern object __glo_syntax_91error_scheme_base;
extern object __glo_bytevector_91copy_scheme_base;
extern object __glo_bytevector_91copy_67_scheme_base;
extern object __glo_utf8_91_125string_scheme_base;
extern object __glo_string_91_125utf8_scheme_base;
extern object __glo_denominator_scheme_base;
extern object __glo_numerator_scheme_base;
extern object __glo_parameterize_scheme_base;
extern object __glo_read_91bytevector_scheme_base;
extern object __glo_read_91bytevector_67_scheme_base;
extern object __glo_write_91bytevector_scheme_base;
extern object __glo_peek_91u8_scheme_base;
extern object __glo_read_91u8_scheme_base;
extern object __glo_write_91u8_scheme_base;
extern object __glo_binary_91port_127_scheme_base;
extern object __glo_textual_91port_127_scheme_base;
extern object __glo_rationalize_scheme_base;
extern object __glo_vector_91copy_scheme_base;
extern object __glo_vector_91copy_67_scheme_base;
extern object __glo_vector_91fill_67_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_random_91integer_srfi_27;
extern object __glo_random_91real_srfi_27;
extern object __glo_default_91random_91source_srfi_27;
extern object __glo_next_91mrg32k3a_srfi_27;
extern object __glo_make_91random_91source_srfi_27;
extern object __glo_random_91source_91state_91ref_srfi_27;
extern object __glo_random_91source_91state_91set_67_srfi_27;
extern object __glo_random_91source_91randomize_67_srfi_27;
extern object __glo_random_91source_91pseudo_91randomize_67_srfi_27;
extern object __glo_random_91source_91make_91integers_srfi_27;
extern object __glo_random_91source_91make_91reals_srfi_27;
extern object __glo_fast_91string_123_127_191_191inline_191_191_scheme_base;
extern object __glo_fast_91string_121_127_191_191inline_191_191_scheme_base;
extern object __glo_fast_91string_121_123_127_191_191inline_191_191_scheme_base;
extern object __glo_fast_91string_125_127_191_191inline_191_191_scheme_base;
extern object __glo_fast_91string_125_123_127_191_191inline_191_191_scheme_base;
extern object __glo__75write_91bytevector_191_191inline_191_191_scheme_base;
extern object __glo_not_191_191inline_191_191_scheme_base;
extern object __glo_list_127_191_191inline_191_191_scheme_base;
extern object __glo_zero_127_191_191inline_191_191_scheme_base;
extern object __glo_positive_127_191_191inline_191_191_scheme_base;
extern object __glo_negative_127_191_191inline_191_191_scheme_base;
extern object __glo_floor_191_191inline_191_191_scheme_base;
extern object __glo_ceiling_191_191inline_191_191_scheme_base;
extern object __glo_truncate_191_191inline_191_191_scheme_base;
extern object __glo_round_191_191inline_191_191_scheme_base;
extern object __glo_exact_191_191inline_191_191_scheme_base;
extern object __glo_inexact_191_191inline_191_191_scheme_base;
extern object __glo_sqrt_191_191inline_191_191_scheme_base;
extern object __glo_exact_91integer_127_191_191inline_191_191_scheme_base;
extern object __glo_exact_127_191_191inline_191_191_scheme_base;
extern object __glo_complex_127_191_191inline_191_191_scheme_base;
extern object __glo_fixnum_127_191_191inline_191_191_scheme_base;
extern object __glo_quotient_191_191inline_191_191_scheme_base;
extern object __glo_square_191_191inline_191_191_scheme_base;
extern object __glo_eof_91object_191_191inline_191_191_scheme_base;
extern object __glo_void_191_191inline_191_191_scheme_base;
extern object __glo_make_91record_91marker_191_191inline_191_191_scheme_base;
extern object __glo_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(vector_91select_67);
defsymbol(list_91sort_67);
defsymbol(list_91stable_91sort);
defsymbol(list_91stable_91sort_67);
defsymbol(vector_91sort);
defsymbol(vector_91sort_67);
defsymbol(vector_91stable_91sort);
defsymbol(vector_91stable_91sort_67);
defsymbol(assert);
defsymbol(vector_91select);
defsymbol(vars);
defsymbol(lambda);
defsymbol(call_91with_91values);
defsymbol(var);
defsymbol(let);
defsymbol(body);
defsymbol(_93_93_93);
defsymbol(rest);
defsymbol(mlet);
defsymbol(exp);
defsymbol(begin);
static void __lambda_756(void *data, object clo, int argc, object *args) ;/*closure _,object k_734163*/
static void __lambda_757(void *data, object clo, int argc, object *args) ;/*object self_734946, object r_734165*/
static void __lambda_758(void *data, object clo, int argc, object *args) ;/*object self_734947, object r_734166*/
static void __lambda_759(void *data, object clo, int argc, object *args) ;/*object self_734948, object r_734167*/
static void __lambda_760(void *data, object clo, int argc, object *args) ;/*object self_734949, object r_734168*/
static void __lambda_761(void *data, object clo, int argc, object *args) ;/*object self_734950, object r_734169*/
static void __lambda_762(void *data, object clo, int argc, object *args) ;/*object self_734951, object r_734170*/
static void __lambda_763(void *data, object clo, int argc, object *args) ;/*object self_734952, object r_734171*/
static void __lambda_753(void *data, object clo, int argc, object *args) ;/*closure _,object k_734144, object _121_732205_732953, object l_732206_732954*/
static void __lambda_754(void *data, object clo, int argc, object *args) ;/*object self_734944, object v_732207_732955*/
static void __lambda_755(void *data, object clo, int argc, object *args) ;/*object self_734945, object r_734146*/
static void __lambda_752(void *data, object clo, int argc, object *args) ;/*closure _,object k_734140, object val_732204_732952*/
static void __lambda_749(void *data, object clo, int argc, object *args) ;/*closure _,object k_734129, object _121_127_732190_732945, object pivot_732191_732946, object dst_732192_732947, object at_732193_732948, object src_732194_732949, object start_732195_732950, object end_732196_732951*/
static void __lambda_750(void *data, object clo, int argc, object *args) ;/*object self_734942, object r_734131*/
static void __lambda_751(void *data, object clo, int argc, object *args) ;/*object self_734943, object r_734132*/
static void __lambda_746(void *data, object clo, int argc, object *args) ;/*closure _,object k_734118, object _121_127_732176_732938, object pivot_732177_732939, object dst_732178_732940, object at_732179_732941, object src_732180_732942, object start_732181_732943, object end_732182_732944*/
static void __lambda_747(void *data, object clo, int argc, object *args) ;/*object self_734940, object r_734120*/
static void __lambda_748(void *data, object clo, int argc, object *args) ;/*object self_734941, object r_734121*/
static void __lambda_743(void *data, object clo, int argc, object *args) ;/*closure _,object k_734105, object _121_127_732159_732931, object pivot_732160_732932, object v_732161_732933, object i_732162_732934, object end_732163_732935, object count_732164_732936, object count2_732165_732937*/
static void __lambda_744(void *data, object clo, int argc, object *args) ;/*object self_734938, object r_734107*/
static void __lambda_745(void *data, object clo, int argc, object *args) ;/*object self_734939, object r_734110*/
static void __lambda_725(void *data, object clo, int argc, object *args) ;/*closure _,object k_734063, object _121_127_732103_732913, object v_732104_732914, object k_732105_732915, object start_732106_732916, object end_732107_732917*/
static void __lambda_729(void *data, object clo, int argc, object *args) ;/*object self_734924, object ip_732125_732922*/
static void __lambda_730(void *data, object clo, int argc, object *args) ;/*object self_734925, object pivot_732128_732923*/
static void __lambda_742(void *data, object clo, int argc, object *args) ;/*object self_734926, object k_734101*/
static void __lambda_731(void *data, object clo, int argc, object *args) ;/*object self_734927, object r_734078*/
static void __lambda_733(void *data, object clo, int argc, object *args) ;/*object self_734928, object k_734080, object count_732130_732924, object count2_732131_732925*/
static void __lambda_740(void *data, object clo, int argc, object *args) ;/*object self_734935, object v2_732154_732929*/
static void __lambda_741(void *data, object clo, int argc, object *args) ;/*object self_734936, object r_734096*/
static void __lambda_739(void *data, object clo, int argc, object *args) ;/*object self_734933, object r_734087*/
static void __lambda_738(void *data, object clo, int argc, object *args) ;/*object self_734934, object k_734088*/
static void __lambda_735(void *data, object clo, int argc, object *args) ;/*object self_734930, object n_732140_732926*/
static void __lambda_736(void *data, object clo, int argc, object *args) ;/*object self_734931, object v2_732143_732927*/
static void __lambda_737(void *data, object clo, int argc, object *args) ;/*object self_734932, object r_734085*/
static void __lambda_734(void *data, object clo, int argc, object *args) ;/*object self_734929, object r_734082*/
static void __lambda_732(void *data, object clo, int argc, object *args) ;/*object self_734937, object r_734079*/
static void __lambda_727(void *data, object clo, int argc, object *args) ;/*object self_734922, object r_734075*/
static void __lambda_728(void *data, object clo, int argc, object *args) ;/*object self_734923, object v2_732121_732921*/
static void __lambda_726(void *data, object clo, int argc, object *args) ;/*object self_734921, object r_734068*/
static void __lambda_710(void *data, object clo, int argc, object *args) ;/*closure _,object k_734028, object _121_127_732050_732898, object v_732051_732899, object k_732052_732900, object start_732053_732901, object end_732054_732902*/
static void __lambda_714(void *data, object clo, int argc, object *args) ;/*object self_734910, object ip_732072_732904*/
static void __lambda_715(void *data, object clo, int argc, object *args) ;/*object self_734911, object pivot_732075_732905*/
static void __lambda_724(void *data, object clo, int argc, object *args) ;/*object self_734912, object k_734059*/
static void __lambda_716(void *data, object clo, int argc, object *args) ;/*object self_734913, object r_734045*/
static void __lambda_718(void *data, object clo, int argc, object *args) ;/*object self_734914, object k_734047, object count_732077_732906, object count2_732078_732907*/
static void __lambda_722(void *data, object clo, int argc, object *args) ;/*object self_734918, object v2_732098_732911*/
static void __lambda_723(void *data, object clo, int argc, object *args) ;/*object self_734919, object r_734055*/
static void __lambda_719(void *data, object clo, int argc, object *args) ;/*object self_734915, object n_732084_732908*/
static void __lambda_720(void *data, object clo, int argc, object *args) ;/*object self_734916, object v2_732087_732909*/
static void __lambda_721(void *data, object clo, int argc, object *args) ;/*object self_734917, object r_734050*/
static void __lambda_717(void *data, object clo, int argc, object *args) ;/*object self_734920, object r_734046*/
static void __lambda_712(void *data, object clo, int argc, object *args) ;/*object self_734908, object r_734042*/
static void __lambda_713(void *data, object clo, int argc, object *args) ;/*object self_734909, object r_734041*/
static void __lambda_711(void *data, object clo, int argc, object *args) ;/*object self_734907, object r_734033*/
static void __lambda_705(void *data, object clo, int argc, object *args) ;/*closure _,object k_734011, object _121_127_732038_732893, object v_732039_732894, object k_732040_732895, object start_732041_732896, object end_732042_732897*/
static void __lambda_708(void *data, object clo, int argc, object *args) ;/*object self_734903, object r_734013*/
static void __lambda_709(void *data, object clo, int argc, object *args) ;/*object self_734904, object r_734012_734175*/
static void __lambda_706(void *data, object clo, int argc, object *args) ;/*object self_734905, object k_734014*/
static void __lambda_707(void *data, object clo, int argc, object *args) ;/*object self_734906, object r_734021*/
static void __lambda_700(void *data, object clo, int argc, object *args) ;/*closure _,object k_733995, object _121_127_732026_732888, object v_732027_732889, object k_732028_732890, object start_732029_732891, object end_732030_732892*/
static void __lambda_703(void *data, object clo, int argc, object *args) ;/*object self_734899, object r_733997*/
static void __lambda_704(void *data, object clo, int argc, object *args) ;/*object self_734900, object r_733996_734173*/
static void __lambda_701(void *data, object clo, int argc, object *args) ;/*object self_734901, object k_733998*/
static void __lambda_702(void *data, object clo, int argc, object *args) ;/*object self_734902, object r_734005*/
static void __lambda_681(void *data, object clo, int argc, object *args) ;/*closure _,object k_733957, object _121_732003_732877, object v_732004_732878, object k_732005_732879, object rest_732006_732880_raw, ...*/
static void __lambda_685(void *data, object clo, int argc, object *args) ;/*object self_734881, object end_732012_732882*/
static void __lambda_687(void *data, object clo, int argc, object *args) ;/*object self_734882, object r_733960*/
static void __lambda_688(void *data, object clo, int argc, object *args) ;/*object self_734883, object pivot_732015_732883*/
static void __lambda_699(void *data, object clo, int argc, object *args) ;/*object self_734884, object k_733979*/
static void __lambda_689(void *data, object clo, int argc, object *args) ;/*object self_734885, object r_733962*/
static void __lambda_691(void *data, object clo, int argc, object *args) ;/*object self_734886, object k_733964, object count_732016_732884, object count2_732017_732885*/
static void __lambda_692(void *data, object clo, int argc, object *args) ;/*object self_734887, object v2_732020_732886*/
static void __lambda_693(void *data, object clo, int argc, object *args) ;/*object self_734888, object v3_732023_732887*/
static void __lambda_694(void *data, object clo, int argc, object *args) ;/*object self_734889, object r_733967*/
static void __lambda_695(void *data, object clo, int argc, object *args) ;/*object self_734890, object r_733968*/
static void __lambda_696(void *data, object clo, int argc, object *args) ;/*object self_734891, object r_733969*/
static void __lambda_697(void *data, object clo, int argc, object *args) ;/*object self_734892, object r_733973*/
static void __lambda_698(void *data, object clo, int argc, object *args) ;/*object self_734893, object r_733970*/
static void __lambda_690(void *data, object clo, int argc, object *args) ;/*object self_734894, object r_733963*/
static void __lambda_686(void *data, object clo, int argc, object *args) ;/*object self_734895, object k_733981*/
static void __lambda_682(void *data, object clo, int argc, object *args) ;/*object self_734896, object k_733983*/
static void __lambda_684(void *data, object clo, int argc, object *args) ;/*object self_734897, object r_733984*/
static void __lambda_683(void *data, object clo, int argc, object *args) ;/*object self_734898, object k_733986*/
static void __lambda_676(void *data, object clo, int argc, object *args) ;/*closure _,object k_733942, object _121_731991_732871, object v_731992_732872, object k_731993_732873, object rest_731994_732874_raw, ...*/
static void __lambda_680(void *data, object clo, int argc, object *args) ;/*object self_734877, object end_732000_732876*/
static void __lambda_677(void *data, object clo, int argc, object *args) ;/*object self_734878, object k_733945*/
static void __lambda_679(void *data, object clo, int argc, object *args) ;/*object self_734879, object r_733946*/
static void __lambda_678(void *data, object clo, int argc, object *args) ;/*object self_734880, object k_733948*/
static void __lambda_668(void *data, object clo, int argc, object *args) ;/*closure _,object k_733924, object _121_731971_732863, object v_731972_732864, object knil_731973_732865, object rest_731974_732866_raw, ...*/
static void __lambda_671(void *data, object clo, int argc, object *args) ;/*object self_734870, object mean_731977_732867*/
static void __lambda_672(void *data, object clo, int argc, object *args) ;/*object self_734871, object n_731980_732868*/
static void __lambda_673(void *data, object clo, int argc, object *args) ;/*object self_734872, object r_733927*/
static void __lambda_674(void *data, object clo, int argc, object *args) ;/*object self_734873, object r_733928*/
static void __lambda_675(void *data, object clo, int argc, object *args) ;/*object self_734874, object r_733929*/
static void __lambda_669(void *data, object clo, int argc, object *args) ;/*object self_734875, object k_733936*/
static void __lambda_670(void *data, object clo, int argc, object *args) ;/*object self_734876, object k_733938, object a_731989_732869, object b_731990_732870*/
static void __lambda_659(void *data, object clo, int argc, object *args) ;/*closure _,object k_733906, object _121_731949_732853, object v_731950_732854, object knil_731951_732855, object rest_731952_732856_raw, ...*/
static void __lambda_662(void *data, object clo, int argc, object *args) ;/*object self_734862, object mean_731955_732857*/
static void __lambda_663(void *data, object clo, int argc, object *args) ;/*object self_734863, object r_733910*/
static void __lambda_667(void *data, object clo, int argc, object *args) ;/*object self_734864, object k_733915*/
static void __lambda_664(void *data, object clo, int argc, object *args) ;/*object self_734865, object r_733912*/
static void __lambda_666(void *data, object clo, int argc, object *args) ;/*object self_734866, object k_733914, object a_731967_732859, object b_731968_732860*/
static void __lambda_665(void *data, object clo, int argc, object *args) ;/*object self_734867, object r_733913*/
static void __lambda_660(void *data, object clo, int argc, object *args) ;/*object self_734868, object k_733918*/
static void __lambda_661(void *data, object clo, int argc, object *args) ;/*object self_734869, object k_733920, object a_731969_732861, object b_731970_732862*/
static void __lambda_585(void *data, object clo, int argc, object *args) ;/*closure _,object k_733808, object elt_121_731758_732796, object v_731759_732797, object start_731760_732798, object end_731761_732799*/
static void __lambda_586(void *data, object clo, int argc, object *args) ;/*object self_734781, object median_732802, object swap_732803*/
static void __lambda_821(void *data, object clo, int argc, object *args) ;/*object self_734782, object median_732802*/
static void __lambda_820(void *data, object clo, int argc, object *args) ;/*object self_734783, object swap_732803*/
static void __lambda_653(void *data, object clo, int argc, object *args) ;/*object self_734784, object k_733895, object l_731762_732806, object r_731763_732807, object n_731764_732808*/
static void __lambda_654(void *data, object clo, int argc, object *args) ;/*object self_734785, object r_733897*/
static void __lambda_655(void *data, object clo, int argc, object *args) ;/*object self_734786, object x_731765_732809, object r_911_731766_732810*/
static void __lambda_656(void *data, object clo, int argc, object *args) ;/*object self_734787, object r_733903*/
static void __lambda_657(void *data, object clo, int argc, object *args) ;/*object self_734788, object r_733899*/
static void __lambda_658(void *data, object clo, int argc, object *args) ;/*object self_734789, object r_733900*/
static void __lambda_587(void *data, object clo, int argc, object *args) ;/*object self_734790, object r_733894*/
static void __lambda_588(void *data, object clo, int argc, object *args) ;/*object self_734791, object r_733809*/
static void __lambda_645(void *data, object clo, int argc, object *args) ;/*object self_734792, object k_733886, object v1_731767_732811, object v2_731768_732812, object v3_731769_732813*/
static void __lambda_651(void *data, object clo, int argc, object *args) ;/*object self_734793, object k_733892*/
static void __lambda_652(void *data, object clo, int argc, object *args) ;/*object self_734794, object r_733893*/
static void __lambda_646(void *data, object clo, int argc, object *args) ;/*object self_734795, object r_733887*/
static void __lambda_648(void *data, object clo, int argc, object *args) ;/*object self_734796, object k_733889, object little_731770_732814, object big_731771_732815*/
static void __lambda_649(void *data, object clo, int argc, object *args) ;/*object self_734797, object r_733890*/
static void __lambda_650(void *data, object clo, int argc, object *args) ;/*object self_734798, object r_733891*/
static void __lambda_647(void *data, object clo, int argc, object *args) ;/*object self_734799, object r_733888*/
static void __lambda_589(void *data, object clo, int argc, object *args) ;/*object self_734800, object r_733885*/
static void __lambda_590(void *data, object clo, int argc, object *args) ;/*object self_734801, object r_733810*/
static void __lambda_591(void *data, object clo, int argc, object *args) ;/*object self_734802, object l_731773_732816, object r_731774_732817*/
static void __lambda_592(void *data, object clo, int argc, object *args) ;/*object self_734803, object recur_731775_732818*/
static void __lambda_819(void *data, object clo, int argc, object *args) ;/*object self_734804, object recur_731775_732818*/
static void __lambda_595(void *data, object clo, int argc, object *args) ;/*object self_734805, object k_733813, object l_731776_732819, object r_731777_732820*/
static void __lambda_596(void *data, object clo, int argc, object *args) ;/*object self_734806, object r_733878*/
static void __lambda_597(void *data, object clo, int argc, object *args) ;/*object self_734807, object r_733879*/
static void __lambda_598(void *data, object clo, int argc, object *args) ;/*object self_734808, object r_733880*/
static void __lambda_599(void *data, object clo, int argc, object *args) ;/*object self_734809, object pivot_731778_732821*/
static void __lambda_600(void *data, object clo, int argc, object *args) ;/*object self_734810, object lscan_731779_732822, object rscan_731780_732823, object done_731781_732824*/
static void __lambda_818(void *data, object clo, int argc, object *args) ;/*object self_734811, object lscan_731779_732822*/
static void __lambda_817(void *data, object clo, int argc, object *args) ;/*object self_734812, object rscan_731780_732823*/
static void __lambda_816(void *data, object clo, int argc, object *args) ;/*object self_734813, object done_731781_732824*/
static void __lambda_632(void *data, object clo, int argc, object *args) ;/*object self_734814, object k_733862, object i_731782_732825, object j_731783_732826, object k_731784_732827, object m_731785_732828*/
static void __lambda_633(void *data, object clo, int argc, object *args) ;/*object self_734815, object i_731787_732829, object j_731788_732830*/
static void __lambda_634(void *data, object clo, int argc, object *args) ;/*object self_734816, object lp_731789_732831*/
static void __lambda_815(void *data, object clo, int argc, object *args) ;/*object self_734817, object lp_731789_732831*/
static void __lambda_637(void *data, object clo, int argc, object *args) ;/*object self_734818, object k_733865, object i_731790_732832, object j_731791_732833*/
static void __lambda_638(void *data, object clo, int argc, object *args) ;/*object self_734819, object x_731792_732834*/
static void __lambda_639(void *data, object clo, int argc, object *args) ;/*object self_734820, object r_733868*/
static void __lambda_640(void *data, object clo, int argc, object *args) ;/*object self_734821, object r_733870*/
static void __lambda_644(void *data, object clo, int argc, object *args) ;/*object self_734822, object r_733871*/
static void __lambda_641(void *data, object clo, int argc, object *args) ;/*object self_734823, object k_733874*/
static void __lambda_642(void *data, object clo, int argc, object *args) ;/*object self_734824, object r_733877*/
static void __lambda_643(void *data, object clo, int argc, object *args) ;/*object self_734825, object r_733876*/
static void __lambda_635(void *data, object clo, int argc, object *args) ;/*object self_734826, object r_733864*/
static void __lambda_636(void *data, object clo, int argc, object *args) ;/*object self_734827, object r_733863*/
static void __lambda_601(void *data, object clo, int argc, object *args) ;/*object self_734828, object r_733861*/
static void __lambda_602(void *data, object clo, int argc, object *args) ;/*object self_734829, object r_733816*/
static void __lambda_616(void *data, object clo, int argc, object *args) ;/*object self_734830, object k_733840, object i_731800_732835, object j_731801_732836, object k_731802_732837, object m_731803_732838*/
static void __lambda_617(void *data, object clo, int argc, object *args) ;/*object self_734831, object k_731805_732839, object m_731806_732840*/
static void __lambda_618(void *data, object clo, int argc, object *args) ;/*object self_734832, object lp_731807_732841*/
static void __lambda_814(void *data, object clo, int argc, object *args) ;/*object self_734833, object lp_731807_732841*/
static void __lambda_621(void *data, object clo, int argc, object *args) ;/*object self_734834, object k_733843, object k_731808_732842, object m_731809_732843*/
static void __lambda_622(void *data, object clo, int argc, object *args) ;/*object self_734835, object x_731812_732844*/
static void __lambda_623(void *data, object clo, int argc, object *args) ;/*object self_734836, object r_733846*/
static void __lambda_624(void *data, object clo, int argc, object *args) ;/*object self_734837, object r_733848*/
static void __lambda_631(void *data, object clo, int argc, object *args) ;/*object self_734841, object r_733854*/
static void __lambda_628(void *data, object clo, int argc, object *args) ;/*object self_734842, object k_733857*/
static void __lambda_629(void *data, object clo, int argc, object *args) ;/*object self_734843, object r_733860*/
static void __lambda_630(void *data, object clo, int argc, object *args) ;/*object self_734844, object r_733859*/
static void __lambda_625(void *data, object clo, int argc, object *args) ;/*object self_734838, object r_733853*/
static void __lambda_626(void *data, object clo, int argc, object *args) ;/*object self_734839, object r_733849*/
static void __lambda_627(void *data, object clo, int argc, object *args) ;/*object self_734840, object r_733850*/
static void __lambda_619(void *data, object clo, int argc, object *args) ;/*object self_734845, object r_733842*/
static void __lambda_620(void *data, object clo, int argc, object *args) ;/*object self_734846, object r_733841*/
static void __lambda_603(void *data, object clo, int argc, object *args) ;/*object self_734847, object r_733839*/
static void __lambda_604(void *data, object clo, int argc, object *args) ;/*object self_734848, object r_733817*/
static void __lambda_607(void *data, object clo, int argc, object *args) ;/*object self_734849, object k_733821, object i_731821_732845, object j_731822_732846, object m_731823_732847*/
static void __lambda_608(void *data, object clo, int argc, object *args) ;/*object self_734850, object num_121_731824_732848, object num_125_731825_732849, object num_123l_731826_732850, object num_123r_731827_732851*/
static void __lambda_609(void *data, object clo, int argc, object *args) ;/*object self_734851, object r_733836*/
static void __lambda_610(void *data, object clo, int argc, object *args) ;/*object self_734852, object r_733826*/
static void __lambda_611(void *data, object clo, int argc, object *args) ;/*object self_734853, object r_733835*/
static void __lambda_612(void *data, object clo, int argc, object *args) ;/*object self_734854, object r_733827*/
static void __lambda_614(void *data, object clo, int argc, object *args) ;/*object self_734856, object r_733832*/
static void __lambda_615(void *data, object clo, int argc, object *args) ;/*object self_734857, object r_733833*/
static void __lambda_613(void *data, object clo, int argc, object *args) ;/*object self_734855, object r_733829*/
static void __lambda_605(void *data, object clo, int argc, object *args) ;/*object self_734858, object r_733820*/
static void __lambda_606(void *data, object clo, int argc, object *args) ;/*object self_734859, object r_733818*/
static void __lambda_593(void *data, object clo, int argc, object *args) ;/*object self_734860, object r_733812*/
static void __lambda_594(void *data, object clo, int argc, object *args) ;/*object self_734861, object r_733811*/
static void __lambda_576(void *data, object clo, int argc, object *args) ;/*closure _,object k_733796, object _121_731752_732790, object v_731753_732791, object maybe_91start_87end_731754_732792_raw, ...*/
static void __lambda_584(void *data, object clo, int argc, object *args) ;/*object self_734773, object k_733805*/
static void __lambda_577(void *data, object clo, int argc, object *args) ;/*object self_734774, object r_733797*/
static void __lambda_579(void *data, object clo, int argc, object *args) ;/*object self_734775, object k_733799, object start_731755_732793, object end_731756_732794*/
static void __lambda_580(void *data, object clo, int argc, object *args) ;/*object self_734776, object ans_731757_732795*/
static void __lambda_581(void *data, object clo, int argc, object *args) ;/*object self_734777, object r_733801*/
static void __lambda_582(void *data, object clo, int argc, object *args) ;/*object self_734778, object r_733803*/
static void __lambda_583(void *data, object clo, int argc, object *args) ;/*object self_734779, object r_733802*/
static void __lambda_578(void *data, object clo, int argc, object *args) ;/*object self_734780, object r_733798*/
static void __lambda_571(void *data, object clo, int argc, object *args) ;/*closure _,object k_733789, object _121_731747_732785, object v_731748_732786, object maybe_91start_87end_731749_732787_raw, ...*/
static void __lambda_575(void *data, object clo, int argc, object *args) ;/*object self_734769, object k_733793*/
static void __lambda_572(void *data, object clo, int argc, object *args) ;/*object self_734770, object r_733790*/
static void __lambda_574(void *data, object clo, int argc, object *args) ;/*object self_734771, object k_733792, object start_731750_732788, object end_731751_732789*/
static void __lambda_573(void *data, object clo, int argc, object *args) ;/*object self_734772, object r_733791*/
static void __lambda_503(void *data, object clo, int argc, object *args) ;/*closure _,object k_733705, object elt_121_731653_732696, object v0_731654_732697, object l_731655_732698, object r_731656_732699, object temp0_731657_732700*/
static void __lambda_504(void *data, object clo, int argc, object *args) ;/*object self_734692, object getrun_732704, object merge_732705, object xor_732706*/
static void __lambda_813(void *data, object clo, int argc, object *args) ;/*object self_734693, object getrun_732704*/
static void __lambda_812(void *data, object clo, int argc, object *args) ;/*object self_734694, object merge_732705*/
static void __lambda_811(void *data, object clo, int argc, object *args) ;/*object self_734695, object xor_732706*/
static void __lambda_570(void *data, object clo, int argc, object *args) ;/*object self_734696, object k_733785, object a_731658_732710, object b_731659_732711*/
static void __lambda_505(void *data, object clo, int argc, object *args) ;/*object self_734697, object r_733784*/
static void __lambda_506(void *data, object clo, int argc, object *args) ;/*object self_734698, object r_733706*/
static void __lambda_547(void *data, object clo, int argc, object *args) ;/*object self_734699, object k_733755, object target_731660_732712, object v1_731661_732713, object v2_731662_732714, object l_731663_732715, object len1_731664_732716, object len2_731665_732717, object v2_123target_127_731666_732718*/
static void __lambda_548(void *data, object clo, int argc, object *args) ;/*object self_734700, object vblit_731667_732719*/
static void __lambda_810(void *data, object clo, int argc, object *args) ;/*object self_734701, object vblit_731667_732719*/
static void __lambda_563(void *data, object clo, int argc, object *args) ;/*object self_734702, object k_733775, object fromv_731668_732720, object j_731669_732721, object i_731670_732722, object end_731671_732723*/
static void __lambda_564(void *data, object clo, int argc, object *args) ;/*object self_734703, object j_731673_732724, object i_731674_732725*/
static void __lambda_565(void *data, object clo, int argc, object *args) ;/*object self_734704, object lp_731675_732726*/
static void __lambda_809(void *data, object clo, int argc, object *args) ;/*object self_734705, object lp_731675_732726*/
static void __lambda_568(void *data, object clo, int argc, object *args) ;/*object self_734706, object k_733778, object j_731676_732727, object i_731677_732728*/
static void __lambda_569(void *data, object clo, int argc, object *args) ;/*object self_734707, object r_733779*/
static void __lambda_566(void *data, object clo, int argc, object *args) ;/*object self_734708, object r_733777*/
static void __lambda_567(void *data, object clo, int argc, object *args) ;/*object self_734709, object r_733776*/
static void __lambda_549(void *data, object clo, int argc, object *args) ;/*object self_734710, object r_733774*/
static void __lambda_550(void *data, object clo, int argc, object *args) ;/*object self_734711, object r_733756*/
static void __lambda_551(void *data, object clo, int argc, object *args) ;/*object self_734712, object r1_731681_732730*/
static void __lambda_552(void *data, object clo, int argc, object *args) ;/*object self_734713, object r2_731684_732731*/
static void __lambda_553(void *data, object clo, int argc, object *args) ;/*object self_734714, object r_733759*/
static void __lambda_554(void *data, object clo, int argc, object *args) ;/*object self_734715, object r_733760*/
static void __lambda_555(void *data, object clo, int argc, object *args) ;/*object self_734716, object n_731687_732732, object j_731688_732733, object x_731689_732734, object k_731690_732735, object y_731691_732736*/
static void __lambda_556(void *data, object clo, int argc, object *args) ;/*object self_734717, object lp_731692_732737*/
static void __lambda_808(void *data, object clo, int argc, object *args) ;/*object self_734718, object lp_731692_732737*/
static void __lambda_559(void *data, object clo, int argc, object *args) ;/*object self_734719, object k_733763, object n_731693_732738, object j_731694_732739, object x_731695_732740, object k_731696_732741, object y_731697_732742*/
static void __lambda_560(void *data, object clo, int argc, object *args) ;/*object self_734720, object r_733765*/
static void __lambda_562(void *data, object clo, int argc, object *args) ;/*object self_734722, object r_733771*/
static void __lambda_561(void *data, object clo, int argc, object *args) ;/*object self_734721, object r_733767*/
static void __lambda_557(void *data, object clo, int argc, object *args) ;/*object self_734723, object r_733762*/
static void __lambda_558(void *data, object clo, int argc, object *args) ;/*object self_734724, object r_733761*/
static void __lambda_507(void *data, object clo, int argc, object *args) ;/*object self_734725, object r_733754*/
static void __lambda_508(void *data, object clo, int argc, object *args) ;/*object self_734726, object r_733707*/
static void __lambda_540(void *data, object clo, int argc, object *args) ;/*object self_734727, object k_733744, object v_731701_732746, object l_731702_732747, object r_731703_732748*/
static void __lambda_541(void *data, object clo, int argc, object *args) ;/*object self_734728, object i_731705_732749, object x_731706_732750*/
static void __lambda_542(void *data, object clo, int argc, object *args) ;/*object self_734729, object lp_731707_732751*/
static void __lambda_807(void *data, object clo, int argc, object *args) ;/*object self_734730, object lp_731707_732751*/
static void __lambda_545(void *data, object clo, int argc, object *args) ;/*object self_734731, object k_733749, object i_731708_732752, object x_731709_732753*/
static void __lambda_546(void *data, object clo, int argc, object *args) ;/*object self_734732, object r_733752*/
static void __lambda_543(void *data, object clo, int argc, object *args) ;/*object self_734733, object r_733748*/
static void __lambda_544(void *data, object clo, int argc, object *args) ;/*object self_734734, object r_733747*/
static void __lambda_509(void *data, object clo, int argc, object *args) ;/*object self_734735, object r_733743*/
static void __lambda_510(void *data, object clo, int argc, object *args) ;/*object self_734736, object r_733708*/
static void __lambda_514(void *data, object clo, int argc, object *args) ;/*object self_734737, object k_733713*/
static void __lambda_515(void *data, object clo, int argc, object *args) ;/*object self_734738, object l_731712_732755, object want_731713_732756*/
static void __lambda_516(void *data, object clo, int argc, object *args) ;/*object self_734739, object recur_731714_732757*/
static void __lambda_806(void *data, object clo, int argc, object *args) ;/*object self_734740, object recur_731714_732757*/
static void __lambda_519(void *data, object clo, int argc, object *args) ;/*object self_734741, object k_733717, object l_731715_732758, object want_731716_732759*/
static void __lambda_520(void *data, object clo, int argc, object *args) ;/*object self_734742, object r_733719*/
static void __lambda_521(void *data, object clo, int argc, object *args) ;/*object self_734743, object pfxlen_731719_732761, object v_731721_732763, object temp_731722_732764*/
static void __lambda_522(void *data, object clo, int argc, object *args) ;/*object self_734744, object lp_731724_732766*/
static void __lambda_805(void *data, object clo, int argc, object *args) ;/*object self_734745, object lp_731724_732766*/
static void __lambda_525(void *data, object clo, int argc, object *args) ;/*object self_734746, object k_733722, object pfxlen_731725_732767, object pfxlen2_731726_732768, object v_731727_732769, object temp_731728_732770, object v_123v0_127_731729_732771*/
static void __lambda_526(void *data, object clo, int argc, object *args) ;/*object self_734747, object j_731740_732778*/
static void __lambda_527(void *data, object clo, int argc, object *args) ;/*object self_734748, object lp_731741_732779*/
static void __lambda_804(void *data, object clo, int argc, object *args) ;/*object self_734749, object lp_731741_732779*/
static void __lambda_539(void *data, object clo, int argc, object *args) ;/*object self_734750, object k_733738, object j_731742_732780*/
static void __lambda_528(void *data, object clo, int argc, object *args) ;/*object self_734751, object r_733737*/
static void __lambda_529(void *data, object clo, int argc, object *args) ;/*object self_734752, object r_733736*/
static void __lambda_530(void *data, object clo, int argc, object *args) ;/*object self_734753, object r_733724*/
static void __lambda_531(void *data, object clo, int argc, object *args) ;/*object self_734754, object pfxlen2_731734_732773, object tail_91len_731735_732774*/
static void __lambda_538(void *data, object clo, int argc, object *args) ;/*object self_734755, object k_733734*/
static void __lambda_532(void *data, object clo, int argc, object *args) ;/*object self_734756, object r_733726*/
static void __lambda_534(void *data, object clo, int argc, object *args) ;/*object self_734757, object k_733728, object nr_91len_731736_732775, object nr_91vec_731737_732776, object nrvec_123v0_127_731738_732777*/
static void __lambda_535(void *data, object clo, int argc, object *args) ;/*object self_734758, object r_733733*/
static void __lambda_536(void *data, object clo, int argc, object *args) ;/*object self_734759, object r_733729*/
static void __lambda_537(void *data, object clo, int argc, object *args) ;/*object self_734760, object r_733730*/
static void __lambda_533(void *data, object clo, int argc, object *args) ;/*object self_734761, object r_733727*/
static void __lambda_523(void *data, object clo, int argc, object *args) ;/*object self_734762, object r_733721*/
static void __lambda_524(void *data, object clo, int argc, object *args) ;/*object self_734763, object r_733720*/
static void __lambda_517(void *data, object clo, int argc, object *args) ;/*object self_734764, object r_733716*/
static void __lambda_518(void *data, object clo, int argc, object *args) ;/*object self_734765, object r_733715*/
static void __lambda_511(void *data, object clo, int argc, object *args) ;/*object self_734766, object r_733710*/
static void __lambda_513(void *data, object clo, int argc, object *args) ;/*object self_734767, object k_733712, object ignored_91len_731744_732782, object ignored_91ansvec_731745_732783, object ansvec_123v0_127_731746_732784*/
static void __lambda_512(void *data, object clo, int argc, object *args) ;/*object self_734768, object r_733711*/
static void __lambda_496(void *data, object clo, int argc, object *args) ;/*closure _,object k_733696, object _121_731647_732690, object v_731648_732691, object maybe_91args_731649_732692_raw, ...*/
static void __lambda_502(void *data, object clo, int argc, object *args) ;/*object self_734686, object k_733702*/
static void __lambda_497(void *data, object clo, int argc, object *args) ;/*object self_734687, object r_733697*/
static void __lambda_499(void *data, object clo, int argc, object *args) ;/*object self_734688, object k_733699, object start_731650_732693, object end_731651_732694*/
static void __lambda_500(void *data, object clo, int argc, object *args) ;/*object self_734689, object ans_731652_732695*/
static void __lambda_501(void *data, object clo, int argc, object *args) ;/*object self_734690, object r_733701*/
static void __lambda_498(void *data, object clo, int argc, object *args) ;/*object self_734691, object r_733698*/
static void __lambda_489(void *data, object clo, int argc, object *args) ;/*closure _,object k_733681, object _121_731639_732684, object v_731640_732685, object maybe_91args_731641_732686_raw, ...*/
static void __lambda_495(void *data, object clo, int argc, object *args) ;/*object self_734680, object k_733693*/
static void __lambda_490(void *data, object clo, int argc, object *args) ;/*object self_734681, object r_733682*/
static void __lambda_492(void *data, object clo, int argc, object *args) ;/*object self_734682, object k_733684, object start_731642_732687, object end_731643_732688*/
static void __lambda_494(void *data, object clo, int argc, object *args) ;/*object self_734683, object temp_731644_732689*/
static void __lambda_493(void *data, object clo, int argc, object *args) ;/*object self_734684, object k_733686*/
static void __lambda_491(void *data, object clo, int argc, object *args) ;/*object self_734685, object r_733683*/
static void __lambda_468(void *data, object clo, int argc, object *args) ;/*closure _,object k_733649, object elt_121_731596_732650, object v_731597_732651, object v1_731598_732652, object v2_731599_732653, object start_731600_732654, object start1_731601_732655, object end1_731602_732656, object start2_731603_732657, object end2_731604_732658*/
static void __lambda_469(void *data, object clo, int argc, object *args) ;/*object self_734657, object vblit_731605_732659*/
static void __lambda_803(void *data, object clo, int argc, object *args) ;/*object self_734658, object vblit_731605_732659*/
static void __lambda_482(void *data, object clo, int argc, object *args) ;/*object self_734659, object k_733670, object fromv_731606_732660, object j_731607_732661, object i_731608_732662, object end_731609_732663*/
static void __lambda_483(void *data, object clo, int argc, object *args) ;/*object self_734660, object j_731611_732664, object i_731612_732665*/
static void __lambda_484(void *data, object clo, int argc, object *args) ;/*object self_734661, object lp_731613_732666*/
static void __lambda_802(void *data, object clo, int argc, object *args) ;/*object self_734662, object lp_731613_732666*/
static void __lambda_487(void *data, object clo, int argc, object *args) ;/*object self_734663, object k_733673, object j_731614_732667, object i_731615_732668*/
static void __lambda_488(void *data, object clo, int argc, object *args) ;/*object self_734664, object r_733674*/
static void __lambda_485(void *data, object clo, int argc, object *args) ;/*object self_734665, object r_733672*/
static void __lambda_486(void *data, object clo, int argc, object *args) ;/*object self_734666, object r_733671*/
static void __lambda_470(void *data, object clo, int argc, object *args) ;/*object self_734667, object r_733669*/
static void __lambda_471(void *data, object clo, int argc, object *args) ;/*object self_734668, object r_733650*/
static void __lambda_472(void *data, object clo, int argc, object *args) ;/*object self_734669, object r_733654*/
static void __lambda_473(void *data, object clo, int argc, object *args) ;/*object self_734670, object r_733655*/
static void __lambda_474(void *data, object clo, int argc, object *args) ;/*object self_734671, object i_731625_732670, object j_731626_732671, object x_731627_732672, object k_731628_732673, object y_731629_732674*/
static void __lambda_475(void *data, object clo, int argc, object *args) ;/*object self_734672, object lp_731630_732675*/
static void __lambda_801(void *data, object clo, int argc, object *args) ;/*object self_734673, object lp_731630_732675*/
static void __lambda_478(void *data, object clo, int argc, object *args) ;/*object self_734674, object k_733658, object i_731631_732676, object j_731632_732677, object x_731633_732678, object k_731634_732679, object y_731635_732680*/
static void __lambda_479(void *data, object clo, int argc, object *args) ;/*object self_734675, object r_733660*/
static void __lambda_481(void *data, object clo, int argc, object *args) ;/*object self_734677, object r_733666*/
static void __lambda_480(void *data, object clo, int argc, object *args) ;/*object self_734676, object r_733662*/
static void __lambda_476(void *data, object clo, int argc, object *args) ;/*object self_734678, object r_733657*/
static void __lambda_477(void *data, object clo, int argc, object *args) ;/*object self_734679, object r_733656*/
static void __lambda_459(void *data, object clo, int argc, object *args) ;/*closure _,object k_733634, object _121_731585_732639, object v_731586_732640, object v1_731587_732641, object v2_731588_732642, object maybe_91starts_87ends_731589_732643_raw, ...*/
static void __lambda_467(void *data, object clo, int argc, object *args) ;/*object self_734649, object k_733642*/
static void __lambda_460(void *data, object clo, int argc, object *args) ;/*object self_734650, object r_733635*/
static void __lambda_462(void *data, object clo, int argc, object *args) ;/*object self_734651, object k_733637, object start_731590_732644, object rest_731591_732645*/
static void __lambda_466(void *data, object clo, int argc, object *args) ;/*object self_734652, object k_733641*/
static void __lambda_463(void *data, object clo, int argc, object *args) ;/*object self_734653, object r_733638*/
static void __lambda_465(void *data, object clo, int argc, object *args) ;/*object self_734654, object k_733640, object start1_731592_732646, object end1_731593_732647, object start2_731594_732648, object end2_731595_732649*/
static void __lambda_464(void *data, object clo, int argc, object *args) ;/*object self_734655, object r_733639*/
static void __lambda_461(void *data, object clo, int argc, object *args) ;/*object self_734656, object r_733636*/
static void __lambda_452(void *data, object clo, int argc, object *args) ;/*closure _,object k_733622, object _121_731576_732630, object v1_731577_732631, object v2_731578_732632, object maybe_91starts_87ends_731579_732633_raw, ...*/
static void __lambda_458(void *data, object clo, int argc, object *args) ;/*object self_734643, object k_733631*/
static void __lambda_453(void *data, object clo, int argc, object *args) ;/*object self_734644, object r_733623*/
static void __lambda_455(void *data, object clo, int argc, object *args) ;/*object self_734645, object k_733625, object start1_731580_732634, object end1_731581_732635, object start2_731582_732636, object end2_731583_732637*/
static void __lambda_456(void *data, object clo, int argc, object *args) ;/*object self_734646, object ans_731584_732638*/
static void __lambda_457(void *data, object clo, int argc, object *args) ;/*object self_734647, object r_733627*/
static void __lambda_454(void *data, object clo, int argc, object *args) ;/*object self_734648, object r_733624*/
static void __lambda_435(void *data, object clo, int argc, object *args) ;/*closure _,object k_733602, object elt_121_731548_732616, object v_731549_732617, object start_731550_732618, object end_731551_732619*/
static void __lambda_436(void *data, object clo, int argc, object *args) ;/*object self_734625, object i_731556_732620*/
static void __lambda_437(void *data, object clo, int argc, object *args) ;/*object self_734626, object lp_731552_731557_732621*/
static void __lambda_800(void *data, object clo, int argc, object *args) ;/*object self_734627, object lp_731552_731557_732621*/
static void __lambda_440(void *data, object clo, int argc, object *args) ;/*object self_734628, object k_733606, object i_731558_732622*/
static void __lambda_441(void *data, object clo, int argc, object *args) ;/*object self_734629, object val_731560_732624*/
static void __lambda_442(void *data, object clo, int argc, object *args) ;/*object self_734630, object j_731562_732625*/
static void __lambda_443(void *data, object clo, int argc, object *args) ;/*object self_734631, object lp_731563_732626*/
static void __lambda_799(void *data, object clo, int argc, object *args) ;/*object self_734632, object lp_731563_732626*/
static void __lambda_448(void *data, object clo, int argc, object *args) ;/*object self_734633, object k_733614, object j_731564_732627*/
static void __lambda_449(void *data, object clo, int argc, object *args) ;/*object self_734634, object vj_911_731570_732629*/
static void __lambda_450(void *data, object clo, int argc, object *args) ;/*object self_734635, object r_733618*/
static void __lambda_451(void *data, object clo, int argc, object *args) ;/*object self_734636, object r_733619*/
static void __lambda_444(void *data, object clo, int argc, object *args) ;/*object self_734637, object r_733613*/
static void __lambda_445(void *data, object clo, int argc, object *args) ;/*object self_734638, object r_733612*/
static void __lambda_446(void *data, object clo, int argc, object *args) ;/*object self_734639, object r_733611*/
static void __lambda_447(void *data, object clo, int argc, object *args) ;/*object self_734640, object r_733608*/
static void __lambda_438(void *data, object clo, int argc, object *args) ;/*object self_734641, object r_733605*/
static void __lambda_439(void *data, object clo, int argc, object *args) ;/*object self_734642, object r_733604*/
static void __lambda_430(void *data, object clo, int argc, object *args) ;/*closure _,object k_733595, object elt_121_731526_732611, object v_731527_732612, object maybe_91start_87end_731528_732613_raw, ...*/
static void __lambda_434(void *data, object clo, int argc, object *args) ;/*object self_734621, object k_733599*/
static void __lambda_431(void *data, object clo, int argc, object *args) ;/*object self_734622, object r_733596*/
static void __lambda_433(void *data, object clo, int argc, object *args) ;/*object self_734623, object k_733598, object start_731529_732614, object end_731530_732615*/
static void __lambda_432(void *data, object clo, int argc, object *args) ;/*object self_734624, object r_733597*/
static void __lambda_391(void *data, object clo, int argc, object *args) ;/*closure _,object k_733546, object elt_121_731468_732579, object v_731469_732580, object start_731470_732581, object end_731471_732582*/
static void __lambda_392(void *data, object clo, int argc, object *args) ;/*object self_734579, object restore_91heap_67_732584*/
static void __lambda_798(void *data, object clo, int argc, object *args) ;/*object self_734580, object restore_91heap_67_732584*/
static void __lambda_412(void *data, object clo, int argc, object *args) ;/*object self_734581, object k_733570, object end_731472_732586, object i_731473_732587*/
static void __lambda_413(void *data, object clo, int argc, object *args) ;/*object self_734582, object vi_731476_732588*/
static void __lambda_414(void *data, object clo, int argc, object *args) ;/*object self_734583, object first_91leaf_731479_732589*/
static void __lambda_415(void *data, object clo, int argc, object *args) ;/*object self_734584, object k_731485_732591*/
static void __lambda_416(void *data, object clo, int argc, object *args) ;/*object self_734585, object lp_731486_732592*/
static void __lambda_797(void *data, object clo, int argc, object *args) ;/*object self_734586, object lp_731486_732592*/
static void __lambda_420(void *data, object clo, int argc, object *args) ;/*object self_734587, object k_733576, object k_731487_732593*/
static void __lambda_421(void *data, object clo, int argc, object *args) ;/*object self_734588, object child1_91val_731499_732597*/
static void __lambda_427(void *data, object clo, int argc, object *args) ;/*object self_734589, object k_733587*/
static void __lambda_428(void *data, object clo, int argc, object *args) ;/*object self_734590, object child2_91val_731501_732598*/
static void __lambda_429(void *data, object clo, int argc, object *args) ;/*object self_734591, object r_733590*/
static void __lambda_422(void *data, object clo, int argc, object *args) ;/*object self_734592, object r_733582*/
static void __lambda_424(void *data, object clo, int argc, object *args) ;/*object self_734593, object k_733584, object max_91child_731502_732599, object max_91child_91val_731503_732600*/
static void __lambda_425(void *data, object clo, int argc, object *args) ;/*object self_734594, object r_733585*/
static void __lambda_426(void *data, object clo, int argc, object *args) ;/*object self_734595, object r_733586*/
static void __lambda_423(void *data, object clo, int argc, object *args) ;/*object self_734596, object r_733583*/
static void __lambda_417(void *data, object clo, int argc, object *args) ;/*object self_734597, object r_733575*/
static void __lambda_418(void *data, object clo, int argc, object *args) ;/*object self_734598, object r_733574*/
static void __lambda_419(void *data, object clo, int argc, object *args) ;/*object self_734599, object final_91k_731482_732590*/
static void __lambda_393(void *data, object clo, int argc, object *args) ;/*object self_734600, object r_733569*/
static void __lambda_394(void *data, object clo, int argc, object *args) ;/*object self_734601, object r_733547*/
static void __lambda_395(void *data, object clo, int argc, object *args) ;/*object self_734602, object i_731513_732602*/
static void __lambda_396(void *data, object clo, int argc, object *args) ;/*object self_734603, object lp_731509_731514_732603*/
static void __lambda_796(void *data, object clo, int argc, object *args) ;/*object self_734604, object lp_731509_731514_732603*/
static void __lambda_410(void *data, object clo, int argc, object *args) ;/*object self_734605, object k_733564, object i_731515_732604*/
static void __lambda_411(void *data, object clo, int argc, object *args) ;/*object self_734606, object r_733566*/
static void __lambda_397(void *data, object clo, int argc, object *args) ;/*object self_734607, object r_733563*/
static void __lambda_398(void *data, object clo, int argc, object *args) ;/*object self_734608, object r_733562*/
static void __lambda_399(void *data, object clo, int argc, object *args) ;/*object self_734609, object r_733548*/
static void __lambda_400(void *data, object clo, int argc, object *args) ;/*object self_734610, object lp_731517_731522_732607*/
static void __lambda_795(void *data, object clo, int argc, object *args) ;/*object self_734611, object lp_731517_731522_732607*/
static void __lambda_403(void *data, object clo, int argc, object *args) ;/*object self_734612, object k_733552, object i_731523_732608*/
static void __lambda_404(void *data, object clo, int argc, object *args) ;/*object self_734613, object top_731525_732610*/
static void __lambda_405(void *data, object clo, int argc, object *args) ;/*object self_734614, object r_733559*/
static void __lambda_406(void *data, object clo, int argc, object *args) ;/*object self_734615, object r_733557*/
static void __lambda_407(void *data, object clo, int argc, object *args) ;/*object self_734616, object r_733558*/
static void __lambda_408(void *data, object clo, int argc, object *args) ;/*object self_734617, object r_733554*/
static void __lambda_409(void *data, object clo, int argc, object *args) ;/*object self_734618, object r_733555*/
static void __lambda_401(void *data, object clo, int argc, object *args) ;/*object self_734619, object r_733551*/
static void __lambda_402(void *data, object clo, int argc, object *args) ;/*object self_734620, object r_733550*/
static void __lambda_385(void *data, object clo, int argc, object *args) ;/*closure _,object k_733537, object vector_911_731461_732572, object vector_912_731462_732573, object maybe_91start_87end_731463_732574*/
static void __lambda_386(void *data, object clo, int argc, object *args) ;/*object self_734574, object r_733538*/
static void __lambda_387(void *data, object clo, int argc, object *args) ;/*object self_734575, object r_733539*/
static void __lambda_388(void *data, object clo, int argc, object *args) ;/*object self_734576, object r_733540*/
static void __lambda_389(void *data, object clo, int argc, object *args) ;/*object self_734577, object r_733541*/
static void __lambda_390(void *data, object clo, int argc, object *args) ;/*object self_734578, object start_911_731464_732575, object end_911_731465_732576, object start_912_731466_732577, object end_912_731467_732578*/
static void __lambda_381(void *data, object clo, int argc, object *args) ;/*closure _,object k_733531, object vector_731457_732568, object maybe_91start_87end_731458_732569*/
static void __lambda_382(void *data, object clo, int argc, object *args) ;/*object self_734571, object r_733532*/
static void __lambda_383(void *data, object clo, int argc, object *args) ;/*object self_734572, object r_733533*/
static void __lambda_384(void *data, object clo, int argc, object *args) ;/*object self_734573, object start_731459_732570, object end_731460_732571*/
static void __lambda_376(void *data, object clo, int argc, object *args) ;/*closure _,object k_733524, object list_731452_732563, object index_731453_732564, object default_731454_732565*/
static void __lambda_380(void *data, object clo, int argc, object *args) ;/*object self_734567, object k_733528*/
static void __lambda_377(void *data, object clo, int argc, object *args) ;/*object self_734568, object r_733525*/
static void __lambda_379(void *data, object clo, int argc, object *args) ;/*object self_734569, object k_733527, object has_127_731455_732566, object maybe_731456_732567*/
static void __lambda_378(void *data, object clo, int argc, object *args) ;/*object self_734570, object r_733526*/
static void __lambda_375(void *data, object clo, int argc, object *args) ;/*closure _,object k_733515, object list_731443_732561, object index_731444_732562*/
static void __lambda_368(void *data, object clo, int argc, object *args) ;/*closure _,object k_733501, object target_731428_732550, object src_731429_732551, object start_731430_732552, object end_731431_732553*/
static void __lambda_369(void *data, object clo, int argc, object *args) ;/*object self_734560, object i_731437_732555, object j_731438_732556*/
static void __lambda_370(void *data, object clo, int argc, object *args) ;/*object self_734561, object lp_731433_731439_732557*/
static void __lambda_794(void *data, object clo, int argc, object *args) ;/*object self_734562, object lp_731433_731439_732557*/
static void __lambda_373(void *data, object clo, int argc, object *args) ;/*object self_734563, object k_733507, object i_731440_732558, object j_731441_732559*/
static void __lambda_374(void *data, object clo, int argc, object *args) ;/*object self_734564, object r_733509*/
static void __lambda_371(void *data, object clo, int argc, object *args) ;/*object self_734565, object r_733506*/
static void __lambda_372(void *data, object clo, int argc, object *args) ;/*object self_734566, object r_733505*/
static void __lambda_366(void *data, object clo, int argc, object *args) ;/*closure _,object k_733497, object vec_731427_732549*/
static void __lambda_367(void *data, object clo, int argc, object *args) ;/*object self_734559, object r_733498*/
static void __lambda_358(void *data, object clo, int argc, object *args) ;/*closure _,object k_733483, object vec_731406_732538, object start_731407_732539, object end_731408_732540*/
static void __lambda_359(void *data, object clo, int argc, object *args) ;/*object self_734551, object new_731417_732543*/
static void __lambda_360(void *data, object clo, int argc, object *args) ;/*object self_734552, object i_731422_732544*/
static void __lambda_361(void *data, object clo, int argc, object *args) ;/*object self_734553, object lp_731419_731424_732546*/
static void __lambda_793(void *data, object clo, int argc, object *args) ;/*object self_734554, object lp_731419_731424_732546*/
static void __lambda_364(void *data, object clo, int argc, object *args) ;/*object self_734555, object k_733489, object i_731425_732547, object j_731426_732548*/
static void __lambda_365(void *data, object clo, int argc, object *args) ;/*object self_734556, object r_733491*/
static void __lambda_362(void *data, object clo, int argc, object *args) ;/*object self_734557, object r_733488*/
static void __lambda_363(void *data, object clo, int argc, object *args) ;/*object self_734558, object r_733487*/
static void __lambda_347(void *data, object clo, int argc, object *args) ;/*closure _,object k_733466, object elt_121_731385_732525, object v_731386_732526, object maybe_91start_87end_731387_732527_raw, ...*/
static void __lambda_357(void *data, object clo, int argc, object *args) ;/*object self_734540, object k_733480*/
static void __lambda_348(void *data, object clo, int argc, object *args) ;/*object self_734541, object r_733467*/
static void __lambda_350(void *data, object clo, int argc, object *args) ;/*object self_734542, object k_733469, object start_731388_732528, object end_731389_732529*/
static void __lambda_351(void *data, object clo, int argc, object *args) ;/*object self_734543, object i_731395_732531, object vi_911_731396_732532*/
static void __lambda_352(void *data, object clo, int argc, object *args) ;/*object self_734544, object lp_731397_732533*/
static void __lambda_792(void *data, object clo, int argc, object *args) ;/*object self_734545, object lp_731397_732533*/
static void __lambda_355(void *data, object clo, int argc, object *args) ;/*object self_734546, object k_733475, object i_731398_732534, object vi_911_731399_732535*/
static void __lambda_356(void *data, object clo, int argc, object *args) ;/*object self_734547, object r_733478*/
static void __lambda_353(void *data, object clo, int argc, object *args) ;/*object self_734548, object r_733474*/
static void __lambda_354(void *data, object clo, int argc, object *args) ;/*object self_734549, object r_733473*/
static void __lambda_349(void *data, object clo, int argc, object *args) ;/*object self_734550, object r_733468*/
static void __lambda_340(void *data, object clo, int argc, object *args) ;/*closure _,object k_733451, object _121_731367_732515, object list_731368_732516*/
static void __lambda_341(void *data, object clo, int argc, object *args) ;/*object self_734533, object prev_731374_732518, object tail_731375_732519*/
static void __lambda_342(void *data, object clo, int argc, object *args) ;/*object self_734534, object lp_731376_732520*/
static void __lambda_791(void *data, object clo, int argc, object *args) ;/*object self_734535, object lp_731376_732520*/
static void __lambda_345(void *data, object clo, int argc, object *args) ;/*object self_734536, object k_733457, object prev_731377_732521, object tail_731378_732522*/
static void __lambda_346(void *data, object clo, int argc, object *args) ;/*object self_734537, object r_733460*/
static void __lambda_343(void *data, object clo, int argc, object *args) ;/*object self_734538, object r_733456*/
static void __lambda_344(void *data, object clo, int argc, object *args) ;/*object self_734539, object r_733455*/
static void __lambda_307(void *data, object clo, int argc, object *args) ;/*closure _,object k_733409, object _121_731336_732494, object a_731337_732495, object b_731338_732496*/
static void __lambda_308(void *data, object clo, int argc, object *args) ;/*object self_734499, object scan_91a_731339_732497, object scan_91b_731340_732498*/
static void __lambda_790(void *data, object clo, int argc, object *args) ;/*object self_734500, object scan_91a_731339_732497*/
static void __lambda_789(void *data, object clo, int argc, object *args) ;/*object self_734501, object scan_91b_731340_732498*/
static void __lambda_333(void *data, object clo, int argc, object *args) ;/*object self_734502, object k_733440, object prev_731341_732499, object a_731342_732500, object x_731343_732501, object b_731344_732502, object y_731345_732503*/
static void __lambda_334(void *data, object clo, int argc, object *args) ;/*object self_734503, object r_733441*/
static void __lambda_338(void *data, object clo, int argc, object *args) ;/*object self_734507, object next_91a_731347_732505*/
static void __lambda_339(void *data, object clo, int argc, object *args) ;/*object self_734508, object r_733448*/
static void __lambda_335(void *data, object clo, int argc, object *args) ;/*object self_734504, object next_91b_731346_732504*/
static void __lambda_336(void *data, object clo, int argc, object *args) ;/*object self_734505, object r_733443*/
static void __lambda_337(void *data, object clo, int argc, object *args) ;/*object self_734506, object r_733445*/
static void __lambda_309(void *data, object clo, int argc, object *args) ;/*object self_734509, object r_733439*/
static void __lambda_310(void *data, object clo, int argc, object *args) ;/*object self_734510, object r_733410*/
static void __lambda_326(void *data, object clo, int argc, object *args) ;/*object self_734511, object k_733430, object prev_731348_732506, object a_731349_732507, object x_731350_732508, object b_731351_732509, object y_731352_732510*/
static void __lambda_327(void *data, object clo, int argc, object *args) ;/*object self_734512, object r_733431*/
static void __lambda_330(void *data, object clo, int argc, object *args) ;/*object self_734515, object next_91a_731354_732512*/
static void __lambda_331(void *data, object clo, int argc, object *args) ;/*object self_734516, object r_733436*/
static void __lambda_332(void *data, object clo, int argc, object *args) ;/*object self_734517, object r_733438*/
static void __lambda_328(void *data, object clo, int argc, object *args) ;/*object self_734513, object next_91b_731353_732511*/
static void __lambda_329(void *data, object clo, int argc, object *args) ;/*object self_734514, object r_733434*/
static void __lambda_311(void *data, object clo, int argc, object *args) ;/*object self_734518, object r_733429*/
static void __lambda_312(void *data, object clo, int argc, object *args) ;/*object self_734519, object r_733411*/
static void __lambda_313(void *data, object clo, int argc, object *args) ;/*object self_734520, object r_733427*/
static void __lambda_314(void *data, object clo, int argc, object *args) ;/*object self_734521, object r_733428*/
static void __lambda_315(void *data, object clo, int argc, object *args) ;/*object self_734522, object r_733414*/
static void __lambda_321(void *data, object clo, int argc, object *args) ;/*object self_734528, object next_91a_731366_732514*/
static void __lambda_325(void *data, object clo, int argc, object *args) ;/*object self_734529, object r_733421*/
static void __lambda_322(void *data, object clo, int argc, object *args) ;/*object self_734530, object k_733423*/
static void __lambda_323(void *data, object clo, int argc, object *args) ;/*object self_734531, object r_733425*/
static void __lambda_324(void *data, object clo, int argc, object *args) ;/*object self_734532, object r_733426*/
static void __lambda_316(void *data, object clo, int argc, object *args) ;/*object self_734523, object next_91b_731364_732513*/
static void __lambda_320(void *data, object clo, int argc, object *args) ;/*object self_734524, object r_733415*/
static void __lambda_317(void *data, object clo, int argc, object *args) ;/*object self_734525, object k_733417*/
static void __lambda_318(void *data, object clo, int argc, object *args) ;/*object self_734526, object r_733419*/
static void __lambda_319(void *data, object clo, int argc, object *args) ;/*object self_734527, object r_733420*/
static void __lambda_294(void *data, object clo, int argc, object *args) ;/*closure _,object k_733390, object _121_731314_732480, object a_731315_732481, object b_731316_732482*/
static void __lambda_295(void *data, object clo, int argc, object *args) ;/*object self_734486, object r_733393*/
static void __lambda_296(void *data, object clo, int argc, object *args) ;/*object self_734487, object r_733394*/
static void __lambda_297(void *data, object clo, int argc, object *args) ;/*object self_734488, object x_731325_732483, object a_731326_732484, object y_731327_732485, object b_731328_732486*/
static void __lambda_298(void *data, object clo, int argc, object *args) ;/*object self_734489, object recur_731329_732487*/
static void __lambda_788(void *data, object clo, int argc, object *args) ;/*object self_734490, object recur_731329_732487*/
static void __lambda_301(void *data, object clo, int argc, object *args) ;/*object self_734491, object k_733397, object x_731330_732488, object a_731331_732489, object y_731332_732490, object b_731333_732491*/
static void __lambda_302(void *data, object clo, int argc, object *args) ;/*object self_734492, object r_733398*/
static void __lambda_305(void *data, object clo, int argc, object *args) ;/*object self_734495, object r_733406*/
static void __lambda_306(void *data, object clo, int argc, object *args) ;/*object self_734496, object r_733405*/
static void __lambda_303(void *data, object clo, int argc, object *args) ;/*object self_734493, object r_733402*/
static void __lambda_304(void *data, object clo, int argc, object *args) ;/*object self_734494, object r_733401*/
static void __lambda_299(void *data, object clo, int argc, object *args) ;/*object self_734497, object r_733396*/
static void __lambda_300(void *data, object clo, int argc, object *args) ;/*object self_734498, object r_733395*/
static void __lambda_198(void *data, object clo, int argc, object *args) ;/*closure _,object k_733288, object elt_121_73764_732403, object lis_73765_732404*/
static void __lambda_199(void *data, object clo, int argc, object *args) ;/*object self_734383, object getrun_732408, object grow_732409, object merge_67_732410*/
static void __lambda_787(void *data, object clo, int argc, object *args) ;/*object self_734384, object getrun_732408*/
static void __lambda_786(void *data, object clo, int argc, object *args) ;/*object self_734385, object grow_732409*/
static void __lambda_785(void *data, object clo, int argc, object *args) ;/*object self_734386, object merge_67_732410*/
static void __lambda_282(void *data, object clo, int argc, object *args) ;/*object self_734387, object k_733377, object lis_73766_732414*/
static void __lambda_283(void *data, object clo, int argc, object *args) ;/*object self_734388, object r_733378*/
static void __lambda_284(void *data, object clo, int argc, object *args) ;/*object self_734389, object r_733379*/
static void __lambda_285(void *data, object clo, int argc, object *args) ;/*object self_734390, object lis_73768_732415, object x_73769_732416, object next_73771_732418*/
static void __lambda_286(void *data, object clo, int argc, object *args) ;/*object self_734391, object lp_73772_732419*/
static void __lambda_784(void *data, object clo, int argc, object *args) ;/*object self_734392, object lp_73772_732419*/
static void __lambda_289(void *data, object clo, int argc, object *args) ;/*object self_734393, object k_733382, object lis_73773_732420, object x_73774_732421, object i_73775_732422, object next_73776_732423*/
static void __lambda_290(void *data, object clo, int argc, object *args) ;/*object self_734394, object y_73777_732424*/
static void __lambda_291(void *data, object clo, int argc, object *args) ;/*object self_734395, object r_733385*/
static void __lambda_292(void *data, object clo, int argc, object *args) ;/*object self_734396, object r_733386*/
static void __lambda_293(void *data, object clo, int argc, object *args) ;/*object self_734397, object r_733387*/
static void __lambda_287(void *data, object clo, int argc, object *args) ;/*object self_734398, object r_733381*/
static void __lambda_288(void *data, object clo, int argc, object *args) ;/*object self_734399, object r_733380*/
static void __lambda_200(void *data, object clo, int argc, object *args) ;/*object self_734400, object r_733376*/
static void __lambda_201(void *data, object clo, int argc, object *args) ;/*object self_734401, object r_733289*/
static void __lambda_234(void *data, object clo, int argc, object *args) ;/*object self_734402, object k_733329, object a_73778_732425, object enda_73779_732426, object b_73780_732427, object endb_73781_732428*/
static void __lambda_235(void *data, object clo, int argc, object *args) ;/*object self_734403, object scan_91a_73782_732429, object scan_91b_73783_732430, object maybe_91set_91cdr_67_73784_732431*/
static void __lambda_783(void *data, object clo, int argc, object *args) ;/*object self_734404, object scan_91a_73782_732429*/
static void __lambda_782(void *data, object clo, int argc, object *args) ;/*object self_734405, object scan_91b_73783_732430*/
static void __lambda_781(void *data, object clo, int argc, object *args) ;/*object self_734406, object maybe_91set_91cdr_67_73784_732431*/
static void __lambda_271(void *data, object clo, int argc, object *args) ;/*object self_734407, object k_733365, object prev_73785_732432, object x_73786_732433, object a_73787_732434, object y_73788_732435, object b_73789_732436*/
static void __lambda_272(void *data, object clo, int argc, object *args) ;/*object self_734408, object r_733366*/
static void __lambda_278(void *data, object clo, int argc, object *args) ;/*object self_734414, object r_733372*/
static void __lambda_280(void *data, object clo, int argc, object *args) ;/*object self_734416, object next_91a_73798_732438*/
static void __lambda_281(void *data, object clo, int argc, object *args) ;/*object self_734417, object r_733375*/
static void __lambda_279(void *data, object clo, int argc, object *args) ;/*object self_734415, object r_733373*/
static void __lambda_273(void *data, object clo, int argc, object *args) ;/*object self_734409, object r_733367*/
static void __lambda_274(void *data, object clo, int argc, object *args) ;/*object self_734410, object next_91b_73793_732437*/
static void __lambda_275(void *data, object clo, int argc, object *args) ;/*object self_734411, object r_733369*/
static void __lambda_277(void *data, object clo, int argc, object *args) ;/*object self_734413, object r_733371*/
static void __lambda_276(void *data, object clo, int argc, object *args) ;/*object self_734412, object r_733370*/
static void __lambda_236(void *data, object clo, int argc, object *args) ;/*object self_734418, object r_733364*/
static void __lambda_237(void *data, object clo, int argc, object *args) ;/*object self_734419, object r_733330*/
static void __lambda_260(void *data, object clo, int argc, object *args) ;/*object self_734420, object k_733353, object prev_73799_732439, object x_73800_732440, object a_73801_732441, object y_73802_732442, object b_73803_732443*/
static void __lambda_261(void *data, object clo, int argc, object *args) ;/*object self_734421, object r_733354*/
static void __lambda_266(void *data, object clo, int argc, object *args) ;/*object self_734426, object r_733359*/
static void __lambda_267(void *data, object clo, int argc, object *args) ;/*object self_734427, object r_733360*/
static void __lambda_269(void *data, object clo, int argc, object *args) ;/*object self_734429, object next_91a_73809_732445*/
static void __lambda_270(void *data, object clo, int argc, object *args) ;/*object self_734430, object r_733363*/
static void __lambda_268(void *data, object clo, int argc, object *args) ;/*object self_734428, object r_733361*/
static void __lambda_262(void *data, object clo, int argc, object *args) ;/*object self_734422, object r_733355*/
static void __lambda_264(void *data, object clo, int argc, object *args) ;/*object self_734424, object next_91b_73807_732444*/
static void __lambda_265(void *data, object clo, int argc, object *args) ;/*object self_734425, object r_733358*/
static void __lambda_263(void *data, object clo, int argc, object *args) ;/*object self_734423, object r_733356*/
static void __lambda_238(void *data, object clo, int argc, object *args) ;/*object self_734431, object r_733352*/
static void __lambda_239(void *data, object clo, int argc, object *args) ;/*object self_734432, object r_733331*/
static void __lambda_258(void *data, object clo, int argc, object *args) ;/*object self_734433, object k_733349, object pair_73810_732446, object val_73811_732447*/
static void __lambda_259(void *data, object clo, int argc, object *args) ;/*object self_734434, object r_733351*/
static void __lambda_240(void *data, object clo, int argc, object *args) ;/*object self_734435, object r_733348*/
static void __lambda_241(void *data, object clo, int argc, object *args) ;/*object self_734436, object r_733332*/
static void __lambda_242(void *data, object clo, int argc, object *args) ;/*object self_734437, object r_733333*/
static void __lambda_243(void *data, object clo, int argc, object *args) ;/*object self_734438, object r_733334*/
static void __lambda_244(void *data, object clo, int argc, object *args) ;/*object self_734439, object x_73812_732448, object y_73813_732449*/
static void __lambda_245(void *data, object clo, int argc, object *args) ;/*object self_734440, object r_733335*/
static void __lambda_257(void *data, object clo, int argc, object *args) ;/*object self_734447, object r_733342*/
static void __lambda_252(void *data, object clo, int argc, object *args) ;/*object self_734448, object k_733343*/
static void __lambda_253(void *data, object clo, int argc, object *args) ;/*object self_734449, object r_733344*/
static void __lambda_255(void *data, object clo, int argc, object *args) ;/*object self_734451, object next_91a_73815_732451*/
static void __lambda_256(void *data, object clo, int argc, object *args) ;/*object self_734452, object r_733347*/
static void __lambda_254(void *data, object clo, int argc, object *args) ;/*object self_734450, object r_733345*/
static void __lambda_251(void *data, object clo, int argc, object *args) ;/*object self_734441, object r_733336*/
static void __lambda_246(void *data, object clo, int argc, object *args) ;/*object self_734442, object k_733337*/
static void __lambda_247(void *data, object clo, int argc, object *args) ;/*object self_734443, object r_733338*/
static void __lambda_249(void *data, object clo, int argc, object *args) ;/*object self_734445, object next_91b_73814_732450*/
static void __lambda_250(void *data, object clo, int argc, object *args) ;/*object self_734446, object r_733341*/
static void __lambda_248(void *data, object clo, int argc, object *args) ;/*object self_734444, object r_733339*/
static void __lambda_202(void *data, object clo, int argc, object *args) ;/*object self_734453, object r_733328*/
static void __lambda_203(void *data, object clo, int argc, object *args) ;/*object self_734454, object r_733290*/
static void __lambda_215(void *data, object clo, int argc, object *args) ;/*object self_734455, object k_733304, object s_73816_732452, object ends_73817_732453, object ls_73818_732454, object ls2_73819_732455, object u_73820_732456, object lw_73821_732457*/
static void __lambda_216(void *data, object clo, int argc, object *args) ;/*object self_734456, object ls2_731094_732468*/
static void __lambda_217(void *data, object clo, int argc, object *args) ;/*object self_734457, object lp_731095_732469*/
static void __lambda_780(void *data, object clo, int argc, object *args) ;/*object self_734458, object lp_731095_732469*/
static void __lambda_233(void *data, object clo, int argc, object *args) ;/*object self_734459, object k_733323, object ls2_731096_732470*/
static void __lambda_218(void *data, object clo, int argc, object *args) ;/*object self_734460, object r_733322*/
static void __lambda_219(void *data, object clo, int argc, object *args) ;/*object self_734461, object r_733321*/
static void __lambda_220(void *data, object clo, int argc, object *args) ;/*object self_734462, object ls2_73876_732458*/
static void __lambda_232(void *data, object clo, int argc, object *args) ;/*object self_734463, object k_733320*/
static void __lambda_221(void *data, object clo, int argc, object *args) ;/*object self_734464, object r_733307*/
static void __lambda_223(void *data, object clo, int argc, object *args) ;/*object self_734465, object k_733309, object lr_73929_732459, object endr_73930_732460, object u2_73931_732461*/
static void __lambda_231(void *data, object clo, int argc, object *args) ;/*object self_734466, object k_733319*/
static void __lambda_224(void *data, object clo, int argc, object *args) ;/*object self_734467, object r_733310*/
static void __lambda_226(void *data, object clo, int argc, object *args) ;/*object self_734468, object k_733312, object t_73984_732462, object endt_73985_732463, object lt_73986_732464, object u3_73987_732465*/
static void __lambda_230(void *data, object clo, int argc, object *args) ;/*object self_734469, object k_733318*/
static void __lambda_227(void *data, object clo, int argc, object *args) ;/*object self_734470, object r_733313*/
static void __lambda_229(void *data, object clo, int argc, object *args) ;/*object self_734471, object k_733315, object st_731040_732466, object end_91st_731041_732467*/
static void __lambda_228(void *data, object clo, int argc, object *args) ;/*object self_734472, object r_733314*/
static void __lambda_225(void *data, object clo, int argc, object *args) ;/*object self_734473, object r_733311*/
static void __lambda_222(void *data, object clo, int argc, object *args) ;/*object self_734474, object r_733308*/
static void __lambda_204(void *data, object clo, int argc, object *args) ;/*object self_734475, object r_733303*/
static void __lambda_205(void *data, object clo, int argc, object *args) ;/*object self_734476, object r_733291*/
static void __lambda_214(void *data, object clo, int argc, object *args) ;/*object self_734477, object k_733302*/
static void __lambda_206(void *data, object clo, int argc, object *args) ;/*object self_734478, object r_733293*/
static void __lambda_208(void *data, object clo, int argc, object *args) ;/*object self_734479, object k_733295, object lr_731150_732472, object endr_731151_732473, object rest_731152_732474*/
static void __lambda_213(void *data, object clo, int argc, object *args) ;/*object self_734480, object k_733301*/
static void __lambda_209(void *data, object clo, int argc, object *args) ;/*object self_734481, object r_733296*/
static void __lambda_211(void *data, object clo, int argc, object *args) ;/*object self_734482, object k_733298, object a_731259_732476, object enda_731260_732477, object la_731261_732478, object v_731262_732479*/
static void __lambda_212(void *data, object clo, int argc, object *args) ;/*object self_734483, object r_733299*/
static void __lambda_210(void *data, object clo, int argc, object *args) ;/*object self_734484, object r_733297*/
static void __lambda_207(void *data, object clo, int argc, object *args) ;/*object self_734485, object r_733294*/
static void __lambda_130(void *data, object clo, int argc, object *args) ;/*closure _,object k_733197, object elt_121_73276_732330, object lis_73277_732331*/
static void __lambda_131(void *data, object clo, int argc, object *args) ;/*object self_734307, object append_91reverse_732337, object getrun_732338, object grow_732339, object merge_732340, object null_91list_127_732341*/
static void __lambda_779(void *data, object clo, int argc, object *args) ;/*object self_734308, object append_91reverse_732337*/
static void __lambda_778(void *data, object clo, int argc, object *args) ;/*object self_734309, object getrun_732338*/
static void __lambda_777(void *data, object clo, int argc, object *args) ;/*object self_734310, object grow_732339*/
static void __lambda_776(void *data, object clo, int argc, object *args) ;/*object self_734311, object merge_732340*/
static void __lambda_775(void *data, object clo, int argc, object *args) ;/*object self_734312, object null_91list_127_732341*/
static void __lambda_187(void *data, object clo, int argc, object *args) ;/*object self_734313, object k_733267, object lis_73278_732347*/
static void __lambda_188(void *data, object clo, int argc, object *args) ;/*object self_734314, object ans_73280_732348, object prev_73282_732350, object xs_73283_732351*/
static void __lambda_189(void *data, object clo, int argc, object *args) ;/*object self_734315, object lp_73284_732352*/
static void __lambda_774(void *data, object clo, int argc, object *args) ;/*object self_734316, object lp_73284_732352*/
static void __lambda_192(void *data, object clo, int argc, object *args) ;/*object self_734317, object k_733273, object ans_73285_732353, object i_73286_732354, object prev_73287_732355, object xs_73288_732356*/
static void __lambda_197(void *data, object clo, int argc, object *args) ;/*object self_734322, object r_733283*/
static void __lambda_193(void *data, object clo, int argc, object *args) ;/*object self_734318, object x_73289_732357*/
static void __lambda_194(void *data, object clo, int argc, object *args) ;/*object self_734319, object r_733276*/
static void __lambda_196(void *data, object clo, int argc, object *args) ;/*object self_734321, object r_733280*/
static void __lambda_195(void *data, object clo, int argc, object *args) ;/*object self_734320, object r_733277*/
static void __lambda_190(void *data, object clo, int argc, object *args) ;/*object self_734323, object r_733272*/
static void __lambda_191(void *data, object clo, int argc, object *args) ;/*object self_734324, object r_733271*/
static void __lambda_132(void *data, object clo, int argc, object *args) ;/*object self_734325, object r_733266*/
static void __lambda_133(void *data, object clo, int argc, object *args) ;/*object self_734326, object r_733198*/
static void __lambda_180(void *data, object clo, int argc, object *args) ;/*object self_734327, object k_733258, object rev_91head_73290_732358, object tail_73291_732359*/
static void __lambda_181(void *data, object clo, int argc, object *args) ;/*object self_734328, object rev_91head_73293_732360, object tail_73294_732361*/
static void __lambda_182(void *data, object clo, int argc, object *args) ;/*object self_734329, object lp_73295_732362*/
static void __lambda_773(void *data, object clo, int argc, object *args) ;/*object self_734330, object lp_73295_732362*/
static void __lambda_185(void *data, object clo, int argc, object *args) ;/*object self_734331, object k_733261, object rev_91head_73296_732363, object tail_73297_732364*/
static void __lambda_186(void *data, object clo, int argc, object *args) ;/*object self_734332, object r_733262*/
static void __lambda_183(void *data, object clo, int argc, object *args) ;/*object self_734333, object r_733260*/
static void __lambda_184(void *data, object clo, int argc, object *args) ;/*object self_734334, object r_733259*/
static void __lambda_134(void *data, object clo, int argc, object *args) ;/*object self_734335, object r_733257*/
static void __lambda_135(void *data, object clo, int argc, object *args) ;/*object self_734336, object r_733199*/
static void __lambda_179(void *data, object clo, int argc, object *args) ;/*object self_734337, object k_733254, object l_73298_732365*/
static void __lambda_136(void *data, object clo, int argc, object *args) ;/*object self_734338, object r_733253*/
static void __lambda_137(void *data, object clo, int argc, object *args) ;/*object self_734339, object r_733200*/
static void __lambda_166(void *data, object clo, int argc, object *args) ;/*object self_734340, object k_733236, object a_73306_732366, object b_73307_732367*/
static void __lambda_167(void *data, object clo, int argc, object *args) ;/*object self_734341, object r_733237*/
static void __lambda_168(void *data, object clo, int argc, object *args) ;/*object self_734342, object r_733238*/
static void __lambda_169(void *data, object clo, int argc, object *args) ;/*object self_734343, object x_73309_732368, object a_73310_732369, object y_73311_732370, object b_73312_732371*/
static void __lambda_170(void *data, object clo, int argc, object *args) ;/*object self_734344, object recur_73313_732372*/
static void __lambda_772(void *data, object clo, int argc, object *args) ;/*object self_734345, object recur_73313_732372*/
static void __lambda_173(void *data, object clo, int argc, object *args) ;/*object self_734346, object k_733241, object x_73314_732373, object a_73315_732374, object y_73316_732375, object b_73317_732376*/
static void __lambda_174(void *data, object clo, int argc, object *args) ;/*object self_734347, object r_733242*/
static void __lambda_178(void *data, object clo, int argc, object *args) ;/*object self_734350, object r_733248*/
static void __lambda_177(void *data, object clo, int argc, object *args) ;/*object self_734351, object k_733250*/
static void __lambda_176(void *data, object clo, int argc, object *args) ;/*object self_734348, object r_733243*/
static void __lambda_175(void *data, object clo, int argc, object *args) ;/*object self_734349, object k_733245*/
static void __lambda_171(void *data, object clo, int argc, object *args) ;/*object self_734352, object r_733240*/
static void __lambda_172(void *data, object clo, int argc, object *args) ;/*object self_734353, object r_733239*/
static void __lambda_138(void *data, object clo, int argc, object *args) ;/*object self_734354, object r_733235*/
static void __lambda_139(void *data, object clo, int argc, object *args) ;/*object self_734355, object r_733201*/
static void __lambda_150(void *data, object clo, int argc, object *args) ;/*object self_734356, object k_733213, object s_73320_732379, object ls_73321_732380, object ls2_73322_732381, object u_73323_732382, object lw_73324_732383*/
static void __lambda_151(void *data, object clo, int argc, object *args) ;/*object self_734357, object ls2_73545_732392*/
static void __lambda_152(void *data, object clo, int argc, object *args) ;/*object self_734358, object lp_73546_732393*/
static void __lambda_771(void *data, object clo, int argc, object *args) ;/*object self_734359, object lp_73546_732393*/
static void __lambda_165(void *data, object clo, int argc, object *args) ;/*object self_734360, object k_733229, object ls2_73547_732394*/
static void __lambda_153(void *data, object clo, int argc, object *args) ;/*object self_734361, object r_733228*/
static void __lambda_154(void *data, object clo, int argc, object *args) ;/*object self_734362, object r_733227*/
static void __lambda_155(void *data, object clo, int argc, object *args) ;/*object self_734363, object ls2_73382_732385*/
static void __lambda_164(void *data, object clo, int argc, object *args) ;/*object self_734364, object k_733226*/
static void __lambda_156(void *data, object clo, int argc, object *args) ;/*object self_734365, object r_733216*/
static void __lambda_158(void *data, object clo, int argc, object *args) ;/*object self_734366, object k_733218, object r_73435_732386, object lr_73436_732387, object u2_73437_732388*/
static void __lambda_163(void *data, object clo, int argc, object *args) ;/*object self_734367, object k_733225*/
static void __lambda_159(void *data, object clo, int argc, object *args) ;/*object self_734368, object r_733219*/
static void __lambda_161(void *data, object clo, int argc, object *args) ;/*object self_734369, object k_733221, object t_73490_732389, object lt_73491_732390, object u3_73492_732391*/
static void __lambda_162(void *data, object clo, int argc, object *args) ;/*object self_734370, object r_733222*/
static void __lambda_160(void *data, object clo, int argc, object *args) ;/*object self_734371, object r_733220*/
static void __lambda_157(void *data, object clo, int argc, object *args) ;/*object self_734372, object r_733217*/
static void __lambda_140(void *data, object clo, int argc, object *args) ;/*object self_734373, object r_733212*/
static void __lambda_141(void *data, object clo, int argc, object *args) ;/*object self_734374, object r_733202*/
static void __lambda_149(void *data, object clo, int argc, object *args) ;/*object self_734375, object k_733211*/
static void __lambda_142(void *data, object clo, int argc, object *args) ;/*object self_734376, object r_733204*/
static void __lambda_144(void *data, object clo, int argc, object *args) ;/*object self_734377, object k_733206, object r_73601_732396, object lr_73602_732397, object tail_73603_732398*/
static void __lambda_148(void *data, object clo, int argc, object *args) ;/*object self_734378, object k_733210*/
static void __lambda_145(void *data, object clo, int argc, object *args) ;/*object self_734379, object r_733207*/
static void __lambda_147(void *data, object clo, int argc, object *args) ;/*object self_734380, object k_733209, object a_73710_732400, object la_73711_732401, object v_73712_732402*/
static void __lambda_146(void *data, object clo, int argc, object *args) ;/*object self_734381, object r_733208*/
static void __lambda_143(void *data, object clo, int argc, object *args) ;/*object self_734382, object r_733205*/
static void __lambda_80(void *data, object clo, int argc, object *args) ;/*closure _,object k_733048, object expr_7395_73135_73225_732279, object rename_7396_73136_73226_732280, object compare_7397_73137_73227_732281*/
static void __lambda_81(void *data, object clo, int argc, object *args) ;/*object self_734258, object v_931_73103_73205_73264_732318*/
static void __lambda_90(void *data, object clo, int argc, object *args) ;/*object self_734259, object tmp_73139_73141_73228_732282*/
static void __lambda_129(void *data, object clo, int argc, object *args) ;/*object self_734260, object r_733049*/
static void __lambda_91(void *data, object clo, int argc, object *args) ;/*object self_734261, object k_733051*/
static void __lambda_92(void *data, object clo, int argc, object *args) ;/*object self_734262, object v_9310_73112_73181_73249_732303*/
static void __lambda_104(void *data, object clo, int argc, object *args) ;/*object self_734263, object tmp_73143_73145_73229_732283*/
static void __lambda_105(void *data, object clo, int argc, object *args) ;/*object self_734264, object v_9321_73123_73161_73236_732290*/
static void __lambda_122(void *data, object clo, int argc, object *args) ;/*object self_734265, object tmp_73147_73149_73230_732284*/
static void __lambda_123(void *data, object clo, int argc, object *args) ;/*object self_734266, object v_9330_73132_73154_73232_732286*/
static void __lambda_127(void *data, object clo, int argc, object *args) ;/*object self_734267, object tmp_73151_73153_73231_732285*/
static void __lambda_128(void *data, object clo, int argc, object *args) ;/*object self_734268, object r_733055*/
static void __lambda_124(void *data, object clo, int argc, object *args) ;/*object self_734269, object k_733057*/
static void __lambda_125(void *data, object clo, int argc, object *args) ;/*object self_734270, object r_733064*/
static void __lambda_126(void *data, object clo, int argc, object *args) ;/*object self_734271, object r_733063*/
static void __lambda_106(void *data, object clo, int argc, object *args) ;/*object self_734272, object k_733068*/
static void __lambda_107(void *data, object clo, int argc, object *args) ;/*object self_734273, object r_733085*/
static void __lambda_108(void *data, object clo, int argc, object *args) ;/*object self_734274, object r_733108*/
static void __lambda_109(void *data, object clo, int argc, object *args) ;/*object self_734275, object r_733112*/
static void __lambda_110(void *data, object clo, int argc, object *args) ;/*object self_734276, object r_733109*/
static void __lambda_111(void *data, object clo, int argc, object *args) ;/*object self_734277, object r_733088*/
static void __lambda_112(void *data, object clo, int argc, object *args) ;/*object self_734278, object r_733094*/
static void __lambda_113(void *data, object clo, int argc, object *args) ;/*object self_734279, object r_733102*/
static void __lambda_114(void *data, object clo, int argc, object *args) ;/*object self_734280, object r_733103*/
static void __lambda_115(void *data, object clo, int argc, object *args) ;/*object self_734281, object r_733099*/
static void __lambda_116(void *data, object clo, int argc, object *args) ;/*object self_734282, object r_733097*/
static void __lambda_117(void *data, object clo, int argc, object *args) ;/*object self_734283, object r_733095*/
static void __lambda_118(void *data, object clo, int argc, object *args) ;/*object self_734284, object r_733091*/
static void __lambda_119(void *data, object clo, int argc, object *args) ;/*object self_734285, object r_733089*/
static void __lambda_120(void *data, object clo, int argc, object *args) ;/*object self_734286, object r_733086*/
static void __lambda_121(void *data, object clo, int argc, object *args) ;/*object self_734287, object r_733084*/
static void __lambda_93(void *data, object clo, int argc, object *args) ;/*object self_734288, object k_733119*/
static void __lambda_94(void *data, object clo, int argc, object *args) ;/*object self_734289, object r_733140*/
static void __lambda_95(void *data, object clo, int argc, object *args) ;/*object self_734290, object r_733157*/
static void __lambda_96(void *data, object clo, int argc, object *args) ;/*object self_734291, object r_733154*/
static void __lambda_97(void *data, object clo, int argc, object *args) ;/*object self_734292, object r_733143*/
static void __lambda_98(void *data, object clo, int argc, object *args) ;/*object self_734293, object r_733149*/
static void __lambda_99(void *data, object clo, int argc, object *args) ;/*object self_734294, object r_733150*/
static void __lambda_100(void *data, object clo, int argc, object *args) ;/*object self_734295, object r_733146*/
static void __lambda_101(void *data, object clo, int argc, object *args) ;/*object self_734296, object r_733144*/
static void __lambda_102(void *data, object clo, int argc, object *args) ;/*object self_734297, object r_733141*/
static void __lambda_103(void *data, object clo, int argc, object *args) ;/*object self_734298, object r_733139*/
static void __lambda_82(void *data, object clo, int argc, object *args) ;/*object self_734299, object k_733163*/
static void __lambda_83(void *data, object clo, int argc, object *args) ;/*object self_734300, object r_733181*/
static void __lambda_84(void *data, object clo, int argc, object *args) ;/*object self_734301, object r_733189*/
static void __lambda_85(void *data, object clo, int argc, object *args) ;/*object self_734302, object r_733190*/
static void __lambda_86(void *data, object clo, int argc, object *args) ;/*object self_734303, object r_733186*/
static void __lambda_87(void *data, object clo, int argc, object *args) ;/*object self_734304, object r_733184*/
static void __lambda_88(void *data, object clo, int argc, object *args) ;/*object self_734305, object r_733182*/
static void __lambda_89(void *data, object clo, int argc, object *args) ;/*object self_734306, object r_733180*/
static void __lambda_53(void *data, object clo, int argc, object *args) ;/*closure _,object k_733019, object elt_123_7363_732254, object v_7364_732255, object maybe_91start_87end_7365_732256_raw, ...*/
static void __lambda_79(void *data, object clo, int argc, object *args) ;/*object self_734229, object k_733045*/
static void __lambda_54(void *data, object clo, int argc, object *args) ;/*object self_734230, object r_733020*/
static void __lambda_56(void *data, object clo, int argc, object *args) ;/*object self_734231, object k_733022, object start_7366_732257, object end_7367_732258*/
static void __lambda_57(void *data, object clo, int argc, object *args) ;/*object self_734232, object r_733024*/
static void __lambda_58(void *data, object clo, int argc, object *args) ;/*object self_734233, object j_7369_732259, object vj_7370_732260*/
static void __lambda_59(void *data, object clo, int argc, object *args) ;/*object self_734234, object skip_7371_732261*/
static void __lambda_770(void *data, object clo, int argc, object *args) ;/*object self_734235, object skip_7371_732261*/
static void __lambda_62(void *data, object clo, int argc, object *args) ;/*object self_734236, object k_733027, object j_7372_732262, object vj_7373_732263*/
static void __lambda_63(void *data, object clo, int argc, object *args) ;/*object self_734237, object vj_871_7375_732265*/
static void __lambda_64(void *data, object clo, int argc, object *args) ;/*object self_734238, object r_733031*/
static void __lambda_65(void *data, object clo, int argc, object *args) ;/*object self_734239, object j_7377_732266, object vj_7378_732267, object k_7379_732268*/
static void __lambda_66(void *data, object clo, int argc, object *args) ;/*object self_734240, object lp2_7380_732269*/
static void __lambda_769(void *data, object clo, int argc, object *args) ;/*object self_734241, object lp2_7380_732269*/
static void __lambda_69(void *data, object clo, int argc, object *args) ;/*object self_734242, object k_733035, object j_7381_732270, object vj_7382_732271, object k_7383_732272*/
static void __lambda_70(void *data, object clo, int argc, object *args) ;/*object self_734243, object k_7385_732273*/
static void __lambda_71(void *data, object clo, int argc, object *args) ;/*object self_734244, object lp3_7386_732274*/
static void __lambda_768(void *data, object clo, int argc, object *args) ;/*object self_734245, object lp3_7386_732274*/
static void __lambda_74(void *data, object clo, int argc, object *args) ;/*object self_734246, object k_733038, object k_7387_732275*/
static void __lambda_75(void *data, object clo, int argc, object *args) ;/*object self_734247, object r_733040*/
static void __lambda_76(void *data, object clo, int argc, object *args) ;/*object self_734248, object vk_7388_732276, object k_871_7389_732277*/
static void __lambda_77(void *data, object clo, int argc, object *args) ;/*object self_734249, object r_733042*/
static void __lambda_78(void *data, object clo, int argc, object *args) ;/*object self_734250, object r_733044*/
static void __lambda_72(void *data, object clo, int argc, object *args) ;/*object self_734251, object r_733037*/
static void __lambda_73(void *data, object clo, int argc, object *args) ;/*object self_734252, object r_733036*/
static void __lambda_67(void *data, object clo, int argc, object *args) ;/*object self_734253, object r_733034*/
static void __lambda_68(void *data, object clo, int argc, object *args) ;/*object self_734254, object r_733033*/
static void __lambda_60(void *data, object clo, int argc, object *args) ;/*object self_734255, object r_733026*/
static void __lambda_61(void *data, object clo, int argc, object *args) ;/*object self_734256, object r_733025*/
static void __lambda_55(void *data, object clo, int argc, object *args) ;/*object self_734257, object r_733021*/
static void __lambda_37(void *data, object clo, int argc, object *args) ;/*closure _,object k_732998, object elt_123_7340_732237, object v_7341_732238, object maybe_91start_87end_7342_732239_raw, ...*/
static void __lambda_52(void *data, object clo, int argc, object *args) ;/*object self_734213, object k_733016*/
static void __lambda_38(void *data, object clo, int argc, object *args) ;/*object self_734214, object r_732999*/
static void __lambda_40(void *data, object clo, int argc, object *args) ;/*object self_734215, object k_733001, object start_7343_732240, object end_7344_732241*/
static void __lambda_41(void *data, object clo, int argc, object *args) ;/*object self_734216, object x_7347_732242*/
static void __lambda_42(void *data, object clo, int argc, object *args) ;/*object self_734217, object x_7353_732244, object i_7354_732245*/
static void __lambda_43(void *data, object clo, int argc, object *args) ;/*object self_734218, object recur_7356_732247*/
static void __lambda_767(void *data, object clo, int argc, object *args) ;/*object self_734219, object recur_7356_732247*/
static void __lambda_48(void *data, object clo, int argc, object *args) ;/*object self_734220, object k_733008, object x_7357_732248, object i_7358_732249, object j_7359_732250*/
static void __lambda_49(void *data, object clo, int argc, object *args) ;/*object self_734221, object r_733012*/
static void __lambda_50(void *data, object clo, int argc, object *args) ;/*object self_734222, object ansvec_7362_732253*/
static void __lambda_51(void *data, object clo, int argc, object *args) ;/*object self_734223, object r_733014*/
static void __lambda_44(void *data, object clo, int argc, object *args) ;/*object self_734224, object r_733007*/
static void __lambda_45(void *data, object clo, int argc, object *args) ;/*object self_734225, object r_733006*/
static void __lambda_46(void *data, object clo, int argc, object *args) ;/*object self_734226, object ans_7350_732243*/
static void __lambda_47(void *data, object clo, int argc, object *args) ;/*object self_734227, object r_733005*/
static void __lambda_39(void *data, object clo, int argc, object *args) ;/*object self_734228, object r_733000*/
static void __lambda_13(void *data, object clo, int argc, object *args) ;/*closure _,object k_732975, object _123_7322_732221, object lis_7323_732222*/
static void __lambda_36(void *data, object clo, int argc, object *args) ;/*object self_734188, object r_732976*/
static void __lambda_14(void *data, object clo, int argc, object *args) ;/*object self_734189, object k_732977*/
static void __lambda_15(void *data, object clo, int argc, object *args) ;/*object self_734190, object r_732979*/
static void __lambda_16(void *data, object clo, int argc, object *args) ;/*object self_734191, object r_732980*/
static void __lambda_17(void *data, object clo, int argc, object *args) ;/*object self_734192, object prev_7325_732223, object prev_91elt_7326_732224, object lis_7327_732225*/
static void __lambda_18(void *data, object clo, int argc, object *args) ;/*object self_734193, object lp1_7328_732226*/
static void __lambda_766(void *data, object clo, int argc, object *args) ;/*object self_734194, object lp1_7328_732226*/
static void __lambda_21(void *data, object clo, int argc, object *args) ;/*object self_734195, object k_732983, object prev_7329_732227, object prev_91elt_7330_732228, object lis_7331_732229*/
static void __lambda_22(void *data, object clo, int argc, object *args) ;/*object self_734196, object r_732985*/
static void __lambda_23(void *data, object clo, int argc, object *args) ;/*object self_734197, object r_732986*/
static void __lambda_24(void *data, object clo, int argc, object *args) ;/*object self_734198, object lis_91elt_7332_732230, object next_7333_732231*/
static void __lambda_25(void *data, object clo, int argc, object *args) ;/*object self_734199, object r_732987*/
static void __lambda_26(void *data, object clo, int argc, object *args) ;/*object self_734200, object lis_7335_732232*/
static void __lambda_27(void *data, object clo, int argc, object *args) ;/*object self_734201, object lp2_7336_732233*/
static void __lambda_765(void *data, object clo, int argc, object *args) ;/*object self_734202, object lp2_7336_732233*/
static void __lambda_30(void *data, object clo, int argc, object *args) ;/*object self_734203, object k_732990, object lis_7337_732234*/
static void __lambda_31(void *data, object clo, int argc, object *args) ;/*object self_734204, object r_732992*/
static void __lambda_32(void *data, object clo, int argc, object *args) ;/*object self_734205, object r_732993*/
static void __lambda_33(void *data, object clo, int argc, object *args) ;/*object self_734206, object lis_91elt_7338_732235, object next_7339_732236*/
static void __lambda_34(void *data, object clo, int argc, object *args) ;/*object self_734207, object r_732994*/
static void __lambda_35(void *data, object clo, int argc, object *args) ;/*object self_734208, object r_732995*/
static void __lambda_28(void *data, object clo, int argc, object *args) ;/*object self_734209, object r_732989*/
static void __lambda_29(void *data, object clo, int argc, object *args) ;/*object self_734210, object r_732988*/
static void __lambda_19(void *data, object clo, int argc, object *args) ;/*object self_734211, object r_732982*/
static void __lambda_20(void *data, object clo, int argc, object *args) ;/*object self_734212, object r_732981*/
static void __lambda_1(void *data, object clo, int argc, object *args) ;/*closure _,object k_732958, object _123_731_732208, object lis_732_732209*/
static void __lambda_2(void *data, object clo, int argc, object *args) ;/*object self_734176, object x0_735_732210*/
static void __lambda_3(void *data, object clo, int argc, object *args) ;/*object self_734177, object xs_738_732211*/
static void __lambda_4(void *data, object clo, int argc, object *args) ;/*object self_734178, object x0_7314_732213, object xs_7315_732214*/
static void __lambda_5(void *data, object clo, int argc, object *args) ;/*object self_734179, object recur_7316_732215*/
static void __lambda_764(void *data, object clo, int argc, object *args) ;/*object self_734180, object recur_7316_732215*/
static void __lambda_9(void *data, object clo, int argc, object *args) ;/*object self_734181, object k_732966, object x0_7317_732216, object xs_7318_732217*/
static void __lambda_10(void *data, object clo, int argc, object *args) ;/*object self_734182, object x1_7319_732218, object x2_87_7320_732219*/
static void __lambda_11(void *data, object clo, int argc, object *args) ;/*object self_734183, object r_732970*/
static void __lambda_12(void *data, object clo, int argc, object *args) ;/*object self_734184, object ans_91tail_7321_732220*/
static void __lambda_6(void *data, object clo, int argc, object *args) ;/*object self_734185, object r_732965*/
static void __lambda_7(void *data, object clo, int argc, object *args) ;/*object self_734186, object r_732964*/
static void __lambda_8(void *data, object clo, int argc, object *args) ;/*object self_734187, object ans_7311_732212*/

static void __lambda_756(void *data, object _, int argc, object *args) /* closure _,object k_734163 */
 {
object k_734163 = args[0];
  Cyc_st_add(data, "srfi/132.sld:lib-init:srfi132");

closureN_type c_7311691;
object e_7311733 [1];
c_7311691.hdr.mark = gc_color_red;
 c_7311691.hdr.grayed = 0;
c_7311691.tag = closureN_tag;
 c_7311691.fn = (function_type)__lambda_757;
c_7311691.num_args = 1;
c_7311691.num_elements = 1;
c_7311691.elements = (object *)e_7311733;
c_7311691.elements[0] = k_734163;


object c_7311736 = global_set_cps_id(data,(closure)&c_7311691,"__glo_vector_91select_67_srfi_132", __glo_vector_91select_67_srfi_132, __glo_vector_91select_srfi_132);
return_closcall1(data,(closure)&c_7311691,  c_7311736);; 
}

static void __lambda_757(void *data, object self_734946, int argc, object *args) /* object self_734946, object r_734165 */
 {

  
closureN_type c_7311693;
object e_7311729 [1];
c_7311693.hdr.mark = gc_color_red;
 c_7311693.hdr.grayed = 0;
c_7311693.tag = closureN_tag;
 c_7311693.fn = (function_type)__lambda_758;
c_7311693.num_args = 1;
c_7311693.num_elements = 1;
c_7311693.elements = (object *)e_7311729;
c_7311693.elements[0] = ((closureN)self_734946)->elements[0];


object c_7311732 = global_set_cps_id(data,(closure)&c_7311693,"__glo_list_91sort_67_srfi_132", __glo_list_91sort_67_srfi_132, __glo_list_91merge_91sort_67_srfi_132);
return_closcall1(data,(closure)&c_7311693,  c_7311732);; 
}

static void __lambda_758(void *data, object self_734947, int argc, object *args) /* object self_734947, object r_734166 */
 {

  
closureN_type c_7311695;
object e_7311725 [1];
c_7311695.hdr.mark = gc_color_red;
 c_7311695.hdr.grayed = 0;
c_7311695.tag = closureN_tag;
 c_7311695.fn = (function_type)__lambda_759;
c_7311695.num_args = 1;
c_7311695.num_elements = 1;
c_7311695.elements = (object *)e_7311725;
c_7311695.elements[0] = ((closureN)self_734947)->elements[0];


object c_7311728 = global_set_cps_id(data,(closure)&c_7311695,"__glo_list_91stable_91sort_srfi_132", __glo_list_91stable_91sort_srfi_132, __glo_list_91merge_91sort_srfi_132);
return_closcall1(data,(closure)&c_7311695,  c_7311728);; 
}

static void __lambda_759(void *data, object self_734948, int argc, object *args) /* object self_734948, object r_734167 */
 {

  
closureN_type c_7311697;
object e_7311721 [1];
c_7311697.hdr.mark = gc_color_red;
 c_7311697.hdr.grayed = 0;
c_7311697.tag = closureN_tag;
 c_7311697.fn = (function_type)__lambda_760;
c_7311697.num_args = 1;
c_7311697.num_elements = 1;
c_7311697.elements = (object *)e_7311721;
c_7311697.elements[0] = ((closureN)self_734948)->elements[0];


object c_7311724 = global_set_cps_id(data,(closure)&c_7311697,"__glo_list_91stable_91sort_67_srfi_132", __glo_list_91stable_91sort_67_srfi_132, __glo_list_91merge_91sort_67_srfi_132);
return_closcall1(data,(closure)&c_7311697,  c_7311724);; 
}

static void __lambda_760(void *data, object self_734949, int argc, object *args) /* object self_734949, object r_734168 */
 {

  
closureN_type c_7311699;
object e_7311717 [1];
c_7311699.hdr.mark = gc_color_red;
 c_7311699.hdr.grayed = 0;
c_7311699.tag = closureN_tag;
 c_7311699.fn = (function_type)__lambda_761;
c_7311699.num_args = 1;
c_7311699.num_elements = 1;
c_7311699.elements = (object *)e_7311717;
c_7311699.elements[0] = ((closureN)self_734949)->elements[0];


object c_7311720 = global_set_cps_id(data,(closure)&c_7311699,"__glo_vector_91sort_srfi_132", __glo_vector_91sort_srfi_132, __glo_vector_91quick_91sort_srfi_132);
return_closcall1(data,(closure)&c_7311699,  c_7311720);; 
}

static void __lambda_761(void *data, object self_734950, int argc, object *args) /* object self_734950, object r_734169 */
 {

  
closureN_type c_7311701;
object e_7311713 [1];
c_7311701.hdr.mark = gc_color_red;
 c_7311701.hdr.grayed = 0;
c_7311701.tag = closureN_tag;
 c_7311701.fn = (function_type)__lambda_762;
c_7311701.num_args = 1;
c_7311701.num_elements = 1;
c_7311701.elements = (object *)e_7311713;
c_7311701.elements[0] = ((closureN)self_734950)->elements[0];


object c_7311716 = global_set_cps_id(data,(closure)&c_7311701,"__glo_vector_91sort_67_srfi_132", __glo_vector_91sort_67_srfi_132, __glo_vector_91quick_91sort_67_srfi_132);
return_closcall1(data,(closure)&c_7311701,  c_7311716);; 
}

static void __lambda_762(void *data, object self_734951, int argc, object *args) /* object self_734951, object r_734170 */
 {

  
closureN_type c_7311703;
object e_7311709 [1];
c_7311703.hdr.mark = gc_color_red;
 c_7311703.hdr.grayed = 0;
c_7311703.tag = closureN_tag;
 c_7311703.fn = (function_type)__lambda_763;
c_7311703.num_args = 1;
c_7311703.num_elements = 1;
c_7311703.elements = (object *)e_7311709;
c_7311703.elements[0] = ((closureN)self_734951)->elements[0];


object c_7311712 = global_set_cps_id(data,(closure)&c_7311703,"__glo_vector_91stable_91sort_srfi_132", __glo_vector_91stable_91sort_srfi_132, __glo_vector_91merge_91sort_srfi_132);
return_closcall1(data,(closure)&c_7311703,  c_7311712);; 
}

static void __lambda_763(void *data, object self_734952, int argc, object *args) /* object self_734952, object r_734171 */
 {

  
object c_7311708 = global_set_cps_id(data,  ((closureN)self_734952)->elements[0],"__glo_vector_91stable_91sort_67_srfi_132", __glo_vector_91stable_91sort_67_srfi_132, __glo_vector_91merge_91sort_67_srfi_132);
return_direct_with_clo1(data,  ((closureN)self_734952)->elements[0], (((closure)  ((closureN)self_734952)->elements[0])->fn),  c_7311708);; 
}

static void __lambda_753(void *data, object _, int argc, object *args) /* closure _,object k_734144, object _121_732205_732953, object l_732206_732954 */
 {
object k_734144 = args[0]; object _121_732205_732953 = args[1]; object l_732206_732954 = args[2];
  Cyc_st_add(data, "srfi/132.sld:list-sort");

closureN_type c_7311677;
object e_7311685 [2];
c_7311677.hdr.mark = gc_color_red;
 c_7311677.hdr.grayed = 0;
c_7311677.tag = closureN_tag;
 c_7311677.fn = (function_type)__lambda_754;
c_7311677.num_args = 1;
c_7311677.num_elements = 2;
c_7311677.elements = (object *)e_7311685;
c_7311677.elements[0] = _121_732205_732953;
c_7311677.elements[1] = k_734144;


object c_7311688 = Cyc_list2vector(data,(closure)&c_7311677,l_732206_732954);
return_closcall1(data,(closure)&c_7311677,  c_7311688);; 
}

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

return_direct_with_clo3(data,  __glo_vector_91heap_91sort_67_srfi_132, (((closure)  __glo_vector_91heap_91sort_67_srfi_132)->fn),  &c_7311679, ((closureN)self_734944)->elements[0], v_732207_732955);; 
}

static void __lambda_755(void *data, object self_734945, int argc, object *args) /* object self_734945, object r_734146 */
 {

  return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  ((closureN)self_734945)->elements[0], ((closureN)self_734945)->elements[1]);; 
}

static void __lambda_752(void *data, object _, int argc, object *args) /* closure _,object k_734140, object val_732204_732952 */
 {
object k_734140 = args[0]; object val_732204_732952 = args[1];
  Cyc_st_add(data, "srfi/132.sld:assert");
if( (boolean_f != val_732204_732952) ){ 
  return_direct_with_clo1(data,  k_734140, (((closure)  k_734140)->fn),  Cyc_VOID);
} else { 
  return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_734140, quote_assert, val_732204_732952);}
;; 
}

static void __lambda_749(void *data, object _, int argc, object *args) /* closure _,object k_734129, object _121_127_732190_732945, object pivot_732191_732946, object dst_732192_732947, object at_732193_732948, object src_732194_732949, object start_732195_732950, object end_732196_732951 */
 {
object k_734129 = args[0]; object _121_127_732190_732945 = args[1]; object pivot_732191_732946 = args[2]; object dst_732192_732947 = args[3]; object at_732193_732948 = args[4]; object src_732194_732949 = args[5]; object start_732195_732950 = args[6]; object end_732196_732951 = args[7];
  Cyc_st_add(data, "srfi/132.sld:copy-bigger!");
  
if( (boolean_f != Cyc_num_fast_eq_op(data, start_732195_732950, end_732196_732951)) ){ 
  return_direct_with_clo1(data,  k_734129, (((closure)  k_734129)->fn),  dst_732192_732947);
} else { 
  
closureN_type c_7311629;
object e_7311669 [8];
c_7311629.hdr.mark = gc_color_red;
 c_7311629.hdr.grayed = 0;
c_7311629.tag = closureN_tag;
 c_7311629.fn = (function_type)__lambda_750;
c_7311629.num_args = 1;
c_7311629.num_elements = 8;
c_7311629.elements = (object *)e_7311669;
c_7311629.elements[0] = _121_127_732190_732945;
c_7311629.elements[1] = at_732193_732948;
c_7311629.elements[2] = dst_732192_732947;
c_7311629.elements[3] = end_732196_732951;
c_7311629.elements[4] = k_734129;
c_7311629.elements[5] = pivot_732191_732946;
c_7311629.elements[6] = src_732194_732949;
c_7311629.elements[7] = start_732195_732950;



return_closcall3(data,  _121_127_732190_732945,  &c_7311629, pivot_732191_732946, Cyc_vector_ref(data, src_732194_732949, start_732195_732950));}
;; 
}

static void __lambda_750(void *data, object self_734942, int argc, object *args) /* object self_734942, object r_734131 */
 {
 object r_734131 = args[0];
  if( (boolean_f != r_734131) ){ 
  
closureN_type c_7311631;
object e_7311647 [8];
c_7311631.hdr.mark = gc_color_red;
 c_7311631.hdr.grayed = 0;
c_7311631.tag = closureN_tag;
 c_7311631.fn = (function_type)__lambda_751;
c_7311631.num_args = 1;
c_7311631.num_elements = 8;
c_7311631.elements = (object *)e_7311647;
c_7311631.elements[0] = ((closureN)self_734942)->elements[0];
c_7311631.elements[1] = ((closureN)self_734942)->elements[1];
c_7311631.elements[2] = ((closureN)self_734942)->elements[2];
c_7311631.elements[3] = ((closureN)self_734942)->elements[3];
c_7311631.elements[4] = ((closureN)self_734942)->elements[4];
c_7311631.elements[5] = ((closureN)self_734942)->elements[5];
c_7311631.elements[6] = ((closureN)self_734942)->elements[6];
c_7311631.elements[7] = ((closureN)self_734942)->elements[7];




object c_7311650 = Cyc_vector_set_cps(data,(closure)&c_7311631,((closureN)self_734942)->elements[2], ((closureN)self_734942)->elements[1], Cyc_vector_ref(data, ((closureN)self_734942)->elements[6], ((closureN)self_734942)->elements[7]));
return_closcall1(data,(closure)&c_7311631,  c_7311650);
} else { 
  
complex_num_type local_7311666; 
return_direct_with_clo8(data,  __glo_copy_91bigger_67_srfi_132, (((closure)  __glo_copy_91bigger_67_srfi_132)->fn),  ((closureN)self_734942)->elements[4], ((closureN)self_734942)->elements[0], ((closureN)self_734942)->elements[5], ((closureN)self_734942)->elements[2], ((closureN)self_734942)->elements[1], ((closureN)self_734942)->elements[6], Cyc_fast_sum(data,&local_7311666, ((closureN)self_734942)->elements[7], obj_int2obj(1)), ((closureN)self_734942)->elements[3]);}
;; 
}

static void __lambda_751(void *data, object self_734943, int argc, object *args) /* object self_734943, object r_734132 */
 {

  
complex_num_type local_7311639; 

complex_num_type local_7311644; 
return_direct_with_clo8(data,  __glo_copy_91bigger_67_srfi_132, (((closure)  __glo_copy_91bigger_67_srfi_132)->fn),  ((closureN)self_734943)->elements[4], ((closureN)self_734943)->elements[0], ((closureN)self_734943)->elements[5], ((closureN)self_734943)->elements[2], Cyc_fast_sum(data,&local_7311639, ((closureN)self_734943)->elements[1], obj_int2obj(1)), ((closureN)self_734943)->elements[6], Cyc_fast_sum(data,&local_7311644, ((closureN)self_734943)->elements[7], obj_int2obj(1)), ((closureN)self_734943)->elements[3]);; 
}

static void __lambda_746(void *data, object _, int argc, object *args) /* closure _,object k_734118, object _121_127_732176_732938, object pivot_732177_732939, object dst_732178_732940, object at_732179_732941, object src_732180_732942, object start_732181_732943, object end_732182_732944 */
 {
object k_734118 = args[0]; object _121_127_732176_732938 = args[1]; object pivot_732177_732939 = args[2]; object dst_732178_732940 = args[3]; object at_732179_732941 = args[4]; object src_732180_732942 = args[5]; object start_732181_732943 = args[6]; object end_732182_732944 = args[7];
  Cyc_st_add(data, "srfi/132.sld:copy-smaller!");
  
if( (boolean_f != Cyc_num_fast_eq_op(data, start_732181_732943, end_732182_732944)) ){ 
  return_direct_with_clo1(data,  k_734118, (((closure)  k_734118)->fn),  dst_732178_732940);
} else { 
  
closureN_type c_7311581;
object e_7311621 [8];
c_7311581.hdr.mark = gc_color_red;
 c_7311581.hdr.grayed = 0;
c_7311581.tag = closureN_tag;
 c_7311581.fn = (function_type)__lambda_747;
c_7311581.num_args = 1;
c_7311581.num_elements = 8;
c_7311581.elements = (object *)e_7311621;
c_7311581.elements[0] = _121_127_732176_732938;
c_7311581.elements[1] = at_732179_732941;
c_7311581.elements[2] = dst_732178_732940;
c_7311581.elements[3] = end_732182_732944;
c_7311581.elements[4] = k_734118;
c_7311581.elements[5] = pivot_732177_732939;
c_7311581.elements[6] = src_732180_732942;
c_7311581.elements[7] = start_732181_732943;



return_closcall3(data,  _121_127_732176_732938,  &c_7311581, Cyc_vector_ref(data, src_732180_732942, start_732181_732943), pivot_732177_732939);}
;; 
}

static void __lambda_747(void *data, object self_734940, int argc, object *args) /* object self_734940, object r_734120 */
 {
 object r_734120 = args[0];
  if( (boolean_f != r_734120) ){ 
  
closureN_type c_7311583;
object e_7311599 [8];
c_7311583.hdr.mark = gc_color_red;
 c_7311583.hdr.grayed = 0;
c_7311583.tag = closureN_tag;
 c_7311583.fn = (function_type)__lambda_748;
c_7311583.num_args = 1;
c_7311583.num_elements = 8;
c_7311583.elements = (object *)e_7311599;
c_7311583.elements[0] = ((closureN)self_734940)->elements[0];
c_7311583.elements[1] = ((closureN)self_734940)->elements[1];
c_7311583.elements[2] = ((closureN)self_734940)->elements[2];
c_7311583.elements[3] = ((closureN)self_734940)->elements[3];
c_7311583.elements[4] = ((closureN)self_734940)->elements[4];
c_7311583.elements[5] = ((closureN)self_734940)->elements[5];
c_7311583.elements[6] = ((closureN)self_734940)->elements[6];
c_7311583.elements[7] = ((closureN)self_734940)->elements[7];




object c_7311602 = Cyc_vector_set_cps(data,(closure)&c_7311583,((closureN)self_734940)->elements[2], ((closureN)self_734940)->elements[1], Cyc_vector_ref(data, ((closureN)self_734940)->elements[6], ((closureN)self_734940)->elements[7]));
return_closcall1(data,(closure)&c_7311583,  c_7311602);
} else { 
  
complex_num_type local_7311618; 
return_direct_with_clo8(data,  __glo_copy_91smaller_67_srfi_132, (((closure)  __glo_copy_91smaller_67_srfi_132)->fn),  ((closureN)self_734940)->elements[4], ((closureN)self_734940)->elements[0], ((closureN)self_734940)->elements[5], ((closureN)self_734940)->elements[2], ((closureN)self_734940)->elements[1], ((closureN)self_734940)->elements[6], Cyc_fast_sum(data,&local_7311618, ((closureN)self_734940)->elements[7], obj_int2obj(1)), ((closureN)self_734940)->elements[3]);}
;; 
}

static void __lambda_748(void *data, object self_734941, int argc, object *args) /* object self_734941, object r_734121 */
 {

  
complex_num_type local_7311591; 

complex_num_type local_7311596; 
return_direct_with_clo8(data,  __glo_copy_91smaller_67_srfi_132, (((closure)  __glo_copy_91smaller_67_srfi_132)->fn),  ((closureN)self_734941)->elements[4], ((closureN)self_734941)->elements[0], ((closureN)self_734941)->elements[5], ((closureN)self_734941)->elements[2], Cyc_fast_sum(data,&local_7311591, ((closureN)self_734941)->elements[1], obj_int2obj(1)), ((closureN)self_734941)->elements[6], Cyc_fast_sum(data,&local_7311596, ((closureN)self_734941)->elements[7], obj_int2obj(1)), ((closureN)self_734941)->elements[3]);; 
}

static void __lambda_743(void *data, object _, int argc, object *args) /* closure _,object k_734105, object _121_127_732159_732931, object pivot_732160_732932, object v_732161_732933, object i_732162_732934, object end_732163_732935, object count_732164_732936, object count2_732165_732937 */
 {
object k_734105 = args[0]; object _121_127_732159_732931 = args[1]; object pivot_732160_732932 = args[2]; object v_732161_732933 = args[3]; object i_732162_732934 = args[4]; object end_732163_732935 = args[5]; object count_732164_732936 = args[6]; object count2_732165_732937 = args[7];
  Cyc_st_add(data, "srfi/132.sld:count-smaller");
  
if( (boolean_f != Cyc_num_fast_eq_op(data, i_732162_732934, end_732163_732935)) ){ 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_734105, count_732164_732936, count2_732165_732937);
} else { 
  
closureN_type c_7311521;
object e_7311573 [8];
c_7311521.hdr.mark = gc_color_red;
 c_7311521.hdr.grayed = 0;
c_7311521.tag = closureN_tag;
 c_7311521.fn = (function_type)__lambda_744;
c_7311521.num_args = 1;
c_7311521.num_elements = 8;
c_7311521.elements = (object *)e_7311573;
c_7311521.elements[0] = _121_127_732159_732931;
c_7311521.elements[1] = count_732164_732936;
c_7311521.elements[2] = count2_732165_732937;
c_7311521.elements[3] = end_732163_732935;
c_7311521.elements[4] = i_732162_732934;
c_7311521.elements[5] = k_734105;
c_7311521.elements[6] = pivot_732160_732932;
c_7311521.elements[7] = v_732161_732933;



return_closcall3(data,  _121_127_732159_732931,  &c_7311521, Cyc_vector_ref(data, v_732161_732933, i_732162_732934), pivot_732160_732932);}
;; 
}

static void __lambda_744(void *data, object self_734938, int argc, object *args) /* object self_734938, object r_734107 */
 {
 object r_734107 = args[0];
  if( (boolean_f != r_734107) ){ 
  
complex_num_type local_7311529; 

complex_num_type local_7311534; 
return_direct_with_clo8(data,  __glo_count_91smaller_srfi_132, (((closure)  __glo_count_91smaller_srfi_132)->fn),  ((closureN)self_734938)->elements[5], ((closureN)self_734938)->elements[0], ((closureN)self_734938)->elements[6], ((closureN)self_734938)->elements[7], Cyc_fast_sum(data,&local_7311529, ((closureN)self_734938)->elements[4], obj_int2obj(1)), ((closureN)self_734938)->elements[3], Cyc_fast_sum(data,&local_7311534, ((closureN)self_734938)->elements[1], obj_int2obj(1)), ((closureN)self_734938)->elements[2]);
} else { 
  
closureN_type c_7311539;
object e_7311567 [8];
c_7311539.hdr.mark = gc_color_red;
 c_7311539.hdr.grayed = 0;
c_7311539.tag = closureN_tag;
 c_7311539.fn = (function_type)__lambda_745;
c_7311539.num_args = 1;
c_7311539.num_elements = 8;
c_7311539.elements = (object *)e_7311567;
c_7311539.elements[0] = ((closureN)self_734938)->elements[0];
c_7311539.elements[1] = ((closureN)self_734938)->elements[1];
c_7311539.elements[2] = ((closureN)self_734938)->elements[2];
c_7311539.elements[3] = ((closureN)self_734938)->elements[3];
c_7311539.elements[4] = ((closureN)self_734938)->elements[4];
c_7311539.elements[5] = ((closureN)self_734938)->elements[5];
c_7311539.elements[6] = ((closureN)self_734938)->elements[6];
c_7311539.elements[7] = ((closureN)self_734938)->elements[7];



return_closcall3(data,  ((closureN)self_734938)->elements[0],  &c_7311539, ((closureN)self_734938)->elements[6], Cyc_vector_ref(data, ((closureN)self_734938)->elements[7], ((closureN)self_734938)->elements[4]));}
;; 
}

static void __lambda_745(void *data, object self_734939, int argc, object *args) /* object self_734939, object r_734110 */
 {
 object r_734110 = args[0];
  if( (boolean_f != r_734110) ){ 
  
complex_num_type local_7311547; 
return_direct_with_clo8(data,  __glo_count_91smaller_srfi_132, (((closure)  __glo_count_91smaller_srfi_132)->fn),  ((closureN)self_734939)->elements[5], ((closureN)self_734939)->elements[0], ((closureN)self_734939)->elements[6], ((closureN)self_734939)->elements[7], Cyc_fast_sum(data,&local_7311547, ((closureN)self_734939)->elements[4], obj_int2obj(1)), ((closureN)self_734939)->elements[3], ((closureN)self_734939)->elements[1], ((closureN)self_734939)->elements[2]);
} else { 
  
complex_num_type local_7311559; 

complex_num_type local_7311565; 
return_direct_with_clo8(data,  __glo_count_91smaller_srfi_132, (((closure)  __glo_count_91smaller_srfi_132)->fn),  ((closureN)self_734939)->elements[5], ((closureN)self_734939)->elements[0], ((closureN)self_734939)->elements[6], ((closureN)self_734939)->elements[7], Cyc_fast_sum(data,&local_7311559, ((closureN)self_734939)->elements[4], obj_int2obj(1)), ((closureN)self_734939)->elements[3], ((closureN)self_734939)->elements[1], Cyc_fast_sum(data,&local_7311565, ((closureN)self_734939)->elements[2], obj_int2obj(1)));}
;; 
}

static void __lambda_725(void *data, object _, int argc, object *args) /* closure _,object k_734063, object _121_127_732103_732913, object v_732104_732914, object k_732105_732915, object start_732106_732916, object end_732107_732917 */
 {
object k_734063 = args[0]; object _121_127_732103_732913 = args[1]; object v_732104_732914 = args[2]; object k_732105_732915 = args[3]; object start_732106_732916 = args[4]; object end_732107_732917 = args[5];
  Cyc_st_add(data, "srfi/132.sld:%%vector-select2");
  
  complex_num_type local_7311291; 
if( (boolean_f != Cyc_num_fast_eq_op(data, obj_int2obj(2), Cyc_fast_sub(data,&local_7311291, end_732107_732917, start_732106_732916))) ){ 
  
closureN_type c_7311293;
object e_7311320 [3];
c_7311293.hdr.mark = gc_color_red;
 c_7311293.hdr.grayed = 0;
c_7311293.tag = closureN_tag;
 c_7311293.fn = (function_type)__lambda_726;
c_7311293.num_args = 1;
c_7311293.num_elements = 3;
c_7311293.elements = (object *)e_7311320;
c_7311293.elements[0] = k_734063;
c_7311293.elements[1] = start_732106_732916;
c_7311293.elements[2] = v_732104_732914;






complex_num_type local_7311327; 
return_closcall3(data,  _121_127_732103_732913,  &c_7311293, Cyc_vector_ref(data, v_732104_732914, start_732106_732916), Cyc_vector_ref(data, v_732104_732914, Cyc_fast_sum(data,&local_7311327, start_732106_732916, obj_int2obj(1))));
} else { 
    
  complex_num_type local_7311332; 
if( (boolean_f != Cyc_num_fast_lt_op(data, Cyc_fast_sub(data,&local_7311332, end_732107_732917, start_732106_732916), __glo_just_91sort_91it_91threshold_srfi_132)) ){ 
  
closureN_type c_7311334;
object e_7311350 [3];
c_7311334.hdr.mark = gc_color_red;
 c_7311334.hdr.grayed = 0;
c_7311334.tag = closureN_tag;
 c_7311334.fn = (function_type)__lambda_727;
c_7311334.num_args = 1;
c_7311334.num_elements = 3;
c_7311334.elements = (object *)e_7311350;
c_7311334.elements[0] = _121_127_732103_732913;
c_7311334.elements[1] = k_732105_732915;
c_7311334.elements[2] = k_734063;

return_direct_with_clo4(data,  __glo_vector_91copy_scheme_base, (((closure)  __glo_vector_91copy_scheme_base)->fn),  &c_7311334, v_732104_732914, start_732106_732916, end_732107_732917);
} else { 
  
closureN_type c_7311352;
object e_7311512 [6];
c_7311352.hdr.mark = gc_color_red;
 c_7311352.hdr.grayed = 0;
c_7311352.tag = closureN_tag;
 c_7311352.fn = (function_type)__lambda_729;
c_7311352.num_args = 1;
c_7311352.num_elements = 6;
c_7311352.elements = (object *)e_7311512;
c_7311352.elements[0] = _121_127_732103_732913;
c_7311352.elements[1] = end_732107_732917;
c_7311352.elements[2] = k_732105_732915;
c_7311352.elements[3] = k_734063;
c_7311352.elements[4] = start_732106_732916;
c_7311352.elements[5] = v_732104_732914;


complex_num_type local_7311515; 
return_direct_with_clo2(data,  __glo_random_91integer_srfi_27, (((closure)  __glo_random_91integer_srfi_27)->fn),  &c_7311352, Cyc_fast_sub(data,&local_7311515, end_732107_732917, start_732106_732916));}
;}
;; 
}

static void __lambda_729(void *data, object self_734924, int argc, object *args) /* object self_734924, object ip_732125_732922 */
 {
 object ip_732125_732922 = args[0];
  
closureN_type c_7311354;
object e_7311504 [6];
c_7311354.hdr.mark = gc_color_red;
 c_7311354.hdr.grayed = 0;
c_7311354.tag = closureN_tag;
 c_7311354.fn = (function_type)__lambda_730;
c_7311354.num_args = 1;
c_7311354.num_elements = 6;
c_7311354.elements = (object *)e_7311504;
c_7311354.elements[0] = ((closureN)self_734924)->elements[0];
c_7311354.elements[1] = ((closureN)self_734924)->elements[1];
c_7311354.elements[2] = ((closureN)self_734924)->elements[2];
c_7311354.elements[3] = ((closureN)self_734924)->elements[3];
c_7311354.elements[4] = ((closureN)self_734924)->elements[4];
c_7311354.elements[5] = ((closureN)self_734924)->elements[5];




complex_num_type local_7311510; 
return_direct_with_clo1(data,(closure)&c_7311354,__lambda_730,  Cyc_vector_ref(data, ((closureN)self_734924)->elements[5], Cyc_fast_sum(data,&local_7311510, ((closureN)self_734924)->elements[4], ip_732125_732922)));; 
}

static void __lambda_730(void *data, object self_734925, int argc, object *args) /* object self_734925, object pivot_732128_732923 */
 {
 object pivot_732128_732923 = args[0];
  
closureN_type c_7311356;
object e_7311495 [7];
c_7311356.hdr.mark = gc_color_red;
 c_7311356.hdr.grayed = 0;
c_7311356.tag = closureN_tag;
 c_7311356.fn = (function_type)__lambda_731;
c_7311356.num_args = 1;
c_7311356.num_elements = 7;
c_7311356.elements = (object *)e_7311495;
c_7311356.elements[0] = ((closureN)self_734925)->elements[0];
c_7311356.elements[1] = ((closureN)self_734925)->elements[1];
c_7311356.elements[2] = ((closureN)self_734925)->elements[2];
c_7311356.elements[3] = ((closureN)self_734925)->elements[3];
c_7311356.elements[4] = pivot_732128_732923;
c_7311356.elements[5] = ((closureN)self_734925)->elements[4];
c_7311356.elements[6] = ((closureN)self_734925)->elements[5];


closureN_type c_7311496;
object e_7311503 [5];
c_7311496.hdr.mark = gc_color_red;
 c_7311496.hdr.grayed = 0;
c_7311496.tag = closureN_tag;
 c_7311496.fn = (function_type)__lambda_742;
c_7311496.num_args = 0;
c_7311496.num_elements = 5;
c_7311496.elements = (object *)e_7311503;
c_7311496.elements[0] = ((closureN)self_734925)->elements[0];
c_7311496.elements[1] = ((closureN)self_734925)->elements[1];
c_7311496.elements[2] = pivot_732128_732923;
c_7311496.elements[3] = ((closureN)self_734925)->elements[4];
c_7311496.elements[4] = ((closureN)self_734925)->elements[5];

return_direct_with_clo1(data,(closure)&c_7311356,__lambda_731,  &c_7311496);; 
}

static void __lambda_742(void *data, object self_734926, int argc, object *args) /* object self_734926, object k_734101 */
 {
 object k_734101 = args[0];
  return_direct_with_clo8(data,  __glo_count_91smaller_srfi_132, (((closure)  __glo_count_91smaller_srfi_132)->fn),  k_734101, ((closureN)self_734926)->elements[0], ((closureN)self_734926)->elements[2], ((closureN)self_734926)->elements[4], ((closureN)self_734926)->elements[3], ((closureN)self_734926)->elements[1], obj_int2obj(0), obj_int2obj(0));; 
}

static void __lambda_731(void *data, object self_734927, int argc, object *args) /* object self_734927, object r_734078 */
 {
 object r_734078 = args[0];
  
closureN_type c_7311358;
object e_7311362 [2];
c_7311358.hdr.mark = gc_color_red;
 c_7311358.hdr.grayed = 0;
c_7311358.tag = closureN_tag;
 c_7311358.fn = (function_type)__lambda_732;
c_7311358.num_args = 1;
c_7311358.num_elements = 2;
c_7311358.elements = (object *)e_7311362;
c_7311358.elements[0] = ((closureN)self_734927)->elements[3];
c_7311358.elements[1] = r_734078;


closureN_type c_7311363;
object e_7311494 [6];
c_7311363.hdr.mark = gc_color_red;
 c_7311363.hdr.grayed = 0;
c_7311363.tag = closureN_tag;
 c_7311363.fn = (function_type)__lambda_733;
c_7311363.num_args = 2;
c_7311363.num_elements = 6;
c_7311363.elements = (object *)e_7311494;
c_7311363.elements[0] = ((closureN)self_734927)->elements[0];
c_7311363.elements[1] = ((closureN)self_734927)->elements[1];
c_7311363.elements[2] = ((closureN)self_734927)->elements[2];
c_7311363.elements[3] = ((closureN)self_734927)->elements[4];
c_7311363.elements[4] = ((closureN)self_734927)->elements[5];
c_7311363.elements[5] = ((closureN)self_734927)->elements[6];

return_direct_with_clo1(data,(closure)&c_7311358,__lambda_732,  &c_7311363);; 
}

static void __lambda_733(void *data, object self_734928, int argc, object *args) /* object self_734928, object k_734080, object count_732130_732924, object count2_732131_732925 */
 {
 object k_734080 = args[0]; object count_732130_732924 = args[1]; object count2_732131_732925 = args[2];
    
  complex_num_type local_7311368; 
if( (boolean_f != Cyc_num_fast_eq_op(data, Cyc_fast_sum(data,&local_7311368, ((closureN)self_734928)->elements[2], obj_int2obj(1)), count_732130_732924)) ){ 
  
closureN_type c_7311371;
object e_7311375 [2];
c_7311371.hdr.mark = gc_color_red;
 c_7311371.hdr.grayed = 0;
c_7311371.tag = closureN_tag;
 c_7311371.fn = (function_type)__lambda_734;
c_7311371.num_args = 1;
c_7311371.num_elements = 2;
c_7311371.elements = (object *)e_7311375;
c_7311371.elements[0] = k_734080;
c_7311371.elements[1] = ((closureN)self_734928)->elements[3];

return_direct_with_clo6(data,  __glo__75_75vector_91select_srfi_132, (((closure)  __glo__75_75vector_91select_srfi_132)->fn),  &c_7311371, ((closureN)self_734928)->elements[0], ((closureN)self_734928)->elements[5], ((closureN)self_734928)->elements[2], ((closureN)self_734928)->elements[4], ((closureN)self_734928)->elements[1]);
} else { 
    
if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_734928)->elements[2], count_732130_732924)) ){ 
  
closureN_type c_7311385;
object e_7311406 [7];
c_7311385.hdr.mark = gc_color_red;
 c_7311385.hdr.grayed = 0;
c_7311385.tag = closureN_tag;
 c_7311385.fn = (function_type)__lambda_735;
c_7311385.num_args = 1;
c_7311385.num_elements = 7;
c_7311385.elements = (object *)e_7311406;
c_7311385.elements[0] = ((closureN)self_734928)->elements[0];
c_7311385.elements[1] = ((closureN)self_734928)->elements[1];
c_7311385.elements[2] = ((closureN)self_734928)->elements[2];
c_7311385.elements[3] = k_734080;
c_7311385.elements[4] = ((closureN)self_734928)->elements[3];
c_7311385.elements[5] = ((closureN)self_734928)->elements[4];
c_7311385.elements[6] = ((closureN)self_734928)->elements[5];

return_direct_with_clo1(data,(closure)&c_7311385,__lambda_735,  count_732130_732924);
} else { 
    
  complex_num_type local_7311412; 
if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_734928)->elements[2], Cyc_fast_sum(data,&local_7311412, count_732130_732924, count2_732131_732925))) ){ 
  
closureN_type c_7311414;
object e_7311437 [8];
c_7311414.hdr.mark = gc_color_red;
 c_7311414.hdr.grayed = 0;
c_7311414.tag = closureN_tag;
 c_7311414.fn = (function_type)__lambda_738;
c_7311414.num_args = 0;
c_7311414.num_elements = 8;
c_7311414.elements = (object *)e_7311437;
c_7311414.elements[0] = ((closureN)self_734928)->elements[0];
c_7311414.elements[1] = count_732130_732924;
c_7311414.elements[2] = count2_732131_732925;
c_7311414.elements[3] = ((closureN)self_734928)->elements[1];
c_7311414.elements[4] = ((closureN)self_734928)->elements[2];
c_7311414.elements[5] = ((closureN)self_734928)->elements[3];
c_7311414.elements[6] = ((closureN)self_734928)->elements[4];
c_7311414.elements[7] = ((closureN)self_734928)->elements[5];


closureN_type c_7311438;
object e_7311442 [2];
c_7311438.hdr.mark = gc_color_red;
 c_7311438.hdr.grayed = 0;
c_7311438.tag = closureN_tag;
 c_7311438.fn = (function_type)__lambda_739;
c_7311438.num_args = 1;
c_7311438.num_elements = 2;
c_7311438.elements = (object *)e_7311442;
c_7311438.elements[0] = k_734080;
c_7311438.elements[1] = ((closureN)self_734928)->elements[3];

return_direct_with_clo1(data,(closure)&c_7311414,__lambda_738,  &c_7311438);
} else { 
  
closureN_type c_7311444;
object e_7311479 [9];
c_7311444.hdr.mark = gc_color_red;
 c_7311444.hdr.grayed = 0;
c_7311444.tag = closureN_tag;
 c_7311444.fn = (function_type)__lambda_740;
c_7311444.num_args = 1;
c_7311444.num_elements = 9;
c_7311444.elements = (object *)e_7311479;
c_7311444.elements[0] = ((closureN)self_734928)->elements[0];
c_7311444.elements[1] = count_732130_732924;
c_7311444.elements[2] = count2_732131_732925;
c_7311444.elements[3] = ((closureN)self_734928)->elements[1];
c_7311444.elements[4] = ((closureN)self_734928)->elements[2];
c_7311444.elements[5] = k_734080;
c_7311444.elements[6] = ((closureN)self_734928)->elements[3];
c_7311444.elements[7] = ((closureN)self_734928)->elements[4];
c_7311444.elements[8] = ((closureN)self_734928)->elements[5];


complex_num_type local_7311485; 

complex_num_type local_7311488; 

complex_num_type local_7311491; 

object c_7311482 = Cyc_make_vector(data,(closure)&c_7311444,1,Cyc_fast_sub(data,&local_7311485, Cyc_fast_sub(data,&local_7311488, Cyc_fast_sub(data,&local_7311491, ((closureN)self_734928)->elements[1], ((closureN)self_734928)->elements[4]), count_732130_732924), count2_732131_732925));
return_closcall1(data,(closure)&c_7311444,  c_7311482);}
;}
;}
;; 
}

static void __lambda_740(void *data, object self_734935, int argc, object *args) /* object self_734935, object v2_732154_732929 */
 {
 object v2_732154_732929 = args[0];
  
closureN_type c_7311446;
object e_7311473 [8];
c_7311446.hdr.mark = gc_color_red;
 c_7311446.hdr.grayed = 0;
c_7311446.tag = closureN_tag;
 c_7311446.fn = (function_type)__lambda_741;
c_7311446.num_args = 1;
c_7311446.num_elements = 8;
c_7311446.elements = (object *)e_7311473;
c_7311446.elements[0] = ((closureN)self_734935)->elements[0];
c_7311446.elements[1] = ((closureN)self_734935)->elements[1];
c_7311446.elements[2] = ((closureN)self_734935)->elements[2];
c_7311446.elements[3] = ((closureN)self_734935)->elements[3];
c_7311446.elements[4] = ((closureN)self_734935)->elements[4];
c_7311446.elements[5] = ((closureN)self_734935)->elements[5];
c_7311446.elements[6] = ((closureN)self_734935)->elements[7];
c_7311446.elements[7] = v2_732154_732929;

return_direct_with_clo8(data,  __glo_copy_91bigger_67_srfi_132, (((closure)  __glo_copy_91bigger_67_srfi_132)->fn),  &c_7311446, ((closureN)self_734935)->elements[0], ((closureN)self_734935)->elements[6], v2_732154_732929, obj_int2obj(0), ((closureN)self_734935)->elements[8], ((closureN)self_734935)->elements[7], ((closureN)self_734935)->elements[3]);; 
}

static void __lambda_741(void *data, object self_734936, int argc, object *args) /* object self_734936, object r_734096 */
 {

  
complex_num_type local_7311453; 

complex_num_type local_7311456; 

complex_num_type local_7311462; 

complex_num_type local_7311465; 

complex_num_type local_7311468; 
return_direct_with_clo6(data,  __glo__75_75vector_91select2_srfi_132, (((closure)  __glo__75_75vector_91select2_srfi_132)->fn),  ((closureN)self_734936)->elements[5], ((closureN)self_734936)->elements[0], ((closureN)self_734936)->elements[7], Cyc_fast_sub(data,&local_7311453, Cyc_fast_sub(data,&local_7311456, ((closureN)self_734936)->elements[4], ((closureN)self_734936)->elements[1]), ((closureN)self_734936)->elements[2]), obj_int2obj(0), Cyc_fast_sub(data,&local_7311462, Cyc_fast_sub(data,&local_7311465, Cyc_fast_sub(data,&local_7311468, ((closureN)self_734936)->elements[3], ((closureN)self_734936)->elements[6]), ((closureN)self_734936)->elements[1]), ((closureN)self_734936)->elements[2]));; 
}

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

static void __lambda_738(void *data, object self_734934, int argc, object *args) /* object self_734934, object k_734088 */
 {
 object k_734088 = args[0];
    
  complex_num_type local_7311419; 
  complex_num_type local_7311423; 
if( (boolean_f != Cyc_num_fast_lt_op(data, Cyc_fast_sum(data,&local_7311419, ((closureN)self_734934)->elements[4], obj_int2obj(1)), Cyc_fast_sum(data,&local_7311423, ((closureN)self_734934)->elements[1], ((closureN)self_734934)->elements[2]))) ){ 
  return_direct_with_clo1(data,  k_734088, (((closure)  k_734088)->fn),  ((closureN)self_734934)->elements[5]);
} else { 
  
complex_num_type local_7311433; 
return_direct_with_clo6(data,  __glo__75_75vector_91select_srfi_132, (((closure)  __glo__75_75vector_91select_srfi_132)->fn),  k_734088, ((closureN)self_734934)->elements[0], ((closureN)self_734934)->elements[7], Cyc_fast_sum(data,&local_7311433, ((closureN)self_734934)->elements[4], obj_int2obj(1)), ((closureN)self_734934)->elements[6], ((closureN)self_734934)->elements[3]);}
;; 
}

static void __lambda_735(void *data, object self_734930, int argc, object *args) /* object self_734930, object n_732140_732926 */
 {
 object n_732140_732926 = args[0];
  
closureN_type c_7311387;
object e_7311402 [8];
c_7311387.hdr.mark = gc_color_red;
 c_7311387.hdr.grayed = 0;
c_7311387.tag = closureN_tag;
 c_7311387.fn = (function_type)__lambda_736;
c_7311387.num_args = 1;
c_7311387.num_elements = 8;
c_7311387.elements = (object *)e_7311402;
c_7311387.elements[0] = ((closureN)self_734930)->elements[0];
c_7311387.elements[1] = ((closureN)self_734930)->elements[1];
c_7311387.elements[2] = ((closureN)self_734930)->elements[2];
c_7311387.elements[3] = ((closureN)self_734930)->elements[3];
c_7311387.elements[4] = n_732140_732926;
c_7311387.elements[5] = ((closureN)self_734930)->elements[4];
c_7311387.elements[6] = ((closureN)self_734930)->elements[5];
c_7311387.elements[7] = ((closureN)self_734930)->elements[6];


object c_7311405 = Cyc_make_vector(data,(closure)&c_7311387,1,n_732140_732926);
return_closcall1(data,(closure)&c_7311387,  c_7311405);; 
}

static void __lambda_736(void *data, object self_734931, int argc, object *args) /* object self_734931, object v2_732143_732927 */
 {
 object v2_732143_732927 = args[0];
  
closureN_type c_7311389;
object e_7311396 [5];
c_7311389.hdr.mark = gc_color_red;
 c_7311389.hdr.grayed = 0;
c_7311389.tag = closureN_tag;
 c_7311389.fn = (function_type)__lambda_737;
c_7311389.num_args = 1;
c_7311389.num_elements = 5;
c_7311389.elements = (object *)e_7311396;
c_7311389.elements[0] = ((closureN)self_734931)->elements[0];
c_7311389.elements[1] = ((closureN)self_734931)->elements[2];
c_7311389.elements[2] = ((closureN)self_734931)->elements[3];
c_7311389.elements[3] = ((closureN)self_734931)->elements[4];
c_7311389.elements[4] = v2_732143_732927;

return_direct_with_clo8(data,  __glo_copy_91smaller_67_srfi_132, (((closure)  __glo_copy_91smaller_67_srfi_132)->fn),  &c_7311389, ((closureN)self_734931)->elements[0], ((closureN)self_734931)->elements[5], v2_732143_732927, obj_int2obj(0), ((closureN)self_734931)->elements[7], ((closureN)self_734931)->elements[6], ((closureN)self_734931)->elements[1]);; 
}

static void __lambda_737(void *data, object self_734932, int argc, object *args) /* object self_734932, object r_734085 */
 {

  return_direct_with_clo6(data,  __glo__75_75vector_91select2_srfi_132, (((closure)  __glo__75_75vector_91select2_srfi_132)->fn),  ((closureN)self_734932)->elements[2], ((closureN)self_734932)->elements[0], ((closureN)self_734932)->elements[4], ((closureN)self_734932)->elements[1], obj_int2obj(0), ((closureN)self_734932)->elements[3]);; 
}

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

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

static void __lambda_727(void *data, object self_734922, int argc, object *args) /* object self_734922, object r_734075 */
 {
 object r_734075 = args[0];
  
closureN_type c_7311336;
object e_7311348 [2];
c_7311336.hdr.mark = gc_color_red;
 c_7311336.hdr.grayed = 0;
c_7311336.tag = closureN_tag;
 c_7311336.fn = (function_type)__lambda_728;
c_7311336.num_args = 1;
c_7311336.num_elements = 2;
c_7311336.elements = (object *)e_7311348;
c_7311336.elements[0] = ((closureN)self_734922)->elements[1];
c_7311336.elements[1] = ((closureN)self_734922)->elements[2];

return_direct_with_clo3(data,  __glo_vector_91sort_srfi_132, (((closure)  __glo_vector_91sort_srfi_132)->fn),  &c_7311336, ((closureN)self_734922)->elements[0], r_734075);; 
}

static void __lambda_728(void *data, object self_734923, int argc, object *args) /* object self_734923, object v2_732121_732921 */
 {
 object v2_732121_732921 = args[0];
  




complex_num_type local_7311346; 
return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734923)->elements[1], Cyc_vector_ref(data, v2_732121_732921, ((closureN)self_734923)->elements[0]), Cyc_vector_ref(data, v2_732121_732921, Cyc_fast_sum(data,&local_7311346, ((closureN)self_734923)->elements[0], obj_int2obj(1))));; 
}

static void __lambda_726(void *data, object self_734921, int argc, object *args) /* object self_734921, object r_734068 */
 {
 object r_734068 = args[0];
  if( (boolean_f != r_734068) ){ 
  




complex_num_type local_7311305; 
return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734921)->elements[0], Cyc_vector_ref(data, ((closureN)self_734921)->elements[2], ((closureN)self_734921)->elements[1]), Cyc_vector_ref(data, ((closureN)self_734921)->elements[2], Cyc_fast_sum(data,&local_7311305, ((closureN)self_734921)->elements[1], obj_int2obj(1))));
} else { 
  


complex_num_type local_7311314; 


return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734921)->elements[0], Cyc_vector_ref(data, ((closureN)self_734921)->elements[2], Cyc_fast_sum(data,&local_7311314, ((closureN)self_734921)->elements[1], obj_int2obj(1))), Cyc_vector_ref(data, ((closureN)self_734921)->elements[2], ((closureN)self_734921)->elements[1]));}
;; 
}

static void __lambda_710(void *data, object _, int argc, object *args) /* closure _,object k_734028, object _121_127_732050_732898, object v_732051_732899, object k_732052_732900, object start_732053_732901, object end_732054_732902 */
 {
object k_734028 = args[0]; object _121_127_732050_732898 = args[1]; object v_732051_732899 = args[2]; object k_732052_732900 = args[3]; object start_732053_732901 = args[4]; object end_732054_732902 = args[5];
  Cyc_st_add(data, "srfi/132.sld:%%vector-select");
  
  complex_num_type local_7311104; 
if( (boolean_f != Cyc_num_fast_eq_op(data, obj_int2obj(1), Cyc_fast_sub(data,&local_7311104, end_732054_732902, start_732053_732901))) ){ 
  


complex_num_type local_7311110; 
return_direct_with_clo1(data,  k_734028, (((closure)  k_734028)->fn),  Cyc_vector_ref(data, v_732051_732899, Cyc_fast_sum(data,&local_7311110, k_732052_732900, start_732053_732901)));
} else { 
    
  complex_num_type local_7311115; 
if( (boolean_f != Cyc_num_fast_eq_op(data, obj_int2obj(2), Cyc_fast_sub(data,&local_7311115, end_732054_732902, start_732053_732901))) ){ 
  
closureN_type c_7311117;
object e_7311141 [4];
c_7311117.hdr.mark = gc_color_red;
 c_7311117.hdr.grayed = 0;
c_7311117.tag = closureN_tag;
 c_7311117.fn = (function_type)__lambda_711;
c_7311117.num_args = 1;
c_7311117.num_elements = 4;
c_7311117.elements = (object *)e_7311141;
c_7311117.elements[0] = k_732052_732900;
c_7311117.elements[1] = k_734028;
c_7311117.elements[2] = start_732053_732901;
c_7311117.elements[3] = v_732051_732899;






complex_num_type local_7311148; 
return_closcall3(data,  _121_127_732050_732898,  &c_7311117, Cyc_vector_ref(data, v_732051_732899, start_732053_732901), Cyc_vector_ref(data, v_732051_732899, Cyc_fast_sum(data,&local_7311148, start_732053_732901, obj_int2obj(1))));
} else { 
    
  complex_num_type local_7311153; 
if( (boolean_f != Cyc_num_fast_lt_op(data, Cyc_fast_sub(data,&local_7311153, end_732054_732902, start_732053_732901), __glo_just_91sort_91it_91threshold_srfi_132)) ){ 
  
closureN_type c_7311155;
object e_7311165 [3];
c_7311155.hdr.mark = gc_color_red;
 c_7311155.hdr.grayed = 0;
c_7311155.tag = closureN_tag;
 c_7311155.fn = (function_type)__lambda_712;
c_7311155.num_args = 1;
c_7311155.num_elements = 3;
c_7311155.elements = (object *)e_7311165;
c_7311155.elements[0] = _121_127_732050_732898;
c_7311155.elements[1] = k_732052_732900;
c_7311155.elements[2] = k_734028;

return_direct_with_clo4(data,  __glo_vector_91copy_scheme_base, (((closure)  __glo_vector_91copy_scheme_base)->fn),  &c_7311155, v_732051_732899, start_732053_732901, end_732054_732902);
} else { 
  
closureN_type c_7311167;
object e_7311282 [6];
c_7311167.hdr.mark = gc_color_red;
 c_7311167.hdr.grayed = 0;
c_7311167.tag = closureN_tag;
 c_7311167.fn = (function_type)__lambda_714;
c_7311167.num_args = 1;
c_7311167.num_elements = 6;
c_7311167.elements = (object *)e_7311282;
c_7311167.elements[0] = _121_127_732050_732898;
c_7311167.elements[1] = end_732054_732902;
c_7311167.elements[2] = k_732052_732900;
c_7311167.elements[3] = k_734028;
c_7311167.elements[4] = start_732053_732901;
c_7311167.elements[5] = v_732051_732899;


complex_num_type local_7311285; 
return_direct_with_clo2(data,  __glo_random_91integer_srfi_27, (((closure)  __glo_random_91integer_srfi_27)->fn),  &c_7311167, Cyc_fast_sub(data,&local_7311285, end_732054_732902, start_732053_732901));}
;}
;}
;; 
}

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




complex_num_type local_7311280; 
return_direct_with_clo1(data,(closure)&c_7311169,__lambda_715,  Cyc_vector_ref(data, ((closureN)self_734910)->elements[5], Cyc_fast_sum(data,&local_7311280, ((closureN)self_734910)->elements[4], ip_732072_732904)));; 
}

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


closureN_type c_7311266;
object e_7311273 [5];
c_7311266.hdr.mark = gc_color_red;
 c_7311266.hdr.grayed = 0;
c_7311266.tag = closureN_tag;
 c_7311266.fn = (function_type)__lambda_724;
c_7311266.num_args = 0;
c_7311266.num_elements = 5;
c_7311266.elements = (object *)e_7311273;
c_7311266.elements[0] = ((closureN)self_734911)->elements[0];
c_7311266.elements[1] = ((closureN)self_734911)->elements[1];
c_7311266.elements[2] = pivot_732075_732905;
c_7311266.elements[3] = ((closureN)self_734911)->elements[4];
c_7311266.elements[4] = ((closureN)self_734911)->elements[5];

return_direct_with_clo1(data,(closure)&c_7311171,__lambda_716,  &c_7311266);; 
}

static void __lambda_724(void *data, object self_734912, int argc, object *args) /* object self_734912, object k_734059 */
 {
 object k_734059 = args[0];
  return_direct_with_clo8(data,  __glo_count_91smaller_srfi_132, (((closure)  __glo_count_91smaller_srfi_132)->fn),  k_734059, ((closureN)self_734912)->elements[0], ((closureN)self_734912)->elements[2], ((closureN)self_734912)->elements[4], ((closureN)self_734912)->elements[3], ((closureN)self_734912)->elements[1], obj_int2obj(0), obj_int2obj(0));; 
}

static void __lambda_716(void *data, object self_734913, int argc, object *args) /* object self_734913, object r_734045 */
 {
 object r_734045 = args[0];
  
closureN_type c_7311173;
object e_7311177 [2];
c_7311173.hdr.mark = gc_color_red;
 c_7311173.hdr.grayed = 0;
c_7311173.tag = closureN_tag;
 c_7311173.fn = (function_type)__lambda_717;
c_7311173.num_args = 1;
c_7311173.num_elements = 2;
c_7311173.elements = (object *)e_7311177;
c_7311173.elements[0] = ((closureN)self_734913)->elements[3];
c_7311173.elements[1] = r_734045;


closureN_type c_7311178;
object e_7311264 [6];
c_7311178.hdr.mark = gc_color_red;
 c_7311178.hdr.grayed = 0;
c_7311178.tag = closureN_tag;
 c_7311178.fn = (function_type)__lambda_718;
c_7311178.num_args = 2;
c_7311178.num_elements = 6;
c_7311178.elements = (object *)e_7311264;
c_7311178.elements[0] = ((closureN)self_734913)->elements[0];
c_7311178.elements[1] = ((closureN)self_734913)->elements[1];
c_7311178.elements[2] = ((closureN)self_734913)->elements[2];
c_7311178.elements[3] = ((closureN)self_734913)->elements[4];
c_7311178.elements[4] = ((closureN)self_734913)->elements[5];
c_7311178.elements[5] = ((closureN)self_734913)->elements[6];

return_direct_with_clo1(data,(closure)&c_7311173,__lambda_717,  &c_7311178);; 
}

static void __lambda_718(void *data, object self_734914, int argc, object *args) /* object self_734914, object k_734047, object count_732077_732906, object count2_732078_732907 */
 {
 object k_734047 = args[0]; object count_732077_732906 = args[1]; object count2_732078_732907 = args[2];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_734914)->elements[2], count_732077_732906)) ){ 
  
closureN_type c_7311183;
object e_7311204 [7];
c_7311183.hdr.mark = gc_color_red;
 c_7311183.hdr.grayed = 0;
c_7311183.tag = closureN_tag;
 c_7311183.fn = (function_type)__lambda_719;
c_7311183.num_args = 1;
c_7311183.num_elements = 7;
c_7311183.elements = (object *)e_7311204;
c_7311183.elements[0] = ((closureN)self_734914)->elements[0];
c_7311183.elements[1] = ((closureN)self_734914)->elements[1];
c_7311183.elements[2] = ((closureN)self_734914)->elements[2];
c_7311183.elements[3] = k_734047;
c_7311183.elements[4] = ((closureN)self_734914)->elements[3];
c_7311183.elements[5] = ((closureN)self_734914)->elements[4];
c_7311183.elements[6] = ((closureN)self_734914)->elements[5];

return_direct_with_clo1(data,(closure)&c_7311183,__lambda_719,  count_732077_732906);
} else { 
    
  complex_num_type local_7311210; 
if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_734914)->elements[2], Cyc_fast_sum(data,&local_7311210, count_732077_732906, count2_732078_732907))) ){ 
  return_direct_with_clo1(data,  k_734047, (((closure)  k_734047)->fn),  ((closureN)self_734914)->elements[3]);
} else { 
  
closureN_type c_7311214;
object e_7311249 [9];
c_7311214.hdr.mark = gc_color_red;
 c_7311214.hdr.grayed = 0;
c_7311214.tag = closureN_tag;
 c_7311214.fn = (function_type)__lambda_722;
c_7311214.num_args = 1;
c_7311214.num_elements = 9;
c_7311214.elements = (object *)e_7311249;
c_7311214.elements[0] = ((closureN)self_734914)->elements[0];
c_7311214.elements[1] = count_732077_732906;
c_7311214.elements[2] = count2_732078_732907;
c_7311214.elements[3] = ((closureN)self_734914)->elements[1];
c_7311214.elements[4] = ((closureN)self_734914)->elements[2];
c_7311214.elements[5] = k_734047;
c_7311214.elements[6] = ((closureN)self_734914)->elements[3];
c_7311214.elements[7] = ((closureN)self_734914)->elements[4];
c_7311214.elements[8] = ((closureN)self_734914)->elements[5];


complex_num_type local_7311255; 

complex_num_type local_7311258; 

complex_num_type local_7311261; 

object c_7311252 = Cyc_make_vector(data,(closure)&c_7311214,1,Cyc_fast_sub(data,&local_7311255, Cyc_fast_sub(data,&local_7311258, Cyc_fast_sub(data,&local_7311261, ((closureN)self_734914)->elements[1], ((closureN)self_734914)->elements[4]), count_732077_732906), count2_732078_732907));
return_closcall1(data,(closure)&c_7311214,  c_7311252);}
;}
;; 
}

static void __lambda_722(void *data, object self_734918, int argc, object *args) /* object self_734918, object v2_732098_732911 */
 {
 object v2_732098_732911 = args[0];
  
closureN_type c_7311216;
object e_7311243 [8];
c_7311216.hdr.mark = gc_color_red;
 c_7311216.hdr.grayed = 0;
c_7311216.tag = closureN_tag;
 c_7311216.fn = (function_type)__lambda_723;
c_7311216.num_args = 1;
c_7311216.num_elements = 8;
c_7311216.elements = (object *)e_7311243;
c_7311216.elements[0] = ((closureN)self_734918)->elements[0];
c_7311216.elements[1] = ((closureN)self_734918)->elements[1];
c_7311216.elements[2] = ((closureN)self_734918)->elements[2];
c_7311216.elements[3] = ((closureN)self_734918)->elements[3];
c_7311216.elements[4] = ((closureN)self_734918)->elements[4];
c_7311216.elements[5] = ((closureN)self_734918)->elements[5];
c_7311216.elements[6] = ((closureN)self_734918)->elements[7];
c_7311216.elements[7] = v2_732098_732911;

return_direct_with_clo8(data,  __glo_copy_91bigger_67_srfi_132, (((closure)  __glo_copy_91bigger_67_srfi_132)->fn),  &c_7311216, ((closureN)self_734918)->elements[0], ((closureN)self_734918)->elements[6], v2_732098_732911, obj_int2obj(0), ((closureN)self_734918)->elements[8], ((closureN)self_734918)->elements[7], ((closureN)self_734918)->elements[3]);; 
}

static void __lambda_723(void *data, object self_734919, int argc, object *args) /* object self_734919, object r_734055 */
 {

  
complex_num_type local_7311223; 

complex_num_type local_7311226; 

complex_num_type local_7311232; 

complex_num_type local_7311235; 

complex_num_type local_7311238; 
return_direct_with_clo6(data,  __glo__75_75vector_91select_srfi_132, (((closure)  __glo__75_75vector_91select_srfi_132)->fn),  ((closureN)self_734919)->elements[5], ((closureN)self_734919)->elements[0], ((closureN)self_734919)->elements[7], Cyc_fast_sub(data,&local_7311223, Cyc_fast_sub(data,&local_7311226, ((closureN)self_734919)->elements[4], ((closureN)self_734919)->elements[1]), ((closureN)self_734919)->elements[2]), obj_int2obj(0), Cyc_fast_sub(data,&local_7311232, Cyc_fast_sub(data,&local_7311235, Cyc_fast_sub(data,&local_7311238, ((closureN)self_734919)->elements[3], ((closureN)self_734919)->elements[6]), ((closureN)self_734919)->elements[1]), ((closureN)self_734919)->elements[2]));; 
}

static void __lambda_719(void *data, object self_734915, int argc, object *args) /* object self_734915, object n_732084_732908 */
 {
 object n_732084_732908 = args[0];
  
closureN_type c_7311185;
object e_7311200 [8];
c_7311185.hdr.mark = gc_color_red;
 c_7311185.hdr.grayed = 0;
c_7311185.tag = closureN_tag;
 c_7311185.fn = (function_type)__lambda_720;
c_7311185.num_args = 1;
c_7311185.num_elements = 8;
c_7311185.elements = (object *)e_7311200;
c_7311185.elements[0] = ((closureN)self_734915)->elements[0];
c_7311185.elements[1] = ((closureN)self_734915)->elements[1];
c_7311185.elements[2] = ((closureN)self_734915)->elements[2];
c_7311185.elements[3] = ((closureN)self_734915)->elements[3];
c_7311185.elements[4] = n_732084_732908;
c_7311185.elements[5] = ((closureN)self_734915)->elements[4];
c_7311185.elements[6] = ((closureN)self_734915)->elements[5];
c_7311185.elements[7] = ((closureN)self_734915)->elements[6];


object c_7311203 = Cyc_make_vector(data,(closure)&c_7311185,1,n_732084_732908);
return_closcall1(data,(closure)&c_7311185,  c_7311203);; 
}

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

return_direct_with_clo8(data,  __glo_copy_91smaller_67_srfi_132, (((closure)  __glo_copy_91smaller_67_srfi_132)->fn),  &c_7311187, ((closureN)self_734916)->elements[0], ((closureN)self_734916)->elements[5], v2_732087_732909, obj_int2obj(0), ((closureN)self_734916)->elements[7], ((closureN)self_734916)->elements[6], ((closureN)self_734916)->elements[1]);; 
}

static void __lambda_721(void *data, object self_734917, int argc, object *args) /* object self_734917, object r_734050 */
 {

  return_direct_with_clo6(data,  __glo__75_75vector_91select_srfi_132, (((closure)  __glo__75_75vector_91select_srfi_132)->fn),  ((closureN)self_734917)->elements[2], ((closureN)self_734917)->elements[0], ((closureN)self_734917)->elements[4], ((closureN)self_734917)->elements[1], obj_int2obj(0), ((closureN)self_734917)->elements[3]);; 
}

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

static void __lambda_712(void *data, object self_734908, int argc, object *args) /* object self_734908, object r_734042 */
 {
 object r_734042 = args[0];
  
closureN_type c_7311157;
object e_7311163 [2];
c_7311157.hdr.mark = gc_color_red;
 c_7311157.hdr.grayed = 0;
c_7311157.tag = closureN_tag;
 c_7311157.fn = (function_type)__lambda_713;
c_7311157.num_args = 1;
c_7311157.num_elements = 2;
c_7311157.elements = (object *)e_7311163;
c_7311157.elements[0] = ((closureN)self_734908)->elements[1];
c_7311157.elements[1] = ((closureN)self_734908)->elements[2];

return_direct_with_clo3(data,  __glo_vector_91sort_srfi_132, (((closure)  __glo_vector_91sort_srfi_132)->fn),  &c_7311157, ((closureN)self_734908)->elements[0], r_734042);; 
}

static void __lambda_713(void *data, object self_734909, int argc, object *args) /* object self_734909, object r_734041 */
 {
 object r_734041 = args[0];
  

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

static void __lambda_711(void *data, object self_734907, int argc, object *args) /* object self_734907, object r_734033 */
 {
 object r_734033 = args[0];
  if( (boolean_f != r_734033) ){ 
  


complex_num_type local_7311125; 
return_direct_with_clo1(data,  ((closureN)self_734907)->elements[1], (((closure)  ((closureN)self_734907)->elements[1])->fn),  Cyc_vector_ref(data, ((closureN)self_734907)->elements[3], Cyc_fast_sum(data,&local_7311125, ((closureN)self_734907)->elements[0], ((closureN)self_734907)->elements[2])));
} else { 
  


complex_num_type local_7311135; 

complex_num_type local_7311138; 
return_direct_with_clo1(data,  ((closureN)self_734907)->elements[1], (((closure)  ((closureN)self_734907)->elements[1])->fn),  Cyc_vector_ref(data, ((closureN)self_734907)->elements[3], Cyc_fast_sum(data,&local_7311135, Cyc_fast_sub(data,&local_7311138, obj_int2obj(1), ((closureN)self_734907)->elements[0]), ((closureN)self_734907)->elements[2])));}
;; 
}

static void __lambda_705(void *data, object _, int argc, object *args) /* closure _,object k_734011, object _121_127_732038_732893, object v_732039_732894, object k_732040_732895, object start_732041_732896, object end_732042_732897 */
 {
object k_734011 = args[0]; object _121_127_732038_732893 = args[1]; object v_732039_732894 = args[2]; object k_732040_732895 = args[3]; object start_732041_732896 = args[4]; object end_732042_732897 = args[5];
  Cyc_st_add(data, "srfi/132.sld:%vector-select2");

closureN_type c_7311024;
object e_7311079 [5];
c_7311024.hdr.mark = gc_color_red;
 c_7311024.hdr.grayed = 0;
c_7311024.tag = closureN_tag;
 c_7311024.fn = (function_type)__lambda_706;
c_7311024.num_args = 0;
c_7311024.num_elements = 5;
c_7311024.elements = (object *)e_7311079;
c_7311024.elements[0] = _121_127_732038_732893;
c_7311024.elements[1] = end_732042_732897;
c_7311024.elements[2] = k_732040_732895;
c_7311024.elements[3] = start_732041_732896;
c_7311024.elements[4] = v_732039_732894;


closureN_type c_7311080;
object e_7311098 [6];
c_7311080.hdr.mark = gc_color_red;
 c_7311080.hdr.grayed = 0;
c_7311080.tag = closureN_tag;
 c_7311080.fn = (function_type)__lambda_708;
c_7311080.num_args = 1;
c_7311080.num_elements = 6;
c_7311080.elements = (object *)e_7311098;
c_7311080.elements[0] = _121_127_732038_732893;
c_7311080.elements[1] = end_732042_732897;
c_7311080.elements[2] = k_732040_732895;
c_7311080.elements[3] = k_734011;
c_7311080.elements[4] = start_732041_732896;
c_7311080.elements[5] = v_732039_732894;

return_direct_with_clo1(data,(closure)&c_7311024,__lambda_706,  &c_7311080);; 
}

static void __lambda_708(void *data, object self_734903, int argc, object *args) /* object self_734903, object r_734013 */
 {
 object r_734013 = args[0];
  if( (boolean_f != r_734013) ){ 
  return_direct_with_clo6(data,  __glo__75_75vector_91select2_srfi_132, (((closure)  __glo__75_75vector_91select2_srfi_132)->fn),  ((closureN)self_734903)->elements[3], ((closureN)self_734903)->elements[0], ((closureN)self_734903)->elements[5], ((closureN)self_734903)->elements[2], ((closureN)self_734903)->elements[4], ((closureN)self_734903)->elements[1]);
} else { 
  
closureN_type c_7311089;
object e_7311097 [6];
c_7311089.hdr.mark = gc_color_red;
 c_7311089.hdr.grayed = 0;
c_7311089.tag = closureN_tag;
 c_7311089.fn = (function_type)__lambda_709;
c_7311089.num_args = 1;
c_7311089.num_elements = 6;
c_7311089.elements = (object *)e_7311097;
c_7311089.elements[0] = ((closureN)self_734903)->elements[0];
c_7311089.elements[1] = ((closureN)self_734903)->elements[1];
c_7311089.elements[2] = ((closureN)self_734903)->elements[2];
c_7311089.elements[3] = ((closureN)self_734903)->elements[3];
c_7311089.elements[4] = ((closureN)self_734903)->elements[4];
c_7311089.elements[5] = ((closureN)self_734903)->elements[5];

return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  &c_7311089, quote_assert, r_734013);}
;; 
}

static void __lambda_709(void *data, object self_734904, int argc, object *args) /* object self_734904, object r_734012_734175 */
 {

  return_direct_with_clo6(data,  __glo__75_75vector_91select2_srfi_132, (((closure)  __glo__75_75vector_91select2_srfi_132)->fn),  ((closureN)self_734904)->elements[3], ((closureN)self_734904)->elements[0], ((closureN)self_734904)->elements[5], ((closureN)self_734904)->elements[2], ((closureN)self_734904)->elements[4], ((closureN)self_734904)->elements[1]);; 
}

static void __lambda_706(void *data, object self_734905, int argc, object *args) /* object self_734905, object k_734014 */
 {
 object k_734014 = args[0];
  if( (boolean_f != quote_vector_91select) ){ 
    
if( (boolean_f != Cyc_is_procedure(data, ((closureN)self_734905)->elements[0])) ){ 
    
if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_734905)->elements[4])) ){ 
    complex_num_type local_7311033; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_exact_91integer_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7311033, ((closureN)self_734905)->elements[2])) ){ 
    complex_num_type local_7311037; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_exact_91integer_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7311037, ((closureN)self_734905)->elements[3])) ){ 
    complex_num_type local_7311041; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_exact_91integer_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7311041, ((closureN)self_734905)->elements[1])) ){ 
  
closureN_type c_7311044;
object e_7311057 [4];
c_7311044.hdr.mark = gc_color_red;
 c_7311044.hdr.grayed = 0;
c_7311044.tag = closureN_tag;
 c_7311044.fn = (function_type)__lambda_707;
c_7311044.num_args = 1;
c_7311044.num_elements = 4;
c_7311044.elements = (object *)e_7311057;
c_7311044.elements[0] = ((closureN)self_734905)->elements[1];
c_7311044.elements[1] = k_734014;
c_7311044.elements[2] = ((closureN)self_734905)->elements[3];
c_7311044.elements[3] = ((closureN)self_734905)->elements[4];


complex_num_type local_7311064; 

complex_num_type local_7311067; 

complex_num_type local_7311070; 

object c_7311060 = Cyc_num_lte(data,(closure)&c_7311044,3,obj_int2obj(0), ((closureN)self_734905)->elements[2], Cyc_fast_sub(data,&local_7311064, Cyc_fast_sub(data,&local_7311067, Cyc_fast_sub(data,&local_7311070, ((closureN)self_734905)->elements[1], ((closureN)self_734905)->elements[3]), obj_int2obj(1)), obj_int2obj(1)));
return_closcall1(data,(closure)&c_7311044,  c_7311060);
} else { 
  return_direct_with_clo1(data,  k_734014, (((closure)  k_734014)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_734014, (((closure)  k_734014)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_734014, (((closure)  k_734014)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_734014, (((closure)  k_734014)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_734014, (((closure)  k_734014)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_734014, (((closure)  k_734014)->fn),  boolean_f);}
;; 
}

static void __lambda_707(void *data, object self_734906, int argc, object *args) /* object self_734906, object r_734021 */
 {
 object r_734021 = args[0];
  if( (boolean_f != r_734021) ){ 
  


object c_7311049 = Cyc_num_lte(data,  ((closureN)self_734906)->elements[1],4,obj_int2obj(0), ((closureN)self_734906)->elements[2], ((closureN)self_734906)->elements[0], Cyc_vector_length(data, ((closureN)self_734906)->elements[3]));
return_direct_with_clo1(data,  ((closureN)self_734906)->elements[1], (((closure)  ((closureN)self_734906)->elements[1])->fn),  c_7311049);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734906)->elements[1], (((closure)  ((closureN)self_734906)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_700(void *data, object _, int argc, object *args) /* closure _,object k_733995, object _121_127_732026_732888, object v_732027_732889, object k_732028_732890, object start_732029_732891, object end_732030_732892 */
 {
object k_733995 = args[0]; object _121_127_732026_732888 = args[1]; object v_732027_732889 = args[2]; object k_732028_732890 = args[3]; object start_732029_732891 = args[4]; object end_732030_732892 = args[5];
  Cyc_st_add(data, "srfi/132.sld:%vector-select");

closureN_type c_7310950;
object e_7311002 [5];
c_7310950.hdr.mark = gc_color_red;
 c_7310950.hdr.grayed = 0;
c_7310950.tag = closureN_tag;
 c_7310950.fn = (function_type)__lambda_701;
c_7310950.num_args = 0;
c_7310950.num_elements = 5;
c_7310950.elements = (object *)e_7311002;
c_7310950.elements[0] = _121_127_732026_732888;
c_7310950.elements[1] = end_732030_732892;
c_7310950.elements[2] = k_732028_732890;
c_7310950.elements[3] = start_732029_732891;
c_7310950.elements[4] = v_732027_732889;


closureN_type c_7311003;
object e_7311021 [6];
c_7311003.hdr.mark = gc_color_red;
 c_7311003.hdr.grayed = 0;
c_7311003.tag = closureN_tag;
 c_7311003.fn = (function_type)__lambda_703;
c_7311003.num_args = 1;
c_7311003.num_elements = 6;
c_7311003.elements = (object *)e_7311021;
c_7311003.elements[0] = _121_127_732026_732888;
c_7311003.elements[1] = end_732030_732892;
c_7311003.elements[2] = k_732028_732890;
c_7311003.elements[3] = k_733995;
c_7311003.elements[4] = start_732029_732891;
c_7311003.elements[5] = v_732027_732889;

return_direct_with_clo1(data,(closure)&c_7310950,__lambda_701,  &c_7311003);; 
}

static void __lambda_703(void *data, object self_734899, int argc, object *args) /* object self_734899, object r_733997 */
 {
 object r_733997 = args[0];
  if( (boolean_f != r_733997) ){ 
  return_direct_with_clo6(data,  __glo__75_75vector_91select_srfi_132, (((closure)  __glo__75_75vector_91select_srfi_132)->fn),  ((closureN)self_734899)->elements[3], ((closureN)self_734899)->elements[0], ((closureN)self_734899)->elements[5], ((closureN)self_734899)->elements[2], ((closureN)self_734899)->elements[4], ((closureN)self_734899)->elements[1]);
} else { 
  
closureN_type c_7311012;
object e_7311020 [6];
c_7311012.hdr.mark = gc_color_red;
 c_7311012.hdr.grayed = 0;
c_7311012.tag = closureN_tag;
 c_7311012.fn = (function_type)__lambda_704;
c_7311012.num_args = 1;
c_7311012.num_elements = 6;
c_7311012.elements = (object *)e_7311020;
c_7311012.elements[0] = ((closureN)self_734899)->elements[0];
c_7311012.elements[1] = ((closureN)self_734899)->elements[1];
c_7311012.elements[2] = ((closureN)self_734899)->elements[2];
c_7311012.elements[3] = ((closureN)self_734899)->elements[3];
c_7311012.elements[4] = ((closureN)self_734899)->elements[4];
c_7311012.elements[5] = ((closureN)self_734899)->elements[5];

return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  &c_7311012, quote_assert, r_733997);}
;; 
}

static void __lambda_704(void *data, object self_734900, int argc, object *args) /* object self_734900, object r_733996_734173 */
 {

  return_direct_with_clo6(data,  __glo__75_75vector_91select_srfi_132, (((closure)  __glo__75_75vector_91select_srfi_132)->fn),  ((closureN)self_734900)->elements[3], ((closureN)self_734900)->elements[0], ((closureN)self_734900)->elements[5], ((closureN)self_734900)->elements[2], ((closureN)self_734900)->elements[4], ((closureN)self_734900)->elements[1]);; 
}

static void __lambda_701(void *data, object self_734901, int argc, object *args) /* object self_734901, object k_733998 */
 {
 object k_733998 = args[0];
  if( (boolean_f != quote_vector_91select) ){ 
    
if( (boolean_f != Cyc_is_procedure(data, ((closureN)self_734901)->elements[0])) ){ 
    
if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_734901)->elements[4])) ){ 
    complex_num_type local_7310959; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_exact_91integer_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7310959, ((closureN)self_734901)->elements[2])) ){ 
    complex_num_type local_7310963; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_exact_91integer_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7310963, ((closureN)self_734901)->elements[3])) ){ 
    complex_num_type local_7310967; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_exact_91integer_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7310967, ((closureN)self_734901)->elements[1])) ){ 
  
closureN_type c_7310970;
object e_7310983 [4];
c_7310970.hdr.mark = gc_color_red;
 c_7310970.hdr.grayed = 0;
c_7310970.tag = closureN_tag;
 c_7310970.fn = (function_type)__lambda_702;
c_7310970.num_args = 1;
c_7310970.num_elements = 4;
c_7310970.elements = (object *)e_7310983;
c_7310970.elements[0] = ((closureN)self_734901)->elements[1];
c_7310970.elements[1] = k_733998;
c_7310970.elements[2] = ((closureN)self_734901)->elements[3];
c_7310970.elements[3] = ((closureN)self_734901)->elements[4];


complex_num_type local_7310990; 

complex_num_type local_7310993; 

object c_7310986 = Cyc_num_lte(data,(closure)&c_7310970,3,obj_int2obj(0), ((closureN)self_734901)->elements[2], Cyc_fast_sub(data,&local_7310990, Cyc_fast_sub(data,&local_7310993, ((closureN)self_734901)->elements[1], ((closureN)self_734901)->elements[3]), obj_int2obj(1)));
return_closcall1(data,(closure)&c_7310970,  c_7310986);
} else { 
  return_direct_with_clo1(data,  k_733998, (((closure)  k_733998)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733998, (((closure)  k_733998)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733998, (((closure)  k_733998)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733998, (((closure)  k_733998)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733998, (((closure)  k_733998)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733998, (((closure)  k_733998)->fn),  boolean_f);}
;; 
}

static void __lambda_702(void *data, object self_734902, int argc, object *args) /* object self_734902, object r_734005 */
 {
 object r_734005 = args[0];
  if( (boolean_f != r_734005) ){ 
  


object c_7310975 = Cyc_num_lte(data,  ((closureN)self_734902)->elements[1],4,obj_int2obj(0), ((closureN)self_734902)->elements[2], ((closureN)self_734902)->elements[0], Cyc_vector_length(data, ((closureN)self_734902)->elements[3]));
return_direct_with_clo1(data,  ((closureN)self_734902)->elements[1], (((closure)  ((closureN)self_734902)->elements[1])->fn),  c_7310975);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734902)->elements[1], (((closure)  ((closureN)self_734902)->elements[1])->fn),  boolean_f);}
;; 
}

static void __lambda_681(void *data, object _, int argc, object *args) /* closure _,object k_733957, object _121_732003_732877, object v_732004_732878, object k_732005_732879, object rest_732006_732880_raw, ... */
 {
object k_733957 = args[0]; object _121_732003_732877 = args[1]; object v_732004_732878 = args[2]; object k_732005_732879 = args[3];
load_varargs(rest_732006_732880, args, 4, argc - 4);
  object start_732009_732881;
  Cyc_st_add(data, "srfi/132.sld:vector-separate!");
  
if( (boolean_f != Cyc_is_null(rest_732006_732880)) ){ 
  start_732009_732881 = obj_int2obj(0);
} else { 
  
  start_732009_732881 = Cyc_car(data, rest_732006_732880);}
;
closureN_type c_7310787;
object e_7310815 [2];
c_7310787.hdr.mark = gc_color_red;
 c_7310787.hdr.grayed = 0;
c_7310787.tag = closureN_tag;
 c_7310787.fn = (function_type)__lambda_682;
c_7310787.num_args = 0;
c_7310787.num_elements = 2;
c_7310787.elements = (object *)e_7310815;
c_7310787.elements[0] = rest_732006_732880;
c_7310787.elements[1] = v_732004_732878;


closureN_type c_7310816;
object e_7310947 [5];
c_7310816.hdr.mark = gc_color_red;
 c_7310816.hdr.grayed = 0;
c_7310816.tag = closureN_tag;
 c_7310816.fn = (function_type)__lambda_685;
c_7310816.num_args = 1;
c_7310816.num_elements = 5;
c_7310816.elements = (object *)e_7310947;
c_7310816.elements[0] = _121_732003_732877;
c_7310816.elements[1] = k_732005_732879;
c_7310816.elements[2] = k_733957;
c_7310816.elements[3] = start_732009_732881;
c_7310816.elements[4] = v_732004_732878;

return_direct_with_clo1(data,(closure)&c_7310787,__lambda_682,  &c_7310816);; 
}

static void __lambda_685(void *data, object self_734881, int argc, object *args) /* object self_734881, object end_732012_732882 */
 {
 object end_732012_732882 = args[0];
  
closureN_type c_7310818;
object e_7310828 [3];
c_7310818.hdr.mark = gc_color_red;
 c_7310818.hdr.grayed = 0;
c_7310818.tag = closureN_tag;
 c_7310818.fn = (function_type)__lambda_686;
c_7310818.num_args = 0;
c_7310818.num_elements = 3;
c_7310818.elements = (object *)e_7310828;
c_7310818.elements[0] = end_732012_732882;
c_7310818.elements[1] = ((closureN)self_734881)->elements[1];
c_7310818.elements[2] = ((closureN)self_734881)->elements[3];


closureN_type c_7310829;
object e_7310946 [6];
c_7310829.hdr.mark = gc_color_red;
 c_7310829.hdr.grayed = 0;
c_7310829.tag = closureN_tag;
 c_7310829.fn = (function_type)__lambda_687;
c_7310829.num_args = 1;
c_7310829.num_elements = 6;
c_7310829.elements = (object *)e_7310946;
c_7310829.elements[0] = ((closureN)self_734881)->elements[0];
c_7310829.elements[1] = end_732012_732882;
c_7310829.elements[2] = ((closureN)self_734881)->elements[1];
c_7310829.elements[3] = ((closureN)self_734881)->elements[2];
c_7310829.elements[4] = ((closureN)self_734881)->elements[3];
c_7310829.elements[5] = ((closureN)self_734881)->elements[4];

return_direct_with_clo1(data,(closure)&c_7310818,__lambda_686,  &c_7310829);; 
}

static void __lambda_687(void *data, object self_734882, int argc, object *args) /* object self_734882, object r_733960 */
 {
 object r_733960 = args[0];
  if( (boolean_f != r_733960) ){ 
  
closureN_type c_7310831;
object e_7310935 [5];
c_7310831.hdr.mark = gc_color_red;
 c_7310831.hdr.grayed = 0;
c_7310831.tag = closureN_tag;
 c_7310831.fn = (function_type)__lambda_688;
c_7310831.num_args = 1;
c_7310831.num_elements = 5;
c_7310831.elements = (object *)e_7310935;
c_7310831.elements[0] = ((closureN)self_734882)->elements[0];
c_7310831.elements[1] = ((closureN)self_734882)->elements[1];
c_7310831.elements[2] = ((closureN)self_734882)->elements[3];
c_7310831.elements[3] = ((closureN)self_734882)->elements[4];
c_7310831.elements[4] = ((closureN)self_734882)->elements[5];


complex_num_type local_7310940; 
return_direct_with_clo6(data,  __glo_vector_91select_srfi_132, (((closure)  __glo_vector_91select_srfi_132)->fn),  &c_7310831, ((closureN)self_734882)->elements[0], ((closureN)self_734882)->elements[5], Cyc_fast_sub(data,&local_7310940, ((closureN)self_734882)->elements[2], obj_int2obj(1)), ((closureN)self_734882)->elements[4], ((closureN)self_734882)->elements[1]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734882)->elements[3], (((closure)  ((closureN)self_734882)->elements[3])->fn),  Cyc_VOID);}
;; 
}

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


closureN_type c_7310927;
object e_7310934 [5];
c_7310927.hdr.mark = gc_color_red;
 c_7310927.hdr.grayed = 0;
c_7310927.tag = closureN_tag;
 c_7310927.fn = (function_type)__lambda_699;
c_7310927.num_args = 0;
c_7310927.num_elements = 5;
c_7310927.elements = (object *)e_7310934;
c_7310927.elements[0] = ((closureN)self_734883)->elements[0];
c_7310927.elements[1] = ((closureN)self_734883)->elements[1];
c_7310927.elements[2] = pivot_732015_732883;
c_7310927.elements[3] = ((closureN)self_734883)->elements[3];
c_7310927.elements[4] = ((closureN)self_734883)->elements[4];

return_direct_with_clo1(data,(closure)&c_7310833,__lambda_689,  &c_7310927);; 
}

static void __lambda_699(void *data, object self_734884, int argc, object *args) /* object self_734884, object k_733979 */
 {
 object k_733979 = args[0];
  return_direct_with_clo8(data,  __glo_count_91smaller_srfi_132, (((closure)  __glo_count_91smaller_srfi_132)->fn),  k_733979, ((closureN)self_734884)->elements[0], ((closureN)self_734884)->elements[2], ((closureN)self_734884)->elements[4], ((closureN)self_734884)->elements[3], ((closureN)self_734884)->elements[1], obj_int2obj(0), obj_int2obj(0));; 
}

static void __lambda_689(void *data, object self_734885, int argc, object *args) /* object self_734885, object r_733962 */
 {
 object r_733962 = args[0];
  
closureN_type c_7310835;
object e_7310839 [2];
c_7310835.hdr.mark = gc_color_red;
 c_7310835.hdr.grayed = 0;
c_7310835.tag = closureN_tag;
 c_7310835.fn = (function_type)__lambda_690;
c_7310835.num_args = 1;
c_7310835.num_elements = 2;
c_7310835.elements = (object *)e_7310839;
c_7310835.elements[0] = ((closureN)self_734885)->elements[2];
c_7310835.elements[1] = r_733962;


closureN_type c_7310840;
object e_7310925 [5];
c_7310840.hdr.mark = gc_color_red;
 c_7310840.hdr.grayed = 0;
c_7310840.tag = closureN_tag;
 c_7310840.fn = (function_type)__lambda_691;
c_7310840.num_args = 2;
c_7310840.num_elements = 5;
c_7310840.elements = (object *)e_7310925;
c_7310840.elements[0] = ((closureN)self_734885)->elements[0];
c_7310840.elements[1] = ((closureN)self_734885)->elements[1];
c_7310840.elements[2] = ((closureN)self_734885)->elements[3];
c_7310840.elements[3] = ((closureN)self_734885)->elements[4];
c_7310840.elements[4] = ((closureN)self_734885)->elements[5];

return_direct_with_clo1(data,(closure)&c_7310835,__lambda_690,  &c_7310840);; 
}

static void __lambda_691(void *data, object self_734886, int argc, object *args) /* object self_734886, object k_733964, object count_732016_732884, object count2_732017_732885 */
 {
 object k_733964 = args[0]; object count_732016_732884 = args[1]; object count2_732017_732885 = args[2];
  
closureN_type c_7310842;
object e_7310921 [8];
c_7310842.hdr.mark = gc_color_red;
 c_7310842.hdr.grayed = 0;
c_7310842.tag = closureN_tag;
 c_7310842.fn = (function_type)__lambda_692;
c_7310842.num_args = 1;
c_7310842.num_elements = 8;
c_7310842.elements = (object *)e_7310921;
c_7310842.elements[0] = ((closureN)self_734886)->elements[0];
c_7310842.elements[1] = count_732016_732884;
c_7310842.elements[2] = count2_732017_732885;
c_7310842.elements[3] = ((closureN)self_734886)->elements[1];
c_7310842.elements[4] = k_733964;
c_7310842.elements[5] = ((closureN)self_734886)->elements[2];
c_7310842.elements[6] = ((closureN)self_734886)->elements[3];
c_7310842.elements[7] = ((closureN)self_734886)->elements[4];


object c_7310924 = Cyc_make_vector(data,(closure)&c_7310842,1,count_732016_732884);
return_closcall1(data,(closure)&c_7310842,  c_7310924);; 
}

static void __lambda_692(void *data, object self_734887, int argc, object *args) /* object self_734887, object v2_732020_732886 */
 {
 object v2_732020_732886 = args[0];
  
closureN_type c_7310844;
object e_7310904 [9];
c_7310844.hdr.mark = gc_color_red;
 c_7310844.hdr.grayed = 0;
c_7310844.tag = closureN_tag;
 c_7310844.fn = (function_type)__lambda_693;
c_7310844.num_args = 1;
c_7310844.num_elements = 9;
c_7310844.elements = (object *)e_7310904;
c_7310844.elements[0] = ((closureN)self_734887)->elements[0];
c_7310844.elements[1] = ((closureN)self_734887)->elements[1];
c_7310844.elements[2] = ((closureN)self_734887)->elements[2];
c_7310844.elements[3] = ((closureN)self_734887)->elements[3];
c_7310844.elements[4] = ((closureN)self_734887)->elements[4];
c_7310844.elements[5] = ((closureN)self_734887)->elements[5];
c_7310844.elements[6] = ((closureN)self_734887)->elements[6];
c_7310844.elements[7] = ((closureN)self_734887)->elements[7];
c_7310844.elements[8] = v2_732020_732886;


complex_num_type local_7310910; 

complex_num_type local_7310913; 

complex_num_type local_7310916; 

object c_7310907 = Cyc_make_vector(data,(closure)&c_7310844,1,Cyc_fast_sub(data,&local_7310910, Cyc_fast_sub(data,&local_7310913, Cyc_fast_sub(data,&local_7310916, ((closureN)self_734887)->elements[3], ((closureN)self_734887)->elements[6]), ((closureN)self_734887)->elements[1]), ((closureN)self_734887)->elements[2]));
return_closcall1(data,(closure)&c_7310844,  c_7310907);; 
}

static void __lambda_693(void *data, object self_734888, int argc, object *args) /* object self_734888, object v3_732023_732887 */
 {
 object v3_732023_732887 = args[0];
  
closureN_type c_7310846;
object e_7310897 [10];
c_7310846.hdr.mark = gc_color_red;
 c_7310846.hdr.grayed = 0;
c_7310846.tag = closureN_tag;
 c_7310846.fn = (function_type)__lambda_694;
c_7310846.num_args = 1;
c_7310846.num_elements = 10;
c_7310846.elements = (object *)e_7310897;
c_7310846.elements[0] = ((closureN)self_734888)->elements[0];
c_7310846.elements[1] = ((closureN)self_734888)->elements[1];
c_7310846.elements[2] = ((closureN)self_734888)->elements[2];
c_7310846.elements[3] = ((closureN)self_734888)->elements[3];
c_7310846.elements[4] = ((closureN)self_734888)->elements[4];
c_7310846.elements[5] = ((closureN)self_734888)->elements[5];
c_7310846.elements[6] = ((closureN)self_734888)->elements[6];
c_7310846.elements[7] = ((closureN)self_734888)->elements[7];
c_7310846.elements[8] = ((closureN)self_734888)->elements[8];
c_7310846.elements[9] = v3_732023_732887;

return_direct_with_clo8(data,  __glo_copy_91smaller_67_srfi_132, (((closure)  __glo_copy_91smaller_67_srfi_132)->fn),  &c_7310846, ((closureN)self_734888)->elements[0], ((closureN)self_734888)->elements[5], ((closureN)self_734888)->elements[8], obj_int2obj(0), ((closureN)self_734888)->elements[7], ((closureN)self_734888)->elements[6], ((closureN)self_734888)->elements[3]);; 
}

static void __lambda_694(void *data, object self_734889, int argc, object *args) /* object self_734889, object r_733967 */
 {

  
closureN_type c_7310848;
object e_7310890 [8];
c_7310848.hdr.mark = gc_color_red;
 c_7310848.hdr.grayed = 0;
c_7310848.tag = closureN_tag;
 c_7310848.fn = (function_type)__lambda_695;
c_7310848.num_args = 1;
c_7310848.num_elements = 8;
c_7310848.elements = (object *)e_7310890;
c_7310848.elements[0] = ((closureN)self_734889)->elements[1];
c_7310848.elements[1] = ((closureN)self_734889)->elements[2];
c_7310848.elements[2] = ((closureN)self_734889)->elements[4];
c_7310848.elements[3] = ((closureN)self_734889)->elements[5];
c_7310848.elements[4] = ((closureN)self_734889)->elements[6];
c_7310848.elements[5] = ((closureN)self_734889)->elements[7];
c_7310848.elements[6] = ((closureN)self_734889)->elements[8];
c_7310848.elements[7] = ((closureN)self_734889)->elements[9];

return_direct_with_clo8(data,  __glo_copy_91bigger_67_srfi_132, (((closure)  __glo_copy_91bigger_67_srfi_132)->fn),  &c_7310848, ((closureN)self_734889)->elements[0], ((closureN)self_734889)->elements[5], ((closureN)self_734889)->elements[9], obj_int2obj(0), ((closureN)self_734889)->elements[7], ((closureN)self_734889)->elements[6], ((closureN)self_734889)->elements[3]);; 
}

static void __lambda_695(void *data, object self_734890, int argc, object *args) /* object self_734890, object r_733968 */
 {

  
closureN_type c_7310850;
object e_7310886 [7];
c_7310850.hdr.mark = gc_color_red;
 c_7310850.hdr.grayed = 0;
c_7310850.tag = closureN_tag;
 c_7310850.fn = (function_type)__lambda_696;
c_7310850.num_args = 1;
c_7310850.num_elements = 7;
c_7310850.elements = (object *)e_7310886;
c_7310850.elements[0] = ((closureN)self_734890)->elements[0];
c_7310850.elements[1] = ((closureN)self_734890)->elements[1];
c_7310850.elements[2] = ((closureN)self_734890)->elements[2];
c_7310850.elements[3] = ((closureN)self_734890)->elements[3];
c_7310850.elements[4] = ((closureN)self_734890)->elements[4];
c_7310850.elements[5] = ((closureN)self_734890)->elements[5];
c_7310850.elements[6] = ((closureN)self_734890)->elements[7];

return_direct_with_clo4(data,  __glo_vector_91copy_67_scheme_base, (((closure)  __glo_vector_91copy_67_scheme_base)->fn),  &c_7310850, ((closureN)self_734890)->elements[5], ((closureN)self_734890)->elements[4], ((closureN)self_734890)->elements[6]);; 
}

static void __lambda_696(void *data, object self_734891, int argc, object *args) /* object self_734891, object r_733969 */
 {

  
closureN_type c_7310852;
object e_7310880 [7];
c_7310852.hdr.mark = gc_color_red;
 c_7310852.hdr.grayed = 0;
c_7310852.tag = closureN_tag;
 c_7310852.fn = (function_type)__lambda_697;
c_7310852.num_args = 1;
c_7310852.num_elements = 7;
c_7310852.elements = (object *)e_7310880;
c_7310852.elements[0] = ((closureN)self_734891)->elements[0];
c_7310852.elements[1] = ((closureN)self_734891)->elements[1];
c_7310852.elements[2] = ((closureN)self_734891)->elements[2];
c_7310852.elements[3] = ((closureN)self_734891)->elements[3];
c_7310852.elements[4] = ((closureN)self_734891)->elements[4];
c_7310852.elements[5] = ((closureN)self_734891)->elements[5];
c_7310852.elements[6] = ((closureN)self_734891)->elements[6];


complex_num_type local_7310883; 
return_direct_with_clo1(data,(closure)&c_7310852,__lambda_697,  Cyc_fast_sum(data,&local_7310883, ((closureN)self_734891)->elements[4], ((closureN)self_734891)->elements[0]));; 
}

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


complex_num_type local_7310873; 

complex_num_type local_7310876; 
return_direct_with_clo5(data,  __glo_vector_91fill_67_scheme_base, (((closure)  __glo_vector_91fill_67_scheme_base)->fn),  &c_7310854, ((closureN)self_734892)->elements[5], ((closureN)self_734892)->elements[3], r_733973, Cyc_fast_sum(data,&local_7310873, Cyc_fast_sum(data,&local_7310876, ((closureN)self_734892)->elements[4], ((closureN)self_734892)->elements[0]), ((closureN)self_734892)->elements[1]));; 
}

static void __lambda_698(void *data, object self_734893, int argc, object *args) /* object self_734893, object r_733970 */
 {

  
complex_num_type local_7310860; 

complex_num_type local_7310863; 
return_direct_with_clo4(data,  __glo_vector_91copy_67_scheme_base, (((closure)  __glo_vector_91copy_67_scheme_base)->fn),  ((closureN)self_734893)->elements[2], ((closureN)self_734893)->elements[4], Cyc_fast_sum(data,&local_7310860, Cyc_fast_sum(data,&local_7310863, ((closureN)self_734893)->elements[3], ((closureN)self_734893)->elements[0]), ((closureN)self_734893)->elements[1]), ((closureN)self_734893)->elements[5]);; 
}

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

static void __lambda_686(void *data, object self_734895, int argc, object *args) /* object self_734895, object k_733981 */
 {
 object k_733981 = args[0];
    
if( (boolean_f != Cyc_num_fast_gt_op(data, ((closureN)self_734895)->elements[1], obj_int2obj(0))) ){ 
  

return_direct_with_clo1(data,  k_733981,__lambda_687,  Cyc_num_fast_gt_op(data, ((closureN)self_734895)->elements[0], ((closureN)self_734895)->elements[2]));
} else { 
  return_direct_with_clo1(data,  k_733981,__lambda_687,  boolean_f);}
;; 
}

static void __lambda_682(void *data, object self_734896, int argc, object *args) /* object self_734896, object k_733983 */
 {
 object k_733983 = args[0];
  
closureN_type c_7310789;
object e_7310800 [1];
c_7310789.hdr.mark = gc_color_red;
 c_7310789.hdr.grayed = 0;
c_7310789.tag = closureN_tag;
 c_7310789.fn = (function_type)__lambda_683;
c_7310789.num_args = 0;
c_7310789.num_elements = 1;
c_7310789.elements = (object *)e_7310800;
c_7310789.elements[0] = ((closureN)self_734896)->elements[0];


closureN_type c_7310801;
object e_7310814 [3];
c_7310801.hdr.mark = gc_color_red;
 c_7310801.hdr.grayed = 0;
c_7310801.tag = closureN_tag;
 c_7310801.fn = (function_type)__lambda_684;
c_7310801.num_args = 1;
c_7310801.num_elements = 3;
c_7310801.elements = (object *)e_7310814;
c_7310801.elements[0] = k_733983;
c_7310801.elements[1] = ((closureN)self_734896)->elements[0];
c_7310801.elements[2] = ((closureN)self_734896)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310789,__lambda_683,  &c_7310801);; 
}

static void __lambda_684(void *data, object self_734897, int argc, object *args) /* object self_734897, object r_733984 */
 {
 object r_733984 = args[0];
  if( (boolean_f != r_733984) ){ 
  



return_direct_with_clo1(data,  ((closureN)self_734897)->elements[0], (((closure)  ((closureN)self_734897)->elements[0])->fn),  Cyc_car(data, Cyc_cdr(data, ((closureN)self_734897)->elements[1])));
} else { 
  

return_direct_with_clo1(data,  ((closureN)self_734897)->elements[0], (((closure)  ((closureN)self_734897)->elements[0])->fn),  Cyc_vector_length(data, ((closureN)self_734897)->elements[2]));}
;; 
}

static void __lambda_683(void *data, object self_734898, int argc, object *args) /* object self_734898, object k_733986 */
 {
 object k_733986 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_734898)->elements[0])) ){ 
  



return_direct_with_clo1(data,  k_733986,__lambda_684,  Cyc_is_pair(Cyc_cdr(data, ((closureN)self_734898)->elements[0])));
} else { 
  return_direct_with_clo1(data,  k_733986,__lambda_684,  boolean_f);}
;; 
}

static void __lambda_676(void *data, object _, int argc, object *args) /* closure _,object k_733942, object _121_731991_732871, object v_731992_732872, object k_731993_732873, object rest_731994_732874_raw, ... */
 {
object k_733942 = args[0]; object _121_731991_732871 = args[1]; object v_731992_732872 = args[2]; object k_731993_732873 = args[3];
load_varargs(rest_731994_732874, args, 4, argc - 4);
  object start_731997_732875;
  Cyc_st_add(data, "srfi/132.sld:vector-select");
  
if( (boolean_f != Cyc_is_null(rest_731994_732874)) ){ 
  start_731997_732875 = obj_int2obj(0);
} else { 
  
  start_731997_732875 = Cyc_car(data, rest_731994_732874);}
;
closureN_type c_7310741;
object e_7310769 [2];
c_7310741.hdr.mark = gc_color_red;
 c_7310741.hdr.grayed = 0;
c_7310741.tag = closureN_tag;
 c_7310741.fn = (function_type)__lambda_677;
c_7310741.num_args = 0;
c_7310741.num_elements = 2;
c_7310741.elements = (object *)e_7310769;
c_7310741.elements[0] = rest_731994_732874;
c_7310741.elements[1] = v_731992_732872;


closureN_type c_7310770;
object e_7310777 [5];
c_7310770.hdr.mark = gc_color_red;
 c_7310770.hdr.grayed = 0;
c_7310770.tag = closureN_tag;
 c_7310770.fn = (function_type)__lambda_680;
c_7310770.num_args = 1;
c_7310770.num_elements = 5;
c_7310770.elements = (object *)e_7310777;
c_7310770.elements[0] = _121_731991_732871;
c_7310770.elements[1] = k_731993_732873;
c_7310770.elements[2] = k_733942;
c_7310770.elements[3] = start_731997_732875;
c_7310770.elements[4] = v_731992_732872;

return_direct_with_clo1(data,(closure)&c_7310741,__lambda_677,  &c_7310770);; 
}

static void __lambda_680(void *data, object self_734877, int argc, object *args) /* object self_734877, object end_732000_732876 */
 {
 object end_732000_732876 = args[0];
  return_direct_with_clo6(data,  __glo__75vector_91select_srfi_132, (((closure)  __glo__75vector_91select_srfi_132)->fn),  ((closureN)self_734877)->elements[2], ((closureN)self_734877)->elements[0], ((closureN)self_734877)->elements[4], ((closureN)self_734877)->elements[1], ((closureN)self_734877)->elements[3], end_732000_732876);; 
}

static void __lambda_677(void *data, object self_734878, int argc, object *args) /* object self_734878, object k_733945 */
 {
 object k_733945 = args[0];
  
closureN_type c_7310743;
object e_7310754 [1];
c_7310743.hdr.mark = gc_color_red;
 c_7310743.hdr.grayed = 0;
c_7310743.tag = closureN_tag;
 c_7310743.fn = (function_type)__lambda_678;
c_7310743.num_args = 0;
c_7310743.num_elements = 1;
c_7310743.elements = (object *)e_7310754;
c_7310743.elements[0] = ((closureN)self_734878)->elements[0];


closureN_type c_7310755;
object e_7310768 [3];
c_7310755.hdr.mark = gc_color_red;
 c_7310755.hdr.grayed = 0;
c_7310755.tag = closureN_tag;
 c_7310755.fn = (function_type)__lambda_679;
c_7310755.num_args = 1;
c_7310755.num_elements = 3;
c_7310755.elements = (object *)e_7310768;
c_7310755.elements[0] = k_733945;
c_7310755.elements[1] = ((closureN)self_734878)->elements[0];
c_7310755.elements[2] = ((closureN)self_734878)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310743,__lambda_678,  &c_7310755);; 
}

static void __lambda_679(void *data, object self_734879, int argc, object *args) /* object self_734879, object r_733946 */
 {
 object r_733946 = args[0];
  if( (boolean_f != r_733946) ){ 
  



return_direct_with_clo1(data,  ((closureN)self_734879)->elements[0], (((closure)  ((closureN)self_734879)->elements[0])->fn),  Cyc_car(data, Cyc_cdr(data, ((closureN)self_734879)->elements[1])));
} else { 
  

return_direct_with_clo1(data,  ((closureN)self_734879)->elements[0], (((closure)  ((closureN)self_734879)->elements[0])->fn),  Cyc_vector_length(data, ((closureN)self_734879)->elements[2]));}
;; 
}

static void __lambda_678(void *data, object self_734880, int argc, object *args) /* object self_734880, object k_733948 */
 {
 object k_733948 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_734880)->elements[0])) ){ 
  



return_direct_with_clo1(data,  k_733948,__lambda_679,  Cyc_is_pair(Cyc_cdr(data, ((closureN)self_734880)->elements[0])));
} else { 
  return_direct_with_clo1(data,  k_733948,__lambda_679,  boolean_f);}
;; 
}

static void __lambda_668(void *data, object _, int argc, object *args) /* closure _,object k_733924, object _121_731971_732863, object v_731972_732864, object knil_731973_732865, object rest_731974_732866_raw, ... */
 {
object k_733924 = args[0]; object _121_731971_732863 = args[1]; object v_731972_732864 = args[2]; object knil_731973_732865 = args[3];
load_varargs(rest_731974_732866, args, 4, argc - 4);
  Cyc_st_add(data, "srfi/132.sld:vector-find-median!");

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


closureN_type c_7310676;
object e_7310731 [4];
c_7310676.hdr.mark = gc_color_red;
 c_7310676.hdr.grayed = 0;
c_7310676.tag = closureN_tag;
 c_7310676.fn = (function_type)__lambda_671;
c_7310676.num_args = 1;
c_7310676.num_elements = 4;
c_7310676.elements = (object *)e_7310731;
c_7310676.elements[0] = _121_731971_732863;
c_7310676.elements[1] = k_733924;
c_7310676.elements[2] = knil_731973_732865;
c_7310676.elements[3] = v_731972_732864;

return_direct_with_clo1(data,(closure)&c_7310658,__lambda_669,  &c_7310676);; 
}

static void __lambda_671(void *data, object self_734870, int argc, object *args) /* object self_734870, object mean_731977_732867 */
 {
 object mean_731977_732867 = args[0];
  
closureN_type c_7310678;
object e_7310727 [5];
c_7310678.hdr.mark = gc_color_red;
 c_7310678.hdr.grayed = 0;
c_7310678.tag = closureN_tag;
 c_7310678.fn = (function_type)__lambda_672;
c_7310678.num_args = 1;
c_7310678.num_elements = 5;
c_7310678.elements = (object *)e_7310727;
c_7310678.elements[0] = ((closureN)self_734870)->elements[0];
c_7310678.elements[1] = ((closureN)self_734870)->elements[1];
c_7310678.elements[2] = ((closureN)self_734870)->elements[2];
c_7310678.elements[3] = mean_731977_732867;
c_7310678.elements[4] = ((closureN)self_734870)->elements[3];



return_direct_with_clo1(data,(closure)&c_7310678,__lambda_672,  Cyc_vector_length(data, ((closureN)self_734870)->elements[3]));; 
}

static void __lambda_672(void *data, object self_734871, int argc, object *args) /* object self_734871, object n_731980_732868 */
 {
 object n_731980_732868 = args[0];
  
closureN_type c_7310680;
object e_7310724 [5];
c_7310680.hdr.mark = gc_color_red;
 c_7310680.hdr.grayed = 0;
c_7310680.tag = closureN_tag;
 c_7310680.fn = (function_type)__lambda_673;
c_7310680.num_args = 1;
c_7310680.num_elements = 5;
c_7310680.elements = (object *)e_7310724;
c_7310680.elements[0] = ((closureN)self_734871)->elements[1];
c_7310680.elements[1] = ((closureN)self_734871)->elements[2];
c_7310680.elements[2] = ((closureN)self_734871)->elements[3];
c_7310680.elements[3] = n_731980_732868;
c_7310680.elements[4] = ((closureN)self_734871)->elements[4];

return_direct_with_clo3(data,  __glo_vector_91sort_67_srfi_132, (((closure)  __glo_vector_91sort_67_srfi_132)->fn),  &c_7310680, ((closureN)self_734871)->elements[0], ((closureN)self_734871)->elements[4]);; 
}

static void __lambda_673(void *data, object self_734872, int argc, object *args) /* object self_734872, object r_733927 */
 {

  
closureN_type c_7310682;
object e_7310719 [5];
c_7310682.hdr.mark = gc_color_red;
 c_7310682.hdr.grayed = 0;
c_7310682.tag = closureN_tag;
 c_7310682.fn = (function_type)__lambda_674;
c_7310682.num_args = 1;
c_7310682.num_elements = 5;
c_7310682.elements = (object *)e_7310719;
c_7310682.elements[0] = ((closureN)self_734872)->elements[0];
c_7310682.elements[1] = ((closureN)self_734872)->elements[1];
c_7310682.elements[2] = ((closureN)self_734872)->elements[2];
c_7310682.elements[3] = ((closureN)self_734872)->elements[3];
c_7310682.elements[4] = ((closureN)self_734872)->elements[4];


complex_num_type local_7310722; 
return_direct_with_clo1(data,(closure)&c_7310682,__lambda_674,  ((inline_function_type)
                   ((closure)__glo_zero_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7310722, ((closureN)self_734872)->elements[3]));; 
}

static void __lambda_674(void *data, object self_734873, int argc, object *args) /* object self_734873, object r_733928 */
 {
 object r_733928 = args[0];
  if( (boolean_f != r_733928) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734873)->elements[0], (((closure)  ((closureN)self_734873)->elements[0])->fn),  ((closureN)self_734873)->elements[1]);
} else { 
  
closureN_type c_7310687;
object e_7310717 [4];
c_7310687.hdr.mark = gc_color_red;
 c_7310687.hdr.grayed = 0;
c_7310687.tag = closureN_tag;
 c_7310687.fn = (function_type)__lambda_675;
c_7310687.num_args = 1;
c_7310687.num_elements = 4;
c_7310687.elements = (object *)e_7310717;
c_7310687.elements[0] = ((closureN)self_734873)->elements[0];
c_7310687.elements[1] = ((closureN)self_734873)->elements[2];
c_7310687.elements[2] = ((closureN)self_734873)->elements[3];
c_7310687.elements[3] = ((closureN)self_734873)->elements[4];

return_direct_with_clo2(data,  __glo_odd_127_scheme_base, (((closure)  __glo_odd_127_scheme_base)->fn),  &c_7310687, ((closureN)self_734873)->elements[3]);}
;; 
}

static void __lambda_675(void *data, object self_734874, int argc, object *args) /* object self_734874, object r_733929 */
 {
 object r_733929 = args[0];
  if( (boolean_f != r_733929) ){ 
  


complex_num_type local_7310695; 
return_direct_with_clo1(data,  ((closureN)self_734874)->elements[0], (((closure)  ((closureN)self_734874)->elements[0])->fn),  Cyc_vector_ref(data, ((closureN)self_734874)->elements[3], ((inline_function_type)
                   ((closure)__glo_quotient_191_191inline_191_191_scheme_base)->fn)(data,&local_7310695, ((closureN)self_734874)->elements[2], obj_int2obj(2))));
} else { 
  


complex_num_type local_7310705; 

complex_num_type local_7310708; 



complex_num_type local_7310715; 
return_closcall3(data,  ((closureN)self_734874)->elements[1],  ((closureN)self_734874)->elements[0], Cyc_vector_ref(data, ((closureN)self_734874)->elements[3], Cyc_fast_sub(data,&local_7310705, ((inline_function_type)
                   ((closure)__glo_quotient_191_191inline_191_191_scheme_base)->fn)(data,&local_7310708, ((closureN)self_734874)->elements[2], obj_int2obj(2)), obj_int2obj(1))), Cyc_vector_ref(data, ((closureN)self_734874)->elements[3], ((inline_function_type)
                   ((closure)__glo_quotient_191_191inline_191_191_scheme_base)->fn)(data,&local_7310715, ((closureN)self_734874)->elements[2], obj_int2obj(2))));}
;; 
}

static void __lambda_669(void *data, object self_734875, int argc, object *args) /* object self_734875, object k_733936 */
 {
 object k_733936 = args[0];
    
if( (boolean_f != Cyc_is_null(((closureN)self_734875)->elements[0])) ){ 
  
mclosure0(c_7310663, (function_type)__lambda_670);c_7310663.num_args = 2;
return_direct_with_clo1(data,  k_733936,__lambda_671,  &c_7310663);
} else { 
  

return_direct_with_clo1(data,  k_733936,__lambda_671,  Cyc_car(data, ((closureN)self_734875)->elements[0]));}
;; 
}

static void __lambda_670(void *data, object self_734876, int argc, object *args) /* object self_734876, object k_733938, object a_731989_732869, object b_731990_732870 */
 {
 object k_733938 = args[0]; object a_731989_732869 = args[1]; object b_731990_732870 = args[2];
  
complex_num_type local_7310667; 

complex_num_type local_7310670; 
return_direct_with_clo1(data,  k_733938, (((closure)  k_733938)->fn),  Cyc_fast_div(data,&local_7310667, Cyc_fast_sum(data,&local_7310670, a_731989_732869, b_731990_732870), obj_int2obj(2)));; 
}

static void __lambda_659(void *data, object _, int argc, object *args) /* closure _,object k_733906, object _121_731949_732853, object v_731950_732854, object knil_731951_732855, object rest_731952_732856_raw, ... */
 {
object k_733906 = args[0]; object _121_731949_732853 = args[1]; object v_731950_732854 = args[2]; object knil_731951_732855 = args[3];
load_varargs(rest_731952_732856, args, 4, argc - 4);
  Cyc_st_add(data, "srfi/132.sld:vector-find-median");

closureN_type c_7310578;
object e_7310595 [1];
c_7310578.hdr.mark = gc_color_red;
 c_7310578.hdr.grayed = 0;
c_7310578.tag = closureN_tag;
 c_7310578.fn = (function_type)__lambda_660;
c_7310578.num_args = 0;
c_7310578.num_elements = 1;
c_7310578.elements = (object *)e_7310595;
c_7310578.elements[0] = rest_731952_732856;


closureN_type c_7310596;
object e_7310655 [4];
c_7310596.hdr.mark = gc_color_red;
 c_7310596.hdr.grayed = 0;
c_7310596.tag = closureN_tag;
 c_7310596.fn = (function_type)__lambda_662;
c_7310596.num_args = 1;
c_7310596.num_elements = 4;
c_7310596.elements = (object *)e_7310655;
c_7310596.elements[0] = _121_731949_732853;
c_7310596.elements[1] = k_733906;
c_7310596.elements[2] = knil_731951_732855;
c_7310596.elements[3] = v_731950_732854;

return_direct_with_clo1(data,(closure)&c_7310578,__lambda_660,  &c_7310596);; 
}

static void __lambda_662(void *data, object self_734862, int argc, object *args) /* object self_734862, object mean_731955_732857 */
 {
 object mean_731955_732857 = args[0];
    complex_num_type local_7310599; 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_zero_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7310599, Cyc_vector_length(data, ((closureN)self_734862)->elements[3]))) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734862)->elements[1], (((closure)  ((closureN)self_734862)->elements[1])->fn),  ((closureN)self_734862)->elements[2]);
} else { 
  
closureN_type c_7310607;
object e_7310651 [4];
c_7310607.hdr.mark = gc_color_red;
 c_7310607.hdr.grayed = 0;
c_7310607.tag = closureN_tag;
 c_7310607.fn = (function_type)__lambda_663;
c_7310607.num_args = 1;
c_7310607.num_elements = 4;
c_7310607.elements = (object *)e_7310651;
c_7310607.elements[0] = ((closureN)self_734862)->elements[0];
c_7310607.elements[1] = ((closureN)self_734862)->elements[1];
c_7310607.elements[2] = mean_731955_732857;
c_7310607.elements[3] = ((closureN)self_734862)->elements[3];



return_direct_with_clo2(data,  __glo_odd_127_scheme_base, (((closure)  __glo_odd_127_scheme_base)->fn),  &c_7310607, Cyc_vector_length(data, ((closureN)self_734862)->elements[3]));}
;; 
}

static void __lambda_663(void *data, object self_734863, int argc, object *args) /* object self_734863, object r_733910 */
 {
 object r_733910 = args[0];
  if( (boolean_f != r_733910) ){ 
  
complex_num_type local_7310614; 




return_direct_with_clo6(data,  __glo__75vector_91select_srfi_132, (((closure)  __glo__75vector_91select_srfi_132)->fn),  ((closureN)self_734863)->elements[1], ((closureN)self_734863)->elements[0], ((closureN)self_734863)->elements[3], ((inline_function_type)
                   ((closure)__glo_quotient_191_191inline_191_191_scheme_base)->fn)(data,&local_7310614, Cyc_vector_length(data, ((closureN)self_734863)->elements[3]), obj_int2obj(2)), obj_int2obj(0), Cyc_vector_length(data, ((closureN)self_734863)->elements[3]));
} else { 
  
closureN_type c_7310622;
object e_7310633 [2];
c_7310622.hdr.mark = gc_color_red;
 c_7310622.hdr.grayed = 0;
c_7310622.tag = closureN_tag;
 c_7310622.fn = (function_type)__lambda_664;
c_7310622.num_args = 1;
c_7310622.num_elements = 2;
c_7310622.elements = (object *)e_7310633;
c_7310622.elements[0] = ((closureN)self_734863)->elements[1];
c_7310622.elements[1] = ((closureN)self_734863)->elements[2];


closureN_type c_7310634;
object e_7310650 [2];
c_7310634.hdr.mark = gc_color_red;
 c_7310634.hdr.grayed = 0;
c_7310634.tag = closureN_tag;
 c_7310634.fn = (function_type)__lambda_667;
c_7310634.num_args = 0;
c_7310634.num_elements = 2;
c_7310634.elements = (object *)e_7310650;
c_7310634.elements[0] = ((closureN)self_734863)->elements[0];
c_7310634.elements[1] = ((closureN)self_734863)->elements[3];

return_direct_with_clo1(data,(closure)&c_7310622,__lambda_664,  &c_7310634);}
;; 
}

static void __lambda_667(void *data, object self_734864, int argc, object *args) /* object self_734864, object k_733915 */
 {
 object k_733915 = args[0];
  
complex_num_type local_7310640; 

complex_num_type local_7310643; 




return_direct_with_clo6(data,  __glo__75vector_91select2_srfi_132, (((closure)  __glo__75vector_91select2_srfi_132)->fn),  k_733915, ((closureN)self_734864)->elements[0], ((closureN)self_734864)->elements[1], Cyc_fast_sub(data,&local_7310640, ((inline_function_type)
                   ((closure)__glo_quotient_191_191inline_191_191_scheme_base)->fn)(data,&local_7310643, Cyc_vector_length(data, ((closureN)self_734864)->elements[1]), obj_int2obj(2)), obj_int2obj(1)), obj_int2obj(0), Cyc_vector_length(data, ((closureN)self_734864)->elements[1]));; 
}

static void __lambda_664(void *data, object self_734865, int argc, object *args) /* object self_734865, object r_733912 */
 {
 object r_733912 = args[0];
  
closureN_type c_7310624;
object e_7310628 [2];
c_7310624.hdr.mark = gc_color_red;
 c_7310624.hdr.grayed = 0;
c_7310624.tag = closureN_tag;
 c_7310624.fn = (function_type)__lambda_665;
c_7310624.num_args = 1;
c_7310624.num_elements = 2;
c_7310624.elements = (object *)e_7310628;
c_7310624.elements[0] = ((closureN)self_734865)->elements[0];
c_7310624.elements[1] = r_733912;


closureN_type c_7310629;
object e_7310632 [1];
c_7310629.hdr.mark = gc_color_red;
 c_7310629.hdr.grayed = 0;
c_7310629.tag = closureN_tag;
 c_7310629.fn = (function_type)__lambda_666;
c_7310629.num_args = 2;
c_7310629.num_elements = 1;
c_7310629.elements = (object *)e_7310632;
c_7310629.elements[0] = ((closureN)self_734865)->elements[1];

return_direct_with_clo1(data,(closure)&c_7310624,__lambda_665,  &c_7310629);; 
}

static void __lambda_666(void *data, object self_734866, int argc, object *args) /* object self_734866, object k_733914, object a_731967_732859, object b_731968_732860 */
 {
 object k_733914 = args[0]; object a_731967_732859 = args[1]; object b_731968_732860 = args[2];
  return_closcall3(data,  ((closureN)self_734866)->elements[0],  k_733914, a_731967_732859, b_731968_732860);; 
}

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

static void __lambda_660(void *data, object self_734868, int argc, object *args) /* object self_734868, object k_733918 */
 {
 object k_733918 = args[0];
    
if( (boolean_f != Cyc_is_null(((closureN)self_734868)->elements[0])) ){ 
  
mclosure0(c_7310583, (function_type)__lambda_661);c_7310583.num_args = 2;
return_direct_with_clo1(data,  k_733918,__lambda_662,  &c_7310583);
} else { 
  

return_direct_with_clo1(data,  k_733918,__lambda_662,  Cyc_car(data, ((closureN)self_734868)->elements[0]));}
;; 
}

static void __lambda_661(void *data, object self_734869, int argc, object *args) /* object self_734869, object k_733920, object a_731969_732861, object b_731970_732862 */
 {
 object k_733920 = args[0]; object a_731969_732861 = args[1]; object b_731970_732862 = args[2];
  
complex_num_type local_7310587; 

complex_num_type local_7310590; 
return_direct_with_clo1(data,  k_733920, (((closure)  k_733920)->fn),  Cyc_fast_div(data,&local_7310587, Cyc_fast_sum(data,&local_7310590, a_731969_732861, b_731970_732862), obj_int2obj(2)));; 
}

static void __lambda_585(void *data, object _, int argc, object *args) /* closure _,object k_733808, object elt_121_731758_732796, object v_731759_732797, object start_731760_732798, object end_731761_732799 */
 {
object k_733808 = args[0]; object elt_121_731758_732796 = args[1]; object v_731759_732797 = args[2]; object start_731760_732798 = args[3]; object end_731761_732799 = args[4];
  Cyc_st_add(data, "srfi/132.sld:%quick-sort!");

closureN_type c_739919;
object e_7310575 [5];
c_739919.hdr.mark = gc_color_red;
 c_739919.hdr.grayed = 0;
c_739919.tag = closureN_tag;
 c_739919.fn = (function_type)__lambda_586;
c_739919.num_args = 2;
c_739919.num_elements = 5;
c_739919.elements = (object *)e_7310575;
c_739919.elements[0] = elt_121_731758_732796;
c_739919.elements[1] = end_731761_732799;
c_739919.elements[2] = k_733808;
c_739919.elements[3] = start_731760_732798;
c_739919.elements[4] = v_731759_732797;

return_direct_with_clo2(data,(closure)&c_739919,__lambda_586,  boolean_f, boolean_f);; 
}

static void __lambda_586(void *data, object self_734781, int argc, object *args) /* object self_734781, object median_732802, object swap_732803 */
 {
 object median_732802 = args[0]; object swap_732803 = args[1];
  
closureN_type c_739921;
object e_7310571 [6];
c_739921.hdr.mark = gc_color_red;
 c_739921.hdr.grayed = 0;
c_739921.tag = closureN_tag;
 c_739921.fn = (function_type)__lambda_821;
c_739921.num_args = 1;
c_739921.num_elements = 6;
c_739921.elements = (object *)e_7310571;
c_739921.elements[0] = ((closureN)self_734781)->elements[0];
c_739921.elements[1] = ((closureN)self_734781)->elements[1];
c_739921.elements[2] = ((closureN)self_734781)->elements[2];
c_739921.elements[3] = ((closureN)self_734781)->elements[3];
c_739921.elements[4] = swap_732803;
c_739921.elements[5] = ((closureN)self_734781)->elements[4];


pair_type local_7310574; 
return_direct_with_clo1(data,(closure)&c_739921,__lambda_821,  set_cell_as_expr(&local_7310574, median_732802));; 
}

static void __lambda_821(void *data, object self_734782, int argc, object *args) /* object self_734782, object median_732802 */
 {
 object median_732802 = args[0];
  
closureN_type c_739923;
object e_7310566 [6];
c_739923.hdr.mark = gc_color_red;
 c_739923.hdr.grayed = 0;
c_739923.tag = closureN_tag;
 c_739923.fn = (function_type)__lambda_820;
c_739923.num_args = 1;
c_739923.num_elements = 6;
c_739923.elements = (object *)e_7310566;
c_739923.elements[0] = ((closureN)self_734782)->elements[0];
c_739923.elements[1] = ((closureN)self_734782)->elements[1];
c_739923.elements[2] = ((closureN)self_734782)->elements[2];
c_739923.elements[3] = median_732802;
c_739923.elements[4] = ((closureN)self_734782)->elements[3];
c_739923.elements[5] = ((closureN)self_734782)->elements[5];


pair_type local_7310569; 
return_direct_with_clo1(data,(closure)&c_739923,__lambda_820,  set_cell_as_expr(&local_7310569, ((closureN)self_734782)->elements[4]));; 
}

static void __lambda_820(void *data, object self_734783, int argc, object *args) /* object self_734783, object swap_732803 */
 {
 object swap_732803 = args[0];
  
closureN_type c_739925;
object e_7310510 [7];
c_739925.hdr.mark = gc_color_red;
 c_739925.hdr.grayed = 0;
c_739925.tag = closureN_tag;
 c_739925.fn = (function_type)__lambda_587;
c_739925.num_args = 1;
c_739925.num_elements = 7;
c_739925.elements = (object *)e_7310510;
c_739925.elements[0] = ((closureN)self_734783)->elements[0];
c_739925.elements[1] = ((closureN)self_734783)->elements[1];
c_739925.elements[2] = ((closureN)self_734783)->elements[2];
c_739925.elements[3] = ((closureN)self_734783)->elements[3];
c_739925.elements[4] = ((closureN)self_734783)->elements[4];
c_739925.elements[5] = swap_732803;
c_739925.elements[6] = ((closureN)self_734783)->elements[5];


closureN_type c_7310511;
object e_7310565 [2];
c_7310511.hdr.mark = gc_color_red;
 c_7310511.hdr.grayed = 0;
c_7310511.tag = closureN_tag;
 c_7310511.fn = (function_type)__lambda_653;
c_7310511.num_args = 3;
c_7310511.num_elements = 2;
c_7310511.elements = (object *)e_7310565;
c_7310511.elements[0] = swap_732803;
c_7310511.elements[1] = ((closureN)self_734783)->elements[5];

return_direct_with_clo1(data,(closure)&c_739925,__lambda_587,  &c_7310511);; 
}

static void __lambda_653(void *data, object self_734784, int argc, object *args) /* object self_734784, object k_733895, object l_731762_732806, object r_731763_732807, object n_731764_732808 */
 {
 object k_733895 = args[0]; object l_731762_732806 = args[1]; object r_731763_732807 = args[2]; object n_731764_732808 = args[3];
    
if( (boolean_f != Cyc_num_fast_gt_op(data, n_731764_732808, obj_int2obj(0))) ){ 
  
closureN_type c_7310515;
object e_7310560 [6];
c_7310515.hdr.mark = gc_color_red;
 c_7310515.hdr.grayed = 0;
c_7310515.tag = closureN_tag;
 c_7310515.fn = (function_type)__lambda_654;
c_7310515.num_args = 1;
c_7310515.num_elements = 6;
c_7310515.elements = (object *)e_7310560;
c_7310515.elements[0] = k_733895;
c_7310515.elements[1] = l_731762_732806;
c_7310515.elements[2] = n_731764_732808;
c_7310515.elements[3] = r_731763_732807;
c_7310515.elements[4] = ((closureN)self_734784)->elements[0];
c_7310515.elements[5] = ((closureN)self_734784)->elements[1];



return_direct_with_clo1(data,(closure)&c_7310515,__lambda_654,  Cyc_vector_ref(data, ((closureN)self_734784)->elements[1], l_731762_732806));
} else { 
  return_direct_with_clo1(data,  k_733895, (((closure)  k_733895)->fn),  Cyc_VOID);}
;; 
}

static void __lambda_654(void *data, object self_734785, int argc, object *args) /* object self_734785, object r_733897 */
 {
 object r_733897 = args[0];
  
closureN_type c_7310517;
object e_7310555 [5];
c_7310517.hdr.mark = gc_color_red;
 c_7310517.hdr.grayed = 0;
c_7310517.tag = closureN_tag;
 c_7310517.fn = (function_type)__lambda_655;
c_7310517.num_args = 2;
c_7310517.num_elements = 5;
c_7310517.elements = (object *)e_7310555;
c_7310517.elements[0] = ((closureN)self_734785)->elements[0];
c_7310517.elements[1] = ((closureN)self_734785)->elements[1];
c_7310517.elements[2] = ((closureN)self_734785)->elements[2];
c_7310517.elements[3] = ((closureN)self_734785)->elements[4];
c_7310517.elements[4] = ((closureN)self_734785)->elements[5];


complex_num_type local_7310558; 
return_direct_with_clo2(data,(closure)&c_7310517,__lambda_655,  r_733897, Cyc_fast_sub(data,&local_7310558, ((closureN)self_734785)->elements[3], obj_int2obj(1)));; 
}

static void __lambda_655(void *data, object self_734786, int argc, object *args) /* object self_734786, object x_731765_732809, object r_911_731766_732810 */
 {
 object x_731765_732809 = args[0]; object r_911_731766_732810 = args[1];
  
closureN_type c_7310519;
object e_7310551 [7];
c_7310519.hdr.mark = gc_color_red;
 c_7310519.hdr.grayed = 0;
c_7310519.tag = closureN_tag;
 c_7310519.fn = (function_type)__lambda_656;
c_7310519.num_args = 1;
c_7310519.num_elements = 7;
c_7310519.elements = (object *)e_7310551;
c_7310519.elements[0] = ((closureN)self_734786)->elements[0];
c_7310519.elements[1] = ((closureN)self_734786)->elements[1];
c_7310519.elements[2] = ((closureN)self_734786)->elements[2];
c_7310519.elements[3] = r_911_731766_732810;
c_7310519.elements[4] = ((closureN)self_734786)->elements[3];
c_7310519.elements[5] = ((closureN)self_734786)->elements[4];
c_7310519.elements[6] = x_731765_732809;



return_direct_with_clo1(data,(closure)&c_7310519,__lambda_656,  Cyc_vector_ref(data, ((closureN)self_734786)->elements[4], r_911_731766_732810));; 
}

static void __lambda_656(void *data, object self_734787, int argc, object *args) /* object self_734787, object r_733903 */
 {
 object r_733903 = args[0];
  
closureN_type c_7310521;
object e_7310545 [7];
c_7310521.hdr.mark = gc_color_red;
 c_7310521.hdr.grayed = 0;
c_7310521.tag = closureN_tag;
 c_7310521.fn = (function_type)__lambda_657;
c_7310521.num_args = 1;
c_7310521.num_elements = 7;
c_7310521.elements = (object *)e_7310545;
c_7310521.elements[0] = ((closureN)self_734787)->elements[0];
c_7310521.elements[1] = ((closureN)self_734787)->elements[1];
c_7310521.elements[2] = ((closureN)self_734787)->elements[2];
c_7310521.elements[3] = ((closureN)self_734787)->elements[3];
c_7310521.elements[4] = ((closureN)self_734787)->elements[4];
c_7310521.elements[5] = ((closureN)self_734787)->elements[5];
c_7310521.elements[6] = ((closureN)self_734787)->elements[6];


object c_7310548 = Cyc_vector_set_cps(data,(closure)&c_7310521,((closureN)self_734787)->elements[5], ((closureN)self_734787)->elements[1], r_733903);
return_closcall1(data,(closure)&c_7310521,  c_7310548);; 
}

static void __lambda_657(void *data, object self_734788, int argc, object *args) /* object self_734788, object r_733899 */
 {

  
closureN_type c_7310523;
object e_7310538 [5];
c_7310523.hdr.mark = gc_color_red;
 c_7310523.hdr.grayed = 0;
c_7310523.tag = closureN_tag;
 c_7310523.fn = (function_type)__lambda_658;
c_7310523.num_args = 1;
c_7310523.num_elements = 5;
c_7310523.elements = (object *)e_7310538;
c_7310523.elements[0] = ((closureN)self_734788)->elements[0];
c_7310523.elements[1] = ((closureN)self_734788)->elements[1];
c_7310523.elements[2] = ((closureN)self_734788)->elements[2];
c_7310523.elements[3] = ((closureN)self_734788)->elements[3];
c_7310523.elements[4] = ((closureN)self_734788)->elements[4];


object c_7310541 = Cyc_vector_set_cps(data,(closure)&c_7310523,((closureN)self_734788)->elements[5], ((closureN)self_734788)->elements[3], ((closureN)self_734788)->elements[6]);
return_closcall1(data,(closure)&c_7310523,  c_7310541);; 
}

static void __lambda_658(void *data, object self_734789, int argc, object *args) /* object self_734789, object r_733900 */
 {

  


complex_num_type local_7310531; 

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

static void __lambda_587(void *data, object self_734790, int argc, object *args) /* object self_734790, object r_733894 */
 {
 object r_733894 = args[0];
  
closureN_type c_739927;
object e_7310506 [7];
c_739927.hdr.mark = gc_color_red;
 c_739927.hdr.grayed = 0;
c_739927.tag = closureN_tag;
 c_739927.fn = (function_type)__lambda_588;
c_739927.num_args = 1;
c_739927.num_elements = 7;
c_739927.elements = (object *)e_7310506;
c_739927.elements[0] = ((closureN)self_734790)->elements[0];
c_739927.elements[1] = ((closureN)self_734790)->elements[1];
c_739927.elements[2] = ((closureN)self_734790)->elements[2];
c_739927.elements[3] = ((closureN)self_734790)->elements[3];
c_739927.elements[4] = ((closureN)self_734790)->elements[4];
c_739927.elements[5] = ((closureN)self_734790)->elements[5];
c_739927.elements[6] = ((closureN)self_734790)->elements[6];



return_direct_with_clo1(data,(closure)&c_739927,__lambda_588,  Cyc_set_cell(data, ((closureN)self_734790)->elements[5], r_733894));; 
}

static void __lambda_588(void *data, object self_734791, int argc, object *args) /* object self_734791, object r_733809 */
 {

  
closureN_type c_739929;
object e_7310456 [7];
c_739929.hdr.mark = gc_color_red;
 c_739929.hdr.grayed = 0;
c_739929.tag = closureN_tag;
 c_739929.fn = (function_type)__lambda_589;
c_739929.num_args = 1;
c_739929.num_elements = 7;
c_739929.elements = (object *)e_7310456;
c_739929.elements[0] = ((closureN)self_734791)->elements[0];
c_739929.elements[1] = ((closureN)self_734791)->elements[1];
c_739929.elements[2] = ((closureN)self_734791)->elements[2];
c_739929.elements[3] = ((closureN)self_734791)->elements[3];
c_739929.elements[4] = ((closureN)self_734791)->elements[4];
c_739929.elements[5] = ((closureN)self_734791)->elements[5];
c_739929.elements[6] = ((closureN)self_734791)->elements[6];


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

return_direct_with_clo1(data,(closure)&c_739929,__lambda_589,  &c_7310457);; 
}

static void __lambda_645(void *data, object self_734792, int argc, object *args) /* object self_734792, object k_733886, object v1_731767_732811, object v2_731768_732812, object v3_731769_732813 */
 {
 object k_733886 = args[0]; object v1_731767_732811 = args[1]; object v2_731768_732812 = args[2]; object v3_731769_732813 = args[3];
  
closureN_type c_7310459;
object e_7310488 [3];
c_7310459.hdr.mark = gc_color_red;
 c_7310459.hdr.grayed = 0;
c_7310459.tag = closureN_tag;
 c_7310459.fn = (function_type)__lambda_646;
c_7310459.num_args = 1;
c_7310459.num_elements = 3;
c_7310459.elements = (object *)e_7310488;
c_7310459.elements[0] = ((closureN)self_734792)->elements[0];
c_7310459.elements[1] = k_733886;
c_7310459.elements[2] = v3_731769_732813;


closureN_type c_7310489;
object e_7310504 [3];
c_7310489.hdr.mark = gc_color_red;
 c_7310489.hdr.grayed = 0;
c_7310489.tag = closureN_tag;
 c_7310489.fn = (function_type)__lambda_651;
c_7310489.num_args = 0;
c_7310489.num_elements = 3;
c_7310489.elements = (object *)e_7310504;
c_7310489.elements[0] = ((closureN)self_734792)->elements[0];
c_7310489.elements[1] = v1_731767_732811;
c_7310489.elements[2] = v2_731768_732812;

return_direct_with_clo1(data,(closure)&c_7310459,__lambda_646,  &c_7310489);; 
}

static void __lambda_651(void *data, object self_734793, int argc, object *args) /* object self_734793, object k_733892 */
 {
 object k_733892 = args[0];
  
closureN_type c_7310492;
object e_7310501 [3];
c_7310492.hdr.mark = gc_color_red;
 c_7310492.hdr.grayed = 0;
c_7310492.tag = closureN_tag;
 c_7310492.fn = (function_type)__lambda_652;
c_7310492.num_args = 1;
c_7310492.num_elements = 3;
c_7310492.elements = (object *)e_7310501;
c_7310492.elements[0] = k_733892;
c_7310492.elements[1] = ((closureN)self_734793)->elements[1];
c_7310492.elements[2] = ((closureN)self_734793)->elements[2];

return_closcall3(data,  ((closureN)self_734793)->elements[0],  &c_7310492, ((closureN)self_734793)->elements[1], ((closureN)self_734793)->elements[2]);; 
}

static void __lambda_652(void *data, object self_734794, int argc, object *args) /* object self_734794, object r_733893 */
 {
 object r_733893 = args[0];
  if( (boolean_f != r_733893) ){ 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734794)->elements[0], ((closureN)self_734794)->elements[1], ((closureN)self_734794)->elements[2]);
} else { 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734794)->elements[0], ((closureN)self_734794)->elements[2], ((closureN)self_734794)->elements[1]);}
;; 
}

static void __lambda_646(void *data, object self_734795, int argc, object *args) /* object self_734795, object r_733887 */
 {
 object r_733887 = args[0];
  
closureN_type c_7310461;
object e_7310465 [2];
c_7310461.hdr.mark = gc_color_red;
 c_7310461.hdr.grayed = 0;
c_7310461.tag = closureN_tag;
 c_7310461.fn = (function_type)__lambda_647;
c_7310461.num_args = 1;
c_7310461.num_elements = 2;
c_7310461.elements = (object *)e_7310465;
c_7310461.elements[0] = ((closureN)self_734795)->elements[1];
c_7310461.elements[1] = r_733887;


closureN_type c_7310466;
object e_7310487 [2];
c_7310466.hdr.mark = gc_color_red;
 c_7310466.hdr.grayed = 0;
c_7310466.tag = closureN_tag;
 c_7310466.fn = (function_type)__lambda_648;
c_7310466.num_args = 2;
c_7310466.num_elements = 2;
c_7310466.elements = (object *)e_7310487;
c_7310466.elements[0] = ((closureN)self_734795)->elements[0];
c_7310466.elements[1] = ((closureN)self_734795)->elements[2];

return_direct_with_clo1(data,(closure)&c_7310461,__lambda_647,  &c_7310466);; 
}

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

return_closcall3(data,  ((closureN)self_734796)->elements[0],  &c_7310469, big_731771_732815, ((closureN)self_734796)->elements[1]);; 
}

static void __lambda_649(void *data, object self_734797, int argc, object *args) /* object self_734797, object r_733890 */
 {
 object r_733890 = args[0];
  if( (boolean_f != r_733890) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734797)->elements[2], (((closure)  ((closureN)self_734797)->elements[2])->fn),  ((closureN)self_734797)->elements[0]);
} else { 
  
closureN_type c_7310475;
object e_7310482 [3];
c_7310475.hdr.mark = gc_color_red;
 c_7310475.hdr.grayed = 0;
c_7310475.tag = closureN_tag;
 c_7310475.fn = (function_type)__lambda_650;
c_7310475.num_args = 1;
c_7310475.num_elements = 3;
c_7310475.elements = (object *)e_7310482;
c_7310475.elements[0] = ((closureN)self_734797)->elements[2];
c_7310475.elements[1] = ((closureN)self_734797)->elements[3];
c_7310475.elements[2] = ((closureN)self_734797)->elements[4];

return_closcall3(data,  ((closureN)self_734797)->elements[1],  &c_7310475, ((closureN)self_734797)->elements[3], ((closureN)self_734797)->elements[4]);}
;; 
}

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

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

static void __lambda_589(void *data, object self_734800, int argc, object *args) /* object self_734800, object r_733885 */
 {
 object r_733885 = args[0];
  
closureN_type c_739931;
object e_7310452 [7];
c_739931.hdr.mark = gc_color_red;
 c_739931.hdr.grayed = 0;
c_739931.tag = closureN_tag;
 c_739931.fn = (function_type)__lambda_590;
c_739931.num_args = 1;
c_739931.num_elements = 7;
c_739931.elements = (object *)e_7310452;
c_739931.elements[0] = ((closureN)self_734800)->elements[0];
c_739931.elements[1] = ((closureN)self_734800)->elements[1];
c_739931.elements[2] = ((closureN)self_734800)->elements[2];
c_739931.elements[3] = ((closureN)self_734800)->elements[3];
c_739931.elements[4] = ((closureN)self_734800)->elements[4];
c_739931.elements[5] = ((closureN)self_734800)->elements[5];
c_739931.elements[6] = ((closureN)self_734800)->elements[6];



return_direct_with_clo1(data,(closure)&c_739931,__lambda_590,  Cyc_set_cell(data, ((closureN)self_734800)->elements[3], r_733885));; 
}

static void __lambda_590(void *data, object self_734801, int argc, object *args) /* object self_734801, object r_733810 */
 {

  
closureN_type c_739933;
object e_7310449 [5];
c_739933.hdr.mark = gc_color_red;
 c_739933.hdr.grayed = 0;
c_739933.tag = closureN_tag;
 c_739933.fn = (function_type)__lambda_591;
c_739933.num_args = 2;
c_739933.num_elements = 5;
c_739933.elements = (object *)e_7310449;
c_739933.elements[0] = ((closureN)self_734801)->elements[0];
c_739933.elements[1] = ((closureN)self_734801)->elements[2];
c_739933.elements[2] = ((closureN)self_734801)->elements[3];
c_739933.elements[3] = ((closureN)self_734801)->elements[5];
c_739933.elements[4] = ((closureN)self_734801)->elements[6];

return_direct_with_clo2(data,(closure)&c_739933,__lambda_591,  ((closureN)self_734801)->elements[4], ((closureN)self_734801)->elements[1]);; 
}

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

return_direct_with_clo1(data,(closure)&c_739935,__lambda_592,  boolean_f);; 
}

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


pair_type local_7310447; 
return_direct_with_clo1(data,(closure)&c_739937,__lambda_819,  set_cell_as_expr(&local_7310447, recur_731775_732818));; 
}

static void __lambda_819(void *data, object self_734804, int argc, object *args) /* object self_734804, object recur_731775_732818 */
 {
 object recur_731775_732818 = args[0];
  
closureN_type c_739939;
object e_739953 [4];
c_739939.hdr.mark = gc_color_red;
 c_739939.hdr.grayed = 0;
c_739939.tag = closureN_tag;
 c_739939.fn = (function_type)__lambda_593;
c_739939.num_args = 1;
c_739939.num_elements = 4;
c_739939.elements = (object *)e_739953;
c_739939.elements[0] = ((closureN)self_734804)->elements[1];
c_739939.elements[1] = ((closureN)self_734804)->elements[2];
c_739939.elements[2] = ((closureN)self_734804)->elements[4];
c_739939.elements[3] = recur_731775_732818;


closureN_type c_739954;
object e_7310443 [5];
c_739954.hdr.mark = gc_color_red;
 c_739954.hdr.grayed = 0;
c_739954.tag = closureN_tag;
 c_739954.fn = (function_type)__lambda_595;
c_739954.num_args = 2;
c_739954.num_elements = 5;
c_739954.elements = (object *)e_7310443;
c_739954.elements[0] = ((closureN)self_734804)->elements[0];
c_739954.elements[1] = ((closureN)self_734804)->elements[3];
c_739954.elements[2] = recur_731775_732818;
c_739954.elements[3] = ((closureN)self_734804)->elements[5];
c_739954.elements[4] = ((closureN)self_734804)->elements[6];

return_direct_with_clo1(data,(closure)&c_739939,__lambda_593,  &c_739954);; 
}

static void __lambda_595(void *data, object self_734805, int argc, object *args) /* object self_734805, object k_733813, object l_731776_732819, object r_731777_732820 */
 {
 object k_733813 = args[0]; object l_731776_732819 = args[1]; object r_731777_732820 = args[2];
    
  complex_num_type local_739959; 
if( (boolean_f != Cyc_num_fast_lt_op(data, obj_int2obj(10), Cyc_fast_sub(data,&local_739959, r_731777_732820, l_731776_732819))) ){ 
  
closureN_type c_739961;
object e_7310436 [8];
c_739961.hdr.mark = gc_color_red;
 c_739961.hdr.grayed = 0;
c_739961.tag = closureN_tag;
 c_739961.fn = (function_type)__lambda_596;
c_739961.num_args = 1;
c_739961.num_elements = 8;
c_739961.elements = (object *)e_7310436;
c_739961.elements[0] = ((closureN)self_734805)->elements[0];
c_739961.elements[1] = k_733813;
c_739961.elements[2] = l_731776_732819;
c_739961.elements[3] = ((closureN)self_734805)->elements[1];
c_739961.elements[4] = r_731777_732820;
c_739961.elements[5] = ((closureN)self_734805)->elements[2];
c_739961.elements[6] = ((closureN)self_734805)->elements[3];
c_739961.elements[7] = ((closureN)self_734805)->elements[4];



return_direct_with_clo1(data,(closure)&c_739961,__lambda_596,  Cyc_vector_ref(data, ((closureN)self_734805)->elements[4], l_731776_732819));
} else { 
  return_direct_with_clo5(data,  __glo__75vector_91insert_91sort_67_srfi_132, (((closure)  __glo__75vector_91insert_91sort_67_srfi_132)->fn),  k_733813, ((closureN)self_734805)->elements[0], ((closureN)self_734805)->elements[4], l_731776_732819, r_731777_732820);}
;; 
}

static void __lambda_596(void *data, object self_734806, int argc, object *args) /* object self_734806, object r_733878 */
 {
 object r_733878 = args[0];
  
closureN_type c_739963;
object e_7310424 [9];
c_739963.hdr.mark = gc_color_red;
 c_739963.hdr.grayed = 0;
c_739963.tag = closureN_tag;
 c_739963.fn = (function_type)__lambda_597;
c_739963.num_args = 1;
c_739963.num_elements = 9;
c_739963.elements = (object *)e_7310424;
c_739963.elements[0] = ((closureN)self_734806)->elements[0];
c_739963.elements[1] = ((closureN)self_734806)->elements[1];
c_739963.elements[2] = ((closureN)self_734806)->elements[2];
c_739963.elements[3] = ((closureN)self_734806)->elements[3];
c_739963.elements[4] = ((closureN)self_734806)->elements[4];
c_739963.elements[5] = r_733878;
c_739963.elements[6] = ((closureN)self_734806)->elements[5];
c_739963.elements[7] = ((closureN)self_734806)->elements[6];
c_739963.elements[8] = ((closureN)self_734806)->elements[7];




complex_num_type local_7310430; 

complex_num_type local_7310433; 
return_direct_with_clo1(data,(closure)&c_739963,__lambda_597,  Cyc_vector_ref(data, ((closureN)self_734806)->elements[7], ((inline_function_type)
                   ((closure)__glo_quotient_191_191inline_191_191_scheme_base)->fn)(data,&local_7310430, Cyc_fast_sum(data,&local_7310433, ((closureN)self_734806)->elements[2], ((closureN)self_734806)->elements[4]), obj_int2obj(2))));; 
}

static void __lambda_597(void *data, object self_734807, int argc, object *args) /* object self_734807, object r_733879 */
 {
 object r_733879 = args[0];
  
closureN_type c_739965;
object e_7310416 [10];
c_739965.hdr.mark = gc_color_red;
 c_739965.hdr.grayed = 0;
c_739965.tag = closureN_tag;
 c_739965.fn = (function_type)__lambda_598;
c_739965.num_args = 1;
c_739965.num_elements = 10;
c_739965.elements = (object *)e_7310416;
c_739965.elements[0] = ((closureN)self_734807)->elements[0];
c_739965.elements[1] = ((closureN)self_734807)->elements[1];
c_739965.elements[2] = ((closureN)self_734807)->elements[2];
c_739965.elements[3] = ((closureN)self_734807)->elements[3];
c_739965.elements[4] = ((closureN)self_734807)->elements[4];
c_739965.elements[5] = ((closureN)self_734807)->elements[5];
c_739965.elements[6] = r_733879;
c_739965.elements[7] = ((closureN)self_734807)->elements[6];
c_739965.elements[8] = ((closureN)self_734807)->elements[7];
c_739965.elements[9] = ((closureN)self_734807)->elements[8];




complex_num_type local_7310422; 
return_direct_with_clo1(data,(closure)&c_739965,__lambda_598,  Cyc_vector_ref(data, ((closureN)self_734807)->elements[8], Cyc_fast_sub(data,&local_7310422, ((closureN)self_734807)->elements[4], obj_int2obj(1))));; 
}

static void __lambda_598(void *data, object self_734808, int argc, object *args) /* object self_734808, object r_733880 */
 {
 object r_733880 = args[0];
  


closureN_type c_739970;
object e_7310413 [7];
c_739970.hdr.mark = gc_color_red;
 c_739970.hdr.grayed = 0;
c_739970.tag = closureN_tag;
 c_739970.fn = (function_type)__lambda_599;
c_739970.num_args = 1;
c_739970.num_elements = 7;
c_739970.elements = (object *)e_7310413;
c_739970.elements[0] = ((closureN)self_734808)->elements[0];
c_739970.elements[1] = ((closureN)self_734808)->elements[1];
c_739970.elements[2] = ((closureN)self_734808)->elements[2];
c_739970.elements[3] = ((closureN)self_734808)->elements[4];
c_739970.elements[4] = ((closureN)self_734808)->elements[7];
c_739970.elements[5] = ((closureN)self_734808)->elements[8];
c_739970.elements[6] = ((closureN)self_734808)->elements[9];

return_closcall4(data,  car(((closureN)self_734808)->elements[3]),  &c_739970, ((closureN)self_734808)->elements[5], ((closureN)self_734808)->elements[6], r_733880);; 
}

static void __lambda_599(void *data, object self_734809, int argc, object *args) /* object self_734809, object pivot_731778_732821 */
 {
 object pivot_731778_732821 = args[0];
  
closureN_type c_739972;
object e_7310412 [8];
c_739972.hdr.mark = gc_color_red;
 c_739972.hdr.grayed = 0;
c_739972.tag = closureN_tag;
 c_739972.fn = (function_type)__lambda_600;
c_739972.num_args = 3;
c_739972.num_elements = 8;
c_739972.elements = (object *)e_7310412;
c_739972.elements[0] = ((closureN)self_734809)->elements[0];
c_739972.elements[1] = ((closureN)self_734809)->elements[1];
c_739972.elements[2] = ((closureN)self_734809)->elements[2];
c_739972.elements[3] = pivot_731778_732821;
c_739972.elements[4] = ((closureN)self_734809)->elements[3];
c_739972.elements[5] = ((closureN)self_734809)->elements[4];
c_739972.elements[6] = ((closureN)self_734809)->elements[5];
c_739972.elements[7] = ((closureN)self_734809)->elements[6];

return_direct_with_clo3(data,(closure)&c_739972,__lambda_600,  boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_600(void *data, object self_734810, int argc, object *args) /* object self_734810, object lscan_731779_732822, object rscan_731780_732823, object done_731781_732824 */
 {
 object lscan_731779_732822 = args[0]; object rscan_731780_732823 = args[1]; object done_731781_732824 = args[2];
  
closureN_type c_739974;
object e_7310408 [10];
c_739974.hdr.mark = gc_color_red;
 c_739974.hdr.grayed = 0;
c_739974.tag = closureN_tag;
 c_739974.fn = (function_type)__lambda_818;
c_739974.num_args = 1;
c_739974.num_elements = 10;
c_739974.elements = (object *)e_7310408;
c_739974.elements[0] = done_731781_732824;
c_739974.elements[1] = ((closureN)self_734810)->elements[0];
c_739974.elements[2] = ((closureN)self_734810)->elements[1];
c_739974.elements[3] = ((closureN)self_734810)->elements[2];
c_739974.elements[4] = ((closureN)self_734810)->elements[3];
c_739974.elements[5] = ((closureN)self_734810)->elements[4];
c_739974.elements[6] = ((closureN)self_734810)->elements[5];
c_739974.elements[7] = rscan_731780_732823;
c_739974.elements[8] = ((closureN)self_734810)->elements[6];
c_739974.elements[9] = ((closureN)self_734810)->elements[7];


pair_type local_7310411; 
return_direct_with_clo1(data,(closure)&c_739974,__lambda_818,  set_cell_as_expr(&local_7310411, lscan_731779_732822));; 
}

static void __lambda_818(void *data, object self_734811, int argc, object *args) /* object self_734811, object lscan_731779_732822 */
 {
 object lscan_731779_732822 = args[0];
  
closureN_type c_739976;
object e_7310403 [10];
c_739976.hdr.mark = gc_color_red;
 c_739976.hdr.grayed = 0;
c_739976.tag = closureN_tag;
 c_739976.fn = (function_type)__lambda_817;
c_739976.num_args = 1;
c_739976.num_elements = 10;
c_739976.elements = (object *)e_7310403;
c_739976.elements[0] = ((closureN)self_734811)->elements[0];
c_739976.elements[1] = ((closureN)self_734811)->elements[1];
c_739976.elements[2] = ((closureN)self_734811)->elements[2];
c_739976.elements[3] = ((closureN)self_734811)->elements[3];
c_739976.elements[4] = lscan_731779_732822;
c_739976.elements[5] = ((closureN)self_734811)->elements[4];
c_739976.elements[6] = ((closureN)self_734811)->elements[5];
c_739976.elements[7] = ((closureN)self_734811)->elements[6];
c_739976.elements[8] = ((closureN)self_734811)->elements[8];
c_739976.elements[9] = ((closureN)self_734811)->elements[9];


pair_type local_7310406; 
return_direct_with_clo1(data,(closure)&c_739976,__lambda_817,  set_cell_as_expr(&local_7310406, ((closureN)self_734811)->elements[7]));; 
}

static void __lambda_817(void *data, object self_734812, int argc, object *args) /* object self_734812, object rscan_731780_732823 */
 {
 object rscan_731780_732823 = args[0];
  
closureN_type c_739978;
object e_7310398 [10];
c_739978.hdr.mark = gc_color_red;
 c_739978.hdr.grayed = 0;
c_739978.tag = closureN_tag;
 c_739978.fn = (function_type)__lambda_816;
c_739978.num_args = 1;
c_739978.num_elements = 10;
c_739978.elements = (object *)e_7310398;
c_739978.elements[0] = ((closureN)self_734812)->elements[1];
c_739978.elements[1] = ((closureN)self_734812)->elements[2];
c_739978.elements[2] = ((closureN)self_734812)->elements[3];
c_739978.elements[3] = ((closureN)self_734812)->elements[4];
c_739978.elements[4] = ((closureN)self_734812)->elements[5];
c_739978.elements[5] = ((closureN)self_734812)->elements[6];
c_739978.elements[6] = ((closureN)self_734812)->elements[7];
c_739978.elements[7] = rscan_731780_732823;
c_739978.elements[8] = ((closureN)self_734812)->elements[8];
c_739978.elements[9] = ((closureN)self_734812)->elements[9];


pair_type local_7310401; 
return_direct_with_clo1(data,(closure)&c_739978,__lambda_816,  set_cell_as_expr(&local_7310401, ((closureN)self_734812)->elements[0]));; 
}

static void __lambda_816(void *data, object self_734813, int argc, object *args) /* object self_734813, object done_731781_732824 */
 {
 object done_731781_732824 = args[0];
  
closureN_type c_739980;
object e_7310275 [11];
c_739980.hdr.mark = gc_color_red;
 c_739980.hdr.grayed = 0;
c_739980.tag = closureN_tag;
 c_739980.fn = (function_type)__lambda_601;
c_739980.num_args = 1;
c_739980.num_elements = 11;
c_739980.elements = (object *)e_7310275;
c_739980.elements[0] = done_731781_732824;
c_739980.elements[1] = ((closureN)self_734813)->elements[0];
c_739980.elements[2] = ((closureN)self_734813)->elements[1];
c_739980.elements[3] = ((closureN)self_734813)->elements[2];
c_739980.elements[4] = ((closureN)self_734813)->elements[3];
c_739980.elements[5] = ((closureN)self_734813)->elements[4];
c_739980.elements[6] = ((closureN)self_734813)->elements[5];
c_739980.elements[7] = ((closureN)self_734813)->elements[6];
c_739980.elements[8] = ((closureN)self_734813)->elements[7];
c_739980.elements[9] = ((closureN)self_734813)->elements[8];
c_739980.elements[10] = ((closureN)self_734813)->elements[9];


closureN_type c_7310276;
object e_7310397 [5];
c_7310276.hdr.mark = gc_color_red;
 c_7310276.hdr.grayed = 0;
c_7310276.tag = closureN_tag;
 c_7310276.fn = (function_type)__lambda_632;
c_7310276.num_args = 4;
c_7310276.num_elements = 5;
c_7310276.elements = (object *)e_7310397;
c_7310276.elements[0] = done_731781_732824;
c_7310276.elements[1] = ((closureN)self_734813)->elements[0];
c_7310276.elements[2] = ((closureN)self_734813)->elements[4];
c_7310276.elements[3] = ((closureN)self_734813)->elements[7];
c_7310276.elements[4] = ((closureN)self_734813)->elements[9];

return_direct_with_clo1(data,(closure)&c_739980,__lambda_601,  &c_7310276);; 
}

static void __lambda_632(void *data, object self_734814, int argc, object *args) /* object self_734814, object k_733862, object i_731782_732825, object j_731783_732826, object k_731784_732827, object m_731785_732828 */
 {
 object k_733862 = args[0]; object i_731782_732825 = args[1]; object j_731783_732826 = args[2]; object k_731784_732827 = args[3]; object m_731785_732828 = args[4];
  
closureN_type c_7310278;
object e_7310396 [8];
c_7310278.hdr.mark = gc_color_red;
 c_7310278.hdr.grayed = 0;
c_7310278.tag = closureN_tag;
 c_7310278.fn = (function_type)__lambda_633;
c_7310278.num_args = 2;
c_7310278.num_elements = 8;
c_7310278.elements = (object *)e_7310396;
c_7310278.elements[0] = ((closureN)self_734814)->elements[0];
c_7310278.elements[1] = ((closureN)self_734814)->elements[1];
c_7310278.elements[2] = k_731784_732827;
c_7310278.elements[3] = k_733862;
c_7310278.elements[4] = m_731785_732828;
c_7310278.elements[5] = ((closureN)self_734814)->elements[2];
c_7310278.elements[6] = ((closureN)self_734814)->elements[3];
c_7310278.elements[7] = ((closureN)self_734814)->elements[4];

return_direct_with_clo2(data,(closure)&c_7310278,__lambda_633,  i_731782_732825, j_731783_732826);; 
}

static void __lambda_633(void *data, object self_734815, int argc, object *args) /* object self_734815, object i_731787_732829, object j_731788_732830 */
 {
 object i_731787_732829 = args[0]; object j_731788_732830 = args[1];
  
closureN_type c_7310280;
object e_7310395 [10];
c_7310280.hdr.mark = gc_color_red;
 c_7310280.hdr.grayed = 0;
c_7310280.tag = closureN_tag;
 c_7310280.fn = (function_type)__lambda_634;
c_7310280.num_args = 1;
c_7310280.num_elements = 10;
c_7310280.elements = (object *)e_7310395;
c_7310280.elements[0] = ((closureN)self_734815)->elements[0];
c_7310280.elements[1] = ((closureN)self_734815)->elements[1];
c_7310280.elements[2] = i_731787_732829;
c_7310280.elements[3] = j_731788_732830;
c_7310280.elements[4] = ((closureN)self_734815)->elements[2];
c_7310280.elements[5] = ((closureN)self_734815)->elements[3];
c_7310280.elements[6] = ((closureN)self_734815)->elements[4];
c_7310280.elements[7] = ((closureN)self_734815)->elements[5];
c_7310280.elements[8] = ((closureN)self_734815)->elements[6];
c_7310280.elements[9] = ((closureN)self_734815)->elements[7];

return_direct_with_clo1(data,(closure)&c_7310280,__lambda_634,  boolean_f);; 
}

static void __lambda_634(void *data, object self_734816, int argc, object *args) /* object self_734816, object lp_731789_732831 */
 {
 object lp_731789_732831 = args[0];
  
closureN_type c_7310282;
object e_7310391 [10];
c_7310282.hdr.mark = gc_color_red;
 c_7310282.hdr.grayed = 0;
c_7310282.tag = closureN_tag;
 c_7310282.fn = (function_type)__lambda_815;
c_7310282.num_args = 1;
c_7310282.num_elements = 10;
c_7310282.elements = (object *)e_7310391;
c_7310282.elements[0] = ((closureN)self_734816)->elements[0];
c_7310282.elements[1] = ((closureN)self_734816)->elements[1];
c_7310282.elements[2] = ((closureN)self_734816)->elements[2];
c_7310282.elements[3] = ((closureN)self_734816)->elements[3];
c_7310282.elements[4] = ((closureN)self_734816)->elements[4];
c_7310282.elements[5] = ((closureN)self_734816)->elements[5];
c_7310282.elements[6] = ((closureN)self_734816)->elements[6];
c_7310282.elements[7] = ((closureN)self_734816)->elements[7];
c_7310282.elements[8] = ((closureN)self_734816)->elements[8];
c_7310282.elements[9] = ((closureN)self_734816)->elements[9];


pair_type local_7310394; 
return_direct_with_clo1(data,(closure)&c_7310282,__lambda_815,  set_cell_as_expr(&local_7310394, lp_731789_732831));; 
}

static void __lambda_815(void *data, object self_734817, int argc, object *args) /* object self_734817, object lp_731789_732831 */
 {
 object lp_731789_732831 = args[0];
  
closureN_type c_7310284;
object e_7310298 [4];
c_7310284.hdr.mark = gc_color_red;
 c_7310284.hdr.grayed = 0;
c_7310284.tag = closureN_tag;
 c_7310284.fn = (function_type)__lambda_635;
c_7310284.num_args = 1;
c_7310284.num_elements = 4;
c_7310284.elements = (object *)e_7310298;
c_7310284.elements[0] = ((closureN)self_734817)->elements[2];
c_7310284.elements[1] = ((closureN)self_734817)->elements[3];
c_7310284.elements[2] = ((closureN)self_734817)->elements[5];
c_7310284.elements[3] = lp_731789_732831;


closureN_type c_7310299;
object e_7310390 [8];
c_7310299.hdr.mark = gc_color_red;
 c_7310299.hdr.grayed = 0;
c_7310299.tag = closureN_tag;
 c_7310299.fn = (function_type)__lambda_637;
c_7310299.num_args = 2;
c_7310299.num_elements = 8;
c_7310299.elements = (object *)e_7310390;
c_7310299.elements[0] = ((closureN)self_734817)->elements[0];
c_7310299.elements[1] = ((closureN)self_734817)->elements[1];
c_7310299.elements[2] = ((closureN)self_734817)->elements[4];
c_7310299.elements[3] = lp_731789_732831;
c_7310299.elements[4] = ((closureN)self_734817)->elements[6];
c_7310299.elements[5] = ((closureN)self_734817)->elements[7];
c_7310299.elements[6] = ((closureN)self_734817)->elements[8];
c_7310299.elements[7] = ((closureN)self_734817)->elements[9];

return_direct_with_clo1(data,(closure)&c_7310284,__lambda_635,  &c_7310299);; 
}

static void __lambda_637(void *data, object self_734818, int argc, object *args) /* object self_734818, object k_733865, object i_731790_732832, object j_731791_732833 */
 {
 object k_733865 = args[0]; object i_731790_732832 = args[1]; object j_731791_732833 = args[2];
    
if( (boolean_f != Cyc_num_fast_gt_op(data, j_731791_732833, ((closureN)self_734818)->elements[2])) ){ 
  

return_closcall4(data,  car(((closureN)self_734818)->elements[0]),  k_733865, i_731790_732832, j_731791_732833, ((closureN)self_734818)->elements[4]);
} else { 
  
closureN_type c_7310309;
object e_7310386 [10];
c_7310309.hdr.mark = gc_color_red;
 c_7310309.hdr.grayed = 0;
c_7310309.tag = closureN_tag;
 c_7310309.fn = (function_type)__lambda_638;
c_7310309.num_args = 1;
c_7310309.num_elements = 10;
c_7310309.elements = (object *)e_7310386;
c_7310309.elements[0] = ((closureN)self_734818)->elements[1];
c_7310309.elements[1] = i_731790_732832;
c_7310309.elements[2] = j_731791_732833;
c_7310309.elements[3] = ((closureN)self_734818)->elements[2];
c_7310309.elements[4] = k_733865;
c_7310309.elements[5] = ((closureN)self_734818)->elements[3];
c_7310309.elements[6] = ((closureN)self_734818)->elements[4];
c_7310309.elements[7] = ((closureN)self_734818)->elements[5];
c_7310309.elements[8] = ((closureN)self_734818)->elements[6];
c_7310309.elements[9] = ((closureN)self_734818)->elements[7];



return_direct_with_clo1(data,(closure)&c_7310309,__lambda_638,  Cyc_vector_ref(data, ((closureN)self_734818)->elements[7], j_731791_732833));}
;; 
}

static void __lambda_638(void *data, object self_734819, int argc, object *args) /* object self_734819, object x_731792_732834 */
 {
 object x_731792_732834 = args[0];
  
closureN_type c_7310312;
object e_7310384 [11];
c_7310312.hdr.mark = gc_color_red;
 c_7310312.hdr.grayed = 0;
c_7310312.tag = closureN_tag;
 c_7310312.fn = (function_type)__lambda_639;
c_7310312.num_args = 1;
c_7310312.num_elements = 11;
c_7310312.elements = (object *)e_7310384;
c_7310312.elements[0] = ((closureN)self_734819)->elements[0];
c_7310312.elements[1] = ((closureN)self_734819)->elements[1];
c_7310312.elements[2] = ((closureN)self_734819)->elements[2];
c_7310312.elements[3] = ((closureN)self_734819)->elements[3];
c_7310312.elements[4] = ((closureN)self_734819)->elements[4];
c_7310312.elements[5] = ((closureN)self_734819)->elements[5];
c_7310312.elements[6] = ((closureN)self_734819)->elements[6];
c_7310312.elements[7] = ((closureN)self_734819)->elements[7];
c_7310312.elements[8] = ((closureN)self_734819)->elements[8];
c_7310312.elements[9] = ((closureN)self_734819)->elements[9];
c_7310312.elements[10] = x_731792_732834;

return_closcall3(data,  ((closureN)self_734819)->elements[0],  &c_7310312, x_731792_732834, ((closureN)self_734819)->elements[7]);; 
}

static void __lambda_639(void *data, object self_734820, int argc, object *args) /* object self_734820, object r_733868 */
 {
 object r_733868 = args[0];
  if( (boolean_f != r_733868) ){ 
  


complex_num_type local_7310321; 
return_closcall3(data,  car(((closureN)self_734820)->elements[5]),  ((closureN)self_734820)->elements[4], ((closureN)self_734820)->elements[1], Cyc_fast_sum(data,&local_7310321, ((closureN)self_734820)->elements[2], obj_int2obj(1)));
} else { 
  
closureN_type c_7310325;
object e_7310381 [9];
c_7310325.hdr.mark = gc_color_red;
 c_7310325.hdr.grayed = 0;
c_7310325.tag = closureN_tag;
 c_7310325.fn = (function_type)__lambda_640;
c_7310325.num_args = 1;
c_7310325.num_elements = 9;
c_7310325.elements = (object *)e_7310381;
c_7310325.elements[0] = ((closureN)self_734820)->elements[1];
c_7310325.elements[1] = ((closureN)self_734820)->elements[2];
c_7310325.elements[2] = ((closureN)self_734820)->elements[3];
c_7310325.elements[3] = ((closureN)self_734820)->elements[4];
c_7310325.elements[4] = ((closureN)self_734820)->elements[5];
c_7310325.elements[5] = ((closureN)self_734820)->elements[6];
c_7310325.elements[6] = ((closureN)self_734820)->elements[8];
c_7310325.elements[7] = ((closureN)self_734820)->elements[9];
c_7310325.elements[8] = ((closureN)self_734820)->elements[10];

return_closcall3(data,  ((closureN)self_734820)->elements[0],  &c_7310325, ((closureN)self_734820)->elements[7], ((closureN)self_734820)->elements[10]);}
;; 
}

static void __lambda_640(void *data, object self_734821, int argc, object *args) /* object self_734821, object r_733870 */
 {
 object r_733870 = args[0];
  if( (boolean_f != r_733870) ){ 
  

return_closcall5(data,  car(((closureN)self_734821)->elements[6]),  ((closureN)self_734821)->elements[3], ((closureN)self_734821)->elements[0], ((closureN)self_734821)->elements[1], ((closureN)self_734821)->elements[2], ((closureN)self_734821)->elements[5]);
} else { 
  
closureN_type c_7310336;
object e_7310365 [4];
c_7310336.hdr.mark = gc_color_red;
 c_7310336.hdr.grayed = 0;
c_7310336.tag = closureN_tag;
 c_7310336.fn = (function_type)__lambda_641;
c_7310336.num_args = 0;
c_7310336.num_elements = 4;
c_7310336.elements = (object *)e_7310365;
c_7310336.elements[0] = ((closureN)self_734821)->elements[0];
c_7310336.elements[1] = ((closureN)self_734821)->elements[1];
c_7310336.elements[2] = ((closureN)self_734821)->elements[7];
c_7310336.elements[3] = ((closureN)self_734821)->elements[8];


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

return_direct_with_clo1(data,(closure)&c_7310336,__lambda_641,  &c_7310366);}
;; 
}

static void __lambda_644(void *data, object self_734822, int argc, object *args) /* object self_734822, object r_733871 */
 {

  


complex_num_type local_7310374; 

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

static void __lambda_641(void *data, object self_734823, int argc, object *args) /* object self_734823, object k_733874 */
 {
 object k_733874 = args[0];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_734823)->elements[0], ((closureN)self_734823)->elements[1])) ){ 
  
closureN_type c_7310342;
object e_7310359 [5];
c_7310342.hdr.mark = gc_color_red;
 c_7310342.hdr.grayed = 0;
c_7310342.tag = closureN_tag;
 c_7310342.fn = (function_type)__lambda_642;
c_7310342.num_args = 1;
c_7310342.num_elements = 5;
c_7310342.elements = (object *)e_7310359;
c_7310342.elements[0] = ((closureN)self_734823)->elements[0];
c_7310342.elements[1] = ((closureN)self_734823)->elements[1];
c_7310342.elements[2] = k_733874;
c_7310342.elements[3] = ((closureN)self_734823)->elements[2];
c_7310342.elements[4] = ((closureN)self_734823)->elements[3];



return_direct_with_clo1(data,(closure)&c_7310342,__lambda_642,  Cyc_vector_ref(data, ((closureN)self_734823)->elements[2], ((closureN)self_734823)->elements[0]));
} else { 
  return_direct_with_clo1(data,  k_733874, (((closure)  k_733874)->fn),  Cyc_VOID);}
;; 
}

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


object c_7310356 = Cyc_vector_set_cps(data,(closure)&c_7310344,((closureN)self_734824)->elements[3], ((closureN)self_734824)->elements[1], r_733877);
return_closcall1(data,(closure)&c_7310344,  c_7310356);; 
}

static void __lambda_643(void *data, object self_734825, int argc, object *args) /* object self_734825, object r_733876 */
 {

  
object c_7310349 = Cyc_vector_set_cps(data,  ((closureN)self_734825)->elements[1],((closureN)self_734825)->elements[2], ((closureN)self_734825)->elements[0], ((closureN)self_734825)->elements[3]);
return_direct_with_clo1(data,  ((closureN)self_734825)->elements[1], (((closure)  ((closureN)self_734825)->elements[1])->fn),  c_7310349);; 
}

static void __lambda_635(void *data, object self_734826, int argc, object *args) /* object self_734826, object r_733864 */
 {
 object r_733864 = args[0];
  
closureN_type c_7310286;
object e_7310294 [4];
c_7310286.hdr.mark = gc_color_red;
 c_7310286.hdr.grayed = 0;
c_7310286.tag = closureN_tag;
 c_7310286.fn = (function_type)__lambda_636;
c_7310286.num_args = 1;
c_7310286.num_elements = 4;
c_7310286.elements = (object *)e_7310294;
c_7310286.elements[0] = ((closureN)self_734826)->elements[0];
c_7310286.elements[1] = ((closureN)self_734826)->elements[1];
c_7310286.elements[2] = ((closureN)self_734826)->elements[2];
c_7310286.elements[3] = ((closureN)self_734826)->elements[3];



return_direct_with_clo1(data,(closure)&c_7310286,__lambda_636,  Cyc_set_cell(data, ((closureN)self_734826)->elements[3], r_733864));; 
}

static void __lambda_636(void *data, object self_734827, int argc, object *args) /* object self_734827, object r_733863 */
 {

  

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

static void __lambda_601(void *data, object self_734828, int argc, object *args) /* object self_734828, object r_733861 */
 {
 object r_733861 = args[0];
  
closureN_type c_739982;
object e_7310271 [11];
c_739982.hdr.mark = gc_color_red;
 c_739982.hdr.grayed = 0;
c_739982.tag = closureN_tag;
 c_739982.fn = (function_type)__lambda_602;
c_739982.num_args = 1;
c_739982.num_elements = 11;
c_739982.elements = (object *)e_7310271;
c_739982.elements[0] = ((closureN)self_734828)->elements[0];
c_739982.elements[1] = ((closureN)self_734828)->elements[1];
c_739982.elements[2] = ((closureN)self_734828)->elements[2];
c_739982.elements[3] = ((closureN)self_734828)->elements[3];
c_739982.elements[4] = ((closureN)self_734828)->elements[4];
c_739982.elements[5] = ((closureN)self_734828)->elements[5];
c_739982.elements[6] = ((closureN)self_734828)->elements[6];
c_739982.elements[7] = ((closureN)self_734828)->elements[7];
c_739982.elements[8] = ((closureN)self_734828)->elements[8];
c_739982.elements[9] = ((closureN)self_734828)->elements[9];
c_739982.elements[10] = ((closureN)self_734828)->elements[10];



return_direct_with_clo1(data,(closure)&c_739982,__lambda_602,  Cyc_set_cell(data, ((closureN)self_734828)->elements[4], r_733861));; 
}

static void __lambda_602(void *data, object self_734829, int argc, object *args) /* object self_734829, object r_733816 */
 {

  
closureN_type c_739984;
object e_7310117 [8];
c_739984.hdr.mark = gc_color_red;
 c_739984.hdr.grayed = 0;
c_739984.tag = closureN_tag;
 c_739984.fn = (function_type)__lambda_603;
c_739984.num_args = 1;
c_739984.num_elements = 8;
c_739984.elements = (object *)e_7310117;
c_739984.elements[0] = ((closureN)self_734829)->elements[0];
c_739984.elements[1] = ((closureN)self_734829)->elements[2];
c_739984.elements[2] = ((closureN)self_734829)->elements[3];
c_739984.elements[3] = ((closureN)self_734829)->elements[4];
c_739984.elements[4] = ((closureN)self_734829)->elements[6];
c_739984.elements[5] = ((closureN)self_734829)->elements[7];
c_739984.elements[6] = ((closureN)self_734829)->elements[8];
c_739984.elements[7] = ((closureN)self_734829)->elements[9];


closureN_type c_7310118;
object e_7310270 [5];
c_7310118.hdr.mark = gc_color_red;
 c_7310118.hdr.grayed = 0;
c_7310118.tag = closureN_tag;
 c_7310118.fn = (function_type)__lambda_616;
c_7310118.num_args = 4;
c_7310118.num_elements = 5;
c_7310118.elements = (object *)e_7310270;
c_7310118.elements[0] = ((closureN)self_734829)->elements[0];
c_7310118.elements[1] = ((closureN)self_734829)->elements[1];
c_7310118.elements[2] = ((closureN)self_734829)->elements[4];
c_7310118.elements[3] = ((closureN)self_734829)->elements[5];
c_7310118.elements[4] = ((closureN)self_734829)->elements[10];

return_direct_with_clo1(data,(closure)&c_739984,__lambda_603,  &c_7310118);; 
}

static void __lambda_616(void *data, object self_734830, int argc, object *args) /* object self_734830, object k_733840, object i_731800_732835, object j_731801_732836, object k_731802_732837, object m_731803_732838 */
 {
 object k_733840 = args[0]; object i_731800_732835 = args[1]; object j_731801_732836 = args[2]; object k_731802_732837 = args[3]; object m_731803_732838 = args[4];
  
closureN_type c_7310120;
object e_7310269 [8];
c_7310120.hdr.mark = gc_color_red;
 c_7310120.hdr.grayed = 0;
c_7310120.tag = closureN_tag;
 c_7310120.fn = (function_type)__lambda_617;
c_7310120.num_args = 1;
c_7310120.num_elements = 8;
c_7310120.elements = (object *)e_7310269;
c_7310120.elements[0] = ((closureN)self_734830)->elements[0];
c_7310120.elements[1] = ((closureN)self_734830)->elements[1];
c_7310120.elements[2] = i_731800_732835;
c_7310120.elements[3] = j_731801_732836;
c_7310120.elements[4] = k_733840;
c_7310120.elements[5] = ((closureN)self_734830)->elements[2];
c_7310120.elements[6] = ((closureN)self_734830)->elements[3];
c_7310120.elements[7] = ((closureN)self_734830)->elements[4];

return_direct_with_clo2(data,(closure)&c_7310120,__lambda_617,  k_731802_732837, m_731803_732838);; 
}

static void __lambda_617(void *data, object self_734831, int argc, object *args) /* object self_734831, object k_731805_732839, object m_731806_732840 */
 {
 object k_731805_732839 = args[0]; object m_731806_732840 = args[1];
  
closureN_type c_7310122;
object e_7310268 [10];
c_7310122.hdr.mark = gc_color_red;
 c_7310122.hdr.grayed = 0;
c_7310122.tag = closureN_tag;
 c_7310122.fn = (function_type)__lambda_618;
c_7310122.num_args = 1;
c_7310122.num_elements = 10;
c_7310122.elements = (object *)e_7310268;
c_7310122.elements[0] = ((closureN)self_734831)->elements[0];
c_7310122.elements[1] = ((closureN)self_734831)->elements[1];
c_7310122.elements[2] = ((closureN)self_734831)->elements[2];
c_7310122.elements[3] = ((closureN)self_734831)->elements[3];
c_7310122.elements[4] = k_731805_732839;
c_7310122.elements[5] = ((closureN)self_734831)->elements[4];
c_7310122.elements[6] = ((closureN)self_734831)->elements[5];
c_7310122.elements[7] = m_731806_732840;
c_7310122.elements[8] = ((closureN)self_734831)->elements[6];
c_7310122.elements[9] = ((closureN)self_734831)->elements[7];

return_direct_with_clo1(data,(closure)&c_7310122,__lambda_618,  boolean_f);; 
}

static void __lambda_618(void *data, object self_734832, int argc, object *args) /* object self_734832, object lp_731807_732841 */
 {
 object lp_731807_732841 = args[0];
  
closureN_type c_7310124;
object e_7310264 [10];
c_7310124.hdr.mark = gc_color_red;
 c_7310124.hdr.grayed = 0;
c_7310124.tag = closureN_tag;
 c_7310124.fn = (function_type)__lambda_814;
c_7310124.num_args = 1;
c_7310124.num_elements = 10;
c_7310124.elements = (object *)e_7310264;
c_7310124.elements[0] = ((closureN)self_734832)->elements[0];
c_7310124.elements[1] = ((closureN)self_734832)->elements[1];
c_7310124.elements[2] = ((closureN)self_734832)->elements[2];
c_7310124.elements[3] = ((closureN)self_734832)->elements[3];
c_7310124.elements[4] = ((closureN)self_734832)->elements[4];
c_7310124.elements[5] = ((closureN)self_734832)->elements[5];
c_7310124.elements[6] = ((closureN)self_734832)->elements[6];
c_7310124.elements[7] = ((closureN)self_734832)->elements[7];
c_7310124.elements[8] = ((closureN)self_734832)->elements[8];
c_7310124.elements[9] = ((closureN)self_734832)->elements[9];


pair_type local_7310267; 
return_direct_with_clo1(data,(closure)&c_7310124,__lambda_814,  set_cell_as_expr(&local_7310267, lp_731807_732841));; 
}

static void __lambda_814(void *data, object self_734833, int argc, object *args) /* object self_734833, object lp_731807_732841 */
 {
 object lp_731807_732841 = args[0];
  
closureN_type c_7310126;
object e_7310140 [4];
c_7310126.hdr.mark = gc_color_red;
 c_7310126.hdr.grayed = 0;
c_7310126.tag = closureN_tag;
 c_7310126.fn = (function_type)__lambda_619;
c_7310126.num_args = 1;
c_7310126.num_elements = 4;
c_7310126.elements = (object *)e_7310140;
c_7310126.elements[0] = ((closureN)self_734833)->elements[4];
c_7310126.elements[1] = ((closureN)self_734833)->elements[5];
c_7310126.elements[2] = lp_731807_732841;
c_7310126.elements[3] = ((closureN)self_734833)->elements[7];


closureN_type c_7310141;
object e_7310263 [8];
c_7310141.hdr.mark = gc_color_red;
 c_7310141.hdr.grayed = 0;
c_7310141.tag = closureN_tag;
 c_7310141.fn = (function_type)__lambda_621;
c_7310141.num_args = 2;
c_7310141.num_elements = 8;
c_7310141.elements = (object *)e_7310263;
c_7310141.elements[0] = ((closureN)self_734833)->elements[0];
c_7310141.elements[1] = ((closureN)self_734833)->elements[1];
c_7310141.elements[2] = ((closureN)self_734833)->elements[2];
c_7310141.elements[3] = ((closureN)self_734833)->elements[3];
c_7310141.elements[4] = lp_731807_732841;
c_7310141.elements[5] = ((closureN)self_734833)->elements[6];
c_7310141.elements[6] = ((closureN)self_734833)->elements[8];
c_7310141.elements[7] = ((closureN)self_734833)->elements[9];

return_direct_with_clo1(data,(closure)&c_7310126,__lambda_619,  &c_7310141);; 
}

static void __lambda_621(void *data, object self_734834, int argc, object *args) /* object self_734834, object k_733843, object k_731808_732842, object m_731809_732843 */
 {
 object k_733843 = args[0]; object k_731808_732842 = args[1]; object m_731809_732843 = args[2];
    
if( (boolean_f != Cyc_num_fast_lte_op(data, k_731808_732842, ((closureN)self_734834)->elements[3])) ){ 
  

return_closcall4(data,  car(((closureN)self_734834)->elements[0]),  k_733843, ((closureN)self_734834)->elements[2], ((closureN)self_734834)->elements[3], m_731809_732843);
} else { 
  
closureN_type c_7310152;
object e_7310259 [10];
c_7310152.hdr.mark = gc_color_red;
 c_7310152.hdr.grayed = 0;
c_7310152.tag = closureN_tag;
 c_7310152.fn = (function_type)__lambda_622;
c_7310152.num_args = 1;
c_7310152.num_elements = 10;
c_7310152.elements = (object *)e_7310259;
c_7310152.elements[0] = ((closureN)self_734834)->elements[1];
c_7310152.elements[1] = ((closureN)self_734834)->elements[2];
c_7310152.elements[2] = ((closureN)self_734834)->elements[3];
c_7310152.elements[3] = k_731808_732842;
c_7310152.elements[4] = k_733843;
c_7310152.elements[5] = ((closureN)self_734834)->elements[4];
c_7310152.elements[6] = ((closureN)self_734834)->elements[5];
c_7310152.elements[7] = m_731809_732843;
c_7310152.elements[8] = ((closureN)self_734834)->elements[6];
c_7310152.elements[9] = ((closureN)self_734834)->elements[7];



return_direct_with_clo1(data,(closure)&c_7310152,__lambda_622,  Cyc_vector_ref(data, ((closureN)self_734834)->elements[7], k_731808_732842));}
;; 
}

static void __lambda_622(void *data, object self_734835, int argc, object *args) /* object self_734835, object x_731812_732844 */
 {
 object x_731812_732844 = args[0];
  
closureN_type c_7310155;
object e_7310257 [11];
c_7310155.hdr.mark = gc_color_red;
 c_7310155.hdr.grayed = 0;
c_7310155.tag = closureN_tag;
 c_7310155.fn = (function_type)__lambda_623;
c_7310155.num_args = 1;
c_7310155.num_elements = 11;
c_7310155.elements = (object *)e_7310257;
c_7310155.elements[0] = ((closureN)self_734835)->elements[0];
c_7310155.elements[1] = ((closureN)self_734835)->elements[1];
c_7310155.elements[2] = ((closureN)self_734835)->elements[2];
c_7310155.elements[3] = ((closureN)self_734835)->elements[3];
c_7310155.elements[4] = ((closureN)self_734835)->elements[4];
c_7310155.elements[5] = ((closureN)self_734835)->elements[5];
c_7310155.elements[6] = ((closureN)self_734835)->elements[6];
c_7310155.elements[7] = ((closureN)self_734835)->elements[7];
c_7310155.elements[8] = ((closureN)self_734835)->elements[8];
c_7310155.elements[9] = ((closureN)self_734835)->elements[9];
c_7310155.elements[10] = x_731812_732844;

return_closcall3(data,  ((closureN)self_734835)->elements[0],  &c_7310155, ((closureN)self_734835)->elements[8], x_731812_732844);; 
}

static void __lambda_623(void *data, object self_734836, int argc, object *args) /* object self_734836, object r_733846 */
 {
 object r_733846 = args[0];
  if( (boolean_f != r_733846) ){ 
  


complex_num_type local_7310163; 
return_closcall3(data,  car(((closureN)self_734836)->elements[5]),  ((closureN)self_734836)->elements[4], Cyc_fast_sub(data,&local_7310163, ((closureN)self_734836)->elements[3], obj_int2obj(1)), ((closureN)self_734836)->elements[7]);
} else { 
  
closureN_type c_7310168;
object e_7310254 [9];
c_7310168.hdr.mark = gc_color_red;
 c_7310168.hdr.grayed = 0;
c_7310168.tag = closureN_tag;
 c_7310168.fn = (function_type)__lambda_624;
c_7310168.num_args = 1;
c_7310168.num_elements = 9;
c_7310168.elements = (object *)e_7310254;
c_7310168.elements[0] = ((closureN)self_734836)->elements[1];
c_7310168.elements[1] = ((closureN)self_734836)->elements[2];
c_7310168.elements[2] = ((closureN)self_734836)->elements[3];
c_7310168.elements[3] = ((closureN)self_734836)->elements[4];
c_7310168.elements[4] = ((closureN)self_734836)->elements[5];
c_7310168.elements[5] = ((closureN)self_734836)->elements[6];
c_7310168.elements[6] = ((closureN)self_734836)->elements[7];
c_7310168.elements[7] = ((closureN)self_734836)->elements[9];
c_7310168.elements[8] = ((closureN)self_734836)->elements[10];

return_closcall3(data,  ((closureN)self_734836)->elements[0],  &c_7310168, ((closureN)self_734836)->elements[10], ((closureN)self_734836)->elements[8]);}
;; 
}

static void __lambda_624(void *data, object self_734837, int argc, object *args) /* object self_734837, object r_733848 */
 {
 object r_733848 = args[0];
  if( (boolean_f != r_733848) ){ 
  
closureN_type c_7310170;
object e_7310203 [8];
c_7310170.hdr.mark = gc_color_red;
 c_7310170.hdr.grayed = 0;
c_7310170.tag = closureN_tag;
 c_7310170.fn = (function_type)__lambda_625;
c_7310170.num_args = 1;
c_7310170.num_elements = 8;
c_7310170.elements = (object *)e_7310203;
c_7310170.elements[0] = ((closureN)self_734837)->elements[0];
c_7310170.elements[1] = ((closureN)self_734837)->elements[1];
c_7310170.elements[2] = ((closureN)self_734837)->elements[2];
c_7310170.elements[3] = ((closureN)self_734837)->elements[3];
c_7310170.elements[4] = ((closureN)self_734837)->elements[5];
c_7310170.elements[5] = ((closureN)self_734837)->elements[6];
c_7310170.elements[6] = ((closureN)self_734837)->elements[7];
c_7310170.elements[7] = ((closureN)self_734837)->elements[8];



return_direct_with_clo1(data,(closure)&c_7310170,__lambda_625,  Cyc_vector_ref(data, ((closureN)self_734837)->elements[7], ((closureN)self_734837)->elements[1]));
} else { 
  
closureN_type c_7310209;
object e_7310238 [4];
c_7310209.hdr.mark = gc_color_red;
 c_7310209.hdr.grayed = 0;
c_7310209.tag = closureN_tag;
 c_7310209.fn = (function_type)__lambda_628;
c_7310209.num_args = 0;
c_7310209.num_elements = 4;
c_7310209.elements = (object *)e_7310238;
c_7310209.elements[0] = ((closureN)self_734837)->elements[2];
c_7310209.elements[1] = ((closureN)self_734837)->elements[6];
c_7310209.elements[2] = ((closureN)self_734837)->elements[7];
c_7310209.elements[3] = ((closureN)self_734837)->elements[8];


closureN_type c_7310239;
object e_7310253 [4];
c_7310239.hdr.mark = gc_color_red;
 c_7310239.hdr.grayed = 0;
c_7310239.tag = closureN_tag;
 c_7310239.fn = (function_type)__lambda_631;
c_7310239.num_args = 1;
c_7310239.num_elements = 4;
c_7310239.elements = (object *)e_7310253;
c_7310239.elements[0] = ((closureN)self_734837)->elements[2];
c_7310239.elements[1] = ((closureN)self_734837)->elements[3];
c_7310239.elements[2] = ((closureN)self_734837)->elements[4];
c_7310239.elements[3] = ((closureN)self_734837)->elements[6];

return_direct_with_clo1(data,(closure)&c_7310209,__lambda_628,  &c_7310239);}
;; 
}

static void __lambda_631(void *data, object self_734841, int argc, object *args) /* object self_734841, object r_733854 */
 {

  


complex_num_type local_7310247; 

complex_num_type local_7310251; 
return_closcall3(data,  car(((closureN)self_734841)->elements[2]),  ((closureN)self_734841)->elements[1], Cyc_fast_sub(data,&local_7310247, ((closureN)self_734841)->elements[0], obj_int2obj(1)), Cyc_fast_sub(data,&local_7310251, ((closureN)self_734841)->elements[3], obj_int2obj(1)));; 
}

static void __lambda_628(void *data, object self_734842, int argc, object *args) /* object self_734842, object k_733857 */
 {
 object k_733857 = args[0];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_734842)->elements[0], ((closureN)self_734842)->elements[1])) ){ 
  
closureN_type c_7310215;
object e_7310232 [5];
c_7310215.hdr.mark = gc_color_red;
 c_7310215.hdr.grayed = 0;
c_7310215.tag = closureN_tag;
 c_7310215.fn = (function_type)__lambda_629;
c_7310215.num_args = 1;
c_7310215.num_elements = 5;
c_7310215.elements = (object *)e_7310232;
c_7310215.elements[0] = ((closureN)self_734842)->elements[0];
c_7310215.elements[1] = k_733857;
c_7310215.elements[2] = ((closureN)self_734842)->elements[1];
c_7310215.elements[3] = ((closureN)self_734842)->elements[2];
c_7310215.elements[4] = ((closureN)self_734842)->elements[3];



return_direct_with_clo1(data,(closure)&c_7310215,__lambda_629,  Cyc_vector_ref(data, ((closureN)self_734842)->elements[2], ((closureN)self_734842)->elements[1]));
} else { 
  return_direct_with_clo1(data,  k_733857, (((closure)  k_733857)->fn),  Cyc_VOID);}
;; 
}

static void __lambda_629(void *data, object self_734843, int argc, object *args) /* object self_734843, object r_733860 */
 {
 object r_733860 = args[0];
  
closureN_type c_7310217;
object e_7310226 [4];
c_7310217.hdr.mark = gc_color_red;
 c_7310217.hdr.grayed = 0;
c_7310217.tag = closureN_tag;
 c_7310217.fn = (function_type)__lambda_630;
c_7310217.num_args = 1;
c_7310217.num_elements = 4;
c_7310217.elements = (object *)e_7310226;
c_7310217.elements[0] = ((closureN)self_734843)->elements[1];
c_7310217.elements[1] = ((closureN)self_734843)->elements[2];
c_7310217.elements[2] = ((closureN)self_734843)->elements[3];
c_7310217.elements[3] = ((closureN)self_734843)->elements[4];


object c_7310229 = Cyc_vector_set_cps(data,(closure)&c_7310217,((closureN)self_734843)->elements[3], ((closureN)self_734843)->elements[0], r_733860);
return_closcall1(data,(closure)&c_7310217,  c_7310229);; 
}

static void __lambda_630(void *data, object self_734844, int argc, object *args) /* object self_734844, object r_733859 */
 {

  
object c_7310222 = Cyc_vector_set_cps(data,  ((closureN)self_734844)->elements[0],((closureN)self_734844)->elements[2], ((closureN)self_734844)->elements[1], ((closureN)self_734844)->elements[3]);
return_direct_with_clo1(data,  ((closureN)self_734844)->elements[0], (((closure)  ((closureN)self_734844)->elements[0])->fn),  c_7310222);; 
}

static void __lambda_625(void *data, object self_734838, int argc, object *args) /* object self_734838, object r_733853 */
 {
 object r_733853 = args[0];
  
closureN_type c_7310172;
object e_7310197 [8];
c_7310172.hdr.mark = gc_color_red;
 c_7310172.hdr.grayed = 0;
c_7310172.tag = closureN_tag;
 c_7310172.fn = (function_type)__lambda_626;
c_7310172.num_args = 1;
c_7310172.num_elements = 8;
c_7310172.elements = (object *)e_7310197;
c_7310172.elements[0] = ((closureN)self_734838)->elements[0];
c_7310172.elements[1] = ((closureN)self_734838)->elements[1];
c_7310172.elements[2] = ((closureN)self_734838)->elements[2];
c_7310172.elements[3] = ((closureN)self_734838)->elements[3];
c_7310172.elements[4] = ((closureN)self_734838)->elements[4];
c_7310172.elements[5] = ((closureN)self_734838)->elements[5];
c_7310172.elements[6] = ((closureN)self_734838)->elements[6];
c_7310172.elements[7] = ((closureN)self_734838)->elements[7];


object c_7310200 = Cyc_vector_set_cps(data,(closure)&c_7310172,((closureN)self_734838)->elements[6], ((closureN)self_734838)->elements[2], r_733853);
return_closcall1(data,(closure)&c_7310172,  c_7310200);; 
}

static void __lambda_626(void *data, object self_734839, int argc, object *args) /* object self_734839, object r_733849 */
 {

  
closureN_type c_7310174;
object e_7310190 [6];
c_7310174.hdr.mark = gc_color_red;
 c_7310174.hdr.grayed = 0;
c_7310174.tag = closureN_tag;
 c_7310174.fn = (function_type)__lambda_627;
c_7310174.num_args = 1;
c_7310174.num_elements = 6;
c_7310174.elements = (object *)e_7310190;
c_7310174.elements[0] = ((closureN)self_734839)->elements[0];
c_7310174.elements[1] = ((closureN)self_734839)->elements[1];
c_7310174.elements[2] = ((closureN)self_734839)->elements[2];
c_7310174.elements[3] = ((closureN)self_734839)->elements[3];
c_7310174.elements[4] = ((closureN)self_734839)->elements[4];
c_7310174.elements[5] = ((closureN)self_734839)->elements[5];


object c_7310193 = Cyc_vector_set_cps(data,(closure)&c_7310174,((closureN)self_734839)->elements[6], ((closureN)self_734839)->elements[1], ((closureN)self_734839)->elements[7]);
return_closcall1(data,(closure)&c_7310174,  c_7310193);; 
}

static void __lambda_627(void *data, object self_734840, int argc, object *args) /* object self_734840, object r_733850 */
 {

  


complex_num_type local_7310183; 

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

static void __lambda_619(void *data, object self_734845, int argc, object *args) /* object self_734845, object r_733842 */
 {
 object r_733842 = args[0];
  
closureN_type c_7310128;
object e_7310136 [4];
c_7310128.hdr.mark = gc_color_red;
 c_7310128.hdr.grayed = 0;
c_7310128.tag = closureN_tag;
 c_7310128.fn = (function_type)__lambda_620;
c_7310128.num_args = 1;
c_7310128.num_elements = 4;
c_7310128.elements = (object *)e_7310136;
c_7310128.elements[0] = ((closureN)self_734845)->elements[0];
c_7310128.elements[1] = ((closureN)self_734845)->elements[1];
c_7310128.elements[2] = ((closureN)self_734845)->elements[2];
c_7310128.elements[3] = ((closureN)self_734845)->elements[3];



return_direct_with_clo1(data,(closure)&c_7310128,__lambda_620,  Cyc_set_cell(data, ((closureN)self_734845)->elements[2], r_733842));; 
}

static void __lambda_620(void *data, object self_734846, int argc, object *args) /* object self_734846, object r_733841 */
 {

  

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

static void __lambda_603(void *data, object self_734847, int argc, object *args) /* object self_734847, object r_733839 */
 {
 object r_733839 = args[0];
  
closureN_type c_739986;
object e_7310113 [7];
c_739986.hdr.mark = gc_color_red;
 c_739986.hdr.grayed = 0;
c_739986.tag = closureN_tag;
 c_739986.fn = (function_type)__lambda_604;
c_739986.num_args = 1;
c_739986.num_elements = 7;
c_739986.elements = (object *)e_7310113;
c_739986.elements[0] = ((closureN)self_734847)->elements[0];
c_739986.elements[1] = ((closureN)self_734847)->elements[1];
c_739986.elements[2] = ((closureN)self_734847)->elements[2];
c_739986.elements[3] = ((closureN)self_734847)->elements[3];
c_739986.elements[4] = ((closureN)self_734847)->elements[4];
c_739986.elements[5] = ((closureN)self_734847)->elements[5];
c_739986.elements[6] = ((closureN)self_734847)->elements[7];



return_direct_with_clo1(data,(closure)&c_739986,__lambda_604,  Cyc_set_cell(data, ((closureN)self_734847)->elements[6], r_733839));; 
}

static void __lambda_604(void *data, object self_734848, int argc, object *args) /* object self_734848, object r_733817 */
 {

  
closureN_type c_739988;
object e_7310010 [5];
c_739988.hdr.mark = gc_color_red;
 c_739988.hdr.grayed = 0;
c_739988.tag = closureN_tag;
 c_739988.fn = (function_type)__lambda_605;
c_739988.num_args = 1;
c_739988.num_elements = 5;
c_739988.elements = (object *)e_7310010;
c_739988.elements[0] = ((closureN)self_734848)->elements[0];
c_739988.elements[1] = ((closureN)self_734848)->elements[1];
c_739988.elements[2] = ((closureN)self_734848)->elements[2];
c_739988.elements[3] = ((closureN)self_734848)->elements[3];
c_739988.elements[4] = ((closureN)self_734848)->elements[4];


closureN_type c_7310011;
object e_7310112 [4];
c_7310011.hdr.mark = gc_color_red;
 c_7310011.hdr.grayed = 0;
c_7310011.tag = closureN_tag;
 c_7310011.fn = (function_type)__lambda_607;
c_7310011.num_args = 3;
c_7310011.num_elements = 4;
c_7310011.elements = (object *)e_7310112;
c_7310011.elements[0] = ((closureN)self_734848)->elements[2];
c_7310011.elements[1] = ((closureN)self_734848)->elements[4];
c_7310011.elements[2] = ((closureN)self_734848)->elements[5];
c_7310011.elements[3] = ((closureN)self_734848)->elements[6];

return_direct_with_clo1(data,(closure)&c_739988,__lambda_605,  &c_7310011);; 
}

static void __lambda_607(void *data, object self_734849, int argc, object *args) /* object self_734849, object k_733821, object i_731821_732845, object j_731822_732846, object m_731823_732847 */
 {
 object k_733821 = args[0]; object i_731821_732845 = args[1]; object j_731822_732846 = args[2]; object m_731823_732847 = args[3];
  
closureN_type c_7310013;
object e_7310091 [6];
c_7310013.hdr.mark = gc_color_red;
 c_7310013.hdr.grayed = 0;
c_7310013.tag = closureN_tag;
 c_7310013.fn = (function_type)__lambda_608;
c_7310013.num_args = 4;
c_7310013.num_elements = 6;
c_7310013.elements = (object *)e_7310091;
c_7310013.elements[0] = j_731822_732846;
c_7310013.elements[1] = k_733821;
c_7310013.elements[2] = ((closureN)self_734849)->elements[0];
c_7310013.elements[3] = ((closureN)self_734849)->elements[1];
c_7310013.elements[4] = ((closureN)self_734849)->elements[2];
c_7310013.elements[5] = ((closureN)self_734849)->elements[3];


complex_num_type local_7310094; 

complex_num_type local_7310097; 

complex_num_type local_7310100; 

complex_num_type local_7310103; 

complex_num_type local_7310107; 

complex_num_type local_7310110; 
return_direct_with_clo4(data,(closure)&c_7310013,__lambda_608,  Cyc_fast_sub(data,&local_7310094, j_731822_732846, i_731821_732845), Cyc_fast_sum(data,&local_7310097, obj_int2obj(1), Cyc_fast_sub(data,&local_7310100, m_731823_732847, j_731822_732846)), Cyc_fast_sub(data,&local_7310103, i_731821_732845, ((closureN)self_734849)->elements[0]), Cyc_fast_sub(data,&local_7310107, Cyc_fast_sub(data,&local_7310110, ((closureN)self_734849)->elements[1], m_731823_732847), obj_int2obj(1)));; 
}

static void __lambda_608(void *data, object self_734850, int argc, object *args) /* object self_734850, object num_121_731824_732848, object num_125_731825_732849, object num_123l_731826_732850, object num_123r_731827_732851 */
 {
 object num_121_731824_732848 = args[0]; object num_125_731825_732849 = args[1]; object num_123l_731826_732850 = args[2]; object num_123r_731827_732851 = args[3];
  
closureN_type c_7310015;
object e_7310090 [9];
c_7310015.hdr.mark = gc_color_red;
 c_7310015.hdr.grayed = 0;
c_7310015.tag = closureN_tag;
 c_7310015.fn = (function_type)__lambda_609;
c_7310015.num_args = 1;
c_7310015.num_elements = 9;
c_7310015.elements = (object *)e_7310090;
c_7310015.elements[0] = ((closureN)self_734850)->elements[0];
c_7310015.elements[1] = ((closureN)self_734850)->elements[1];
c_7310015.elements[2] = ((closureN)self_734850)->elements[2];
c_7310015.elements[3] = num_121_731824_732848;
c_7310015.elements[4] = num_123r_731827_732851;
c_7310015.elements[5] = num_125_731825_732849;
c_7310015.elements[6] = ((closureN)self_734850)->elements[3];
c_7310015.elements[7] = ((closureN)self_734850)->elements[4];
c_7310015.elements[8] = ((closureN)self_734850)->elements[5];

return_direct_with_clo3(data,  __glo_min_scheme_base, (((closure)  __glo_min_scheme_base)->fn),  &c_7310015, num_121_731824_732848, num_123l_731826_732850);; 
}

static void __lambda_609(void *data, object self_734851, int argc, object *args) /* object self_734851, object r_733836 */
 {
 object r_733836 = args[0];
  


closureN_type c_7310020;
object e_7310087 [9];
c_7310020.hdr.mark = gc_color_red;
 c_7310020.hdr.grayed = 0;
c_7310020.tag = closureN_tag;
 c_7310020.fn = (function_type)__lambda_610;
c_7310020.num_args = 1;
c_7310020.num_elements = 9;
c_7310020.elements = (object *)e_7310087;
c_7310020.elements[0] = ((closureN)self_734851)->elements[0];
c_7310020.elements[1] = ((closureN)self_734851)->elements[1];
c_7310020.elements[2] = ((closureN)self_734851)->elements[2];
c_7310020.elements[3] = ((closureN)self_734851)->elements[3];
c_7310020.elements[4] = ((closureN)self_734851)->elements[4];
c_7310020.elements[5] = ((closureN)self_734851)->elements[5];
c_7310020.elements[6] = ((closureN)self_734851)->elements[6];
c_7310020.elements[7] = ((closureN)self_734851)->elements[7];
c_7310020.elements[8] = ((closureN)self_734851)->elements[8];

return_closcall4(data,  car(((closureN)self_734851)->elements[8]),  &c_7310020, ((closureN)self_734851)->elements[2], ((closureN)self_734851)->elements[0], r_733836);; 
}

static void __lambda_610(void *data, object self_734852, int argc, object *args) /* object self_734852, object r_733826 */
 {

  
closureN_type c_7310022;
object e_7310084 [8];
c_7310022.hdr.mark = gc_color_red;
 c_7310022.hdr.grayed = 0;
c_7310022.tag = closureN_tag;
 c_7310022.fn = (function_type)__lambda_611;
c_7310022.num_args = 1;
c_7310022.num_elements = 8;
c_7310022.elements = (object *)e_7310084;
c_7310022.elements[0] = ((closureN)self_734852)->elements[0];
c_7310022.elements[1] = ((closureN)self_734852)->elements[1];
c_7310022.elements[2] = ((closureN)self_734852)->elements[2];
c_7310022.elements[3] = ((closureN)self_734852)->elements[3];
c_7310022.elements[4] = ((closureN)self_734852)->elements[5];
c_7310022.elements[5] = ((closureN)self_734852)->elements[6];
c_7310022.elements[6] = ((closureN)self_734852)->elements[7];
c_7310022.elements[7] = ((closureN)self_734852)->elements[8];

return_direct_with_clo3(data,  __glo_min_scheme_base, (((closure)  __glo_min_scheme_base)->fn),  &c_7310022, ((closureN)self_734852)->elements[5], ((closureN)self_734852)->elements[4]);; 
}

static void __lambda_611(void *data, object self_734853, int argc, object *args) /* object self_734853, object r_733835 */
 {
 object r_733835 = args[0];
  


closureN_type c_7310027;
object e_7310081 [6];
c_7310027.hdr.mark = gc_color_red;
 c_7310027.hdr.grayed = 0;
c_7310027.tag = closureN_tag;
 c_7310027.fn = (function_type)__lambda_612;
c_7310027.num_args = 1;
c_7310027.num_elements = 6;
c_7310027.elements = (object *)e_7310081;
c_7310027.elements[0] = ((closureN)self_734853)->elements[1];
c_7310027.elements[1] = ((closureN)self_734853)->elements[2];
c_7310027.elements[2] = ((closureN)self_734853)->elements[3];
c_7310027.elements[3] = ((closureN)self_734853)->elements[4];
c_7310027.elements[4] = ((closureN)self_734853)->elements[5];
c_7310027.elements[5] = ((closureN)self_734853)->elements[6];

return_closcall4(data,  car(((closureN)self_734853)->elements[7]),  &c_7310027, ((closureN)self_734853)->elements[0], ((closureN)self_734853)->elements[5], r_733835);; 
}

static void __lambda_612(void *data, object self_734854, int argc, object *args) /* object self_734854, object r_733827 */
 {

    
if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_734854)->elements[2], ((closureN)self_734854)->elements[3])) ){ 
  


closureN_type c_7310036;
object e_7310048 [4];
c_7310036.hdr.mark = gc_color_red;
 c_7310036.hdr.grayed = 0;
c_7310036.tag = closureN_tag;
 c_7310036.fn = (function_type)__lambda_613;
c_7310036.num_args = 1;
c_7310036.num_elements = 4;
c_7310036.elements = (object *)e_7310048;
c_7310036.elements[0] = ((closureN)self_734854)->elements[0];
c_7310036.elements[1] = ((closureN)self_734854)->elements[3];
c_7310036.elements[2] = ((closureN)self_734854)->elements[4];
c_7310036.elements[3] = ((closureN)self_734854)->elements[5];


complex_num_type local_7310052; 
return_closcall3(data,  car(((closureN)self_734854)->elements[5]),  &c_7310036, ((closureN)self_734854)->elements[1], Cyc_fast_sum(data,&local_7310052, ((closureN)self_734854)->elements[1], ((closureN)self_734854)->elements[2]));
} else { 
  


closureN_type c_7310059;
object e_7310074 [4];
c_7310059.hdr.mark = gc_color_red;
 c_7310059.hdr.grayed = 0;
c_7310059.tag = closureN_tag;
 c_7310059.fn = (function_type)__lambda_614;
c_7310059.num_args = 1;
c_7310059.num_elements = 4;
c_7310059.elements = (object *)e_7310074;
c_7310059.elements[0] = ((closureN)self_734854)->elements[0];
c_7310059.elements[1] = ((closureN)self_734854)->elements[1];
c_7310059.elements[2] = ((closureN)self_734854)->elements[2];
c_7310059.elements[3] = ((closureN)self_734854)->elements[5];


complex_num_type local_7310077; 
return_closcall3(data,  car(((closureN)self_734854)->elements[5]),  &c_7310059, Cyc_fast_sub(data,&local_7310077, ((closureN)self_734854)->elements[4], ((closureN)self_734854)->elements[3]), ((closureN)self_734854)->elements[4]);}
;; 
}

static void __lambda_614(void *data, object self_734856, int argc, object *args) /* object self_734856, object r_733832 */
 {

  
closureN_type c_7310061;
object e_7310068 [3];
c_7310061.hdr.mark = gc_color_red;
 c_7310061.hdr.grayed = 0;
c_7310061.tag = closureN_tag;
 c_7310061.fn = (function_type)__lambda_615;
c_7310061.num_args = 1;
c_7310061.num_elements = 3;
c_7310061.elements = (object *)e_7310068;
c_7310061.elements[0] = ((closureN)self_734856)->elements[0];
c_7310061.elements[1] = ((closureN)self_734856)->elements[1];
c_7310061.elements[2] = ((closureN)self_734856)->elements[3];


complex_num_type local_7310071; 
return_direct_with_clo1(data,(closure)&c_7310061,__lambda_615,  Cyc_fast_sum(data,&local_7310071, ((closureN)self_734856)->elements[1], ((closureN)self_734856)->elements[2]));; 
}

static void __lambda_615(void *data, object self_734857, int argc, object *args) /* object self_734857, object r_733833 */
 {
 object r_733833 = args[0];
  

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

static void __lambda_613(void *data, object self_734855, int argc, object *args) /* object self_734855, object r_733829 */
 {

  


complex_num_type local_7310044; 
return_closcall3(data,  car(((closureN)self_734855)->elements[3]),  ((closureN)self_734855)->elements[0], Cyc_fast_sub(data,&local_7310044, ((closureN)self_734855)->elements[2], ((closureN)self_734855)->elements[1]), ((closureN)self_734855)->elements[2]);; 
}

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



return_direct_with_clo1(data,(closure)&c_739990,__lambda_606,  Cyc_set_cell(data, ((closureN)self_734858)->elements[0], r_733820));; 
}

static void __lambda_606(void *data, object self_734859, int argc, object *args) /* object self_734859, object r_733818 */
 {

  


complex_num_type local_7310000; 

complex_num_type local_7310004; 
return_closcall5(data,  car(((closureN)self_734859)->elements[2]),  ((closureN)self_734859)->elements[0], ((closureN)self_734859)->elements[1], ((closureN)self_734859)->elements[1], Cyc_fast_sub(data,&local_7310000, ((closureN)self_734859)->elements[3], obj_int2obj(1)), Cyc_fast_sub(data,&local_7310004, ((closureN)self_734859)->elements[3], obj_int2obj(1)));; 
}

static void __lambda_593(void *data, object self_734860, int argc, object *args) /* object self_734860, object r_733812 */
 {
 object r_733812 = args[0];
  
closureN_type c_739941;
object e_739949 [4];
c_739941.hdr.mark = gc_color_red;
 c_739941.hdr.grayed = 0;
c_739941.tag = closureN_tag;
 c_739941.fn = (function_type)__lambda_594;
c_739941.num_args = 1;
c_739941.num_elements = 4;
c_739941.elements = (object *)e_739949;
c_739941.elements[0] = ((closureN)self_734860)->elements[0];
c_739941.elements[1] = ((closureN)self_734860)->elements[1];
c_739941.elements[2] = ((closureN)self_734860)->elements[2];
c_739941.elements[3] = ((closureN)self_734860)->elements[3];



return_direct_with_clo1(data,(closure)&c_739941,__lambda_594,  Cyc_set_cell(data, ((closureN)self_734860)->elements[3], r_733812));; 
}

static void __lambda_594(void *data, object self_734861, int argc, object *args) /* object self_734861, object r_733811 */
 {

  

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

static void __lambda_576(void *data, object _, int argc, object *args) /* closure _,object k_733796, object _121_731752_732790, object v_731753_732791, object maybe_91start_87end_731754_732792_raw, ... */
 {
object k_733796 = args[0]; object _121_731752_732790 = args[1]; object v_731753_732791 = args[2];
load_varargs(maybe_91start_87end_731754_732792, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/132.sld:vector-quick-sort");

closureN_type c_739871;
object e_739911 [3];
c_739871.hdr.mark = gc_color_red;
 c_739871.hdr.grayed = 0;
c_739871.tag = closureN_tag;
 c_739871.fn = (function_type)__lambda_577;
c_739871.num_args = 1;
c_739871.num_elements = 3;
c_739871.elements = (object *)e_739911;
c_739871.elements[0] = _121_731752_732790;
c_739871.elements[1] = k_733796;
c_739871.elements[2] = v_731753_732791;


closureN_type c_739912;
object e_739916 [2];
c_739912.hdr.mark = gc_color_red;
 c_739912.hdr.grayed = 0;
c_739912.tag = closureN_tag;
 c_739912.fn = (function_type)__lambda_584;
c_739912.num_args = 0;
c_739912.num_elements = 2;
c_739912.elements = (object *)e_739916;
c_739912.elements[0] = maybe_91start_87end_731754_732792;
c_739912.elements[1] = v_731753_732791;

return_direct_with_clo1(data,(closure)&c_739871,__lambda_577,  &c_739912);; 
}

static void __lambda_584(void *data, object self_734773, int argc, object *args) /* object self_734773, object k_733805 */
 {
 object k_733805 = args[0];
  return_direct_with_clo3(data,  __glo_vector_91start_87end_srfi_132, (((closure)  __glo_vector_91start_87end_srfi_132)->fn),  k_733805, ((closureN)self_734773)->elements[1], ((closureN)self_734773)->elements[0]);; 
}

static void __lambda_577(void *data, object self_734774, int argc, object *args) /* object self_734774, object r_733797 */
 {
 object r_733797 = args[0];
  
closureN_type c_739873;
object e_739877 [2];
c_739873.hdr.mark = gc_color_red;
 c_739873.hdr.grayed = 0;
c_739873.tag = closureN_tag;
 c_739873.fn = (function_type)__lambda_578;
c_739873.num_args = 1;
c_739873.num_elements = 2;
c_739873.elements = (object *)e_739877;
c_739873.elements[0] = ((closureN)self_734774)->elements[1];
c_739873.elements[1] = r_733797;


closureN_type c_739878;
object e_739910 [2];
c_739878.hdr.mark = gc_color_red;
 c_739878.hdr.grayed = 0;
c_739878.tag = closureN_tag;
 c_739878.fn = (function_type)__lambda_579;
c_739878.num_args = 2;
c_739878.num_elements = 2;
c_739878.elements = (object *)e_739910;
c_739878.elements[0] = ((closureN)self_734774)->elements[0];
c_739878.elements[1] = ((closureN)self_734774)->elements[2];

return_direct_with_clo1(data,(closure)&c_739873,__lambda_578,  &c_739878);; 
}

static void __lambda_579(void *data, object self_734775, int argc, object *args) /* object self_734775, object k_733799, object start_731755_732793, object end_731756_732794 */
 {
 object k_733799 = args[0]; object start_731755_732793 = args[1]; object end_731756_732794 = args[2];
  
closureN_type c_739880;
object e_739903 [5];
c_739880.hdr.mark = gc_color_red;
 c_739880.hdr.grayed = 0;
c_739880.tag = closureN_tag;
 c_739880.fn = (function_type)__lambda_580;
c_739880.num_args = 1;
c_739880.num_elements = 5;
c_739880.elements = (object *)e_739903;
c_739880.elements[0] = ((closureN)self_734775)->elements[0];
c_739880.elements[1] = end_731756_732794;
c_739880.elements[2] = k_733799;
c_739880.elements[3] = start_731755_732793;
c_739880.elements[4] = ((closureN)self_734775)->elements[1];


complex_num_type local_739909; 

object c_739906 = Cyc_make_vector(data,(closure)&c_739880,1,Cyc_fast_sub(data,&local_739909, end_731756_732794, start_731755_732793));
return_closcall1(data,(closure)&c_739880,  c_739906);; 
}

static void __lambda_580(void *data, object self_734776, int argc, object *args) /* object self_734776, object ans_731757_732795 */
 {
 object ans_731757_732795 = args[0];
  
closureN_type c_739882;
object e_739899 [5];
c_739882.hdr.mark = gc_color_red;
 c_739882.hdr.grayed = 0;
c_739882.tag = closureN_tag;
 c_739882.fn = (function_type)__lambda_581;
c_739882.num_args = 1;
c_739882.num_elements = 5;
c_739882.elements = (object *)e_739899;
c_739882.elements[0] = ((closureN)self_734776)->elements[0];
c_739882.elements[1] = ans_731757_732795;
c_739882.elements[2] = ((closureN)self_734776)->elements[1];
c_739882.elements[3] = ((closureN)self_734776)->elements[2];
c_739882.elements[4] = ((closureN)self_734776)->elements[3];

return_direct_with_clo5(data,  __glo_vector_91portion_91copy_67_srfi_132, (((closure)  __glo_vector_91portion_91copy_67_srfi_132)->fn),  &c_739882, ans_731757_732795, ((closureN)self_734776)->elements[4], ((closureN)self_734776)->elements[3], ((closureN)self_734776)->elements[1]);; 
}

static void __lambda_581(void *data, object self_734777, int argc, object *args) /* object self_734777, object r_733801 */
 {

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


complex_num_type local_739896; 
return_direct_with_clo1(data,(closure)&c_739884,__lambda_582,  Cyc_fast_sub(data,&local_739896, ((closureN)self_734777)->elements[2], ((closureN)self_734777)->elements[4]));; 
}

static void __lambda_582(void *data, object self_734778, int argc, object *args) /* object self_734778, object r_733803 */
 {
 object r_733803 = args[0];
  
closureN_type c_739886;
object e_739890 [2];
c_739886.hdr.mark = gc_color_red;
 c_739886.hdr.grayed = 0;
c_739886.tag = closureN_tag;
 c_739886.fn = (function_type)__lambda_583;
c_739886.num_args = 1;
c_739886.num_elements = 2;
c_739886.elements = (object *)e_739890;
c_739886.elements[0] = ((closureN)self_734778)->elements[1];
c_739886.elements[1] = ((closureN)self_734778)->elements[2];

return_direct_with_clo5(data,  __glo__75quick_91sort_67_srfi_132, (((closure)  __glo__75quick_91sort_67_srfi_132)->fn),  &c_739886, ((closureN)self_734778)->elements[0], ((closureN)self_734778)->elements[1], obj_int2obj(0), r_733803);; 
}

static void __lambda_583(void *data, object self_734779, int argc, object *args) /* object self_734779, object r_733802 */
 {

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

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

static void __lambda_571(void *data, object _, int argc, object *args) /* closure _,object k_733789, object _121_731747_732785, object v_731748_732786, object maybe_91start_87end_731749_732787_raw, ... */
 {
object k_733789 = args[0]; object _121_731747_732785 = args[1]; object v_731748_732786 = args[2];
load_varargs(maybe_91start_87end_731749_732787, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/132.sld:vector-quick-sort!");

closureN_type c_739851;
object e_739863 [3];
c_739851.hdr.mark = gc_color_red;
 c_739851.hdr.grayed = 0;
c_739851.tag = closureN_tag;
 c_739851.fn = (function_type)__lambda_572;
c_739851.num_args = 1;
c_739851.num_elements = 3;
c_739851.elements = (object *)e_739863;
c_739851.elements[0] = _121_731747_732785;
c_739851.elements[1] = k_733789;
c_739851.elements[2] = v_731748_732786;


closureN_type c_739864;
object e_739868 [2];
c_739864.hdr.mark = gc_color_red;
 c_739864.hdr.grayed = 0;
c_739864.tag = closureN_tag;
 c_739864.fn = (function_type)__lambda_575;
c_739864.num_args = 0;
c_739864.num_elements = 2;
c_739864.elements = (object *)e_739868;
c_739864.elements[0] = maybe_91start_87end_731749_732787;
c_739864.elements[1] = v_731748_732786;

return_direct_with_clo1(data,(closure)&c_739851,__lambda_572,  &c_739864);; 
}

static void __lambda_575(void *data, object self_734769, int argc, object *args) /* object self_734769, object k_733793 */
 {
 object k_733793 = args[0];
  return_direct_with_clo3(data,  __glo_vector_91start_87end_srfi_132, (((closure)  __glo_vector_91start_87end_srfi_132)->fn),  k_733793, ((closureN)self_734769)->elements[1], ((closureN)self_734769)->elements[0]);; 
}

static void __lambda_572(void *data, object self_734770, int argc, object *args) /* object self_734770, object r_733790 */
 {
 object r_733790 = args[0];
  
closureN_type c_739853;
object e_739857 [2];
c_739853.hdr.mark = gc_color_red;
 c_739853.hdr.grayed = 0;
c_739853.tag = closureN_tag;
 c_739853.fn = (function_type)__lambda_573;
c_739853.num_args = 1;
c_739853.num_elements = 2;
c_739853.elements = (object *)e_739857;
c_739853.elements[0] = ((closureN)self_734770)->elements[1];
c_739853.elements[1] = r_733790;


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_574;
c_739858.num_args = 2;
c_739858.num_elements = 2;
c_739858.elements = (object *)e_739862;
c_739858.elements[0] = ((closureN)self_734770)->elements[0];
c_739858.elements[1] = ((closureN)self_734770)->elements[2];

return_direct_with_clo1(data,(closure)&c_739853,__lambda_573,  &c_739858);; 
}

static void __lambda_574(void *data, object self_734771, int argc, object *args) /* object self_734771, object k_733792, object start_731750_732788, object end_731751_732789 */
 {
 object k_733792 = args[0]; object start_731750_732788 = args[1]; object end_731751_732789 = args[2];
  return_direct_with_clo5(data,  __glo__75quick_91sort_67_srfi_132, (((closure)  __glo__75quick_91sort_67_srfi_132)->fn),  k_733792, ((closureN)self_734771)->elements[0], ((closureN)self_734771)->elements[1], start_731750_732788, end_731751_732789);; 
}

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

static void __lambda_503(void *data, object _, int argc, object *args) /* closure _,object k_733705, object elt_121_731653_732696, object v0_731654_732697, object l_731655_732698, object r_731656_732699, object temp0_731657_732700 */
 {
object k_733705 = args[0]; object elt_121_731653_732696 = args[1]; object v0_731654_732697 = args[2]; object l_731655_732698 = args[3]; object r_731656_732699 = args[4]; object temp0_731657_732700 = args[5];
  Cyc_st_add(data, "srfi/132.sld:%vector-merge-sort!");

closureN_type c_739225;
object e_739848 [6];
c_739225.hdr.mark = gc_color_red;
 c_739225.hdr.grayed = 0;
c_739225.tag = closureN_tag;
 c_739225.fn = (function_type)__lambda_504;
c_739225.num_args = 3;
c_739225.num_elements = 6;
c_739225.elements = (object *)e_739848;
c_739225.elements[0] = elt_121_731653_732696;
c_739225.elements[1] = k_733705;
c_739225.elements[2] = l_731655_732698;
c_739225.elements[3] = r_731656_732699;
c_739225.elements[4] = temp0_731657_732700;
c_739225.elements[5] = v0_731654_732697;

return_direct_with_clo3(data,(closure)&c_739225,__lambda_504,  boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_504(void *data, object self_734692, int argc, object *args) /* object self_734692, object getrun_732704, object merge_732705, object xor_732706 */
 {
 object getrun_732704 = args[0]; object merge_732705 = args[1]; object xor_732706 = args[2];
  
closureN_type c_739227;
object e_739844 [8];
c_739227.hdr.mark = gc_color_red;
 c_739227.hdr.grayed = 0;
c_739227.tag = closureN_tag;
 c_739227.fn = (function_type)__lambda_813;
c_739227.num_args = 1;
c_739227.num_elements = 8;
c_739227.elements = (object *)e_739844;
c_739227.elements[0] = ((closureN)self_734692)->elements[0];
c_739227.elements[1] = ((closureN)self_734692)->elements[1];
c_739227.elements[2] = ((closureN)self_734692)->elements[2];
c_739227.elements[3] = merge_732705;
c_739227.elements[4] = ((closureN)self_734692)->elements[3];
c_739227.elements[5] = ((closureN)self_734692)->elements[4];
c_739227.elements[6] = ((closureN)self_734692)->elements[5];
c_739227.elements[7] = xor_732706;


pair_type local_739847; 
return_direct_with_clo1(data,(closure)&c_739227,__lambda_813,  set_cell_as_expr(&local_739847, getrun_732704));; 
}

static void __lambda_813(void *data, object self_734693, int argc, object *args) /* object self_734693, object getrun_732704 */
 {
 object getrun_732704 = args[0];
  
closureN_type c_739229;
object e_739839 [8];
c_739229.hdr.mark = gc_color_red;
 c_739229.hdr.grayed = 0;
c_739229.tag = closureN_tag;
 c_739229.fn = (function_type)__lambda_812;
c_739229.num_args = 1;
c_739229.num_elements = 8;
c_739229.elements = (object *)e_739839;
c_739229.elements[0] = ((closureN)self_734693)->elements[0];
c_739229.elements[1] = getrun_732704;
c_739229.elements[2] = ((closureN)self_734693)->elements[1];
c_739229.elements[3] = ((closureN)self_734693)->elements[2];
c_739229.elements[4] = ((closureN)self_734693)->elements[4];
c_739229.elements[5] = ((closureN)self_734693)->elements[5];
c_739229.elements[6] = ((closureN)self_734693)->elements[6];
c_739229.elements[7] = ((closureN)self_734693)->elements[7];


pair_type local_739842; 
return_direct_with_clo1(data,(closure)&c_739229,__lambda_812,  set_cell_as_expr(&local_739842, ((closureN)self_734693)->elements[3]));; 
}

static void __lambda_812(void *data, object self_734694, int argc, object *args) /* object self_734694, object merge_732705 */
 {
 object merge_732705 = args[0];
  
closureN_type c_739231;
object e_739834 [8];
c_739231.hdr.mark = gc_color_red;
 c_739231.hdr.grayed = 0;
c_739231.tag = closureN_tag;
 c_739231.fn = (function_type)__lambda_811;
c_739231.num_args = 1;
c_739231.num_elements = 8;
c_739231.elements = (object *)e_739834;
c_739231.elements[0] = ((closureN)self_734694)->elements[0];
c_739231.elements[1] = ((closureN)self_734694)->elements[1];
c_739231.elements[2] = ((closureN)self_734694)->elements[2];
c_739231.elements[3] = ((closureN)self_734694)->elements[3];
c_739231.elements[4] = merge_732705;
c_739231.elements[5] = ((closureN)self_734694)->elements[4];
c_739231.elements[6] = ((closureN)self_734694)->elements[5];
c_739231.elements[7] = ((closureN)self_734694)->elements[6];


pair_type local_739837; 
return_direct_with_clo1(data,(closure)&c_739231,__lambda_811,  set_cell_as_expr(&local_739837, ((closureN)self_734694)->elements[7]));; 
}

static void __lambda_811(void *data, object self_734695, int argc, object *args) /* object self_734695, object xor_732706 */
 {
 object xor_732706 = args[0];
  
closureN_type c_739233;
object e_739826 [9];
c_739233.hdr.mark = gc_color_red;
 c_739233.hdr.grayed = 0;
c_739233.tag = closureN_tag;
 c_739233.fn = (function_type)__lambda_505;
c_739233.num_args = 1;
c_739233.num_elements = 9;
c_739233.elements = (object *)e_739826;
c_739233.elements[0] = ((closureN)self_734695)->elements[0];
c_739233.elements[1] = ((closureN)self_734695)->elements[1];
c_739233.elements[2] = ((closureN)self_734695)->elements[2];
c_739233.elements[3] = ((closureN)self_734695)->elements[3];
c_739233.elements[4] = ((closureN)self_734695)->elements[4];
c_739233.elements[5] = ((closureN)self_734695)->elements[5];
c_739233.elements[6] = ((closureN)self_734695)->elements[6];
c_739233.elements[7] = ((closureN)self_734695)->elements[7];
c_739233.elements[8] = xor_732706;


mclosure0(c_739827, (function_type)__lambda_570);c_739827.num_args = 2;
return_direct_with_clo1(data,(closure)&c_739233,__lambda_505,  &c_739827);; 
}

static void __lambda_570(void *data, object self_734696, int argc, object *args) /* object self_734696, object k_733785, object a_731658_732710, object b_731659_732711 */
 {
 object k_733785 = args[0]; object a_731658_732710 = args[1]; object b_731659_732711 = args[2];
  
complex_num_type local_739831; 


return_direct_with_clo1(data,  k_733785, (((closure)  k_733785)->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_739831, Cyc_eq(a_731658_732710, b_731659_732711)));; 
}

static void __lambda_505(void *data, object self_734697, int argc, object *args) /* object self_734697, object r_733784 */
 {
 object r_733784 = args[0];
  
closureN_type c_739235;
object e_739822 [9];
c_739235.hdr.mark = gc_color_red;
 c_739235.hdr.grayed = 0;
c_739235.tag = closureN_tag;
 c_739235.fn = (function_type)__lambda_506;
c_739235.num_args = 1;
c_739235.num_elements = 9;
c_739235.elements = (object *)e_739822;
c_739235.elements[0] = ((closureN)self_734697)->elements[0];
c_739235.elements[1] = ((closureN)self_734697)->elements[1];
c_739235.elements[2] = ((closureN)self_734697)->elements[2];
c_739235.elements[3] = ((closureN)self_734697)->elements[3];
c_739235.elements[4] = ((closureN)self_734697)->elements[4];
c_739235.elements[5] = ((closureN)self_734697)->elements[5];
c_739235.elements[6] = ((closureN)self_734697)->elements[6];
c_739235.elements[7] = ((closureN)self_734697)->elements[7];
c_739235.elements[8] = ((closureN)self_734697)->elements[8];



return_direct_with_clo1(data,(closure)&c_739235,__lambda_506,  Cyc_set_cell(data, ((closureN)self_734697)->elements[8], r_733784));; 
}

static void __lambda_506(void *data, object self_734698, int argc, object *args) /* object self_734698, object r_733706 */
 {

  
closureN_type c_739237;
object e_739564 [9];
c_739237.hdr.mark = gc_color_red;
 c_739237.hdr.grayed = 0;
c_739237.tag = closureN_tag;
 c_739237.fn = (function_type)__lambda_507;
c_739237.num_args = 1;
c_739237.num_elements = 9;
c_739237.elements = (object *)e_739564;
c_739237.elements[0] = ((closureN)self_734698)->elements[0];
c_739237.elements[1] = ((closureN)self_734698)->elements[1];
c_739237.elements[2] = ((closureN)self_734698)->elements[2];
c_739237.elements[3] = ((closureN)self_734698)->elements[3];
c_739237.elements[4] = ((closureN)self_734698)->elements[4];
c_739237.elements[5] = ((closureN)self_734698)->elements[5];
c_739237.elements[6] = ((closureN)self_734698)->elements[6];
c_739237.elements[7] = ((closureN)self_734698)->elements[7];
c_739237.elements[8] = ((closureN)self_734698)->elements[8];


closureN_type c_739565;
object e_739821 [1];
c_739565.hdr.mark = gc_color_red;
 c_739565.hdr.grayed = 0;
c_739565.tag = closureN_tag;
 c_739565.fn = (function_type)__lambda_547;
c_739565.num_args = 7;
c_739565.num_elements = 1;
c_739565.elements = (object *)e_739821;
c_739565.elements[0] = ((closureN)self_734698)->elements[0];

return_direct_with_clo1(data,(closure)&c_739237,__lambda_507,  &c_739565);; 
}

static void __lambda_547(void *data, object self_734699, int argc, object *args) /* object self_734699, object k_733755, object target_731660_732712, object v1_731661_732713, object v2_731662_732714, object l_731663_732715, object len1_731664_732716, object len2_731665_732717, object v2_123target_127_731666_732718 */
 {
 object k_733755 = args[0]; object target_731660_732712 = args[1]; object v1_731661_732713 = args[2]; object v2_731662_732714 = args[3]; object l_731663_732715 = args[4]; object len1_731664_732716 = args[5]; object len2_731665_732717 = args[6]; object v2_123target_127_731666_732718 = args[7];
  
closureN_type c_739567;
object e_739820 [9];
c_739567.hdr.mark = gc_color_red;
 c_739567.hdr.grayed = 0;
c_739567.tag = closureN_tag;
 c_739567.fn = (function_type)__lambda_548;
c_739567.num_args = 1;
c_739567.num_elements = 9;
c_739567.elements = (object *)e_739820;
c_739567.elements[0] = ((closureN)self_734699)->elements[0];
c_739567.elements[1] = k_733755;
c_739567.elements[2] = l_731663_732715;
c_739567.elements[3] = len1_731664_732716;
c_739567.elements[4] = len2_731665_732717;
c_739567.elements[5] = target_731660_732712;
c_739567.elements[6] = v1_731661_732713;
c_739567.elements[7] = v2_731662_732714;
c_739567.elements[8] = v2_123target_127_731666_732718;

return_direct_with_clo1(data,(closure)&c_739567,__lambda_548,  boolean_f);; 
}

static void __lambda_548(void *data, object self_734700, int argc, object *args) /* object self_734700, object vblit_731667_732719 */
 {
 object vblit_731667_732719 = args[0];
  
closureN_type c_739569;
object e_739816 [9];
c_739569.hdr.mark = gc_color_red;
 c_739569.hdr.grayed = 0;
c_739569.tag = closureN_tag;
 c_739569.fn = (function_type)__lambda_810;
c_739569.num_args = 1;
c_739569.num_elements = 9;
c_739569.elements = (object *)e_739816;
c_739569.elements[0] = ((closureN)self_734700)->elements[0];
c_739569.elements[1] = ((closureN)self_734700)->elements[1];
c_739569.elements[2] = ((closureN)self_734700)->elements[2];
c_739569.elements[3] = ((closureN)self_734700)->elements[3];
c_739569.elements[4] = ((closureN)self_734700)->elements[4];
c_739569.elements[5] = ((closureN)self_734700)->elements[5];
c_739569.elements[6] = ((closureN)self_734700)->elements[6];
c_739569.elements[7] = ((closureN)self_734700)->elements[7];
c_739569.elements[8] = ((closureN)self_734700)->elements[8];


pair_type local_739819; 
return_direct_with_clo1(data,(closure)&c_739569,__lambda_810,  set_cell_as_expr(&local_739819, vblit_731667_732719));; 
}

static void __lambda_810(void *data, object self_734701, int argc, object *args) /* object self_734701, object vblit_731667_732719 */
 {
 object vblit_731667_732719 = args[0];
  
closureN_type c_739571;
object e_739751 [10];
c_739571.hdr.mark = gc_color_red;
 c_739571.hdr.grayed = 0;
c_739571.tag = closureN_tag;
 c_739571.fn = (function_type)__lambda_549;
c_739571.num_args = 1;
c_739571.num_elements = 10;
c_739571.elements = (object *)e_739751;
c_739571.elements[0] = ((closureN)self_734701)->elements[0];
c_739571.elements[1] = ((closureN)self_734701)->elements[1];
c_739571.elements[2] = ((closureN)self_734701)->elements[2];
c_739571.elements[3] = ((closureN)self_734701)->elements[3];
c_739571.elements[4] = ((closureN)self_734701)->elements[4];
c_739571.elements[5] = ((closureN)self_734701)->elements[5];
c_739571.elements[6] = ((closureN)self_734701)->elements[6];
c_739571.elements[7] = ((closureN)self_734701)->elements[7];
c_739571.elements[8] = ((closureN)self_734701)->elements[8];
c_739571.elements[9] = vblit_731667_732719;


closureN_type c_739752;
object e_739815 [1];
c_739752.hdr.mark = gc_color_red;
 c_739752.hdr.grayed = 0;
c_739752.tag = closureN_tag;
 c_739752.fn = (function_type)__lambda_563;
c_739752.num_args = 4;
c_739752.num_elements = 1;
c_739752.elements = (object *)e_739815;
c_739752.elements[0] = ((closureN)self_734701)->elements[5];

return_direct_with_clo1(data,(closure)&c_739571,__lambda_549,  &c_739752);; 
}

static void __lambda_563(void *data, object self_734702, int argc, object *args) /* object self_734702, object k_733775, object fromv_731668_732720, object j_731669_732721, object i_731670_732722, object end_731671_732723 */
 {
 object k_733775 = args[0]; object fromv_731668_732720 = args[1]; object j_731669_732721 = args[2]; object i_731670_732722 = args[3]; object end_731671_732723 = args[4];
  
closureN_type c_739754;
object e_739814 [4];
c_739754.hdr.mark = gc_color_red;
 c_739754.hdr.grayed = 0;
c_739754.tag = closureN_tag;
 c_739754.fn = (function_type)__lambda_564;
c_739754.num_args = 2;
c_739754.num_elements = 4;
c_739754.elements = (object *)e_739814;
c_739754.elements[0] = end_731671_732723;
c_739754.elements[1] = fromv_731668_732720;
c_739754.elements[2] = k_733775;
c_739754.elements[3] = ((closureN)self_734702)->elements[0];

return_direct_with_clo2(data,(closure)&c_739754,__lambda_564,  j_731669_732721, i_731670_732722);; 
}

static void __lambda_564(void *data, object self_734703, int argc, object *args) /* object self_734703, object j_731673_732724, object i_731674_732725 */
 {
 object j_731673_732724 = args[0]; object i_731674_732725 = args[1];
  
closureN_type c_739756;
object e_739813 [6];
c_739756.hdr.mark = gc_color_red;
 c_739756.hdr.grayed = 0;
c_739756.tag = closureN_tag;
 c_739756.fn = (function_type)__lambda_565;
c_739756.num_args = 1;
c_739756.num_elements = 6;
c_739756.elements = (object *)e_739813;
c_739756.elements[0] = ((closureN)self_734703)->elements[0];
c_739756.elements[1] = ((closureN)self_734703)->elements[1];
c_739756.elements[2] = i_731674_732725;
c_739756.elements[3] = j_731673_732724;
c_739756.elements[4] = ((closureN)self_734703)->elements[2];
c_739756.elements[5] = ((closureN)self_734703)->elements[3];

return_direct_with_clo1(data,(closure)&c_739756,__lambda_565,  boolean_f);; 
}

static void __lambda_565(void *data, object self_734704, int argc, object *args) /* object self_734704, object lp_731675_732726 */
 {
 object lp_731675_732726 = args[0];
  
closureN_type c_739758;
object e_739809 [6];
c_739758.hdr.mark = gc_color_red;
 c_739758.hdr.grayed = 0;
c_739758.tag = closureN_tag;
 c_739758.fn = (function_type)__lambda_809;
c_739758.num_args = 1;
c_739758.num_elements = 6;
c_739758.elements = (object *)e_739809;
c_739758.elements[0] = ((closureN)self_734704)->elements[0];
c_739758.elements[1] = ((closureN)self_734704)->elements[1];
c_739758.elements[2] = ((closureN)self_734704)->elements[2];
c_739758.elements[3] = ((closureN)self_734704)->elements[3];
c_739758.elements[4] = ((closureN)self_734704)->elements[4];
c_739758.elements[5] = ((closureN)self_734704)->elements[5];


pair_type local_739812; 
return_direct_with_clo1(data,(closure)&c_739758,__lambda_809,  set_cell_as_expr(&local_739812, lp_731675_732726));; 
}

static void __lambda_809(void *data, object self_734705, int argc, object *args) /* object self_734705, object lp_731675_732726 */
 {
 object lp_731675_732726 = args[0];
  
closureN_type c_739760;
object e_739774 [4];
c_739760.hdr.mark = gc_color_red;
 c_739760.hdr.grayed = 0;
c_739760.tag = closureN_tag;
 c_739760.fn = (function_type)__lambda_566;
c_739760.num_args = 1;
c_739760.num_elements = 4;
c_739760.elements = (object *)e_739774;
c_739760.elements[0] = ((closureN)self_734705)->elements[2];
c_739760.elements[1] = ((closureN)self_734705)->elements[3];
c_739760.elements[2] = ((closureN)self_734705)->elements[4];
c_739760.elements[3] = lp_731675_732726;


closureN_type c_739775;
object e_739808 [4];
c_739775.hdr.mark = gc_color_red;
 c_739775.hdr.grayed = 0;
c_739775.tag = closureN_tag;
 c_739775.fn = (function_type)__lambda_568;
c_739775.num_args = 2;
c_739775.num_elements = 4;
c_739775.elements = (object *)e_739808;
c_739775.elements[0] = ((closureN)self_734705)->elements[0];
c_739775.elements[1] = ((closureN)self_734705)->elements[1];
c_739775.elements[2] = lp_731675_732726;
c_739775.elements[3] = ((closureN)self_734705)->elements[5];

return_direct_with_clo1(data,(closure)&c_739760,__lambda_566,  &c_739775);; 
}

static void __lambda_568(void *data, object self_734706, int argc, object *args) /* object self_734706, object k_733778, object j_731676_732727, object i_731677_732728 */
 {
 object k_733778 = args[0]; object j_731676_732727 = args[1]; object i_731677_732728 = args[2];
  
closureN_type c_739777;
object e_739800 [5];
c_739777.hdr.mark = gc_color_red;
 c_739777.hdr.grayed = 0;
c_739777.tag = closureN_tag;
 c_739777.fn = (function_type)__lambda_569;
c_739777.num_args = 1;
c_739777.num_elements = 5;
c_739777.elements = (object *)e_739800;
c_739777.elements[0] = ((closureN)self_734706)->elements[0];
c_739777.elements[1] = i_731677_732728;
c_739777.elements[2] = j_731676_732727;
c_739777.elements[3] = k_733778;
c_739777.elements[4] = ((closureN)self_734706)->elements[2];




object c_739803 = Cyc_vector_set_cps(data,(closure)&c_739777,((closureN)self_734706)->elements[3], i_731677_732728, Cyc_vector_ref(data, ((closureN)self_734706)->elements[1], j_731676_732727));
return_closcall1(data,(closure)&c_739777,  c_739803);; 
}

static void __lambda_569(void *data, object self_734707, int argc, object *args) /* object self_734707, object r_733779 */
 {

    
  complex_num_type local_739782; 
if( (boolean_f != Cyc_num_fast_lt_op(data, Cyc_fast_sum(data,&local_739782, ((closureN)self_734707)->elements[2], obj_int2obj(1)), ((closureN)self_734707)->elements[0])) ){ 
  


complex_num_type local_739792; 

complex_num_type local_739796; 
return_closcall3(data,  car(((closureN)self_734707)->elements[4]),  ((closureN)self_734707)->elements[3], Cyc_fast_sum(data,&local_739792, ((closureN)self_734707)->elements[2], obj_int2obj(1)), Cyc_fast_sum(data,&local_739796, ((closureN)self_734707)->elements[1], obj_int2obj(1)));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734707)->elements[3], (((closure)  ((closureN)self_734707)->elements[3])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_566(void *data, object self_734708, int argc, object *args) /* object self_734708, object r_733777 */
 {
 object r_733777 = args[0];
  
closureN_type c_739762;
object e_739770 [4];
c_739762.hdr.mark = gc_color_red;
 c_739762.hdr.grayed = 0;
c_739762.tag = closureN_tag;
 c_739762.fn = (function_type)__lambda_567;
c_739762.num_args = 1;
c_739762.num_elements = 4;
c_739762.elements = (object *)e_739770;
c_739762.elements[0] = ((closureN)self_734708)->elements[0];
c_739762.elements[1] = ((closureN)self_734708)->elements[1];
c_739762.elements[2] = ((closureN)self_734708)->elements[2];
c_739762.elements[3] = ((closureN)self_734708)->elements[3];



return_direct_with_clo1(data,(closure)&c_739762,__lambda_567,  Cyc_set_cell(data, ((closureN)self_734708)->elements[3], r_733777));; 
}

static void __lambda_567(void *data, object self_734709, int argc, object *args) /* object self_734709, object r_733776 */
 {

  

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

static void __lambda_549(void *data, object self_734710, int argc, object *args) /* object self_734710, object r_733774 */
 {
 object r_733774 = args[0];
  
closureN_type c_739573;
object e_739747 [10];
c_739573.hdr.mark = gc_color_red;
 c_739573.hdr.grayed = 0;
c_739573.tag = closureN_tag;
 c_739573.fn = (function_type)__lambda_550;
c_739573.num_args = 1;
c_739573.num_elements = 10;
c_739573.elements = (object *)e_739747;
c_739573.elements[0] = ((closureN)self_734710)->elements[0];
c_739573.elements[1] = ((closureN)self_734710)->elements[1];
c_739573.elements[2] = ((closureN)self_734710)->elements[2];
c_739573.elements[3] = ((closureN)self_734710)->elements[3];
c_739573.elements[4] = ((closureN)self_734710)->elements[4];
c_739573.elements[5] = ((closureN)self_734710)->elements[5];
c_739573.elements[6] = ((closureN)self_734710)->elements[6];
c_739573.elements[7] = ((closureN)self_734710)->elements[7];
c_739573.elements[8] = ((closureN)self_734710)->elements[8];
c_739573.elements[9] = ((closureN)self_734710)->elements[9];



return_direct_with_clo1(data,(closure)&c_739573,__lambda_550,  Cyc_set_cell(data, ((closureN)self_734710)->elements[9], r_733774));; 
}

static void __lambda_550(void *data, object self_734711, int argc, object *args) /* object self_734711, object r_733756 */
 {

  
closureN_type c_739575;
object e_739741 [9];
c_739575.hdr.mark = gc_color_red;
 c_739575.hdr.grayed = 0;
c_739575.tag = closureN_tag;
 c_739575.fn = (function_type)__lambda_551;
c_739575.num_args = 1;
c_739575.num_elements = 9;
c_739575.elements = (object *)e_739741;
c_739575.elements[0] = ((closureN)self_734711)->elements[0];
c_739575.elements[1] = ((closureN)self_734711)->elements[1];
c_739575.elements[2] = ((closureN)self_734711)->elements[2];
c_739575.elements[3] = ((closureN)self_734711)->elements[4];
c_739575.elements[4] = ((closureN)self_734711)->elements[5];
c_739575.elements[5] = ((closureN)self_734711)->elements[6];
c_739575.elements[6] = ((closureN)self_734711)->elements[7];
c_739575.elements[7] = ((closureN)self_734711)->elements[8];
c_739575.elements[8] = ((closureN)self_734711)->elements[9];


complex_num_type local_739744; 
return_direct_with_clo1(data,(closure)&c_739575,__lambda_551,  Cyc_fast_sum(data,&local_739744, ((closureN)self_734711)->elements[2], ((closureN)self_734711)->elements[3]));; 
}

static void __lambda_551(void *data, object self_734712, int argc, object *args) /* object self_734712, object r1_731681_732730 */
 {
 object r1_731681_732730 = args[0];
  
closureN_type c_739577;
object e_739736 [9];
c_739577.hdr.mark = gc_color_red;
 c_739577.hdr.grayed = 0;
c_739577.tag = closureN_tag;
 c_739577.fn = (function_type)__lambda_552;
c_739577.num_args = 1;
c_739577.num_elements = 9;
c_739577.elements = (object *)e_739736;
c_739577.elements[0] = ((closureN)self_734712)->elements[0];
c_739577.elements[1] = ((closureN)self_734712)->elements[1];
c_739577.elements[2] = ((closureN)self_734712)->elements[2];
c_739577.elements[3] = r1_731681_732730;
c_739577.elements[4] = ((closureN)self_734712)->elements[4];
c_739577.elements[5] = ((closureN)self_734712)->elements[5];
c_739577.elements[6] = ((closureN)self_734712)->elements[6];
c_739577.elements[7] = ((closureN)self_734712)->elements[7];
c_739577.elements[8] = ((closureN)self_734712)->elements[8];


complex_num_type local_739739; 
return_direct_with_clo1(data,(closure)&c_739577,__lambda_552,  Cyc_fast_sum(data,&local_739739, r1_731681_732730, ((closureN)self_734712)->elements[3]));; 
}

static void __lambda_552(void *data, object self_734713, int argc, object *args) /* object self_734713, object r2_731684_732731 */
 {
 object r2_731684_732731 = args[0];
  
closureN_type c_739579;
object e_739731 [10];
c_739579.hdr.mark = gc_color_red;
 c_739579.hdr.grayed = 0;
c_739579.tag = closureN_tag;
 c_739579.fn = (function_type)__lambda_553;
c_739579.num_args = 1;
c_739579.num_elements = 10;
c_739579.elements = (object *)e_739731;
c_739579.elements[0] = ((closureN)self_734713)->elements[0];
c_739579.elements[1] = ((closureN)self_734713)->elements[1];
c_739579.elements[2] = ((closureN)self_734713)->elements[2];
c_739579.elements[3] = ((closureN)self_734713)->elements[3];
c_739579.elements[4] = r2_731684_732731;
c_739579.elements[5] = ((closureN)self_734713)->elements[4];
c_739579.elements[6] = ((closureN)self_734713)->elements[5];
c_739579.elements[7] = ((closureN)self_734713)->elements[6];
c_739579.elements[8] = ((closureN)self_734713)->elements[7];
c_739579.elements[9] = ((closureN)self_734713)->elements[8];



return_direct_with_clo1(data,(closure)&c_739579,__lambda_553,  Cyc_vector_ref(data, ((closureN)self_734713)->elements[5], ((closureN)self_734713)->elements[2]));; 
}

static void __lambda_553(void *data, object self_734714, int argc, object *args) /* object self_734714, object r_733759 */
 {
 object r_733759 = args[0];
  
closureN_type c_739581;
object e_739726 [11];
c_739581.hdr.mark = gc_color_red;
 c_739581.hdr.grayed = 0;
c_739581.tag = closureN_tag;
 c_739581.fn = (function_type)__lambda_554;
c_739581.num_args = 1;
c_739581.num_elements = 11;
c_739581.elements = (object *)e_739726;
c_739581.elements[0] = ((closureN)self_734714)->elements[0];
c_739581.elements[1] = ((closureN)self_734714)->elements[1];
c_739581.elements[2] = ((closureN)self_734714)->elements[2];
c_739581.elements[3] = r_733759;
c_739581.elements[4] = ((closureN)self_734714)->elements[3];
c_739581.elements[5] = ((closureN)self_734714)->elements[4];
c_739581.elements[6] = ((closureN)self_734714)->elements[5];
c_739581.elements[7] = ((closureN)self_734714)->elements[6];
c_739581.elements[8] = ((closureN)self_734714)->elements[7];
c_739581.elements[9] = ((closureN)self_734714)->elements[8];
c_739581.elements[10] = ((closureN)self_734714)->elements[9];



return_direct_with_clo1(data,(closure)&c_739581,__lambda_554,  Cyc_vector_ref(data, ((closureN)self_734714)->elements[7], ((closureN)self_734714)->elements[3]));; 
}

static void __lambda_554(void *data, object self_734715, int argc, object *args) /* object self_734715, object r_733760 */
 {
 object r_733760 = args[0];
  
closureN_type c_739583;
object e_739721 [9];
c_739583.hdr.mark = gc_color_red;
 c_739583.hdr.grayed = 0;
c_739583.tag = closureN_tag;
 c_739583.fn = (function_type)__lambda_555;
c_739583.num_args = 5;
c_739583.num_elements = 9;
c_739583.elements = (object *)e_739721;
c_739583.elements[0] = ((closureN)self_734715)->elements[0];
c_739583.elements[1] = ((closureN)self_734715)->elements[1];
c_739583.elements[2] = ((closureN)self_734715)->elements[4];
c_739583.elements[3] = ((closureN)self_734715)->elements[5];
c_739583.elements[4] = ((closureN)self_734715)->elements[6];
c_739583.elements[5] = ((closureN)self_734715)->elements[7];
c_739583.elements[6] = ((closureN)self_734715)->elements[8];
c_739583.elements[7] = ((closureN)self_734715)->elements[9];
c_739583.elements[8] = ((closureN)self_734715)->elements[10];

return_direct_with_clo5(data,(closure)&c_739583,__lambda_555,  ((closureN)self_734715)->elements[2], ((closureN)self_734715)->elements[2], ((closureN)self_734715)->elements[3], ((closureN)self_734715)->elements[4], r_733760);; 
}

static void __lambda_555(void *data, object self_734716, int argc, object *args) /* object self_734716, object n_731687_732732, object j_731688_732733, object x_731689_732734, object k_731690_732735, object y_731691_732736 */
 {
 object n_731687_732732 = args[0]; object j_731688_732733 = args[1]; object x_731689_732734 = args[2]; object k_731690_732735 = args[3]; object y_731691_732736 = args[4];
  
closureN_type c_739585;
object e_739720 [14];
c_739585.hdr.mark = gc_color_red;
 c_739585.hdr.grayed = 0;
c_739585.tag = closureN_tag;
 c_739585.fn = (function_type)__lambda_556;
c_739585.num_args = 1;
c_739585.num_elements = 14;
c_739585.elements = (object *)e_739720;
c_739585.elements[0] = ((closureN)self_734716)->elements[0];
c_739585.elements[1] = j_731688_732733;
c_739585.elements[2] = k_731690_732735;
c_739585.elements[3] = ((closureN)self_734716)->elements[1];
c_739585.elements[4] = n_731687_732732;
c_739585.elements[5] = ((closureN)self_734716)->elements[2];
c_739585.elements[6] = ((closureN)self_734716)->elements[3];
c_739585.elements[7] = ((closureN)self_734716)->elements[4];
c_739585.elements[8] = ((closureN)self_734716)->elements[5];
c_739585.elements[9] = ((closureN)self_734716)->elements[6];
c_739585.elements[10] = ((closureN)self_734716)->elements[7];
c_739585.elements[11] = ((closureN)self_734716)->elements[8];
c_739585.elements[12] = x_731689_732734;
c_739585.elements[13] = y_731691_732736;

return_direct_with_clo1(data,(closure)&c_739585,__lambda_556,  boolean_f);; 
}

static void __lambda_556(void *data, object self_734717, int argc, object *args) /* object self_734717, object lp_731692_732737 */
 {
 object lp_731692_732737 = args[0];
  
closureN_type c_739587;
object e_739716 [14];
c_739587.hdr.mark = gc_color_red;
 c_739587.hdr.grayed = 0;
c_739587.tag = closureN_tag;
 c_739587.fn = (function_type)__lambda_808;
c_739587.num_args = 1;
c_739587.num_elements = 14;
c_739587.elements = (object *)e_739716;
c_739587.elements[0] = ((closureN)self_734717)->elements[0];
c_739587.elements[1] = ((closureN)self_734717)->elements[1];
c_739587.elements[2] = ((closureN)self_734717)->elements[2];
c_739587.elements[3] = ((closureN)self_734717)->elements[3];
c_739587.elements[4] = ((closureN)self_734717)->elements[4];
c_739587.elements[5] = ((closureN)self_734717)->elements[5];
c_739587.elements[6] = ((closureN)self_734717)->elements[6];
c_739587.elements[7] = ((closureN)self_734717)->elements[7];
c_739587.elements[8] = ((closureN)self_734717)->elements[8];
c_739587.elements[9] = ((closureN)self_734717)->elements[9];
c_739587.elements[10] = ((closureN)self_734717)->elements[10];
c_739587.elements[11] = ((closureN)self_734717)->elements[11];
c_739587.elements[12] = ((closureN)self_734717)->elements[12];
c_739587.elements[13] = ((closureN)self_734717)->elements[13];


pair_type local_739719; 
return_direct_with_clo1(data,(closure)&c_739587,__lambda_808,  set_cell_as_expr(&local_739719, lp_731692_732737));; 
}

static void __lambda_808(void *data, object self_734718, int argc, object *args) /* object self_734718, object lp_731692_732737 */
 {
 object lp_731692_732737 = args[0];
  
closureN_type c_739589;
object e_739606 [7];
c_739589.hdr.mark = gc_color_red;
 c_739589.hdr.grayed = 0;
c_739589.tag = closureN_tag;
 c_739589.fn = (function_type)__lambda_557;
c_739589.num_args = 1;
c_739589.num_elements = 7;
c_739589.elements = (object *)e_739606;
c_739589.elements[0] = ((closureN)self_734718)->elements[1];
c_739589.elements[1] = ((closureN)self_734718)->elements[2];
c_739589.elements[2] = ((closureN)self_734718)->elements[3];
c_739589.elements[3] = lp_731692_732737;
c_739589.elements[4] = ((closureN)self_734718)->elements[4];
c_739589.elements[5] = ((closureN)self_734718)->elements[12];
c_739589.elements[6] = ((closureN)self_734718)->elements[13];


closureN_type c_739607;
object e_739715 [9];
c_739607.hdr.mark = gc_color_red;
 c_739607.hdr.grayed = 0;
c_739607.tag = closureN_tag;
 c_739607.fn = (function_type)__lambda_559;
c_739607.num_args = 5;
c_739607.num_elements = 9;
c_739607.elements = (object *)e_739715;
c_739607.elements[0] = ((closureN)self_734718)->elements[0];
c_739607.elements[1] = lp_731692_732737;
c_739607.elements[2] = ((closureN)self_734718)->elements[5];
c_739607.elements[3] = ((closureN)self_734718)->elements[6];
c_739607.elements[4] = ((closureN)self_734718)->elements[7];
c_739607.elements[5] = ((closureN)self_734718)->elements[8];
c_739607.elements[6] = ((closureN)self_734718)->elements[9];
c_739607.elements[7] = ((closureN)self_734718)->elements[10];
c_739607.elements[8] = ((closureN)self_734718)->elements[11];

return_direct_with_clo1(data,(closure)&c_739589,__lambda_557,  &c_739607);; 
}

static void __lambda_559(void *data, object self_734719, int argc, object *args) /* object self_734719, object k_733763, object n_731693_732738, object j_731694_732739, object x_731695_732740, object k_731696_732741, object y_731697_732742 */
 {
 object k_733763 = args[0]; object n_731693_732738 = args[1]; object j_731694_732739 = args[2]; object x_731695_732740 = args[3]; object k_731696_732741 = args[4]; object y_731697_732742 = args[5];
  
closureN_type c_739610;
object e_739714 [14];
c_739610.hdr.mark = gc_color_red;
 c_739610.hdr.grayed = 0;
c_739610.tag = closureN_tag;
 c_739610.fn = (function_type)__lambda_560;
c_739610.num_args = 1;
c_739610.num_elements = 14;
c_739610.elements = (object *)e_739714;
c_739610.elements[0] = j_731694_732739;
c_739610.elements[1] = k_731696_732741;
c_739610.elements[2] = k_733763;
c_739610.elements[3] = ((closureN)self_734719)->elements[1];
c_739610.elements[4] = n_731693_732738;
c_739610.elements[5] = ((closureN)self_734719)->elements[2];
c_739610.elements[6] = ((closureN)self_734719)->elements[3];
c_739610.elements[7] = ((closureN)self_734719)->elements[4];
c_739610.elements[8] = ((closureN)self_734719)->elements[5];
c_739610.elements[9] = ((closureN)self_734719)->elements[6];
c_739610.elements[10] = ((closureN)self_734719)->elements[7];
c_739610.elements[11] = ((closureN)self_734719)->elements[8];
c_739610.elements[12] = x_731695_732740;
c_739610.elements[13] = y_731697_732742;

return_closcall3(data,  ((closureN)self_734719)->elements[0],  &c_739610, y_731697_732742, x_731695_732740);; 
}

static void __lambda_560(void *data, object self_734720, int argc, object *args) /* object self_734720, object r_733765 */
 {
 object r_733765 = args[0];
  if( (boolean_f != r_733765) ){ 
  
closureN_type c_739612;
object e_739654 [11];
c_739612.hdr.mark = gc_color_red;
 c_739612.hdr.grayed = 0;
c_739612.tag = closureN_tag;
 c_739612.fn = (function_type)__lambda_561;
c_739612.num_args = 1;
c_739612.num_elements = 11;
c_739612.elements = (object *)e_739654;
c_739612.elements[0] = ((closureN)self_734720)->elements[0];
c_739612.elements[1] = ((closureN)self_734720)->elements[1];
c_739612.elements[2] = ((closureN)self_734720)->elements[2];
c_739612.elements[3] = ((closureN)self_734720)->elements[3];
c_739612.elements[4] = ((closureN)self_734720)->elements[4];
c_739612.elements[5] = ((closureN)self_734720)->elements[5];
c_739612.elements[6] = ((closureN)self_734720)->elements[6];
c_739612.elements[7] = ((closureN)self_734720)->elements[8];
c_739612.elements[8] = ((closureN)self_734720)->elements[9];
c_739612.elements[9] = ((closureN)self_734720)->elements[11];
c_739612.elements[10] = ((closureN)self_734720)->elements[12];


object c_739657 = Cyc_vector_set_cps(data,(closure)&c_739612,((closureN)self_734720)->elements[7], ((closureN)self_734720)->elements[4], ((closureN)self_734720)->elements[13]);
return_closcall1(data,(closure)&c_739612,  c_739657);
} else { 
  
closureN_type c_739662;
object e_739707 [12];
c_739662.hdr.mark = gc_color_red;
 c_739662.hdr.grayed = 0;
c_739662.tag = closureN_tag;
 c_739662.fn = (function_type)__lambda_562;
c_739662.num_args = 1;
c_739662.num_elements = 12;
c_739662.elements = (object *)e_739707;
c_739662.elements[0] = ((closureN)self_734720)->elements[0];
c_739662.elements[1] = ((closureN)self_734720)->elements[1];
c_739662.elements[2] = ((closureN)self_734720)->elements[2];
c_739662.elements[3] = ((closureN)self_734720)->elements[3];
c_739662.elements[4] = ((closureN)self_734720)->elements[4];
c_739662.elements[5] = ((closureN)self_734720)->elements[5];
c_739662.elements[6] = ((closureN)self_734720)->elements[6];
c_739662.elements[7] = ((closureN)self_734720)->elements[8];
c_739662.elements[8] = ((closureN)self_734720)->elements[9];
c_739662.elements[9] = ((closureN)self_734720)->elements[10];
c_739662.elements[10] = ((closureN)self_734720)->elements[11];
c_739662.elements[11] = ((closureN)self_734720)->elements[13];


object c_739710 = Cyc_vector_set_cps(data,(closure)&c_739662,((closureN)self_734720)->elements[7], ((closureN)self_734720)->elements[4], ((closureN)self_734720)->elements[12]);
return_closcall1(data,(closure)&c_739662,  c_739710);}
;; 
}

static void __lambda_562(void *data, object self_734722, int argc, object *args) /* object self_734722, object r_733771 */
 {

    
  complex_num_type local_739667; 
if( (boolean_f != Cyc_num_fast_lt_op(data, Cyc_fast_sum(data,&local_739667, ((closureN)self_734722)->elements[0], obj_int2obj(1)), ((closureN)self_734722)->elements[5])) ){ 
  


complex_num_type local_739677; 

complex_num_type local_739681; 



complex_num_type local_739688; 
return_closcall6(data,  car(((closureN)self_734722)->elements[3]),  ((closureN)self_734722)->elements[2], Cyc_fast_sum(data,&local_739677, ((closureN)self_734722)->elements[4], obj_int2obj(1)), Cyc_fast_sum(data,&local_739681, ((closureN)self_734722)->elements[0], obj_int2obj(1)), Cyc_vector_ref(data, ((closureN)self_734722)->elements[7], Cyc_fast_sum(data,&local_739688, ((closureN)self_734722)->elements[0], obj_int2obj(1))), ((closureN)self_734722)->elements[1], ((closureN)self_734722)->elements[11]);
} else { 
  if( (boolean_f != ((closureN)self_734722)->elements[9]) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734722)->elements[2], (((closure)  ((closureN)self_734722)->elements[2])->fn),  Cyc_VOID);
} else { 
  


complex_num_type local_739704; 
return_closcall5(data,  car(((closureN)self_734722)->elements[10]),  ((closureN)self_734722)->elements[2], ((closureN)self_734722)->elements[8], ((closureN)self_734722)->elements[1], Cyc_fast_sum(data,&local_739704, ((closureN)self_734722)->elements[4], obj_int2obj(1)), ((closureN)self_734722)->elements[6]);}
;}
;; 
}

static void __lambda_561(void *data, object self_734721, int argc, object *args) /* object self_734721, object r_733767 */
 {

    
  complex_num_type local_739617; 
if( (boolean_f != Cyc_num_fast_lt_op(data, Cyc_fast_sum(data,&local_739617, ((closureN)self_734721)->elements[1], obj_int2obj(1)), ((closureN)self_734721)->elements[6])) ){ 
  


complex_num_type local_739627; 

complex_num_type local_739633; 



complex_num_type local_739640; 
return_closcall6(data,  car(((closureN)self_734721)->elements[3]),  ((closureN)self_734721)->elements[2], Cyc_fast_sum(data,&local_739627, ((closureN)self_734721)->elements[4], obj_int2obj(1)), ((closureN)self_734721)->elements[0], ((closureN)self_734721)->elements[10], Cyc_fast_sum(data,&local_739633, ((closureN)self_734721)->elements[1], obj_int2obj(1)), Cyc_vector_ref(data, ((closureN)self_734721)->elements[8], Cyc_fast_sum(data,&local_739640, ((closureN)self_734721)->elements[1], obj_int2obj(1))));
} else { 
  


complex_num_type local_739651; 
return_closcall5(data,  car(((closureN)self_734721)->elements[9]),  ((closureN)self_734721)->elements[2], ((closureN)self_734721)->elements[7], ((closureN)self_734721)->elements[0], Cyc_fast_sum(data,&local_739651, ((closureN)self_734721)->elements[4], obj_int2obj(1)), ((closureN)self_734721)->elements[5]);}
;; 
}

static void __lambda_557(void *data, object self_734723, int argc, object *args) /* object self_734723, object r_733762 */
 {
 object r_733762 = args[0];
  
closureN_type c_739591;
object e_739602 [7];
c_739591.hdr.mark = gc_color_red;
 c_739591.hdr.grayed = 0;
c_739591.tag = closureN_tag;
 c_739591.fn = (function_type)__lambda_558;
c_739591.num_args = 1;
c_739591.num_elements = 7;
c_739591.elements = (object *)e_739602;
c_739591.elements[0] = ((closureN)self_734723)->elements[0];
c_739591.elements[1] = ((closureN)self_734723)->elements[1];
c_739591.elements[2] = ((closureN)self_734723)->elements[2];
c_739591.elements[3] = ((closureN)self_734723)->elements[3];
c_739591.elements[4] = ((closureN)self_734723)->elements[4];
c_739591.elements[5] = ((closureN)self_734723)->elements[5];
c_739591.elements[6] = ((closureN)self_734723)->elements[6];



return_direct_with_clo1(data,(closure)&c_739591,__lambda_558,  Cyc_set_cell(data, ((closureN)self_734723)->elements[3], r_733762));; 
}

static void __lambda_558(void *data, object self_734724, int argc, object *args) /* object self_734724, object r_733761 */
 {

  

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

static void __lambda_507(void *data, object self_734725, int argc, object *args) /* object self_734725, object r_733754 */
 {
 object r_733754 = args[0];
  
closureN_type c_739239;
object e_739560 [9];
c_739239.hdr.mark = gc_color_red;
 c_739239.hdr.grayed = 0;
c_739239.tag = closureN_tag;
 c_739239.fn = (function_type)__lambda_508;
c_739239.num_args = 1;
c_739239.num_elements = 9;
c_739239.elements = (object *)e_739560;
c_739239.elements[0] = ((closureN)self_734725)->elements[0];
c_739239.elements[1] = ((closureN)self_734725)->elements[1];
c_739239.elements[2] = ((closureN)self_734725)->elements[2];
c_739239.elements[3] = ((closureN)self_734725)->elements[3];
c_739239.elements[4] = ((closureN)self_734725)->elements[4];
c_739239.elements[5] = ((closureN)self_734725)->elements[5];
c_739239.elements[6] = ((closureN)self_734725)->elements[6];
c_739239.elements[7] = ((closureN)self_734725)->elements[7];
c_739239.elements[8] = ((closureN)self_734725)->elements[8];



return_direct_with_clo1(data,(closure)&c_739239,__lambda_508,  Cyc_set_cell(data, ((closureN)self_734725)->elements[4], r_733754));; 
}

static void __lambda_508(void *data, object self_734726, int argc, object *args) /* object self_734726, object r_733707 */
 {

  
closureN_type c_739241;
object e_739487 [8];
c_739241.hdr.mark = gc_color_red;
 c_739241.hdr.grayed = 0;
c_739241.tag = closureN_tag;
 c_739241.fn = (function_type)__lambda_509;
c_739241.num_args = 1;
c_739241.num_elements = 8;
c_739241.elements = (object *)e_739487;
c_739241.elements[0] = ((closureN)self_734726)->elements[1];
c_739241.elements[1] = ((closureN)self_734726)->elements[2];
c_739241.elements[2] = ((closureN)self_734726)->elements[3];
c_739241.elements[3] = ((closureN)self_734726)->elements[4];
c_739241.elements[4] = ((closureN)self_734726)->elements[5];
c_739241.elements[5] = ((closureN)self_734726)->elements[6];
c_739241.elements[6] = ((closureN)self_734726)->elements[7];
c_739241.elements[7] = ((closureN)self_734726)->elements[8];


closureN_type c_739488;
object e_739559 [1];
c_739488.hdr.mark = gc_color_red;
 c_739488.hdr.grayed = 0;
c_739488.tag = closureN_tag;
 c_739488.fn = (function_type)__lambda_540;
c_739488.num_args = 3;
c_739488.num_elements = 1;
c_739488.elements = (object *)e_739559;
c_739488.elements[0] = ((closureN)self_734726)->elements[0];

return_direct_with_clo1(data,(closure)&c_739241,__lambda_509,  &c_739488);; 
}

static void __lambda_540(void *data, object self_734727, int argc, object *args) /* object self_734727, object k_733744, object v_731701_732746, object l_731702_732747, object r_731703_732748 */
 {
 object k_733744 = args[0]; object v_731701_732746 = args[1]; object l_731702_732747 = args[2]; object r_731703_732748 = args[3];
  
closureN_type c_739490;
object e_739553 [5];
c_739490.hdr.mark = gc_color_red;
 c_739490.hdr.grayed = 0;
c_739490.tag = closureN_tag;
 c_739490.fn = (function_type)__lambda_541;
c_739490.num_args = 2;
c_739490.num_elements = 5;
c_739490.elements = (object *)e_739553;
c_739490.elements[0] = ((closureN)self_734727)->elements[0];
c_739490.elements[1] = k_733744;
c_739490.elements[2] = l_731702_732747;
c_739490.elements[3] = r_731703_732748;
c_739490.elements[4] = v_731701_732746;


complex_num_type local_739556; 


return_direct_with_clo2(data,(closure)&c_739490,__lambda_541,  Cyc_fast_sum(data,&local_739556, l_731702_732747, obj_int2obj(1)), Cyc_vector_ref(data, v_731701_732746, l_731702_732747));; 
}

static void __lambda_541(void *data, object self_734728, int argc, object *args) /* object self_734728, object i_731705_732749, object x_731706_732750 */
 {
 object i_731705_732749 = args[0]; object x_731706_732750 = args[1];
  
closureN_type c_739492;
object e_739552 [7];
c_739492.hdr.mark = gc_color_red;
 c_739492.hdr.grayed = 0;
c_739492.tag = closureN_tag;
 c_739492.fn = (function_type)__lambda_542;
c_739492.num_args = 1;
c_739492.num_elements = 7;
c_739492.elements = (object *)e_739552;
c_739492.elements[0] = ((closureN)self_734728)->elements[0];
c_739492.elements[1] = i_731705_732749;
c_739492.elements[2] = ((closureN)self_734728)->elements[1];
c_739492.elements[3] = ((closureN)self_734728)->elements[2];
c_739492.elements[4] = ((closureN)self_734728)->elements[3];
c_739492.elements[5] = ((closureN)self_734728)->elements[4];
c_739492.elements[6] = x_731706_732750;

return_direct_with_clo1(data,(closure)&c_739492,__lambda_542,  boolean_f);; 
}

static void __lambda_542(void *data, object self_734729, int argc, object *args) /* object self_734729, object lp_731707_732751 */
 {
 object lp_731707_732751 = args[0];
  
closureN_type c_739494;
object e_739548 [7];
c_739494.hdr.mark = gc_color_red;
 c_739494.hdr.grayed = 0;
c_739494.tag = closureN_tag;
 c_739494.fn = (function_type)__lambda_807;
c_739494.num_args = 1;
c_739494.num_elements = 7;
c_739494.elements = (object *)e_739548;
c_739494.elements[0] = ((closureN)self_734729)->elements[0];
c_739494.elements[1] = ((closureN)self_734729)->elements[1];
c_739494.elements[2] = ((closureN)self_734729)->elements[2];
c_739494.elements[3] = ((closureN)self_734729)->elements[3];
c_739494.elements[4] = ((closureN)self_734729)->elements[4];
c_739494.elements[5] = ((closureN)self_734729)->elements[5];
c_739494.elements[6] = ((closureN)self_734729)->elements[6];


pair_type local_739551; 
return_direct_with_clo1(data,(closure)&c_739494,__lambda_807,  set_cell_as_expr(&local_739551, lp_731707_732751));; 
}

static void __lambda_807(void *data, object self_734730, int argc, object *args) /* object self_734730, object lp_731707_732751 */
 {
 object lp_731707_732751 = args[0];
  
closureN_type c_739496;
object e_739510 [4];
c_739496.hdr.mark = gc_color_red;
 c_739496.hdr.grayed = 0;
c_739496.tag = closureN_tag;
 c_739496.fn = (function_type)__lambda_543;
c_739496.num_args = 1;
c_739496.num_elements = 4;
c_739496.elements = (object *)e_739510;
c_739496.elements[0] = ((closureN)self_734730)->elements[1];
c_739496.elements[1] = ((closureN)self_734730)->elements[2];
c_739496.elements[2] = lp_731707_732751;
c_739496.elements[3] = ((closureN)self_734730)->elements[6];


closureN_type c_739511;
object e_739547 [5];
c_739511.hdr.mark = gc_color_red;
 c_739511.hdr.grayed = 0;
c_739511.tag = closureN_tag;
 c_739511.fn = (function_type)__lambda_545;
c_739511.num_args = 2;
c_739511.num_elements = 5;
c_739511.elements = (object *)e_739547;
c_739511.elements[0] = ((closureN)self_734730)->elements[0];
c_739511.elements[1] = ((closureN)self_734730)->elements[3];
c_739511.elements[2] = lp_731707_732751;
c_739511.elements[3] = ((closureN)self_734730)->elements[4];
c_739511.elements[4] = ((closureN)self_734730)->elements[5];

return_direct_with_clo1(data,(closure)&c_739496,__lambda_543,  &c_739511);; 
}

static void __lambda_545(void *data, object self_734731, int argc, object *args) /* object self_734731, object k_733749, object i_731708_732752, object x_731709_732753 */
 {
 object k_733749 = args[0]; object i_731708_732752 = args[1]; object x_731709_732753 = args[2];
    
if( (boolean_f != Cyc_num_fast_gte_op(data, i_731708_732752, ((closureN)self_734731)->elements[3])) ){ 
  
complex_num_type local_739518; 
return_direct_with_clo1(data,  k_733749, (((closure)  k_733749)->fn),  Cyc_fast_sub(data,&local_739518, i_731708_732752, ((closureN)self_734731)->elements[1]));
} else { 
  
closureN_type c_739522;
object e_739543 [5];
c_739522.hdr.mark = gc_color_red;
 c_739522.hdr.grayed = 0;
c_739522.tag = closureN_tag;
 c_739522.fn = (function_type)__lambda_546;
c_739522.num_args = 1;
c_739522.num_elements = 5;
c_739522.elements = (object *)e_739543;
c_739522.elements[0] = i_731708_732752;
c_739522.elements[1] = k_733749;
c_739522.elements[2] = ((closureN)self_734731)->elements[1];
c_739522.elements[3] = ((closureN)self_734731)->elements[2];
c_739522.elements[4] = ((closureN)self_734731)->elements[4];



return_closcall3(data,  ((closureN)self_734731)->elements[0],  &c_739522, Cyc_vector_ref(data, ((closureN)self_734731)->elements[4], i_731708_732752), x_731709_732753);}
;; 
}

static void __lambda_546(void *data, object self_734732, int argc, object *args) /* object self_734732, object r_733752 */
 {
 object r_733752 = args[0];
  if( (boolean_f != r_733752) ){ 
  
complex_num_type local_739527; 
return_direct_with_clo1(data,  ((closureN)self_734732)->elements[1], (((closure)  ((closureN)self_734732)->elements[1])->fn),  Cyc_fast_sub(data,&local_739527, ((closureN)self_734732)->elements[0], ((closureN)self_734732)->elements[2]));
} else { 
  


complex_num_type local_739537; 


return_closcall3(data,  car(((closureN)self_734732)->elements[3]),  ((closureN)self_734732)->elements[1], Cyc_fast_sum(data,&local_739537, ((closureN)self_734732)->elements[0], obj_int2obj(1)), Cyc_vector_ref(data, ((closureN)self_734732)->elements[4], ((closureN)self_734732)->elements[0]));}
;; 
}

static void __lambda_543(void *data, object self_734733, int argc, object *args) /* object self_734733, object r_733748 */
 {
 object r_733748 = args[0];
  
closureN_type c_739498;
object e_739506 [4];
c_739498.hdr.mark = gc_color_red;
 c_739498.hdr.grayed = 0;
c_739498.tag = closureN_tag;
 c_739498.fn = (function_type)__lambda_544;
c_739498.num_args = 1;
c_739498.num_elements = 4;
c_739498.elements = (object *)e_739506;
c_739498.elements[0] = ((closureN)self_734733)->elements[0];
c_739498.elements[1] = ((closureN)self_734733)->elements[1];
c_739498.elements[2] = ((closureN)self_734733)->elements[2];
c_739498.elements[3] = ((closureN)self_734733)->elements[3];



return_direct_with_clo1(data,(closure)&c_739498,__lambda_544,  Cyc_set_cell(data, ((closureN)self_734733)->elements[2], r_733748));; 
}

static void __lambda_544(void *data, object self_734734, int argc, object *args) /* object self_734734, object r_733747 */
 {

  

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

static void __lambda_509(void *data, object self_734735, int argc, object *args) /* object self_734735, object r_733743 */
 {
 object r_733743 = args[0];
  
closureN_type c_739243;
object e_739483 [8];
c_739243.hdr.mark = gc_color_red;
 c_739243.hdr.grayed = 0;
c_739243.tag = closureN_tag;
 c_739243.fn = (function_type)__lambda_510;
c_739243.num_args = 1;
c_739243.num_elements = 8;
c_739243.elements = (object *)e_739483;
c_739243.elements[0] = ((closureN)self_734735)->elements[0];
c_739243.elements[1] = ((closureN)self_734735)->elements[1];
c_739243.elements[2] = ((closureN)self_734735)->elements[2];
c_739243.elements[3] = ((closureN)self_734735)->elements[3];
c_739243.elements[4] = ((closureN)self_734735)->elements[4];
c_739243.elements[5] = ((closureN)self_734735)->elements[5];
c_739243.elements[6] = ((closureN)self_734735)->elements[6];
c_739243.elements[7] = ((closureN)self_734735)->elements[7];



return_direct_with_clo1(data,(closure)&c_739243,__lambda_510,  Cyc_set_cell(data, ((closureN)self_734735)->elements[0], r_733743));; 
}

static void __lambda_510(void *data, object self_734736, int argc, object *args) /* object self_734736, object r_733708 */
 {

    
if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_734736)->elements[2], ((closureN)self_734736)->elements[4])) ){ 
  
closureN_type c_739249;
object e_739265 [5];
c_739249.hdr.mark = gc_color_red;
 c_739249.hdr.grayed = 0;
c_739249.tag = closureN_tag;
 c_739249.fn = (function_type)__lambda_511;
c_739249.num_args = 1;
c_739249.num_elements = 5;
c_739249.elements = (object *)e_739265;
c_739249.elements[0] = ((closureN)self_734736)->elements[1];
c_739249.elements[1] = ((closureN)self_734736)->elements[2];
c_739249.elements[2] = ((closureN)self_734736)->elements[4];
c_739249.elements[3] = ((closureN)self_734736)->elements[5];
c_739249.elements[4] = ((closureN)self_734736)->elements[6];


closureN_type c_739266;
object e_739480 [7];
c_739266.hdr.mark = gc_color_red;
 c_739266.hdr.grayed = 0;
c_739266.tag = closureN_tag;
 c_739266.fn = (function_type)__lambda_514;
c_739266.num_args = 0;
c_739266.num_elements = 7;
c_739266.elements = (object *)e_739480;
c_739266.elements[0] = ((closureN)self_734736)->elements[0];
c_739266.elements[1] = ((closureN)self_734736)->elements[2];
c_739266.elements[2] = ((closureN)self_734736)->elements[3];
c_739266.elements[3] = ((closureN)self_734736)->elements[4];
c_739266.elements[4] = ((closureN)self_734736)->elements[5];
c_739266.elements[5] = ((closureN)self_734736)->elements[6];
c_739266.elements[6] = ((closureN)self_734736)->elements[7];

return_direct_with_clo1(data,(closure)&c_739249,__lambda_511,  &c_739266);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734736)->elements[1], (((closure)  ((closureN)self_734736)->elements[1])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_514(void *data, object self_734737, int argc, object *args) /* object self_734737, object k_733713 */
 {
 object k_733713 = args[0];
  
closureN_type c_739268;
object e_739473 [7];
c_739268.hdr.mark = gc_color_red;
 c_739268.hdr.grayed = 0;
c_739268.tag = closureN_tag;
 c_739268.fn = (function_type)__lambda_515;
c_739268.num_args = 2;
c_739268.num_elements = 7;
c_739268.elements = (object *)e_739473;
c_739268.elements[0] = ((closureN)self_734737)->elements[0];
c_739268.elements[1] = k_733713;
c_739268.elements[2] = ((closureN)self_734737)->elements[2];
c_739268.elements[3] = ((closureN)self_734737)->elements[3];
c_739268.elements[4] = ((closureN)self_734737)->elements[4];
c_739268.elements[5] = ((closureN)self_734737)->elements[5];
c_739268.elements[6] = ((closureN)self_734737)->elements[6];


complex_num_type local_739477; 
return_direct_with_clo2(data,(closure)&c_739268,__lambda_515,  ((closureN)self_734737)->elements[1], Cyc_fast_sub(data,&local_739477, ((closureN)self_734737)->elements[3], ((closureN)self_734737)->elements[1]));; 
}

static void __lambda_515(void *data, object self_734738, int argc, object *args) /* object self_734738, object l_731712_732755, object want_731713_732756 */
 {
 object l_731712_732755 = args[0]; object want_731713_732756 = args[1];
  
closureN_type c_739270;
object e_739472 [9];
c_739270.hdr.mark = gc_color_red;
 c_739270.hdr.grayed = 0;
c_739270.tag = closureN_tag;
 c_739270.fn = (function_type)__lambda_516;
c_739270.num_args = 1;
c_739270.num_elements = 9;
c_739270.elements = (object *)e_739472;
c_739270.elements[0] = ((closureN)self_734738)->elements[0];
c_739270.elements[1] = ((closureN)self_734738)->elements[1];
c_739270.elements[2] = l_731712_732755;
c_739270.elements[3] = ((closureN)self_734738)->elements[2];
c_739270.elements[4] = ((closureN)self_734738)->elements[3];
c_739270.elements[5] = ((closureN)self_734738)->elements[4];
c_739270.elements[6] = ((closureN)self_734738)->elements[5];
c_739270.elements[7] = want_731713_732756;
c_739270.elements[8] = ((closureN)self_734738)->elements[6];

return_direct_with_clo1(data,(closure)&c_739270,__lambda_516,  boolean_f);; 
}

static void __lambda_516(void *data, object self_734739, int argc, object *args) /* object self_734739, object recur_731714_732757 */
 {
 object recur_731714_732757 = args[0];
  
closureN_type c_739272;
object e_739468 [9];
c_739272.hdr.mark = gc_color_red;
 c_739272.hdr.grayed = 0;
c_739272.tag = closureN_tag;
 c_739272.fn = (function_type)__lambda_806;
c_739272.num_args = 1;
c_739272.num_elements = 9;
c_739272.elements = (object *)e_739468;
c_739272.elements[0] = ((closureN)self_734739)->elements[0];
c_739272.elements[1] = ((closureN)self_734739)->elements[1];
c_739272.elements[2] = ((closureN)self_734739)->elements[2];
c_739272.elements[3] = ((closureN)self_734739)->elements[3];
c_739272.elements[4] = ((closureN)self_734739)->elements[4];
c_739272.elements[5] = ((closureN)self_734739)->elements[5];
c_739272.elements[6] = ((closureN)self_734739)->elements[6];
c_739272.elements[7] = ((closureN)self_734739)->elements[7];
c_739272.elements[8] = ((closureN)self_734739)->elements[8];


pair_type local_739471; 
return_direct_with_clo1(data,(closure)&c_739272,__lambda_806,  set_cell_as_expr(&local_739471, recur_731714_732757));; 
}

static void __lambda_806(void *data, object self_734740, int argc, object *args) /* object self_734740, object recur_731714_732757 */
 {
 object recur_731714_732757 = args[0];
  
closureN_type c_739274;
object e_739288 [4];
c_739274.hdr.mark = gc_color_red;
 c_739274.hdr.grayed = 0;
c_739274.tag = closureN_tag;
 c_739274.fn = (function_type)__lambda_517;
c_739274.num_args = 1;
c_739274.num_elements = 4;
c_739274.elements = (object *)e_739288;
c_739274.elements[0] = ((closureN)self_734740)->elements[1];
c_739274.elements[1] = ((closureN)self_734740)->elements[2];
c_739274.elements[2] = recur_731714_732757;
c_739274.elements[3] = ((closureN)self_734740)->elements[7];


closureN_type c_739289;
object e_739467 [7];
c_739289.hdr.mark = gc_color_red;
 c_739289.hdr.grayed = 0;
c_739289.tag = closureN_tag;
 c_739289.fn = (function_type)__lambda_519;
c_739289.num_args = 2;
c_739289.num_elements = 7;
c_739289.elements = (object *)e_739467;
c_739289.elements[0] = ((closureN)self_734740)->elements[0];
c_739289.elements[1] = ((closureN)self_734740)->elements[3];
c_739289.elements[2] = ((closureN)self_734740)->elements[4];
c_739289.elements[3] = recur_731714_732757;
c_739289.elements[4] = ((closureN)self_734740)->elements[5];
c_739289.elements[5] = ((closureN)self_734740)->elements[6];
c_739289.elements[6] = ((closureN)self_734740)->elements[8];

return_direct_with_clo1(data,(closure)&c_739274,__lambda_517,  &c_739289);; 
}

static void __lambda_519(void *data, object self_734741, int argc, object *args) /* object self_734741, object k_733717, object l_731715_732758, object want_731716_732759 */
 {
 object k_733717 = args[0]; object l_731715_732758 = args[1]; object want_731716_732759 = args[2];
  


closureN_type c_739294;
object e_739464 [9];
c_739294.hdr.mark = gc_color_red;
 c_739294.hdr.grayed = 0;
c_739294.tag = closureN_tag;
 c_739294.fn = (function_type)__lambda_520;
c_739294.num_args = 1;
c_739294.num_elements = 9;
c_739294.elements = (object *)e_739464;
c_739294.elements[0] = k_733717;
c_739294.elements[1] = l_731715_732758;
c_739294.elements[2] = ((closureN)self_734741)->elements[1];
c_739294.elements[3] = ((closureN)self_734741)->elements[2];
c_739294.elements[4] = ((closureN)self_734741)->elements[3];
c_739294.elements[5] = ((closureN)self_734741)->elements[4];
c_739294.elements[6] = ((closureN)self_734741)->elements[5];
c_739294.elements[7] = want_731716_732759;
c_739294.elements[8] = ((closureN)self_734741)->elements[6];

return_closcall4(data,  car(((closureN)self_734741)->elements[0]),  &c_739294, ((closureN)self_734741)->elements[5], l_731715_732758, ((closureN)self_734741)->elements[2]);; 
}

static void __lambda_520(void *data, object self_734742, int argc, object *args) /* object self_734742, object r_733719 */
 {
 object r_733719 = args[0];
  
closureN_type c_739296;
object e_739461 [7];
c_739296.hdr.mark = gc_color_red;
 c_739296.hdr.grayed = 0;
c_739296.tag = closureN_tag;
 c_739296.fn = (function_type)__lambda_521;
c_739296.num_args = 3;
c_739296.num_elements = 7;
c_739296.elements = (object *)e_739461;
c_739296.elements[0] = ((closureN)self_734742)->elements[0];
c_739296.elements[1] = ((closureN)self_734742)->elements[1];
c_739296.elements[2] = ((closureN)self_734742)->elements[2];
c_739296.elements[3] = ((closureN)self_734742)->elements[3];
c_739296.elements[4] = ((closureN)self_734742)->elements[4];
c_739296.elements[5] = ((closureN)self_734742)->elements[7];
c_739296.elements[6] = ((closureN)self_734742)->elements[8];

return_direct_with_clo3(data,(closure)&c_739296,__lambda_521,  r_733719, ((closureN)self_734742)->elements[6], ((closureN)self_734742)->elements[5]);; 
}

static void __lambda_521(void *data, object self_734743, int argc, object *args) /* object self_734743, object pfxlen_731719_732761, object v_731721_732763, object temp_731722_732764 */
 {
 object pfxlen_731719_732761 = args[0]; object v_731721_732763 = args[1]; object temp_731722_732764 = args[2];
  
closureN_type c_739298;
object e_739460 [10];
c_739298.hdr.mark = gc_color_red;
 c_739298.hdr.grayed = 0;
c_739298.tag = closureN_tag;
 c_739298.fn = (function_type)__lambda_522;
c_739298.num_args = 1;
c_739298.num_elements = 10;
c_739298.elements = (object *)e_739460;
c_739298.elements[0] = ((closureN)self_734743)->elements[0];
c_739298.elements[1] = ((closureN)self_734743)->elements[1];
c_739298.elements[2] = ((closureN)self_734743)->elements[2];
c_739298.elements[3] = pfxlen_731719_732761;
c_739298.elements[4] = ((closureN)self_734743)->elements[3];
c_739298.elements[5] = ((closureN)self_734743)->elements[4];
c_739298.elements[6] = temp_731722_732764;
c_739298.elements[7] = v_731721_732763;
c_739298.elements[8] = ((closureN)self_734743)->elements[5];
c_739298.elements[9] = ((closureN)self_734743)->elements[6];

return_direct_with_clo1(data,(closure)&c_739298,__lambda_522,  boolean_f);; 
}

static void __lambda_522(void *data, object self_734744, int argc, object *args) /* object self_734744, object lp_731724_732766 */
 {
 object lp_731724_732766 = args[0];
  
closureN_type c_739300;
object e_739456 [10];
c_739300.hdr.mark = gc_color_red;
 c_739300.hdr.grayed = 0;
c_739300.tag = closureN_tag;
 c_739300.fn = (function_type)__lambda_805;
c_739300.num_args = 1;
c_739300.num_elements = 10;
c_739300.elements = (object *)e_739456;
c_739300.elements[0] = ((closureN)self_734744)->elements[0];
c_739300.elements[1] = ((closureN)self_734744)->elements[1];
c_739300.elements[2] = ((closureN)self_734744)->elements[2];
c_739300.elements[3] = ((closureN)self_734744)->elements[3];
c_739300.elements[4] = ((closureN)self_734744)->elements[4];
c_739300.elements[5] = ((closureN)self_734744)->elements[5];
c_739300.elements[6] = ((closureN)self_734744)->elements[6];
c_739300.elements[7] = ((closureN)self_734744)->elements[7];
c_739300.elements[8] = ((closureN)self_734744)->elements[8];
c_739300.elements[9] = ((closureN)self_734744)->elements[9];


pair_type local_739459; 
return_direct_with_clo1(data,(closure)&c_739300,__lambda_805,  set_cell_as_expr(&local_739459, lp_731724_732766));; 
}

static void __lambda_805(void *data, object self_734745, int argc, object *args) /* object self_734745, object lp_731724_732766 */
 {
 object lp_731724_732766 = args[0];
  
closureN_type c_739302;
object e_739317 [5];
c_739302.hdr.mark = gc_color_red;
 c_739302.hdr.grayed = 0;
c_739302.tag = closureN_tag;
 c_739302.fn = (function_type)__lambda_523;
c_739302.num_args = 1;
c_739302.num_elements = 5;
c_739302.elements = (object *)e_739317;
c_739302.elements[0] = ((closureN)self_734745)->elements[0];
c_739302.elements[1] = lp_731724_732766;
c_739302.elements[2] = ((closureN)self_734745)->elements[3];
c_739302.elements[3] = ((closureN)self_734745)->elements[6];
c_739302.elements[4] = ((closureN)self_734745)->elements[7];


closureN_type c_739318;
object e_739455 [7];
c_739318.hdr.mark = gc_color_red;
 c_739318.hdr.grayed = 0;
c_739318.tag = closureN_tag;
 c_739318.fn = (function_type)__lambda_525;
c_739318.num_args = 5;
c_739318.num_elements = 7;
c_739318.elements = (object *)e_739455;
c_739318.elements[0] = ((closureN)self_734745)->elements[1];
c_739318.elements[1] = lp_731724_732766;
c_739318.elements[2] = ((closureN)self_734745)->elements[2];
c_739318.elements[3] = ((closureN)self_734745)->elements[4];
c_739318.elements[4] = ((closureN)self_734745)->elements[5];
c_739318.elements[5] = ((closureN)self_734745)->elements[8];
c_739318.elements[6] = ((closureN)self_734745)->elements[9];

return_direct_with_clo1(data,(closure)&c_739302,__lambda_523,  &c_739318);; 
}

static void __lambda_525(void *data, object self_734746, int argc, object *args) /* object self_734746, object k_733722, object pfxlen_731725_732767, object pfxlen2_731726_732768, object v_731727_732769, object temp_731728_732770, object v_123v0_127_731729_732771 */
 {
 object k_733722 = args[0]; object pfxlen_731725_732767 = args[1]; object pfxlen2_731726_732768 = args[2]; object v_731727_732769 = args[3]; object temp_731728_732770 = args[4]; object v_123v0_127_731729_732771 = args[5];
  object r_733723;
    
if( (boolean_f != Cyc_num_fast_gte_op(data, pfxlen_731725_732767, ((closureN)self_734746)->elements[5])) ){ 
  
  r_733723 = Cyc_num_fast_gte_op(data, pfxlen_731725_732767, ((closureN)self_734746)->elements[5]);
} else { 
  
  object local_739332 = alloca(sizeof(complex_num_type)); 
  r_733723 = Cyc_num_fast_eq_op(data, pfxlen_731725_732767, Cyc_fast_sub(data,local_739332, ((closureN)self_734746)->elements[3], ((closureN)self_734746)->elements[0]));}
;if( (boolean_f != r_733723) ){ 
  return_direct_with_clo4(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_733722, pfxlen_731725_732767, v_731727_732769, v_123v0_127_731729_732771);
} else { 
  
closureN_type c_739337;
object e_739454 [11];
c_739337.hdr.mark = gc_color_red;
 c_739337.hdr.grayed = 0;
c_739337.tag = closureN_tag;
 c_739337.fn = (function_type)__lambda_526;
c_739337.num_args = 1;
c_739337.num_elements = 11;
c_739337.elements = (object *)e_739454;
c_739337.elements[0] = k_733722;
c_739337.elements[1] = ((closureN)self_734746)->elements[0];
c_739337.elements[2] = ((closureN)self_734746)->elements[1];
c_739337.elements[3] = ((closureN)self_734746)->elements[2];
c_739337.elements[4] = pfxlen_731725_732767;
c_739337.elements[5] = ((closureN)self_734746)->elements[3];
c_739337.elements[6] = ((closureN)self_734746)->elements[4];
c_739337.elements[7] = temp_731728_732770;
c_739337.elements[8] = v_731727_732769;
c_739337.elements[9] = v_123v0_127_731729_732771;
c_739337.elements[10] = ((closureN)self_734746)->elements[6];

return_direct_with_clo1(data,(closure)&c_739337,__lambda_526,  pfxlen2_731726_732768);}
;; 
}

static void __lambda_526(void *data, object self_734747, int argc, object *args) /* object self_734747, object j_731740_732778 */
 {
 object j_731740_732778 = args[0];
  
closureN_type c_739339;
object e_739453 [12];
c_739339.hdr.mark = gc_color_red;
 c_739339.hdr.grayed = 0;
c_739339.tag = closureN_tag;
 c_739339.fn = (function_type)__lambda_527;
c_739339.num_args = 1;
c_739339.num_elements = 12;
c_739339.elements = (object *)e_739453;
c_739339.elements[0] = j_731740_732778;
c_739339.elements[1] = ((closureN)self_734747)->elements[0];
c_739339.elements[2] = ((closureN)self_734747)->elements[1];
c_739339.elements[3] = ((closureN)self_734747)->elements[2];
c_739339.elements[4] = ((closureN)self_734747)->elements[3];
c_739339.elements[5] = ((closureN)self_734747)->elements[4];
c_739339.elements[6] = ((closureN)self_734747)->elements[5];
c_739339.elements[7] = ((closureN)self_734747)->elements[6];
c_739339.elements[8] = ((closureN)self_734747)->elements[7];
c_739339.elements[9] = ((closureN)self_734747)->elements[8];
c_739339.elements[10] = ((closureN)self_734747)->elements[9];
c_739339.elements[11] = ((closureN)self_734747)->elements[10];

return_direct_with_clo1(data,(closure)&c_739339,__lambda_527,  boolean_f);; 
}

static void __lambda_527(void *data, object self_734748, int argc, object *args) /* object self_734748, object lp_731741_732779 */
 {
 object lp_731741_732779 = args[0];
  
closureN_type c_739341;
object e_739449 [12];
c_739341.hdr.mark = gc_color_red;
 c_739341.hdr.grayed = 0;
c_739341.tag = closureN_tag;
 c_739341.fn = (function_type)__lambda_804;
c_739341.num_args = 1;
c_739341.num_elements = 12;
c_739341.elements = (object *)e_739449;
c_739341.elements[0] = ((closureN)self_734748)->elements[0];
c_739341.elements[1] = ((closureN)self_734748)->elements[1];
c_739341.elements[2] = ((closureN)self_734748)->elements[2];
c_739341.elements[3] = ((closureN)self_734748)->elements[3];
c_739341.elements[4] = ((closureN)self_734748)->elements[4];
c_739341.elements[5] = ((closureN)self_734748)->elements[5];
c_739341.elements[6] = ((closureN)self_734748)->elements[6];
c_739341.elements[7] = ((closureN)self_734748)->elements[7];
c_739341.elements[8] = ((closureN)self_734748)->elements[8];
c_739341.elements[9] = ((closureN)self_734748)->elements[9];
c_739341.elements[10] = ((closureN)self_734748)->elements[10];
c_739341.elements[11] = ((closureN)self_734748)->elements[11];


pair_type local_739452; 
return_direct_with_clo1(data,(closure)&c_739341,__lambda_804,  set_cell_as_expr(&local_739452, lp_731741_732779));; 
}

static void __lambda_804(void *data, object self_734749, int argc, object *args) /* object self_734749, object lp_731741_732779 */
 {
 object lp_731741_732779 = args[0];
  
closureN_type c_739343;
object e_739435 [13];
c_739343.hdr.mark = gc_color_red;
 c_739343.hdr.grayed = 0;
c_739343.tag = closureN_tag;
 c_739343.fn = (function_type)__lambda_528;
c_739343.num_args = 1;
c_739343.num_elements = 13;
c_739343.elements = (object *)e_739435;
c_739343.elements[0] = ((closureN)self_734749)->elements[0];
c_739343.elements[1] = ((closureN)self_734749)->elements[1];
c_739343.elements[2] = ((closureN)self_734749)->elements[2];
c_739343.elements[3] = ((closureN)self_734749)->elements[3];
c_739343.elements[4] = lp_731741_732779;
c_739343.elements[5] = ((closureN)self_734749)->elements[4];
c_739343.elements[6] = ((closureN)self_734749)->elements[5];
c_739343.elements[7] = ((closureN)self_734749)->elements[6];
c_739343.elements[8] = ((closureN)self_734749)->elements[7];
c_739343.elements[9] = ((closureN)self_734749)->elements[8];
c_739343.elements[10] = ((closureN)self_734749)->elements[9];
c_739343.elements[11] = ((closureN)self_734749)->elements[10];
c_739343.elements[12] = ((closureN)self_734749)->elements[11];


closureN_type c_739436;
object e_739448 [2];
c_739436.hdr.mark = gc_color_red;
 c_739436.hdr.grayed = 0;
c_739436.tag = closureN_tag;
 c_739436.fn = (function_type)__lambda_539;
c_739436.num_args = 1;
c_739436.num_elements = 2;
c_739436.elements = (object *)e_739448;
c_739436.elements[0] = lp_731741_732779;
c_739436.elements[1] = ((closureN)self_734749)->elements[5];

return_direct_with_clo1(data,(closure)&c_739343,__lambda_528,  &c_739436);; 
}

static void __lambda_539(void *data, object self_734750, int argc, object *args) /* object self_734750, object k_733738, object j_731742_732780 */
 {
 object k_733738 = args[0]; object j_731742_732780 = args[1];
    
if( (boolean_f != Cyc_num_fast_lte_op(data, j_731742_732780, ((closureN)self_734750)->elements[1])) ){ 
  


complex_num_type local_739446; 
return_closcall2(data,  car(((closureN)self_734750)->elements[0]),  k_733738, Cyc_fast_sum(data,&local_739446, j_731742_732780, j_731742_732780));
} else { 
  return_direct_with_clo1(data,  k_733738, (((closure)  k_733738)->fn),  j_731742_732780);}
;; 
}

static void __lambda_528(void *data, object self_734751, int argc, object *args) /* object self_734751, object r_733737 */
 {
 object r_733737 = args[0];
  
closureN_type c_739345;
object e_739431 [13];
c_739345.hdr.mark = gc_color_red;
 c_739345.hdr.grayed = 0;
c_739345.tag = closureN_tag;
 c_739345.fn = (function_type)__lambda_529;
c_739345.num_args = 1;
c_739345.num_elements = 13;
c_739345.elements = (object *)e_739431;
c_739345.elements[0] = ((closureN)self_734751)->elements[0];
c_739345.elements[1] = ((closureN)self_734751)->elements[1];
c_739345.elements[2] = ((closureN)self_734751)->elements[2];
c_739345.elements[3] = ((closureN)self_734751)->elements[3];
c_739345.elements[4] = ((closureN)self_734751)->elements[4];
c_739345.elements[5] = ((closureN)self_734751)->elements[5];
c_739345.elements[6] = ((closureN)self_734751)->elements[6];
c_739345.elements[7] = ((closureN)self_734751)->elements[7];
c_739345.elements[8] = ((closureN)self_734751)->elements[8];
c_739345.elements[9] = ((closureN)self_734751)->elements[9];
c_739345.elements[10] = ((closureN)self_734751)->elements[10];
c_739345.elements[11] = ((closureN)self_734751)->elements[11];
c_739345.elements[12] = ((closureN)self_734751)->elements[12];



return_direct_with_clo1(data,(closure)&c_739345,__lambda_529,  Cyc_set_cell(data, ((closureN)self_734751)->elements[4], r_733737));; 
}

static void __lambda_529(void *data, object self_734752, int argc, object *args) /* object self_734752, object r_733736 */
 {

  


closureN_type c_739350;
object e_739429 [11];
c_739350.hdr.mark = gc_color_red;
 c_739350.hdr.grayed = 0;
c_739350.tag = closureN_tag;
 c_739350.fn = (function_type)__lambda_530;
c_739350.num_args = 1;
c_739350.num_elements = 11;
c_739350.elements = (object *)e_739429;
c_739350.elements[0] = ((closureN)self_734752)->elements[1];
c_739350.elements[1] = ((closureN)self_734752)->elements[2];
c_739350.elements[2] = ((closureN)self_734752)->elements[3];
c_739350.elements[3] = ((closureN)self_734752)->elements[5];
c_739350.elements[4] = ((closureN)self_734752)->elements[6];
c_739350.elements[5] = ((closureN)self_734752)->elements[7];
c_739350.elements[6] = ((closureN)self_734752)->elements[8];
c_739350.elements[7] = ((closureN)self_734752)->elements[9];
c_739350.elements[8] = ((closureN)self_734752)->elements[10];
c_739350.elements[9] = ((closureN)self_734752)->elements[11];
c_739350.elements[10] = ((closureN)self_734752)->elements[12];

return_closcall2(data,  car(((closureN)self_734752)->elements[4]),  &c_739350, ((closureN)self_734752)->elements[0]);; 
}

static void __lambda_530(void *data, object self_734753, int argc, object *args) /* object self_734753, object r_733724 */
 {
 object r_733724 = args[0];
  
closureN_type c_739352;
object e_739419 [10];
c_739352.hdr.mark = gc_color_red;
 c_739352.hdr.grayed = 0;
c_739352.tag = closureN_tag;
 c_739352.fn = (function_type)__lambda_531;
c_739352.num_args = 2;
c_739352.num_elements = 10;
c_739352.elements = (object *)e_739419;
c_739352.elements[0] = ((closureN)self_734753)->elements[0];
c_739352.elements[1] = ((closureN)self_734753)->elements[1];
c_739352.elements[2] = ((closureN)self_734753)->elements[2];
c_739352.elements[3] = ((closureN)self_734753)->elements[3];
c_739352.elements[4] = ((closureN)self_734753)->elements[4];
c_739352.elements[5] = ((closureN)self_734753)->elements[6];
c_739352.elements[6] = ((closureN)self_734753)->elements[7];
c_739352.elements[7] = ((closureN)self_734753)->elements[8];
c_739352.elements[8] = ((closureN)self_734753)->elements[9];
c_739352.elements[9] = ((closureN)self_734753)->elements[10];


complex_num_type local_739422; 

complex_num_type local_739425; 
return_direct_with_clo2(data,(closure)&c_739352,__lambda_531,  r_733724, Cyc_fast_sub(data,&local_739422, Cyc_fast_sub(data,&local_739425, ((closureN)self_734753)->elements[5], ((closureN)self_734753)->elements[1]), ((closureN)self_734753)->elements[4]));; 
}

static void __lambda_531(void *data, object self_734754, int argc, object *args) /* object self_734754, object pfxlen2_731734_732773, object tail_91len_731735_732774 */
 {
 object pfxlen2_731734_732773 = args[0];
  
closureN_type c_739354;
object e_739406 [10];
c_739354.hdr.mark = gc_color_red;
 c_739354.hdr.grayed = 0;
c_739354.tag = closureN_tag;
 c_739354.fn = (function_type)__lambda_532;
c_739354.num_args = 1;
c_739354.num_elements = 10;
c_739354.elements = (object *)e_739406;
c_739354.elements[0] = ((closureN)self_734754)->elements[0];
c_739354.elements[1] = ((closureN)self_734754)->elements[1];
c_739354.elements[2] = ((closureN)self_734754)->elements[2];
c_739354.elements[3] = ((closureN)self_734754)->elements[3];
c_739354.elements[4] = ((closureN)self_734754)->elements[4];
c_739354.elements[5] = pfxlen2_731734_732773;
c_739354.elements[6] = ((closureN)self_734754)->elements[6];
c_739354.elements[7] = ((closureN)self_734754)->elements[7];
c_739354.elements[8] = ((closureN)self_734754)->elements[8];
c_739354.elements[9] = ((closureN)self_734754)->elements[9];


closureN_type c_739407;
object e_739418 [4];
c_739407.hdr.mark = gc_color_red;
 c_739407.hdr.grayed = 0;
c_739407.tag = closureN_tag;
 c_739407.fn = (function_type)__lambda_538;
c_739407.num_args = 0;
c_739407.num_elements = 4;
c_739407.elements = (object *)e_739418;
c_739407.elements[0] = ((closureN)self_734754)->elements[1];
c_739407.elements[1] = ((closureN)self_734754)->elements[4];
c_739407.elements[2] = pfxlen2_731734_732773;
c_739407.elements[3] = ((closureN)self_734754)->elements[5];

return_direct_with_clo1(data,(closure)&c_739354,__lambda_532,  &c_739407);; 
}

static void __lambda_538(void *data, object self_734755, int argc, object *args) /* object self_734755, object k_733734 */
 {
 object k_733734 = args[0];
  


complex_num_type local_739414; 
return_closcall3(data,  car(((closureN)self_734755)->elements[3]),  k_733734, Cyc_fast_sum(data,&local_739414, ((closureN)self_734755)->elements[1], ((closureN)self_734755)->elements[0]), ((closureN)self_734755)->elements[2]);; 
}

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


closureN_type c_739361;
object e_739405 [9];
c_739361.hdr.mark = gc_color_red;
 c_739361.hdr.grayed = 0;
c_739361.tag = closureN_tag;
 c_739361.fn = (function_type)__lambda_534;
c_739361.num_args = 3;
c_739361.num_elements = 9;
c_739361.elements = (object *)e_739405;
c_739361.elements[0] = ((closureN)self_734756)->elements[1];
c_739361.elements[1] = ((closureN)self_734756)->elements[2];
c_739361.elements[2] = ((closureN)self_734756)->elements[3];
c_739361.elements[3] = ((closureN)self_734756)->elements[4];
c_739361.elements[4] = ((closureN)self_734756)->elements[5];
c_739361.elements[5] = ((closureN)self_734756)->elements[6];
c_739361.elements[6] = ((closureN)self_734756)->elements[7];
c_739361.elements[7] = ((closureN)self_734756)->elements[8];
c_739361.elements[8] = ((closureN)self_734756)->elements[9];

return_direct_with_clo1(data,(closure)&c_739356,__lambda_533,  &c_739361);; 
}

static void __lambda_534(void *data, object self_734757, int argc, object *args) /* object self_734757, object k_733728, object nr_91len_731736_732775, object nr_91vec_731737_732776, object nrvec_123v0_127_731738_732777 */
 {
 object k_733728 = args[0]; object nr_91len_731736_732775 = args[1]; object nr_91vec_731737_732776 = args[2]; object nrvec_123v0_127_731738_732777 = args[3];
  


closureN_type c_739366;
object e_739403 [11];
c_739366.hdr.mark = gc_color_red;
 c_739366.hdr.grayed = 0;
c_739366.tag = closureN_tag;
 c_739366.fn = (function_type)__lambda_535;
c_739366.num_args = 1;
c_739366.num_elements = 11;
c_739366.elements = (object *)e_739403;
c_739366.elements[0] = k_733728;
c_739366.elements[1] = ((closureN)self_734757)->elements[0];
c_739366.elements[2] = ((closureN)self_734757)->elements[1];
c_739366.elements[3] = ((closureN)self_734757)->elements[2];
c_739366.elements[4] = nr_91len_731736_732775;
c_739366.elements[5] = nr_91vec_731737_732776;
c_739366.elements[6] = ((closureN)self_734757)->elements[3];
c_739366.elements[7] = ((closureN)self_734757)->elements[4];
c_739366.elements[8] = ((closureN)self_734757)->elements[5];
c_739366.elements[9] = ((closureN)self_734757)->elements[6];
c_739366.elements[10] = ((closureN)self_734757)->elements[7];

return_closcall3(data,  car(((closureN)self_734757)->elements[8]),  &c_739366, nrvec_123v0_127_731738_732777, ((closureN)self_734757)->elements[7]);; 
}

static void __lambda_535(void *data, object self_734758, int argc, object *args) /* object self_734758, object r_733733 */
 {
 object r_733733 = args[0];
  


closureN_type c_739371;
object e_739396 [8];
c_739371.hdr.mark = gc_color_red;
 c_739371.hdr.grayed = 0;
c_739371.tag = closureN_tag;
 c_739371.fn = (function_type)__lambda_536;
c_739371.num_args = 1;
c_739371.num_elements = 8;
c_739371.elements = (object *)e_739396;
c_739371.elements[0] = ((closureN)self_734758)->elements[0];
c_739371.elements[1] = ((closureN)self_734758)->elements[2];
c_739371.elements[2] = ((closureN)self_734758)->elements[4];
c_739371.elements[3] = ((closureN)self_734758)->elements[6];
c_739371.elements[4] = ((closureN)self_734758)->elements[7];
c_739371.elements[5] = ((closureN)self_734758)->elements[8];
c_739371.elements[6] = ((closureN)self_734758)->elements[9];
c_739371.elements[7] = ((closureN)self_734758)->elements[10];

return_closcall8(data,  car(((closureN)self_734758)->elements[3]),  &c_739371, ((closureN)self_734758)->elements[8], ((closureN)self_734758)->elements[9], ((closureN)self_734758)->elements[5], ((closureN)self_734758)->elements[1], ((closureN)self_734758)->elements[6], ((closureN)self_734758)->elements[4], r_733733);; 
}

static void __lambda_536(void *data, object self_734759, int argc, object *args) /* object self_734759, object r_733729 */
 {

  
closureN_type c_739373;
object e_739390 [6];
c_739373.hdr.mark = gc_color_red;
 c_739373.hdr.grayed = 0;
c_739373.tag = closureN_tag;
 c_739373.fn = (function_type)__lambda_537;
c_739373.num_args = 1;
c_739373.num_elements = 6;
c_739373.elements = (object *)e_739390;
c_739373.elements[0] = ((closureN)self_734759)->elements[0];
c_739373.elements[1] = ((closureN)self_734759)->elements[1];
c_739373.elements[2] = ((closureN)self_734759)->elements[4];
c_739373.elements[3] = ((closureN)self_734759)->elements[5];
c_739373.elements[4] = ((closureN)self_734759)->elements[6];
c_739373.elements[5] = ((closureN)self_734759)->elements[7];


complex_num_type local_739393; 
return_direct_with_clo1(data,(closure)&c_739373,__lambda_537,  Cyc_fast_sum(data,&local_739393, ((closureN)self_734759)->elements[3], ((closureN)self_734759)->elements[2]));; 
}

static void __lambda_537(void *data, object self_734760, int argc, object *args) /* object self_734760, object r_733730 */
 {
 object r_733730 = args[0];
  


complex_num_type local_739381; 

complex_num_type local_739388; 
return_closcall6(data,  car(((closureN)self_734760)->elements[1]),  ((closureN)self_734760)->elements[0], r_733730, Cyc_fast_sum(data,&local_739381, ((closureN)self_734760)->elements[2], ((closureN)self_734760)->elements[2]), ((closureN)self_734760)->elements[3], ((closureN)self_734760)->elements[4], ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_739388, ((closureN)self_734760)->elements[5]));; 
}

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

static void __lambda_523(void *data, object self_734762, int argc, object *args) /* object self_734762, object r_733721 */
 {
 object r_733721 = args[0];
  
closureN_type c_739304;
object e_739313 [5];
c_739304.hdr.mark = gc_color_red;
 c_739304.hdr.grayed = 0;
c_739304.tag = closureN_tag;
 c_739304.fn = (function_type)__lambda_524;
c_739304.num_args = 1;
c_739304.num_elements = 5;
c_739304.elements = (object *)e_739313;
c_739304.elements[0] = ((closureN)self_734762)->elements[0];
c_739304.elements[1] = ((closureN)self_734762)->elements[1];
c_739304.elements[2] = ((closureN)self_734762)->elements[2];
c_739304.elements[3] = ((closureN)self_734762)->elements[3];
c_739304.elements[4] = ((closureN)self_734762)->elements[4];



return_direct_with_clo1(data,(closure)&c_739304,__lambda_524,  Cyc_set_cell(data, ((closureN)self_734762)->elements[1], r_733721));; 
}

static void __lambda_524(void *data, object self_734763, int argc, object *args) /* object self_734763, object r_733720 */
 {

  

return_closcall6(data,  car(((closureN)self_734763)->elements[1]),  ((closureN)self_734763)->elements[0], ((closureN)self_734763)->elements[2], obj_int2obj(1), ((closureN)self_734763)->elements[4], ((closureN)self_734763)->elements[3], boolean_t);; 
}

static void __lambda_517(void *data, object self_734764, int argc, object *args) /* object self_734764, object r_733716 */
 {
 object r_733716 = args[0];
  
closureN_type c_739276;
object e_739284 [4];
c_739276.hdr.mark = gc_color_red;
 c_739276.hdr.grayed = 0;
c_739276.tag = closureN_tag;
 c_739276.fn = (function_type)__lambda_518;
c_739276.num_args = 1;
c_739276.num_elements = 4;
c_739276.elements = (object *)e_739284;
c_739276.elements[0] = ((closureN)self_734764)->elements[0];
c_739276.elements[1] = ((closureN)self_734764)->elements[1];
c_739276.elements[2] = ((closureN)self_734764)->elements[2];
c_739276.elements[3] = ((closureN)self_734764)->elements[3];



return_direct_with_clo1(data,(closure)&c_739276,__lambda_518,  Cyc_set_cell(data, ((closureN)self_734764)->elements[2], r_733716));; 
}

static void __lambda_518(void *data, object self_734765, int argc, object *args) /* object self_734765, object r_733715 */
 {

  

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

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


closureN_type c_739256;
object e_739264 [4];
c_739256.hdr.mark = gc_color_red;
 c_739256.hdr.grayed = 0;
c_739256.tag = closureN_tag;
 c_739256.fn = (function_type)__lambda_513;
c_739256.num_args = 3;
c_739256.num_elements = 4;
c_739256.elements = (object *)e_739264;
c_739256.elements[0] = ((closureN)self_734766)->elements[1];
c_739256.elements[1] = ((closureN)self_734766)->elements[2];
c_739256.elements[2] = ((closureN)self_734766)->elements[3];
c_739256.elements[3] = ((closureN)self_734766)->elements[4];

return_direct_with_clo1(data,(closure)&c_739251,__lambda_512,  &c_739256);; 
}

static void __lambda_513(void *data, object self_734767, int argc, object *args) /* object self_734767, object k_733712, object ignored_91len_731744_732782, object ignored_91ansvec_731745_732783, object ansvec_123v0_127_731746_732784 */
 {
 object k_733712 = args[0]; object ansvec_123v0_127_731746_732784 = args[3];
  if( (boolean_f != ansvec_123v0_127_731746_732784) ){ 
  return_direct_with_clo1(data,  k_733712, (((closure)  k_733712)->fn),  Cyc_VOID);
} else { 
  return_direct_with_clo6(data,  __glo_vector_91copy_67_scheme_base, (((closure)  __glo_vector_91copy_67_scheme_base)->fn),  k_733712, ((closureN)self_734767)->elements[3], ((closureN)self_734767)->elements[0], ((closureN)self_734767)->elements[2], ((closureN)self_734767)->elements[0], ((closureN)self_734767)->elements[1]);}
;; 
}

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

static void __lambda_496(void *data, object _, int argc, object *args) /* closure _,object k_733696, object _121_731647_732690, object v_731648_732691, object maybe_91args_731649_732692_raw, ... */
 {
object k_733696 = args[0]; object _121_731647_732690 = args[1]; object v_731648_732691 = args[2];
load_varargs(maybe_91args_731649_732692, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/132.sld:vector-merge-sort");

closureN_type c_739197;
object e_739217 [3];
c_739197.hdr.mark = gc_color_red;
 c_739197.hdr.grayed = 0;
c_739197.tag = closureN_tag;
 c_739197.fn = (function_type)__lambda_497;
c_739197.num_args = 1;
c_739197.num_elements = 3;
c_739197.elements = (object *)e_739217;
c_739197.elements[0] = _121_731647_732690;
c_739197.elements[1] = k_733696;
c_739197.elements[2] = v_731648_732691;


closureN_type c_739218;
object e_739222 [2];
c_739218.hdr.mark = gc_color_red;
 c_739218.hdr.grayed = 0;
c_739218.tag = closureN_tag;
 c_739218.fn = (function_type)__lambda_502;
c_739218.num_args = 0;
c_739218.num_elements = 2;
c_739218.elements = (object *)e_739222;
c_739218.elements[0] = maybe_91args_731649_732692;
c_739218.elements[1] = v_731648_732691;

return_direct_with_clo1(data,(closure)&c_739197,__lambda_497,  &c_739218);; 
}

static void __lambda_502(void *data, object self_734686, int argc, object *args) /* object self_734686, object k_733702 */
 {
 object k_733702 = args[0];
  return_direct_with_clo3(data,  __glo_vector_91start_87end_srfi_132, (((closure)  __glo_vector_91start_87end_srfi_132)->fn),  k_733702, ((closureN)self_734686)->elements[1], ((closureN)self_734686)->elements[0]);; 
}

static void __lambda_497(void *data, object self_734687, int argc, object *args) /* object self_734687, object r_733697 */
 {
 object r_733697 = args[0];
  
closureN_type c_739199;
object e_739203 [2];
c_739199.hdr.mark = gc_color_red;
 c_739199.hdr.grayed = 0;
c_739199.tag = closureN_tag;
 c_739199.fn = (function_type)__lambda_498;
c_739199.num_args = 1;
c_739199.num_elements = 2;
c_739199.elements = (object *)e_739203;
c_739199.elements[0] = ((closureN)self_734687)->elements[1];
c_739199.elements[1] = r_733697;


closureN_type c_739204;
object e_739216 [2];
c_739204.hdr.mark = gc_color_red;
 c_739204.hdr.grayed = 0;
c_739204.tag = closureN_tag;
 c_739204.fn = (function_type)__lambda_499;
c_739204.num_args = 2;
c_739204.num_elements = 2;
c_739204.elements = (object *)e_739216;
c_739204.elements[0] = ((closureN)self_734687)->elements[0];
c_739204.elements[1] = ((closureN)self_734687)->elements[2];

return_direct_with_clo1(data,(closure)&c_739199,__lambda_498,  &c_739204);; 
}

static void __lambda_499(void *data, object self_734688, int argc, object *args) /* object self_734688, object k_733699, object start_731650_732693, object end_731651_732694 */
 {
 object k_733699 = args[0]; object start_731650_732693 = args[1]; object end_731651_732694 = args[2];
  
closureN_type c_739206;
object e_739214 [2];
c_739206.hdr.mark = gc_color_red;
 c_739206.hdr.grayed = 0;
c_739206.tag = closureN_tag;
 c_739206.fn = (function_type)__lambda_500;
c_739206.num_args = 1;
c_739206.num_elements = 2;
c_739206.elements = (object *)e_739214;
c_739206.elements[0] = ((closureN)self_734688)->elements[0];
c_739206.elements[1] = k_733699;

return_direct_with_clo4(data,  __glo_vector_91copy_scheme_base, (((closure)  __glo_vector_91copy_scheme_base)->fn),  &c_739206, ((closureN)self_734688)->elements[1], start_731650_732693, end_731651_732694);; 
}

static void __lambda_500(void *data, object self_734689, int argc, object *args) /* object self_734689, object ans_731652_732695 */
 {
 object ans_731652_732695 = args[0];
  
closureN_type c_739208;
object e_739212 [2];
c_739208.hdr.mark = gc_color_red;
 c_739208.hdr.grayed = 0;
c_739208.tag = closureN_tag;
 c_739208.fn = (function_type)__lambda_501;
c_739208.num_args = 1;
c_739208.num_elements = 2;
c_739208.elements = (object *)e_739212;
c_739208.elements[0] = ans_731652_732695;
c_739208.elements[1] = ((closureN)self_734689)->elements[1];

return_direct_with_clo3(data,  __glo_vector_91merge_91sort_67_srfi_132, (((closure)  __glo_vector_91merge_91sort_67_srfi_132)->fn),  &c_739208, ((closureN)self_734689)->elements[0], ans_731652_732695);; 
}

static void __lambda_501(void *data, object self_734690, int argc, object *args) /* object self_734690, object r_733701 */
 {

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

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

static void __lambda_489(void *data, object _, int argc, object *args) /* closure _,object k_733681, object _121_731639_732684, object v_731640_732685, object maybe_91args_731641_732686_raw, ... */
 {
object k_733681 = args[0]; object _121_731639_732684 = args[1]; object v_731640_732685 = args[2];
load_varargs(maybe_91args_731641_732686, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/132.sld:vector-merge-sort!");

closureN_type c_739146;
object e_739189 [4];
c_739146.hdr.mark = gc_color_red;
 c_739146.hdr.grayed = 0;
c_739146.tag = closureN_tag;
 c_739146.fn = (function_type)__lambda_490;
c_739146.num_args = 1;
c_739146.num_elements = 4;
c_739146.elements = (object *)e_739189;
c_739146.elements[0] = _121_731639_732684;
c_739146.elements[1] = k_733681;
c_739146.elements[2] = maybe_91args_731641_732686;
c_739146.elements[3] = v_731640_732685;


closureN_type c_739190;
object e_739194 [2];
c_739190.hdr.mark = gc_color_red;
 c_739190.hdr.grayed = 0;
c_739190.tag = closureN_tag;
 c_739190.fn = (function_type)__lambda_495;
c_739190.num_args = 0;
c_739190.num_elements = 2;
c_739190.elements = (object *)e_739194;
c_739190.elements[0] = maybe_91args_731641_732686;
c_739190.elements[1] = v_731640_732685;

return_direct_with_clo1(data,(closure)&c_739146,__lambda_490,  &c_739190);; 
}

static void __lambda_495(void *data, object self_734680, int argc, object *args) /* object self_734680, object k_733693 */
 {
 object k_733693 = args[0];
  return_direct_with_clo3(data,  __glo_vector_91start_87end_srfi_132, (((closure)  __glo_vector_91start_87end_srfi_132)->fn),  k_733693, ((closureN)self_734680)->elements[1], ((closureN)self_734680)->elements[0]);; 
}

static void __lambda_490(void *data, object self_734681, int argc, object *args) /* object self_734681, object r_733682 */
 {
 object r_733682 = args[0];
  
closureN_type c_739148;
object e_739152 [2];
c_739148.hdr.mark = gc_color_red;
 c_739148.hdr.grayed = 0;
c_739148.tag = closureN_tag;
 c_739148.fn = (function_type)__lambda_491;
c_739148.num_args = 1;
c_739148.num_elements = 2;
c_739148.elements = (object *)e_739152;
c_739148.elements[0] = ((closureN)self_734681)->elements[1];
c_739148.elements[1] = r_733682;


closureN_type c_739153;
object e_739188 [3];
c_739153.hdr.mark = gc_color_red;
 c_739153.hdr.grayed = 0;
c_739153.tag = closureN_tag;
 c_739153.fn = (function_type)__lambda_492;
c_739153.num_args = 2;
c_739153.num_elements = 3;
c_739153.elements = (object *)e_739188;
c_739153.elements[0] = ((closureN)self_734681)->elements[0];
c_739153.elements[1] = ((closureN)self_734681)->elements[2];
c_739153.elements[2] = ((closureN)self_734681)->elements[3];

return_direct_with_clo1(data,(closure)&c_739148,__lambda_491,  &c_739153);; 
}

static void __lambda_492(void *data, object self_734682, int argc, object *args) /* object self_734682, object k_733684, object start_731642_732687, object end_731643_732688 */
 {
 object k_733684 = args[0]; object start_731642_732687 = args[1]; object end_731643_732688 = args[2];
  
closureN_type c_739155;
object e_739179 [2];
c_739155.hdr.mark = gc_color_red;
 c_739155.hdr.grayed = 0;
c_739155.tag = closureN_tag;
 c_739155.fn = (function_type)__lambda_493;
c_739155.num_args = 0;
c_739155.num_elements = 2;
c_739155.elements = (object *)e_739179;
c_739155.elements[0] = ((closureN)self_734682)->elements[1];
c_739155.elements[1] = ((closureN)self_734682)->elements[2];


closureN_type c_739180;
object e_739187 [5];
c_739180.hdr.mark = gc_color_red;
 c_739180.hdr.grayed = 0;
c_739180.tag = closureN_tag;
 c_739180.fn = (function_type)__lambda_494;
c_739180.num_args = 1;
c_739180.num_elements = 5;
c_739180.elements = (object *)e_739187;
c_739180.elements[0] = ((closureN)self_734682)->elements[0];
c_739180.elements[1] = end_731643_732688;
c_739180.elements[2] = k_733684;
c_739180.elements[3] = start_731642_732687;
c_739180.elements[4] = ((closureN)self_734682)->elements[2];

return_direct_with_clo1(data,(closure)&c_739155,__lambda_493,  &c_739180);; 
}

static void __lambda_494(void *data, object self_734683, int argc, object *args) /* object self_734683, object temp_731644_732689 */
 {
 object temp_731644_732689 = args[0];
  return_direct_with_clo6(data,  __glo__75vector_91merge_91sort_67_srfi_132, (((closure)  __glo__75vector_91merge_91sort_67_srfi_132)->fn),  ((closureN)self_734683)->elements[2], ((closureN)self_734683)->elements[0], ((closureN)self_734683)->elements[4], ((closureN)self_734683)->elements[3], ((closureN)self_734683)->elements[1], temp_731644_732689);; 
}

static void __lambda_493(void *data, object self_734684, int argc, object *args) /* object self_734684, object k_733686 */
 {
 object k_733686 = args[0];
  object r_733687;
    
if( (boolean_f != Cyc_is_pair(((closureN)self_734684)->elements[0])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_734684)->elements[0]))) ){ 
  
  
  r_733687 = Cyc_is_pair(Cyc_cddr(data, ((closureN)self_734684)->elements[0]));
} else { 
  r_733687 = boolean_f;}
;
} else { 
  r_733687 = boolean_f;}
;if( (boolean_f != r_733687) ){ 
  

return_direct_with_clo1(data,  k_733686, (((closure)  k_733686)->fn),  Cyc_caddr(data, ((closureN)self_734684)->elements[0]));
} else { 
  return_direct_with_clo2(data,  __glo_vector_91copy_srfi_132, (((closure)  __glo_vector_91copy_srfi_132)->fn),  k_733686, ((closureN)self_734684)->elements[1]);}
;; 
}

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

static void __lambda_468(void *data, object _, int argc, object *args) /* closure _,object k_733649, object elt_121_731596_732650, object v_731597_732651, object v1_731598_732652, object v2_731599_732653, object start_731600_732654, object start1_731601_732655, object end1_731602_732656, object start2_731603_732657, object end2_731604_732658 */
 {
object k_733649 = args[0]; object elt_121_731596_732650 = args[1]; object v_731597_732651 = args[2]; object v1_731598_732652 = args[3]; object v2_731599_732653 = args[4]; object start_731600_732654 = args[5]; object start1_731601_732655 = args[6]; object end1_731602_732656 = args[7]; object start2_731603_732657 = args[8]; object end2_731604_732658 = args[9];
  Cyc_st_add(data, "srfi/132.sld:%vector-merge!");

closureN_type c_738876;
object e_739143 [10];
c_738876.hdr.mark = gc_color_red;
 c_738876.hdr.grayed = 0;
c_738876.tag = closureN_tag;
 c_738876.fn = (function_type)__lambda_469;
c_738876.num_args = 1;
c_738876.num_elements = 10;
c_738876.elements = (object *)e_739143;
c_738876.elements[0] = elt_121_731596_732650;
c_738876.elements[1] = end1_731602_732656;
c_738876.elements[2] = end2_731604_732658;
c_738876.elements[3] = k_733649;
c_738876.elements[4] = start_731600_732654;
c_738876.elements[5] = start1_731601_732655;
c_738876.elements[6] = start2_731603_732657;
c_738876.elements[7] = v_731597_732651;
c_738876.elements[8] = v1_731598_732652;
c_738876.elements[9] = v2_731599_732653;

return_direct_with_clo1(data,(closure)&c_738876,__lambda_469,  boolean_f);; 
}

static void __lambda_469(void *data, object self_734657, int argc, object *args) /* object self_734657, object vblit_731605_732659 */
 {
 object vblit_731605_732659 = args[0];
  
closureN_type c_738878;
object e_739139 [10];
c_738878.hdr.mark = gc_color_red;
 c_738878.hdr.grayed = 0;
c_738878.tag = closureN_tag;
 c_738878.fn = (function_type)__lambda_803;
c_738878.num_args = 1;
c_738878.num_elements = 10;
c_738878.elements = (object *)e_739139;
c_738878.elements[0] = ((closureN)self_734657)->elements[0];
c_738878.elements[1] = ((closureN)self_734657)->elements[1];
c_738878.elements[2] = ((closureN)self_734657)->elements[2];
c_738878.elements[3] = ((closureN)self_734657)->elements[3];
c_738878.elements[4] = ((closureN)self_734657)->elements[4];
c_738878.elements[5] = ((closureN)self_734657)->elements[5];
c_738878.elements[6] = ((closureN)self_734657)->elements[6];
c_738878.elements[7] = ((closureN)self_734657)->elements[7];
c_738878.elements[8] = ((closureN)self_734657)->elements[8];
c_738878.elements[9] = ((closureN)self_734657)->elements[9];


pair_type local_739142; 
return_direct_with_clo1(data,(closure)&c_738878,__lambda_803,  set_cell_as_expr(&local_739142, vblit_731605_732659));; 
}

static void __lambda_803(void *data, object self_734658, int argc, object *args) /* object self_734658, object vblit_731605_732659 */
 {
 object vblit_731605_732659 = args[0];
  
closureN_type c_738880;
object e_739074 [11];
c_738880.hdr.mark = gc_color_red;
 c_738880.hdr.grayed = 0;
c_738880.tag = closureN_tag;
 c_738880.fn = (function_type)__lambda_470;
c_738880.num_args = 1;
c_738880.num_elements = 11;
c_738880.elements = (object *)e_739074;
c_738880.elements[0] = ((closureN)self_734658)->elements[0];
c_738880.elements[1] = ((closureN)self_734658)->elements[1];
c_738880.elements[2] = ((closureN)self_734658)->elements[2];
c_738880.elements[3] = ((closureN)self_734658)->elements[3];
c_738880.elements[4] = ((closureN)self_734658)->elements[4];
c_738880.elements[5] = ((closureN)self_734658)->elements[5];
c_738880.elements[6] = ((closureN)self_734658)->elements[6];
c_738880.elements[7] = ((closureN)self_734658)->elements[7];
c_738880.elements[8] = ((closureN)self_734658)->elements[8];
c_738880.elements[9] = ((closureN)self_734658)->elements[9];
c_738880.elements[10] = vblit_731605_732659;


closureN_type c_739075;
object e_739138 [1];
c_739075.hdr.mark = gc_color_red;
 c_739075.hdr.grayed = 0;
c_739075.tag = closureN_tag;
 c_739075.fn = (function_type)__lambda_482;
c_739075.num_args = 4;
c_739075.num_elements = 1;
c_739075.elements = (object *)e_739138;
c_739075.elements[0] = ((closureN)self_734658)->elements[7];

return_direct_with_clo1(data,(closure)&c_738880,__lambda_470,  &c_739075);; 
}

static void __lambda_482(void *data, object self_734659, int argc, object *args) /* object self_734659, object k_733670, object fromv_731606_732660, object j_731607_732661, object i_731608_732662, object end_731609_732663 */
 {
 object k_733670 = args[0]; object fromv_731606_732660 = args[1]; object j_731607_732661 = args[2]; object i_731608_732662 = args[3]; object end_731609_732663 = args[4];
  
closureN_type c_739077;
object e_739137 [4];
c_739077.hdr.mark = gc_color_red;
 c_739077.hdr.grayed = 0;
c_739077.tag = closureN_tag;
 c_739077.fn = (function_type)__lambda_483;
c_739077.num_args = 2;
c_739077.num_elements = 4;
c_739077.elements = (object *)e_739137;
c_739077.elements[0] = end_731609_732663;
c_739077.elements[1] = fromv_731606_732660;
c_739077.elements[2] = k_733670;
c_739077.elements[3] = ((closureN)self_734659)->elements[0];

return_direct_with_clo2(data,(closure)&c_739077,__lambda_483,  j_731607_732661, i_731608_732662);; 
}

static void __lambda_483(void *data, object self_734660, int argc, object *args) /* object self_734660, object j_731611_732664, object i_731612_732665 */
 {
 object j_731611_732664 = args[0]; object i_731612_732665 = args[1];
  
closureN_type c_739079;
object e_739136 [6];
c_739079.hdr.mark = gc_color_red;
 c_739079.hdr.grayed = 0;
c_739079.tag = closureN_tag;
 c_739079.fn = (function_type)__lambda_484;
c_739079.num_args = 1;
c_739079.num_elements = 6;
c_739079.elements = (object *)e_739136;
c_739079.elements[0] = ((closureN)self_734660)->elements[0];
c_739079.elements[1] = ((closureN)self_734660)->elements[1];
c_739079.elements[2] = i_731612_732665;
c_739079.elements[3] = j_731611_732664;
c_739079.elements[4] = ((closureN)self_734660)->elements[2];
c_739079.elements[5] = ((closureN)self_734660)->elements[3];

return_direct_with_clo1(data,(closure)&c_739079,__lambda_484,  boolean_f);; 
}

static void __lambda_484(void *data, object self_734661, int argc, object *args) /* object self_734661, object lp_731613_732666 */
 {
 object lp_731613_732666 = args[0];
  
closureN_type c_739081;
object e_739132 [6];
c_739081.hdr.mark = gc_color_red;
 c_739081.hdr.grayed = 0;
c_739081.tag = closureN_tag;
 c_739081.fn = (function_type)__lambda_802;
c_739081.num_args = 1;
c_739081.num_elements = 6;
c_739081.elements = (object *)e_739132;
c_739081.elements[0] = ((closureN)self_734661)->elements[0];
c_739081.elements[1] = ((closureN)self_734661)->elements[1];
c_739081.elements[2] = ((closureN)self_734661)->elements[2];
c_739081.elements[3] = ((closureN)self_734661)->elements[3];
c_739081.elements[4] = ((closureN)self_734661)->elements[4];
c_739081.elements[5] = ((closureN)self_734661)->elements[5];


pair_type local_739135; 
return_direct_with_clo1(data,(closure)&c_739081,__lambda_802,  set_cell_as_expr(&local_739135, lp_731613_732666));; 
}

static void __lambda_802(void *data, object self_734662, int argc, object *args) /* object self_734662, object lp_731613_732666 */
 {
 object lp_731613_732666 = args[0];
  
closureN_type c_739083;
object e_739097 [4];
c_739083.hdr.mark = gc_color_red;
 c_739083.hdr.grayed = 0;
c_739083.tag = closureN_tag;
 c_739083.fn = (function_type)__lambda_485;
c_739083.num_args = 1;
c_739083.num_elements = 4;
c_739083.elements = (object *)e_739097;
c_739083.elements[0] = ((closureN)self_734662)->elements[2];
c_739083.elements[1] = ((closureN)self_734662)->elements[3];
c_739083.elements[2] = ((closureN)self_734662)->elements[4];
c_739083.elements[3] = lp_731613_732666;


closureN_type c_739098;
object e_739131 [4];
c_739098.hdr.mark = gc_color_red;
 c_739098.hdr.grayed = 0;
c_739098.tag = closureN_tag;
 c_739098.fn = (function_type)__lambda_487;
c_739098.num_args = 2;
c_739098.num_elements = 4;
c_739098.elements = (object *)e_739131;
c_739098.elements[0] = ((closureN)self_734662)->elements[0];
c_739098.elements[1] = ((closureN)self_734662)->elements[1];
c_739098.elements[2] = lp_731613_732666;
c_739098.elements[3] = ((closureN)self_734662)->elements[5];

return_direct_with_clo1(data,(closure)&c_739083,__lambda_485,  &c_739098);; 
}

static void __lambda_487(void *data, object self_734663, int argc, object *args) /* object self_734663, object k_733673, object j_731614_732667, object i_731615_732668 */
 {
 object k_733673 = args[0]; object j_731614_732667 = args[1]; object i_731615_732668 = args[2];
  
closureN_type c_739100;
object e_739123 [5];
c_739100.hdr.mark = gc_color_red;
 c_739100.hdr.grayed = 0;
c_739100.tag = closureN_tag;
 c_739100.fn = (function_type)__lambda_488;
c_739100.num_args = 1;
c_739100.num_elements = 5;
c_739100.elements = (object *)e_739123;
c_739100.elements[0] = ((closureN)self_734663)->elements[0];
c_739100.elements[1] = i_731615_732668;
c_739100.elements[2] = j_731614_732667;
c_739100.elements[3] = k_733673;
c_739100.elements[4] = ((closureN)self_734663)->elements[2];




object c_739126 = Cyc_vector_set_cps(data,(closure)&c_739100,((closureN)self_734663)->elements[3], i_731615_732668, Cyc_vector_ref(data, ((closureN)self_734663)->elements[1], j_731614_732667));
return_closcall1(data,(closure)&c_739100,  c_739126);; 
}

static void __lambda_488(void *data, object self_734664, int argc, object *args) /* object self_734664, object r_733674 */
 {

    
  complex_num_type local_739105; 
if( (boolean_f != Cyc_num_fast_lt_op(data, Cyc_fast_sum(data,&local_739105, ((closureN)self_734664)->elements[2], obj_int2obj(1)), ((closureN)self_734664)->elements[0])) ){ 
  


complex_num_type local_739115; 

complex_num_type local_739119; 
return_closcall3(data,  car(((closureN)self_734664)->elements[4]),  ((closureN)self_734664)->elements[3], Cyc_fast_sum(data,&local_739115, ((closureN)self_734664)->elements[2], obj_int2obj(1)), Cyc_fast_sum(data,&local_739119, ((closureN)self_734664)->elements[1], obj_int2obj(1)));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734664)->elements[3], (((closure)  ((closureN)self_734664)->elements[3])->fn),  Cyc_VOID);}
;; 
}

static void __lambda_485(void *data, object self_734665, int argc, object *args) /* object self_734665, object r_733672 */
 {
 object r_733672 = args[0];
  
closureN_type c_739085;
object e_739093 [4];
c_739085.hdr.mark = gc_color_red;
 c_739085.hdr.grayed = 0;
c_739085.tag = closureN_tag;
 c_739085.fn = (function_type)__lambda_486;
c_739085.num_args = 1;
c_739085.num_elements = 4;
c_739085.elements = (object *)e_739093;
c_739085.elements[0] = ((closureN)self_734665)->elements[0];
c_739085.elements[1] = ((closureN)self_734665)->elements[1];
c_739085.elements[2] = ((closureN)self_734665)->elements[2];
c_739085.elements[3] = ((closureN)self_734665)->elements[3];



return_direct_with_clo1(data,(closure)&c_739085,__lambda_486,  Cyc_set_cell(data, ((closureN)self_734665)->elements[3], r_733672));; 
}

static void __lambda_486(void *data, object self_734666, int argc, object *args) /* object self_734666, object r_733671 */
 {

  

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

static void __lambda_470(void *data, object self_734667, int argc, object *args) /* object self_734667, object r_733669 */
 {
 object r_733669 = args[0];
  
closureN_type c_738882;
object e_739070 [11];
c_738882.hdr.mark = gc_color_red;
 c_738882.hdr.grayed = 0;
c_738882.tag = closureN_tag;
 c_738882.fn = (function_type)__lambda_471;
c_738882.num_args = 1;
c_738882.num_elements = 11;
c_738882.elements = (object *)e_739070;
c_738882.elements[0] = ((closureN)self_734667)->elements[0];
c_738882.elements[1] = ((closureN)self_734667)->elements[1];
c_738882.elements[2] = ((closureN)self_734667)->elements[2];
c_738882.elements[3] = ((closureN)self_734667)->elements[3];
c_738882.elements[4] = ((closureN)self_734667)->elements[4];
c_738882.elements[5] = ((closureN)self_734667)->elements[5];
c_738882.elements[6] = ((closureN)self_734667)->elements[6];
c_738882.elements[7] = ((closureN)self_734667)->elements[7];
c_738882.elements[8] = ((closureN)self_734667)->elements[8];
c_738882.elements[9] = ((closureN)self_734667)->elements[9];
c_738882.elements[10] = ((closureN)self_734667)->elements[10];



return_direct_with_clo1(data,(closure)&c_738882,__lambda_471,  Cyc_set_cell(data, ((closureN)self_734667)->elements[10], r_733669));; 
}

static void __lambda_471(void *data, object self_734668, int argc, object *args) /* object self_734668, object r_733650 */
 {

    
if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_734668)->elements[1], ((closureN)self_734668)->elements[5])) ){ 
    
if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_734668)->elements[6], ((closureN)self_734668)->elements[2])) ){ 
  

return_closcall5(data,  car(((closureN)self_734668)->elements[10]),  ((closureN)self_734668)->elements[3], ((closureN)self_734668)->elements[9], ((closureN)self_734668)->elements[6], ((closureN)self_734668)->elements[4], ((closureN)self_734668)->elements[2]);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734668)->elements[3], (((closure)  ((closureN)self_734668)->elements[3])->fn),  Cyc_VOID);}
;
} else { 
    
if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_734668)->elements[2], ((closureN)self_734668)->elements[6])) ){ 
  

return_closcall5(data,  car(((closureN)self_734668)->elements[10]),  ((closureN)self_734668)->elements[3], ((closureN)self_734668)->elements[8], ((closureN)self_734668)->elements[5], ((closureN)self_734668)->elements[4], ((closureN)self_734668)->elements[1]);
} else { 
  
closureN_type c_738916;
object e_739065 [11];
c_738916.hdr.mark = gc_color_red;
 c_738916.hdr.grayed = 0;
c_738916.tag = closureN_tag;
 c_738916.fn = (function_type)__lambda_472;
c_738916.num_args = 1;
c_738916.num_elements = 11;
c_738916.elements = (object *)e_739065;
c_738916.elements[0] = ((closureN)self_734668)->elements[0];
c_738916.elements[1] = ((closureN)self_734668)->elements[1];
c_738916.elements[2] = ((closureN)self_734668)->elements[2];
c_738916.elements[3] = ((closureN)self_734668)->elements[3];
c_738916.elements[4] = ((closureN)self_734668)->elements[4];
c_738916.elements[5] = ((closureN)self_734668)->elements[5];
c_738916.elements[6] = ((closureN)self_734668)->elements[6];
c_738916.elements[7] = ((closureN)self_734668)->elements[7];
c_738916.elements[8] = ((closureN)self_734668)->elements[8];
c_738916.elements[9] = ((closureN)self_734668)->elements[9];
c_738916.elements[10] = ((closureN)self_734668)->elements[10];



return_direct_with_clo1(data,(closure)&c_738916,__lambda_472,  Cyc_vector_ref(data, ((closureN)self_734668)->elements[8], ((closureN)self_734668)->elements[5]));}
;}
;; 
}

static void __lambda_472(void *data, object self_734669, int argc, object *args) /* object self_734669, object r_733654 */
 {
 object r_733654 = args[0];
  
closureN_type c_738918;
object e_739060 [12];
c_738918.hdr.mark = gc_color_red;
 c_738918.hdr.grayed = 0;
c_738918.tag = closureN_tag;
 c_738918.fn = (function_type)__lambda_473;
c_738918.num_args = 1;
c_738918.num_elements = 12;
c_738918.elements = (object *)e_739060;
c_738918.elements[0] = ((closureN)self_734669)->elements[0];
c_738918.elements[1] = ((closureN)self_734669)->elements[1];
c_738918.elements[2] = ((closureN)self_734669)->elements[2];
c_738918.elements[3] = ((closureN)self_734669)->elements[3];
c_738918.elements[4] = r_733654;
c_738918.elements[5] = ((closureN)self_734669)->elements[4];
c_738918.elements[6] = ((closureN)self_734669)->elements[5];
c_738918.elements[7] = ((closureN)self_734669)->elements[6];
c_738918.elements[8] = ((closureN)self_734669)->elements[7];
c_738918.elements[9] = ((closureN)self_734669)->elements[8];
c_738918.elements[10] = ((closureN)self_734669)->elements[9];
c_738918.elements[11] = ((closureN)self_734669)->elements[10];



return_direct_with_clo1(data,(closure)&c_738918,__lambda_473,  Cyc_vector_ref(data, ((closureN)self_734669)->elements[9], ((closureN)self_734669)->elements[6]));; 
}

static void __lambda_473(void *data, object self_734670, int argc, object *args) /* object self_734670, object r_733655 */
 {
 object r_733655 = args[0];
  
closureN_type c_738920;
object e_739055 [8];
c_738920.hdr.mark = gc_color_red;
 c_738920.hdr.grayed = 0;
c_738920.tag = closureN_tag;
 c_738920.fn = (function_type)__lambda_474;
c_738920.num_args = 5;
c_738920.num_elements = 8;
c_738920.elements = (object *)e_739055;
c_738920.elements[0] = ((closureN)self_734670)->elements[0];
c_738920.elements[1] = ((closureN)self_734670)->elements[1];
c_738920.elements[2] = ((closureN)self_734670)->elements[2];
c_738920.elements[3] = ((closureN)self_734670)->elements[3];
c_738920.elements[4] = ((closureN)self_734670)->elements[8];
c_738920.elements[5] = ((closureN)self_734670)->elements[9];
c_738920.elements[6] = ((closureN)self_734670)->elements[10];
c_738920.elements[7] = ((closureN)self_734670)->elements[11];

return_direct_with_clo5(data,(closure)&c_738920,__lambda_474,  ((closureN)self_734670)->elements[5], ((closureN)self_734670)->elements[6], ((closureN)self_734670)->elements[4], ((closureN)self_734670)->elements[7], r_733655);; 
}

static void __lambda_474(void *data, object self_734671, int argc, object *args) /* object self_734671, object i_731625_732670, object j_731626_732671, object x_731627_732672, object k_731628_732673, object y_731629_732674 */
 {
 object i_731625_732670 = args[0]; object j_731626_732671 = args[1]; object x_731627_732672 = args[2]; object k_731628_732673 = args[3]; object y_731629_732674 = args[4];
  
closureN_type c_738922;
object e_739054 [13];
c_738922.hdr.mark = gc_color_red;
 c_738922.hdr.grayed = 0;
c_738922.tag = closureN_tag;
 c_738922.fn = (function_type)__lambda_475;
c_738922.num_args = 1;
c_738922.num_elements = 13;
c_738922.elements = (object *)e_739054;
c_738922.elements[0] = ((closureN)self_734671)->elements[0];
c_738922.elements[1] = ((closureN)self_734671)->elements[1];
c_738922.elements[2] = ((closureN)self_734671)->elements[2];
c_738922.elements[3] = i_731625_732670;
c_738922.elements[4] = j_731626_732671;
c_738922.elements[5] = k_731628_732673;
c_738922.elements[6] = ((closureN)self_734671)->elements[3];
c_738922.elements[7] = ((closureN)self_734671)->elements[4];
c_738922.elements[8] = ((closureN)self_734671)->elements[5];
c_738922.elements[9] = ((closureN)self_734671)->elements[6];
c_738922.elements[10] = ((closureN)self_734671)->elements[7];
c_738922.elements[11] = x_731627_732672;
c_738922.elements[12] = y_731629_732674;

return_direct_with_clo1(data,(closure)&c_738922,__lambda_475,  boolean_f);; 
}

static void __lambda_475(void *data, object self_734672, int argc, object *args) /* object self_734672, object lp_731630_732675 */
 {
 object lp_731630_732675 = args[0];
  
closureN_type c_738924;
object e_739050 [13];
c_738924.hdr.mark = gc_color_red;
 c_738924.hdr.grayed = 0;
c_738924.tag = closureN_tag;
 c_738924.fn = (function_type)__lambda_801;
c_738924.num_args = 1;
c_738924.num_elements = 13;
c_738924.elements = (object *)e_739050;
c_738924.elements[0] = ((closureN)self_734672)->elements[0];
c_738924.elements[1] = ((closureN)self_734672)->elements[1];
c_738924.elements[2] = ((closureN)self_734672)->elements[2];
c_738924.elements[3] = ((closureN)self_734672)->elements[3];
c_738924.elements[4] = ((closureN)self_734672)->elements[4];
c_738924.elements[5] = ((closureN)self_734672)->elements[5];
c_738924.elements[6] = ((closureN)self_734672)->elements[6];
c_738924.elements[7] = ((closureN)self_734672)->elements[7];
c_738924.elements[8] = ((closureN)self_734672)->elements[8];
c_738924.elements[9] = ((closureN)self_734672)->elements[9];
c_738924.elements[10] = ((closureN)self_734672)->elements[10];
c_738924.elements[11] = ((closureN)self_734672)->elements[11];
c_738924.elements[12] = ((closureN)self_734672)->elements[12];


pair_type local_739053; 
return_direct_with_clo1(data,(closure)&c_738924,__lambda_801,  set_cell_as_expr(&local_739053, lp_731630_732675));; 
}

static void __lambda_801(void *data, object self_734673, int argc, object *args) /* object self_734673, object lp_731630_732675 */
 {
 object lp_731630_732675 = args[0];
  
closureN_type c_738926;
object e_738943 [7];
c_738926.hdr.mark = gc_color_red;
 c_738926.hdr.grayed = 0;
c_738926.tag = closureN_tag;
 c_738926.fn = (function_type)__lambda_476;
c_738926.num_args = 1;
c_738926.num_elements = 7;
c_738926.elements = (object *)e_738943;
c_738926.elements[0] = ((closureN)self_734673)->elements[3];
c_738926.elements[1] = ((closureN)self_734673)->elements[4];
c_738926.elements[2] = ((closureN)self_734673)->elements[5];
c_738926.elements[3] = ((closureN)self_734673)->elements[6];
c_738926.elements[4] = lp_731630_732675;
c_738926.elements[5] = ((closureN)self_734673)->elements[11];
c_738926.elements[6] = ((closureN)self_734673)->elements[12];


closureN_type c_738944;
object e_739049 [8];
c_738944.hdr.mark = gc_color_red;
 c_738944.hdr.grayed = 0;
c_738944.tag = closureN_tag;
 c_738944.fn = (function_type)__lambda_478;
c_738944.num_args = 5;
c_738944.num_elements = 8;
c_738944.elements = (object *)e_739049;
c_738944.elements[0] = ((closureN)self_734673)->elements[0];
c_738944.elements[1] = ((closureN)self_734673)->elements[1];
c_738944.elements[2] = ((closureN)self_734673)->elements[2];
c_738944.elements[3] = lp_731630_732675;
c_738944.elements[4] = ((closureN)self_734673)->elements[7];
c_738944.elements[5] = ((closureN)self_734673)->elements[8];
c_738944.elements[6] = ((closureN)self_734673)->elements[9];
c_738944.elements[7] = ((closureN)self_734673)->elements[10];

return_direct_with_clo1(data,(closure)&c_738926,__lambda_476,  &c_738944);; 
}

static void __lambda_478(void *data, object self_734674, int argc, object *args) /* object self_734674, object k_733658, object i_731631_732676, object j_731632_732677, object x_731633_732678, object k_731634_732679, object y_731635_732680 */
 {
 object k_733658 = args[0]; object i_731631_732676 = args[1]; object j_731632_732677 = args[2]; object x_731633_732678 = args[3]; object k_731634_732679 = args[4]; object y_731635_732680 = args[5];
  
closureN_type c_738947;
object e_739048 [13];
c_738947.hdr.mark = gc_color_red;
 c_738947.hdr.grayed = 0;
c_738947.tag = closureN_tag;
 c_738947.fn = (function_type)__lambda_479;
c_738947.num_args = 1;
c_738947.num_elements = 13;
c_738947.elements = (object *)e_739048;
c_738947.elements[0] = ((closureN)self_734674)->elements[1];
c_738947.elements[1] = ((closureN)self_734674)->elements[2];
c_738947.elements[2] = i_731631_732676;
c_738947.elements[3] = j_731632_732677;
c_738947.elements[4] = k_731634_732679;
c_738947.elements[5] = k_733658;
c_738947.elements[6] = ((closureN)self_734674)->elements[3];
c_738947.elements[7] = ((closureN)self_734674)->elements[4];
c_738947.elements[8] = ((closureN)self_734674)->elements[5];
c_738947.elements[9] = ((closureN)self_734674)->elements[6];
c_738947.elements[10] = ((closureN)self_734674)->elements[7];
c_738947.elements[11] = x_731633_732678;
c_738947.elements[12] = y_731635_732680;

return_closcall3(data,  ((closureN)self_734674)->elements[0],  &c_738947, y_731635_732680, x_731633_732678);; 
}

static void __lambda_479(void *data, object self_734675, int argc, object *args) /* object self_734675, object r_733660 */
 {
 object r_733660 = args[0];
  if( (boolean_f != r_733660) ){ 
  
closureN_type c_738949;
object e_738991 [11];
c_738949.hdr.mark = gc_color_red;
 c_738949.hdr.grayed = 0;
c_738949.tag = closureN_tag;
 c_738949.fn = (function_type)__lambda_480;
c_738949.num_args = 1;
c_738949.num_elements = 11;
c_738949.elements = (object *)e_738991;
c_738949.elements[0] = ((closureN)self_734675)->elements[0];
c_738949.elements[1] = ((closureN)self_734675)->elements[1];
c_738949.elements[2] = ((closureN)self_734675)->elements[2];
c_738949.elements[3] = ((closureN)self_734675)->elements[3];
c_738949.elements[4] = ((closureN)self_734675)->elements[4];
c_738949.elements[5] = ((closureN)self_734675)->elements[5];
c_738949.elements[6] = ((closureN)self_734675)->elements[6];
c_738949.elements[7] = ((closureN)self_734675)->elements[8];
c_738949.elements[8] = ((closureN)self_734675)->elements[9];
c_738949.elements[9] = ((closureN)self_734675)->elements[10];
c_738949.elements[10] = ((closureN)self_734675)->elements[11];


object c_738994 = Cyc_vector_set_cps(data,(closure)&c_738949,((closureN)self_734675)->elements[7], ((closureN)self_734675)->elements[2], ((closureN)self_734675)->elements[12]);
return_closcall1(data,(closure)&c_738949,  c_738994);
} else { 
  
closureN_type c_738999;
object e_739041 [11];
c_738999.hdr.mark = gc_color_red;
 c_738999.hdr.grayed = 0;
c_738999.tag = closureN_tag;
 c_738999.fn = (function_type)__lambda_481;
c_738999.num_args = 1;
c_738999.num_elements = 11;
c_738999.elements = (object *)e_739041;
c_738999.elements[0] = ((closureN)self_734675)->elements[0];
c_738999.elements[1] = ((closureN)self_734675)->elements[1];
c_738999.elements[2] = ((closureN)self_734675)->elements[2];
c_738999.elements[3] = ((closureN)self_734675)->elements[3];
c_738999.elements[4] = ((closureN)self_734675)->elements[4];
c_738999.elements[5] = ((closureN)self_734675)->elements[5];
c_738999.elements[6] = ((closureN)self_734675)->elements[6];
c_738999.elements[7] = ((closureN)self_734675)->elements[8];
c_738999.elements[8] = ((closureN)self_734675)->elements[9];
c_738999.elements[9] = ((closureN)self_734675)->elements[10];
c_738999.elements[10] = ((closureN)self_734675)->elements[12];


object c_739044 = Cyc_vector_set_cps(data,(closure)&c_738999,((closureN)self_734675)->elements[7], ((closureN)self_734675)->elements[2], ((closureN)self_734675)->elements[11]);
return_closcall1(data,(closure)&c_738999,  c_739044);}
;; 
}

static void __lambda_481(void *data, object self_734677, int argc, object *args) /* object self_734677, object r_733666 */
 {

    
  complex_num_type local_739004; 
if( (boolean_f != Cyc_num_fast_lt_op(data, Cyc_fast_sum(data,&local_739004, ((closureN)self_734677)->elements[3], obj_int2obj(1)), ((closureN)self_734677)->elements[0])) ){ 
  


complex_num_type local_739014; 

complex_num_type local_739018; 



complex_num_type local_739025; 
return_closcall6(data,  car(((closureN)self_734677)->elements[6]),  ((closureN)self_734677)->elements[5], Cyc_fast_sum(data,&local_739014, ((closureN)self_734677)->elements[2], obj_int2obj(1)), Cyc_fast_sum(data,&local_739018, ((closureN)self_734677)->elements[3], obj_int2obj(1)), Cyc_vector_ref(data, ((closureN)self_734677)->elements[7], Cyc_fast_sum(data,&local_739025, ((closureN)self_734677)->elements[3], obj_int2obj(1))), ((closureN)self_734677)->elements[4], ((closureN)self_734677)->elements[10]);
} else { 
  


complex_num_type local_739038; 
return_closcall5(data,  car(((closureN)self_734677)->elements[9]),  ((closureN)self_734677)->elements[5], ((closureN)self_734677)->elements[8], ((closureN)self_734677)->elements[4], Cyc_fast_sum(data,&local_739038, ((closureN)self_734677)->elements[2], obj_int2obj(1)), ((closureN)self_734677)->elements[1]);}
;; 
}

static void __lambda_480(void *data, object self_734676, int argc, object *args) /* object self_734676, object r_733662 */
 {

    
  complex_num_type local_738954; 
if( (boolean_f != Cyc_num_fast_lt_op(data, Cyc_fast_sum(data,&local_738954, ((closureN)self_734676)->elements[4], obj_int2obj(1)), ((closureN)self_734676)->elements[1])) ){ 
  


complex_num_type local_738964; 

complex_num_type local_738970; 



complex_num_type local_738977; 
return_closcall6(data,  car(((closureN)self_734676)->elements[6]),  ((closureN)self_734676)->elements[5], Cyc_fast_sum(data,&local_738964, ((closureN)self_734676)->elements[2], obj_int2obj(1)), ((closureN)self_734676)->elements[3], ((closureN)self_734676)->elements[10], Cyc_fast_sum(data,&local_738970, ((closureN)self_734676)->elements[4], obj_int2obj(1)), Cyc_vector_ref(data, ((closureN)self_734676)->elements[8], Cyc_fast_sum(data,&local_738977, ((closureN)self_734676)->elements[4], obj_int2obj(1))));
} else { 
  


complex_num_type local_738988; 
return_closcall5(data,  car(((closureN)self_734676)->elements[9]),  ((closureN)self_734676)->elements[5], ((closureN)self_734676)->elements[7], ((closureN)self_734676)->elements[3], Cyc_fast_sum(data,&local_738988, ((closureN)self_734676)->elements[2], obj_int2obj(1)), ((closureN)self_734676)->elements[0]);}
;; 
}

static void __lambda_476(void *data, object self_734678, int argc, object *args) /* object self_734678, object r_733657 */
 {
 object r_733657 = args[0];
  
closureN_type c_738928;
object e_738939 [7];
c_738928.hdr.mark = gc_color_red;
 c_738928.hdr.grayed = 0;
c_738928.tag = closureN_tag;
 c_738928.fn = (function_type)__lambda_477;
c_738928.num_args = 1;
c_738928.num_elements = 7;
c_738928.elements = (object *)e_738939;
c_738928.elements[0] = ((closureN)self_734678)->elements[0];
c_738928.elements[1] = ((closureN)self_734678)->elements[1];
c_738928.elements[2] = ((closureN)self_734678)->elements[2];
c_738928.elements[3] = ((closureN)self_734678)->elements[3];
c_738928.elements[4] = ((closureN)self_734678)->elements[4];
c_738928.elements[5] = ((closureN)self_734678)->elements[5];
c_738928.elements[6] = ((closureN)self_734678)->elements[6];



return_direct_with_clo1(data,(closure)&c_738928,__lambda_477,  Cyc_set_cell(data, ((closureN)self_734678)->elements[4], r_733657));; 
}

static void __lambda_477(void *data, object self_734679, int argc, object *args) /* object self_734679, object r_733656 */
 {

  

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

static void __lambda_459(void *data, object _, int argc, object *args) /* closure _,object k_733634, object _121_731585_732639, object v_731586_732640, object v1_731587_732641, object v2_731588_732642, object maybe_91starts_87ends_731589_732643_raw, ... */
 {
object k_733634 = args[0]; object _121_731585_732639 = args[1]; object v_731586_732640 = args[2]; object v1_731587_732641 = args[3]; object v2_731588_732642 = args[4];
load_varargs(maybe_91starts_87ends_731589_732643, args, 5, argc - 5);
  Cyc_st_add(data, "srfi/132.sld:vector-merge!");

closureN_type c_738828;
object e_738860 [5];
c_738828.hdr.mark = gc_color_red;
 c_738828.hdr.grayed = 0;
c_738828.tag = closureN_tag;
 c_738828.fn = (function_type)__lambda_460;
c_738828.num_args = 1;
c_738828.num_elements = 5;
c_738828.elements = (object *)e_738860;
c_738828.elements[0] = _121_731585_732639;
c_738828.elements[1] = k_733634;
c_738828.elements[2] = v_731586_732640;
c_738828.elements[3] = v1_731587_732641;
c_738828.elements[4] = v2_731588_732642;


closureN_type c_738861;
object e_738873 [1];
c_738861.hdr.mark = gc_color_red;
 c_738861.hdr.grayed = 0;
c_738861.tag = closureN_tag;
 c_738861.fn = (function_type)__lambda_467;
c_738861.num_args = 0;
c_738861.num_elements = 1;
c_738861.elements = (object *)e_738873;
c_738861.elements[0] = maybe_91starts_87ends_731589_732643;

return_direct_with_clo1(data,(closure)&c_738828,__lambda_460,  &c_738861);; 
}

static void __lambda_467(void *data, object self_734649, int argc, object *args) /* object self_734649, object k_733642 */
 {
 object k_733642 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_734649)->elements[0])) ){ 
  



return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_733642, Cyc_car(data, ((closureN)self_734649)->elements[0]), Cyc_cdr(data, ((closureN)self_734649)->elements[0]));
} else { 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_733642, obj_int2obj(0), NULL);}
;; 
}

static void __lambda_460(void *data, object self_734650, int argc, object *args) /* object self_734650, object r_733635 */
 {
 object r_733635 = args[0];
  
closureN_type c_738830;
object e_738834 [2];
c_738830.hdr.mark = gc_color_red;
 c_738830.hdr.grayed = 0;
c_738830.tag = closureN_tag;
 c_738830.fn = (function_type)__lambda_461;
c_738830.num_args = 1;
c_738830.num_elements = 2;
c_738830.elements = (object *)e_738834;
c_738830.elements[0] = ((closureN)self_734650)->elements[1];
c_738830.elements[1] = r_733635;


closureN_type c_738835;
object e_738859 [4];
c_738835.hdr.mark = gc_color_red;
 c_738835.hdr.grayed = 0;
c_738835.tag = closureN_tag;
 c_738835.fn = (function_type)__lambda_462;
c_738835.num_args = 2;
c_738835.num_elements = 4;
c_738835.elements = (object *)e_738859;
c_738835.elements[0] = ((closureN)self_734650)->elements[0];
c_738835.elements[1] = ((closureN)self_734650)->elements[2];
c_738835.elements[2] = ((closureN)self_734650)->elements[3];
c_738835.elements[3] = ((closureN)self_734650)->elements[4];

return_direct_with_clo1(data,(closure)&c_738830,__lambda_461,  &c_738835);; 
}

static void __lambda_462(void *data, object self_734651, int argc, object *args) /* object self_734651, object k_733637, object start_731590_732644, object rest_731591_732645 */
 {
 object k_733637 = args[0]; object start_731590_732644 = args[1]; object rest_731591_732645 = args[2];
  
closureN_type c_738837;
object e_738852 [6];
c_738837.hdr.mark = gc_color_red;
 c_738837.hdr.grayed = 0;
c_738837.tag = closureN_tag;
 c_738837.fn = (function_type)__lambda_463;
c_738837.num_args = 1;
c_738837.num_elements = 6;
c_738837.elements = (object *)e_738852;
c_738837.elements[0] = ((closureN)self_734651)->elements[0];
c_738837.elements[1] = k_733637;
c_738837.elements[2] = start_731590_732644;
c_738837.elements[3] = ((closureN)self_734651)->elements[1];
c_738837.elements[4] = ((closureN)self_734651)->elements[2];
c_738837.elements[5] = ((closureN)self_734651)->elements[3];


closureN_type c_738853;
object e_738858 [3];
c_738853.hdr.mark = gc_color_red;
 c_738853.hdr.grayed = 0;
c_738853.tag = closureN_tag;
 c_738853.fn = (function_type)__lambda_466;
c_738853.num_args = 0;
c_738853.num_elements = 3;
c_738853.elements = (object *)e_738858;
c_738853.elements[0] = rest_731591_732645;
c_738853.elements[1] = ((closureN)self_734651)->elements[2];
c_738853.elements[2] = ((closureN)self_734651)->elements[3];

return_direct_with_clo1(data,(closure)&c_738837,__lambda_463,  &c_738853);; 
}

static void __lambda_466(void *data, object self_734652, int argc, object *args) /* object self_734652, object k_733641 */
 {
 object k_733641 = args[0];
  return_direct_with_clo4(data,  __glo_vectors_91start_87end_912_srfi_132, (((closure)  __glo_vectors_91start_87end_912_srfi_132)->fn),  k_733641, ((closureN)self_734652)->elements[1], ((closureN)self_734652)->elements[2], ((closureN)self_734652)->elements[0]);; 
}

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


closureN_type c_738844;
object e_738851 [5];
c_738844.hdr.mark = gc_color_red;
 c_738844.hdr.grayed = 0;
c_738844.tag = closureN_tag;
 c_738844.fn = (function_type)__lambda_465;
c_738844.num_args = 4;
c_738844.num_elements = 5;
c_738844.elements = (object *)e_738851;
c_738844.elements[0] = ((closureN)self_734653)->elements[0];
c_738844.elements[1] = ((closureN)self_734653)->elements[2];
c_738844.elements[2] = ((closureN)self_734653)->elements[3];
c_738844.elements[3] = ((closureN)self_734653)->elements[4];
c_738844.elements[4] = ((closureN)self_734653)->elements[5];

return_direct_with_clo1(data,(closure)&c_738839,__lambda_464,  &c_738844);; 
}

static void __lambda_465(void *data, object self_734654, int argc, object *args) /* object self_734654, object k_733640, object start1_731592_732646, object end1_731593_732647, object start2_731594_732648, object end2_731595_732649 */
 {
 object k_733640 = args[0]; object start1_731592_732646 = args[1]; object end1_731593_732647 = args[2]; object start2_731594_732648 = args[3]; object end2_731595_732649 = args[4];
  return_direct_with_clo10(data,  __glo__75vector_91merge_67_srfi_132, (((closure)  __glo__75vector_91merge_67_srfi_132)->fn),  k_733640, ((closureN)self_734654)->elements[0], ((closureN)self_734654)->elements[2], ((closureN)self_734654)->elements[3], ((closureN)self_734654)->elements[4], ((closureN)self_734654)->elements[1], start1_731592_732646, end1_731593_732647, start2_731594_732648, end2_731595_732649);; 
}

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

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

static void __lambda_452(void *data, object _, int argc, object *args) /* closure _,object k_733622, object _121_731576_732630, object v1_731577_732631, object v2_731578_732632, object maybe_91starts_87ends_731579_732633_raw, ... */
 {
object k_733622 = args[0]; object _121_731576_732630 = args[1]; object v1_731577_732631 = args[2]; object v2_731578_732632 = args[3];
load_varargs(maybe_91starts_87ends_731579_732633, args, 4, argc - 4);
  Cyc_st_add(data, "srfi/132.sld:vector-merge");

closureN_type c_738782;
object e_738819 [4];
c_738782.hdr.mark = gc_color_red;
 c_738782.hdr.grayed = 0;
c_738782.tag = closureN_tag;
 c_738782.fn = (function_type)__lambda_453;
c_738782.num_args = 1;
c_738782.num_elements = 4;
c_738782.elements = (object *)e_738819;
c_738782.elements[0] = _121_731576_732630;
c_738782.elements[1] = k_733622;
c_738782.elements[2] = v1_731577_732631;
c_738782.elements[3] = v2_731578_732632;


closureN_type c_738820;
object e_738825 [3];
c_738820.hdr.mark = gc_color_red;
 c_738820.hdr.grayed = 0;
c_738820.tag = closureN_tag;
 c_738820.fn = (function_type)__lambda_458;
c_738820.num_args = 0;
c_738820.num_elements = 3;
c_738820.elements = (object *)e_738825;
c_738820.elements[0] = maybe_91starts_87ends_731579_732633;
c_738820.elements[1] = v1_731577_732631;
c_738820.elements[2] = v2_731578_732632;

return_direct_with_clo1(data,(closure)&c_738782,__lambda_453,  &c_738820);; 
}

static void __lambda_458(void *data, object self_734643, int argc, object *args) /* object self_734643, object k_733631 */
 {
 object k_733631 = args[0];
  return_direct_with_clo4(data,  __glo_vectors_91start_87end_912_srfi_132, (((closure)  __glo_vectors_91start_87end_912_srfi_132)->fn),  k_733631, ((closureN)self_734643)->elements[1], ((closureN)self_734643)->elements[2], ((closureN)self_734643)->elements[0]);; 
}

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


closureN_type c_738789;
object e_738818 [3];
c_738789.hdr.mark = gc_color_red;
 c_738789.hdr.grayed = 0;
c_738789.tag = closureN_tag;
 c_738789.fn = (function_type)__lambda_455;
c_738789.num_args = 4;
c_738789.num_elements = 3;
c_738789.elements = (object *)e_738818;
c_738789.elements[0] = ((closureN)self_734644)->elements[0];
c_738789.elements[1] = ((closureN)self_734644)->elements[2];
c_738789.elements[2] = ((closureN)self_734644)->elements[3];

return_direct_with_clo1(data,(closure)&c_738784,__lambda_454,  &c_738789);; 
}

static void __lambda_455(void *data, object self_734645, int argc, object *args) /* object self_734645, object k_733625, object start1_731580_732634, object end1_731581_732635, object start2_731582_732636, object end2_731583_732637 */
 {
 object k_733625 = args[0]; object start1_731580_732634 = args[1]; object end1_731581_732635 = args[2]; object start2_731582_732636 = args[3]; object end2_731583_732637 = args[4];
  
closureN_type c_738791;
object e_738805 [8];
c_738791.hdr.mark = gc_color_red;
 c_738791.hdr.grayed = 0;
c_738791.tag = closureN_tag;
 c_738791.fn = (function_type)__lambda_456;
c_738791.num_args = 1;
c_738791.num_elements = 8;
c_738791.elements = (object *)e_738805;
c_738791.elements[0] = ((closureN)self_734645)->elements[0];
c_738791.elements[1] = end1_731581_732635;
c_738791.elements[2] = end2_731583_732637;
c_738791.elements[3] = k_733625;
c_738791.elements[4] = start1_731580_732634;
c_738791.elements[5] = start2_731582_732636;
c_738791.elements[6] = ((closureN)self_734645)->elements[1];
c_738791.elements[7] = ((closureN)self_734645)->elements[2];


complex_num_type local_738811; 

complex_num_type local_738814; 

complex_num_type local_738817; 

object c_738808 = Cyc_make_vector(data,(closure)&c_738791,1,Cyc_fast_sum(data,&local_738811, Cyc_fast_sub(data,&local_738814, end1_731581_732635, start1_731580_732634), Cyc_fast_sub(data,&local_738817, end2_731583_732637, start2_731582_732636)));
return_closcall1(data,(closure)&c_738791,  c_738808);; 
}

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

return_direct_with_clo10(data,  __glo__75vector_91merge_67_srfi_132, (((closure)  __glo__75vector_91merge_67_srfi_132)->fn),  &c_738793, ((closureN)self_734646)->elements[0], ans_731584_732638, ((closureN)self_734646)->elements[6], ((closureN)self_734646)->elements[7], obj_int2obj(0), ((closureN)self_734646)->elements[4], ((closureN)self_734646)->elements[1], ((closureN)self_734646)->elements[5], ((closureN)self_734646)->elements[2]);; 
}

static void __lambda_457(void *data, object self_734647, int argc, object *args) /* object self_734647, object r_733627 */
 {

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

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

static void __lambda_435(void *data, object _, int argc, object *args) /* closure _,object k_733602, object elt_121_731548_732616, object v_731549_732617, object start_731550_732618, object end_731551_732619 */
 {
object k_733602 = args[0]; object elt_121_731548_732616 = args[1]; object v_731549_732617 = args[2]; object start_731550_732618 = args[3]; object end_731551_732619 = args[4];
  Cyc_st_add(data, "srfi/132.sld:%vector-insert-sort!");

closureN_type c_738648;
object e_738776 [5];
c_738648.hdr.mark = gc_color_red;
 c_738648.hdr.grayed = 0;
c_738648.tag = closureN_tag;
 c_738648.fn = (function_type)__lambda_436;
c_738648.num_args = 1;
c_738648.num_elements = 5;
c_738648.elements = (object *)e_738776;
c_738648.elements[0] = elt_121_731548_732616;
c_738648.elements[1] = end_731551_732619;
c_738648.elements[2] = k_733602;
c_738648.elements[3] = start_731550_732618;
c_738648.elements[4] = v_731549_732617;


complex_num_type local_738779; 
return_direct_with_clo1(data,(closure)&c_738648,__lambda_436,  Cyc_fast_sum(data,&local_738779, obj_int2obj(1), start_731550_732618));; 
}

static void __lambda_436(void *data, object self_734625, int argc, object *args) /* object self_734625, object i_731556_732620 */
 {
 object i_731556_732620 = args[0];
  
closureN_type c_738650;
object e_738775 [6];
c_738650.hdr.mark = gc_color_red;
 c_738650.hdr.grayed = 0;
c_738650.tag = closureN_tag;
 c_738650.fn = (function_type)__lambda_437;
c_738650.num_args = 1;
c_738650.num_elements = 6;
c_738650.elements = (object *)e_738775;
c_738650.elements[0] = ((closureN)self_734625)->elements[0];
c_738650.elements[1] = ((closureN)self_734625)->elements[1];
c_738650.elements[2] = i_731556_732620;
c_738650.elements[3] = ((closureN)self_734625)->elements[2];
c_738650.elements[4] = ((closureN)self_734625)->elements[3];
c_738650.elements[5] = ((closureN)self_734625)->elements[4];

return_direct_with_clo1(data,(closure)&c_738650,__lambda_437,  boolean_f);; 
}

static void __lambda_437(void *data, object self_734626, int argc, object *args) /* object self_734626, object lp_731552_731557_732621 */
 {
 object lp_731552_731557_732621 = args[0];
  
closureN_type c_738652;
object e_738771 [6];
c_738652.hdr.mark = gc_color_red;
 c_738652.hdr.grayed = 0;
c_738652.tag = closureN_tag;
 c_738652.fn = (function_type)__lambda_800;
c_738652.num_args = 1;
c_738652.num_elements = 6;
c_738652.elements = (object *)e_738771;
c_738652.elements[0] = ((closureN)self_734626)->elements[0];
c_738652.elements[1] = ((closureN)self_734626)->elements[1];
c_738652.elements[2] = ((closureN)self_734626)->elements[2];
c_738652.elements[3] = ((closureN)self_734626)->elements[3];
c_738652.elements[4] = ((closureN)self_734626)->elements[4];
c_738652.elements[5] = ((closureN)self_734626)->elements[5];


pair_type local_738774; 
return_direct_with_clo1(data,(closure)&c_738652,__lambda_800,  set_cell_as_expr(&local_738774, lp_731552_731557_732621));; 
}

static void __lambda_800(void *data, object self_734627, int argc, object *args) /* object self_734627, object lp_731552_731557_732621 */
 {
 object lp_731552_731557_732621 = args[0];
  
closureN_type c_738654;
object e_738667 [3];
c_738654.hdr.mark = gc_color_red;
 c_738654.hdr.grayed = 0;
c_738654.tag = closureN_tag;
 c_738654.fn = (function_type)__lambda_438;
c_738654.num_args = 1;
c_738654.num_elements = 3;
c_738654.elements = (object *)e_738667;
c_738654.elements[0] = ((closureN)self_734627)->elements[2];
c_738654.elements[1] = ((closureN)self_734627)->elements[3];
c_738654.elements[2] = lp_731552_731557_732621;


closureN_type c_738668;
object e_738770 [5];
c_738668.hdr.mark = gc_color_red;
 c_738668.hdr.grayed = 0;
c_738668.tag = closureN_tag;
 c_738668.fn = (function_type)__lambda_440;
c_738668.num_args = 1;
c_738668.num_elements = 5;
c_738668.elements = (object *)e_738770;
c_738668.elements[0] = ((closureN)self_734627)->elements[0];
c_738668.elements[1] = ((closureN)self_734627)->elements[1];
c_738668.elements[2] = lp_731552_731557_732621;
c_738668.elements[3] = ((closureN)self_734627)->elements[4];
c_738668.elements[4] = ((closureN)self_734627)->elements[5];

return_direct_with_clo1(data,(closure)&c_738654,__lambda_438,  &c_738668);; 
}

static void __lambda_440(void *data, object self_734628, int argc, object *args) /* object self_734628, object k_733606, object i_731558_732622 */
 {
 object k_733606 = args[0]; object i_731558_732622 = args[1];
    
if( (boolean_f != Cyc_num_fast_gte_op(data, i_731558_732622, ((closureN)self_734628)->elements[1])) ){ 
  

return_direct_with_clo1(data,  k_733606, (((closure)  k_733606)->fn),  Cyc_num_fast_gte_op(data, i_731558_732622, ((closureN)self_734628)->elements[1]));
} else { 
  
closureN_type c_738677;
object e_738766 [6];
c_738677.hdr.mark = gc_color_red;
 c_738677.hdr.grayed = 0;
c_738677.tag = closureN_tag;
 c_738677.fn = (function_type)__lambda_441;
c_738677.num_args = 1;
c_738677.num_elements = 6;
c_738677.elements = (object *)e_738766;
c_738677.elements[0] = ((closureN)self_734628)->elements[0];
c_738677.elements[1] = i_731558_732622;
c_738677.elements[2] = k_733606;
c_738677.elements[3] = ((closureN)self_734628)->elements[2];
c_738677.elements[4] = ((closureN)self_734628)->elements[3];
c_738677.elements[5] = ((closureN)self_734628)->elements[4];



return_direct_with_clo1(data,(closure)&c_738677,__lambda_441,  Cyc_vector_ref(data, ((closureN)self_734628)->elements[4], i_731558_732622));}
;; 
}

static void __lambda_441(void *data, object self_734629, int argc, object *args) /* object self_734629, object val_731560_732624 */
 {
 object val_731560_732624 = args[0];
  
closureN_type c_738679;
object e_738764 [7];
c_738679.hdr.mark = gc_color_red;
 c_738679.hdr.grayed = 0;
c_738679.tag = closureN_tag;
 c_738679.fn = (function_type)__lambda_442;
c_738679.num_args = 1;
c_738679.num_elements = 7;
c_738679.elements = (object *)e_738764;
c_738679.elements[0] = ((closureN)self_734629)->elements[0];
c_738679.elements[1] = ((closureN)self_734629)->elements[1];
c_738679.elements[2] = ((closureN)self_734629)->elements[2];
c_738679.elements[3] = ((closureN)self_734629)->elements[3];
c_738679.elements[4] = ((closureN)self_734629)->elements[4];
c_738679.elements[5] = ((closureN)self_734629)->elements[5];
c_738679.elements[6] = val_731560_732624;

return_direct_with_clo1(data,(closure)&c_738679,__lambda_442,  ((closureN)self_734629)->elements[1]);; 
}

static void __lambda_442(void *data, object self_734630, int argc, object *args) /* object self_734630, object j_731562_732625 */
 {
 object j_731562_732625 = args[0];
  
closureN_type c_738681;
object e_738763 [8];
c_738681.hdr.mark = gc_color_red;
 c_738681.hdr.grayed = 0;
c_738681.tag = closureN_tag;
 c_738681.fn = (function_type)__lambda_443;
c_738681.num_args = 1;
c_738681.num_elements = 8;
c_738681.elements = (object *)e_738763;
c_738681.elements[0] = ((closureN)self_734630)->elements[0];
c_738681.elements[1] = ((closureN)self_734630)->elements[1];
c_738681.elements[2] = j_731562_732625;
c_738681.elements[3] = ((closureN)self_734630)->elements[2];
c_738681.elements[4] = ((closureN)self_734630)->elements[3];
c_738681.elements[5] = ((closureN)self_734630)->elements[4];
c_738681.elements[6] = ((closureN)self_734630)->elements[5];
c_738681.elements[7] = ((closureN)self_734630)->elements[6];

return_direct_with_clo1(data,(closure)&c_738681,__lambda_443,  boolean_f);; 
}

static void __lambda_443(void *data, object self_734631, int argc, object *args) /* object self_734631, object lp_731563_732626 */
 {
 object lp_731563_732626 = args[0];
  
closureN_type c_738683;
object e_738759 [8];
c_738683.hdr.mark = gc_color_red;
 c_738683.hdr.grayed = 0;
c_738683.tag = closureN_tag;
 c_738683.fn = (function_type)__lambda_799;
c_738683.num_args = 1;
c_738683.num_elements = 8;
c_738683.elements = (object *)e_738759;
c_738683.elements[0] = ((closureN)self_734631)->elements[0];
c_738683.elements[1] = ((closureN)self_734631)->elements[1];
c_738683.elements[2] = ((closureN)self_734631)->elements[2];
c_738683.elements[3] = ((closureN)self_734631)->elements[3];
c_738683.elements[4] = ((closureN)self_734631)->elements[4];
c_738683.elements[5] = ((closureN)self_734631)->elements[5];
c_738683.elements[6] = ((closureN)self_734631)->elements[6];
c_738683.elements[7] = ((closureN)self_734631)->elements[7];


pair_type local_738762; 
return_direct_with_clo1(data,(closure)&c_738683,__lambda_799,  set_cell_as_expr(&local_738762, lp_731563_732626));; 
}

static void __lambda_799(void *data, object self_734632, int argc, object *args) /* object self_734632, object lp_731563_732626 */
 {
 object lp_731563_732626 = args[0];
  
closureN_type c_738685;
object e_738716 [7];
c_738685.hdr.mark = gc_color_red;
 c_738685.hdr.grayed = 0;
c_738685.tag = closureN_tag;
 c_738685.fn = (function_type)__lambda_444;
c_738685.num_args = 1;
c_738685.num_elements = 7;
c_738685.elements = (object *)e_738716;
c_738685.elements[0] = ((closureN)self_734632)->elements[1];
c_738685.elements[1] = ((closureN)self_734632)->elements[2];
c_738685.elements[2] = ((closureN)self_734632)->elements[3];
c_738685.elements[3] = ((closureN)self_734632)->elements[4];
c_738685.elements[4] = lp_731563_732626;
c_738685.elements[5] = ((closureN)self_734632)->elements[6];
c_738685.elements[6] = ((closureN)self_734632)->elements[7];


closureN_type c_738717;
object e_738758 [5];
c_738717.hdr.mark = gc_color_red;
 c_738717.hdr.grayed = 0;
c_738717.tag = closureN_tag;
 c_738717.fn = (function_type)__lambda_448;
c_738717.num_args = 1;
c_738717.num_elements = 5;
c_738717.elements = (object *)e_738758;
c_738717.elements[0] = ((closureN)self_734632)->elements[0];
c_738717.elements[1] = lp_731563_732626;
c_738717.elements[2] = ((closureN)self_734632)->elements[5];
c_738717.elements[3] = ((closureN)self_734632)->elements[6];
c_738717.elements[4] = ((closureN)self_734632)->elements[7];

return_direct_with_clo1(data,(closure)&c_738685,__lambda_444,  &c_738717);; 
}

static void __lambda_448(void *data, object self_734633, int argc, object *args) /* object self_734633, object k_733614, object j_731564_732627 */
 {
 object k_733614 = args[0]; object j_731564_732627 = args[1];
    
if( (boolean_f != Cyc_num_fast_lte_op(data, j_731564_732627, ((closureN)self_734633)->elements[2])) ){ 
  return_direct_with_clo1(data,  k_733614, (((closure)  k_733614)->fn),  ((closureN)self_734633)->elements[2]);
} else { 
  
closureN_type c_738724;
object e_738751 [6];
c_738724.hdr.mark = gc_color_red;
 c_738724.hdr.grayed = 0;
c_738724.tag = closureN_tag;
 c_738724.fn = (function_type)__lambda_449;
c_738724.num_args = 1;
c_738724.num_elements = 6;
c_738724.elements = (object *)e_738751;
c_738724.elements[0] = ((closureN)self_734633)->elements[0];
c_738724.elements[1] = j_731564_732627;
c_738724.elements[2] = k_733614;
c_738724.elements[3] = ((closureN)self_734633)->elements[1];
c_738724.elements[4] = ((closureN)self_734633)->elements[3];
c_738724.elements[5] = ((closureN)self_734633)->elements[4];




complex_num_type local_738757; 
return_direct_with_clo1(data,(closure)&c_738724,__lambda_449,  Cyc_vector_ref(data, ((closureN)self_734633)->elements[3], Cyc_fast_sub(data,&local_738757, j_731564_732627, obj_int2obj(1))));}
;; 
}

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

return_closcall3(data,  ((closureN)self_734634)->elements[0],  &c_738727, ((closureN)self_734634)->elements[5], vj_911_731570_732629);; 
}

static void __lambda_450(void *data, object self_734635, int argc, object *args) /* object self_734635, object r_733618 */
 {
 object r_733618 = args[0];
  if( (boolean_f != r_733618) ){ 
  
closureN_type c_738729;
object e_738739 [3];
c_738729.hdr.mark = gc_color_red;
 c_738729.hdr.grayed = 0;
c_738729.tag = closureN_tag;
 c_738729.fn = (function_type)__lambda_451;
c_738729.num_args = 1;
c_738729.num_elements = 3;
c_738729.elements = (object *)e_738739;
c_738729.elements[0] = ((closureN)self_734635)->elements[0];
c_738729.elements[1] = ((closureN)self_734635)->elements[1];
c_738729.elements[2] = ((closureN)self_734635)->elements[2];


object c_738742 = Cyc_vector_set_cps(data,(closure)&c_738729,((closureN)self_734635)->elements[3], ((closureN)self_734635)->elements[0], ((closureN)self_734635)->elements[4]);
return_closcall1(data,(closure)&c_738729,  c_738742);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734635)->elements[1], (((closure)  ((closureN)self_734635)->elements[1])->fn),  ((closureN)self_734635)->elements[0]);}
;; 
}

static void __lambda_451(void *data, object self_734636, int argc, object *args) /* object self_734636, object r_733619 */
 {

  


complex_num_type local_738737; 
return_closcall2(data,  car(((closureN)self_734636)->elements[2]),  ((closureN)self_734636)->elements[1], Cyc_fast_sub(data,&local_738737, ((closureN)self_734636)->elements[0], obj_int2obj(1)));; 
}

static void __lambda_444(void *data, object self_734637, int argc, object *args) /* object self_734637, object r_733613 */
 {
 object r_733613 = args[0];
  
closureN_type c_738687;
object e_738712 [7];
c_738687.hdr.mark = gc_color_red;
 c_738687.hdr.grayed = 0;
c_738687.tag = closureN_tag;
 c_738687.fn = (function_type)__lambda_445;
c_738687.num_args = 1;
c_738687.num_elements = 7;
c_738687.elements = (object *)e_738712;
c_738687.elements[0] = ((closureN)self_734637)->elements[0];
c_738687.elements[1] = ((closureN)self_734637)->elements[1];
c_738687.elements[2] = ((closureN)self_734637)->elements[2];
c_738687.elements[3] = ((closureN)self_734637)->elements[3];
c_738687.elements[4] = ((closureN)self_734637)->elements[4];
c_738687.elements[5] = ((closureN)self_734637)->elements[5];
c_738687.elements[6] = ((closureN)self_734637)->elements[6];



return_direct_with_clo1(data,(closure)&c_738687,__lambda_445,  Cyc_set_cell(data, ((closureN)self_734637)->elements[4], r_733613));; 
}

static void __lambda_445(void *data, object self_734638, int argc, object *args) /* object self_734638, object r_733612 */
 {

  


closureN_type c_738692;
object e_738710 [5];
c_738692.hdr.mark = gc_color_red;
 c_738692.hdr.grayed = 0;
c_738692.tag = closureN_tag;
 c_738692.fn = (function_type)__lambda_446;
c_738692.num_args = 1;
c_738692.num_elements = 5;
c_738692.elements = (object *)e_738710;
c_738692.elements[0] = ((closureN)self_734638)->elements[0];
c_738692.elements[1] = ((closureN)self_734638)->elements[2];
c_738692.elements[2] = ((closureN)self_734638)->elements[3];
c_738692.elements[3] = ((closureN)self_734638)->elements[5];
c_738692.elements[4] = ((closureN)self_734638)->elements[6];

return_closcall2(data,  car(((closureN)self_734638)->elements[4]),  &c_738692, ((closureN)self_734638)->elements[1]);; 
}

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


object c_738707 = Cyc_vector_set_cps(data,(closure)&c_738694,((closureN)self_734639)->elements[3], r_733611, ((closureN)self_734639)->elements[4]);
return_closcall1(data,(closure)&c_738694,  c_738707);; 
}

static void __lambda_447(void *data, object self_734640, int argc, object *args) /* object self_734640, object r_733608 */
 {

  


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

static void __lambda_438(void *data, object self_734641, int argc, object *args) /* object self_734641, object r_733605 */
 {
 object r_733605 = args[0];
  
closureN_type c_738656;
object e_738663 [3];
c_738656.hdr.mark = gc_color_red;
 c_738656.hdr.grayed = 0;
c_738656.tag = closureN_tag;
 c_738656.fn = (function_type)__lambda_439;
c_738656.num_args = 1;
c_738656.num_elements = 3;
c_738656.elements = (object *)e_738663;
c_738656.elements[0] = ((closureN)self_734641)->elements[0];
c_738656.elements[1] = ((closureN)self_734641)->elements[1];
c_738656.elements[2] = ((closureN)self_734641)->elements[2];



return_direct_with_clo1(data,(closure)&c_738656,__lambda_439,  Cyc_set_cell(data, ((closureN)self_734641)->elements[2], r_733605));; 
}

static void __lambda_439(void *data, object self_734642, int argc, object *args) /* object self_734642, object r_733604 */
 {

  

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

static void __lambda_430(void *data, object _, int argc, object *args) /* closure _,object k_733595, object elt_121_731526_732611, object v_731527_732612, object maybe_91start_87end_731528_732613_raw, ... */
 {
object k_733595 = args[0]; object elt_121_731526_732611 = args[1]; object v_731527_732612 = args[2];
load_varargs(maybe_91start_87end_731528_732613, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/132.sld:vector-heap-sort!");

closureN_type c_738628;
object e_738640 [3];
c_738628.hdr.mark = gc_color_red;
 c_738628.hdr.grayed = 0;
c_738628.tag = closureN_tag;
 c_738628.fn = (function_type)__lambda_431;
c_738628.num_args = 1;
c_738628.num_elements = 3;
c_738628.elements = (object *)e_738640;
c_738628.elements[0] = elt_121_731526_732611;
c_738628.elements[1] = k_733595;
c_738628.elements[2] = v_731527_732612;


closureN_type c_738641;
object e_738645 [2];
c_738641.hdr.mark = gc_color_red;
 c_738641.hdr.grayed = 0;
c_738641.tag = closureN_tag;
 c_738641.fn = (function_type)__lambda_434;
c_738641.num_args = 0;
c_738641.num_elements = 2;
c_738641.elements = (object *)e_738645;
c_738641.elements[0] = maybe_91start_87end_731528_732613;
c_738641.elements[1] = v_731527_732612;

return_direct_with_clo1(data,(closure)&c_738628,__lambda_431,  &c_738641);; 
}

static void __lambda_434(void *data, object self_734621, int argc, object *args) /* object self_734621, object k_733599 */
 {
 object k_733599 = args[0];
  return_direct_with_clo3(data,  __glo_vector_91start_87end_srfi_132, (((closure)  __glo_vector_91start_87end_srfi_132)->fn),  k_733599, ((closureN)self_734621)->elements[1], ((closureN)self_734621)->elements[0]);; 
}

static void __lambda_431(void *data, object self_734622, int argc, object *args) /* object self_734622, object r_733596 */
 {
 object r_733596 = args[0];
  
closureN_type c_738630;
object e_738634 [2];
c_738630.hdr.mark = gc_color_red;
 c_738630.hdr.grayed = 0;
c_738630.tag = closureN_tag;
 c_738630.fn = (function_type)__lambda_432;
c_738630.num_args = 1;
c_738630.num_elements = 2;
c_738630.elements = (object *)e_738634;
c_738630.elements[0] = ((closureN)self_734622)->elements[1];
c_738630.elements[1] = r_733596;


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

return_direct_with_clo1(data,(closure)&c_738630,__lambda_432,  &c_738635);; 
}

static void __lambda_433(void *data, object self_734623, int argc, object *args) /* object self_734623, object k_733598, object start_731529_732614, object end_731530_732615 */
 {
 object k_733598 = args[0]; object start_731529_732614 = args[1]; object end_731530_732615 = args[2];
  return_direct_with_clo5(data,  __glo_really_91vector_91heap_91sort_67_srfi_132, (((closure)  __glo_really_91vector_91heap_91sort_67_srfi_132)->fn),  k_733598, ((closureN)self_734623)->elements[0], ((closureN)self_734623)->elements[1], start_731529_732614, end_731530_732615);; 
}

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

static void __lambda_391(void *data, object _, int argc, object *args) /* closure _,object k_733546, object elt_121_731468_732579, object v_731469_732580, object start_731470_732581, object end_731471_732582 */
 {
object k_733546 = args[0]; object elt_121_731468_732579 = args[1]; object v_731469_732580 = args[2]; object start_731470_732581 = args[3]; object end_731471_732582 = args[4];
  Cyc_st_add(data, "srfi/132.sld:really-vector-heap-sort!");

closureN_type c_738263;
object e_738625 [5];
c_738263.hdr.mark = gc_color_red;
 c_738263.hdr.grayed = 0;
c_738263.tag = closureN_tag;
 c_738263.fn = (function_type)__lambda_392;
c_738263.num_args = 1;
c_738263.num_elements = 5;
c_738263.elements = (object *)e_738625;
c_738263.elements[0] = elt_121_731468_732579;
c_738263.elements[1] = end_731471_732582;
c_738263.elements[2] = k_733546;
c_738263.elements[3] = start_731470_732581;
c_738263.elements[4] = v_731469_732580;

return_direct_with_clo1(data,(closure)&c_738263,__lambda_392,  boolean_f);; 
}

static void __lambda_392(void *data, object self_734579, int argc, object *args) /* object self_734579, object restore_91heap_67_732584 */
 {
 object restore_91heap_67_732584 = args[0];
  
closureN_type c_738265;
object e_738621 [5];
c_738265.hdr.mark = gc_color_red;
 c_738265.hdr.grayed = 0;
c_738265.tag = closureN_tag;
 c_738265.fn = (function_type)__lambda_798;
c_738265.num_args = 1;
c_738265.num_elements = 5;
c_738265.elements = (object *)e_738621;
c_738265.elements[0] = ((closureN)self_734579)->elements[0];
c_738265.elements[1] = ((closureN)self_734579)->elements[1];
c_738265.elements[2] = ((closureN)self_734579)->elements[2];
c_738265.elements[3] = ((closureN)self_734579)->elements[3];
c_738265.elements[4] = ((closureN)self_734579)->elements[4];


pair_type local_738624; 
return_direct_with_clo1(data,(closure)&c_738265,__lambda_798,  set_cell_as_expr(&local_738624, restore_91heap_67_732584));; 
}

static void __lambda_798(void *data, object self_734580, int argc, object *args) /* object self_734580, object restore_91heap_67_732584 */
 {
 object restore_91heap_67_732584 = args[0];
  
closureN_type c_738267;
object e_738425 [5];
c_738267.hdr.mark = gc_color_red;
 c_738267.hdr.grayed = 0;
c_738267.tag = closureN_tag;
 c_738267.fn = (function_type)__lambda_393;
c_738267.num_args = 1;
c_738267.num_elements = 5;
c_738267.elements = (object *)e_738425;
c_738267.elements[0] = ((closureN)self_734580)->elements[1];
c_738267.elements[1] = ((closureN)self_734580)->elements[2];
c_738267.elements[2] = restore_91heap_67_732584;
c_738267.elements[3] = ((closureN)self_734580)->elements[3];
c_738267.elements[4] = ((closureN)self_734580)->elements[4];


closureN_type c_738426;
object e_738620 [3];
c_738426.hdr.mark = gc_color_red;
 c_738426.hdr.grayed = 0;
c_738426.tag = closureN_tag;
 c_738426.fn = (function_type)__lambda_412;
c_738426.num_args = 2;
c_738426.num_elements = 3;
c_738426.elements = (object *)e_738620;
c_738426.elements[0] = ((closureN)self_734580)->elements[0];
c_738426.elements[1] = ((closureN)self_734580)->elements[3];
c_738426.elements[2] = ((closureN)self_734580)->elements[4];

return_direct_with_clo1(data,(closure)&c_738267,__lambda_393,  &c_738426);; 
}

static void __lambda_412(void *data, object self_734581, int argc, object *args) /* object self_734581, object k_733570, object end_731472_732586, object i_731473_732587 */
 {
 object k_733570 = args[0]; object end_731472_732586 = args[1]; object i_731473_732587 = args[2];
  
closureN_type c_738428;
object e_738616 [6];
c_738428.hdr.mark = gc_color_red;
 c_738428.hdr.grayed = 0;
c_738428.tag = closureN_tag;
 c_738428.fn = (function_type)__lambda_413;
c_738428.num_args = 1;
c_738428.num_elements = 6;
c_738428.elements = (object *)e_738616;
c_738428.elements[0] = ((closureN)self_734581)->elements[0];
c_738428.elements[1] = end_731472_732586;
c_738428.elements[2] = i_731473_732587;
c_738428.elements[3] = k_733570;
c_738428.elements[4] = ((closureN)self_734581)->elements[1];
c_738428.elements[5] = ((closureN)self_734581)->elements[2];



return_direct_with_clo1(data,(closure)&c_738428,__lambda_413,  Cyc_vector_ref(data, ((closureN)self_734581)->elements[2], i_731473_732587));; 
}

static void __lambda_413(void *data, object self_734582, int argc, object *args) /* object self_734582, object vi_731476_732588 */
 {
 object vi_731476_732588 = args[0];
  
closureN_type c_738430;
object e_738607 [7];
c_738430.hdr.mark = gc_color_red;
 c_738430.hdr.grayed = 0;
c_738430.tag = closureN_tag;
 c_738430.fn = (function_type)__lambda_414;
c_738430.num_args = 1;
c_738430.num_elements = 7;
c_738430.elements = (object *)e_738607;
c_738430.elements[0] = ((closureN)self_734582)->elements[0];
c_738430.elements[1] = ((closureN)self_734582)->elements[1];
c_738430.elements[2] = ((closureN)self_734582)->elements[2];
c_738430.elements[3] = ((closureN)self_734582)->elements[3];
c_738430.elements[4] = ((closureN)self_734582)->elements[4];
c_738430.elements[5] = ((closureN)self_734582)->elements[5];
c_738430.elements[6] = vi_731476_732588;


complex_num_type local_738610; 

complex_num_type local_738613; 
return_direct_with_clo1(data,(closure)&c_738430,__lambda_414,  ((inline_function_type)
                   ((closure)__glo_quotient_191_191inline_191_191_scheme_base)->fn)(data,&local_738610, Cyc_fast_sum(data,&local_738613, ((closureN)self_734582)->elements[4], ((closureN)self_734582)->elements[1]), obj_int2obj(2)));; 
}

static void __lambda_414(void *data, object self_734583, int argc, object *args) /* object self_734583, object first_91leaf_731479_732589 */
 {
 object first_91leaf_731479_732589 = args[0];
  
closureN_type c_738432;
object e_738605 [7];
c_738432.hdr.mark = gc_color_red;
 c_738432.hdr.grayed = 0;
c_738432.tag = closureN_tag;
 c_738432.fn = (function_type)__lambda_415;
c_738432.num_args = 0;
c_738432.num_elements = 7;
c_738432.elements = (object *)e_738605;
c_738432.elements[0] = ((closureN)self_734583)->elements[0];
c_738432.elements[1] = ((closureN)self_734583)->elements[1];
c_738432.elements[2] = first_91leaf_731479_732589;
c_738432.elements[3] = ((closureN)self_734583)->elements[3];
c_738432.elements[4] = ((closureN)self_734583)->elements[4];
c_738432.elements[5] = ((closureN)self_734583)->elements[5];
c_738432.elements[6] = ((closureN)self_734583)->elements[6];

return_direct_with_clo1(data,(closure)&c_738432,__lambda_415,  ((closureN)self_734583)->elements[2]);; 
}

static void __lambda_415(void *data, object self_734584, int argc, object *args) /* object self_734584, object k_731485_732591 */
 {
 object k_731485_732591 = args[0];
  
closureN_type c_738434;
object e_738604 [8];
c_738434.hdr.mark = gc_color_red;
 c_738434.hdr.grayed = 0;
c_738434.tag = closureN_tag;
 c_738434.fn = (function_type)__lambda_416;
c_738434.num_args = 1;
c_738434.num_elements = 8;
c_738434.elements = (object *)e_738604;
c_738434.elements[0] = ((closureN)self_734584)->elements[0];
c_738434.elements[1] = ((closureN)self_734584)->elements[1];
c_738434.elements[2] = ((closureN)self_734584)->elements[2];
c_738434.elements[3] = k_731485_732591;
c_738434.elements[4] = ((closureN)self_734584)->elements[3];
c_738434.elements[5] = ((closureN)self_734584)->elements[4];
c_738434.elements[6] = ((closureN)self_734584)->elements[5];
c_738434.elements[7] = ((closureN)self_734584)->elements[6];

return_direct_with_clo1(data,(closure)&c_738434,__lambda_416,  boolean_f);; 
}

static void __lambda_416(void *data, object self_734585, int argc, object *args) /* object self_734585, object lp_731486_732592 */
 {
 object lp_731486_732592 = args[0];
  
closureN_type c_738436;
object e_738600 [8];
c_738436.hdr.mark = gc_color_red;
 c_738436.hdr.grayed = 0;
c_738436.tag = closureN_tag;
 c_738436.fn = (function_type)__lambda_797;
c_738436.num_args = 1;
c_738436.num_elements = 8;
c_738436.elements = (object *)e_738600;
c_738436.elements[0] = ((closureN)self_734585)->elements[0];
c_738436.elements[1] = ((closureN)self_734585)->elements[1];
c_738436.elements[2] = ((closureN)self_734585)->elements[2];
c_738436.elements[3] = ((closureN)self_734585)->elements[3];
c_738436.elements[4] = ((closureN)self_734585)->elements[4];
c_738436.elements[5] = ((closureN)self_734585)->elements[5];
c_738436.elements[6] = ((closureN)self_734585)->elements[6];
c_738436.elements[7] = ((closureN)self_734585)->elements[7];


pair_type local_738603; 
return_direct_with_clo1(data,(closure)&c_738436,__lambda_797,  set_cell_as_expr(&local_738603, lp_731486_732592));; 
}

static void __lambda_797(void *data, object self_734586, int argc, object *args) /* object self_734586, object lp_731486_732592 */
 {
 object lp_731486_732592 = args[0];
  
closureN_type c_738438;
object e_738459 [5];
c_738438.hdr.mark = gc_color_red;
 c_738438.hdr.grayed = 0;
c_738438.tag = closureN_tag;
 c_738438.fn = (function_type)__lambda_417;
c_738438.num_args = 1;
c_738438.num_elements = 5;
c_738438.elements = (object *)e_738459;
c_738438.elements[0] = ((closureN)self_734586)->elements[3];
c_738438.elements[1] = ((closureN)self_734586)->elements[4];
c_738438.elements[2] = lp_731486_732592;
c_738438.elements[3] = ((closureN)self_734586)->elements[6];
c_738438.elements[4] = ((closureN)self_734586)->elements[7];


closureN_type c_738460;
object e_738599 [7];
c_738460.hdr.mark = gc_color_red;
 c_738460.hdr.grayed = 0;
c_738460.tag = closureN_tag;
 c_738460.fn = (function_type)__lambda_420;
c_738460.num_args = 1;
c_738460.num_elements = 7;
c_738460.elements = (object *)e_738599;
c_738460.elements[0] = ((closureN)self_734586)->elements[0];
c_738460.elements[1] = ((closureN)self_734586)->elements[1];
c_738460.elements[2] = ((closureN)self_734586)->elements[2];
c_738460.elements[3] = lp_731486_732592;
c_738460.elements[4] = ((closureN)self_734586)->elements[5];
c_738460.elements[5] = ((closureN)self_734586)->elements[6];
c_738460.elements[6] = ((closureN)self_734586)->elements[7];

return_direct_with_clo1(data,(closure)&c_738438,__lambda_417,  &c_738460);; 
}

static void __lambda_420(void *data, object self_734587, int argc, object *args) /* object self_734587, object k_733576, object k_731487_732593 */
 {
 object k_733576 = args[0]; object k_731487_732593 = args[1];
    
if( (boolean_f != Cyc_num_fast_gte_op(data, k_731487_732593, ((closureN)self_734587)->elements[2])) ){ 
  return_direct_with_clo1(data,  k_733576, (((closure)  k_733576)->fn),  k_731487_732593);
} else { 
  
closureN_type c_738466;
object e_738585 [8];
c_738466.hdr.mark = gc_color_red;
 c_738466.hdr.grayed = 0;
c_738466.tag = closureN_tag;
 c_738466.fn = (function_type)__lambda_421;
c_738466.num_args = 1;
c_738466.num_elements = 8;
c_738466.elements = (object *)e_738585;
c_738466.elements[0] = ((closureN)self_734587)->elements[0];
c_738466.elements[1] = ((closureN)self_734587)->elements[1];
c_738466.elements[2] = k_731487_732593;
c_738466.elements[3] = k_733576;
c_738466.elements[4] = ((closureN)self_734587)->elements[3];
c_738466.elements[5] = ((closureN)self_734587)->elements[4];
c_738466.elements[6] = ((closureN)self_734587)->elements[5];
c_738466.elements[7] = ((closureN)self_734587)->elements[6];




complex_num_type local_738591; 

complex_num_type local_738594; 

complex_num_type local_738597; 
return_direct_with_clo1(data,(closure)&c_738466,__lambda_421,  Cyc_vector_ref(data, ((closureN)self_734587)->elements[5], Cyc_fast_sum(data,&local_738591, obj_int2obj(1), Cyc_fast_sum(data,&local_738594, k_731487_732593, Cyc_fast_sub(data,&local_738597, k_731487_732593, ((closureN)self_734587)->elements[4])))));}
;; 
}

static void __lambda_421(void *data, object self_734588, int argc, object *args) /* object self_734588, object child1_91val_731499_732597 */
 {
 object child1_91val_731499_732597 = args[0];
  
closureN_type c_738468;
object e_738500 [6];
c_738468.hdr.mark = gc_color_red;
 c_738468.hdr.grayed = 0;
c_738468.tag = closureN_tag;
 c_738468.fn = (function_type)__lambda_422;
c_738468.num_args = 1;
c_738468.num_elements = 6;
c_738468.elements = (object *)e_738500;
c_738468.elements[0] = ((closureN)self_734588)->elements[0];
c_738468.elements[1] = ((closureN)self_734588)->elements[2];
c_738468.elements[2] = ((closureN)self_734588)->elements[3];
c_738468.elements[3] = ((closureN)self_734588)->elements[4];
c_738468.elements[4] = ((closureN)self_734588)->elements[6];
c_738468.elements[5] = ((closureN)self_734588)->elements[7];


closureN_type c_738501;
object e_738584 [6];
c_738501.hdr.mark = gc_color_red;
 c_738501.hdr.grayed = 0;
c_738501.tag = closureN_tag;
 c_738501.fn = (function_type)__lambda_427;
c_738501.num_args = 0;
c_738501.num_elements = 6;
c_738501.elements = (object *)e_738584;
c_738501.elements[0] = child1_91val_731499_732597;
c_738501.elements[1] = ((closureN)self_734588)->elements[0];
c_738501.elements[2] = ((closureN)self_734588)->elements[1];
c_738501.elements[3] = ((closureN)self_734588)->elements[2];
c_738501.elements[4] = ((closureN)self_734588)->elements[5];
c_738501.elements[5] = ((closureN)self_734588)->elements[6];

return_direct_with_clo1(data,(closure)&c_738468,__lambda_422,  &c_738501);; 
}

static void __lambda_427(void *data, object self_734589, int argc, object *args) /* object self_734589, object k_733587 */
 {
 object k_733587 = args[0];
    
  complex_num_type local_738506; 
  complex_num_type local_738509; 
  complex_num_type local_738513; 
if( (boolean_f != Cyc_num_fast_lt_op(data, Cyc_fast_sum(data,&local_738506, obj_int2obj(2), Cyc_fast_sum(data,&local_738509, ((closureN)self_734589)->elements[3], Cyc_fast_sub(data,&local_738513, ((closureN)self_734589)->elements[3], ((closureN)self_734589)->elements[4]))), ((closureN)self_734589)->elements[2])) ){ 
  
closureN_type c_738518;
object e_738554 [5];
c_738518.hdr.mark = gc_color_red;
 c_738518.hdr.grayed = 0;
c_738518.tag = closureN_tag;
 c_738518.fn = (function_type)__lambda_428;
c_738518.num_args = 1;
c_738518.num_elements = 5;
c_738518.elements = (object *)e_738554;
c_738518.elements[0] = ((closureN)self_734589)->elements[0];
c_738518.elements[1] = ((closureN)self_734589)->elements[1];
c_738518.elements[2] = ((closureN)self_734589)->elements[3];
c_738518.elements[3] = k_733587;
c_738518.elements[4] = ((closureN)self_734589)->elements[4];




complex_num_type local_738560; 

complex_num_type local_738563; 

complex_num_type local_738567; 
return_direct_with_clo1(data,(closure)&c_738518,__lambda_428,  Cyc_vector_ref(data, ((closureN)self_734589)->elements[5], Cyc_fast_sum(data,&local_738560, obj_int2obj(2), Cyc_fast_sum(data,&local_738563, ((closureN)self_734589)->elements[3], Cyc_fast_sub(data,&local_738567, ((closureN)self_734589)->elements[3], ((closureN)self_734589)->elements[4])))));
} else { 
  
complex_num_type local_738573; 

complex_num_type local_738576; 

complex_num_type local_738580; 
return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_733587, Cyc_fast_sum(data,&local_738573, obj_int2obj(1), Cyc_fast_sum(data,&local_738576, ((closureN)self_734589)->elements[3], Cyc_fast_sub(data,&local_738580, ((closureN)self_734589)->elements[3], ((closureN)self_734589)->elements[4]))), ((closureN)self_734589)->elements[0]);}
;; 
}

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

return_closcall3(data,  ((closureN)self_734590)->elements[1],  &c_738521, child2_91val_731501_732598, ((closureN)self_734590)->elements[0]);; 
}

static void __lambda_429(void *data, object self_734591, int argc, object *args) /* object self_734591, object r_733590 */
 {
 object r_733590 = args[0];
  if( (boolean_f != r_733590) ){ 
  
complex_num_type local_738526; 

complex_num_type local_738529; 

complex_num_type local_738533; 
return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734591)->elements[3], Cyc_fast_sum(data,&local_738526, obj_int2obj(1), Cyc_fast_sum(data,&local_738529, ((closureN)self_734591)->elements[2], Cyc_fast_sub(data,&local_738533, ((closureN)self_734591)->elements[2], ((closureN)self_734591)->elements[4]))), ((closureN)self_734591)->elements[0]);
} else { 
  
complex_num_type local_738541; 

complex_num_type local_738544; 

complex_num_type local_738548; 
return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734591)->elements[3], Cyc_fast_sum(data,&local_738541, obj_int2obj(2), Cyc_fast_sum(data,&local_738544, ((closureN)self_734591)->elements[2], Cyc_fast_sub(data,&local_738548, ((closureN)self_734591)->elements[2], ((closureN)self_734591)->elements[4]))), ((closureN)self_734591)->elements[1]);}
;; 
}

static void __lambda_422(void *data, object self_734592, int argc, object *args) /* object self_734592, object r_733582 */
 {
 object r_733582 = args[0];
  
closureN_type c_738470;
object e_738474 [2];
c_738470.hdr.mark = gc_color_red;
 c_738470.hdr.grayed = 0;
c_738470.tag = closureN_tag;
 c_738470.fn = (function_type)__lambda_423;
c_738470.num_args = 1;
c_738470.num_elements = 2;
c_738470.elements = (object *)e_738474;
c_738470.elements[0] = ((closureN)self_734592)->elements[2];
c_738470.elements[1] = r_733582;


closureN_type c_738475;
object e_738499 [5];
c_738475.hdr.mark = gc_color_red;
 c_738475.hdr.grayed = 0;
c_738475.tag = closureN_tag;
 c_738475.fn = (function_type)__lambda_424;
c_738475.num_args = 2;
c_738475.num_elements = 5;
c_738475.elements = (object *)e_738499;
c_738475.elements[0] = ((closureN)self_734592)->elements[0];
c_738475.elements[1] = ((closureN)self_734592)->elements[1];
c_738475.elements[2] = ((closureN)self_734592)->elements[3];
c_738475.elements[3] = ((closureN)self_734592)->elements[4];
c_738475.elements[4] = ((closureN)self_734592)->elements[5];

return_direct_with_clo1(data,(closure)&c_738470,__lambda_423,  &c_738475);; 
}

static void __lambda_424(void *data, object self_734593, int argc, object *args) /* object self_734593, object k_733584, object max_91child_731502_732599, object max_91child_91val_731503_732600 */
 {
 object k_733584 = args[0]; object max_91child_731502_732599 = args[1]; object max_91child_91val_731503_732600 = args[2];
  
closureN_type c_738478;
object e_738497 [6];
c_738478.hdr.mark = gc_color_red;
 c_738478.hdr.grayed = 0;
c_738478.tag = closureN_tag;
 c_738478.fn = (function_type)__lambda_425;
c_738478.num_args = 1;
c_738478.num_elements = 6;
c_738478.elements = (object *)e_738497;
c_738478.elements[0] = ((closureN)self_734593)->elements[1];
c_738478.elements[1] = k_733584;
c_738478.elements[2] = ((closureN)self_734593)->elements[2];
c_738478.elements[3] = max_91child_731502_732599;
c_738478.elements[4] = max_91child_91val_731503_732600;
c_738478.elements[5] = ((closureN)self_734593)->elements[3];

return_closcall3(data,  ((closureN)self_734593)->elements[0],  &c_738478, ((closureN)self_734593)->elements[4], max_91child_91val_731503_732600);; 
}

static void __lambda_425(void *data, object self_734594, int argc, object *args) /* object self_734594, object r_733585 */
 {
 object r_733585 = args[0];
  if( (boolean_f != r_733585) ){ 
  
closureN_type c_738480;
object e_738487 [3];
c_738480.hdr.mark = gc_color_red;
 c_738480.hdr.grayed = 0;
c_738480.tag = closureN_tag;
 c_738480.fn = (function_type)__lambda_426;
c_738480.num_args = 1;
c_738480.num_elements = 3;
c_738480.elements = (object *)e_738487;
c_738480.elements[0] = ((closureN)self_734594)->elements[1];
c_738480.elements[1] = ((closureN)self_734594)->elements[2];
c_738480.elements[2] = ((closureN)self_734594)->elements[3];


object c_738490 = Cyc_vector_set_cps(data,(closure)&c_738480,((closureN)self_734594)->elements[5], ((closureN)self_734594)->elements[0], ((closureN)self_734594)->elements[4]);
return_closcall1(data,(closure)&c_738480,  c_738490);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734594)->elements[1], (((closure)  ((closureN)self_734594)->elements[1])->fn),  ((closureN)self_734594)->elements[0]);}
;; 
}

static void __lambda_426(void *data, object self_734595, int argc, object *args) /* object self_734595, object r_733586 */
 {

  

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

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

static void __lambda_417(void *data, object self_734597, int argc, object *args) /* object self_734597, object r_733575 */
 {
 object r_733575 = args[0];
  
closureN_type c_738440;
object e_738455 [5];
c_738440.hdr.mark = gc_color_red;
 c_738440.hdr.grayed = 0;
c_738440.tag = closureN_tag;
 c_738440.fn = (function_type)__lambda_418;
c_738440.num_args = 1;
c_738440.num_elements = 5;
c_738440.elements = (object *)e_738455;
c_738440.elements[0] = ((closureN)self_734597)->elements[0];
c_738440.elements[1] = ((closureN)self_734597)->elements[1];
c_738440.elements[2] = ((closureN)self_734597)->elements[2];
c_738440.elements[3] = ((closureN)self_734597)->elements[3];
c_738440.elements[4] = ((closureN)self_734597)->elements[4];



return_direct_with_clo1(data,(closure)&c_738440,__lambda_418,  Cyc_set_cell(data, ((closureN)self_734597)->elements[2], r_733575));; 
}

static void __lambda_418(void *data, object self_734598, int argc, object *args) /* object self_734598, object r_733574 */
 {

  


closureN_type c_738445;
object e_738453 [3];
c_738445.hdr.mark = gc_color_red;
 c_738445.hdr.grayed = 0;
c_738445.tag = closureN_tag;
 c_738445.fn = (function_type)__lambda_419;
c_738445.num_args = 1;
c_738445.num_elements = 3;
c_738445.elements = (object *)e_738453;
c_738445.elements[0] = ((closureN)self_734598)->elements[1];
c_738445.elements[1] = ((closureN)self_734598)->elements[3];
c_738445.elements[2] = ((closureN)self_734598)->elements[4];

return_closcall2(data,  car(((closureN)self_734598)->elements[2]),  &c_738445, ((closureN)self_734598)->elements[0]);; 
}

static void __lambda_419(void *data, object self_734599, int argc, object *args) /* object self_734599, object final_91k_731482_732590 */
 {
 object final_91k_731482_732590 = args[0];
  
object c_738450 = Cyc_vector_set_cps(data,  ((closureN)self_734599)->elements[0],((closureN)self_734599)->elements[1], final_91k_731482_732590, ((closureN)self_734599)->elements[2]);
return_direct_with_clo1(data,  ((closureN)self_734599)->elements[0], (((closure)  ((closureN)self_734599)->elements[0])->fn),  c_738450);; 
}

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



return_direct_with_clo1(data,(closure)&c_738269,__lambda_394,  Cyc_set_cell(data, ((closureN)self_734600)->elements[2], r_733569));; 
}

static void __lambda_394(void *data, object self_734601, int argc, object *args) /* object self_734601, object r_733547 */
 {

  
closureN_type c_738271;
object e_738409 [5];
c_738271.hdr.mark = gc_color_red;
 c_738271.hdr.grayed = 0;
c_738271.tag = closureN_tag;
 c_738271.fn = (function_type)__lambda_395;
c_738271.num_args = 1;
c_738271.num_elements = 5;
c_738271.elements = (object *)e_738409;
c_738271.elements[0] = ((closureN)self_734601)->elements[0];
c_738271.elements[1] = ((closureN)self_734601)->elements[1];
c_738271.elements[2] = ((closureN)self_734601)->elements[2];
c_738271.elements[3] = ((closureN)self_734601)->elements[3];
c_738271.elements[4] = ((closureN)self_734601)->elements[4];


complex_num_type local_738412; 

complex_num_type local_738415; 

complex_num_type local_738418; 
return_direct_with_clo1(data,(closure)&c_738271,__lambda_395,  Cyc_fast_sub(data,&local_738412, ((inline_function_type)
                   ((closure)__glo_quotient_191_191inline_191_191_scheme_base)->fn)(data,&local_738415, Cyc_fast_sum(data,&local_738418, ((closureN)self_734601)->elements[3], ((closureN)self_734601)->elements[0]), obj_int2obj(2)), obj_int2obj(1)));; 
}

static void __lambda_395(void *data, object self_734602, int argc, object *args) /* object self_734602, object i_731513_732602 */
 {
 object i_731513_732602 = args[0];
  
closureN_type c_738273;
object e_738408 [6];
c_738273.hdr.mark = gc_color_red;
 c_738273.hdr.grayed = 0;
c_738273.tag = closureN_tag;
 c_738273.fn = (function_type)__lambda_396;
c_738273.num_args = 1;
c_738273.num_elements = 6;
c_738273.elements = (object *)e_738408;
c_738273.elements[0] = ((closureN)self_734602)->elements[0];
c_738273.elements[1] = i_731513_732602;
c_738273.elements[2] = ((closureN)self_734602)->elements[1];
c_738273.elements[3] = ((closureN)self_734602)->elements[2];
c_738273.elements[4] = ((closureN)self_734602)->elements[3];
c_738273.elements[5] = ((closureN)self_734602)->elements[4];

return_direct_with_clo1(data,(closure)&c_738273,__lambda_396,  boolean_f);; 
}

static void __lambda_396(void *data, object self_734603, int argc, object *args) /* object self_734603, object lp_731509_731514_732603 */
 {
 object lp_731509_731514_732603 = args[0];
  
closureN_type c_738275;
object e_738404 [6];
c_738275.hdr.mark = gc_color_red;
 c_738275.hdr.grayed = 0;
c_738275.tag = closureN_tag;
 c_738275.fn = (function_type)__lambda_796;
c_738275.num_args = 1;
c_738275.num_elements = 6;
c_738275.elements = (object *)e_738404;
c_738275.elements[0] = ((closureN)self_734603)->elements[0];
c_738275.elements[1] = ((closureN)self_734603)->elements[1];
c_738275.elements[2] = ((closureN)self_734603)->elements[2];
c_738275.elements[3] = ((closureN)self_734603)->elements[3];
c_738275.elements[4] = ((closureN)self_734603)->elements[4];
c_738275.elements[5] = ((closureN)self_734603)->elements[5];


pair_type local_738407; 
return_direct_with_clo1(data,(closure)&c_738275,__lambda_796,  set_cell_as_expr(&local_738407, lp_731509_731514_732603));; 
}

static void __lambda_796(void *data, object self_734604, int argc, object *args) /* object self_734604, object lp_731509_731514_732603 */
 {
 object lp_731509_731514_732603 = args[0];
  
closureN_type c_738277;
object e_738378 [7];
c_738277.hdr.mark = gc_color_red;
 c_738277.hdr.grayed = 0;
c_738277.tag = closureN_tag;
 c_738277.fn = (function_type)__lambda_397;
c_738277.num_args = 1;
c_738277.num_elements = 7;
c_738277.elements = (object *)e_738378;
c_738277.elements[0] = ((closureN)self_734604)->elements[0];
c_738277.elements[1] = ((closureN)self_734604)->elements[1];
c_738277.elements[2] = ((closureN)self_734604)->elements[2];
c_738277.elements[3] = lp_731509_731514_732603;
c_738277.elements[4] = ((closureN)self_734604)->elements[3];
c_738277.elements[5] = ((closureN)self_734604)->elements[4];
c_738277.elements[6] = ((closureN)self_734604)->elements[5];


closureN_type c_738379;
object e_738403 [4];
c_738379.hdr.mark = gc_color_red;
 c_738379.hdr.grayed = 0;
c_738379.tag = closureN_tag;
 c_738379.fn = (function_type)__lambda_410;
c_738379.num_args = 1;
c_738379.num_elements = 4;
c_738379.elements = (object *)e_738403;
c_738379.elements[0] = ((closureN)self_734604)->elements[0];
c_738379.elements[1] = lp_731509_731514_732603;
c_738379.elements[2] = ((closureN)self_734604)->elements[3];
c_738379.elements[3] = ((closureN)self_734604)->elements[4];

return_direct_with_clo1(data,(closure)&c_738277,__lambda_397,  &c_738379);; 
}

static void __lambda_410(void *data, object self_734605, int argc, object *args) /* object self_734605, object k_733564, object i_731515_732604 */
 {
 object k_733564 = args[0]; object i_731515_732604 = args[1];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, i_731515_732604, ((closureN)self_734605)->elements[3])) ){ 
  

return_direct_with_clo1(data,  k_733564, (((closure)  k_733564)->fn),  Cyc_num_fast_lt_op(data, i_731515_732604, ((closureN)self_734605)->elements[3]));
} else { 
  


closureN_type c_738391;
object e_738401 [3];
c_738391.hdr.mark = gc_color_red;
 c_738391.hdr.grayed = 0;
c_738391.tag = closureN_tag;
 c_738391.fn = (function_type)__lambda_411;
c_738391.num_args = 1;
c_738391.num_elements = 3;
c_738391.elements = (object *)e_738401;
c_738391.elements[0] = i_731515_732604;
c_738391.elements[1] = k_733564;
c_738391.elements[2] = ((closureN)self_734605)->elements[1];

return_closcall3(data,  car(((closureN)self_734605)->elements[2]),  &c_738391, ((closureN)self_734605)->elements[0], i_731515_732604);}
;; 
}

static void __lambda_411(void *data, object self_734606, int argc, object *args) /* object self_734606, object r_733566 */
 {

  


complex_num_type local_738399; 
return_closcall2(data,  car(((closureN)self_734606)->elements[2]),  ((closureN)self_734606)->elements[1], Cyc_fast_sub(data,&local_738399, ((closureN)self_734606)->elements[0], obj_int2obj(1)));; 
}

static void __lambda_397(void *data, object self_734607, int argc, object *args) /* object self_734607, object r_733563 */
 {
 object r_733563 = args[0];
  
closureN_type c_738279;
object e_738374 [7];
c_738279.hdr.mark = gc_color_red;
 c_738279.hdr.grayed = 0;
c_738279.tag = closureN_tag;
 c_738279.fn = (function_type)__lambda_398;
c_738279.num_args = 1;
c_738279.num_elements = 7;
c_738279.elements = (object *)e_738374;
c_738279.elements[0] = ((closureN)self_734607)->elements[0];
c_738279.elements[1] = ((closureN)self_734607)->elements[1];
c_738279.elements[2] = ((closureN)self_734607)->elements[2];
c_738279.elements[3] = ((closureN)self_734607)->elements[3];
c_738279.elements[4] = ((closureN)self_734607)->elements[4];
c_738279.elements[5] = ((closureN)self_734607)->elements[5];
c_738279.elements[6] = ((closureN)self_734607)->elements[6];



return_direct_with_clo1(data,(closure)&c_738279,__lambda_398,  Cyc_set_cell(data, ((closureN)self_734607)->elements[3], r_733563));; 
}

static void __lambda_398(void *data, object self_734608, int argc, object *args) /* object self_734608, object r_733562 */
 {

  


closureN_type c_738284;
object e_738372 [5];
c_738284.hdr.mark = gc_color_red;
 c_738284.hdr.grayed = 0;
c_738284.tag = closureN_tag;
 c_738284.fn = (function_type)__lambda_399;
c_738284.num_args = 1;
c_738284.num_elements = 5;
c_738284.elements = (object *)e_738372;
c_738284.elements[0] = ((closureN)self_734608)->elements[0];
c_738284.elements[1] = ((closureN)self_734608)->elements[2];
c_738284.elements[2] = ((closureN)self_734608)->elements[4];
c_738284.elements[3] = ((closureN)self_734608)->elements[5];
c_738284.elements[4] = ((closureN)self_734608)->elements[6];

return_closcall2(data,  car(((closureN)self_734608)->elements[3]),  &c_738284, ((closureN)self_734608)->elements[1]);; 
}

static void __lambda_399(void *data, object self_734609, int argc, object *args) /* object self_734609, object r_733548 */
 {

  
closureN_type c_738286;
object e_738371 [5];
c_738286.hdr.mark = gc_color_red;
 c_738286.hdr.grayed = 0;
c_738286.tag = closureN_tag;
 c_738286.fn = (function_type)__lambda_400;
c_738286.num_args = 1;
c_738286.num_elements = 5;
c_738286.elements = (object *)e_738371;
c_738286.elements[0] = ((closureN)self_734609)->elements[0];
c_738286.elements[1] = ((closureN)self_734609)->elements[1];
c_738286.elements[2] = ((closureN)self_734609)->elements[2];
c_738286.elements[3] = ((closureN)self_734609)->elements[3];
c_738286.elements[4] = ((closureN)self_734609)->elements[4];

return_direct_with_clo1(data,(closure)&c_738286,__lambda_400,  boolean_f);; 
}

static void __lambda_400(void *data, object self_734610, int argc, object *args) /* object self_734610, object lp_731517_731522_732607 */
 {
 object lp_731517_731522_732607 = args[0];
  
closureN_type c_738288;
object e_738367 [5];
c_738288.hdr.mark = gc_color_red;
 c_738288.hdr.grayed = 0;
c_738288.tag = closureN_tag;
 c_738288.fn = (function_type)__lambda_795;
c_738288.num_args = 1;
c_738288.num_elements = 5;
c_738288.elements = (object *)e_738367;
c_738288.elements[0] = ((closureN)self_734610)->elements[0];
c_738288.elements[1] = ((closureN)self_734610)->elements[1];
c_738288.elements[2] = ((closureN)self_734610)->elements[2];
c_738288.elements[3] = ((closureN)self_734610)->elements[3];
c_738288.elements[4] = ((closureN)self_734610)->elements[4];


pair_type local_738370; 
return_direct_with_clo1(data,(closure)&c_738288,__lambda_795,  set_cell_as_expr(&local_738370, lp_731517_731522_732607));; 
}

static void __lambda_795(void *data, object self_734611, int argc, object *args) /* object self_734611, object lp_731517_731522_732607 */
 {
 object lp_731517_731522_732607 = args[0];
  
closureN_type c_738290;
object e_738306 [3];
c_738290.hdr.mark = gc_color_red;
 c_738290.hdr.grayed = 0;
c_738290.tag = closureN_tag;
 c_738290.fn = (function_type)__lambda_401;
c_738290.num_args = 1;
c_738290.num_elements = 3;
c_738290.elements = (object *)e_738306;
c_738290.elements[0] = ((closureN)self_734611)->elements[0];
c_738290.elements[1] = ((closureN)self_734611)->elements[1];
c_738290.elements[2] = lp_731517_731522_732607;


closureN_type c_738307;
object e_738366 [4];
c_738307.hdr.mark = gc_color_red;
 c_738307.hdr.grayed = 0;
c_738307.tag = closureN_tag;
 c_738307.fn = (function_type)__lambda_403;
c_738307.num_args = 1;
c_738307.num_elements = 4;
c_738307.elements = (object *)e_738366;
c_738307.elements[0] = lp_731517_731522_732607;
c_738307.elements[1] = ((closureN)self_734611)->elements[2];
c_738307.elements[2] = ((closureN)self_734611)->elements[3];
c_738307.elements[3] = ((closureN)self_734611)->elements[4];

return_direct_with_clo1(data,(closure)&c_738290,__lambda_401,  &c_738307);; 
}

static void __lambda_403(void *data, object self_734612, int argc, object *args) /* object self_734612, object k_733552, object i_731523_732608 */
 {
 object k_733552 = args[0]; object i_731523_732608 = args[1];
    
if( (boolean_f != Cyc_num_fast_lte_op(data, i_731523_732608, ((closureN)self_734612)->elements[2])) ){ 
  

return_direct_with_clo1(data,  k_733552, (((closure)  k_733552)->fn),  Cyc_num_fast_lte_op(data, i_731523_732608, ((closureN)self_734612)->elements[2]));
} else { 
  
closureN_type c_738316;
object e_738361 [6];
c_738316.hdr.mark = gc_color_red;
 c_738316.hdr.grayed = 0;
c_738316.tag = closureN_tag;
 c_738316.fn = (function_type)__lambda_404;
c_738316.num_args = 1;
c_738316.num_elements = 6;
c_738316.elements = (object *)e_738361;
c_738316.elements[0] = i_731523_732608;
c_738316.elements[1] = k_733552;
c_738316.elements[2] = ((closureN)self_734612)->elements[0];
c_738316.elements[3] = ((closureN)self_734612)->elements[1];
c_738316.elements[4] = ((closureN)self_734612)->elements[2];
c_738316.elements[5] = ((closureN)self_734612)->elements[3];



return_direct_with_clo1(data,(closure)&c_738316,__lambda_404,  Cyc_vector_ref(data, ((closureN)self_734612)->elements[3], ((closureN)self_734612)->elements[2]));}
;; 
}

static void __lambda_404(void *data, object self_734613, int argc, object *args) /* object self_734613, object top_731525_732610 */
 {
 object top_731525_732610 = args[0];
  
closureN_type c_738318;
object e_738356 [7];
c_738318.hdr.mark = gc_color_red;
 c_738318.hdr.grayed = 0;
c_738318.tag = closureN_tag;
 c_738318.fn = (function_type)__lambda_405;
c_738318.num_args = 1;
c_738318.num_elements = 7;
c_738318.elements = (object *)e_738356;
c_738318.elements[0] = ((closureN)self_734613)->elements[0];
c_738318.elements[1] = ((closureN)self_734613)->elements[1];
c_738318.elements[2] = ((closureN)self_734613)->elements[2];
c_738318.elements[3] = ((closureN)self_734613)->elements[3];
c_738318.elements[4] = ((closureN)self_734613)->elements[4];
c_738318.elements[5] = top_731525_732610;
c_738318.elements[6] = ((closureN)self_734613)->elements[5];



return_direct_with_clo1(data,(closure)&c_738318,__lambda_405,  Cyc_vector_ref(data, ((closureN)self_734613)->elements[5], ((closureN)self_734613)->elements[0]));; 
}

static void __lambda_405(void *data, object self_734614, int argc, object *args) /* object self_734614, object r_733559 */
 {
 object r_733559 = args[0];
  
closureN_type c_738320;
object e_738350 [7];
c_738320.hdr.mark = gc_color_red;
 c_738320.hdr.grayed = 0;
c_738320.tag = closureN_tag;
 c_738320.fn = (function_type)__lambda_406;
c_738320.num_args = 1;
c_738320.num_elements = 7;
c_738320.elements = (object *)e_738350;
c_738320.elements[0] = ((closureN)self_734614)->elements[0];
c_738320.elements[1] = ((closureN)self_734614)->elements[1];
c_738320.elements[2] = ((closureN)self_734614)->elements[2];
c_738320.elements[3] = ((closureN)self_734614)->elements[3];
c_738320.elements[4] = ((closureN)self_734614)->elements[4];
c_738320.elements[5] = ((closureN)self_734614)->elements[5];
c_738320.elements[6] = ((closureN)self_734614)->elements[6];


object c_738353 = Cyc_vector_set_cps(data,(closure)&c_738320,((closureN)self_734614)->elements[6], ((closureN)self_734614)->elements[4], r_733559);
return_closcall1(data,(closure)&c_738320,  c_738353);; 
}

static void __lambda_406(void *data, object self_734615, int argc, object *args) /* object self_734615, object r_733557 */
 {

  
closureN_type c_738322;
object e_738343 [5];
c_738322.hdr.mark = gc_color_red;
 c_738322.hdr.grayed = 0;
c_738322.tag = closureN_tag;
 c_738322.fn = (function_type)__lambda_407;
c_738322.num_args = 1;
c_738322.num_elements = 5;
c_738322.elements = (object *)e_738343;
c_738322.elements[0] = ((closureN)self_734615)->elements[0];
c_738322.elements[1] = ((closureN)self_734615)->elements[1];
c_738322.elements[2] = ((closureN)self_734615)->elements[2];
c_738322.elements[3] = ((closureN)self_734615)->elements[3];
c_738322.elements[4] = ((closureN)self_734615)->elements[4];


object c_738346 = Cyc_vector_set_cps(data,(closure)&c_738322,((closureN)self_734615)->elements[6], ((closureN)self_734615)->elements[0], ((closureN)self_734615)->elements[5]);
return_closcall1(data,(closure)&c_738322,  c_738346);; 
}

static void __lambda_407(void *data, object self_734616, int argc, object *args) /* object self_734616, object r_733558 */
 {

  


closureN_type c_738327;
object e_738340 [3];
c_738327.hdr.mark = gc_color_red;
 c_738327.hdr.grayed = 0;
c_738327.tag = closureN_tag;
 c_738327.fn = (function_type)__lambda_408;
c_738327.num_args = 1;
c_738327.num_elements = 3;
c_738327.elements = (object *)e_738340;
c_738327.elements[0] = ((closureN)self_734616)->elements[0];
c_738327.elements[1] = ((closureN)self_734616)->elements[1];
c_738327.elements[2] = ((closureN)self_734616)->elements[2];

return_closcall3(data,  car(((closureN)self_734616)->elements[3]),  &c_738327, ((closureN)self_734616)->elements[0], ((closureN)self_734616)->elements[4]);; 
}

static void __lambda_408(void *data, object self_734617, int argc, object *args) /* object self_734617, object r_733554 */
 {

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


complex_num_type local_738338; 
return_direct_with_clo1(data,(closure)&c_738329,__lambda_409,  Cyc_fast_sub(data,&local_738338, ((closureN)self_734617)->elements[0], obj_int2obj(1)));; 
}

static void __lambda_409(void *data, object self_734618, int argc, object *args) /* object self_734618, object r_733555 */
 {
 object r_733555 = args[0];
  

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

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



return_direct_with_clo1(data,(closure)&c_738292,__lambda_402,  Cyc_set_cell(data, ((closureN)self_734619)->elements[2], r_733551));; 
}

static void __lambda_402(void *data, object self_734620, int argc, object *args) /* object self_734620, object r_733550 */
 {

  


complex_num_type local_738300; 
return_closcall2(data,  car(((closureN)self_734620)->elements[2]),  ((closureN)self_734620)->elements[1], Cyc_fast_sub(data,&local_738300, ((closureN)self_734620)->elements[0], obj_int2obj(1)));; 
}

static void __lambda_385(void *data, object _, int argc, object *args) /* closure _,object k_733537, object vector_911_731461_732572, object vector_912_731462_732573, object maybe_91start_87end_731463_732574 */
 {
object k_733537 = args[0]; object vector_911_731461_732572 = args[1]; object vector_912_731462_732573 = args[2]; object maybe_91start_87end_731463_732574 = args[3];
  Cyc_st_add(data, "srfi/132.sld:vectors-start+end-2");

closureN_type c_738233;
object e_738260 [4];
c_738233.hdr.mark = gc_color_red;
 c_738233.hdr.grayed = 0;
c_738233.tag = closureN_tag;
 c_738233.fn = (function_type)__lambda_386;
c_738233.num_args = 1;
c_738233.num_elements = 4;
c_738233.elements = (object *)e_738260;
c_738233.elements[0] = k_733537;
c_738233.elements[1] = maybe_91start_87end_731463_732574;
c_738233.elements[2] = vector_911_731461_732572;
c_738233.elements[3] = vector_912_731462_732573;

return_direct_with_clo4(data,  __glo_list_91ref_91or_91default_srfi_132, (((closure)  __glo_list_91ref_91or_91default_srfi_132)->fn),  &c_738233, maybe_91start_87end_731463_732574, obj_int2obj(0), obj_int2obj(0));; 
}

static void __lambda_386(void *data, object self_734574, int argc, object *args) /* object self_734574, object r_733538 */
 {
 object r_733538 = args[0];
  
closureN_type c_738235;
object e_738255 [4];
c_738235.hdr.mark = gc_color_red;
 c_738235.hdr.grayed = 0;
c_738235.tag = closureN_tag;
 c_738235.fn = (function_type)__lambda_387;
c_738235.num_args = 1;
c_738235.num_elements = 4;
c_738235.elements = (object *)e_738255;
c_738235.elements[0] = ((closureN)self_734574)->elements[0];
c_738235.elements[1] = ((closureN)self_734574)->elements[1];
c_738235.elements[2] = r_733538;
c_738235.elements[3] = ((closureN)self_734574)->elements[3];



return_direct_with_clo4(data,  __glo_list_91ref_91or_91default_srfi_132, (((closure)  __glo_list_91ref_91or_91default_srfi_132)->fn),  &c_738235, ((closureN)self_734574)->elements[1], obj_int2obj(1), Cyc_vector_length(data, ((closureN)self_734574)->elements[2]));; 
}

static void __lambda_387(void *data, object self_734575, int argc, object *args) /* object self_734575, object r_733539 */
 {
 object r_733539 = args[0];
  
closureN_type c_738237;
object e_738253 [5];
c_738237.hdr.mark = gc_color_red;
 c_738237.hdr.grayed = 0;
c_738237.tag = closureN_tag;
 c_738237.fn = (function_type)__lambda_388;
c_738237.num_args = 1;
c_738237.num_elements = 5;
c_738237.elements = (object *)e_738253;
c_738237.elements[0] = ((closureN)self_734575)->elements[0];
c_738237.elements[1] = ((closureN)self_734575)->elements[1];
c_738237.elements[2] = ((closureN)self_734575)->elements[2];
c_738237.elements[3] = r_733539;
c_738237.elements[4] = ((closureN)self_734575)->elements[3];

return_direct_with_clo4(data,  __glo_list_91ref_91or_91default_srfi_132, (((closure)  __glo_list_91ref_91or_91default_srfi_132)->fn),  &c_738237, ((closureN)self_734575)->elements[1], obj_int2obj(2), obj_int2obj(0));; 
}

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



return_direct_with_clo4(data,  __glo_list_91ref_91or_91default_srfi_132, (((closure)  __glo_list_91ref_91or_91default_srfi_132)->fn),  &c_738239, ((closureN)self_734576)->elements[1], obj_int2obj(3), Cyc_vector_length(data, ((closureN)self_734576)->elements[4]));; 
}

static void __lambda_389(void *data, object self_734577, int argc, object *args) /* object self_734577, object r_733541 */
 {
 object r_733541 = args[0];
  
closureN_type c_738241;
object e_738244 [1];
c_738241.hdr.mark = gc_color_red;
 c_738241.hdr.grayed = 0;
c_738241.tag = closureN_tag;
 c_738241.fn = (function_type)__lambda_390;
c_738241.num_args = 4;
c_738241.num_elements = 1;
c_738241.elements = (object *)e_738244;
c_738241.elements[0] = ((closureN)self_734577)->elements[0];

return_direct_with_clo4(data,(closure)&c_738241,__lambda_390,  ((closureN)self_734577)->elements[1], ((closureN)self_734577)->elements[2], ((closureN)self_734577)->elements[3], r_733541);; 
}

static void __lambda_390(void *data, object self_734578, int argc, object *args) /* object self_734578, object start_911_731464_732575, object end_911_731465_732576, object start_912_731466_732577, object end_912_731467_732578 */
 {
 object start_911_731464_732575 = args[0]; object end_911_731465_732576 = args[1]; object start_912_731466_732577 = args[2]; object end_912_731467_732578 = args[3];
  return_direct_with_clo5(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734578)->elements[0], start_911_731464_732575, end_911_731465_732576, start_912_731466_732577, end_912_731467_732578);; 
}

static void __lambda_381(void *data, object _, int argc, object *args) /* closure _,object k_733531, object vector_731457_732568, object maybe_91start_87end_731458_732569 */
 {
object k_733531 = args[0]; object vector_731457_732568 = args[1]; object maybe_91start_87end_731458_732569 = args[2];
  Cyc_st_add(data, "srfi/132.sld:vector-start+end");

closureN_type c_738216;
object e_738230 [3];
c_738216.hdr.mark = gc_color_red;
 c_738216.hdr.grayed = 0;
c_738216.tag = closureN_tag;
 c_738216.fn = (function_type)__lambda_382;
c_738216.num_args = 1;
c_738216.num_elements = 3;
c_738216.elements = (object *)e_738230;
c_738216.elements[0] = k_733531;
c_738216.elements[1] = maybe_91start_87end_731458_732569;
c_738216.elements[2] = vector_731457_732568;

return_direct_with_clo4(data,  __glo_list_91ref_91or_91default_srfi_132, (((closure)  __glo_list_91ref_91or_91default_srfi_132)->fn),  &c_738216, maybe_91start_87end_731458_732569, obj_int2obj(0), obj_int2obj(0));; 
}

static void __lambda_382(void *data, object self_734571, int argc, object *args) /* object self_734571, object r_733532 */
 {
 object r_733532 = args[0];
  
closureN_type c_738218;
object e_738225 [2];
c_738218.hdr.mark = gc_color_red;
 c_738218.hdr.grayed = 0;
c_738218.tag = closureN_tag;
 c_738218.fn = (function_type)__lambda_383;
c_738218.num_args = 1;
c_738218.num_elements = 2;
c_738218.elements = (object *)e_738225;
c_738218.elements[0] = ((closureN)self_734571)->elements[0];
c_738218.elements[1] = r_733532;



return_direct_with_clo4(data,  __glo_list_91ref_91or_91default_srfi_132, (((closure)  __glo_list_91ref_91or_91default_srfi_132)->fn),  &c_738218, ((closureN)self_734571)->elements[1], obj_int2obj(1), Cyc_vector_length(data, ((closureN)self_734571)->elements[2]));; 
}

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

return_direct_with_clo2(data,(closure)&c_738220,__lambda_384,  ((closureN)self_734572)->elements[1], r_733533);; 
}

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

static void __lambda_376(void *data, object _, int argc, object *args) /* closure _,object k_733524, object list_731452_732563, object index_731453_732564, object default_731454_732565 */
 {
object k_733524 = args[0]; object list_731452_732563 = args[1]; object index_731453_732564 = args[2]; object default_731454_732565 = args[3];
  Cyc_st_add(data, "srfi/132.sld:list-ref-or-default");

closureN_type c_738196;
object e_738208 [2];
c_738196.hdr.mark = gc_color_red;
 c_738196.hdr.grayed = 0;
c_738196.tag = closureN_tag;
 c_738196.fn = (function_type)__lambda_377;
c_738196.num_args = 1;
c_738196.num_elements = 2;
c_738196.elements = (object *)e_738208;
c_738196.elements[0] = default_731454_732565;
c_738196.elements[1] = k_733524;


closureN_type c_738209;
object e_738213 [2];
c_738209.hdr.mark = gc_color_red;
 c_738209.hdr.grayed = 0;
c_738209.tag = closureN_tag;
 c_738209.fn = (function_type)__lambda_380;
c_738209.num_args = 0;
c_738209.num_elements = 2;
c_738209.elements = (object *)e_738213;
c_738209.elements[0] = index_731453_732564;
c_738209.elements[1] = list_731452_732563;

return_direct_with_clo1(data,(closure)&c_738196,__lambda_377,  &c_738209);; 
}

static void __lambda_380(void *data, object self_734567, int argc, object *args) /* object self_734567, object k_733528 */
 {
 object k_733528 = args[0];
  return_direct_with_clo3(data,  __glo_has_91element_srfi_132, (((closure)  __glo_has_91element_srfi_132)->fn),  k_733528, ((closureN)self_734567)->elements[1], ((closureN)self_734567)->elements[0]);; 
}

static void __lambda_377(void *data, object self_734568, int argc, object *args) /* object self_734568, object r_733525 */
 {
 object r_733525 = args[0];
  
closureN_type c_738198;
object e_738202 [2];
c_738198.hdr.mark = gc_color_red;
 c_738198.hdr.grayed = 0;
c_738198.tag = closureN_tag;
 c_738198.fn = (function_type)__lambda_378;
c_738198.num_args = 1;
c_738198.num_elements = 2;
c_738198.elements = (object *)e_738202;
c_738198.elements[0] = ((closureN)self_734568)->elements[1];
c_738198.elements[1] = r_733525;


closureN_type c_738203;
object e_738207 [1];
c_738203.hdr.mark = gc_color_red;
 c_738203.hdr.grayed = 0;
c_738203.tag = closureN_tag;
 c_738203.fn = (function_type)__lambda_379;
c_738203.num_args = 2;
c_738203.num_elements = 1;
c_738203.elements = (object *)e_738207;
c_738203.elements[0] = ((closureN)self_734568)->elements[0];

return_direct_with_clo1(data,(closure)&c_738198,__lambda_378,  &c_738203);; 
}

static void __lambda_379(void *data, object self_734569, int argc, object *args) /* object self_734569, object k_733527, object has_127_731455_732566, object maybe_731456_732567 */
 {
 object k_733527 = args[0]; object has_127_731455_732566 = args[1]; object maybe_731456_732567 = args[2];
  if( (boolean_f != has_127_731455_732566) ){ 
  return_direct_with_clo1(data,  k_733527, (((closure)  k_733527)->fn),  maybe_731456_732567);
} else { 
  return_direct_with_clo1(data,  k_733527, (((closure)  k_733527)->fn),  ((closureN)self_734569)->elements[0]);}
;; 
}

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

static void __lambda_375(void *data, object _, int argc, object *args) /* closure _,object k_733515, object list_731443_732561, object index_731444_732562 */
 {
object k_733515 = args[0]; object list_731443_732561 = args[1]; object index_731444_732562 = args[2];
  Cyc_st_add(data, "srfi/132.sld:has-element");
  complex_num_type local_738178; 
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_zero_127_191_191inline_191_191_scheme_base)->fn)(data,&local_738178, index_731444_732562)) ){ 
    
if( (boolean_f != Cyc_is_pair(list_731443_732561)) ){ 
  

return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_733515, boolean_t, Cyc_car(data, list_731443_732561));
} else { 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_733515, boolean_f, boolean_f);}
;
} else { 
    
if( (boolean_f != Cyc_is_null(list_731443_732561)) ){ 
  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_733515, boolean_f, boolean_f);
} else { 
  


complex_num_type local_738193; 
return_direct_with_clo3(data,  __glo_has_91element_srfi_132, (((closure)  __glo_has_91element_srfi_132)->fn),  k_733515, Cyc_cdr(data, list_731443_732561), Cyc_fast_sub(data,&local_738193, index_731444_732562, obj_int2obj(1)));}
;}
;; 
}

static void __lambda_368(void *data, object _, int argc, object *args) /* closure _,object k_733501, object target_731428_732550, object src_731429_732551, object start_731430_732552, object end_731431_732553 */
 {
object k_733501 = args[0]; object target_731428_732550 = args[1]; object src_731429_732551 = args[2]; object start_731430_732552 = args[3]; object end_731431_732553 = args[4];
  Cyc_st_add(data, "srfi/132.sld:vector-portion-copy!");

closureN_type c_738109;
object e_738165 [3];
c_738109.hdr.mark = gc_color_red;
 c_738109.hdr.grayed = 0;
c_738109.tag = closureN_tag;
 c_738109.fn = (function_type)__lambda_369;
c_738109.num_args = 2;
c_738109.num_elements = 3;
c_738109.elements = (object *)e_738165;
c_738109.elements[0] = k_733501;
c_738109.elements[1] = src_731429_732551;
c_738109.elements[2] = target_731428_732550;


complex_num_type local_738168; 

complex_num_type local_738171; 

complex_num_type local_738174; 
return_direct_with_clo2(data,(closure)&c_738109,__lambda_369,  Cyc_fast_sub(data,&local_738168, Cyc_fast_sub(data,&local_738171, end_731431_732553, start_731430_732552), obj_int2obj(1)), Cyc_fast_sub(data,&local_738174, end_731431_732553, obj_int2obj(1)));; 
}

static void __lambda_369(void *data, object self_734560, int argc, object *args) /* object self_734560, object i_731437_732555, object j_731438_732556 */
 {
 object i_731437_732555 = args[0]; object j_731438_732556 = args[1];
  
closureN_type c_738111;
object e_738164 [5];
c_738111.hdr.mark = gc_color_red;
 c_738111.hdr.grayed = 0;
c_738111.tag = closureN_tag;
 c_738111.fn = (function_type)__lambda_370;
c_738111.num_args = 1;
c_738111.num_elements = 5;
c_738111.elements = (object *)e_738164;
c_738111.elements[0] = i_731437_732555;
c_738111.elements[1] = j_731438_732556;
c_738111.elements[2] = ((closureN)self_734560)->elements[0];
c_738111.elements[3] = ((closureN)self_734560)->elements[1];
c_738111.elements[4] = ((closureN)self_734560)->elements[2];

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

static void __lambda_370(void *data, object self_734561, int argc, object *args) /* object self_734561, object lp_731433_731439_732557 */
 {
 object lp_731433_731439_732557 = args[0];
  
closureN_type c_738113;
object e_738160 [5];
c_738113.hdr.mark = gc_color_red;
 c_738113.hdr.grayed = 0;
c_738113.tag = closureN_tag;
 c_738113.fn = (function_type)__lambda_794;
c_738113.num_args = 1;
c_738113.num_elements = 5;
c_738113.elements = (object *)e_738160;
c_738113.elements[0] = ((closureN)self_734561)->elements[0];
c_738113.elements[1] = ((closureN)self_734561)->elements[1];
c_738113.elements[2] = ((closureN)self_734561)->elements[2];
c_738113.elements[3] = ((closureN)self_734561)->elements[3];
c_738113.elements[4] = ((closureN)self_734561)->elements[4];


pair_type local_738163; 
return_direct_with_clo1(data,(closure)&c_738113,__lambda_794,  set_cell_as_expr(&local_738163, lp_731433_731439_732557));; 
}

static void __lambda_794(void *data, object self_734562, int argc, object *args) /* object self_734562, object lp_731433_731439_732557 */
 {
 object lp_731433_731439_732557 = args[0];
  
closureN_type c_738115;
object e_738129 [4];
c_738115.hdr.mark = gc_color_red;
 c_738115.hdr.grayed = 0;
c_738115.tag = closureN_tag;
 c_738115.fn = (function_type)__lambda_371;
c_738115.num_args = 1;
c_738115.num_elements = 4;
c_738115.elements = (object *)e_738129;
c_738115.elements[0] = ((closureN)self_734562)->elements[0];
c_738115.elements[1] = ((closureN)self_734562)->elements[1];
c_738115.elements[2] = ((closureN)self_734562)->elements[2];
c_738115.elements[3] = lp_731433_731439_732557;


closureN_type c_738130;
object e_738159 [3];
c_738130.hdr.mark = gc_color_red;
 c_738130.hdr.grayed = 0;
c_738130.tag = closureN_tag;
 c_738130.fn = (function_type)__lambda_373;
c_738130.num_args = 2;
c_738130.num_elements = 3;
c_738130.elements = (object *)e_738159;
c_738130.elements[0] = lp_731433_731439_732557;
c_738130.elements[1] = ((closureN)self_734562)->elements[3];
c_738130.elements[2] = ((closureN)self_734562)->elements[4];

return_direct_with_clo1(data,(closure)&c_738115,__lambda_371,  &c_738130);; 
}

static void __lambda_373(void *data, object self_734563, int argc, object *args) /* object self_734563, object k_733507, object i_731440_732558, object j_731441_732559 */
 {
 object k_733507 = args[0]; object i_731440_732558 = args[1]; object j_731441_732559 = args[2];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, i_731440_732558, obj_int2obj(0))) ){ 
  

return_direct_with_clo1(data,  k_733507, (((closure)  k_733507)->fn),  Cyc_num_fast_lt_op(data, i_731440_732558, obj_int2obj(0)));
} else { 
  
closureN_type c_738137;
object e_738151 [4];
c_738137.hdr.mark = gc_color_red;
 c_738137.hdr.grayed = 0;
c_738137.tag = closureN_tag;
 c_738137.fn = (function_type)__lambda_374;
c_738137.num_args = 1;
c_738137.num_elements = 4;
c_738137.elements = (object *)e_738151;
c_738137.elements[0] = i_731440_732558;
c_738137.elements[1] = j_731441_732559;
c_738137.elements[2] = k_733507;
c_738137.elements[3] = ((closureN)self_734563)->elements[0];




object c_738154 = Cyc_vector_set_cps(data,(closure)&c_738137,((closureN)self_734563)->elements[2], i_731440_732558, Cyc_vector_ref(data, ((closureN)self_734563)->elements[1], j_731441_732559));
return_closcall1(data,(closure)&c_738137,  c_738154);}
;; 
}

static void __lambda_374(void *data, object self_734564, int argc, object *args) /* object self_734564, object r_733509 */
 {

  


complex_num_type local_738145; 

complex_num_type local_738149; 
return_closcall3(data,  car(((closureN)self_734564)->elements[3]),  ((closureN)self_734564)->elements[2], Cyc_fast_sub(data,&local_738145, ((closureN)self_734564)->elements[0], obj_int2obj(1)), Cyc_fast_sub(data,&local_738149, ((closureN)self_734564)->elements[1], obj_int2obj(1)));; 
}

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



return_direct_with_clo1(data,(closure)&c_738117,__lambda_372,  Cyc_set_cell(data, ((closureN)self_734565)->elements[3], r_733506));; 
}

static void __lambda_372(void *data, object self_734566, int argc, object *args) /* object self_734566, object r_733505 */
 {

  

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

static void __lambda_366(void *data, object _, int argc, object *args) /* closure _,object k_733497, object vec_731427_732549 */
 {
object k_733497 = args[0]; object vec_731427_732549 = args[1];
  Cyc_st_add(data, "srfi/132.sld:vector-copy");

closureN_type c_738100;
object e_738104 [2];
c_738100.hdr.mark = gc_color_red;
 c_738100.hdr.grayed = 0;
c_738100.tag = closureN_tag;
 c_738100.fn = (function_type)__lambda_367;
c_738100.num_args = 1;
c_738100.num_elements = 2;
c_738100.elements = (object *)e_738104;
c_738100.elements[0] = k_733497;
c_738100.elements[1] = vec_731427_732549;



return_direct_with_clo1(data,(closure)&c_738100,__lambda_367,  Cyc_vector_length(data, vec_731427_732549));; 
}

static void __lambda_367(void *data, object self_734559, int argc, object *args) /* object self_734559, object r_733498 */
 {
 object r_733498 = args[0];
  return_direct_with_clo4(data,  __glo_vector_91portion_91copy_srfi_132, (((closure)  __glo_vector_91portion_91copy_srfi_132)->fn),  ((closureN)self_734559)->elements[0], ((closureN)self_734559)->elements[1], obj_int2obj(0), r_733498);; 
}

static void __lambda_358(void *data, object _, int argc, object *args) /* closure _,object k_733483, object vec_731406_732538, object start_731407_732539, object end_731408_732540 */
 {
object k_733483 = args[0]; object vec_731406_732538 = args[1]; object start_731407_732539 = args[2]; object end_731408_732540 = args[3];
  
  Cyc_st_add(data, "srfi/132.sld:vector-portion-copy");
Cyc_vector_length(data, vec_731406_732538);
closureN_type c_738030;
object e_738089 [4];
c_738030.hdr.mark = gc_color_red;
 c_738030.hdr.grayed = 0;
c_738030.tag = closureN_tag;
 c_738030.fn = (function_type)__lambda_359;
c_738030.num_args = 1;
c_738030.num_elements = 4;
c_738030.elements = (object *)e_738089;
c_738030.elements[0] = end_731408_732540;
c_738030.elements[1] = k_733483;
c_738030.elements[2] = start_731407_732539;
c_738030.elements[3] = vec_731406_732538;


complex_num_type local_738095; 

object c_738092 = Cyc_make_vector(data,(closure)&c_738030,1,Cyc_fast_sub(data,&local_738095, end_731408_732540, start_731407_732539));
return_closcall1(data,(closure)&c_738030,  c_738092);;; 
}

static void __lambda_359(void *data, object self_734551, int argc, object *args) /* object self_734551, object new_731417_732543 */
 {
 object new_731417_732543 = args[0];
  
closureN_type c_738032;
object e_738087 [4];
c_738032.hdr.mark = gc_color_red;
 c_738032.hdr.grayed = 0;
c_738032.tag = closureN_tag;
 c_738032.fn = (function_type)__lambda_360;
c_738032.num_args = 1;
c_738032.num_elements = 4;
c_738032.elements = (object *)e_738087;
c_738032.elements[0] = ((closureN)self_734551)->elements[0];
c_738032.elements[1] = ((closureN)self_734551)->elements[1];
c_738032.elements[2] = new_731417_732543;
c_738032.elements[3] = ((closureN)self_734551)->elements[3];

return_direct_with_clo1(data,(closure)&c_738032,__lambda_360,  ((closureN)self_734551)->elements[2]);; 
}

static void __lambda_360(void *data, object self_734552, int argc, object *args) /* object self_734552, object i_731422_732544 */
 {
 object i_731422_732544 = args[0];
  
closureN_type c_738034;
object e_738086 [5];
c_738034.hdr.mark = gc_color_red;
 c_738034.hdr.grayed = 0;
c_738034.tag = closureN_tag;
 c_738034.fn = (function_type)__lambda_361;
c_738034.num_args = 1;
c_738034.num_elements = 5;
c_738034.elements = (object *)e_738086;
c_738034.elements[0] = ((closureN)self_734552)->elements[0];
c_738034.elements[1] = i_731422_732544;
c_738034.elements[2] = ((closureN)self_734552)->elements[1];
c_738034.elements[3] = ((closureN)self_734552)->elements[2];
c_738034.elements[4] = ((closureN)self_734552)->elements[3];

return_direct_with_clo1(data,(closure)&c_738034,__lambda_361,  boolean_f);; 
}

static void __lambda_361(void *data, object self_734553, int argc, object *args) /* object self_734553, object lp_731419_731424_732546 */
 {
 object lp_731419_731424_732546 = args[0];
  
closureN_type c_738036;
object e_738082 [5];
c_738036.hdr.mark = gc_color_red;
 c_738036.hdr.grayed = 0;
c_738036.tag = closureN_tag;
 c_738036.fn = (function_type)__lambda_793;
c_738036.num_args = 1;
c_738036.num_elements = 5;
c_738036.elements = (object *)e_738082;
c_738036.elements[0] = ((closureN)self_734553)->elements[0];
c_738036.elements[1] = ((closureN)self_734553)->elements[1];
c_738036.elements[2] = ((closureN)self_734553)->elements[2];
c_738036.elements[3] = ((closureN)self_734553)->elements[3];
c_738036.elements[4] = ((closureN)self_734553)->elements[4];


pair_type local_738085; 
return_direct_with_clo1(data,(closure)&c_738036,__lambda_793,  set_cell_as_expr(&local_738085, lp_731419_731424_732546));; 
}

static void __lambda_793(void *data, object self_734554, int argc, object *args) /* object self_734554, object lp_731419_731424_732546 */
 {
 object lp_731419_731424_732546 = args[0];
  
closureN_type c_738038;
object e_738051 [3];
c_738038.hdr.mark = gc_color_red;
 c_738038.hdr.grayed = 0;
c_738038.tag = closureN_tag;
 c_738038.fn = (function_type)__lambda_362;
c_738038.num_args = 1;
c_738038.num_elements = 3;
c_738038.elements = (object *)e_738051;
c_738038.elements[0] = ((closureN)self_734554)->elements[1];
c_738038.elements[1] = ((closureN)self_734554)->elements[2];
c_738038.elements[2] = lp_731419_731424_732546;


closureN_type c_738052;
object e_738081 [4];
c_738052.hdr.mark = gc_color_red;
 c_738052.hdr.grayed = 0;
c_738052.tag = closureN_tag;
 c_738052.fn = (function_type)__lambda_364;
c_738052.num_args = 2;
c_738052.num_elements = 4;
c_738052.elements = (object *)e_738081;
c_738052.elements[0] = ((closureN)self_734554)->elements[0];
c_738052.elements[1] = lp_731419_731424_732546;
c_738052.elements[2] = ((closureN)self_734554)->elements[3];
c_738052.elements[3] = ((closureN)self_734554)->elements[4];

return_direct_with_clo1(data,(closure)&c_738038,__lambda_362,  &c_738052);; 
}

static void __lambda_364(void *data, object self_734555, int argc, object *args) /* object self_734555, object k_733489, object i_731425_732547, object j_731426_732548 */
 {
 object k_733489 = args[0]; object i_731425_732547 = args[1]; object j_731426_732548 = args[2];
    
if( (boolean_f != Cyc_num_fast_eq_op(data, i_731425_732547, ((closureN)self_734555)->elements[0])) ){ 
  return_direct_with_clo1(data,  k_733489, (((closure)  k_733489)->fn),  ((closureN)self_734555)->elements[2]);
} else { 
  
closureN_type c_738059;
object e_738073 [4];
c_738059.hdr.mark = gc_color_red;
 c_738059.hdr.grayed = 0;
c_738059.tag = closureN_tag;
 c_738059.fn = (function_type)__lambda_365;
c_738059.num_args = 1;
c_738059.num_elements = 4;
c_738059.elements = (object *)e_738073;
c_738059.elements[0] = i_731425_732547;
c_738059.elements[1] = j_731426_732548;
c_738059.elements[2] = k_733489;
c_738059.elements[3] = ((closureN)self_734555)->elements[1];




object c_738076 = Cyc_vector_set_cps(data,(closure)&c_738059,((closureN)self_734555)->elements[2], j_731426_732548, Cyc_vector_ref(data, ((closureN)self_734555)->elements[3], i_731425_732547));
return_closcall1(data,(closure)&c_738059,  c_738076);}
;; 
}

static void __lambda_365(void *data, object self_734556, int argc, object *args) /* object self_734556, object r_733491 */
 {

  


complex_num_type local_738067; 

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

static void __lambda_362(void *data, object self_734557, int argc, object *args) /* object self_734557, object r_733488 */
 {
 object r_733488 = args[0];
  
closureN_type c_738040;
object e_738047 [3];
c_738040.hdr.mark = gc_color_red;
 c_738040.hdr.grayed = 0;
c_738040.tag = closureN_tag;
 c_738040.fn = (function_type)__lambda_363;
c_738040.num_args = 1;
c_738040.num_elements = 3;
c_738040.elements = (object *)e_738047;
c_738040.elements[0] = ((closureN)self_734557)->elements[0];
c_738040.elements[1] = ((closureN)self_734557)->elements[1];
c_738040.elements[2] = ((closureN)self_734557)->elements[2];



return_direct_with_clo1(data,(closure)&c_738040,__lambda_363,  Cyc_set_cell(data, ((closureN)self_734557)->elements[2], r_733488));; 
}

static void __lambda_363(void *data, object self_734558, int argc, object *args) /* object self_734558, object r_733487 */
 {

  

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

static void __lambda_347(void *data, object _, int argc, object *args) /* closure _,object k_733466, object elt_121_731385_732525, object v_731386_732526, object maybe_91start_87end_731387_732527_raw, ... */
 {
object k_733466 = args[0]; object elt_121_731385_732525 = args[1]; object v_731386_732526 = args[2];
load_varargs(maybe_91start_87end_731387_732527, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/132.sld:vector-sorted?");

closureN_type c_737942;
object e_738021 [3];
c_737942.hdr.mark = gc_color_red;
 c_737942.hdr.grayed = 0;
c_737942.tag = closureN_tag;
 c_737942.fn = (function_type)__lambda_348;
c_737942.num_args = 1;
c_737942.num_elements = 3;
c_737942.elements = (object *)e_738021;
c_737942.elements[0] = elt_121_731385_732525;
c_737942.elements[1] = k_733466;
c_737942.elements[2] = v_731386_732526;


closureN_type c_738022;
object e_738026 [2];
c_738022.hdr.mark = gc_color_red;
 c_738022.hdr.grayed = 0;
c_738022.tag = closureN_tag;
 c_738022.fn = (function_type)__lambda_357;
c_738022.num_args = 0;
c_738022.num_elements = 2;
c_738022.elements = (object *)e_738026;
c_738022.elements[0] = maybe_91start_87end_731387_732527;
c_738022.elements[1] = v_731386_732526;

return_direct_with_clo1(data,(closure)&c_737942,__lambda_348,  &c_738022);; 
}

static void __lambda_357(void *data, object self_734540, int argc, object *args) /* object self_734540, object k_733480 */
 {
 object k_733480 = args[0];
  return_direct_with_clo3(data,  __glo_vector_91start_87end_srfi_132, (((closure)  __glo_vector_91start_87end_srfi_132)->fn),  k_733480, ((closureN)self_734540)->elements[1], ((closureN)self_734540)->elements[0]);; 
}

static void __lambda_348(void *data, object self_734541, int argc, object *args) /* object self_734541, object r_733467 */
 {
 object r_733467 = args[0];
  
closureN_type c_737944;
object e_737948 [2];
c_737944.hdr.mark = gc_color_red;
 c_737944.hdr.grayed = 0;
c_737944.tag = closureN_tag;
 c_737944.fn = (function_type)__lambda_349;
c_737944.num_args = 1;
c_737944.num_elements = 2;
c_737944.elements = (object *)e_737948;
c_737944.elements[0] = ((closureN)self_734541)->elements[1];
c_737944.elements[1] = r_733467;


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

return_direct_with_clo1(data,(closure)&c_737944,__lambda_349,  &c_737949);; 
}

static void __lambda_350(void *data, object self_734542, int argc, object *args) /* object self_734542, object k_733469, object start_731388_732528, object end_731389_732529 */
 {
 object k_733469 = args[0]; object start_731388_732528 = args[1]; object end_731389_732529 = args[2];
    
if( (boolean_f != Cyc_num_fast_gte_op(data, start_731388_732528, end_731389_732529)) ){ 
  

return_direct_with_clo1(data,  k_733469, (((closure)  k_733469)->fn),  Cyc_num_fast_gte_op(data, start_731388_732528, end_731389_732529));
} else { 
  
closureN_type c_737956;
object e_738013 [4];
c_737956.hdr.mark = gc_color_red;
 c_737956.hdr.grayed = 0;
c_737956.tag = closureN_tag;
 c_737956.fn = (function_type)__lambda_351;
c_737956.num_args = 2;
c_737956.num_elements = 4;
c_737956.elements = (object *)e_738013;
c_737956.elements[0] = ((closureN)self_734542)->elements[0];
c_737956.elements[1] = end_731389_732529;
c_737956.elements[2] = k_733469;
c_737956.elements[3] = ((closureN)self_734542)->elements[1];


complex_num_type local_738016; 


return_direct_with_clo2(data,(closure)&c_737956,__lambda_351,  Cyc_fast_sum(data,&local_738016, start_731388_732528, obj_int2obj(1)), Cyc_vector_ref(data, ((closureN)self_734542)->elements[1], start_731388_732528));}
;; 
}

static void __lambda_351(void *data, object self_734543, int argc, object *args) /* object self_734543, object i_731395_732531, object vi_911_731396_732532 */
 {
 object i_731395_732531 = args[0]; object vi_911_731396_732532 = args[1];
  
closureN_type c_737958;
object e_738012 [6];
c_737958.hdr.mark = gc_color_red;
 c_737958.hdr.grayed = 0;
c_737958.tag = closureN_tag;
 c_737958.fn = (function_type)__lambda_352;
c_737958.num_args = 1;
c_737958.num_elements = 6;
c_737958.elements = (object *)e_738012;
c_737958.elements[0] = ((closureN)self_734543)->elements[0];
c_737958.elements[1] = ((closureN)self_734543)->elements[1];
c_737958.elements[2] = i_731395_732531;
c_737958.elements[3] = ((closureN)self_734543)->elements[2];
c_737958.elements[4] = ((closureN)self_734543)->elements[3];
c_737958.elements[5] = vi_911_731396_732532;

return_direct_with_clo1(data,(closure)&c_737958,__lambda_352,  boolean_f);; 
}

static void __lambda_352(void *data, object self_734544, int argc, object *args) /* object self_734544, object lp_731397_732533 */
 {
 object lp_731397_732533 = args[0];
  
closureN_type c_737960;
object e_738008 [6];
c_737960.hdr.mark = gc_color_red;
 c_737960.hdr.grayed = 0;
c_737960.tag = closureN_tag;
 c_737960.fn = (function_type)__lambda_792;
c_737960.num_args = 1;
c_737960.num_elements = 6;
c_737960.elements = (object *)e_738008;
c_737960.elements[0] = ((closureN)self_734544)->elements[0];
c_737960.elements[1] = ((closureN)self_734544)->elements[1];
c_737960.elements[2] = ((closureN)self_734544)->elements[2];
c_737960.elements[3] = ((closureN)self_734544)->elements[3];
c_737960.elements[4] = ((closureN)self_734544)->elements[4];
c_737960.elements[5] = ((closureN)self_734544)->elements[5];


pair_type local_738011; 
return_direct_with_clo1(data,(closure)&c_737960,__lambda_792,  set_cell_as_expr(&local_738011, lp_731397_732533));; 
}

static void __lambda_792(void *data, object self_734545, int argc, object *args) /* object self_734545, object lp_731397_732533 */
 {
 object lp_731397_732533 = args[0];
  
closureN_type c_737962;
object e_737976 [4];
c_737962.hdr.mark = gc_color_red;
 c_737962.hdr.grayed = 0;
c_737962.tag = closureN_tag;
 c_737962.fn = (function_type)__lambda_353;
c_737962.num_args = 1;
c_737962.num_elements = 4;
c_737962.elements = (object *)e_737976;
c_737962.elements[0] = ((closureN)self_734545)->elements[2];
c_737962.elements[1] = ((closureN)self_734545)->elements[3];
c_737962.elements[2] = lp_731397_732533;
c_737962.elements[3] = ((closureN)self_734545)->elements[5];


closureN_type c_737977;
object e_738007 [4];
c_737977.hdr.mark = gc_color_red;
 c_737977.hdr.grayed = 0;
c_737977.tag = closureN_tag;
 c_737977.fn = (function_type)__lambda_355;
c_737977.num_args = 2;
c_737977.num_elements = 4;
c_737977.elements = (object *)e_738007;
c_737977.elements[0] = ((closureN)self_734545)->elements[0];
c_737977.elements[1] = ((closureN)self_734545)->elements[1];
c_737977.elements[2] = lp_731397_732533;
c_737977.elements[3] = ((closureN)self_734545)->elements[4];

return_direct_with_clo1(data,(closure)&c_737962,__lambda_353,  &c_737977);; 
}

static void __lambda_355(void *data, object self_734546, int argc, object *args) /* object self_734546, object k_733475, object i_731398_732534, object vi_911_731399_732535 */
 {
 object k_733475 = args[0]; object i_731398_732534 = args[1]; object vi_911_731399_732535 = args[2];
    
if( (boolean_f != Cyc_num_fast_gte_op(data, i_731398_732534, ((closureN)self_734546)->elements[1])) ){ 
  

return_direct_with_clo1(data,  k_733475, (((closure)  k_733475)->fn),  Cyc_num_fast_gte_op(data, i_731398_732534, ((closureN)self_734546)->elements[1]));
} else { 
  
closureN_type c_737987;
object e_738003 [4];
c_737987.hdr.mark = gc_color_red;
 c_737987.hdr.grayed = 0;
c_737987.tag = closureN_tag;
 c_737987.fn = (function_type)__lambda_356;
c_737987.num_args = 1;
c_737987.num_elements = 4;
c_737987.elements = (object *)e_738003;
c_737987.elements[0] = i_731398_732534;
c_737987.elements[1] = k_733475;
c_737987.elements[2] = ((closureN)self_734546)->elements[2];
c_737987.elements[3] = ((closureN)self_734546)->elements[3];



return_closcall3(data,  ((closureN)self_734546)->elements[0],  &c_737987, Cyc_vector_ref(data, ((closureN)self_734546)->elements[3], i_731398_732534), vi_911_731399_732535);}
;; 
}

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


complex_num_type local_737997; 


return_closcall3(data,  car(((closureN)self_734547)->elements[2]),  ((closureN)self_734547)->elements[1], Cyc_fast_sum(data,&local_737997, ((closureN)self_734547)->elements[0], obj_int2obj(1)), Cyc_vector_ref(data, ((closureN)self_734547)->elements[3], ((closureN)self_734547)->elements[0]));}
;; 
}

static void __lambda_353(void *data, object self_734548, int argc, object *args) /* object self_734548, object r_733474 */
 {
 object r_733474 = args[0];
  
closureN_type c_737964;
object e_737972 [4];
c_737964.hdr.mark = gc_color_red;
 c_737964.hdr.grayed = 0;
c_737964.tag = closureN_tag;
 c_737964.fn = (function_type)__lambda_354;
c_737964.num_args = 1;
c_737964.num_elements = 4;
c_737964.elements = (object *)e_737972;
c_737964.elements[0] = ((closureN)self_734548)->elements[0];
c_737964.elements[1] = ((closureN)self_734548)->elements[1];
c_737964.elements[2] = ((closureN)self_734548)->elements[2];
c_737964.elements[3] = ((closureN)self_734548)->elements[3];



return_direct_with_clo1(data,(closure)&c_737964,__lambda_354,  Cyc_set_cell(data, ((closureN)self_734548)->elements[2], r_733474));; 
}

static void __lambda_354(void *data, object self_734549, int argc, object *args) /* object self_734549, object r_733473 */
 {

  

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

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

static void __lambda_340(void *data, object _, int argc, object *args) /* closure _,object k_733451, object _121_731367_732515, object list_731368_732516 */
 {
object k_733451 = args[0]; object _121_731367_732515 = args[1]; object list_731368_732516 = args[2];
  Cyc_st_add(data, "srfi/132.sld:list-sorted?");
  complex_num_type local_737867; 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_737867, Cyc_is_pair(list_731368_732516))) ){ 
  
complex_num_type local_737873; 


return_direct_with_clo1(data,  k_733451, (((closure)  k_733451)->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_737873, Cyc_is_pair(list_731368_732516)));
} else { 
  
closureN_type c_737877;
object e_737935 [2];
c_737877.hdr.mark = gc_color_red;
 c_737877.hdr.grayed = 0;
c_737877.tag = closureN_tag;
 c_737877.fn = (function_type)__lambda_341;
c_737877.num_args = 2;
c_737877.num_elements = 2;
c_737877.elements = (object *)e_737935;
c_737877.elements[0] = _121_731367_732515;
c_737877.elements[1] = k_733451;





return_direct_with_clo2(data,(closure)&c_737877,__lambda_341,  Cyc_car(data, list_731368_732516), Cyc_cdr(data, list_731368_732516));}
;; 
}

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

return_direct_with_clo1(data,(closure)&c_737879,__lambda_342,  boolean_f);; 
}

static void __lambda_342(void *data, object self_734534, int argc, object *args) /* object self_734534, object lp_731376_732520 */
 {
 object lp_731376_732520 = args[0];
  
closureN_type c_737881;
object e_737930 [4];
c_737881.hdr.mark = gc_color_red;
 c_737881.hdr.grayed = 0;
c_737881.tag = closureN_tag;
 c_737881.fn = (function_type)__lambda_791;
c_737881.num_args = 1;
c_737881.num_elements = 4;
c_737881.elements = (object *)e_737930;
c_737881.elements[0] = ((closureN)self_734534)->elements[0];
c_737881.elements[1] = ((closureN)self_734534)->elements[1];
c_737881.elements[2] = ((closureN)self_734534)->elements[2];
c_737881.elements[3] = ((closureN)self_734534)->elements[3];


pair_type local_737933; 
return_direct_with_clo1(data,(closure)&c_737881,__lambda_791,  set_cell_as_expr(&local_737933, lp_731376_732520));; 
}

static void __lambda_791(void *data, object self_734535, int argc, object *args) /* object self_734535, object lp_731376_732520 */
 {
 object lp_731376_732520 = args[0];
  
closureN_type c_737883;
object e_737897 [4];
c_737883.hdr.mark = gc_color_red;
 c_737883.hdr.grayed = 0;
c_737883.tag = closureN_tag;
 c_737883.fn = (function_type)__lambda_343;
c_737883.num_args = 1;
c_737883.num_elements = 4;
c_737883.elements = (object *)e_737897;
c_737883.elements[0] = ((closureN)self_734535)->elements[1];
c_737883.elements[1] = lp_731376_732520;
c_737883.elements[2] = ((closureN)self_734535)->elements[2];
c_737883.elements[3] = ((closureN)self_734535)->elements[3];


closureN_type c_737898;
object e_737929 [2];
c_737898.hdr.mark = gc_color_red;
 c_737898.hdr.grayed = 0;
c_737898.tag = closureN_tag;
 c_737898.fn = (function_type)__lambda_345;
c_737898.num_args = 2;
c_737898.num_elements = 2;
c_737898.elements = (object *)e_737929;
c_737898.elements[0] = ((closureN)self_734535)->elements[0];
c_737898.elements[1] = lp_731376_732520;

return_direct_with_clo1(data,(closure)&c_737883,__lambda_343,  &c_737898);; 
}

static void __lambda_345(void *data, object self_734536, int argc, object *args) /* object self_734536, object k_733457, object prev_731377_732521, object tail_731378_732522 */
 {
 object k_733457 = args[0]; object prev_731377_732521 = args[1]; object tail_731378_732522 = args[2];
    complex_num_type local_737901; 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_737901, Cyc_is_pair(tail_731378_732522))) ){ 
  
complex_num_type local_737907; 


return_direct_with_clo1(data,  k_733457, (((closure)  k_733457)->fn),  ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,&local_737907, Cyc_is_pair(tail_731378_732522)));
} else { 
  
closureN_type c_737912;
object e_737926 [3];
c_737912.hdr.mark = gc_color_red;
 c_737912.hdr.grayed = 0;
c_737912.tag = closureN_tag;
 c_737912.fn = (function_type)__lambda_346;
c_737912.num_args = 1;
c_737912.num_elements = 3;
c_737912.elements = (object *)e_737926;
c_737912.elements[0] = k_733457;
c_737912.elements[1] = ((closureN)self_734536)->elements[1];
c_737912.elements[2] = tail_731378_732522;



return_closcall3(data,  ((closureN)self_734536)->elements[0],  &c_737912, Cyc_car(data, tail_731378_732522), prev_731377_732521);}
;; 
}

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





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

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



return_direct_with_clo1(data,(closure)&c_737885,__lambda_344,  Cyc_set_cell(data, ((closureN)self_734538)->elements[1], r_733456));; 
}

static void __lambda_344(void *data, object self_734539, int argc, object *args) /* object self_734539, object r_733455 */
 {

  

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

static void __lambda_307(void *data, object _, int argc, object *args) /* closure _,object k_733409, object _121_731336_732494, object a_731337_732495, object b_731338_732496 */
 {
object k_733409 = args[0]; object _121_731336_732494 = args[1]; object a_731337_732495 = args[2]; object b_731338_732496 = args[3];
  Cyc_st_add(data, "srfi/132.sld:list-merge!");

closureN_type c_737566;
object e_737863 [4];
c_737566.hdr.mark = gc_color_red;
 c_737566.hdr.grayed = 0;
c_737566.tag = closureN_tag;
 c_737566.fn = (function_type)__lambda_308;
c_737566.num_args = 2;
c_737566.num_elements = 4;
c_737566.elements = (object *)e_737863;
c_737566.elements[0] = _121_731336_732494;
c_737566.elements[1] = a_731337_732495;
c_737566.elements[2] = b_731338_732496;
c_737566.elements[3] = k_733409;

return_direct_with_clo2(data,(closure)&c_737566,__lambda_308,  boolean_f, boolean_f);; 
}

static void __lambda_308(void *data, object self_734499, int argc, object *args) /* object self_734499, object scan_91a_731339_732497, object scan_91b_731340_732498 */
 {
 object scan_91a_731339_732497 = args[0]; object scan_91b_731340_732498 = args[1];
  
closureN_type c_737568;
object e_737859 [5];
c_737568.hdr.mark = gc_color_red;
 c_737568.hdr.grayed = 0;
c_737568.tag = closureN_tag;
 c_737568.fn = (function_type)__lambda_790;
c_737568.num_args = 1;
c_737568.num_elements = 5;
c_737568.elements = (object *)e_737859;
c_737568.elements[0] = ((closureN)self_734499)->elements[0];
c_737568.elements[1] = ((closureN)self_734499)->elements[1];
c_737568.elements[2] = ((closureN)self_734499)->elements[2];
c_737568.elements[3] = ((closureN)self_734499)->elements[3];
c_737568.elements[4] = scan_91b_731340_732498;


pair_type local_737862; 
return_direct_with_clo1(data,(closure)&c_737568,__lambda_790,  set_cell_as_expr(&local_737862, scan_91a_731339_732497));; 
}

static void __lambda_790(void *data, object self_734500, int argc, object *args) /* object self_734500, object scan_91a_731339_732497 */
 {
 object scan_91a_731339_732497 = args[0];
  
closureN_type c_737570;
object e_737854 [5];
c_737570.hdr.mark = gc_color_red;
 c_737570.hdr.grayed = 0;
c_737570.tag = closureN_tag;
 c_737570.fn = (function_type)__lambda_789;
c_737570.num_args = 1;
c_737570.num_elements = 5;
c_737570.elements = (object *)e_737854;
c_737570.elements[0] = ((closureN)self_734500)->elements[0];
c_737570.elements[1] = ((closureN)self_734500)->elements[1];
c_737570.elements[2] = ((closureN)self_734500)->elements[2];
c_737570.elements[3] = ((closureN)self_734500)->elements[3];
c_737570.elements[4] = scan_91a_731339_732497;


pair_type local_737857; 
return_direct_with_clo1(data,(closure)&c_737570,__lambda_789,  set_cell_as_expr(&local_737857, ((closureN)self_734500)->elements[4]));; 
}

static void __lambda_789(void *data, object self_734501, int argc, object *args) /* object self_734501, object scan_91b_731340_732498 */
 {
 object scan_91b_731340_732498 = args[0];
  
closureN_type c_737572;
object e_737779 [6];
c_737572.hdr.mark = gc_color_red;
 c_737572.hdr.grayed = 0;
c_737572.tag = closureN_tag;
 c_737572.fn = (function_type)__lambda_309;
c_737572.num_args = 1;
c_737572.num_elements = 6;
c_737572.elements = (object *)e_737779;
c_737572.elements[0] = ((closureN)self_734501)->elements[0];
c_737572.elements[1] = ((closureN)self_734501)->elements[1];
c_737572.elements[2] = ((closureN)self_734501)->elements[2];
c_737572.elements[3] = ((closureN)self_734501)->elements[3];
c_737572.elements[4] = ((closureN)self_734501)->elements[4];
c_737572.elements[5] = scan_91b_731340_732498;


closureN_type c_737780;
object e_737853 [3];
c_737780.hdr.mark = gc_color_red;
 c_737780.hdr.grayed = 0;
c_737780.tag = closureN_tag;
 c_737780.fn = (function_type)__lambda_333;
c_737780.num_args = 5;
c_737780.num_elements = 3;
c_737780.elements = (object *)e_737853;
c_737780.elements[0] = ((closureN)self_734501)->elements[0];
c_737780.elements[1] = ((closureN)self_734501)->elements[4];
c_737780.elements[2] = scan_91b_731340_732498;

return_direct_with_clo1(data,(closure)&c_737572,__lambda_309,  &c_737780);; 
}

static void __lambda_333(void *data, object self_734502, int argc, object *args) /* object self_734502, object k_733440, object prev_731341_732499, object a_731342_732500, object x_731343_732501, object b_731344_732502, object y_731345_732503 */
 {
 object k_733440 = args[0]; object prev_731341_732499 = args[1]; object a_731342_732500 = args[2]; object x_731343_732501 = args[3]; object b_731344_732502 = args[4]; object y_731345_732503 = args[5];
  
closureN_type c_737783;
object e_737852 [8];
c_737783.hdr.mark = gc_color_red;
 c_737783.hdr.grayed = 0;
c_737783.tag = closureN_tag;
 c_737783.fn = (function_type)__lambda_334;
c_737783.num_args = 1;
c_737783.num_elements = 8;
c_737783.elements = (object *)e_737852;
c_737783.elements[0] = a_731342_732500;
c_737783.elements[1] = b_731344_732502;
c_737783.elements[2] = k_733440;
c_737783.elements[3] = prev_731341_732499;
c_737783.elements[4] = ((closureN)self_734502)->elements[1];
c_737783.elements[5] = ((closureN)self_734502)->elements[2];
c_737783.elements[6] = x_731343_732501;
c_737783.elements[7] = y_731345_732503;

return_closcall3(data,  ((closureN)self_734502)->elements[0],  &c_737783, y_731345_732503, x_731343_732501);; 
}

static void __lambda_334(void *data, object self_734503, int argc, object *args) /* object self_734503, object r_733441 */
 {
 object r_733441 = args[0];
  if( (boolean_f != r_733441) ){ 
  
closureN_type c_737785;
object e_737819 [6];
c_737785.hdr.mark = gc_color_red;
 c_737785.hdr.grayed = 0;
c_737785.tag = closureN_tag;
 c_737785.fn = (function_type)__lambda_335;
c_737785.num_args = 1;
c_737785.num_elements = 6;
c_737785.elements = (object *)e_737819;
c_737785.elements[0] = ((closureN)self_734503)->elements[0];
c_737785.elements[1] = ((closureN)self_734503)->elements[1];
c_737785.elements[2] = ((closureN)self_734503)->elements[2];
c_737785.elements[3] = ((closureN)self_734503)->elements[3];
c_737785.elements[4] = ((closureN)self_734503)->elements[5];
c_737785.elements[5] = ((closureN)self_734503)->elements[6];



return_direct_with_clo1(data,(closure)&c_737785,__lambda_335,  Cyc_cdr(data, ((closureN)self_734503)->elements[1]));
} else { 
  
closureN_type c_737824;
object e_737848 [5];
c_737824.hdr.mark = gc_color_red;
 c_737824.hdr.grayed = 0;
c_737824.tag = closureN_tag;
 c_737824.fn = (function_type)__lambda_338;
c_737824.num_args = 1;
c_737824.num_elements = 5;
c_737824.elements = (object *)e_737848;
c_737824.elements[0] = ((closureN)self_734503)->elements[0];
c_737824.elements[1] = ((closureN)self_734503)->elements[1];
c_737824.elements[2] = ((closureN)self_734503)->elements[2];
c_737824.elements[3] = ((closureN)self_734503)->elements[4];
c_737824.elements[4] = ((closureN)self_734503)->elements[7];



return_direct_with_clo1(data,(closure)&c_737824,__lambda_338,  Cyc_cdr(data, ((closureN)self_734503)->elements[0]));}
;; 
}

static void __lambda_338(void *data, object self_734507, int argc, object *args) /* object self_734507, object next_91a_731347_732505 */
 {
 object next_91a_731347_732505 = args[0];
    
if( (boolean_f != Cyc_is_pair(next_91a_731347_732505)) ){ 
  
closureN_type c_737828;
object e_737838 [6];
c_737828.hdr.mark = gc_color_red;
 c_737828.hdr.grayed = 0;
c_737828.tag = closureN_tag;
 c_737828.fn = (function_type)__lambda_339;
c_737828.num_args = 1;
c_737828.num_elements = 6;
c_737828.elements = (object *)e_737838;
c_737828.elements[0] = ((closureN)self_734507)->elements[0];
c_737828.elements[1] = ((closureN)self_734507)->elements[1];
c_737828.elements[2] = ((closureN)self_734507)->elements[2];
c_737828.elements[3] = next_91a_731347_732505;
c_737828.elements[4] = ((closureN)self_734507)->elements[3];
c_737828.elements[5] = ((closureN)self_734507)->elements[4];



return_direct_with_clo1(data,(closure)&c_737828,__lambda_339,  Cyc_car(data, next_91a_731347_732505));
} else { 
  
object c_737845 = Cyc_set_cdr_cps(data,  ((closureN)self_734507)->elements[2],((closureN)self_734507)->elements[0], ((closureN)self_734507)->elements[1]);
return_direct_with_clo1(data,  ((closureN)self_734507)->elements[2], (((closure)  ((closureN)self_734507)->elements[2])->fn),  c_737845);}
;; 
}

static void __lambda_339(void *data, object self_734508, int argc, object *args) /* object self_734508, object r_733448 */
 {
 object r_733448 = args[0];
  

return_closcall6(data,  car(((closureN)self_734508)->elements[4]),  ((closureN)self_734508)->elements[2], ((closureN)self_734508)->elements[0], ((closureN)self_734508)->elements[3], r_733448, ((closureN)self_734508)->elements[1], ((closureN)self_734508)->elements[5]);; 
}

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


object c_737816 = Cyc_set_cdr_cps(data,(closure)&c_737787,((closureN)self_734504)->elements[3], ((closureN)self_734504)->elements[1]);
return_closcall1(data,(closure)&c_737787,  c_737816);; 
}

static void __lambda_336(void *data, object self_734505, int argc, object *args) /* object self_734505, object r_733443 */
 {

    
if( (boolean_f != Cyc_is_pair(((closureN)self_734505)->elements[3])) ){ 
  
closureN_type c_737792;
object e_737802 [6];
c_737792.hdr.mark = gc_color_red;
 c_737792.hdr.grayed = 0;
c_737792.tag = closureN_tag;
 c_737792.fn = (function_type)__lambda_337;
c_737792.num_args = 1;
c_737792.num_elements = 6;
c_737792.elements = (object *)e_737802;
c_737792.elements[0] = ((closureN)self_734505)->elements[0];
c_737792.elements[1] = ((closureN)self_734505)->elements[1];
c_737792.elements[2] = ((closureN)self_734505)->elements[2];
c_737792.elements[3] = ((closureN)self_734505)->elements[3];
c_737792.elements[4] = ((closureN)self_734505)->elements[4];
c_737792.elements[5] = ((closureN)self_734505)->elements[5];



return_direct_with_clo1(data,(closure)&c_737792,__lambda_337,  Cyc_car(data, ((closureN)self_734505)->elements[3]));
} else { 
  
object c_737810 = Cyc_set_cdr_cps(data,  ((closureN)self_734505)->elements[2],((closureN)self_734505)->elements[1], ((closureN)self_734505)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_734505)->elements[2], (((closure)  ((closureN)self_734505)->elements[2])->fn),  c_737810);}
;; 
}

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

return_closcall6(data,  car(((closureN)self_734506)->elements[4]),  ((closureN)self_734506)->elements[2], ((closureN)self_734506)->elements[1], ((closureN)self_734506)->elements[0], ((closureN)self_734506)->elements[5], ((closureN)self_734506)->elements[3], r_733445);; 
}

static void __lambda_309(void *data, object self_734509, int argc, object *args) /* object self_734509, object r_733439 */
 {
 object r_733439 = args[0];
  
closureN_type c_737574;
object e_737775 [6];
c_737574.hdr.mark = gc_color_red;
 c_737574.hdr.grayed = 0;
c_737574.tag = closureN_tag;
 c_737574.fn = (function_type)__lambda_310;
c_737574.num_args = 1;
c_737574.num_elements = 6;
c_737574.elements = (object *)e_737775;
c_737574.elements[0] = ((closureN)self_734509)->elements[0];
c_737574.elements[1] = ((closureN)self_734509)->elements[1];
c_737574.elements[2] = ((closureN)self_734509)->elements[2];
c_737574.elements[3] = ((closureN)self_734509)->elements[3];
c_737574.elements[4] = ((closureN)self_734509)->elements[4];
c_737574.elements[5] = ((closureN)self_734509)->elements[5];



return_direct_with_clo1(data,(closure)&c_737574,__lambda_310,  Cyc_set_cell(data, ((closureN)self_734509)->elements[4], r_733439));; 
}

static void __lambda_310(void *data, object self_734510, int argc, object *args) /* object self_734510, object r_733410 */
 {

  
closureN_type c_737576;
object e_737700 [6];
c_737576.hdr.mark = gc_color_red;
 c_737576.hdr.grayed = 0;
c_737576.tag = closureN_tag;
 c_737576.fn = (function_type)__lambda_311;
c_737576.num_args = 1;
c_737576.num_elements = 6;
c_737576.elements = (object *)e_737700;
c_737576.elements[0] = ((closureN)self_734510)->elements[0];
c_737576.elements[1] = ((closureN)self_734510)->elements[1];
c_737576.elements[2] = ((closureN)self_734510)->elements[2];
c_737576.elements[3] = ((closureN)self_734510)->elements[3];
c_737576.elements[4] = ((closureN)self_734510)->elements[4];
c_737576.elements[5] = ((closureN)self_734510)->elements[5];


closureN_type c_737701;
object e_737774 [3];
c_737701.hdr.mark = gc_color_red;
 c_737701.hdr.grayed = 0;
c_737701.tag = closureN_tag;
 c_737701.fn = (function_type)__lambda_326;
c_737701.num_args = 5;
c_737701.num_elements = 3;
c_737701.elements = (object *)e_737774;
c_737701.elements[0] = ((closureN)self_734510)->elements[0];
c_737701.elements[1] = ((closureN)self_734510)->elements[4];
c_737701.elements[2] = ((closureN)self_734510)->elements[5];

return_direct_with_clo1(data,(closure)&c_737576,__lambda_311,  &c_737701);; 
}

static void __lambda_326(void *data, object self_734511, int argc, object *args) /* object self_734511, object k_733430, object prev_731348_732506, object a_731349_732507, object x_731350_732508, object b_731351_732509, object y_731352_732510 */
 {
 object k_733430 = args[0]; object prev_731348_732506 = args[1]; object a_731349_732507 = args[2]; object x_731350_732508 = args[3]; object b_731351_732509 = args[4]; object y_731352_732510 = args[5];
  
closureN_type c_737704;
object e_737773 [8];
c_737704.hdr.mark = gc_color_red;
 c_737704.hdr.grayed = 0;
c_737704.tag = closureN_tag;
 c_737704.fn = (function_type)__lambda_327;
c_737704.num_args = 1;
c_737704.num_elements = 8;
c_737704.elements = (object *)e_737773;
c_737704.elements[0] = a_731349_732507;
c_737704.elements[1] = b_731351_732509;
c_737704.elements[2] = k_733430;
c_737704.elements[3] = prev_731348_732506;
c_737704.elements[4] = ((closureN)self_734511)->elements[1];
c_737704.elements[5] = ((closureN)self_734511)->elements[2];
c_737704.elements[6] = x_731350_732508;
c_737704.elements[7] = y_731352_732510;

return_closcall3(data,  ((closureN)self_734511)->elements[0],  &c_737704, y_731352_732510, x_731350_732508);; 
}

static void __lambda_327(void *data, object self_734512, int argc, object *args) /* object self_734512, object r_733431 */
 {
 object r_733431 = args[0];
  if( (boolean_f != r_733431) ){ 
  
closureN_type c_737706;
object e_737730 [5];
c_737706.hdr.mark = gc_color_red;
 c_737706.hdr.grayed = 0;
c_737706.tag = closureN_tag;
 c_737706.fn = (function_type)__lambda_328;
c_737706.num_args = 1;
c_737706.num_elements = 5;
c_737706.elements = (object *)e_737730;
c_737706.elements[0] = ((closureN)self_734512)->elements[0];
c_737706.elements[1] = ((closureN)self_734512)->elements[1];
c_737706.elements[2] = ((closureN)self_734512)->elements[2];
c_737706.elements[3] = ((closureN)self_734512)->elements[5];
c_737706.elements[4] = ((closureN)self_734512)->elements[6];



return_direct_with_clo1(data,(closure)&c_737706,__lambda_328,  Cyc_cdr(data, ((closureN)self_734512)->elements[1]));
} else { 
  
closureN_type c_737735;
object e_737769 [6];
c_737735.hdr.mark = gc_color_red;
 c_737735.hdr.grayed = 0;
c_737735.tag = closureN_tag;
 c_737735.fn = (function_type)__lambda_330;
c_737735.num_args = 1;
c_737735.num_elements = 6;
c_737735.elements = (object *)e_737769;
c_737735.elements[0] = ((closureN)self_734512)->elements[0];
c_737735.elements[1] = ((closureN)self_734512)->elements[1];
c_737735.elements[2] = ((closureN)self_734512)->elements[2];
c_737735.elements[3] = ((closureN)self_734512)->elements[3];
c_737735.elements[4] = ((closureN)self_734512)->elements[4];
c_737735.elements[5] = ((closureN)self_734512)->elements[7];



return_direct_with_clo1(data,(closure)&c_737735,__lambda_330,  Cyc_cdr(data, ((closureN)self_734512)->elements[0]));}
;; 
}

static void __lambda_330(void *data, object self_734515, int argc, object *args) /* object self_734515, object next_91a_731354_732512 */
 {
 object next_91a_731354_732512 = args[0];
  
closureN_type c_737737;
object e_737763 [6];
c_737737.hdr.mark = gc_color_red;
 c_737737.hdr.grayed = 0;
c_737737.tag = closureN_tag;
 c_737737.fn = (function_type)__lambda_331;
c_737737.num_args = 1;
c_737737.num_elements = 6;
c_737737.elements = (object *)e_737763;
c_737737.elements[0] = ((closureN)self_734515)->elements[0];
c_737737.elements[1] = ((closureN)self_734515)->elements[1];
c_737737.elements[2] = ((closureN)self_734515)->elements[2];
c_737737.elements[3] = next_91a_731354_732512;
c_737737.elements[4] = ((closureN)self_734515)->elements[4];
c_737737.elements[5] = ((closureN)self_734515)->elements[5];


object c_737766 = Cyc_set_cdr_cps(data,(closure)&c_737737,((closureN)self_734515)->elements[3], ((closureN)self_734515)->elements[0]);
return_closcall1(data,(closure)&c_737737,  c_737766);; 
}

static void __lambda_331(void *data, object self_734516, int argc, object *args) /* object self_734516, object r_733436 */
 {

    
if( (boolean_f != Cyc_is_pair(((closureN)self_734516)->elements[3])) ){ 
  
closureN_type c_737742;
object e_737752 [6];
c_737742.hdr.mark = gc_color_red;
 c_737742.hdr.grayed = 0;
c_737742.tag = closureN_tag;
 c_737742.fn = (function_type)__lambda_332;
c_737742.num_args = 1;
c_737742.num_elements = 6;
c_737742.elements = (object *)e_737752;
c_737742.elements[0] = ((closureN)self_734516)->elements[0];
c_737742.elements[1] = ((closureN)self_734516)->elements[1];
c_737742.elements[2] = ((closureN)self_734516)->elements[2];
c_737742.elements[3] = ((closureN)self_734516)->elements[3];
c_737742.elements[4] = ((closureN)self_734516)->elements[4];
c_737742.elements[5] = ((closureN)self_734516)->elements[5];



return_direct_with_clo1(data,(closure)&c_737742,__lambda_332,  Cyc_car(data, ((closureN)self_734516)->elements[3]));
} else { 
  
object c_737760 = Cyc_set_cdr_cps(data,  ((closureN)self_734516)->elements[2],((closureN)self_734516)->elements[0], ((closureN)self_734516)->elements[1]);
return_direct_with_clo1(data,  ((closureN)self_734516)->elements[2], (((closure)  ((closureN)self_734516)->elements[2])->fn),  c_737760);}
;; 
}

static void __lambda_332(void *data, object self_734517, int argc, object *args) /* object self_734517, object r_733438 */
 {
 object r_733438 = args[0];
  

return_closcall6(data,  car(((closureN)self_734517)->elements[4]),  ((closureN)self_734517)->elements[2], ((closureN)self_734517)->elements[0], ((closureN)self_734517)->elements[3], r_733438, ((closureN)self_734517)->elements[1], ((closureN)self_734517)->elements[5]);; 
}

static void __lambda_328(void *data, object self_734513, int argc, object *args) /* object self_734513, object next_91b_731353_732511 */
 {
 object next_91b_731353_732511 = args[0];
    
if( (boolean_f != Cyc_is_pair(next_91b_731353_732511)) ){ 
  
closureN_type c_737710;
object e_737720 [6];
c_737710.hdr.mark = gc_color_red;
 c_737710.hdr.grayed = 0;
c_737710.tag = closureN_tag;
 c_737710.fn = (function_type)__lambda_329;
c_737710.num_args = 1;
c_737710.num_elements = 6;
c_737710.elements = (object *)e_737720;
c_737710.elements[0] = ((closureN)self_734513)->elements[0];
c_737710.elements[1] = ((closureN)self_734513)->elements[1];
c_737710.elements[2] = ((closureN)self_734513)->elements[2];
c_737710.elements[3] = next_91b_731353_732511;
c_737710.elements[4] = ((closureN)self_734513)->elements[3];
c_737710.elements[5] = ((closureN)self_734513)->elements[4];



return_direct_with_clo1(data,(closure)&c_737710,__lambda_329,  Cyc_car(data, next_91b_731353_732511));
} else { 
  
object c_737727 = Cyc_set_cdr_cps(data,  ((closureN)self_734513)->elements[2],((closureN)self_734513)->elements[1], ((closureN)self_734513)->elements[0]);
return_direct_with_clo1(data,  ((closureN)self_734513)->elements[2], (((closure)  ((closureN)self_734513)->elements[2])->fn),  c_737727);}
;; 
}

static void __lambda_329(void *data, object self_734514, int argc, object *args) /* object self_734514, object r_733434 */
 {
 object r_733434 = args[0];
  

return_closcall6(data,  car(((closureN)self_734514)->elements[4]),  ((closureN)self_734514)->elements[2], ((closureN)self_734514)->elements[1], ((closureN)self_734514)->elements[0], ((closureN)self_734514)->elements[5], ((closureN)self_734514)->elements[3], r_733434);; 
}

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



return_direct_with_clo1(data,(closure)&c_737578,__lambda_312,  Cyc_set_cell(data, ((closureN)self_734518)->elements[5], r_733429));; 
}

static void __lambda_312(void *data, object self_734519, int argc, object *args) /* object self_734519, object r_733411 */
 {

    
if( (boolean_f != Cyc_is_pair(((closureN)self_734519)->elements[1])) ){ 
    
if( (boolean_f != Cyc_is_pair(((closureN)self_734519)->elements[2])) ){ 
  
closureN_type c_737586;
object e_737686 [6];
c_737586.hdr.mark = gc_color_red;
 c_737586.hdr.grayed = 0;
c_737586.tag = closureN_tag;
 c_737586.fn = (function_type)__lambda_313;
c_737586.num_args = 1;
c_737586.num_elements = 6;
c_737586.elements = (object *)e_737686;
c_737586.elements[0] = ((closureN)self_734519)->elements[0];
c_737586.elements[1] = ((closureN)self_734519)->elements[1];
c_737586.elements[2] = ((closureN)self_734519)->elements[2];
c_737586.elements[3] = ((closureN)self_734519)->elements[3];
c_737586.elements[4] = ((closureN)self_734519)->elements[4];
c_737586.elements[5] = ((closureN)self_734519)->elements[5];



return_direct_with_clo1(data,(closure)&c_737586,__lambda_313,  Cyc_car(data, ((closureN)self_734519)->elements[2]));
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734519)->elements[3], (((closure)  ((closureN)self_734519)->elements[3])->fn),  ((closureN)self_734519)->elements[1]);}
;
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734519)->elements[3], (((closure)  ((closureN)self_734519)->elements[3])->fn),  ((closureN)self_734519)->elements[2]);}
;; 
}

static void __lambda_313(void *data, object self_734520, int argc, object *args) /* object self_734520, object r_733427 */
 {
 object r_733427 = args[0];
  
closureN_type c_737588;
object e_737682 [7];
c_737588.hdr.mark = gc_color_red;
 c_737588.hdr.grayed = 0;
c_737588.tag = closureN_tag;
 c_737588.fn = (function_type)__lambda_314;
c_737588.num_args = 1;
c_737588.num_elements = 7;
c_737588.elements = (object *)e_737682;
c_737588.elements[0] = ((closureN)self_734520)->elements[0];
c_737588.elements[1] = ((closureN)self_734520)->elements[1];
c_737588.elements[2] = ((closureN)self_734520)->elements[2];
c_737588.elements[3] = ((closureN)self_734520)->elements[3];
c_737588.elements[4] = r_733427;
c_737588.elements[5] = ((closureN)self_734520)->elements[4];
c_737588.elements[6] = ((closureN)self_734520)->elements[5];



return_direct_with_clo1(data,(closure)&c_737588,__lambda_314,  Cyc_car(data, ((closureN)self_734520)->elements[1]));; 
}

static void __lambda_314(void *data, object self_734521, int argc, object *args) /* object self_734521, object r_733428 */
 {
 object r_733428 = args[0];
  
closureN_type c_737591;
object e_737680 [5];
c_737591.hdr.mark = gc_color_red;
 c_737591.hdr.grayed = 0;
c_737591.tag = closureN_tag;
 c_737591.fn = (function_type)__lambda_315;
c_737591.num_args = 1;
c_737591.num_elements = 5;
c_737591.elements = (object *)e_737680;
c_737591.elements[0] = ((closureN)self_734521)->elements[1];
c_737591.elements[1] = ((closureN)self_734521)->elements[2];
c_737591.elements[2] = ((closureN)self_734521)->elements[3];
c_737591.elements[3] = ((closureN)self_734521)->elements[5];
c_737591.elements[4] = ((closureN)self_734521)->elements[6];

return_closcall3(data,  ((closureN)self_734521)->elements[0],  &c_737591, ((closureN)self_734521)->elements[4], r_733428);; 
}

static void __lambda_315(void *data, object self_734522, int argc, object *args) /* object self_734522, object r_733414 */
 {
 object r_733414 = args[0];
  if( (boolean_f != r_733414) ){ 
  
closureN_type c_737593;
object e_737632 [4];
c_737593.hdr.mark = gc_color_red;
 c_737593.hdr.grayed = 0;
c_737593.tag = closureN_tag;
 c_737593.fn = (function_type)__lambda_316;
c_737593.num_args = 1;
c_737593.num_elements = 4;
c_737593.elements = (object *)e_737632;
c_737593.elements[0] = ((closureN)self_734522)->elements[0];
c_737593.elements[1] = ((closureN)self_734522)->elements[1];
c_737593.elements[2] = ((closureN)self_734522)->elements[2];
c_737593.elements[3] = ((closureN)self_734522)->elements[4];



return_direct_with_clo1(data,(closure)&c_737593,__lambda_316,  Cyc_cdr(data, ((closureN)self_734522)->elements[1]));
} else { 
  
closureN_type c_737637;
object e_737676 [4];
c_737637.hdr.mark = gc_color_red;
 c_737637.hdr.grayed = 0;
c_737637.tag = closureN_tag;
 c_737637.fn = (function_type)__lambda_321;
c_737637.num_args = 1;
c_737637.num_elements = 4;
c_737637.elements = (object *)e_737676;
c_737637.elements[0] = ((closureN)self_734522)->elements[0];
c_737637.elements[1] = ((closureN)self_734522)->elements[1];
c_737637.elements[2] = ((closureN)self_734522)->elements[2];
c_737637.elements[3] = ((closureN)self_734522)->elements[3];



return_direct_with_clo1(data,(closure)&c_737637,__lambda_321,  Cyc_cdr(data, ((closureN)self_734522)->elements[0]));}
;; 
}

static void __lambda_321(void *data, object self_734528, int argc, object *args) /* object self_734528, object next_91a_731366_732514 */
 {
 object next_91a_731366_732514 = args[0];
  
closureN_type c_737639;
object e_737670 [4];
c_737639.hdr.mark = gc_color_red;
 c_737639.hdr.grayed = 0;
c_737639.tag = closureN_tag;
 c_737639.fn = (function_type)__lambda_322;
c_737639.num_args = 0;
c_737639.num_elements = 4;
c_737639.elements = (object *)e_737670;
c_737639.elements[0] = ((closureN)self_734528)->elements[0];
c_737639.elements[1] = ((closureN)self_734528)->elements[1];
c_737639.elements[2] = next_91a_731366_732514;
c_737639.elements[3] = ((closureN)self_734528)->elements[3];


closureN_type c_737671;
object e_737675 [2];
c_737671.hdr.mark = gc_color_red;
 c_737671.hdr.grayed = 0;
c_737671.tag = closureN_tag;
 c_737671.fn = (function_type)__lambda_325;
c_737671.num_args = 1;
c_737671.num_elements = 2;
c_737671.elements = (object *)e_737675;
c_737671.elements[0] = ((closureN)self_734528)->elements[0];
c_737671.elements[1] = ((closureN)self_734528)->elements[2];

return_direct_with_clo1(data,(closure)&c_737639,__lambda_322,  &c_737671);; 
}

static void __lambda_325(void *data, object self_734529, int argc, object *args) /* object self_734529, object r_733421 */
 {

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

static void __lambda_322(void *data, object self_734530, int argc, object *args) /* object self_734530, object k_733423 */
 {
 object k_733423 = args[0];
    
if( (boolean_f != Cyc_is_null(((closureN)self_734530)->elements[2])) ){ 
  
object c_737646 = Cyc_set_cdr_cps(data,  k_733423,((closureN)self_734530)->elements[0], ((closureN)self_734530)->elements[1]);
return_direct_with_clo1(data,  k_733423, (((closure)  k_733423)->fn),  c_737646);
} else { 
  
closureN_type c_737650;
object e_737666 [5];
c_737650.hdr.mark = gc_color_red;
 c_737650.hdr.grayed = 0;
c_737650.tag = closureN_tag;
 c_737650.fn = (function_type)__lambda_323;
c_737650.num_args = 1;
c_737650.num_elements = 5;
c_737650.elements = (object *)e_737666;
c_737650.elements[0] = ((closureN)self_734530)->elements[0];
c_737650.elements[1] = ((closureN)self_734530)->elements[1];
c_737650.elements[2] = k_733423;
c_737650.elements[3] = ((closureN)self_734530)->elements[2];
c_737650.elements[4] = ((closureN)self_734530)->elements[3];



return_direct_with_clo1(data,(closure)&c_737650,__lambda_323,  Cyc_car(data, ((closureN)self_734530)->elements[2]));}
;; 
}

static void __lambda_323(void *data, object self_734531, int argc, object *args) /* object self_734531, object r_733425 */
 {
 object r_733425 = args[0];
  
closureN_type c_737652;
object e_737662 [6];
c_737652.hdr.mark = gc_color_red;
 c_737652.hdr.grayed = 0;
c_737652.tag = closureN_tag;
 c_737652.fn = (function_type)__lambda_324;
c_737652.num_args = 1;
c_737652.num_elements = 6;
c_737652.elements = (object *)e_737662;
c_737652.elements[0] = ((closureN)self_734531)->elements[0];
c_737652.elements[1] = ((closureN)self_734531)->elements[1];
c_737652.elements[2] = ((closureN)self_734531)->elements[2];
c_737652.elements[3] = ((closureN)self_734531)->elements[3];
c_737652.elements[4] = r_733425;
c_737652.elements[5] = ((closureN)self_734531)->elements[4];



return_direct_with_clo1(data,(closure)&c_737652,__lambda_324,  Cyc_car(data, ((closureN)self_734531)->elements[1]));; 
}

static void __lambda_324(void *data, object self_734532, int argc, object *args) /* object self_734532, object r_733426 */
 {
 object r_733426 = args[0];
  

return_closcall6(data,  car(((closureN)self_734532)->elements[5]),  ((closureN)self_734532)->elements[2], ((closureN)self_734532)->elements[0], ((closureN)self_734532)->elements[3], ((closureN)self_734532)->elements[4], ((closureN)self_734532)->elements[1], r_733426);; 
}

static void __lambda_316(void *data, object self_734523, int argc, object *args) /* object self_734523, object next_91b_731364_732513 */
 {
 object next_91b_731364_732513 = args[0];
  
closureN_type c_737595;
object e_737626 [4];
c_737595.hdr.mark = gc_color_red;
 c_737595.hdr.grayed = 0;
c_737595.tag = closureN_tag;
 c_737595.fn = (function_type)__lambda_317;
c_737595.num_args = 0;
c_737595.num_elements = 4;
c_737595.elements = (object *)e_737626;
c_737595.elements[0] = ((closureN)self_734523)->elements[0];
c_737595.elements[1] = ((closureN)self_734523)->elements[1];
c_737595.elements[2] = next_91b_731364_732513;
c_737595.elements[3] = ((closureN)self_734523)->elements[3];


closureN_type c_737627;
object e_737631 [2];
c_737627.hdr.mark = gc_color_red;
 c_737627.hdr.grayed = 0;
c_737627.tag = closureN_tag;
 c_737627.fn = (function_type)__lambda_320;
c_737627.num_args = 1;
c_737627.num_elements = 2;
c_737627.elements = (object *)e_737631;
c_737627.elements[0] = ((closureN)self_734523)->elements[1];
c_737627.elements[1] = ((closureN)self_734523)->elements[2];

return_direct_with_clo1(data,(closure)&c_737595,__lambda_317,  &c_737627);; 
}

static void __lambda_320(void *data, object self_734524, int argc, object *args) /* object self_734524, object r_733415 */
 {

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

static void __lambda_317(void *data, object self_734525, int argc, object *args) /* object self_734525, object k_733417 */
 {
 object k_733417 = args[0];
    
if( (boolean_f != Cyc_is_null(((closureN)self_734525)->elements[2])) ){ 
  
object c_737602 = Cyc_set_cdr_cps(data,  k_733417,((closureN)self_734525)->elements[1], ((closureN)self_734525)->elements[0]);
return_direct_with_clo1(data,  k_733417, (((closure)  k_733417)->fn),  c_737602);
} else { 
  
closureN_type c_737606;
object e_737622 [5];
c_737606.hdr.mark = gc_color_red;
 c_737606.hdr.grayed = 0;
c_737606.tag = closureN_tag;
 c_737606.fn = (function_type)__lambda_318;
c_737606.num_args = 1;
c_737606.num_elements = 5;
c_737606.elements = (object *)e_737622;
c_737606.elements[0] = ((closureN)self_734525)->elements[0];
c_737606.elements[1] = ((closureN)self_734525)->elements[1];
c_737606.elements[2] = k_733417;
c_737606.elements[3] = ((closureN)self_734525)->elements[2];
c_737606.elements[4] = ((closureN)self_734525)->elements[3];



return_direct_with_clo1(data,(closure)&c_737606,__lambda_318,  Cyc_car(data, ((closureN)self_734525)->elements[0]));}
;; 
}

static void __lambda_318(void *data, object self_734526, int argc, object *args) /* object self_734526, object r_733419 */
 {
 object r_733419 = args[0];
  
closureN_type c_737608;
object e_737618 [6];
c_737608.hdr.mark = gc_color_red;
 c_737608.hdr.grayed = 0;
c_737608.tag = closureN_tag;
 c_737608.fn = (function_type)__lambda_319;
c_737608.num_args = 1;
c_737608.num_elements = 6;
c_737608.elements = (object *)e_737618;
c_737608.elements[0] = ((closureN)self_734526)->elements[0];
c_737608.elements[1] = ((closureN)self_734526)->elements[1];
c_737608.elements[2] = ((closureN)self_734526)->elements[2];
c_737608.elements[3] = ((closureN)self_734526)->elements[3];
c_737608.elements[4] = r_733419;
c_737608.elements[5] = ((closureN)self_734526)->elements[4];



return_direct_with_clo1(data,(closure)&c_737608,__lambda_319,  Cyc_car(data, ((closureN)self_734526)->elements[3]));; 
}

static void __lambda_319(void *data, object self_734527, int argc, object *args) /* object self_734527, object r_733420 */
 {
 object r_733420 = args[0];
  

return_closcall6(data,  car(((closureN)self_734527)->elements[5]),  ((closureN)self_734527)->elements[2], ((closureN)self_734527)->elements[1], ((closureN)self_734527)->elements[0], ((closureN)self_734527)->elements[4], ((closureN)self_734527)->elements[3], r_733420);; 
}

static void __lambda_294(void *data, object _, int argc, object *args) /* closure _,object k_733390, object _121_731314_732480, object a_731315_732481, object b_731316_732482 */
 {
object k_733390 = args[0]; object _121_731314_732480 = args[1]; object a_731315_732481 = args[2]; object b_731316_732482 = args[3];
  Cyc_st_add(data, "srfi/132.sld:list-merge");
  
if( (boolean_f != Cyc_is_pair(a_731315_732481)) ){ 
    
if( (boolean_f != Cyc_is_pair(b_731316_732482)) ){ 
  
closureN_type c_737439;
object e_737559 [4];
c_737439.hdr.mark = gc_color_red;
 c_737439.hdr.grayed = 0;
c_737439.tag = closureN_tag;
 c_737439.fn = (function_type)__lambda_295;
c_737439.num_args = 1;
c_737439.num_elements = 4;
c_737439.elements = (object *)e_737559;
c_737439.elements[0] = _121_731314_732480;
c_737439.elements[1] = a_731315_732481;
c_737439.elements[2] = b_731316_732482;
c_737439.elements[3] = k_733390;



return_direct_with_clo1(data,(closure)&c_737439,__lambda_295,  Cyc_car(data, a_731315_732481));
} else { 
  return_direct_with_clo1(data,  k_733390, (((closure)  k_733390)->fn),  a_731315_732481);}
;
} else { 
  return_direct_with_clo1(data,  k_733390, (((closure)  k_733390)->fn),  b_731316_732482);}
;; 
}

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



return_direct_with_clo1(data,(closure)&c_737441,__lambda_296,  Cyc_car(data, ((closureN)self_734486)->elements[2]));; 
}

static void __lambda_296(void *data, object self_734487, int argc, object *args) /* object self_734487, object r_733394 */
 {
 object r_733394 = args[0];
  
closureN_type c_737443;
object e_737551 [2];
c_737443.hdr.mark = gc_color_red;
 c_737443.hdr.grayed = 0;
c_737443.tag = closureN_tag;
 c_737443.fn = (function_type)__lambda_297;
c_737443.num_args = 4;
c_737443.num_elements = 2;
c_737443.elements = (object *)e_737551;
c_737443.elements[0] = ((closureN)self_734487)->elements[0];
c_737443.elements[1] = ((closureN)self_734487)->elements[3];

return_direct_with_clo4(data,(closure)&c_737443,__lambda_297,  ((closureN)self_734487)->elements[4], ((closureN)self_734487)->elements[1], r_733394, ((closureN)self_734487)->elements[2]);; 
}

static void __lambda_297(void *data, object self_734488, int argc, object *args) /* object self_734488, object x_731325_732483, object a_731326_732484, object y_731327_732485, object b_731328_732486 */
 {
 object x_731325_732483 = args[0]; object a_731326_732484 = args[1]; object y_731327_732485 = args[2]; object b_731328_732486 = args[3];
  
closureN_type c_737445;
object e_737550 [6];
c_737445.hdr.mark = gc_color_red;
 c_737445.hdr.grayed = 0;
c_737445.tag = closureN_tag;
 c_737445.fn = (function_type)__lambda_298;
c_737445.num_args = 1;
c_737445.num_elements = 6;
c_737445.elements = (object *)e_737550;
c_737445.elements[0] = ((closureN)self_734488)->elements[0];
c_737445.elements[1] = a_731326_732484;
c_737445.elements[2] = b_731328_732486;
c_737445.elements[3] = ((closureN)self_734488)->elements[1];
c_737445.elements[4] = x_731325_732483;
c_737445.elements[5] = y_731327_732485;

return_direct_with_clo1(data,(closure)&c_737445,__lambda_298,  boolean_f);; 
}

static void __lambda_298(void *data, object self_734489, int argc, object *args) /* object self_734489, object recur_731329_732487 */
 {
 object recur_731329_732487 = args[0];
  
closureN_type c_737447;
object e_737546 [6];
c_737447.hdr.mark = gc_color_red;
 c_737447.hdr.grayed = 0;
c_737447.tag = closureN_tag;
 c_737447.fn = (function_type)__lambda_788;
c_737447.num_args = 1;
c_737447.num_elements = 6;
c_737447.elements = (object *)e_737546;
c_737447.elements[0] = ((closureN)self_734489)->elements[0];
c_737447.elements[1] = ((closureN)self_734489)->elements[1];
c_737447.elements[2] = ((closureN)self_734489)->elements[2];
c_737447.elements[3] = ((closureN)self_734489)->elements[3];
c_737447.elements[4] = ((closureN)self_734489)->elements[4];
c_737447.elements[5] = ((closureN)self_734489)->elements[5];


pair_type local_737549; 
return_direct_with_clo1(data,(closure)&c_737447,__lambda_788,  set_cell_as_expr(&local_737549, recur_731329_732487));; 
}

static void __lambda_788(void *data, object self_734490, int argc, object *args) /* object self_734490, object recur_731329_732487 */
 {
 object recur_731329_732487 = args[0];
  
closureN_type c_737449;
object e_737465 [6];
c_737449.hdr.mark = gc_color_red;
 c_737449.hdr.grayed = 0;
c_737449.tag = closureN_tag;
 c_737449.fn = (function_type)__lambda_299;
c_737449.num_args = 1;
c_737449.num_elements = 6;
c_737449.elements = (object *)e_737465;
c_737449.elements[0] = ((closureN)self_734490)->elements[1];
c_737449.elements[1] = ((closureN)self_734490)->elements[2];
c_737449.elements[2] = ((closureN)self_734490)->elements[3];
c_737449.elements[3] = recur_731329_732487;
c_737449.elements[4] = ((closureN)self_734490)->elements[4];
c_737449.elements[5] = ((closureN)self_734490)->elements[5];


closureN_type c_737466;
object e_737545 [2];
c_737466.hdr.mark = gc_color_red;
 c_737466.hdr.grayed = 0;
c_737466.tag = closureN_tag;
 c_737466.fn = (function_type)__lambda_301;
c_737466.num_args = 4;
c_737466.num_elements = 2;
c_737466.elements = (object *)e_737545;
c_737466.elements[0] = ((closureN)self_734490)->elements[0];
c_737466.elements[1] = recur_731329_732487;

return_direct_with_clo1(data,(closure)&c_737449,__lambda_299,  &c_737466);; 
}

static void __lambda_301(void *data, object self_734491, int argc, object *args) /* object self_734491, object k_733397, object x_731330_732488, object a_731331_732489, object y_731332_732490, object b_731333_732491 */
 {
 object k_733397 = args[0]; object x_731330_732488 = args[1]; object a_731331_732489 = args[2]; object y_731332_732490 = args[3]; object b_731333_732491 = args[4];
  
closureN_type c_737469;
object e_737544 [6];
c_737469.hdr.mark = gc_color_red;
 c_737469.hdr.grayed = 0;
c_737469.tag = closureN_tag;
 c_737469.fn = (function_type)__lambda_302;
c_737469.num_args = 1;
c_737469.num_elements = 6;
c_737469.elements = (object *)e_737544;
c_737469.elements[0] = a_731331_732489;
c_737469.elements[1] = b_731333_732491;
c_737469.elements[2] = k_733397;
c_737469.elements[3] = ((closureN)self_734491)->elements[1];
c_737469.elements[4] = x_731330_732488;
c_737469.elements[5] = y_731332_732490;

return_closcall3(data,  ((closureN)self_734491)->elements[0],  &c_737469, y_731332_732490, x_731330_732488);; 
}

static void __lambda_302(void *data, object self_734492, int argc, object *args) /* object self_734492, object r_733398 */
 {
 object r_733398 = args[0];
  if( (boolean_f != r_733398) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_734492)->elements[1]))) ){ 
  
closureN_type c_737476;
object e_737494 [6];
c_737476.hdr.mark = gc_color_red;
 c_737476.hdr.grayed = 0;
c_737476.tag = closureN_tag;
 c_737476.fn = (function_type)__lambda_303;
c_737476.num_args = 1;
c_737476.num_elements = 6;
c_737476.elements = (object *)e_737494;
c_737476.elements[0] = ((closureN)self_734492)->elements[0];
c_737476.elements[1] = ((closureN)self_734492)->elements[1];
c_737476.elements[2] = ((closureN)self_734492)->elements[2];
c_737476.elements[3] = ((closureN)self_734492)->elements[3];
c_737476.elements[4] = ((closureN)self_734492)->elements[4];
c_737476.elements[5] = ((closureN)self_734492)->elements[5];





return_direct_with_clo1(data,(closure)&c_737476,__lambda_303,  Cyc_car(data, Cyc_cdr(data, ((closureN)self_734492)->elements[1])));
} else { 
  
pair_type local_737504; 
return_direct_with_clo1(data,  ((closureN)self_734492)->elements[2], (((closure)  ((closureN)self_734492)->elements[2])->fn),  set_pair_as_expr(&local_737504, ((closureN)self_734492)->elements[5], ((closureN)self_734492)->elements[0]));}
;
} else { 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_734492)->elements[0]))) ){ 
  
closureN_type c_737513;
object e_737531 [6];
c_737513.hdr.mark = gc_color_red;
 c_737513.hdr.grayed = 0;
c_737513.tag = closureN_tag;
 c_737513.fn = (function_type)__lambda_305;
c_737513.num_args = 1;
c_737513.num_elements = 6;
c_737513.elements = (object *)e_737531;
c_737513.elements[0] = ((closureN)self_734492)->elements[0];
c_737513.elements[1] = ((closureN)self_734492)->elements[1];
c_737513.elements[2] = ((closureN)self_734492)->elements[2];
c_737513.elements[3] = ((closureN)self_734492)->elements[3];
c_737513.elements[4] = ((closureN)self_734492)->elements[4];
c_737513.elements[5] = ((closureN)self_734492)->elements[5];





return_direct_with_clo1(data,(closure)&c_737513,__lambda_305,  Cyc_car(data, Cyc_cdr(data, ((closureN)self_734492)->elements[0])));
} else { 
  
pair_type local_737541; 
return_direct_with_clo1(data,  ((closureN)self_734492)->elements[2], (((closure)  ((closureN)self_734492)->elements[2])->fn),  set_pair_as_expr(&local_737541, ((closureN)self_734492)->elements[4], ((closureN)self_734492)->elements[1]));}
;}
;; 
}

static void __lambda_305(void *data, object self_734495, int argc, object *args) /* object self_734495, object r_733406 */
 {
 object r_733406 = args[0];
  


closureN_type c_737518;
object e_737525 [2];
c_737518.hdr.mark = gc_color_red;
 c_737518.hdr.grayed = 0;
c_737518.tag = closureN_tag;
 c_737518.fn = (function_type)__lambda_306;
c_737518.num_args = 1;
c_737518.num_elements = 2;
c_737518.elements = (object *)e_737525;
c_737518.elements[0] = ((closureN)self_734495)->elements[2];
c_737518.elements[1] = ((closureN)self_734495)->elements[4];



return_closcall5(data,  car(((closureN)self_734495)->elements[3]),  &c_737518, r_733406, Cyc_cdr(data, ((closureN)self_734495)->elements[0]), ((closureN)self_734495)->elements[5], ((closureN)self_734495)->elements[1]);; 
}

static void __lambda_306(void *data, object self_734496, int argc, object *args) /* object self_734496, object r_733405 */
 {
 object r_733405 = args[0];
  
pair_type local_737523; 
return_direct_with_clo1(data,  ((closureN)self_734496)->elements[0], (((closure)  ((closureN)self_734496)->elements[0])->fn),  set_pair_as_expr(&local_737523, ((closureN)self_734496)->elements[1], r_733405));; 
}

static void __lambda_303(void *data, object self_734493, int argc, object *args) /* object self_734493, object r_733402 */
 {
 object r_733402 = args[0];
  


closureN_type c_737481;
object e_737488 [2];
c_737481.hdr.mark = gc_color_red;
 c_737481.hdr.grayed = 0;
c_737481.tag = closureN_tag;
 c_737481.fn = (function_type)__lambda_304;
c_737481.num_args = 1;
c_737481.num_elements = 2;
c_737481.elements = (object *)e_737488;
c_737481.elements[0] = ((closureN)self_734493)->elements[2];
c_737481.elements[1] = ((closureN)self_734493)->elements[5];



return_closcall5(data,  car(((closureN)self_734493)->elements[3]),  &c_737481, ((closureN)self_734493)->elements[4], ((closureN)self_734493)->elements[0], r_733402, Cyc_cdr(data, ((closureN)self_734493)->elements[1]));; 
}

static void __lambda_304(void *data, object self_734494, int argc, object *args) /* object self_734494, object r_733401 */
 {
 object r_733401 = args[0];
  
pair_type local_737486; 
return_direct_with_clo1(data,  ((closureN)self_734494)->elements[0], (((closure)  ((closureN)self_734494)->elements[0])->fn),  set_pair_as_expr(&local_737486, ((closureN)self_734494)->elements[1], r_733401));; 
}

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



return_direct_with_clo1(data,(closure)&c_737451,__lambda_300,  Cyc_set_cell(data, ((closureN)self_734497)->elements[3], r_733396));; 
}

static void __lambda_300(void *data, object self_734498, int argc, object *args) /* object self_734498, object r_733395 */
 {

  

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

static void __lambda_198(void *data, object _, int argc, object *args) /* closure _,object k_733288, object elt_121_73764_732403, object lis_73765_732404 */
 {
object k_733288 = args[0]; object elt_121_73764_732403 = args[1]; object lis_73765_732404 = args[2];
  Cyc_st_add(data, "srfi/132.sld:list-merge-sort!");

closureN_type c_736753;
object e_737432 [3];
c_736753.hdr.mark = gc_color_red;
 c_736753.hdr.grayed = 0;
c_736753.tag = closureN_tag;
 c_736753.fn = (function_type)__lambda_199;
c_736753.num_args = 3;
c_736753.num_elements = 3;
c_736753.elements = (object *)e_737432;
c_736753.elements[0] = elt_121_73764_732403;
c_736753.elements[1] = k_733288;
c_736753.elements[2] = lis_73765_732404;

return_direct_with_clo3(data,(closure)&c_736753,__lambda_199,  boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_199(void *data, object self_734383, int argc, object *args) /* object self_734383, object getrun_732408, object grow_732409, object merge_67_732410 */
 {
 object getrun_732408 = args[0]; object grow_732409 = args[1]; object merge_67_732410 = args[2];
  
closureN_type c_736755;
object e_737428 [5];
c_736755.hdr.mark = gc_color_red;
 c_736755.hdr.grayed = 0;
c_736755.tag = closureN_tag;
 c_736755.fn = (function_type)__lambda_787;
c_736755.num_args = 1;
c_736755.num_elements = 5;
c_736755.elements = (object *)e_737428;
c_736755.elements[0] = ((closureN)self_734383)->elements[0];
c_736755.elements[1] = grow_732409;
c_736755.elements[2] = ((closureN)self_734383)->elements[1];
c_736755.elements[3] = ((closureN)self_734383)->elements[2];
c_736755.elements[4] = merge_67_732410;


pair_type local_737431; 
return_direct_with_clo1(data,(closure)&c_736755,__lambda_787,  set_cell_as_expr(&local_737431, getrun_732408));; 
}

static void __lambda_787(void *data, object self_734384, int argc, object *args) /* object self_734384, object getrun_732408 */
 {
 object getrun_732408 = args[0];
  
closureN_type c_736757;
object e_737423 [5];
c_736757.hdr.mark = gc_color_red;
 c_736757.hdr.grayed = 0;
c_736757.tag = closureN_tag;
 c_736757.fn = (function_type)__lambda_786;
c_736757.num_args = 1;
c_736757.num_elements = 5;
c_736757.elements = (object *)e_737423;
c_736757.elements[0] = ((closureN)self_734384)->elements[0];
c_736757.elements[1] = getrun_732408;
c_736757.elements[2] = ((closureN)self_734384)->elements[2];
c_736757.elements[3] = ((closureN)self_734384)->elements[3];
c_736757.elements[4] = ((closureN)self_734384)->elements[4];


pair_type local_737426; 
return_direct_with_clo1(data,(closure)&c_736757,__lambda_786,  set_cell_as_expr(&local_737426, ((closureN)self_734384)->elements[1]));; 
}

static void __lambda_786(void *data, object self_734385, int argc, object *args) /* object self_734385, object grow_732409 */
 {
 object grow_732409 = args[0];
  
closureN_type c_736759;
object e_737418 [5];
c_736759.hdr.mark = gc_color_red;
 c_736759.hdr.grayed = 0;
c_736759.tag = closureN_tag;
 c_736759.fn = (function_type)__lambda_785;
c_736759.num_args = 1;
c_736759.num_elements = 5;
c_736759.elements = (object *)e_737418;
c_736759.elements[0] = ((closureN)self_734385)->elements[0];
c_736759.elements[1] = ((closureN)self_734385)->elements[1];
c_736759.elements[2] = grow_732409;
c_736759.elements[3] = ((closureN)self_734385)->elements[2];
c_736759.elements[4] = ((closureN)self_734385)->elements[3];


pair_type local_737421; 
return_direct_with_clo1(data,(closure)&c_736759,__lambda_785,  set_cell_as_expr(&local_737421, ((closureN)self_734385)->elements[4]));; 
}

static void __lambda_785(void *data, object self_734386, int argc, object *args) /* object self_734386, object merge_67_732410 */
 {
 object merge_67_732410 = args[0];
  
closureN_type c_736761;
object e_737332 [6];
c_736761.hdr.mark = gc_color_red;
 c_736761.hdr.grayed = 0;
c_736761.tag = closureN_tag;
 c_736761.fn = (function_type)__lambda_200;
c_736761.num_args = 1;
c_736761.num_elements = 6;
c_736761.elements = (object *)e_737332;
c_736761.elements[0] = ((closureN)self_734386)->elements[0];
c_736761.elements[1] = ((closureN)self_734386)->elements[1];
c_736761.elements[2] = ((closureN)self_734386)->elements[2];
c_736761.elements[3] = ((closureN)self_734386)->elements[3];
c_736761.elements[4] = ((closureN)self_734386)->elements[4];
c_736761.elements[5] = merge_67_732410;


closureN_type c_737333;
object e_737417 [1];
c_737333.hdr.mark = gc_color_red;
 c_737333.hdr.grayed = 0;
c_737333.tag = closureN_tag;
 c_737333.fn = (function_type)__lambda_282;
c_737333.num_args = 1;
c_737333.num_elements = 1;
c_737333.elements = (object *)e_737417;
c_737333.elements[0] = ((closureN)self_734386)->elements[0];

return_direct_with_clo1(data,(closure)&c_736761,__lambda_200,  &c_737333);; 
}

static void __lambda_282(void *data, object self_734387, int argc, object *args) /* object self_734387, object k_733377, object lis_73766_732414 */
 {
 object k_733377 = args[0]; object lis_73766_732414 = args[1];
  
closureN_type c_737335;
object e_737414 [3];
c_737335.hdr.mark = gc_color_red;
 c_737335.hdr.grayed = 0;
c_737335.tag = closureN_tag;
 c_737335.fn = (function_type)__lambda_283;
c_737335.num_args = 1;
c_737335.num_elements = 3;
c_737335.elements = (object *)e_737414;
c_737335.elements[0] = ((closureN)self_734387)->elements[0];
c_737335.elements[1] = k_733377;
c_737335.elements[2] = lis_73766_732414;



return_direct_with_clo1(data,(closure)&c_737335,__lambda_283,  Cyc_car(data, lis_73766_732414));; 
}

static void __lambda_283(void *data, object self_734388, int argc, object *args) /* object self_734388, object r_733378 */
 {
 object r_733378 = args[0];
  
closureN_type c_737337;
object e_737410 [4];
c_737337.hdr.mark = gc_color_red;
 c_737337.hdr.grayed = 0;
c_737337.tag = closureN_tag;
 c_737337.fn = (function_type)__lambda_284;
c_737337.num_args = 1;
c_737337.num_elements = 4;
c_737337.elements = (object *)e_737410;
c_737337.elements[0] = ((closureN)self_734388)->elements[0];
c_737337.elements[1] = ((closureN)self_734388)->elements[1];
c_737337.elements[2] = ((closureN)self_734388)->elements[2];
c_737337.elements[3] = r_733378;



return_direct_with_clo1(data,(closure)&c_737337,__lambda_284,  Cyc_cdr(data, ((closureN)self_734388)->elements[2]));; 
}

static void __lambda_284(void *data, object self_734389, int argc, object *args) /* object self_734389, object r_733379 */
 {
 object r_733379 = args[0];
  
closureN_type c_737339;
object e_737407 [2];
c_737339.hdr.mark = gc_color_red;
 c_737339.hdr.grayed = 0;
c_737339.tag = closureN_tag;
 c_737339.fn = (function_type)__lambda_285;
c_737339.num_args = 3;
c_737339.num_elements = 2;
c_737339.elements = (object *)e_737407;
c_737339.elements[0] = ((closureN)self_734389)->elements[0];
c_737339.elements[1] = ((closureN)self_734389)->elements[1];

return_direct_with_clo3(data,(closure)&c_737339,__lambda_285,  ((closureN)self_734389)->elements[2], ((closureN)self_734389)->elements[3], r_733379);; 
}

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

return_direct_with_clo1(data,(closure)&c_737341,__lambda_286,  boolean_f);; 
}

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


pair_type local_737405; 
return_direct_with_clo1(data,(closure)&c_737343,__lambda_784,  set_cell_as_expr(&local_737405, lp_73772_732419));; 
}

static void __lambda_784(void *data, object self_734392, int argc, object *args) /* object self_734392, object lp_73772_732419 */
 {
 object lp_73772_732419 = args[0];
  
closureN_type c_737345;
object e_737360 [5];
c_737345.hdr.mark = gc_color_red;
 c_737345.hdr.grayed = 0;
c_737345.tag = closureN_tag;
 c_737345.fn = (function_type)__lambda_287;
c_737345.num_args = 1;
c_737345.num_elements = 5;
c_737345.elements = (object *)e_737360;
c_737345.elements[0] = ((closureN)self_734392)->elements[1];
c_737345.elements[1] = ((closureN)self_734392)->elements[2];
c_737345.elements[2] = lp_73772_732419;
c_737345.elements[3] = ((closureN)self_734392)->elements[3];
c_737345.elements[4] = ((closureN)self_734392)->elements[4];


closureN_type c_737361;
object e_737401 [2];
c_737361.hdr.mark = gc_color_red;
 c_737361.hdr.grayed = 0;
c_737361.tag = closureN_tag;
 c_737361.fn = (function_type)__lambda_289;
c_737361.num_args = 4;
c_737361.num_elements = 2;
c_737361.elements = (object *)e_737401;
c_737361.elements[0] = ((closureN)self_734392)->elements[0];
c_737361.elements[1] = lp_73772_732419;

return_direct_with_clo1(data,(closure)&c_737345,__lambda_287,  &c_737361);; 
}

static void __lambda_289(void *data, object self_734393, int argc, object *args) /* object self_734393, object k_733382, object lis_73773_732420, object x_73774_732421, object i_73775_732422, object next_73776_732423 */
 {
 object k_733382 = args[0]; object lis_73773_732420 = args[1]; object x_73774_732421 = args[2]; object i_73775_732422 = args[3]; object next_73776_732423 = args[4];
    
if( (boolean_f != Cyc_is_pair(next_73776_732423)) ){ 
  
closureN_type c_737365;
object e_737397 [7];
c_737365.hdr.mark = gc_color_red;
 c_737365.hdr.grayed = 0;
c_737365.tag = closureN_tag;
 c_737365.fn = (function_type)__lambda_290;
c_737365.num_args = 1;
c_737365.num_elements = 7;
c_737365.elements = (object *)e_737397;
c_737365.elements[0] = ((closureN)self_734393)->elements[0];
c_737365.elements[1] = i_73775_732422;
c_737365.elements[2] = k_733382;
c_737365.elements[3] = lis_73773_732420;
c_737365.elements[4] = ((closureN)self_734393)->elements[1];
c_737365.elements[5] = next_73776_732423;
c_737365.elements[6] = x_73774_732421;



return_direct_with_clo1(data,(closure)&c_737365,__lambda_290,  Cyc_car(data, next_73776_732423));
} else { 
  return_direct_with_clo4(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_733382, i_73775_732422, lis_73773_732420, next_73776_732423);}
;; 
}

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

return_closcall3(data,  ((closureN)self_734394)->elements[0],  &c_737368, y_73777_732424, ((closureN)self_734394)->elements[6]);; 
}

static void __lambda_291(void *data, object self_734395, int argc, object *args) /* object self_734395, object r_733385 */
 {
 object r_733385 = args[0];
  if( (boolean_f != r_733385) ){ 
  return_direct_with_clo4(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734395)->elements[1], ((closureN)self_734395)->elements[0], ((closureN)self_734395)->elements[2], ((closureN)self_734395)->elements[4]);
} else { 
  
closureN_type c_737375;
object e_737390 [4];
c_737375.hdr.mark = gc_color_red;
 c_737375.hdr.grayed = 0;
c_737375.tag = closureN_tag;
 c_737375.fn = (function_type)__lambda_292;
c_737375.num_args = 1;
c_737375.num_elements = 4;
c_737375.elements = (object *)e_737390;
c_737375.elements[0] = ((closureN)self_734395)->elements[1];
c_737375.elements[1] = ((closureN)self_734395)->elements[3];
c_737375.elements[2] = ((closureN)self_734395)->elements[4];
c_737375.elements[3] = ((closureN)self_734395)->elements[5];


complex_num_type local_737393; 
return_direct_with_clo1(data,(closure)&c_737375,__lambda_292,  Cyc_fast_sum(data,&local_737393, ((closureN)self_734395)->elements[0], obj_int2obj(1)));}
;; 
}

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



return_direct_with_clo1(data,(closure)&c_737377,__lambda_293,  Cyc_cdr(data, ((closureN)self_734396)->elements[2]));; 
}

static void __lambda_293(void *data, object self_734397, int argc, object *args) /* object self_734397, object r_733387 */
 {
 object r_733387 = args[0];
  

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

static void __lambda_287(void *data, object self_734398, int argc, object *args) /* object self_734398, object r_733381 */
 {
 object r_733381 = args[0];
  
closureN_type c_737347;
object e_737356 [5];
c_737347.hdr.mark = gc_color_red;
 c_737347.hdr.grayed = 0;
c_737347.tag = closureN_tag;
 c_737347.fn = (function_type)__lambda_288;
c_737347.num_args = 1;
c_737347.num_elements = 5;
c_737347.elements = (object *)e_737356;
c_737347.elements[0] = ((closureN)self_734398)->elements[0];
c_737347.elements[1] = ((closureN)self_734398)->elements[1];
c_737347.elements[2] = ((closureN)self_734398)->elements[2];
c_737347.elements[3] = ((closureN)self_734398)->elements[3];
c_737347.elements[4] = ((closureN)self_734398)->elements[4];



return_direct_with_clo1(data,(closure)&c_737347,__lambda_288,  Cyc_set_cell(data, ((closureN)self_734398)->elements[2], r_733381));; 
}

static void __lambda_288(void *data, object self_734399, int argc, object *args) /* object self_734399, object r_733380 */
 {

  

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

static void __lambda_200(void *data, object self_734400, int argc, object *args) /* object self_734400, object r_733376 */
 {
 object r_733376 = args[0];
  
closureN_type c_736763;
object e_737328 [6];
c_736763.hdr.mark = gc_color_red;
 c_736763.hdr.grayed = 0;
c_736763.tag = closureN_tag;
 c_736763.fn = (function_type)__lambda_201;
c_736763.num_args = 1;
c_736763.num_elements = 6;
c_736763.elements = (object *)e_737328;
c_736763.elements[0] = ((closureN)self_734400)->elements[0];
c_736763.elements[1] = ((closureN)self_734400)->elements[1];
c_736763.elements[2] = ((closureN)self_734400)->elements[2];
c_736763.elements[3] = ((closureN)self_734400)->elements[3];
c_736763.elements[4] = ((closureN)self_734400)->elements[4];
c_736763.elements[5] = ((closureN)self_734400)->elements[5];



return_direct_with_clo1(data,(closure)&c_736763,__lambda_201,  Cyc_set_cell(data, ((closureN)self_734400)->elements[1], r_733376));; 
}

static void __lambda_201(void *data, object self_734401, int argc, object *args) /* object self_734401, object r_733289 */
 {

  
closureN_type c_736765;
object e_736964 [5];
c_736765.hdr.mark = gc_color_red;
 c_736765.hdr.grayed = 0;
c_736765.tag = closureN_tag;
 c_736765.fn = (function_type)__lambda_202;
c_736765.num_args = 1;
c_736765.num_elements = 5;
c_736765.elements = (object *)e_736964;
c_736765.elements[0] = ((closureN)self_734401)->elements[1];
c_736765.elements[1] = ((closureN)self_734401)->elements[2];
c_736765.elements[2] = ((closureN)self_734401)->elements[3];
c_736765.elements[3] = ((closureN)self_734401)->elements[4];
c_736765.elements[4] = ((closureN)self_734401)->elements[5];


closureN_type c_736965;
object e_737327 [1];
c_736965.hdr.mark = gc_color_red;
 c_736965.hdr.grayed = 0;
c_736965.tag = closureN_tag;
 c_736965.fn = (function_type)__lambda_234;
c_736965.num_args = 4;
c_736965.num_elements = 1;
c_736965.elements = (object *)e_737327;
c_736965.elements[0] = ((closureN)self_734401)->elements[0];

return_direct_with_clo1(data,(closure)&c_736765,__lambda_202,  &c_736965);; 
}

static void __lambda_234(void *data, object self_734402, int argc, object *args) /* object self_734402, object k_733329, object a_73778_732425, object enda_73779_732426, object b_73780_732427, object endb_73781_732428 */
 {
 object k_733329 = args[0]; object a_73778_732425 = args[1]; object enda_73779_732426 = args[2]; object b_73780_732427 = args[3]; object endb_73781_732428 = args[4];
  
closureN_type c_736967;
object e_737326 [6];
c_736967.hdr.mark = gc_color_red;
 c_736967.hdr.grayed = 0;
c_736967.tag = closureN_tag;
 c_736967.fn = (function_type)__lambda_235;
c_736967.num_args = 3;
c_736967.num_elements = 6;
c_736967.elements = (object *)e_737326;
c_736967.elements[0] = a_73778_732425;
c_736967.elements[1] = b_73780_732427;
c_736967.elements[2] = ((closureN)self_734402)->elements[0];
c_736967.elements[3] = enda_73779_732426;
c_736967.elements[4] = endb_73781_732428;
c_736967.elements[5] = k_733329;

return_direct_with_clo3(data,(closure)&c_736967,__lambda_235,  boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_235(void *data, object self_734403, int argc, object *args) /* object self_734403, object scan_91a_73782_732429, object scan_91b_73783_732430, object maybe_91set_91cdr_67_73784_732431 */
 {
 object scan_91a_73782_732429 = args[0]; object scan_91b_73783_732430 = args[1]; object maybe_91set_91cdr_67_73784_732431 = args[2];
  
closureN_type c_736969;
object e_737322 [8];
c_736969.hdr.mark = gc_color_red;
 c_736969.hdr.grayed = 0;
c_736969.tag = closureN_tag;
 c_736969.fn = (function_type)__lambda_783;
c_736969.num_args = 1;
c_736969.num_elements = 8;
c_736969.elements = (object *)e_737322;
c_736969.elements[0] = ((closureN)self_734403)->elements[0];
c_736969.elements[1] = ((closureN)self_734403)->elements[1];
c_736969.elements[2] = ((closureN)self_734403)->elements[2];
c_736969.elements[3] = ((closureN)self_734403)->elements[3];
c_736969.elements[4] = ((closureN)self_734403)->elements[4];
c_736969.elements[5] = ((closureN)self_734403)->elements[5];
c_736969.elements[6] = maybe_91set_91cdr_67_73784_732431;
c_736969.elements[7] = scan_91b_73783_732430;


pair_type local_737325; 
return_direct_with_clo1(data,(closure)&c_736969,__lambda_783,  set_cell_as_expr(&local_737325, scan_91a_73782_732429));; 
}

static void __lambda_783(void *data, object self_734404, int argc, object *args) /* object self_734404, object scan_91a_73782_732429 */
 {
 object scan_91a_73782_732429 = args[0];
  
closureN_type c_736971;
object e_737317 [8];
c_736971.hdr.mark = gc_color_red;
 c_736971.hdr.grayed = 0;
c_736971.tag = closureN_tag;
 c_736971.fn = (function_type)__lambda_782;
c_736971.num_args = 1;
c_736971.num_elements = 8;
c_736971.elements = (object *)e_737317;
c_736971.elements[0] = ((closureN)self_734404)->elements[0];
c_736971.elements[1] = ((closureN)self_734404)->elements[1];
c_736971.elements[2] = ((closureN)self_734404)->elements[2];
c_736971.elements[3] = ((closureN)self_734404)->elements[3];
c_736971.elements[4] = ((closureN)self_734404)->elements[4];
c_736971.elements[5] = ((closureN)self_734404)->elements[5];
c_736971.elements[6] = ((closureN)self_734404)->elements[6];
c_736971.elements[7] = scan_91a_73782_732429;


pair_type local_737320; 
return_direct_with_clo1(data,(closure)&c_736971,__lambda_782,  set_cell_as_expr(&local_737320, ((closureN)self_734404)->elements[7]));; 
}

static void __lambda_782(void *data, object self_734405, int argc, object *args) /* object self_734405, object scan_91b_73783_732430 */
 {
 object scan_91b_73783_732430 = args[0];
  
closureN_type c_736973;
object e_737312 [8];
c_736973.hdr.mark = gc_color_red;
 c_736973.hdr.grayed = 0;
c_736973.tag = closureN_tag;
 c_736973.fn = (function_type)__lambda_781;
c_736973.num_args = 1;
c_736973.num_elements = 8;
c_736973.elements = (object *)e_737312;
c_736973.elements[0] = ((closureN)self_734405)->elements[0];
c_736973.elements[1] = ((closureN)self_734405)->elements[1];
c_736973.elements[2] = ((closureN)self_734405)->elements[2];
c_736973.elements[3] = ((closureN)self_734405)->elements[3];
c_736973.elements[4] = ((closureN)self_734405)->elements[4];
c_736973.elements[5] = ((closureN)self_734405)->elements[5];
c_736973.elements[6] = ((closureN)self_734405)->elements[7];
c_736973.elements[7] = scan_91b_73783_732430;


pair_type local_737315; 
return_direct_with_clo1(data,(closure)&c_736973,__lambda_781,  set_cell_as_expr(&local_737315, ((closureN)self_734405)->elements[6]));; 
}

static void __lambda_781(void *data, object self_734406, int argc, object *args) /* object self_734406, object maybe_91set_91cdr_67_73784_732431 */
 {
 object maybe_91set_91cdr_67_73784_732431 = args[0];
  
closureN_type c_736975;
object e_737220 [9];
c_736975.hdr.mark = gc_color_red;
 c_736975.hdr.grayed = 0;
c_736975.tag = closureN_tag;
 c_736975.fn = (function_type)__lambda_236;
c_736975.num_args = 1;
c_736975.num_elements = 9;
c_736975.elements = (object *)e_737220;
c_736975.elements[0] = ((closureN)self_734406)->elements[0];
c_736975.elements[1] = ((closureN)self_734406)->elements[1];
c_736975.elements[2] = ((closureN)self_734406)->elements[2];
c_736975.elements[3] = ((closureN)self_734406)->elements[3];
c_736975.elements[4] = ((closureN)self_734406)->elements[4];
c_736975.elements[5] = ((closureN)self_734406)->elements[5];
c_736975.elements[6] = maybe_91set_91cdr_67_73784_732431;
c_736975.elements[7] = ((closureN)self_734406)->elements[6];
c_736975.elements[8] = ((closureN)self_734406)->elements[7];


closureN_type c_737221;
object e_737311 [6];
c_737221.hdr.mark = gc_color_red;
 c_737221.hdr.grayed = 0;
c_737221.tag = closureN_tag;
 c_737221.fn = (function_type)__lambda_271;
c_737221.num_args = 5;
c_737221.num_elements = 6;
c_737221.elements = (object *)e_737311;
c_737221.elements[0] = ((closureN)self_734406)->elements[2];
c_737221.elements[1] = ((closureN)self_734406)->elements[3];
c_737221.elements[2] = ((closureN)self_734406)->elements[4];
c_737221.elements[3] = maybe_91set_91cdr_67_73784_732431;
c_737221.elements[4] = ((closureN)self_734406)->elements[6];
c_737221.elements[5] = ((closureN)self_734406)->elements[7];

return_direct_with_clo1(data,(closure)&c_736975,__lambda_236,  &c_737221);; 
}

static void __lambda_271(void *data, object self_734407, int argc, object *args) /* object self_734407, object k_733365, object prev_73785_732432, object x_73786_732433, object a_73787_732434, object y_73788_732435, object b_73789_732436 */
 {
 object k_733365 = args[0]; object prev_73785_732432 = args[1]; object x_73786_732433 = args[2]; object a_73787_732434 = args[3]; object y_73788_732435 = args[4]; object b_73789_732436 = args[5];
  
closureN_type c_737224;
object e_737310 [11];
c_737224.hdr.mark = gc_color_red;
 c_737224.hdr.grayed = 0;
c_737224.tag = closureN_tag;
 c_737224.fn = (function_type)__lambda_272;
c_737224.num_args = 1;
c_737224.num_elements = 11;
c_737224.elements = (object *)e_737310;
c_737224.elements[0] = a_73787_732434;
c_737224.elements[1] = b_73789_732436;
c_737224.elements[2] = ((closureN)self_734407)->elements[1];
c_737224.elements[3] = ((closureN)self_734407)->elements[2];
c_737224.elements[4] = k_733365;
c_737224.elements[5] = ((closureN)self_734407)->elements[3];
c_737224.elements[6] = prev_73785_732432;
c_737224.elements[7] = ((closureN)self_734407)->elements[4];
c_737224.elements[8] = ((closureN)self_734407)->elements[5];
c_737224.elements[9] = x_73786_732433;
c_737224.elements[10] = y_73788_732435;

return_closcall3(data,  ((closureN)self_734407)->elements[0],  &c_737224, y_73788_732435, x_73786_732433);; 
}

static void __lambda_272(void *data, object self_734408, int argc, object *args) /* object self_734408, object r_733366 */
 {
 object r_733366 = args[0];
  if( (boolean_f != r_733366) ){ 
  
closureN_type c_737226;
object e_737266 [7];
c_737226.hdr.mark = gc_color_red;
 c_737226.hdr.grayed = 0;
c_737226.tag = closureN_tag;
 c_737226.fn = (function_type)__lambda_273;
c_737226.num_args = 1;
c_737226.num_elements = 7;
c_737226.elements = (object *)e_737266;
c_737226.elements[0] = ((closureN)self_734408)->elements[0];
c_737226.elements[1] = ((closureN)self_734408)->elements[1];
c_737226.elements[2] = ((closureN)self_734408)->elements[2];
c_737226.elements[3] = ((closureN)self_734408)->elements[3];
c_737226.elements[4] = ((closureN)self_734408)->elements[4];
c_737226.elements[5] = ((closureN)self_734408)->elements[8];
c_737226.elements[6] = ((closureN)self_734408)->elements[9];


object c_737269 = Cyc_set_cdr_cps(data,(closure)&c_737226,((closureN)self_734408)->elements[6], ((closureN)self_734408)->elements[1]);
return_closcall1(data,(closure)&c_737226,  c_737269);
} else { 
  
closureN_type c_737273;
object e_737305 [7];
c_737273.hdr.mark = gc_color_red;
 c_737273.hdr.grayed = 0;
c_737273.tag = closureN_tag;
 c_737273.fn = (function_type)__lambda_278;
c_737273.num_args = 1;
c_737273.num_elements = 7;
c_737273.elements = (object *)e_737305;
c_737273.elements[0] = ((closureN)self_734408)->elements[0];
c_737273.elements[1] = ((closureN)self_734408)->elements[1];
c_737273.elements[2] = ((closureN)self_734408)->elements[3];
c_737273.elements[3] = ((closureN)self_734408)->elements[4];
c_737273.elements[4] = ((closureN)self_734408)->elements[5];
c_737273.elements[5] = ((closureN)self_734408)->elements[7];
c_737273.elements[6] = ((closureN)self_734408)->elements[10];



return_direct_with_clo1(data,(closure)&c_737273,__lambda_278,  Cyc_eq(((closureN)self_734408)->elements[0], ((closureN)self_734408)->elements[2]));}
;; 
}

static void __lambda_278(void *data, object self_734414, int argc, object *args) /* object self_734414, object r_733372 */
 {
 object r_733372 = args[0];
  if( (boolean_f != r_733372) ){ 
  


closureN_type c_737278;
object e_737282 [2];
c_737278.hdr.mark = gc_color_red;
 c_737278.hdr.grayed = 0;
c_737278.tag = closureN_tag;
 c_737278.fn = (function_type)__lambda_279;
c_737278.num_args = 1;
c_737278.num_elements = 2;
c_737278.elements = (object *)e_737282;
c_737278.elements[0] = ((closureN)self_734414)->elements[2];
c_737278.elements[1] = ((closureN)self_734414)->elements[3];

return_closcall3(data,  car(((closureN)self_734414)->elements[4]),  &c_737278, ((closureN)self_734414)->elements[0], ((closureN)self_734414)->elements[1]);
} else { 
  
closureN_type c_737286;
object e_737301 [5];
c_737286.hdr.mark = gc_color_red;
 c_737286.hdr.grayed = 0;
c_737286.tag = closureN_tag;
 c_737286.fn = (function_type)__lambda_280;
c_737286.num_args = 1;
c_737286.num_elements = 5;
c_737286.elements = (object *)e_737301;
c_737286.elements[0] = ((closureN)self_734414)->elements[0];
c_737286.elements[1] = ((closureN)self_734414)->elements[1];
c_737286.elements[2] = ((closureN)self_734414)->elements[3];
c_737286.elements[3] = ((closureN)self_734414)->elements[5];
c_737286.elements[4] = ((closureN)self_734414)->elements[6];



return_direct_with_clo1(data,(closure)&c_737286,__lambda_280,  Cyc_cdr(data, ((closureN)self_734414)->elements[0]));}
;; 
}

static void __lambda_280(void *data, object self_734416, int argc, object *args) /* object self_734416, object next_91a_73798_732438 */
 {
 object next_91a_73798_732438 = args[0];
  
closureN_type c_737288;
object e_737298 [6];
c_737288.hdr.mark = gc_color_red;
 c_737288.hdr.grayed = 0;
c_737288.tag = closureN_tag;
 c_737288.fn = (function_type)__lambda_281;
c_737288.num_args = 1;
c_737288.num_elements = 6;
c_737288.elements = (object *)e_737298;
c_737288.elements[0] = ((closureN)self_734416)->elements[0];
c_737288.elements[1] = ((closureN)self_734416)->elements[1];
c_737288.elements[2] = ((closureN)self_734416)->elements[2];
c_737288.elements[3] = next_91a_73798_732438;
c_737288.elements[4] = ((closureN)self_734416)->elements[3];
c_737288.elements[5] = ((closureN)self_734416)->elements[4];



return_direct_with_clo1(data,(closure)&c_737288,__lambda_281,  Cyc_car(data, next_91a_73798_732438));; 
}

static void __lambda_281(void *data, object self_734417, int argc, object *args) /* object self_734417, object r_733375 */
 {
 object r_733375 = args[0];
  

return_closcall6(data,  car(((closureN)self_734417)->elements[4]),  ((closureN)self_734417)->elements[2], ((closureN)self_734417)->elements[0], r_733375, ((closureN)self_734417)->elements[3], ((closureN)self_734417)->elements[5], ((closureN)self_734417)->elements[1]);; 
}

static void __lambda_279(void *data, object self_734415, int argc, object *args) /* object self_734415, object r_733373 */
 {

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

static void __lambda_273(void *data, object self_734409, int argc, object *args) /* object self_734409, object r_733367 */
 {

  
closureN_type c_737228;
object e_737262 [7];
c_737228.hdr.mark = gc_color_red;
 c_737228.hdr.grayed = 0;
c_737228.tag = closureN_tag;
 c_737228.fn = (function_type)__lambda_274;
c_737228.num_args = 1;
c_737228.num_elements = 7;
c_737228.elements = (object *)e_737262;
c_737228.elements[0] = ((closureN)self_734409)->elements[0];
c_737228.elements[1] = ((closureN)self_734409)->elements[1];
c_737228.elements[2] = ((closureN)self_734409)->elements[2];
c_737228.elements[3] = ((closureN)self_734409)->elements[3];
c_737228.elements[4] = ((closureN)self_734409)->elements[4];
c_737228.elements[5] = ((closureN)self_734409)->elements[5];
c_737228.elements[6] = ((closureN)self_734409)->elements[6];



return_direct_with_clo1(data,(closure)&c_737228,__lambda_274,  Cyc_cdr(data, ((closureN)self_734409)->elements[1]));; 
}

static void __lambda_274(void *data, object self_734410, int argc, object *args) /* object self_734410, object next_91b_73793_732437 */
 {
 object next_91b_73793_732437 = args[0];
  
closureN_type c_737230;
object e_737257 [7];
c_737230.hdr.mark = gc_color_red;
 c_737230.hdr.grayed = 0;
c_737230.tag = closureN_tag;
 c_737230.fn = (function_type)__lambda_275;
c_737230.num_args = 1;
c_737230.num_elements = 7;
c_737230.elements = (object *)e_737257;
c_737230.elements[0] = ((closureN)self_734410)->elements[0];
c_737230.elements[1] = ((closureN)self_734410)->elements[1];
c_737230.elements[2] = ((closureN)self_734410)->elements[2];
c_737230.elements[3] = ((closureN)self_734410)->elements[4];
c_737230.elements[4] = next_91b_73793_732437;
c_737230.elements[5] = ((closureN)self_734410)->elements[5];
c_737230.elements[6] = ((closureN)self_734410)->elements[6];



return_direct_with_clo1(data,(closure)&c_737230,__lambda_275,  Cyc_eq(((closureN)self_734410)->elements[1], ((closureN)self_734410)->elements[3]));; 
}

static void __lambda_275(void *data, object self_734411, int argc, object *args) /* object self_734411, object r_733369 */
 {
 object r_733369 = args[0];
  if( (boolean_f != r_733369) ){ 
  
closureN_type c_737232;
object e_737236 [2];
c_737232.hdr.mark = gc_color_red;
 c_737232.hdr.grayed = 0;
c_737232.tag = closureN_tag;
 c_737232.fn = (function_type)__lambda_276;
c_737232.num_args = 1;
c_737232.num_elements = 2;
c_737232.elements = (object *)e_737236;
c_737232.elements[0] = ((closureN)self_734411)->elements[2];
c_737232.elements[1] = ((closureN)self_734411)->elements[3];


object c_737239 = Cyc_set_cdr_cps(data,(closure)&c_737232,((closureN)self_734411)->elements[1], ((closureN)self_734411)->elements[0]);
return_closcall1(data,(closure)&c_737232,  c_737239);
} else { 
  
closureN_type c_737243;
object e_737253 [6];
c_737243.hdr.mark = gc_color_red;
 c_737243.hdr.grayed = 0;
c_737243.tag = closureN_tag;
 c_737243.fn = (function_type)__lambda_277;
c_737243.num_args = 1;
c_737243.num_elements = 6;
c_737243.elements = (object *)e_737253;
c_737243.elements[0] = ((closureN)self_734411)->elements[0];
c_737243.elements[1] = ((closureN)self_734411)->elements[1];
c_737243.elements[2] = ((closureN)self_734411)->elements[3];
c_737243.elements[3] = ((closureN)self_734411)->elements[4];
c_737243.elements[4] = ((closureN)self_734411)->elements[5];
c_737243.elements[5] = ((closureN)self_734411)->elements[6];



return_direct_with_clo1(data,(closure)&c_737243,__lambda_277,  Cyc_car(data, ((closureN)self_734411)->elements[4]));}
;; 
}

static void __lambda_277(void *data, object self_734413, int argc, object *args) /* object self_734413, object r_733371 */
 {
 object r_733371 = args[0];
  

return_closcall6(data,  car(((closureN)self_734413)->elements[4]),  ((closureN)self_734413)->elements[2], ((closureN)self_734413)->elements[1], ((closureN)self_734413)->elements[5], ((closureN)self_734413)->elements[0], r_733371, ((closureN)self_734413)->elements[3]);; 
}

static void __lambda_276(void *data, object self_734412, int argc, object *args) /* object self_734412, object r_733370 */
 {

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

static void __lambda_236(void *data, object self_734418, int argc, object *args) /* object self_734418, object r_733364 */
 {
 object r_733364 = args[0];
  
closureN_type c_736977;
object e_737216 [9];
c_736977.hdr.mark = gc_color_red;
 c_736977.hdr.grayed = 0;
c_736977.tag = closureN_tag;
 c_736977.fn = (function_type)__lambda_237;
c_736977.num_args = 1;
c_736977.num_elements = 9;
c_736977.elements = (object *)e_737216;
c_736977.elements[0] = ((closureN)self_734418)->elements[0];
c_736977.elements[1] = ((closureN)self_734418)->elements[1];
c_736977.elements[2] = ((closureN)self_734418)->elements[2];
c_736977.elements[3] = ((closureN)self_734418)->elements[3];
c_736977.elements[4] = ((closureN)self_734418)->elements[4];
c_736977.elements[5] = ((closureN)self_734418)->elements[5];
c_736977.elements[6] = ((closureN)self_734418)->elements[6];
c_736977.elements[7] = ((closureN)self_734418)->elements[7];
c_736977.elements[8] = ((closureN)self_734418)->elements[8];



return_direct_with_clo1(data,(closure)&c_736977,__lambda_237,  Cyc_set_cell(data, ((closureN)self_734418)->elements[7], r_733364));; 
}

static void __lambda_237(void *data, object self_734419, int argc, object *args) /* object self_734419, object r_733330 */
 {

  
closureN_type c_736979;
object e_737125 [9];
c_736979.hdr.mark = gc_color_red;
 c_736979.hdr.grayed = 0;
c_736979.tag = closureN_tag;
 c_736979.fn = (function_type)__lambda_238;
c_736979.num_args = 1;
c_736979.num_elements = 9;
c_736979.elements = (object *)e_737125;
c_736979.elements[0] = ((closureN)self_734419)->elements[0];
c_736979.elements[1] = ((closureN)self_734419)->elements[1];
c_736979.elements[2] = ((closureN)self_734419)->elements[2];
c_736979.elements[3] = ((closureN)self_734419)->elements[3];
c_736979.elements[4] = ((closureN)self_734419)->elements[4];
c_736979.elements[5] = ((closureN)self_734419)->elements[5];
c_736979.elements[6] = ((closureN)self_734419)->elements[6];
c_736979.elements[7] = ((closureN)self_734419)->elements[7];
c_736979.elements[8] = ((closureN)self_734419)->elements[8];


closureN_type c_737126;
object e_737215 [6];
c_737126.hdr.mark = gc_color_red;
 c_737126.hdr.grayed = 0;
c_737126.tag = closureN_tag;
 c_737126.fn = (function_type)__lambda_260;
c_737126.num_args = 5;
c_737126.num_elements = 6;
c_737126.elements = (object *)e_737215;
c_737126.elements[0] = ((closureN)self_734419)->elements[2];
c_737126.elements[1] = ((closureN)self_734419)->elements[3];
c_737126.elements[2] = ((closureN)self_734419)->elements[4];
c_737126.elements[3] = ((closureN)self_734419)->elements[6];
c_737126.elements[4] = ((closureN)self_734419)->elements[7];
c_737126.elements[5] = ((closureN)self_734419)->elements[8];

return_direct_with_clo1(data,(closure)&c_736979,__lambda_238,  &c_737126);; 
}

static void __lambda_260(void *data, object self_734420, int argc, object *args) /* object self_734420, object k_733353, object prev_73799_732439, object x_73800_732440, object a_73801_732441, object y_73802_732442, object b_73803_732443 */
 {
 object k_733353 = args[0]; object prev_73799_732439 = args[1]; object x_73800_732440 = args[2]; object a_73801_732441 = args[3]; object y_73802_732442 = args[4]; object b_73803_732443 = args[5];
  
closureN_type c_737129;
object e_737214 [11];
c_737129.hdr.mark = gc_color_red;
 c_737129.hdr.grayed = 0;
c_737129.tag = closureN_tag;
 c_737129.fn = (function_type)__lambda_261;
c_737129.num_args = 1;
c_737129.num_elements = 11;
c_737129.elements = (object *)e_737214;
c_737129.elements[0] = a_73801_732441;
c_737129.elements[1] = b_73803_732443;
c_737129.elements[2] = ((closureN)self_734420)->elements[1];
c_737129.elements[3] = ((closureN)self_734420)->elements[2];
c_737129.elements[4] = k_733353;
c_737129.elements[5] = ((closureN)self_734420)->elements[3];
c_737129.elements[6] = prev_73799_732439;
c_737129.elements[7] = ((closureN)self_734420)->elements[4];
c_737129.elements[8] = ((closureN)self_734420)->elements[5];
c_737129.elements[9] = x_73800_732440;
c_737129.elements[10] = y_73802_732442;

return_closcall3(data,  ((closureN)self_734420)->elements[0],  &c_737129, y_73802_732442, x_73800_732440);; 
}

static void __lambda_261(void *data, object self_734421, int argc, object *args) /* object self_734421, object r_733354 */
 {
 object r_733354 = args[0];
  if( (boolean_f != r_733354) ){ 
  
closureN_type c_737131;
object e_737163 [6];
c_737131.hdr.mark = gc_color_red;
 c_737131.hdr.grayed = 0;
c_737131.tag = closureN_tag;
 c_737131.fn = (function_type)__lambda_262;
c_737131.num_args = 1;
c_737131.num_elements = 6;
c_737131.elements = (object *)e_737163;
c_737131.elements[0] = ((closureN)self_734421)->elements[0];
c_737131.elements[1] = ((closureN)self_734421)->elements[1];
c_737131.elements[2] = ((closureN)self_734421)->elements[2];
c_737131.elements[3] = ((closureN)self_734421)->elements[4];
c_737131.elements[4] = ((closureN)self_734421)->elements[8];
c_737131.elements[5] = ((closureN)self_734421)->elements[9];



return_direct_with_clo1(data,(closure)&c_737131,__lambda_262,  Cyc_eq(((closureN)self_734421)->elements[1], ((closureN)self_734421)->elements[3]));
} else { 
  
closureN_type c_737169;
object e_737208 [8];
c_737169.hdr.mark = gc_color_red;
 c_737169.hdr.grayed = 0;
c_737169.tag = closureN_tag;
 c_737169.fn = (function_type)__lambda_266;
c_737169.num_args = 1;
c_737169.num_elements = 8;
c_737169.elements = (object *)e_737208;
c_737169.elements[0] = ((closureN)self_734421)->elements[0];
c_737169.elements[1] = ((closureN)self_734421)->elements[1];
c_737169.elements[2] = ((closureN)self_734421)->elements[2];
c_737169.elements[3] = ((closureN)self_734421)->elements[3];
c_737169.elements[4] = ((closureN)self_734421)->elements[4];
c_737169.elements[5] = ((closureN)self_734421)->elements[5];
c_737169.elements[6] = ((closureN)self_734421)->elements[7];
c_737169.elements[7] = ((closureN)self_734421)->elements[10];


object c_737211 = Cyc_set_cdr_cps(data,(closure)&c_737169,((closureN)self_734421)->elements[6], ((closureN)self_734421)->elements[0]);
return_closcall1(data,(closure)&c_737169,  c_737211);}
;; 
}

static void __lambda_266(void *data, object self_734426, int argc, object *args) /* object self_734426, object r_733359 */
 {

  
closureN_type c_737171;
object e_737203 [7];
c_737171.hdr.mark = gc_color_red;
 c_737171.hdr.grayed = 0;
c_737171.tag = closureN_tag;
 c_737171.fn = (function_type)__lambda_267;
c_737171.num_args = 1;
c_737171.num_elements = 7;
c_737171.elements = (object *)e_737203;
c_737171.elements[0] = ((closureN)self_734426)->elements[0];
c_737171.elements[1] = ((closureN)self_734426)->elements[1];
c_737171.elements[2] = ((closureN)self_734426)->elements[3];
c_737171.elements[3] = ((closureN)self_734426)->elements[4];
c_737171.elements[4] = ((closureN)self_734426)->elements[5];
c_737171.elements[5] = ((closureN)self_734426)->elements[6];
c_737171.elements[6] = ((closureN)self_734426)->elements[7];



return_direct_with_clo1(data,(closure)&c_737171,__lambda_267,  Cyc_eq(((closureN)self_734426)->elements[0], ((closureN)self_734426)->elements[2]));; 
}

static void __lambda_267(void *data, object self_734427, int argc, object *args) /* object self_734427, object r_733360 */
 {
 object r_733360 = args[0];
  if( (boolean_f != r_733360) ){ 
  


closureN_type c_737176;
object e_737180 [2];
c_737176.hdr.mark = gc_color_red;
 c_737176.hdr.grayed = 0;
c_737176.tag = closureN_tag;
 c_737176.fn = (function_type)__lambda_268;
c_737176.num_args = 1;
c_737176.num_elements = 2;
c_737176.elements = (object *)e_737180;
c_737176.elements[0] = ((closureN)self_734427)->elements[2];
c_737176.elements[1] = ((closureN)self_734427)->elements[3];

return_closcall3(data,  car(((closureN)self_734427)->elements[4]),  &c_737176, ((closureN)self_734427)->elements[0], ((closureN)self_734427)->elements[1]);
} else { 
  
closureN_type c_737184;
object e_737199 [5];
c_737184.hdr.mark = gc_color_red;
 c_737184.hdr.grayed = 0;
c_737184.tag = closureN_tag;
 c_737184.fn = (function_type)__lambda_269;
c_737184.num_args = 1;
c_737184.num_elements = 5;
c_737184.elements = (object *)e_737199;
c_737184.elements[0] = ((closureN)self_734427)->elements[0];
c_737184.elements[1] = ((closureN)self_734427)->elements[1];
c_737184.elements[2] = ((closureN)self_734427)->elements[3];
c_737184.elements[3] = ((closureN)self_734427)->elements[5];
c_737184.elements[4] = ((closureN)self_734427)->elements[6];



return_direct_with_clo1(data,(closure)&c_737184,__lambda_269,  Cyc_cdr(data, ((closureN)self_734427)->elements[0]));}
;; 
}

static void __lambda_269(void *data, object self_734429, int argc, object *args) /* object self_734429, object next_91a_73809_732445 */
 {
 object next_91a_73809_732445 = args[0];
  
closureN_type c_737186;
object e_737196 [6];
c_737186.hdr.mark = gc_color_red;
 c_737186.hdr.grayed = 0;
c_737186.tag = closureN_tag;
 c_737186.fn = (function_type)__lambda_270;
c_737186.num_args = 1;
c_737186.num_elements = 6;
c_737186.elements = (object *)e_737196;
c_737186.elements[0] = ((closureN)self_734429)->elements[0];
c_737186.elements[1] = ((closureN)self_734429)->elements[1];
c_737186.elements[2] = ((closureN)self_734429)->elements[2];
c_737186.elements[3] = next_91a_73809_732445;
c_737186.elements[4] = ((closureN)self_734429)->elements[3];
c_737186.elements[5] = ((closureN)self_734429)->elements[4];



return_direct_with_clo1(data,(closure)&c_737186,__lambda_270,  Cyc_car(data, next_91a_73809_732445));; 
}

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

return_closcall6(data,  car(((closureN)self_734430)->elements[4]),  ((closureN)self_734430)->elements[2], ((closureN)self_734430)->elements[0], r_733363, ((closureN)self_734430)->elements[3], ((closureN)self_734430)->elements[5], ((closureN)self_734430)->elements[1]);; 
}

static void __lambda_268(void *data, object self_734428, int argc, object *args) /* object self_734428, object r_733361 */
 {

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

static void __lambda_262(void *data, object self_734422, int argc, object *args) /* object self_734422, object r_733355 */
 {
 object r_733355 = args[0];
  if( (boolean_f != r_733355) ){ 
  
closureN_type c_737133;
object e_737137 [2];
c_737133.hdr.mark = gc_color_red;
 c_737133.hdr.grayed = 0;
c_737133.tag = closureN_tag;
 c_737133.fn = (function_type)__lambda_263;
c_737133.num_args = 1;
c_737133.num_elements = 2;
c_737133.elements = (object *)e_737137;
c_737133.elements[0] = ((closureN)self_734422)->elements[2];
c_737133.elements[1] = ((closureN)self_734422)->elements[3];


object c_737140 = Cyc_set_cdr_cps(data,(closure)&c_737133,((closureN)self_734422)->elements[1], ((closureN)self_734422)->elements[0]);
return_closcall1(data,(closure)&c_737133,  c_737140);
} else { 
  
closureN_type c_737144;
object e_737159 [5];
c_737144.hdr.mark = gc_color_red;
 c_737144.hdr.grayed = 0;
c_737144.tag = closureN_tag;
 c_737144.fn = (function_type)__lambda_264;
c_737144.num_args = 1;
c_737144.num_elements = 5;
c_737144.elements = (object *)e_737159;
c_737144.elements[0] = ((closureN)self_734422)->elements[0];
c_737144.elements[1] = ((closureN)self_734422)->elements[1];
c_737144.elements[2] = ((closureN)self_734422)->elements[3];
c_737144.elements[3] = ((closureN)self_734422)->elements[4];
c_737144.elements[4] = ((closureN)self_734422)->elements[5];



return_direct_with_clo1(data,(closure)&c_737144,__lambda_264,  Cyc_cdr(data, ((closureN)self_734422)->elements[1]));}
;; 
}

static void __lambda_264(void *data, object self_734424, int argc, object *args) /* object self_734424, object next_91b_73807_732444 */
 {
 object next_91b_73807_732444 = args[0];
  
closureN_type c_737146;
object e_737156 [6];
c_737146.hdr.mark = gc_color_red;
 c_737146.hdr.grayed = 0;
c_737146.tag = closureN_tag;
 c_737146.fn = (function_type)__lambda_265;
c_737146.num_args = 1;
c_737146.num_elements = 6;
c_737146.elements = (object *)e_737156;
c_737146.elements[0] = ((closureN)self_734424)->elements[0];
c_737146.elements[1] = ((closureN)self_734424)->elements[1];
c_737146.elements[2] = ((closureN)self_734424)->elements[2];
c_737146.elements[3] = next_91b_73807_732444;
c_737146.elements[4] = ((closureN)self_734424)->elements[3];
c_737146.elements[5] = ((closureN)self_734424)->elements[4];



return_direct_with_clo1(data,(closure)&c_737146,__lambda_265,  Cyc_car(data, next_91b_73807_732444));; 
}

static void __lambda_265(void *data, object self_734425, int argc, object *args) /* object self_734425, object r_733358 */
 {
 object r_733358 = args[0];
  

return_closcall6(data,  car(((closureN)self_734425)->elements[4]),  ((closureN)self_734425)->elements[2], ((closureN)self_734425)->elements[1], ((closureN)self_734425)->elements[5], ((closureN)self_734425)->elements[0], r_733358, ((closureN)self_734425)->elements[3]);; 
}

static void __lambda_263(void *data, object self_734423, int argc, object *args) /* object self_734423, object r_733356 */
 {

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

static void __lambda_238(void *data, object self_734431, int argc, object *args) /* object self_734431, object r_733352 */
 {
 object r_733352 = args[0];
  
closureN_type c_736981;
object e_737121 [9];
c_736981.hdr.mark = gc_color_red;
 c_736981.hdr.grayed = 0;
c_736981.tag = closureN_tag;
 c_736981.fn = (function_type)__lambda_239;
c_736981.num_args = 1;
c_736981.num_elements = 9;
c_736981.elements = (object *)e_737121;
c_736981.elements[0] = ((closureN)self_734431)->elements[0];
c_736981.elements[1] = ((closureN)self_734431)->elements[1];
c_736981.elements[2] = ((closureN)self_734431)->elements[2];
c_736981.elements[3] = ((closureN)self_734431)->elements[3];
c_736981.elements[4] = ((closureN)self_734431)->elements[4];
c_736981.elements[5] = ((closureN)self_734431)->elements[5];
c_736981.elements[6] = ((closureN)self_734431)->elements[6];
c_736981.elements[7] = ((closureN)self_734431)->elements[7];
c_736981.elements[8] = ((closureN)self_734431)->elements[8];



return_direct_with_clo1(data,(closure)&c_736981,__lambda_239,  Cyc_set_cell(data, ((closureN)self_734431)->elements[8], r_733352));; 
}

static void __lambda_239(void *data, object self_734432, int argc, object *args) /* object self_734432, object r_733331 */
 {

  
closureN_type c_736983;
object e_737102 [9];
c_736983.hdr.mark = gc_color_red;
 c_736983.hdr.grayed = 0;
c_736983.tag = closureN_tag;
 c_736983.fn = (function_type)__lambda_240;
c_736983.num_args = 1;
c_736983.num_elements = 9;
c_736983.elements = (object *)e_737102;
c_736983.elements[0] = ((closureN)self_734432)->elements[0];
c_736983.elements[1] = ((closureN)self_734432)->elements[1];
c_736983.elements[2] = ((closureN)self_734432)->elements[2];
c_736983.elements[3] = ((closureN)self_734432)->elements[3];
c_736983.elements[4] = ((closureN)self_734432)->elements[4];
c_736983.elements[5] = ((closureN)self_734432)->elements[5];
c_736983.elements[6] = ((closureN)self_734432)->elements[6];
c_736983.elements[7] = ((closureN)self_734432)->elements[7];
c_736983.elements[8] = ((closureN)self_734432)->elements[8];


mclosure0(c_737103, (function_type)__lambda_258);c_737103.num_args = 2;
return_direct_with_clo1(data,(closure)&c_736983,__lambda_240,  &c_737103);; 
}

static void __lambda_258(void *data, object self_734433, int argc, object *args) /* object self_734433, object k_733349, object pair_73810_732446, object val_73811_732447 */
 {
 object k_733349 = args[0]; object pair_73810_732446 = args[1]; object val_73811_732447 = args[2];
  
closureN_type c_737105;
object e_737118 [3];
c_737105.hdr.mark = gc_color_red;
 c_737105.hdr.grayed = 0;
c_737105.tag = closureN_tag;
 c_737105.fn = (function_type)__lambda_259;
c_737105.num_args = 1;
c_737105.num_elements = 3;
c_737105.elements = (object *)e_737118;
c_737105.elements[0] = k_733349;
c_737105.elements[1] = pair_73810_732446;
c_737105.elements[2] = val_73811_732447;



return_direct_with_clo1(data,(closure)&c_737105,__lambda_259,  Cyc_cdr(data, pair_73810_732446));; 
}

static void __lambda_259(void *data, object self_734434, int argc, object *args) /* object self_734434, object r_733351 */
 {
 object r_733351 = args[0];
    
if( (boolean_f != Cyc_eq(r_733351, ((closureN)self_734434)->elements[2])) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734434)->elements[0], (((closure)  ((closureN)self_734434)->elements[0])->fn),  Cyc_VOID);
} else { 
  
object c_737115 = Cyc_set_cdr_cps(data,  ((closureN)self_734434)->elements[0],((closureN)self_734434)->elements[1], ((closureN)self_734434)->elements[2]);
return_direct_with_clo1(data,  ((closureN)self_734434)->elements[0], (((closure)  ((closureN)self_734434)->elements[0])->fn),  c_737115);}
;; 
}

static void __lambda_240(void *data, object self_734435, int argc, object *args) /* object self_734435, object r_733348 */
 {
 object r_733348 = args[0];
  
closureN_type c_736985;
object e_737098 [9];
c_736985.hdr.mark = gc_color_red;
 c_736985.hdr.grayed = 0;
c_736985.tag = closureN_tag;
 c_736985.fn = (function_type)__lambda_241;
c_736985.num_args = 1;
c_736985.num_elements = 9;
c_736985.elements = (object *)e_737098;
c_736985.elements[0] = ((closureN)self_734435)->elements[0];
c_736985.elements[1] = ((closureN)self_734435)->elements[1];
c_736985.elements[2] = ((closureN)self_734435)->elements[2];
c_736985.elements[3] = ((closureN)self_734435)->elements[3];
c_736985.elements[4] = ((closureN)self_734435)->elements[4];
c_736985.elements[5] = ((closureN)self_734435)->elements[5];
c_736985.elements[6] = ((closureN)self_734435)->elements[6];
c_736985.elements[7] = ((closureN)self_734435)->elements[7];
c_736985.elements[8] = ((closureN)self_734435)->elements[8];



return_direct_with_clo1(data,(closure)&c_736985,__lambda_241,  Cyc_set_cell(data, ((closureN)self_734435)->elements[6], r_733348));; 
}

static void __lambda_241(void *data, object self_734436, int argc, object *args) /* object self_734436, object r_733332 */
 {

  
closureN_type c_736987;
object e_737094 [9];
c_736987.hdr.mark = gc_color_red;
 c_736987.hdr.grayed = 0;
c_736987.tag = closureN_tag;
 c_736987.fn = (function_type)__lambda_242;
c_736987.num_args = 1;
c_736987.num_elements = 9;
c_736987.elements = (object *)e_737094;
c_736987.elements[0] = ((closureN)self_734436)->elements[0];
c_736987.elements[1] = ((closureN)self_734436)->elements[1];
c_736987.elements[2] = ((closureN)self_734436)->elements[2];
c_736987.elements[3] = ((closureN)self_734436)->elements[3];
c_736987.elements[4] = ((closureN)self_734436)->elements[4];
c_736987.elements[5] = ((closureN)self_734436)->elements[5];
c_736987.elements[6] = ((closureN)self_734436)->elements[6];
c_736987.elements[7] = ((closureN)self_734436)->elements[7];
c_736987.elements[8] = ((closureN)self_734436)->elements[8];



return_direct_with_clo1(data,(closure)&c_736987,__lambda_242,  Cyc_car(data, ((closureN)self_734436)->elements[0]));; 
}

static void __lambda_242(void *data, object self_734437, int argc, object *args) /* object self_734437, object r_733333 */
 {
 object r_733333 = args[0];
  
closureN_type c_736989;
object e_737090 [10];
c_736989.hdr.mark = gc_color_red;
 c_736989.hdr.grayed = 0;
c_736989.tag = closureN_tag;
 c_736989.fn = (function_type)__lambda_243;
c_736989.num_args = 1;
c_736989.num_elements = 10;
c_736989.elements = (object *)e_737090;
c_736989.elements[0] = ((closureN)self_734437)->elements[0];
c_736989.elements[1] = ((closureN)self_734437)->elements[1];
c_736989.elements[2] = ((closureN)self_734437)->elements[2];
c_736989.elements[3] = ((closureN)self_734437)->elements[3];
c_736989.elements[4] = ((closureN)self_734437)->elements[4];
c_736989.elements[5] = ((closureN)self_734437)->elements[5];
c_736989.elements[6] = ((closureN)self_734437)->elements[6];
c_736989.elements[7] = r_733333;
c_736989.elements[8] = ((closureN)self_734437)->elements[7];
c_736989.elements[9] = ((closureN)self_734437)->elements[8];



return_direct_with_clo1(data,(closure)&c_736989,__lambda_243,  Cyc_car(data, ((closureN)self_734437)->elements[1]));; 
}

static void __lambda_243(void *data, object self_734438, int argc, object *args) /* object self_734438, object r_733334 */
 {
 object r_733334 = args[0];
  
closureN_type c_736991;
object e_737088 [9];
c_736991.hdr.mark = gc_color_red;
 c_736991.hdr.grayed = 0;
c_736991.tag = closureN_tag;
 c_736991.fn = (function_type)__lambda_244;
c_736991.num_args = 2;
c_736991.num_elements = 9;
c_736991.elements = (object *)e_737088;
c_736991.elements[0] = ((closureN)self_734438)->elements[0];
c_736991.elements[1] = ((closureN)self_734438)->elements[1];
c_736991.elements[2] = ((closureN)self_734438)->elements[2];
c_736991.elements[3] = ((closureN)self_734438)->elements[3];
c_736991.elements[4] = ((closureN)self_734438)->elements[4];
c_736991.elements[5] = ((closureN)self_734438)->elements[5];
c_736991.elements[6] = ((closureN)self_734438)->elements[6];
c_736991.elements[7] = ((closureN)self_734438)->elements[8];
c_736991.elements[8] = ((closureN)self_734438)->elements[9];

return_direct_with_clo2(data,(closure)&c_736991,__lambda_244,  ((closureN)self_734438)->elements[7], r_733334);; 
}

static void __lambda_244(void *data, object self_734439, int argc, object *args) /* object self_734439, object x_73812_732448, object y_73813_732449 */
 {
 object x_73812_732448 = args[0]; object y_73813_732449 = args[1];
  
closureN_type c_736994;
object e_737087 [10];
c_736994.hdr.mark = gc_color_red;
 c_736994.hdr.grayed = 0;
c_736994.tag = closureN_tag;
 c_736994.fn = (function_type)__lambda_245;
c_736994.num_args = 1;
c_736994.num_elements = 10;
c_736994.elements = (object *)e_737087;
c_736994.elements[0] = ((closureN)self_734439)->elements[0];
c_736994.elements[1] = ((closureN)self_734439)->elements[1];
c_736994.elements[2] = ((closureN)self_734439)->elements[3];
c_736994.elements[3] = ((closureN)self_734439)->elements[4];
c_736994.elements[4] = ((closureN)self_734439)->elements[5];
c_736994.elements[5] = ((closureN)self_734439)->elements[6];
c_736994.elements[6] = ((closureN)self_734439)->elements[7];
c_736994.elements[7] = ((closureN)self_734439)->elements[8];
c_736994.elements[8] = x_73812_732448;
c_736994.elements[9] = y_73813_732449;

return_closcall3(data,  ((closureN)self_734439)->elements[2],  &c_736994, y_73813_732449, x_73812_732448);; 
}

static void __lambda_245(void *data, object self_734440, int argc, object *args) /* object self_734440, object r_733335 */
 {
 object r_733335 = args[0];
  if( (boolean_f != r_733335) ){ 
  
closureN_type c_736996;
object e_737035 [6];
c_736996.hdr.mark = gc_color_red;
 c_736996.hdr.grayed = 0;
c_736996.tag = closureN_tag;
 c_736996.fn = (function_type)__lambda_246;
c_736996.num_args = 0;
c_736996.num_elements = 6;
c_736996.elements = (object *)e_737035;
c_736996.elements[0] = ((closureN)self_734440)->elements[0];
c_736996.elements[1] = ((closureN)self_734440)->elements[1];
c_736996.elements[2] = ((closureN)self_734440)->elements[2];
c_736996.elements[3] = ((closureN)self_734440)->elements[3];
c_736996.elements[4] = ((closureN)self_734440)->elements[7];
c_736996.elements[5] = ((closureN)self_734440)->elements[8];


closureN_type c_737036;
object e_737040 [2];
c_737036.hdr.mark = gc_color_red;
 c_737036.hdr.grayed = 0;
c_737036.tag = closureN_tag;
 c_737036.fn = (function_type)__lambda_251;
c_737036.num_args = 1;
c_737036.num_elements = 2;
c_737036.elements = (object *)e_737040;
c_737036.elements[0] = ((closureN)self_734440)->elements[1];
c_737036.elements[1] = ((closureN)self_734440)->elements[4];

return_direct_with_clo1(data,(closure)&c_736996,__lambda_246,  &c_737036);
} else { 
  
closureN_type c_737042;
object e_737081 [7];
c_737042.hdr.mark = gc_color_red;
 c_737042.hdr.grayed = 0;
c_737042.tag = closureN_tag;
 c_737042.fn = (function_type)__lambda_252;
c_737042.num_args = 0;
c_737042.num_elements = 7;
c_737042.elements = (object *)e_737081;
c_737042.elements[0] = ((closureN)self_734440)->elements[0];
c_737042.elements[1] = ((closureN)self_734440)->elements[1];
c_737042.elements[2] = ((closureN)self_734440)->elements[2];
c_737042.elements[3] = ((closureN)self_734440)->elements[3];
c_737042.elements[4] = ((closureN)self_734440)->elements[5];
c_737042.elements[5] = ((closureN)self_734440)->elements[6];
c_737042.elements[6] = ((closureN)self_734440)->elements[9];


closureN_type c_737082;
object e_737086 [2];
c_737082.hdr.mark = gc_color_red;
 c_737082.hdr.grayed = 0;
c_737082.tag = closureN_tag;
 c_737082.fn = (function_type)__lambda_257;
c_737082.num_args = 1;
c_737082.num_elements = 2;
c_737082.elements = (object *)e_737086;
c_737082.elements[0] = ((closureN)self_734440)->elements[0];
c_737082.elements[1] = ((closureN)self_734440)->elements[4];

return_direct_with_clo1(data,(closure)&c_737042,__lambda_252,  &c_737082);}
;; 
}

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

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



return_direct_with_clo1(data,(closure)&c_737044,__lambda_253,  Cyc_eq(((closureN)self_734448)->elements[0], ((closureN)self_734448)->elements[2]));; 
}

static void __lambda_253(void *data, object self_734449, int argc, object *args) /* object self_734449, object r_733344 */
 {
 object r_733344 = args[0];
  if( (boolean_f != r_733344) ){ 
  


closureN_type c_737049;
object e_737053 [2];
c_737049.hdr.mark = gc_color_red;
 c_737049.hdr.grayed = 0;
c_737049.tag = closureN_tag;
 c_737049.fn = (function_type)__lambda_254;
c_737049.num_args = 1;
c_737049.num_elements = 2;
c_737049.elements = (object *)e_737053;
c_737049.elements[0] = ((closureN)self_734449)->elements[2];
c_737049.elements[1] = ((closureN)self_734449)->elements[3];

return_closcall3(data,  car(((closureN)self_734449)->elements[4]),  &c_737049, ((closureN)self_734449)->elements[0], ((closureN)self_734449)->elements[1]);
} else { 
  
closureN_type c_737057;
object e_737072 [5];
c_737057.hdr.mark = gc_color_red;
 c_737057.hdr.grayed = 0;
c_737057.tag = closureN_tag;
 c_737057.fn = (function_type)__lambda_255;
c_737057.num_args = 1;
c_737057.num_elements = 5;
c_737057.elements = (object *)e_737072;
c_737057.elements[0] = ((closureN)self_734449)->elements[0];
c_737057.elements[1] = ((closureN)self_734449)->elements[1];
c_737057.elements[2] = ((closureN)self_734449)->elements[3];
c_737057.elements[3] = ((closureN)self_734449)->elements[5];
c_737057.elements[4] = ((closureN)self_734449)->elements[6];



return_direct_with_clo1(data,(closure)&c_737057,__lambda_255,  Cyc_cdr(data, ((closureN)self_734449)->elements[0]));}
;; 
}

static void __lambda_255(void *data, object self_734451, int argc, object *args) /* object self_734451, object next_91a_73815_732451 */
 {
 object next_91a_73815_732451 = args[0];
  
closureN_type c_737059;
object e_737069 [6];
c_737059.hdr.mark = gc_color_red;
 c_737059.hdr.grayed = 0;
c_737059.tag = closureN_tag;
 c_737059.fn = (function_type)__lambda_256;
c_737059.num_args = 1;
c_737059.num_elements = 6;
c_737059.elements = (object *)e_737069;
c_737059.elements[0] = ((closureN)self_734451)->elements[0];
c_737059.elements[1] = ((closureN)self_734451)->elements[1];
c_737059.elements[2] = ((closureN)self_734451)->elements[2];
c_737059.elements[3] = next_91a_73815_732451;
c_737059.elements[4] = ((closureN)self_734451)->elements[3];
c_737059.elements[5] = ((closureN)self_734451)->elements[4];



return_direct_with_clo1(data,(closure)&c_737059,__lambda_256,  Cyc_car(data, next_91a_73815_732451));; 
}

static void __lambda_256(void *data, object self_734452, int argc, object *args) /* object self_734452, object r_733347 */
 {
 object r_733347 = args[0];
  

return_closcall6(data,  car(((closureN)self_734452)->elements[4]),  ((closureN)self_734452)->elements[2], ((closureN)self_734452)->elements[0], r_733347, ((closureN)self_734452)->elements[3], ((closureN)self_734452)->elements[5], ((closureN)self_734452)->elements[1]);; 
}

static void __lambda_254(void *data, object self_734450, int argc, object *args) /* object self_734450, object r_733345 */
 {

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

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

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



return_direct_with_clo1(data,(closure)&c_736998,__lambda_247,  Cyc_eq(((closureN)self_734442)->elements[1], ((closureN)self_734442)->elements[3]));; 
}

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


object c_737007 = Cyc_set_cdr_cps(data,(closure)&c_737000,((closureN)self_734443)->elements[1], ((closureN)self_734443)->elements[0]);
return_closcall1(data,(closure)&c_737000,  c_737007);
} else { 
  
closureN_type c_737011;
object e_737026 [5];
c_737011.hdr.mark = gc_color_red;
 c_737011.hdr.grayed = 0;
c_737011.tag = closureN_tag;
 c_737011.fn = (function_type)__lambda_249;
c_737011.num_args = 1;
c_737011.num_elements = 5;
c_737011.elements = (object *)e_737026;
c_737011.elements[0] = ((closureN)self_734443)->elements[0];
c_737011.elements[1] = ((closureN)self_734443)->elements[1];
c_737011.elements[2] = ((closureN)self_734443)->elements[3];
c_737011.elements[3] = ((closureN)self_734443)->elements[4];
c_737011.elements[4] = ((closureN)self_734443)->elements[5];



return_direct_with_clo1(data,(closure)&c_737011,__lambda_249,  Cyc_cdr(data, ((closureN)self_734443)->elements[1]));}
;; 
}

static void __lambda_249(void *data, object self_734445, int argc, object *args) /* object self_734445, object next_91b_73814_732450 */
 {
 object next_91b_73814_732450 = args[0];
  
closureN_type c_737013;
object e_737023 [6];
c_737013.hdr.mark = gc_color_red;
 c_737013.hdr.grayed = 0;
c_737013.tag = closureN_tag;
 c_737013.fn = (function_type)__lambda_250;
c_737013.num_args = 1;
c_737013.num_elements = 6;
c_737013.elements = (object *)e_737023;
c_737013.elements[0] = ((closureN)self_734445)->elements[0];
c_737013.elements[1] = ((closureN)self_734445)->elements[1];
c_737013.elements[2] = ((closureN)self_734445)->elements[2];
c_737013.elements[3] = next_91b_73814_732450;
c_737013.elements[4] = ((closureN)self_734445)->elements[3];
c_737013.elements[5] = ((closureN)self_734445)->elements[4];



return_direct_with_clo1(data,(closure)&c_737013,__lambda_250,  Cyc_car(data, next_91b_73814_732450));; 
}

static void __lambda_250(void *data, object self_734446, int argc, object *args) /* object self_734446, object r_733341 */
 {
 object r_733341 = args[0];
  

return_closcall6(data,  car(((closureN)self_734446)->elements[4]),  ((closureN)self_734446)->elements[2], ((closureN)self_734446)->elements[1], ((closureN)self_734446)->elements[5], ((closureN)self_734446)->elements[0], r_733341, ((closureN)self_734446)->elements[3]);; 
}

static void __lambda_248(void *data, object self_734444, int argc, object *args) /* object self_734444, object r_733339 */
 {

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

static void __lambda_202(void *data, object self_734453, int argc, object *args) /* object self_734453, object r_733328 */
 {
 object r_733328 = args[0];
  
closureN_type c_736767;
object e_736960 [5];
c_736767.hdr.mark = gc_color_red;
 c_736767.hdr.grayed = 0;
c_736767.tag = closureN_tag;
 c_736767.fn = (function_type)__lambda_203;
c_736767.num_args = 1;
c_736767.num_elements = 5;
c_736767.elements = (object *)e_736960;
c_736767.elements[0] = ((closureN)self_734453)->elements[0];
c_736767.elements[1] = ((closureN)self_734453)->elements[1];
c_736767.elements[2] = ((closureN)self_734453)->elements[2];
c_736767.elements[3] = ((closureN)self_734453)->elements[3];
c_736767.elements[4] = ((closureN)self_734453)->elements[4];



return_direct_with_clo1(data,(closure)&c_736767,__lambda_203,  Cyc_set_cell(data, ((closureN)self_734453)->elements[4], r_733328));; 
}

static void __lambda_203(void *data, object self_734454, int argc, object *args) /* object self_734454, object r_733290 */
 {

  
closureN_type c_736769;
object e_736828 [4];
c_736769.hdr.mark = gc_color_red;
 c_736769.hdr.grayed = 0;
c_736769.tag = closureN_tag;
 c_736769.fn = (function_type)__lambda_204;
c_736769.num_args = 1;
c_736769.num_elements = 4;
c_736769.elements = (object *)e_736828;
c_736769.elements[0] = ((closureN)self_734454)->elements[0];
c_736769.elements[1] = ((closureN)self_734454)->elements[1];
c_736769.elements[2] = ((closureN)self_734454)->elements[2];
c_736769.elements[3] = ((closureN)self_734454)->elements[3];


closureN_type c_736829;
object e_736959 [3];
c_736829.hdr.mark = gc_color_red;
 c_736829.hdr.grayed = 0;
c_736829.tag = closureN_tag;
 c_736829.fn = (function_type)__lambda_215;
c_736829.num_args = 6;
c_736829.num_elements = 3;
c_736829.elements = (object *)e_736959;
c_736829.elements[0] = ((closureN)self_734454)->elements[0];
c_736829.elements[1] = ((closureN)self_734454)->elements[1];
c_736829.elements[2] = ((closureN)self_734454)->elements[4];

return_direct_with_clo1(data,(closure)&c_736769,__lambda_204,  &c_736829);; 
}

static void __lambda_215(void *data, object self_734455, int argc, object *args) /* object self_734455, object k_733304, object s_73816_732452, object ends_73817_732453, object ls_73818_732454, object ls2_73819_732455, object u_73820_732456, object lw_73821_732457 */
 {
 object k_733304 = args[0]; object s_73816_732452 = args[1]; object ends_73817_732453 = args[2]; object ls_73818_732454 = args[3]; object ls2_73819_732455 = args[4]; object u_73820_732456 = args[5]; object lw_73821_732457 = args[6];
  object r_733305;
    
if( (boolean_f != Cyc_is_pair(u_73820_732456)) ){ 
  
  r_733305 = Cyc_num_fast_lt_op(data, ls_73818_732454, lw_73821_732457);
} else { 
  r_733305 = boolean_f;}
;if( (boolean_f != r_733305) ){ 
  
closureN_type c_736838;
object e_736957 [9];
c_736838.hdr.mark = gc_color_red;
 c_736838.hdr.grayed = 0;
c_736838.tag = closureN_tag;
 c_736838.fn = (function_type)__lambda_216;
c_736838.num_args = 1;
c_736838.num_elements = 9;
c_736838.elements = (object *)e_736957;
c_736838.elements[0] = ends_73817_732453;
c_736838.elements[1] = ((closureN)self_734455)->elements[0];
c_736838.elements[2] = ((closureN)self_734455)->elements[1];
c_736838.elements[3] = k_733304;
c_736838.elements[4] = ls_73818_732454;
c_736838.elements[5] = lw_73821_732457;
c_736838.elements[6] = ((closureN)self_734455)->elements[2];
c_736838.elements[7] = s_73816_732452;
c_736838.elements[8] = u_73820_732456;

return_direct_with_clo1(data,(closure)&c_736838,__lambda_216,  ls2_73819_732455);
} else { 
  return_direct_with_clo5(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_733304, s_73816_732452, ends_73817_732453, ls_73818_732454, u_73820_732456);}
;; 
}

static void __lambda_216(void *data, object self_734456, int argc, object *args) /* object self_734456, object ls2_731094_732468 */
 {
 object ls2_731094_732468 = args[0];
  
closureN_type c_736840;
object e_736956 [10];
c_736840.hdr.mark = gc_color_red;
 c_736840.hdr.grayed = 0;
c_736840.tag = closureN_tag;
 c_736840.fn = (function_type)__lambda_217;
c_736840.num_args = 1;
c_736840.num_elements = 10;
c_736840.elements = (object *)e_736956;
c_736840.elements[0] = ((closureN)self_734456)->elements[0];
c_736840.elements[1] = ((closureN)self_734456)->elements[1];
c_736840.elements[2] = ((closureN)self_734456)->elements[2];
c_736840.elements[3] = ((closureN)self_734456)->elements[3];
c_736840.elements[4] = ((closureN)self_734456)->elements[4];
c_736840.elements[5] = ls2_731094_732468;
c_736840.elements[6] = ((closureN)self_734456)->elements[5];
c_736840.elements[7] = ((closureN)self_734456)->elements[6];
c_736840.elements[8] = ((closureN)self_734456)->elements[7];
c_736840.elements[9] = ((closureN)self_734456)->elements[8];

return_direct_with_clo1(data,(closure)&c_736840,__lambda_217,  boolean_f);; 
}

static void __lambda_217(void *data, object self_734457, int argc, object *args) /* object self_734457, object lp_731095_732469 */
 {
 object lp_731095_732469 = args[0];
  
closureN_type c_736842;
object e_736952 [10];
c_736842.hdr.mark = gc_color_red;
 c_736842.hdr.grayed = 0;
c_736842.tag = closureN_tag;
 c_736842.fn = (function_type)__lambda_780;
c_736842.num_args = 1;
c_736842.num_elements = 10;
c_736842.elements = (object *)e_736952;
c_736842.elements[0] = ((closureN)self_734457)->elements[0];
c_736842.elements[1] = ((closureN)self_734457)->elements[1];
c_736842.elements[2] = ((closureN)self_734457)->elements[2];
c_736842.elements[3] = ((closureN)self_734457)->elements[3];
c_736842.elements[4] = ((closureN)self_734457)->elements[4];
c_736842.elements[5] = ((closureN)self_734457)->elements[5];
c_736842.elements[6] = ((closureN)self_734457)->elements[6];
c_736842.elements[7] = ((closureN)self_734457)->elements[7];
c_736842.elements[8] = ((closureN)self_734457)->elements[8];
c_736842.elements[9] = ((closureN)self_734457)->elements[9];


pair_type local_736955; 
return_direct_with_clo1(data,(closure)&c_736842,__lambda_780,  set_cell_as_expr(&local_736955, lp_731095_732469));; 
}

static void __lambda_780(void *data, object self_734458, int argc, object *args) /* object self_734458, object lp_731095_732469 */
 {
 object lp_731095_732469 = args[0];
  
closureN_type c_736844;
object e_736935 [11];
c_736844.hdr.mark = gc_color_red;
 c_736844.hdr.grayed = 0;
c_736844.tag = closureN_tag;
 c_736844.fn = (function_type)__lambda_218;
c_736844.num_args = 1;
c_736844.num_elements = 11;
c_736844.elements = (object *)e_736935;
c_736844.elements[0] = ((closureN)self_734458)->elements[0];
c_736844.elements[1] = ((closureN)self_734458)->elements[1];
c_736844.elements[2] = ((closureN)self_734458)->elements[2];
c_736844.elements[3] = ((closureN)self_734458)->elements[3];
c_736844.elements[4] = lp_731095_732469;
c_736844.elements[5] = ((closureN)self_734458)->elements[4];
c_736844.elements[6] = ((closureN)self_734458)->elements[5];
c_736844.elements[7] = ((closureN)self_734458)->elements[6];
c_736844.elements[8] = ((closureN)self_734458)->elements[7];
c_736844.elements[9] = ((closureN)self_734458)->elements[8];
c_736844.elements[10] = ((closureN)self_734458)->elements[9];


closureN_type c_736936;
object e_736951 [2];
c_736936.hdr.mark = gc_color_red;
 c_736936.hdr.grayed = 0;
c_736936.tag = closureN_tag;
 c_736936.fn = (function_type)__lambda_233;
c_736936.num_args = 1;
c_736936.num_elements = 2;
c_736936.elements = (object *)e_736951;
c_736936.elements[0] = lp_731095_732469;
c_736936.elements[1] = ((closureN)self_734458)->elements[4];

return_direct_with_clo1(data,(closure)&c_736844,__lambda_218,  &c_736936);; 
}

static void __lambda_233(void *data, object self_734459, int argc, object *args) /* object self_734459, object k_733323, object ls2_731096_732470 */
 {
 object k_733323 = args[0]; object ls2_731096_732470 = args[1];
    
  complex_num_type local_736941; 
if( (boolean_f != Cyc_num_fast_lte_op(data, Cyc_fast_sum(data,&local_736941, ls2_731096_732470, ls2_731096_732470), ((closureN)self_734459)->elements[1])) ){ 
  


complex_num_type local_736949; 
return_closcall2(data,  car(((closureN)self_734459)->elements[0]),  k_733323, Cyc_fast_sum(data,&local_736949, ls2_731096_732470, ls2_731096_732470));
} else { 
  return_direct_with_clo1(data,  k_733323, (((closure)  k_733323)->fn),  ls2_731096_732470);}
;; 
}

static void __lambda_218(void *data, object self_734460, int argc, object *args) /* object self_734460, object r_733322 */
 {
 object r_733322 = args[0];
  
closureN_type c_736846;
object e_736931 [11];
c_736846.hdr.mark = gc_color_red;
 c_736846.hdr.grayed = 0;
c_736846.tag = closureN_tag;
 c_736846.fn = (function_type)__lambda_219;
c_736846.num_args = 1;
c_736846.num_elements = 11;
c_736846.elements = (object *)e_736931;
c_736846.elements[0] = ((closureN)self_734460)->elements[0];
c_736846.elements[1] = ((closureN)self_734460)->elements[1];
c_736846.elements[2] = ((closureN)self_734460)->elements[2];
c_736846.elements[3] = ((closureN)self_734460)->elements[3];
c_736846.elements[4] = ((closureN)self_734460)->elements[4];
c_736846.elements[5] = ((closureN)self_734460)->elements[5];
c_736846.elements[6] = ((closureN)self_734460)->elements[6];
c_736846.elements[7] = ((closureN)self_734460)->elements[7];
c_736846.elements[8] = ((closureN)self_734460)->elements[8];
c_736846.elements[9] = ((closureN)self_734460)->elements[9];
c_736846.elements[10] = ((closureN)self_734460)->elements[10];



return_direct_with_clo1(data,(closure)&c_736846,__lambda_219,  Cyc_set_cell(data, ((closureN)self_734460)->elements[4], r_733322));; 
}

static void __lambda_219(void *data, object self_734461, int argc, object *args) /* object self_734461, object r_733321 */
 {

  


closureN_type c_736851;
object e_736929 [9];
c_736851.hdr.mark = gc_color_red;
 c_736851.hdr.grayed = 0;
c_736851.tag = closureN_tag;
 c_736851.fn = (function_type)__lambda_220;
c_736851.num_args = 1;
c_736851.num_elements = 9;
c_736851.elements = (object *)e_736929;
c_736851.elements[0] = ((closureN)self_734461)->elements[0];
c_736851.elements[1] = ((closureN)self_734461)->elements[1];
c_736851.elements[2] = ((closureN)self_734461)->elements[2];
c_736851.elements[3] = ((closureN)self_734461)->elements[3];
c_736851.elements[4] = ((closureN)self_734461)->elements[5];
c_736851.elements[5] = ((closureN)self_734461)->elements[7];
c_736851.elements[6] = ((closureN)self_734461)->elements[8];
c_736851.elements[7] = ((closureN)self_734461)->elements[9];
c_736851.elements[8] = ((closureN)self_734461)->elements[10];

return_closcall2(data,  car(((closureN)self_734461)->elements[4]),  &c_736851, ((closureN)self_734461)->elements[6]);; 
}

static void __lambda_220(void *data, object self_734462, int argc, object *args) /* object self_734462, object ls2_73876_732458 */
 {
 object ls2_73876_732458 = args[0];
  
closureN_type c_736853;
object e_736921 [9];
c_736853.hdr.mark = gc_color_red;
 c_736853.hdr.grayed = 0;
c_736853.tag = closureN_tag;
 c_736853.fn = (function_type)__lambda_221;
c_736853.num_args = 1;
c_736853.num_elements = 9;
c_736853.elements = (object *)e_736921;
c_736853.elements[0] = ((closureN)self_734462)->elements[0];
c_736853.elements[1] = ((closureN)self_734462)->elements[2];
c_736853.elements[2] = ((closureN)self_734462)->elements[3];
c_736853.elements[3] = ((closureN)self_734462)->elements[4];
c_736853.elements[4] = ls2_73876_732458;
c_736853.elements[5] = ((closureN)self_734462)->elements[5];
c_736853.elements[6] = ((closureN)self_734462)->elements[6];
c_736853.elements[7] = ((closureN)self_734462)->elements[7];
c_736853.elements[8] = ((closureN)self_734462)->elements[8];


closureN_type c_736922;
object e_736928 [2];
c_736922.hdr.mark = gc_color_red;
 c_736922.hdr.grayed = 0;
c_736922.tag = closureN_tag;
 c_736922.fn = (function_type)__lambda_232;
c_736922.num_args = 0;
c_736922.num_elements = 2;
c_736922.elements = (object *)e_736928;
c_736922.elements[0] = ((closureN)self_734462)->elements[1];
c_736922.elements[1] = ((closureN)self_734462)->elements[8];

return_direct_with_clo1(data,(closure)&c_736853,__lambda_221,  &c_736922);; 
}

static void __lambda_232(void *data, object self_734463, int argc, object *args) /* object self_734463, object k_733320 */
 {
 object k_733320 = args[0];
  

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

static void __lambda_221(void *data, object self_734464, int argc, object *args) /* object self_734464, object r_733307 */
 {
 object r_733307 = args[0];
  
closureN_type c_736855;
object e_736859 [2];
c_736855.hdr.mark = gc_color_red;
 c_736855.hdr.grayed = 0;
c_736855.tag = closureN_tag;
 c_736855.fn = (function_type)__lambda_222;
c_736855.num_args = 1;
c_736855.num_elements = 2;
c_736855.elements = (object *)e_736859;
c_736855.elements[0] = ((closureN)self_734464)->elements[2];
c_736855.elements[1] = r_733307;


closureN_type c_736860;
object e_736920 [8];
c_736860.hdr.mark = gc_color_red;
 c_736860.hdr.grayed = 0;
c_736860.tag = closureN_tag;
 c_736860.fn = (function_type)__lambda_223;
c_736860.num_args = 3;
c_736860.num_elements = 8;
c_736860.elements = (object *)e_736920;
c_736860.elements[0] = ((closureN)self_734464)->elements[0];
c_736860.elements[1] = ((closureN)self_734464)->elements[1];
c_736860.elements[2] = ((closureN)self_734464)->elements[3];
c_736860.elements[3] = ((closureN)self_734464)->elements[4];
c_736860.elements[4] = ((closureN)self_734464)->elements[5];
c_736860.elements[5] = ((closureN)self_734464)->elements[6];
c_736860.elements[6] = ((closureN)self_734464)->elements[7];
c_736860.elements[7] = ((closureN)self_734464)->elements[8];

return_direct_with_clo1(data,(closure)&c_736855,__lambda_222,  &c_736860);; 
}

static void __lambda_223(void *data, object self_734465, int argc, object *args) /* object self_734465, object k_733309, object lr_73929_732459, object endr_73930_732460, object u2_73931_732461 */
 {
 object k_733309 = args[0]; object lr_73929_732459 = args[1]; object endr_73930_732460 = args[2]; object u2_73931_732461 = args[3];
  
closureN_type c_736862;
object e_736908 [8];
c_736862.hdr.mark = gc_color_red;
 c_736862.hdr.grayed = 0;
c_736862.tag = closureN_tag;
 c_736862.fn = (function_type)__lambda_224;
c_736862.num_args = 1;
c_736862.num_elements = 8;
c_736862.elements = (object *)e_736908;
c_736862.elements[0] = ((closureN)self_734465)->elements[0];
c_736862.elements[1] = ((closureN)self_734465)->elements[1];
c_736862.elements[2] = k_733309;
c_736862.elements[3] = ((closureN)self_734465)->elements[2];
c_736862.elements[4] = ((closureN)self_734465)->elements[3];
c_736862.elements[5] = ((closureN)self_734465)->elements[4];
c_736862.elements[6] = ((closureN)self_734465)->elements[5];
c_736862.elements[7] = ((closureN)self_734465)->elements[6];


closureN_type c_736909;
object e_736919 [6];
c_736909.hdr.mark = gc_color_red;
 c_736909.hdr.grayed = 0;
c_736909.tag = closureN_tag;
 c_736909.fn = (function_type)__lambda_231;
c_736909.num_args = 0;
c_736909.num_elements = 6;
c_736909.elements = (object *)e_736919;
c_736909.elements[0] = endr_73930_732460;
c_736909.elements[1] = ((closureN)self_734465)->elements[1];
c_736909.elements[2] = lr_73929_732459;
c_736909.elements[3] = ((closureN)self_734465)->elements[3];
c_736909.elements[4] = ((closureN)self_734465)->elements[7];
c_736909.elements[5] = u2_73931_732461;

return_direct_with_clo1(data,(closure)&c_736862,__lambda_224,  &c_736909);; 
}

static void __lambda_231(void *data, object self_734466, int argc, object *args) /* object self_734466, object k_733319 */
 {
 object k_733319 = args[0];
  

return_closcall7(data,  car(((closureN)self_734466)->elements[1]),  k_733319, ((closureN)self_734466)->elements[4], ((closureN)self_734466)->elements[0], ((closureN)self_734466)->elements[2], obj_int2obj(1), ((closureN)self_734466)->elements[5], ((closureN)self_734466)->elements[3]);; 
}

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


closureN_type c_736869;
object e_736907 [7];
c_736869.hdr.mark = gc_color_red;
 c_736869.hdr.grayed = 0;
c_736869.tag = closureN_tag;
 c_736869.fn = (function_type)__lambda_226;
c_736869.num_args = 4;
c_736869.num_elements = 7;
c_736869.elements = (object *)e_736907;
c_736869.elements[0] = ((closureN)self_734467)->elements[0];
c_736869.elements[1] = ((closureN)self_734467)->elements[1];
c_736869.elements[2] = ((closureN)self_734467)->elements[3];
c_736869.elements[3] = ((closureN)self_734467)->elements[4];
c_736869.elements[4] = ((closureN)self_734467)->elements[5];
c_736869.elements[5] = ((closureN)self_734467)->elements[6];
c_736869.elements[6] = ((closureN)self_734467)->elements[7];

return_direct_with_clo1(data,(closure)&c_736864,__lambda_225,  &c_736869);; 
}

static void __lambda_226(void *data, object self_734468, int argc, object *args) /* object self_734468, object k_733312, object t_73984_732462, object endt_73985_732463, object lt_73986_732464, object u3_73987_732465 */
 {
 object k_733312 = args[0]; object t_73984_732462 = args[1]; object endt_73985_732463 = args[2]; object lt_73986_732464 = args[3]; object u3_73987_732465 = args[4];
  
closureN_type c_736871;
object e_736896 [7];
c_736871.hdr.mark = gc_color_red;
 c_736871.hdr.grayed = 0;
c_736871.tag = closureN_tag;
 c_736871.fn = (function_type)__lambda_227;
c_736871.num_args = 1;
c_736871.num_elements = 7;
c_736871.elements = (object *)e_736896;
c_736871.elements[0] = ((closureN)self_734468)->elements[1];
c_736871.elements[1] = k_733312;
c_736871.elements[2] = ((closureN)self_734468)->elements[2];
c_736871.elements[3] = ((closureN)self_734468)->elements[3];
c_736871.elements[4] = lt_73986_732464;
c_736871.elements[5] = ((closureN)self_734468)->elements[4];
c_736871.elements[6] = u3_73987_732465;


closureN_type c_736897;
object e_736906 [5];
c_736897.hdr.mark = gc_color_red;
 c_736897.hdr.grayed = 0;
c_736897.tag = closureN_tag;
 c_736897.fn = (function_type)__lambda_230;
c_736897.num_args = 0;
c_736897.num_elements = 5;
c_736897.elements = (object *)e_736906;
c_736897.elements[0] = ((closureN)self_734468)->elements[0];
c_736897.elements[1] = endt_73985_732463;
c_736897.elements[2] = ((closureN)self_734468)->elements[5];
c_736897.elements[3] = ((closureN)self_734468)->elements[6];
c_736897.elements[4] = t_73984_732462;

return_direct_with_clo1(data,(closure)&c_736871,__lambda_227,  &c_736897);; 
}

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

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

static void __lambda_227(void *data, object self_734470, int argc, object *args) /* object self_734470, object r_733313 */
 {
 object r_733313 = args[0];
  
closureN_type c_736873;
object e_736877 [2];
c_736873.hdr.mark = gc_color_red;
 c_736873.hdr.grayed = 0;
c_736873.tag = closureN_tag;
 c_736873.fn = (function_type)__lambda_228;
c_736873.num_args = 1;
c_736873.num_elements = 2;
c_736873.elements = (object *)e_736877;
c_736873.elements[0] = ((closureN)self_734470)->elements[1];
c_736873.elements[1] = r_733313;


closureN_type c_736878;
object e_736895 [6];
c_736878.hdr.mark = gc_color_red;
 c_736878.hdr.grayed = 0;
c_736878.tag = closureN_tag;
 c_736878.fn = (function_type)__lambda_229;
c_736878.num_args = 2;
c_736878.num_elements = 6;
c_736878.elements = (object *)e_736895;
c_736878.elements[0] = ((closureN)self_734470)->elements[0];
c_736878.elements[1] = ((closureN)self_734470)->elements[2];
c_736878.elements[2] = ((closureN)self_734470)->elements[3];
c_736878.elements[3] = ((closureN)self_734470)->elements[4];
c_736878.elements[4] = ((closureN)self_734470)->elements[5];
c_736878.elements[5] = ((closureN)self_734470)->elements[6];

return_direct_with_clo1(data,(closure)&c_736873,__lambda_228,  &c_736878);; 
}

static void __lambda_229(void *data, object self_734471, int argc, object *args) /* object self_734471, object k_733315, object st_731040_732466, object end_91st_731041_732467 */
 {
 object k_733315 = args[0]; object st_731040_732466 = args[1]; object end_91st_731041_732467 = args[2];
  


complex_num_type local_736885; 

complex_num_type local_736890; 
return_closcall7(data,  car(((closureN)self_734471)->elements[0]),  k_733315, st_731040_732466, end_91st_731041_732467, Cyc_fast_sum(data,&local_736885, ((closureN)self_734471)->elements[1], ((closureN)self_734471)->elements[3]), Cyc_fast_sum(data,&local_736890, ((closureN)self_734471)->elements[2], ((closureN)self_734471)->elements[2]), ((closureN)self_734471)->elements[5], ((closureN)self_734471)->elements[4]);; 
}

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

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

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

static void __lambda_204(void *data, object self_734475, int argc, object *args) /* object self_734475, object r_733303 */
 {
 object r_733303 = args[0];
  
closureN_type c_736771;
object e_736824 [4];
c_736771.hdr.mark = gc_color_red;
 c_736771.hdr.grayed = 0;
c_736771.tag = closureN_tag;
 c_736771.fn = (function_type)__lambda_205;
c_736771.num_args = 1;
c_736771.num_elements = 4;
c_736771.elements = (object *)e_736824;
c_736771.elements[0] = ((closureN)self_734475)->elements[0];
c_736771.elements[1] = ((closureN)self_734475)->elements[1];
c_736771.elements[2] = ((closureN)self_734475)->elements[2];
c_736771.elements[3] = ((closureN)self_734475)->elements[3];



return_direct_with_clo1(data,(closure)&c_736771,__lambda_205,  Cyc_set_cell(data, ((closureN)self_734475)->elements[1], r_733303));; 
}

static void __lambda_205(void *data, object self_734476, int argc, object *args) /* object self_734476, object r_733291 */
 {

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


closureN_type c_736815;
object e_736821 [2];
c_736815.hdr.mark = gc_color_red;
 c_736815.hdr.grayed = 0;
c_736815.tag = closureN_tag;
 c_736815.fn = (function_type)__lambda_214;
c_736815.num_args = 0;
c_736815.num_elements = 2;
c_736815.elements = (object *)e_736821;
c_736815.elements[0] = ((closureN)self_734476)->elements[0];
c_736815.elements[1] = ((closureN)self_734476)->elements[3];

return_direct_with_clo1(data,(closure)&c_736776,__lambda_206,  &c_736815);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734476)->elements[2], (((closure)  ((closureN)self_734476)->elements[2])->fn),  NULL);}
;; 
}

static void __lambda_214(void *data, object self_734477, int argc, object *args) /* object self_734477, object k_733302 */
 {
 object k_733302 = args[0];
  

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

static void __lambda_206(void *data, object self_734478, int argc, object *args) /* object self_734478, object r_733293 */
 {
 object r_733293 = args[0];
  
closureN_type c_736778;
object e_736782 [2];
c_736778.hdr.mark = gc_color_red;
 c_736778.hdr.grayed = 0;
c_736778.tag = closureN_tag;
 c_736778.fn = (function_type)__lambda_207;
c_736778.num_args = 1;
c_736778.num_elements = 2;
c_736778.elements = (object *)e_736782;
c_736778.elements[0] = ((closureN)self_734478)->elements[1];
c_736778.elements[1] = r_733293;


closureN_type c_736783;
object e_736813 [2];
c_736783.hdr.mark = gc_color_red;
 c_736783.hdr.grayed = 0;
c_736783.tag = closureN_tag;
 c_736783.fn = (function_type)__lambda_208;
c_736783.num_args = 3;
c_736783.num_elements = 2;
c_736783.elements = (object *)e_736813;
c_736783.elements[0] = ((closureN)self_734478)->elements[0];
c_736783.elements[1] = ((closureN)self_734478)->elements[2];

return_direct_with_clo1(data,(closure)&c_736778,__lambda_207,  &c_736783);; 
}

static void __lambda_208(void *data, object self_734479, int argc, object *args) /* object self_734479, object k_733295, object lr_731150_732472, object endr_731151_732473, object rest_731152_732474 */
 {
 object k_733295 = args[0]; object lr_731150_732472 = args[1]; object endr_731151_732473 = args[2]; object rest_731152_732474 = args[3];
  
closureN_type c_736785;
object e_736802 [1];
c_736785.hdr.mark = gc_color_red;
 c_736785.hdr.grayed = 0;
c_736785.tag = closureN_tag;
 c_736785.fn = (function_type)__lambda_209;
c_736785.num_args = 1;
c_736785.num_elements = 1;
c_736785.elements = (object *)e_736802;
c_736785.elements[0] = k_733295;


closureN_type c_736803;
object e_736812 [5];
c_736803.hdr.mark = gc_color_red;
 c_736803.hdr.grayed = 0;
c_736803.tag = closureN_tag;
 c_736803.fn = (function_type)__lambda_213;
c_736803.num_args = 0;
c_736803.num_elements = 5;
c_736803.elements = (object *)e_736812;
c_736803.elements[0] = endr_731151_732473;
c_736803.elements[1] = ((closureN)self_734479)->elements[0];
c_736803.elements[2] = ((closureN)self_734479)->elements[1];
c_736803.elements[3] = lr_731150_732472;
c_736803.elements[4] = rest_731152_732474;

return_direct_with_clo1(data,(closure)&c_736785,__lambda_209,  &c_736803);; 
}

static void __lambda_213(void *data, object self_734480, int argc, object *args) /* object self_734480, object k_733301 */
 {
 object k_733301 = args[0];
  

return_closcall7(data,  car(((closureN)self_734480)->elements[1]),  k_733301, ((closureN)self_734480)->elements[2], ((closureN)self_734480)->elements[0], ((closureN)self_734480)->elements[3], obj_int2obj(1), ((closureN)self_734480)->elements[4], obj_int2obj(16777216));; 
}

static void __lambda_209(void *data, object self_734481, int argc, object *args) /* object self_734481, object r_733296 */
 {
 object r_733296 = args[0];
  
closureN_type c_736787;
object e_736791 [2];
c_736787.hdr.mark = gc_color_red;
 c_736787.hdr.grayed = 0;
c_736787.tag = closureN_tag;
 c_736787.fn = (function_type)__lambda_210;
c_736787.num_args = 1;
c_736787.num_elements = 2;
c_736787.elements = (object *)e_736791;
c_736787.elements[0] = ((closureN)self_734481)->elements[0];
c_736787.elements[1] = r_733296;


mclosure0(c_736792, (function_type)__lambda_211);c_736792.num_args = 4;
return_direct_with_clo1(data,(closure)&c_736787,__lambda_210,  &c_736792);; 
}

static void __lambda_211(void *data, object self_734482, int argc, object *args) /* object self_734482, object k_733298, object a_731259_732476, object enda_731260_732477, object la_731261_732478, object v_731262_732479 */
 {
 object k_733298 = args[0]; object a_731259_732476 = args[1]; object enda_731260_732477 = args[2];
  
closureN_type c_736794;
object e_736798 [2];
c_736794.hdr.mark = gc_color_red;
 c_736794.hdr.grayed = 0;
c_736794.tag = closureN_tag;
 c_736794.fn = (function_type)__lambda_212;
c_736794.num_args = 1;
c_736794.num_elements = 2;
c_736794.elements = (object *)e_736798;
c_736794.elements[0] = a_731259_732476;
c_736794.elements[1] = k_733298;


object c_736801 = Cyc_set_cdr_cps(data,(closure)&c_736794,enda_731260_732477, NULL);
return_closcall1(data,(closure)&c_736794,  c_736801);; 
}

static void __lambda_212(void *data, object self_734483, int argc, object *args) /* object self_734483, object r_733299 */
 {

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

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

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

static void __lambda_130(void *data, object _, int argc, object *args) /* closure _,object k_733197, object elt_121_73276_732330, object lis_73277_732331 */
 {
object k_733197 = args[0]; object elt_121_73276_732330 = args[1]; object lis_73277_732331 = args[2];
  Cyc_st_add(data, "srfi/132.sld:list-merge-sort");

closureN_type c_736226;
object e_736750 [3];
c_736226.hdr.mark = gc_color_red;
 c_736226.hdr.grayed = 0;
c_736226.tag = closureN_tag;
 c_736226.fn = (function_type)__lambda_131;
c_736226.num_args = 5;
c_736226.num_elements = 3;
c_736226.elements = (object *)e_736750;
c_736226.elements[0] = elt_121_73276_732330;
c_736226.elements[1] = k_733197;
c_736226.elements[2] = lis_73277_732331;

return_direct_with_clo5(data,(closure)&c_736226,__lambda_131,  boolean_f, boolean_f, boolean_f, boolean_f, boolean_f);; 
}

static void __lambda_131(void *data, object self_734307, int argc, object *args) /* object self_734307, object append_91reverse_732337, object getrun_732338, object grow_732339, object merge_732340, object null_91list_127_732341 */
 {
 object append_91reverse_732337 = args[0]; object getrun_732338 = args[1]; object grow_732339 = args[2]; object merge_732340 = args[3]; object null_91list_127_732341 = args[4];
  
closureN_type c_736228;
object e_736746 [7];
c_736228.hdr.mark = gc_color_red;
 c_736228.hdr.grayed = 0;
c_736228.tag = closureN_tag;
 c_736228.fn = (function_type)__lambda_779;
c_736228.num_args = 1;
c_736228.num_elements = 7;
c_736228.elements = (object *)e_736746;
c_736228.elements[0] = ((closureN)self_734307)->elements[0];
c_736228.elements[1] = getrun_732338;
c_736228.elements[2] = grow_732339;
c_736228.elements[3] = ((closureN)self_734307)->elements[1];
c_736228.elements[4] = ((closureN)self_734307)->elements[2];
c_736228.elements[5] = merge_732340;
c_736228.elements[6] = null_91list_127_732341;


pair_type local_736749; 
return_direct_with_clo1(data,(closure)&c_736228,__lambda_779,  set_cell_as_expr(&local_736749, append_91reverse_732337));; 
}

static void __lambda_779(void *data, object self_734308, int argc, object *args) /* object self_734308, object append_91reverse_732337 */
 {
 object append_91reverse_732337 = args[0];
  
closureN_type c_736230;
object e_736741 [7];
c_736230.hdr.mark = gc_color_red;
 c_736230.hdr.grayed = 0;
c_736230.tag = closureN_tag;
 c_736230.fn = (function_type)__lambda_778;
c_736230.num_args = 1;
c_736230.num_elements = 7;
c_736230.elements = (object *)e_736741;
c_736230.elements[0] = append_91reverse_732337;
c_736230.elements[1] = ((closureN)self_734308)->elements[0];
c_736230.elements[2] = ((closureN)self_734308)->elements[2];
c_736230.elements[3] = ((closureN)self_734308)->elements[3];
c_736230.elements[4] = ((closureN)self_734308)->elements[4];
c_736230.elements[5] = ((closureN)self_734308)->elements[5];
c_736230.elements[6] = ((closureN)self_734308)->elements[6];


pair_type local_736744; 
return_direct_with_clo1(data,(closure)&c_736230,__lambda_778,  set_cell_as_expr(&local_736744, ((closureN)self_734308)->elements[1]));; 
}

static void __lambda_778(void *data, object self_734309, int argc, object *args) /* object self_734309, object getrun_732338 */
 {
 object getrun_732338 = args[0];
  
closureN_type c_736232;
object e_736736 [7];
c_736232.hdr.mark = gc_color_red;
 c_736232.hdr.grayed = 0;
c_736232.tag = closureN_tag;
 c_736232.fn = (function_type)__lambda_777;
c_736232.num_args = 1;
c_736232.num_elements = 7;
c_736232.elements = (object *)e_736736;
c_736232.elements[0] = ((closureN)self_734309)->elements[0];
c_736232.elements[1] = ((closureN)self_734309)->elements[1];
c_736232.elements[2] = getrun_732338;
c_736232.elements[3] = ((closureN)self_734309)->elements[3];
c_736232.elements[4] = ((closureN)self_734309)->elements[4];
c_736232.elements[5] = ((closureN)self_734309)->elements[5];
c_736232.elements[6] = ((closureN)self_734309)->elements[6];


pair_type local_736739; 
return_direct_with_clo1(data,(closure)&c_736232,__lambda_777,  set_cell_as_expr(&local_736739, ((closureN)self_734309)->elements[2]));; 
}

static void __lambda_777(void *data, object self_734310, int argc, object *args) /* object self_734310, object grow_732339 */
 {
 object grow_732339 = args[0];
  
closureN_type c_736234;
object e_736731 [7];
c_736234.hdr.mark = gc_color_red;
 c_736234.hdr.grayed = 0;
c_736234.tag = closureN_tag;
 c_736234.fn = (function_type)__lambda_776;
c_736234.num_args = 1;
c_736234.num_elements = 7;
c_736234.elements = (object *)e_736731;
c_736234.elements[0] = ((closureN)self_734310)->elements[0];
c_736234.elements[1] = ((closureN)self_734310)->elements[1];
c_736234.elements[2] = ((closureN)self_734310)->elements[2];
c_736234.elements[3] = grow_732339;
c_736234.elements[4] = ((closureN)self_734310)->elements[3];
c_736234.elements[5] = ((closureN)self_734310)->elements[4];
c_736234.elements[6] = ((closureN)self_734310)->elements[6];


pair_type local_736734; 
return_direct_with_clo1(data,(closure)&c_736234,__lambda_776,  set_cell_as_expr(&local_736734, ((closureN)self_734310)->elements[5]));; 
}

static void __lambda_776(void *data, object self_734311, int argc, object *args) /* object self_734311, object merge_732340 */
 {
 object merge_732340 = args[0];
  
closureN_type c_736236;
object e_736726 [7];
c_736236.hdr.mark = gc_color_red;
 c_736236.hdr.grayed = 0;
c_736236.tag = closureN_tag;
 c_736236.fn = (function_type)__lambda_775;
c_736236.num_args = 1;
c_736236.num_elements = 7;
c_736236.elements = (object *)e_736726;
c_736236.elements[0] = ((closureN)self_734311)->elements[0];
c_736236.elements[1] = ((closureN)self_734311)->elements[1];
c_736236.elements[2] = ((closureN)self_734311)->elements[2];
c_736236.elements[3] = ((closureN)self_734311)->elements[3];
c_736236.elements[4] = ((closureN)self_734311)->elements[4];
c_736236.elements[5] = ((closureN)self_734311)->elements[5];
c_736236.elements[6] = merge_732340;


pair_type local_736729; 
return_direct_with_clo1(data,(closure)&c_736236,__lambda_775,  set_cell_as_expr(&local_736729, ((closureN)self_734311)->elements[6]));; 
}

static void __lambda_775(void *data, object self_734312, int argc, object *args) /* object self_734312, object null_91list_127_732341 */
 {
 object null_91list_127_732341 = args[0];
  
closureN_type c_736238;
object e_736627 [8];
c_736238.hdr.mark = gc_color_red;
 c_736238.hdr.grayed = 0;
c_736238.tag = closureN_tag;
 c_736238.fn = (function_type)__lambda_132;
c_736238.num_args = 1;
c_736238.num_elements = 8;
c_736238.elements = (object *)e_736627;
c_736238.elements[0] = ((closureN)self_734312)->elements[0];
c_736238.elements[1] = ((closureN)self_734312)->elements[1];
c_736238.elements[2] = ((closureN)self_734312)->elements[2];
c_736238.elements[3] = ((closureN)self_734312)->elements[3];
c_736238.elements[4] = ((closureN)self_734312)->elements[4];
c_736238.elements[5] = ((closureN)self_734312)->elements[5];
c_736238.elements[6] = ((closureN)self_734312)->elements[6];
c_736238.elements[7] = null_91list_127_732341;


closureN_type c_736628;
object e_736725 [2];
c_736628.hdr.mark = gc_color_red;
 c_736628.hdr.grayed = 0;
c_736628.tag = closureN_tag;
 c_736628.fn = (function_type)__lambda_187;
c_736628.num_args = 1;
c_736628.num_elements = 2;
c_736628.elements = (object *)e_736725;
c_736628.elements[0] = ((closureN)self_734312)->elements[0];
c_736628.elements[1] = ((closureN)self_734312)->elements[1];

return_direct_with_clo1(data,(closure)&c_736238,__lambda_132,  &c_736628);; 
}

static void __lambda_187(void *data, object self_734313, int argc, object *args) /* object self_734313, object k_733267, object lis_73278_732347 */
 {
 object k_733267 = args[0]; object lis_73278_732347 = args[1];
  
closureN_type c_736630;
object e_736720 [3];
c_736630.hdr.mark = gc_color_red;
 c_736630.hdr.grayed = 0;
c_736630.tag = closureN_tag;
 c_736630.fn = (function_type)__lambda_188;
c_736630.num_args = 3;
c_736630.num_elements = 3;
c_736630.elements = (object *)e_736720;
c_736630.elements[0] = ((closureN)self_734313)->elements[0];
c_736630.elements[1] = ((closureN)self_734313)->elements[1];
c_736630.elements[2] = k_733267;





return_direct_with_clo3(data,(closure)&c_736630,__lambda_188,  NULL, Cyc_car(data, lis_73278_732347), Cyc_cdr(data, lis_73278_732347));; 
}

static void __lambda_188(void *data, object self_734314, int argc, object *args) /* object self_734314, object ans_73280_732348, object prev_73282_732350, object xs_73283_732351 */
 {
 object ans_73280_732348 = args[0]; object prev_73282_732350 = args[1]; object xs_73283_732351 = args[2];
  
closureN_type c_736632;
object e_736719 [6];
c_736632.hdr.mark = gc_color_red;
 c_736632.hdr.grayed = 0;
c_736632.tag = closureN_tag;
 c_736632.fn = (function_type)__lambda_189;
c_736632.num_args = 1;
c_736632.num_elements = 6;
c_736632.elements = (object *)e_736719;
c_736632.elements[0] = ans_73280_732348;
c_736632.elements[1] = ((closureN)self_734314)->elements[0];
c_736632.elements[2] = ((closureN)self_734314)->elements[1];
c_736632.elements[3] = ((closureN)self_734314)->elements[2];
c_736632.elements[4] = prev_73282_732350;
c_736632.elements[5] = xs_73283_732351;

return_direct_with_clo1(data,(closure)&c_736632,__lambda_189,  boolean_f);; 
}

static void __lambda_189(void *data, object self_734315, int argc, object *args) /* object self_734315, object lp_73284_732352 */
 {
 object lp_73284_732352 = args[0];
  
closureN_type c_736634;
object e_736715 [6];
c_736634.hdr.mark = gc_color_red;
 c_736634.hdr.grayed = 0;
c_736634.tag = closureN_tag;
 c_736634.fn = (function_type)__lambda_774;
c_736634.num_args = 1;
c_736634.num_elements = 6;
c_736634.elements = (object *)e_736715;
c_736634.elements[0] = ((closureN)self_734315)->elements[0];
c_736634.elements[1] = ((closureN)self_734315)->elements[1];
c_736634.elements[2] = ((closureN)self_734315)->elements[2];
c_736634.elements[3] = ((closureN)self_734315)->elements[3];
c_736634.elements[4] = ((closureN)self_734315)->elements[4];
c_736634.elements[5] = ((closureN)self_734315)->elements[5];


pair_type local_736718; 
return_direct_with_clo1(data,(closure)&c_736634,__lambda_774,  set_cell_as_expr(&local_736718, lp_73284_732352));; 
}

static void __lambda_774(void *data, object self_734316, int argc, object *args) /* object self_734316, object lp_73284_732352 */
 {
 object lp_73284_732352 = args[0];
  
closureN_type c_736636;
object e_736651 [5];
c_736636.hdr.mark = gc_color_red;
 c_736636.hdr.grayed = 0;
c_736636.tag = closureN_tag;
 c_736636.fn = (function_type)__lambda_190;
c_736636.num_args = 1;
c_736636.num_elements = 5;
c_736636.elements = (object *)e_736651;
c_736636.elements[0] = ((closureN)self_734316)->elements[0];
c_736636.elements[1] = ((closureN)self_734316)->elements[3];
c_736636.elements[2] = lp_73284_732352;
c_736636.elements[3] = ((closureN)self_734316)->elements[4];
c_736636.elements[4] = ((closureN)self_734316)->elements[5];


closureN_type c_736652;
object e_736714 [3];
c_736652.hdr.mark = gc_color_red;
 c_736652.hdr.grayed = 0;
c_736652.tag = closureN_tag;
 c_736652.fn = (function_type)__lambda_192;
c_736652.num_args = 4;
c_736652.num_elements = 3;
c_736652.elements = (object *)e_736714;
c_736652.elements[0] = ((closureN)self_734316)->elements[1];
c_736652.elements[1] = ((closureN)self_734316)->elements[2];
c_736652.elements[2] = lp_73284_732352;

return_direct_with_clo1(data,(closure)&c_736636,__lambda_190,  &c_736652);; 
}

static void __lambda_192(void *data, object self_734317, int argc, object *args) /* object self_734317, object k_733273, object ans_73285_732353, object i_73286_732354, object prev_73287_732355, object xs_73288_732356 */
 {
 object k_733273 = args[0]; object ans_73285_732353 = args[1]; object i_73286_732354 = args[2]; object prev_73287_732355 = args[3]; object xs_73288_732356 = args[4];
    
if( (boolean_f != Cyc_is_pair(xs_73288_732356)) ){ 
  
closureN_type c_736656;
object e_736698 [8];
c_736656.hdr.mark = gc_color_red;
 c_736656.hdr.grayed = 0;
c_736656.tag = closureN_tag;
 c_736656.fn = (function_type)__lambda_193;
c_736656.num_args = 1;
c_736656.num_elements = 8;
c_736656.elements = (object *)e_736698;
c_736656.elements[0] = ans_73285_732353;
c_736656.elements[1] = ((closureN)self_734317)->elements[0];
c_736656.elements[2] = ((closureN)self_734317)->elements[1];
c_736656.elements[3] = i_73286_732354;
c_736656.elements[4] = k_733273;
c_736656.elements[5] = ((closureN)self_734317)->elements[2];
c_736656.elements[6] = prev_73287_732355;
c_736656.elements[7] = xs_73288_732356;



return_direct_with_clo1(data,(closure)&c_736656,__lambda_193,  Cyc_car(data, xs_73288_732356));
} else { 
  


closureN_type c_736705;
object e_736710 [3];
c_736705.hdr.mark = gc_color_red;
 c_736705.hdr.grayed = 0;
c_736705.tag = closureN_tag;
 c_736705.fn = (function_type)__lambda_197;
c_736705.num_args = 1;
c_736705.num_elements = 3;
c_736705.elements = (object *)e_736710;
c_736705.elements[0] = i_73286_732354;
c_736705.elements[1] = k_733273;
c_736705.elements[2] = xs_73288_732356;


pair_type local_736713; 
return_closcall3(data,  car(((closureN)self_734317)->elements[0]),  &c_736705, ans_73285_732353, set_pair_as_expr(&local_736713, prev_73287_732355, NULL));}
;; 
}

static void __lambda_197(void *data, object self_734322, int argc, object *args) /* object self_734322, object r_733283 */
 {
 object r_733283 = args[0];
  return_direct_with_clo4(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734322)->elements[1], r_733283, ((closureN)self_734322)->elements[0], ((closureN)self_734322)->elements[2]);; 
}

static void __lambda_193(void *data, object self_734318, int argc, object *args) /* object self_734318, object x_73289_732357 */
 {
 object x_73289_732357 = args[0];
  
closureN_type c_736659;
object e_736696 [8];
c_736659.hdr.mark = gc_color_red;
 c_736659.hdr.grayed = 0;
c_736659.tag = closureN_tag;
 c_736659.fn = (function_type)__lambda_194;
c_736659.num_args = 1;
c_736659.num_elements = 8;
c_736659.elements = (object *)e_736696;
c_736659.elements[0] = ((closureN)self_734318)->elements[0];
c_736659.elements[1] = ((closureN)self_734318)->elements[1];
c_736659.elements[2] = ((closureN)self_734318)->elements[3];
c_736659.elements[3] = ((closureN)self_734318)->elements[4];
c_736659.elements[4] = ((closureN)self_734318)->elements[5];
c_736659.elements[5] = ((closureN)self_734318)->elements[6];
c_736659.elements[6] = x_73289_732357;
c_736659.elements[7] = ((closureN)self_734318)->elements[7];

return_closcall3(data,  ((closureN)self_734318)->elements[2],  &c_736659, x_73289_732357, ((closureN)self_734318)->elements[6]);; 
}

static void __lambda_194(void *data, object self_734319, int argc, object *args) /* object self_734319, object r_733276 */
 {
 object r_733276 = args[0];
  if( (boolean_f != r_733276) ){ 
  


closureN_type c_736664;
object e_736669 [3];
c_736664.hdr.mark = gc_color_red;
 c_736664.hdr.grayed = 0;
c_736664.tag = closureN_tag;
 c_736664.fn = (function_type)__lambda_195;
c_736664.num_args = 1;
c_736664.num_elements = 3;
c_736664.elements = (object *)e_736669;
c_736664.elements[0] = ((closureN)self_734319)->elements[2];
c_736664.elements[1] = ((closureN)self_734319)->elements[3];
c_736664.elements[2] = ((closureN)self_734319)->elements[7];


pair_type local_736673; 
return_closcall3(data,  car(((closureN)self_734319)->elements[1]),  &c_736664, ((closureN)self_734319)->elements[0], set_pair_as_expr(&local_736673, ((closureN)self_734319)->elements[5], NULL));
} else { 
  
closureN_type c_736676;
object e_736690 [5];
c_736676.hdr.mark = gc_color_red;
 c_736676.hdr.grayed = 0;
c_736676.tag = closureN_tag;
 c_736676.fn = (function_type)__lambda_196;
c_736676.num_args = 1;
c_736676.num_elements = 5;
c_736676.elements = (object *)e_736690;
c_736676.elements[0] = ((closureN)self_734319)->elements[2];
c_736676.elements[1] = ((closureN)self_734319)->elements[3];
c_736676.elements[2] = ((closureN)self_734319)->elements[4];
c_736676.elements[3] = ((closureN)self_734319)->elements[6];
c_736676.elements[4] = ((closureN)self_734319)->elements[7];


pair_type local_736693; 
return_direct_with_clo1(data,(closure)&c_736676,__lambda_196,  set_pair_as_expr(&local_736693, ((closureN)self_734319)->elements[5], ((closureN)self_734319)->elements[0]));}
;; 
}

static void __lambda_196(void *data, object self_734321, int argc, object *args) /* object self_734321, object r_733280 */
 {
 object r_733280 = args[0];
  


complex_num_type local_736684; 


return_closcall5(data,  car(((closureN)self_734321)->elements[2]),  ((closureN)self_734321)->elements[1], r_733280, Cyc_fast_sum(data,&local_736684, ((closureN)self_734321)->elements[0], obj_int2obj(1)), ((closureN)self_734321)->elements[3], Cyc_cdr(data, ((closureN)self_734321)->elements[4]));; 
}

static void __lambda_195(void *data, object self_734320, int argc, object *args) /* object self_734320, object r_733277 */
 {
 object r_733277 = args[0];
  return_direct_with_clo4(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_734320)->elements[1], r_733277, ((closureN)self_734320)->elements[0], ((closureN)self_734320)->elements[2]);; 
}

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



return_direct_with_clo1(data,(closure)&c_736638,__lambda_191,  Cyc_set_cell(data, ((closureN)self_734323)->elements[2], r_733272));; 
}

static void __lambda_191(void *data, object self_734324, int argc, object *args) /* object self_734324, object r_733271 */
 {

  

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

static void __lambda_132(void *data, object self_734325, int argc, object *args) /* object self_734325, object r_733266 */
 {
 object r_733266 = args[0];
  
closureN_type c_736240;
object e_736623 [8];
c_736240.hdr.mark = gc_color_red;
 c_736240.hdr.grayed = 0;
c_736240.tag = closureN_tag;
 c_736240.fn = (function_type)__lambda_133;
c_736240.num_args = 1;
c_736240.num_elements = 8;
c_736240.elements = (object *)e_736623;
c_736240.elements[0] = ((closureN)self_734325)->elements[0];
c_736240.elements[1] = ((closureN)self_734325)->elements[1];
c_736240.elements[2] = ((closureN)self_734325)->elements[2];
c_736240.elements[3] = ((closureN)self_734325)->elements[3];
c_736240.elements[4] = ((closureN)self_734325)->elements[4];
c_736240.elements[5] = ((closureN)self_734325)->elements[5];
c_736240.elements[6] = ((closureN)self_734325)->elements[6];
c_736240.elements[7] = ((closureN)self_734325)->elements[7];



return_direct_with_clo1(data,(closure)&c_736240,__lambda_133,  Cyc_set_cell(data, ((closureN)self_734325)->elements[2], r_733266));; 
}

static void __lambda_133(void *data, object self_734326, int argc, object *args) /* object self_734326, object r_733198 */
 {

  
closureN_type c_736242;
object e_736566 [8];
c_736242.hdr.mark = gc_color_red;
 c_736242.hdr.grayed = 0;
c_736242.tag = closureN_tag;
 c_736242.fn = (function_type)__lambda_134;
c_736242.num_args = 1;
c_736242.num_elements = 8;
c_736242.elements = (object *)e_736566;
c_736242.elements[0] = ((closureN)self_734326)->elements[0];
c_736242.elements[1] = ((closureN)self_734326)->elements[1];
c_736242.elements[2] = ((closureN)self_734326)->elements[2];
c_736242.elements[3] = ((closureN)self_734326)->elements[3];
c_736242.elements[4] = ((closureN)self_734326)->elements[4];
c_736242.elements[5] = ((closureN)self_734326)->elements[5];
c_736242.elements[6] = ((closureN)self_734326)->elements[6];
c_736242.elements[7] = ((closureN)self_734326)->elements[7];


closureN_type c_736567;
object e_736622 [1];
c_736567.hdr.mark = gc_color_red;
 c_736567.hdr.grayed = 0;
c_736567.tag = closureN_tag;
 c_736567.fn = (function_type)__lambda_180;
c_736567.num_args = 2;
c_736567.num_elements = 1;
c_736567.elements = (object *)e_736622;
c_736567.elements[0] = ((closureN)self_734326)->elements[7];

return_direct_with_clo1(data,(closure)&c_736242,__lambda_134,  &c_736567);; 
}

static void __lambda_180(void *data, object self_734327, int argc, object *args) /* object self_734327, object k_733258, object rev_91head_73290_732358, object tail_73291_732359 */
 {
 object k_733258 = args[0]; object rev_91head_73290_732358 = args[1]; object tail_73291_732359 = args[2];
  
closureN_type c_736569;
object e_736621 [2];
c_736569.hdr.mark = gc_color_red;
 c_736569.hdr.grayed = 0;
c_736569.tag = closureN_tag;
 c_736569.fn = (function_type)__lambda_181;
c_736569.num_args = 2;
c_736569.num_elements = 2;
c_736569.elements = (object *)e_736621;
c_736569.elements[0] = k_733258;
c_736569.elements[1] = ((closureN)self_734327)->elements[0];

return_direct_with_clo2(data,(closure)&c_736569,__lambda_181,  rev_91head_73290_732358, tail_73291_732359);; 
}

static void __lambda_181(void *data, object self_734328, int argc, object *args) /* object self_734328, object rev_91head_73293_732360, object tail_73294_732361 */
 {
 object rev_91head_73293_732360 = args[0]; object tail_73294_732361 = args[1];
  
closureN_type c_736571;
object e_736620 [4];
c_736571.hdr.mark = gc_color_red;
 c_736571.hdr.grayed = 0;
c_736571.tag = closureN_tag;
 c_736571.fn = (function_type)__lambda_182;
c_736571.num_args = 1;
c_736571.num_elements = 4;
c_736571.elements = (object *)e_736620;
c_736571.elements[0] = ((closureN)self_734328)->elements[0];
c_736571.elements[1] = ((closureN)self_734328)->elements[1];
c_736571.elements[2] = rev_91head_73293_732360;
c_736571.elements[3] = tail_73294_732361;

return_direct_with_clo1(data,(closure)&c_736571,__lambda_182,  boolean_f);; 
}

static void __lambda_182(void *data, object self_734329, int argc, object *args) /* object self_734329, object lp_73295_732362 */
 {
 object lp_73295_732362 = args[0];
  
closureN_type c_736573;
object e_736616 [4];
c_736573.hdr.mark = gc_color_red;
 c_736573.hdr.grayed = 0;
c_736573.tag = closureN_tag;
 c_736573.fn = (function_type)__lambda_773;
c_736573.num_args = 1;
c_736573.num_elements = 4;
c_736573.elements = (object *)e_736616;
c_736573.elements[0] = ((closureN)self_734329)->elements[0];
c_736573.elements[1] = ((closureN)self_734329)->elements[1];
c_736573.elements[2] = ((closureN)self_734329)->elements[2];
c_736573.elements[3] = ((closureN)self_734329)->elements[3];


pair_type local_736619; 
return_direct_with_clo1(data,(closure)&c_736573,__lambda_773,  set_cell_as_expr(&local_736619, lp_73295_732362));; 
}

static void __lambda_773(void *data, object self_734330, int argc, object *args) /* object self_734330, object lp_73295_732362 */
 {
 object lp_73295_732362 = args[0];
  
closureN_type c_736575;
object e_736589 [4];
c_736575.hdr.mark = gc_color_red;
 c_736575.hdr.grayed = 0;
c_736575.tag = closureN_tag;
 c_736575.fn = (function_type)__lambda_183;
c_736575.num_args = 1;
c_736575.num_elements = 4;
c_736575.elements = (object *)e_736589;
c_736575.elements[0] = ((closureN)self_734330)->elements[0];
c_736575.elements[1] = lp_73295_732362;
c_736575.elements[2] = ((closureN)self_734330)->elements[2];
c_736575.elements[3] = ((closureN)self_734330)->elements[3];


closureN_type c_736590;
object e_736615 [2];
c_736590.hdr.mark = gc_color_red;
 c_736590.hdr.grayed = 0;
c_736590.tag = closureN_tag;
 c_736590.fn = (function_type)__lambda_185;
c_736590.num_args = 2;
c_736590.num_elements = 2;
c_736590.elements = (object *)e_736615;
c_736590.elements[0] = lp_73295_732362;
c_736590.elements[1] = ((closureN)self_734330)->elements[1];

return_direct_with_clo1(data,(closure)&c_736575,__lambda_183,  &c_736590);; 
}

static void __lambda_185(void *data, object self_734331, int argc, object *args) /* object self_734331, object k_733261, object rev_91head_73296_732363, object tail_73297_732364 */
 {
 object k_733261 = args[0]; object rev_91head_73296_732363 = args[1]; object tail_73297_732364 = args[2];
  


closureN_type c_736595;
object e_736614 [4];
c_736595.hdr.mark = gc_color_red;
 c_736595.hdr.grayed = 0;
c_736595.tag = closureN_tag;
 c_736595.fn = (function_type)__lambda_186;
c_736595.num_args = 1;
c_736595.num_elements = 4;
c_736595.elements = (object *)e_736614;
c_736595.elements[0] = k_733261;
c_736595.elements[1] = ((closureN)self_734331)->elements[0];
c_736595.elements[2] = rev_91head_73296_732363;
c_736595.elements[3] = tail_73297_732364;

return_closcall2(data,  car(((closureN)self_734331)->elements[1]),  &c_736595, rev_91head_73296_732363);; 
}

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




pair_type local_736609; 


return_closcall3(data,  car(((closureN)self_734332)->elements[1]),  ((closureN)self_734332)->elements[0], Cyc_cdr(data, ((closureN)self_734332)->elements[2]), set_pair_as_expr(&local_736609, Cyc_car(data, ((closureN)self_734332)->elements[2]), ((closureN)self_734332)->elements[3]));}
;; 
}

static void __lambda_183(void *data, object self_734333, int argc, object *args) /* object self_734333, object r_733260 */
 {
 object r_733260 = args[0];
  
closureN_type c_736577;
object e_736585 [4];
c_736577.hdr.mark = gc_color_red;
 c_736577.hdr.grayed = 0;
c_736577.tag = closureN_tag;
 c_736577.fn = (function_type)__lambda_184;
c_736577.num_args = 1;
c_736577.num_elements = 4;
c_736577.elements = (object *)e_736585;
c_736577.elements[0] = ((closureN)self_734333)->elements[0];
c_736577.elements[1] = ((closureN)self_734333)->elements[1];
c_736577.elements[2] = ((closureN)self_734333)->elements[2];
c_736577.elements[3] = ((closureN)self_734333)->elements[3];



return_direct_with_clo1(data,(closure)&c_736577,__lambda_184,  Cyc_set_cell(data, ((closureN)self_734333)->elements[1], r_733260));; 
}

static void __lambda_184(void *data, object self_734334, int argc, object *args) /* object self_734334, object r_733259 */
 {

  

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

static void __lambda_134(void *data, object self_734335, int argc, object *args) /* object self_734335, object r_733257 */
 {
 object r_733257 = args[0];
  
closureN_type c_736244;
object e_736562 [7];
c_736244.hdr.mark = gc_color_red;
 c_736244.hdr.grayed = 0;
c_736244.tag = closureN_tag;
 c_736244.fn = (function_type)__lambda_135;
c_736244.num_args = 1;
c_736244.num_elements = 7;
c_736244.elements = (object *)e_736562;
c_736244.elements[0] = ((closureN)self_734335)->elements[1];
c_736244.elements[1] = ((closureN)self_734335)->elements[2];
c_736244.elements[2] = ((closureN)self_734335)->elements[3];
c_736244.elements[3] = ((closureN)self_734335)->elements[4];
c_736244.elements[4] = ((closureN)self_734335)->elements[5];
c_736244.elements[5] = ((closureN)self_734335)->elements[6];
c_736244.elements[6] = ((closureN)self_734335)->elements[7];



return_direct_with_clo1(data,(closure)&c_736244,__lambda_135,  Cyc_set_cell(data, ((closureN)self_734335)->elements[0], r_733257));; 
}

static void __lambda_135(void *data, object self_734336, int argc, object *args) /* object self_734336, object r_733199 */
 {

  
closureN_type c_736246;
object e_736552 [7];
c_736246.hdr.mark = gc_color_red;
 c_736246.hdr.grayed = 0;
c_736246.tag = closureN_tag;
 c_736246.fn = (function_type)__lambda_136;
c_736246.num_args = 1;
c_736246.num_elements = 7;
c_736246.elements = (object *)e_736552;
c_736246.elements[0] = ((closureN)self_734336)->elements[0];
c_736246.elements[1] = ((closureN)self_734336)->elements[1];
c_736246.elements[2] = ((closureN)self_734336)->elements[2];
c_736246.elements[3] = ((closureN)self_734336)->elements[3];
c_736246.elements[4] = ((closureN)self_734336)->elements[4];
c_736246.elements[5] = ((closureN)self_734336)->elements[5];
c_736246.elements[6] = ((closureN)self_734336)->elements[6];


mclosure0(c_736553, (function_type)__lambda_179);c_736553.num_args = 1;
return_direct_with_clo1(data,(closure)&c_736246,__lambda_136,  &c_736553);; 
}

static void __lambda_179(void *data, object self_734337, int argc, object *args) /* object self_734337, object k_733254, object l_73298_732365 */
 {
 object k_733254 = args[0]; object l_73298_732365 = args[1];
    
if( (boolean_f != Cyc_is_pair(l_73298_732365)) ){ 
  return_direct_with_clo1(data,  k_733254, (((closure)  k_733254)->fn),  boolean_f);
} else { 
    
if( (boolean_f != Cyc_is_null(l_73298_732365)) ){ 
  return_direct_with_clo1(data,  k_733254, (((closure)  k_733254)->fn),  boolean_t);
} else { 
  
make_utf8_string_with_len(c_736561, "argument out of domain", 22, 22);
return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_733254, &c_736561, l_73298_732365);}
;}
;; 
}

static void __lambda_136(void *data, object self_734338, int argc, object *args) /* object self_734338, object r_733253 */
 {
 object r_733253 = args[0];
  
closureN_type c_736248;
object e_736548 [6];
c_736248.hdr.mark = gc_color_red;
 c_736248.hdr.grayed = 0;
c_736248.tag = closureN_tag;
 c_736248.fn = (function_type)__lambda_137;
c_736248.num_args = 1;
c_736248.num_elements = 6;
c_736248.elements = (object *)e_736548;
c_736248.elements[0] = ((closureN)self_734338)->elements[0];
c_736248.elements[1] = ((closureN)self_734338)->elements[1];
c_736248.elements[2] = ((closureN)self_734338)->elements[2];
c_736248.elements[3] = ((closureN)self_734338)->elements[3];
c_736248.elements[4] = ((closureN)self_734338)->elements[4];
c_736248.elements[5] = ((closureN)self_734338)->elements[5];



return_direct_with_clo1(data,(closure)&c_736248,__lambda_137,  Cyc_set_cell(data, ((closureN)self_734338)->elements[6], r_733253));; 
}

static void __lambda_137(void *data, object self_734339, int argc, object *args) /* object self_734339, object r_733200 */
 {

  
closureN_type c_736250;
object e_736431 [5];
c_736250.hdr.mark = gc_color_red;
 c_736250.hdr.grayed = 0;
c_736250.tag = closureN_tag;
 c_736250.fn = (function_type)__lambda_138;
c_736250.num_args = 1;
c_736250.num_elements = 5;
c_736250.elements = (object *)e_736431;
c_736250.elements[0] = ((closureN)self_734339)->elements[1];
c_736250.elements[1] = ((closureN)self_734339)->elements[2];
c_736250.elements[2] = ((closureN)self_734339)->elements[3];
c_736250.elements[3] = ((closureN)self_734339)->elements[4];
c_736250.elements[4] = ((closureN)self_734339)->elements[5];


closureN_type c_736432;
object e_736547 [1];
c_736432.hdr.mark = gc_color_red;
 c_736432.hdr.grayed = 0;
c_736432.tag = closureN_tag;
 c_736432.fn = (function_type)__lambda_166;
c_736432.num_args = 2;
c_736432.num_elements = 1;
c_736432.elements = (object *)e_736547;
c_736432.elements[0] = ((closureN)self_734339)->elements[0];

return_direct_with_clo1(data,(closure)&c_736250,__lambda_138,  &c_736432);; 
}

static void __lambda_166(void *data, object self_734340, int argc, object *args) /* object self_734340, object k_733236, object a_73306_732366, object b_73307_732367 */
 {
 object k_733236 = args[0]; object a_73306_732366 = args[1]; object b_73307_732367 = args[2];
  
closureN_type c_736434;
object e_736544 [4];
c_736434.hdr.mark = gc_color_red;
 c_736434.hdr.grayed = 0;
c_736434.tag = closureN_tag;
 c_736434.fn = (function_type)__lambda_167;
c_736434.num_args = 1;
c_736434.num_elements = 4;
c_736434.elements = (object *)e_736544;
c_736434.elements[0] = a_73306_732366;
c_736434.elements[1] = b_73307_732367;
c_736434.elements[2] = ((closureN)self_734340)->elements[0];
c_736434.elements[3] = k_733236;



return_direct_with_clo1(data,(closure)&c_736434,__lambda_167,  Cyc_car(data, a_73306_732366));; 
}

static void __lambda_167(void *data, object self_734341, int argc, object *args) /* object self_734341, object r_733237 */
 {
 object r_733237 = args[0];
  
closureN_type c_736436;
object e_736540 [5];
c_736436.hdr.mark = gc_color_red;
 c_736436.hdr.grayed = 0;
c_736436.tag = closureN_tag;
 c_736436.fn = (function_type)__lambda_168;
c_736436.num_args = 1;
c_736436.num_elements = 5;
c_736436.elements = (object *)e_736540;
c_736436.elements[0] = ((closureN)self_734341)->elements[0];
c_736436.elements[1] = ((closureN)self_734341)->elements[1];
c_736436.elements[2] = ((closureN)self_734341)->elements[2];
c_736436.elements[3] = ((closureN)self_734341)->elements[3];
c_736436.elements[4] = r_733237;



return_direct_with_clo1(data,(closure)&c_736436,__lambda_168,  Cyc_car(data, ((closureN)self_734341)->elements[1]));; 
}

static void __lambda_168(void *data, object self_734342, int argc, object *args) /* object self_734342, object r_733238 */
 {
 object r_733238 = args[0];
  
closureN_type c_736438;
object e_736536 [2];
c_736438.hdr.mark = gc_color_red;
 c_736438.hdr.grayed = 0;
c_736438.tag = closureN_tag;
 c_736438.fn = (function_type)__lambda_169;
c_736438.num_args = 4;
c_736438.num_elements = 2;
c_736438.elements = (object *)e_736536;
c_736438.elements[0] = ((closureN)self_734342)->elements[2];
c_736438.elements[1] = ((closureN)self_734342)->elements[3];

return_direct_with_clo4(data,(closure)&c_736438,__lambda_169,  ((closureN)self_734342)->elements[4], ((closureN)self_734342)->elements[0], r_733238, ((closureN)self_734342)->elements[1]);; 
}

static void __lambda_169(void *data, object self_734343, int argc, object *args) /* object self_734343, object x_73309_732368, object a_73310_732369, object y_73311_732370, object b_73312_732371 */
 {
 object x_73309_732368 = args[0]; object a_73310_732369 = args[1]; object y_73311_732370 = args[2]; object b_73312_732371 = args[3];
  
closureN_type c_736440;
object e_736535 [6];
c_736440.hdr.mark = gc_color_red;
 c_736440.hdr.grayed = 0;
c_736440.tag = closureN_tag;
 c_736440.fn = (function_type)__lambda_170;
c_736440.num_args = 1;
c_736440.num_elements = 6;
c_736440.elements = (object *)e_736535;
c_736440.elements[0] = a_73310_732369;
c_736440.elements[1] = b_73312_732371;
c_736440.elements[2] = ((closureN)self_734343)->elements[0];
c_736440.elements[3] = ((closureN)self_734343)->elements[1];
c_736440.elements[4] = x_73309_732368;
c_736440.elements[5] = y_73311_732370;

return_direct_with_clo1(data,(closure)&c_736440,__lambda_170,  boolean_f);; 
}

static void __lambda_170(void *data, object self_734344, int argc, object *args) /* object self_734344, object recur_73313_732372 */
 {
 object recur_73313_732372 = args[0];
  
closureN_type c_736442;
object e_736531 [6];
c_736442.hdr.mark = gc_color_red;
 c_736442.hdr.grayed = 0;
c_736442.tag = closureN_tag;
 c_736442.fn = (function_type)__lambda_772;
c_736442.num_args = 1;
c_736442.num_elements = 6;
c_736442.elements = (object *)e_736531;
c_736442.elements[0] = ((closureN)self_734344)->elements[0];
c_736442.elements[1] = ((closureN)self_734344)->elements[1];
c_736442.elements[2] = ((closureN)self_734344)->elements[2];
c_736442.elements[3] = ((closureN)self_734344)->elements[3];
c_736442.elements[4] = ((closureN)self_734344)->elements[4];
c_736442.elements[5] = ((closureN)self_734344)->elements[5];


pair_type local_736534; 
return_direct_with_clo1(data,(closure)&c_736442,__lambda_772,  set_cell_as_expr(&local_736534, recur_73313_732372));; 
}

static void __lambda_772(void *data, object self_734345, int argc, object *args) /* object self_734345, object recur_73313_732372 */
 {
 object recur_73313_732372 = args[0];
  
closureN_type c_736444;
object e_736460 [6];
c_736444.hdr.mark = gc_color_red;
 c_736444.hdr.grayed = 0;
c_736444.tag = closureN_tag;
 c_736444.fn = (function_type)__lambda_171;
c_736444.num_args = 1;
c_736444.num_elements = 6;
c_736444.elements = (object *)e_736460;
c_736444.elements[0] = ((closureN)self_734345)->elements[0];
c_736444.elements[1] = ((closureN)self_734345)->elements[1];
c_736444.elements[2] = ((closureN)self_734345)->elements[3];
c_736444.elements[3] = recur_73313_732372;
c_736444.elements[4] = ((closureN)self_734345)->elements[4];
c_736444.elements[5] = ((closureN)self_734345)->elements[5];


closureN_type c_736461;
object e_736530 [2];
c_736461.hdr.mark = gc_color_red;
 c_736461.hdr.grayed = 0;
c_736461.tag = closureN_tag;
 c_736461.fn = (function_type)__lambda_173;
c_736461.num_args = 4;
c_736461.num_elements = 2;
c_736461.elements = (object *)e_736530;
c_736461.elements[0] = ((closureN)self_734345)->elements[2];
c_736461.elements[1] = recur_73313_732372;

return_direct_with_clo1(data,(closure)&c_736444,__lambda_171,  &c_736461);; 
}

static void __lambda_173(void *data, object self_734346, int argc, object *args) /* object self_734346, object k_733241, object x_73314_732373, object a_73315_732374, object y_73316_732375, object b_73317_732376 */
 {
 object k_733241 = args[0]; object x_73314_732373 = args[1]; object a_73315_732374 = args[2]; object y_73316_732375 = args[3]; object b_73317_732376 = args[4];
  
closureN_type c_736464;
object e_736529 [6];
c_736464.hdr.mark = gc_color_red;
 c_736464.hdr.grayed = 0;
c_736464.tag = closureN_tag;
 c_736464.fn = (function_type)__lambda_174;
c_736464.num_args = 1;
c_736464.num_elements = 6;
c_736464.elements = (object *)e_736529;
c_736464.elements[0] = a_73315_732374;
c_736464.elements[1] = b_73317_732376;
c_736464.elements[2] = k_733241;
c_736464.elements[3] = ((closureN)self_734346)->elements[1];
c_736464.elements[4] = x_73314_732373;
c_736464.elements[5] = y_73316_732375;

return_closcall3(data,  ((closureN)self_734346)->elements[0],  &c_736464, y_73316_732375, x_73314_732373);; 
}

static void __lambda_174(void *data, object self_734347, int argc, object *args) /* object self_734347, object r_733242 */
 {
 object r_733242 = args[0];
  if( (boolean_f != r_733242) ){ 
  
closureN_type c_736466;
object e_736488 [4];
c_736466.hdr.mark = gc_color_red;
 c_736466.hdr.grayed = 0;
c_736466.tag = closureN_tag;
 c_736466.fn = (function_type)__lambda_175;
c_736466.num_args = 0;
c_736466.num_elements = 4;
c_736466.elements = (object *)e_736488;
c_736466.elements[0] = ((closureN)self_734347)->elements[0];
c_736466.elements[1] = ((closureN)self_734347)->elements[1];
c_736466.elements[2] = ((closureN)self_734347)->elements[3];
c_736466.elements[3] = ((closureN)self_734347)->elements[4];


closureN_type c_736489;
object e_736496 [2];
c_736489.hdr.mark = gc_color_red;
 c_736489.hdr.grayed = 0;
c_736489.tag = closureN_tag;
 c_736489.fn = (function_type)__lambda_176;
c_736489.num_args = 1;
c_736489.num_elements = 2;
c_736489.elements = (object *)e_736496;
c_736489.elements[0] = ((closureN)self_734347)->elements[2];
c_736489.elements[1] = ((closureN)self_734347)->elements[5];

return_direct_with_clo1(data,(closure)&c_736466,__lambda_175,  &c_736489);
} else { 
  
closureN_type c_736498;
object e_736520 [4];
c_736498.hdr.mark = gc_color_red;
 c_736498.hdr.grayed = 0;
c_736498.tag = closureN_tag;
 c_736498.fn = (function_type)__lambda_177;
c_736498.num_args = 0;
c_736498.num_elements = 4;
c_736498.elements = (object *)e_736520;
c_736498.elements[0] = ((closureN)self_734347)->elements[0];
c_736498.elements[1] = ((closureN)self_734347)->elements[1];
c_736498.elements[2] = ((closureN)self_734347)->elements[3];
c_736498.elements[3] = ((closureN)self_734347)->elements[5];


closureN_type c_736521;
object e_736528 [2];
c_736521.hdr.mark = gc_color_red;
 c_736521.hdr.grayed = 0;
c_736521.tag = closureN_tag;
 c_736521.fn = (function_type)__lambda_178;
c_736521.num_args = 1;
c_736521.num_elements = 2;
c_736521.elements = (object *)e_736528;
c_736521.elements[0] = ((closureN)self_734347)->elements[2];
c_736521.elements[1] = ((closureN)self_734347)->elements[4];

return_direct_with_clo1(data,(closure)&c_736498,__lambda_177,  &c_736521);}
;; 
}

static void __lambda_178(void *data, object self_734350, int argc, object *args) /* object self_734350, object r_733248 */
 {
 object r_733248 = args[0];
  
pair_type local_736526; 
return_direct_with_clo1(data,  ((closureN)self_734350)->elements[0], (((closure)  ((closureN)self_734350)->elements[0])->fn),  set_pair_as_expr(&local_736526, ((closureN)self_734350)->elements[1], r_733248));; 
}

static void __lambda_177(void *data, object self_734351, int argc, object *args) /* object self_734351, object k_733250 */
 {
 object k_733250 = args[0];
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_734351)->elements[0]))) ){ 
  







return_closcall5(data,  car(((closureN)self_734351)->elements[2]),  k_733250, Cyc_car(data, Cyc_cdr(data, ((closureN)self_734351)->elements[0])), Cyc_cdr(data, ((closureN)self_734351)->elements[0]), ((closureN)self_734351)->elements[3], ((closureN)self_734351)->elements[1]);
} else { 
  return_direct_with_clo1(data,  k_733250, (((closure)  k_733250)->fn),  ((closureN)self_734351)->elements[1]);}
;; 
}

static void __lambda_176(void *data, object self_734348, int argc, object *args) /* object self_734348, object r_733243 */
 {
 object r_733243 = args[0];
  
pair_type local_736494; 
return_direct_with_clo1(data,  ((closureN)self_734348)->elements[0], (((closure)  ((closureN)self_734348)->elements[0])->fn),  set_pair_as_expr(&local_736494, ((closureN)self_734348)->elements[1], r_733243));; 
}

static void __lambda_175(void *data, object self_734349, int argc, object *args) /* object self_734349, object k_733245 */
 {
 object k_733245 = args[0];
    
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_734349)->elements[1]))) ){ 
  







return_closcall5(data,  car(((closureN)self_734349)->elements[2]),  k_733245, ((closureN)self_734349)->elements[3], ((closureN)self_734349)->elements[0], Cyc_car(data, Cyc_cdr(data, ((closureN)self_734349)->elements[1])), Cyc_cdr(data, ((closureN)self_734349)->elements[1]));
} else { 
  return_direct_with_clo1(data,  k_733245, (((closure)  k_733245)->fn),  ((closureN)self_734349)->elements[0]);}
;; 
}

static void __lambda_171(void *data, object self_734352, int argc, object *args) /* object self_734352, object r_733240 */
 {
 object r_733240 = args[0];
  
closureN_type c_736446;
object e_736456 [6];
c_736446.hdr.mark = gc_color_red;
 c_736446.hdr.grayed = 0;
c_736446.tag = closureN_tag;
 c_736446.fn = (function_type)__lambda_172;
c_736446.num_args = 1;
c_736446.num_elements = 6;
c_736446.elements = (object *)e_736456;
c_736446.elements[0] = ((closureN)self_734352)->elements[0];
c_736446.elements[1] = ((closureN)self_734352)->elements[1];
c_736446.elements[2] = ((closureN)self_734352)->elements[2];
c_736446.elements[3] = ((closureN)self_734352)->elements[3];
c_736446.elements[4] = ((closureN)self_734352)->elements[4];
c_736446.elements[5] = ((closureN)self_734352)->elements[5];



return_direct_with_clo1(data,(closure)&c_736446,__lambda_172,  Cyc_set_cell(data, ((closureN)self_734352)->elements[3], r_733240));; 
}

static void __lambda_172(void *data, object self_734353, int argc, object *args) /* object self_734353, object r_733239 */
 {

  

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

static void __lambda_138(void *data, object self_734354, int argc, object *args) /* object self_734354, object r_733235 */
 {
 object r_733235 = args[0];
  
closureN_type c_736252;
object e_736427 [5];
c_736252.hdr.mark = gc_color_red;
 c_736252.hdr.grayed = 0;
c_736252.tag = closureN_tag;
 c_736252.fn = (function_type)__lambda_139;
c_736252.num_args = 1;
c_736252.num_elements = 5;
c_736252.elements = (object *)e_736427;
c_736252.elements[0] = ((closureN)self_734354)->elements[0];
c_736252.elements[1] = ((closureN)self_734354)->elements[1];
c_736252.elements[2] = ((closureN)self_734354)->elements[2];
c_736252.elements[3] = ((closureN)self_734354)->elements[3];
c_736252.elements[4] = ((closureN)self_734354)->elements[4];



return_direct_with_clo1(data,(closure)&c_736252,__lambda_139,  Cyc_set_cell(data, ((closureN)self_734354)->elements[4], r_733235));; 
}

static void __lambda_139(void *data, object self_734355, int argc, object *args) /* object self_734355, object r_733201 */
 {

  
closureN_type c_736254;
object e_736304 [4];
c_736254.hdr.mark = gc_color_red;
 c_736254.hdr.grayed = 0;
c_736254.tag = closureN_tag;
 c_736254.fn = (function_type)__lambda_140;
c_736254.num_args = 1;
c_736254.num_elements = 4;
c_736254.elements = (object *)e_736304;
c_736254.elements[0] = ((closureN)self_734355)->elements[0];
c_736254.elements[1] = ((closureN)self_734355)->elements[1];
c_736254.elements[2] = ((closureN)self_734355)->elements[2];
c_736254.elements[3] = ((closureN)self_734355)->elements[3];


closureN_type c_736305;
object e_736426 [3];
c_736305.hdr.mark = gc_color_red;
 c_736305.hdr.grayed = 0;
c_736305.tag = closureN_tag;
 c_736305.fn = (function_type)__lambda_150;
c_736305.num_args = 5;
c_736305.num_elements = 3;
c_736305.elements = (object *)e_736426;
c_736305.elements[0] = ((closureN)self_734355)->elements[0];
c_736305.elements[1] = ((closureN)self_734355)->elements[1];
c_736305.elements[2] = ((closureN)self_734355)->elements[4];

return_direct_with_clo1(data,(closure)&c_736254,__lambda_140,  &c_736305);; 
}

static void __lambda_150(void *data, object self_734356, int argc, object *args) /* object self_734356, object k_733213, object s_73320_732379, object ls_73321_732380, object ls2_73322_732381, object u_73323_732382, object lw_73324_732383 */
 {
 object k_733213 = args[0]; object s_73320_732379 = args[1]; object ls_73321_732380 = args[2]; object ls2_73322_732381 = args[3]; object u_73323_732382 = args[4]; object lw_73324_732383 = args[5];
  object r_733214;
    
if( (boolean_f != Cyc_num_fast_lte_op(data, lw_73324_732383, ls_73321_732380)) ){ 
  
  r_733214 = Cyc_num_fast_lte_op(data, lw_73324_732383, ls_73321_732380);
} else { 
  object local_736315 = alloca(sizeof(complex_num_type)); 
  
  r_733214 = ((inline_function_type)
                   ((closure)__glo_not_191_191inline_191_191_scheme_base)->fn)(data,local_736315, Cyc_is_pair(u_73323_732382));}
;if( (boolean_f != r_733214) ){ 
  return_direct_with_clo4(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_733213, s_73320_732379, ls_73321_732380, u_73323_732382);
} else { 
  
closureN_type c_736320;
object e_736425 [8];
c_736320.hdr.mark = gc_color_red;
 c_736320.hdr.grayed = 0;
c_736320.tag = closureN_tag;
 c_736320.fn = (function_type)__lambda_151;
c_736320.num_args = 1;
c_736320.num_elements = 8;
c_736320.elements = (object *)e_736425;
c_736320.elements[0] = ((closureN)self_734356)->elements[0];
c_736320.elements[1] = ((closureN)self_734356)->elements[1];
c_736320.elements[2] = k_733213;
c_736320.elements[3] = ls_73321_732380;
c_736320.elements[4] = lw_73324_732383;
c_736320.elements[5] = ((closureN)self_734356)->elements[2];
c_736320.elements[6] = s_73320_732379;
c_736320.elements[7] = u_73323_732382;

return_direct_with_clo1(data,(closure)&c_736320,__lambda_151,  ls2_73322_732381);}
;; 
}

static void __lambda_151(void *data, object self_734357, int argc, object *args) /* object self_734357, object ls2_73545_732392 */
 {
 object ls2_73545_732392 = args[0];
  
closureN_type c_736322;
object e_736424 [9];
c_736322.hdr.mark = gc_color_red;
 c_736322.hdr.grayed = 0;
c_736322.tag = closureN_tag;
 c_736322.fn = (function_type)__lambda_152;
c_736322.num_args = 1;
c_736322.num_elements = 9;
c_736322.elements = (object *)e_736424;
c_736322.elements[0] = ((closureN)self_734357)->elements[0];
c_736322.elements[1] = ((closureN)self_734357)->elements[1];
c_736322.elements[2] = ((closureN)self_734357)->elements[2];
c_736322.elements[3] = ((closureN)self_734357)->elements[3];
c_736322.elements[4] = ls2_73545_732392;
c_736322.elements[5] = ((closureN)self_734357)->elements[4];
c_736322.elements[6] = ((closureN)self_734357)->elements[5];
c_736322.elements[7] = ((closureN)self_734357)->elements[6];
c_736322.elements[8] = ((closureN)self_734357)->elements[7];

return_direct_with_clo1(data,(closure)&c_736322,__lambda_152,  boolean_f);; 
}

static void __lambda_152(void *data, object self_734358, int argc, object *args) /* object self_734358, object lp_73546_732393 */
 {
 object lp_73546_732393 = args[0];
  
closureN_type c_736324;
object e_736420 [9];
c_736324.hdr.mark = gc_color_red;
 c_736324.hdr.grayed = 0;
c_736324.tag = closureN_tag;
 c_736324.fn = (function_type)__lambda_771;
c_736324.num_args = 1;
c_736324.num_elements = 9;
c_736324.elements = (object *)e_736420;
c_736324.elements[0] = ((closureN)self_734358)->elements[0];
c_736324.elements[1] = ((closureN)self_734358)->elements[1];
c_736324.elements[2] = ((closureN)self_734358)->elements[2];
c_736324.elements[3] = ((closureN)self_734358)->elements[3];
c_736324.elements[4] = ((closureN)self_734358)->elements[4];
c_736324.elements[5] = ((closureN)self_734358)->elements[5];
c_736324.elements[6] = ((closureN)self_734358)->elements[6];
c_736324.elements[7] = ((closureN)self_734358)->elements[7];
c_736324.elements[8] = ((closureN)self_734358)->elements[8];


pair_type local_736423; 
return_direct_with_clo1(data,(closure)&c_736324,__lambda_771,  set_cell_as_expr(&local_736423, lp_73546_732393));; 
}

static void __lambda_771(void *data, object self_734359, int argc, object *args) /* object self_734359, object lp_73546_732393 */
 {
 object lp_73546_732393 = args[0];
  
closureN_type c_736326;
object e_736403 [10];
c_736326.hdr.mark = gc_color_red;
 c_736326.hdr.grayed = 0;
c_736326.tag = closureN_tag;
 c_736326.fn = (function_type)__lambda_153;
c_736326.num_args = 1;
c_736326.num_elements = 10;
c_736326.elements = (object *)e_736403;
c_736326.elements[0] = ((closureN)self_734359)->elements[0];
c_736326.elements[1] = ((closureN)self_734359)->elements[1];
c_736326.elements[2] = ((closureN)self_734359)->elements[2];
c_736326.elements[3] = lp_73546_732393;
c_736326.elements[4] = ((closureN)self_734359)->elements[3];
c_736326.elements[5] = ((closureN)self_734359)->elements[4];
c_736326.elements[6] = ((closureN)self_734359)->elements[5];
c_736326.elements[7] = ((closureN)self_734359)->elements[6];
c_736326.elements[8] = ((closureN)self_734359)->elements[7];
c_736326.elements[9] = ((closureN)self_734359)->elements[8];


closureN_type c_736404;
object e_736419 [2];
c_736404.hdr.mark = gc_color_red;
 c_736404.hdr.grayed = 0;
c_736404.tag = closureN_tag;
 c_736404.fn = (function_type)__lambda_165;
c_736404.num_args = 1;
c_736404.num_elements = 2;
c_736404.elements = (object *)e_736419;
c_736404.elements[0] = lp_73546_732393;
c_736404.elements[1] = ((closureN)self_734359)->elements[3];

return_direct_with_clo1(data,(closure)&c_736326,__lambda_153,  &c_736404);; 
}

static void __lambda_165(void *data, object self_734360, int argc, object *args) /* object self_734360, object k_733229, object ls2_73547_732394 */
 {
 object k_733229 = args[0]; object ls2_73547_732394 = args[1];
    
  complex_num_type local_736409; 
if( (boolean_f != Cyc_num_fast_lte_op(data, Cyc_fast_sum(data,&local_736409, ls2_73547_732394, ls2_73547_732394), ((closureN)self_734360)->elements[1])) ){ 
  


complex_num_type local_736417; 
return_closcall2(data,  car(((closureN)self_734360)->elements[0]),  k_733229, Cyc_fast_sum(data,&local_736417, ls2_73547_732394, ls2_73547_732394));
} else { 
  return_direct_with_clo1(data,  k_733229, (((closure)  k_733229)->fn),  ls2_73547_732394);}
;; 
}

static void __lambda_153(void *data, object self_734361, int argc, object *args) /* object self_734361, object r_733228 */
 {
 object r_733228 = args[0];
  
closureN_type c_736328;
object e_736399 [10];
c_736328.hdr.mark = gc_color_red;
 c_736328.hdr.grayed = 0;
c_736328.tag = closureN_tag;
 c_736328.fn = (function_type)__lambda_154;
c_736328.num_args = 1;
c_736328.num_elements = 10;
c_736328.elements = (object *)e_736399;
c_736328.elements[0] = ((closureN)self_734361)->elements[0];
c_736328.elements[1] = ((closureN)self_734361)->elements[1];
c_736328.elements[2] = ((closureN)self_734361)->elements[2];
c_736328.elements[3] = ((closureN)self_734361)->elements[3];
c_736328.elements[4] = ((closureN)self_734361)->elements[4];
c_736328.elements[5] = ((closureN)self_734361)->elements[5];
c_736328.elements[6] = ((closureN)self_734361)->elements[6];
c_736328.elements[7] = ((closureN)self_734361)->elements[7];
c_736328.elements[8] = ((closureN)self_734361)->elements[8];
c_736328.elements[9] = ((closureN)self_734361)->elements[9];



return_direct_with_clo1(data,(closure)&c_736328,__lambda_154,  Cyc_set_cell(data, ((closureN)self_734361)->elements[3], r_733228));; 
}

static void __lambda_154(void *data, object self_734362, int argc, object *args) /* object self_734362, object r_733227 */
 {

  


closureN_type c_736333;
object e_736397 [8];
c_736333.hdr.mark = gc_color_red;
 c_736333.hdr.grayed = 0;
c_736333.tag = closureN_tag;
 c_736333.fn = (function_type)__lambda_155;
c_736333.num_args = 1;
c_736333.num_elements = 8;
c_736333.elements = (object *)e_736397;
c_736333.elements[0] = ((closureN)self_734362)->elements[0];
c_736333.elements[1] = ((closureN)self_734362)->elements[1];
c_736333.elements[2] = ((closureN)self_734362)->elements[2];
c_736333.elements[3] = ((closureN)self_734362)->elements[4];
c_736333.elements[4] = ((closureN)self_734362)->elements[6];
c_736333.elements[5] = ((closureN)self_734362)->elements[7];
c_736333.elements[6] = ((closureN)self_734362)->elements[8];
c_736333.elements[7] = ((closureN)self_734362)->elements[9];

return_closcall2(data,  car(((closureN)self_734362)->elements[3]),  &c_736333, ((closureN)self_734362)->elements[5]);; 
}

static void __lambda_155(void *data, object self_734363, int argc, object *args) /* object self_734363, object ls2_73382_732385 */
 {
 object ls2_73382_732385 = args[0];
  
closureN_type c_736335;
object e_736389 [7];
c_736335.hdr.mark = gc_color_red;
 c_736335.hdr.grayed = 0;
c_736335.tag = closureN_tag;
 c_736335.fn = (function_type)__lambda_156;
c_736335.num_args = 1;
c_736335.num_elements = 7;
c_736335.elements = (object *)e_736389;
c_736335.elements[0] = ((closureN)self_734363)->elements[1];
c_736335.elements[1] = ((closureN)self_734363)->elements[2];
c_736335.elements[2] = ((closureN)self_734363)->elements[3];
c_736335.elements[3] = ls2_73382_732385;
c_736335.elements[4] = ((closureN)self_734363)->elements[4];
c_736335.elements[5] = ((closureN)self_734363)->elements[5];
c_736335.elements[6] = ((closureN)self_734363)->elements[6];


closureN_type c_736390;
object e_736396 [2];
c_736390.hdr.mark = gc_color_red;
 c_736390.hdr.grayed = 0;
c_736390.tag = closureN_tag;
 c_736390.fn = (function_type)__lambda_164;
c_736390.num_args = 0;
c_736390.num_elements = 2;
c_736390.elements = (object *)e_736396;
c_736390.elements[0] = ((closureN)self_734363)->elements[0];
c_736390.elements[1] = ((closureN)self_734363)->elements[7];

return_direct_with_clo1(data,(closure)&c_736335,__lambda_156,  &c_736390);; 
}

static void __lambda_164(void *data, object self_734364, int argc, object *args) /* object self_734364, object k_733226 */
 {
 object k_733226 = args[0];
  

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

static void __lambda_156(void *data, object self_734365, int argc, object *args) /* object self_734365, object r_733216 */
 {
 object r_733216 = args[0];
  
closureN_type c_736337;
object e_736341 [2];
c_736337.hdr.mark = gc_color_red;
 c_736337.hdr.grayed = 0;
c_736337.tag = closureN_tag;
 c_736337.fn = (function_type)__lambda_157;
c_736337.num_args = 1;
c_736337.num_elements = 2;
c_736337.elements = (object *)e_736341;
c_736337.elements[0] = ((closureN)self_734365)->elements[1];
c_736337.elements[1] = r_733216;


closureN_type c_736342;
object e_736388 [6];
c_736342.hdr.mark = gc_color_red;
 c_736342.hdr.grayed = 0;
c_736342.tag = closureN_tag;
 c_736342.fn = (function_type)__lambda_158;
c_736342.num_args = 3;
c_736342.num_elements = 6;
c_736342.elements = (object *)e_736388;
c_736342.elements[0] = ((closureN)self_734365)->elements[0];
c_736342.elements[1] = ((closureN)self_734365)->elements[2];
c_736342.elements[2] = ((closureN)self_734365)->elements[3];
c_736342.elements[3] = ((closureN)self_734365)->elements[4];
c_736342.elements[4] = ((closureN)self_734365)->elements[5];
c_736342.elements[5] = ((closureN)self_734365)->elements[6];

return_direct_with_clo1(data,(closure)&c_736337,__lambda_157,  &c_736342);; 
}

static void __lambda_158(void *data, object self_734366, int argc, object *args) /* object self_734366, object k_733218, object r_73435_732386, object lr_73436_732387, object u2_73437_732388 */
 {
 object k_733218 = args[0]; object r_73435_732386 = args[1]; object lr_73436_732387 = args[2]; object u2_73437_732388 = args[3];
  
closureN_type c_736344;
object e_736377 [7];
c_736344.hdr.mark = gc_color_red;
 c_736344.hdr.grayed = 0;
c_736344.tag = closureN_tag;
 c_736344.fn = (function_type)__lambda_159;
c_736344.num_args = 1;
c_736344.num_elements = 7;
c_736344.elements = (object *)e_736377;
c_736344.elements[0] = ((closureN)self_734366)->elements[0];
c_736344.elements[1] = k_733218;
c_736344.elements[2] = ((closureN)self_734366)->elements[1];
c_736344.elements[3] = ((closureN)self_734366)->elements[2];
c_736344.elements[4] = ((closureN)self_734366)->elements[3];
c_736344.elements[5] = ((closureN)self_734366)->elements[4];
c_736344.elements[6] = ((closureN)self_734366)->elements[5];


closureN_type c_736378;
object e_736387 [5];
c_736378.hdr.mark = gc_color_red;
 c_736378.hdr.grayed = 0;
c_736378.tag = closureN_tag;
 c_736378.fn = (function_type)__lambda_163;
c_736378.num_args = 0;
c_736378.num_elements = 5;
c_736378.elements = (object *)e_736387;
c_736378.elements[0] = ((closureN)self_734366)->elements[0];
c_736378.elements[1] = lr_73436_732387;
c_736378.elements[2] = ((closureN)self_734366)->elements[2];
c_736378.elements[3] = r_73435_732386;
c_736378.elements[4] = u2_73437_732388;

return_direct_with_clo1(data,(closure)&c_736344,__lambda_159,  &c_736378);; 
}

static void __lambda_163(void *data, object self_734367, int argc, object *args) /* object self_734367, object k_733225 */
 {
 object k_733225 = args[0];
  

return_closcall6(data,  car(((closureN)self_734367)->elements[0]),  k_733225, ((closureN)self_734367)->elements[3], ((closureN)self_734367)->elements[1], obj_int2obj(1), ((closureN)self_734367)->elements[4], ((closureN)self_734367)->elements[2]);; 
}

static void __lambda_159(void *data, object self_734368, int argc, object *args) /* object self_734368, object r_733219 */
 {
 object r_733219 = args[0];
  
closureN_type c_736346;
object e_736350 [2];
c_736346.hdr.mark = gc_color_red;
 c_736346.hdr.grayed = 0;
c_736346.tag = closureN_tag;
 c_736346.fn = (function_type)__lambda_160;
c_736346.num_args = 1;
c_736346.num_elements = 2;
c_736346.elements = (object *)e_736350;
c_736346.elements[0] = ((closureN)self_734368)->elements[1];
c_736346.elements[1] = r_733219;


closureN_type c_736351;
object e_736376 [6];
c_736351.hdr.mark = gc_color_red;
 c_736351.hdr.grayed = 0;
c_736351.tag = closureN_tag;
 c_736351.fn = (function_type)__lambda_161;
c_736351.num_args = 3;
c_736351.num_elements = 6;
c_736351.elements = (object *)e_736376;
c_736351.elements[0] = ((closureN)self_734368)->elements[0];
c_736351.elements[1] = ((closureN)self_734368)->elements[2];
c_736351.elements[2] = ((closureN)self_734368)->elements[3];
c_736351.elements[3] = ((closureN)self_734368)->elements[4];
c_736351.elements[4] = ((closureN)self_734368)->elements[5];
c_736351.elements[5] = ((closureN)self_734368)->elements[6];

return_direct_with_clo1(data,(closure)&c_736346,__lambda_160,  &c_736351);; 
}

static void __lambda_161(void *data, object self_734369, int argc, object *args) /* object self_734369, object k_733221, object t_73490_732389, object lt_73491_732390, object u3_73492_732391 */
 {
 object k_733221 = args[0]; object t_73490_732389 = args[1]; object lt_73491_732390 = args[2]; object u3_73492_732391 = args[3];
  


closureN_type c_736356;
object e_736374 [7];
c_736356.hdr.mark = gc_color_red;
 c_736356.hdr.grayed = 0;
c_736356.tag = closureN_tag;
 c_736356.fn = (function_type)__lambda_162;
c_736356.num_args = 1;
c_736356.num_elements = 7;
c_736356.elements = (object *)e_736374;
c_736356.elements[0] = ((closureN)self_734369)->elements[0];
c_736356.elements[1] = k_733221;
c_736356.elements[2] = ((closureN)self_734369)->elements[1];
c_736356.elements[3] = ((closureN)self_734369)->elements[2];
c_736356.elements[4] = lt_73491_732390;
c_736356.elements[5] = ((closureN)self_734369)->elements[3];
c_736356.elements[6] = u3_73492_732391;

return_closcall3(data,  car(((closureN)self_734369)->elements[4]),  &c_736356, ((closureN)self_734369)->elements[5], t_73490_732389);; 
}

static void __lambda_162(void *data, object self_734370, int argc, object *args) /* object self_734370, object r_733222 */
 {
 object r_733222 = args[0];
  


complex_num_type local_736364; 

complex_num_type local_736369; 
return_closcall6(data,  car(((closureN)self_734370)->elements[0]),  ((closureN)self_734370)->elements[1], r_733222, Cyc_fast_sum(data,&local_736364, ((closureN)self_734370)->elements[2], ((closureN)self_734370)->elements[4]), Cyc_fast_sum(data,&local_736369, ((closureN)self_734370)->elements[3], ((closureN)self_734370)->elements[3]), ((closureN)self_734370)->elements[6], ((closureN)self_734370)->elements[5]);; 
}

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

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

static void __lambda_140(void *data, object self_734373, int argc, object *args) /* object self_734373, object r_733212 */
 {
 object r_733212 = args[0];
  
closureN_type c_736256;
object e_736300 [4];
c_736256.hdr.mark = gc_color_red;
 c_736256.hdr.grayed = 0;
c_736256.tag = closureN_tag;
 c_736256.fn = (function_type)__lambda_141;
c_736256.num_args = 1;
c_736256.num_elements = 4;
c_736256.elements = (object *)e_736300;
c_736256.elements[0] = ((closureN)self_734373)->elements[0];
c_736256.elements[1] = ((closureN)self_734373)->elements[1];
c_736256.elements[2] = ((closureN)self_734373)->elements[2];
c_736256.elements[3] = ((closureN)self_734373)->elements[3];



return_direct_with_clo1(data,(closure)&c_736256,__lambda_141,  Cyc_set_cell(data, ((closureN)self_734373)->elements[1], r_733212));; 
}

static void __lambda_141(void *data, object self_734374, int argc, object *args) /* object self_734374, object r_733202 */
 {

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


closureN_type c_736291;
object e_736297 [2];
c_736291.hdr.mark = gc_color_red;
 c_736291.hdr.grayed = 0;
c_736291.tag = closureN_tag;
 c_736291.fn = (function_type)__lambda_149;
c_736291.num_args = 0;
c_736291.num_elements = 2;
c_736291.elements = (object *)e_736297;
c_736291.elements[0] = ((closureN)self_734374)->elements[0];
c_736291.elements[1] = ((closureN)self_734374)->elements[3];

return_direct_with_clo1(data,(closure)&c_736261,__lambda_142,  &c_736291);
} else { 
  return_direct_with_clo1(data,  ((closureN)self_734374)->elements[2], (((closure)  ((closureN)self_734374)->elements[2])->fn),  NULL);}
;; 
}

static void __lambda_149(void *data, object self_734375, int argc, object *args) /* object self_734375, object k_733211 */
 {
 object k_733211 = args[0];
  

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

static void __lambda_142(void *data, object self_734376, int argc, object *args) /* object self_734376, object r_733204 */
 {
 object r_733204 = args[0];
  
closureN_type c_736263;
object e_736267 [2];
c_736263.hdr.mark = gc_color_red;
 c_736263.hdr.grayed = 0;
c_736263.tag = closureN_tag;
 c_736263.fn = (function_type)__lambda_143;
c_736263.num_args = 1;
c_736263.num_elements = 2;
c_736263.elements = (object *)e_736267;
c_736263.elements[0] = ((closureN)self_734376)->elements[1];
c_736263.elements[1] = r_733204;


closureN_type c_736268;
object e_736289 [1];
c_736268.hdr.mark = gc_color_red;
 c_736268.hdr.grayed = 0;
c_736268.tag = closureN_tag;
 c_736268.fn = (function_type)__lambda_144;
c_736268.num_args = 3;
c_736268.num_elements = 1;
c_736268.elements = (object *)e_736289;
c_736268.elements[0] = ((closureN)self_734376)->elements[0];

return_direct_with_clo1(data,(closure)&c_736263,__lambda_143,  &c_736268);; 
}

static void __lambda_144(void *data, object self_734377, int argc, object *args) /* object self_734377, object k_733206, object r_73601_732396, object lr_73602_732397, object tail_73603_732398 */
 {
 object k_733206 = args[0]; object r_73601_732396 = args[1]; object lr_73602_732397 = args[2]; object tail_73603_732398 = args[3];
  
closureN_type c_736270;
object e_736279 [1];
c_736270.hdr.mark = gc_color_red;
 c_736270.hdr.grayed = 0;
c_736270.tag = closureN_tag;
 c_736270.fn = (function_type)__lambda_145;
c_736270.num_args = 1;
c_736270.num_elements = 1;
c_736270.elements = (object *)e_736279;
c_736270.elements[0] = k_733206;


closureN_type c_736280;
object e_736288 [4];
c_736280.hdr.mark = gc_color_red;
 c_736280.hdr.grayed = 0;
c_736280.tag = closureN_tag;
 c_736280.fn = (function_type)__lambda_148;
c_736280.num_args = 0;
c_736280.num_elements = 4;
c_736280.elements = (object *)e_736288;
c_736280.elements[0] = ((closureN)self_734377)->elements[0];
c_736280.elements[1] = lr_73602_732397;
c_736280.elements[2] = r_73601_732396;
c_736280.elements[3] = tail_73603_732398;

return_direct_with_clo1(data,(closure)&c_736270,__lambda_145,  &c_736280);; 
}

static void __lambda_148(void *data, object self_734378, int argc, object *args) /* object self_734378, object k_733210 */
 {
 object k_733210 = args[0];
  

return_closcall6(data,  car(((closureN)self_734378)->elements[0]),  k_733210, ((closureN)self_734378)->elements[2], ((closureN)self_734378)->elements[1], obj_int2obj(1), ((closureN)self_734378)->elements[3], obj_int2obj(16777216));; 
}

static void __lambda_145(void *data, object self_734379, int argc, object *args) /* object self_734379, object r_733207 */
 {
 object r_733207 = args[0];
  
closureN_type c_736272;
object e_736276 [2];
c_736272.hdr.mark = gc_color_red;
 c_736272.hdr.grayed = 0;
c_736272.tag = closureN_tag;
 c_736272.fn = (function_type)__lambda_146;
c_736272.num_args = 1;
c_736272.num_elements = 2;
c_736272.elements = (object *)e_736276;
c_736272.elements[0] = ((closureN)self_734379)->elements[0];
c_736272.elements[1] = r_733207;


mclosure0(c_736277, (function_type)__lambda_147);c_736277.num_args = 3;
return_direct_with_clo1(data,(closure)&c_736272,__lambda_146,  &c_736277);; 
}

static void __lambda_147(void *data, object self_734380, int argc, object *args) /* object self_734380, object k_733209, object a_73710_732400, object la_73711_732401, object v_73712_732402 */
 {
 object k_733209 = args[0]; object a_73710_732400 = args[1];
  return_direct_with_clo1(data,  k_733209, (((closure)  k_733209)->fn),  a_73710_732400);; 
}

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

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

static void __lambda_80(void *data, object _, int argc, object *args) /* closure _,object k_733048, object expr_7395_73135_73225_732279, object rename_7396_73136_73226_732280, object compare_7397_73137_73227_732281 */
 {
object k_733048 = args[0]; object expr_7395_73135_73225_732279 = args[1]; object rename_7396_73136_73226_732280 = args[2];
  Cyc_st_add(data, "srfi/132.sld:mlet");

closureN_type c_735561;
object e_736221 [3];
c_735561.hdr.mark = gc_color_red;
 c_735561.hdr.grayed = 0;
c_735561.tag = closureN_tag;
 c_735561.fn = (function_type)__lambda_81;
c_735561.num_args = 1;
c_735561.num_elements = 3;
c_735561.elements = (object *)e_736221;
c_735561.elements[0] = expr_7395_73135_73225_732279;
c_735561.elements[1] = k_733048;
c_735561.elements[2] = rename_7396_73136_73226_732280;



return_direct_with_clo1(data,(closure)&c_735561,__lambda_81,  Cyc_cdr(data, expr_7395_73135_73225_732279));; 
}

static void __lambda_81(void *data, object self_734258, int argc, object *args) /* object self_734258, object v_931_73103_73205_73264_732318 */
 {
 object v_931_73103_73205_73264_732318 = args[0];
  
closureN_type c_735563;
object e_735712 [2];
c_735563.hdr.mark = gc_color_red;
 c_735563.hdr.grayed = 0;
c_735563.tag = closureN_tag;
 c_735563.fn = (function_type)__lambda_82;
c_735563.num_args = 0;
c_735563.num_elements = 2;
c_735563.elements = (object *)e_735712;
c_735563.elements[0] = ((closureN)self_734258)->elements[2];
c_735563.elements[1] = v_931_73103_73205_73264_732318;


closureN_type c_735713;
object e_736220 [3];
c_735713.hdr.mark = gc_color_red;
 c_735713.hdr.grayed = 0;
c_735713.tag = closureN_tag;
 c_735713.fn = (function_type)__lambda_90;
c_735713.num_args = 1;
c_735713.num_elements = 3;
c_735713.elements = (object *)e_736220;
c_735713.elements[0] = ((closureN)self_734258)->elements[0];
c_735713.elements[1] = ((closureN)self_734258)->elements[1];
c_735713.elements[2] = ((closureN)self_734258)->elements[2];

return_direct_with_clo1(data,(closure)&c_735563,__lambda_82,  &c_735713);; 
}

static void __lambda_90(void *data, object self_734259, int argc, object *args) /* object self_734259, object tmp_73139_73141_73228_732282 */
 {
 object tmp_73139_73141_73228_732282 = args[0];
  
closureN_type c_735715;
object e_736213 [3];
c_735715.hdr.mark = gc_color_red;
 c_735715.hdr.grayed = 0;
c_735715.tag = closureN_tag;
 c_735715.fn = (function_type)__lambda_91;
c_735715.num_args = 0;
c_735715.num_elements = 3;
c_735715.elements = (object *)e_736213;
c_735715.elements[0] = ((closureN)self_734259)->elements[0];
c_735715.elements[1] = ((closureN)self_734259)->elements[2];
c_735715.elements[2] = tmp_73139_73141_73228_732282;


closureN_type c_736214;
object e_736219 [1];
c_736214.hdr.mark = gc_color_red;
 c_736214.hdr.grayed = 0;
c_736214.tag = closureN_tag;
 c_736214.fn = (function_type)__lambda_129;
c_736214.num_args = 1;
c_736214.num_elements = 1;
c_736214.elements = (object *)e_736219;
c_736214.elements[0] = ((closureN)self_734259)->elements[1];

return_direct_with_clo1(data,(closure)&c_735715,__lambda_91,  &c_736214);; 
}

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

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

static void __lambda_91(void *data, object self_734261, int argc, object *args) /* object self_734261, object k_733051 */
 {
 object k_733051 = args[0];
  if( (boolean_f != ((closureN)self_734261)->elements[2]) ){ 
  return_direct_with_clo1(data,  k_733051, (((closure)  k_733051)->fn),  ((closureN)self_734261)->elements[2]);
} else { 
  
closureN_type c_735720;
object e_736209 [3];
c_735720.hdr.mark = gc_color_red;
 c_735720.hdr.grayed = 0;
c_735720.tag = closureN_tag;
 c_735720.fn = (function_type)__lambda_92;
c_735720.num_args = 1;
c_735720.num_elements = 3;
c_735720.elements = (object *)e_736209;
c_735720.elements[0] = ((closureN)self_734261)->elements[0];
c_735720.elements[1] = k_733051;
c_735720.elements[2] = ((closureN)self_734261)->elements[1];



return_direct_with_clo1(data,(closure)&c_735720,__lambda_92,  Cyc_cdr(data, ((closureN)self_734261)->elements[0]));}
;; 
}

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


closureN_type c_735915;
object e_736208 [3];
c_735915.hdr.mark = gc_color_red;
 c_735915.hdr.grayed = 0;
c_735915.tag = closureN_tag;
 c_735915.fn = (function_type)__lambda_104;
c_735915.num_args = 1;
c_735915.num_elements = 3;
c_735915.elements = (object *)e_736208;
c_735915.elements[0] = ((closureN)self_734262)->elements[0];
c_735915.elements[1] = ((closureN)self_734262)->elements[1];
c_735915.elements[2] = ((closureN)self_734262)->elements[2];

return_direct_with_clo1(data,(closure)&c_735722,__lambda_93,  &c_735915);; 
}

static void __lambda_104(void *data, object self_734263, int argc, object *args) /* object self_734263, object tmp_73143_73145_73229_732283 */
 {
 object tmp_73143_73145_73229_732283 = args[0];
  if( (boolean_f != tmp_73143_73145_73229_732283) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734263)->elements[1], (((closure)  ((closureN)self_734263)->elements[1])->fn),  tmp_73143_73145_73229_732283);
} else { 
  
closureN_type c_735919;
object e_736204 [3];
c_735919.hdr.mark = gc_color_red;
 c_735919.hdr.grayed = 0;
c_735919.tag = closureN_tag;
 c_735919.fn = (function_type)__lambda_105;
c_735919.num_args = 1;
c_735919.num_elements = 3;
c_735919.elements = (object *)e_736204;
c_735919.elements[0] = ((closureN)self_734263)->elements[0];
c_735919.elements[1] = ((closureN)self_734263)->elements[1];
c_735919.elements[2] = ((closureN)self_734263)->elements[2];



return_direct_with_clo1(data,(closure)&c_735919,__lambda_105,  Cyc_cdr(data, ((closureN)self_734263)->elements[0]));}
;; 
}

static void __lambda_105(void *data, object self_734264, int argc, object *args) /* object self_734264, object v_9321_73123_73161_73236_732290 */
 {
 object v_9321_73123_73161_73236_732290 = args[0];
  
closureN_type c_735921;
object e_736141 [2];
c_735921.hdr.mark = gc_color_red;
 c_735921.hdr.grayed = 0;
c_735921.tag = closureN_tag;
 c_735921.fn = (function_type)__lambda_106;
c_735921.num_args = 0;
c_735921.num_elements = 2;
c_735921.elements = (object *)e_736141;
c_735921.elements[0] = ((closureN)self_734264)->elements[2];
c_735921.elements[1] = v_9321_73123_73161_73236_732290;


closureN_type c_736142;
object e_736203 [3];
c_736142.hdr.mark = gc_color_red;
 c_736142.hdr.grayed = 0;
c_736142.tag = closureN_tag;
 c_736142.fn = (function_type)__lambda_122;
c_736142.num_args = 1;
c_736142.num_elements = 3;
c_736142.elements = (object *)e_736203;
c_736142.elements[0] = ((closureN)self_734264)->elements[0];
c_736142.elements[1] = ((closureN)self_734264)->elements[1];
c_736142.elements[2] = ((closureN)self_734264)->elements[2];

return_direct_with_clo1(data,(closure)&c_735921,__lambda_106,  &c_736142);; 
}

static void __lambda_122(void *data, object self_734265, int argc, object *args) /* object self_734265, object tmp_73147_73149_73230_732284 */
 {
 object tmp_73147_73149_73230_732284 = args[0];
  if( (boolean_f != tmp_73147_73149_73230_732284) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734265)->elements[1], (((closure)  ((closureN)self_734265)->elements[1])->fn),  tmp_73147_73149_73230_732284);
} else { 
  
closureN_type c_736146;
object e_736199 [3];
c_736146.hdr.mark = gc_color_red;
 c_736146.hdr.grayed = 0;
c_736146.tag = closureN_tag;
 c_736146.fn = (function_type)__lambda_123;
c_736146.num_args = 1;
c_736146.num_elements = 3;
c_736146.elements = (object *)e_736199;
c_736146.elements[0] = ((closureN)self_734265)->elements[0];
c_736146.elements[1] = ((closureN)self_734265)->elements[1];
c_736146.elements[2] = ((closureN)self_734265)->elements[2];



return_direct_with_clo1(data,(closure)&c_736146,__lambda_123,  Cyc_cdr(data, ((closureN)self_734265)->elements[0]));}
;; 
}

static void __lambda_123(void *data, object self_734266, int argc, object *args) /* object self_734266, object v_9330_73132_73154_73232_732286 */
 {
 object v_9330_73132_73154_73232_732286 = args[0];
  
closureN_type c_736148;
object e_736184 [2];
c_736148.hdr.mark = gc_color_red;
 c_736148.hdr.grayed = 0;
c_736148.tag = closureN_tag;
 c_736148.fn = (function_type)__lambda_124;
c_736148.num_args = 0;
c_736148.num_elements = 2;
c_736148.elements = (object *)e_736184;
c_736148.elements[0] = ((closureN)self_734266)->elements[2];
c_736148.elements[1] = v_9330_73132_73154_73232_732286;


closureN_type c_736185;
object e_736198 [2];
c_736185.hdr.mark = gc_color_red;
 c_736185.hdr.grayed = 0;
c_736185.tag = closureN_tag;
 c_736185.fn = (function_type)__lambda_127;
c_736185.num_args = 1;
c_736185.num_elements = 2;
c_736185.elements = (object *)e_736198;
c_736185.elements[0] = ((closureN)self_734266)->elements[0];
c_736185.elements[1] = ((closureN)self_734266)->elements[1];

return_direct_with_clo1(data,(closure)&c_736148,__lambda_124,  &c_736185);; 
}

static void __lambda_127(void *data, object self_734267, int argc, object *args) /* object self_734267, object tmp_73151_73153_73231_732285 */
 {
 object tmp_73151_73153_73231_732285 = args[0];
  if( (boolean_f != tmp_73151_73153_73231_732285) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734267)->elements[1], (((closure)  ((closureN)self_734267)->elements[1])->fn),  tmp_73151_73153_73231_732285);
} else { 
  
closureN_type c_736189;
object e_736195 [1];
c_736189.hdr.mark = gc_color_red;
 c_736189.hdr.grayed = 0;
c_736189.tag = closureN_tag;
 c_736189.fn = (function_type)__lambda_128;
c_736189.num_args = 1;
c_736189.num_elements = 1;
c_736189.elements = (object *)e_736195;
c_736189.elements[0] = ((closureN)self_734267)->elements[1];


make_utf8_string_with_len(c_736196, "no expansion for", 16, 16);
return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_736189, &c_736196, ((closureN)self_734267)->elements[0]);}
;; 
}

static void __lambda_128(void *data, object self_734268, int argc, object *args) /* object self_734268, object r_733055 */
 {
 object r_733055 = args[0];
  
pair_type local_736194; 
return_direct_with_clo1(data,  ((closureN)self_734268)->elements[0], (((closure)  ((closureN)self_734268)->elements[0])->fn),  set_pair_as_expr(&local_736194, r_733055, boolean_f));; 
}

static void __lambda_124(void *data, object self_734269, int argc, object *args) /* object self_734269, object k_733057 */
 {
 object k_733057 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_734269)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_null(Cyc_car(data, ((closureN)self_734269)->elements[1]))) ){ 
    complex_num_type local_736159; 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_736159, Cyc_cdr(data, ((closureN)self_734269)->elements[1]))) ){ 
  
closureN_type c_736165;
object e_736180 [2];
c_736165.hdr.mark = gc_color_red;
 c_736165.hdr.grayed = 0;
c_736165.tag = closureN_tag;
 c_736165.fn = (function_type)__lambda_125;
c_736165.num_args = 1;
c_736165.num_elements = 2;
c_736165.elements = (object *)e_736180;
c_736165.elements[0] = k_733057;
c_736165.elements[1] = ((closureN)self_734269)->elements[1];

return_closcall2(data,  ((closureN)self_734269)->elements[0],  &c_736165, quote_begin);
} else { 
  return_direct_with_clo1(data,  k_733057, (((closure)  k_733057)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733057, (((closure)  k_733057)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733057, (((closure)  k_733057)->fn),  boolean_f);}
;; 
}

static void __lambda_125(void *data, object self_734270, int argc, object *args) /* object self_734270, object r_733064 */
 {
 object r_733064 = args[0];
  
closureN_type c_736167;
object e_736173 [1];
c_736167.hdr.mark = gc_color_red;
 c_736167.hdr.grayed = 0;
c_736167.tag = closureN_tag;
 c_736167.fn = (function_type)__lambda_126;
c_736167.num_args = 1;
c_736167.num_elements = 1;
c_736167.elements = (object *)e_736173;
c_736167.elements[0] = ((closureN)self_734270)->elements[0];




make_pair(c_736179,quote__93_93_93,NULL);c_736179.hdr.immutable = 1;

make_pair(c_736178,quote_body,&c_736179);c_736178.hdr.immutable = 1;

make_pair(c_736177,quote_begin,&c_736178);c_736177.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736167, r_733064, Cyc_cdr(data, ((closureN)self_734270)->elements[1]), &c_736177);; 
}

static void __lambda_126(void *data, object self_734271, int argc, object *args) /* object self_734271, object r_733063 */
 {
 object r_733063 = args[0];
  
pair_type local_736172; 
return_direct_with_clo1(data,  ((closureN)self_734271)->elements[0], (((closure)  ((closureN)self_734271)->elements[0])->fn),  set_pair_as_expr(&local_736172, r_733063, boolean_f));; 
}

static void __lambda_106(void *data, object self_734272, int argc, object *args) /* object self_734272, object k_733068 */
 {
 object k_733068 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_734272)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_734272)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, ((closureN)self_734272)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_734272)->elements[1]))))) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_734272)->elements[1])))))) ){ 
    complex_num_type local_735959; 
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_735959, Cyc_cdr(data, Cyc_car(data, ((closureN)self_734272)->elements[1])))) ){ 
    complex_num_type local_735967; 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_735967, Cyc_cdr(data, ((closureN)self_734272)->elements[1]))) ){ 
  
closureN_type c_735973;
object e_736133 [3];
c_735973.hdr.mark = gc_color_red;
 c_735973.hdr.grayed = 0;
c_735973.tag = closureN_tag;
 c_735973.fn = (function_type)__lambda_107;
c_735973.num_args = 1;
c_735973.num_elements = 3;
c_735973.elements = (object *)e_736133;
c_735973.elements[0] = k_733068;
c_735973.elements[1] = ((closureN)self_734272)->elements[0];
c_735973.elements[2] = ((closureN)self_734272)->elements[1];

return_closcall2(data,  ((closureN)self_734272)->elements[0],  &c_735973, quote_call_91with_91values);
} else { 
  return_direct_with_clo1(data,  k_733068, (((closure)  k_733068)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733068, (((closure)  k_733068)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733068, (((closure)  k_733068)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733068, (((closure)  k_733068)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733068, (((closure)  k_733068)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733068, (((closure)  k_733068)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733068, (((closure)  k_733068)->fn),  boolean_f);}
;; 
}

static void __lambda_107(void *data, object self_734273, int argc, object *args) /* object self_734273, object r_733085 */
 {
 object r_733085 = args[0];
  
closureN_type c_735976;
object e_736132 [4];
c_735976.hdr.mark = gc_color_red;
 c_735976.hdr.grayed = 0;
c_735976.tag = closureN_tag;
 c_735976.fn = (function_type)__lambda_108;
c_735976.num_args = 1;
c_735976.num_elements = 4;
c_735976.elements = (object *)e_736132;
c_735976.elements[0] = ((closureN)self_734273)->elements[0];
c_735976.elements[1] = r_733085;
c_735976.elements[2] = ((closureN)self_734273)->elements[1];
c_735976.elements[3] = ((closureN)self_734273)->elements[2];

return_closcall2(data,  ((closureN)self_734273)->elements[1],  &c_735976, quote_lambda);; 
}

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










make_pair(c_736131,quote_exp,NULL);c_736131.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735978, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_734274)->elements[3])))), NULL, &c_736131);; 
}

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


make_pair(c_736120,quote_exp,NULL);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_735980, NULL, r_733112, &c_736119);; 
}

static void __lambda_110(void *data, object self_734276, int argc, object *args) /* object self_734276, object r_733109 */
 {
 object r_733109 = args[0];
  
closureN_type c_735982;
object e_736113 [4];
c_735982.hdr.mark = gc_color_red;
 c_735982.hdr.grayed = 0;
c_735982.tag = closureN_tag;
 c_735982.fn = (function_type)__lambda_111;
c_735982.num_args = 1;
c_735982.num_elements = 4;
c_735982.elements = (object *)e_736113;
c_735982.elements[0] = ((closureN)self_734276)->elements[0];
c_735982.elements[1] = ((closureN)self_734276)->elements[1];
c_735982.elements[2] = ((closureN)self_734276)->elements[3];
c_735982.elements[3] = ((closureN)self_734276)->elements[4];


make_pair(c_736117,quote_exp,NULL);c_736117.hdr.immutable = 1;

make_pair(c_736116,NULL,&c_736117);c_736116.hdr.immutable = 1;

make_pair(c_736115,quote_lambda,&c_736116);c_736115.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735982, ((closureN)self_734276)->elements[2], r_733109, &c_736115);; 
}

static void __lambda_111(void *data, object self_734277, int argc, object *args) /* object self_734277, object r_733088 */
 {
 object r_733088 = args[0];
  
closureN_type c_735985;
object e_736112 [5];
c_735985.hdr.mark = gc_color_red;
 c_735985.hdr.grayed = 0;
c_735985.tag = closureN_tag;
 c_735985.fn = (function_type)__lambda_112;
c_735985.num_args = 1;
c_735985.num_elements = 5;
c_735985.elements = (object *)e_736112;
c_735985.elements[0] = ((closureN)self_734277)->elements[0];
c_735985.elements[1] = ((closureN)self_734277)->elements[1];
c_735985.elements[2] = r_733088;
c_735985.elements[3] = ((closureN)self_734277)->elements[2];
c_735985.elements[4] = ((closureN)self_734277)->elements[3];

return_closcall2(data,  ((closureN)self_734277)->elements[2],  &c_735985, quote_lambda);; 
}

static void __lambda_112(void *data, object self_734278, int argc, object *args) /* object self_734278, object r_733094 */
 {
 object r_733094 = args[0];
  
closureN_type c_735988;
object e_736111 [5];
c_735988.hdr.mark = gc_color_red;
 c_735988.hdr.grayed = 0;
c_735988.tag = closureN_tag;
 c_735988.fn = (function_type)__lambda_113;
c_735988.num_args = 1;
c_735988.num_elements = 5;
c_735988.elements = (object *)e_736111;
c_735988.elements[0] = ((closureN)self_734278)->elements[0];
c_735988.elements[1] = ((closureN)self_734278)->elements[1];
c_735988.elements[2] = ((closureN)self_734278)->elements[2];
c_735988.elements[3] = r_733094;
c_735988.elements[4] = ((closureN)self_734278)->elements[4];

return_closcall2(data,  ((closureN)self_734278)->elements[3],  &c_735988, quote_mlet);; 
}

static void __lambda_113(void *data, object self_734279, int argc, object *args) /* object self_734279, object r_733102 */
 {
 object r_733102 = args[0];
  
closureN_type c_735990;
object e_736097 [6];
c_735990.hdr.mark = gc_color_red;
 c_735990.hdr.grayed = 0;
c_735990.tag = closureN_tag;
 c_735990.fn = (function_type)__lambda_114;
c_735990.num_args = 1;
c_735990.num_elements = 6;
c_735990.elements = (object *)e_736097;
c_735990.elements[0] = ((closureN)self_734279)->elements[0];
c_735990.elements[1] = ((closureN)self_734279)->elements[1];
c_735990.elements[2] = ((closureN)self_734279)->elements[2];
c_735990.elements[3] = ((closureN)self_734279)->elements[3];
c_735990.elements[4] = r_733102;
c_735990.elements[5] = ((closureN)self_734279)->elements[4];








make_pair(c_736108,quote__93_93_93,NULL);c_736108.hdr.immutable = 1;

make_pair(c_736107,quote_rest,&c_736108);c_736107.hdr.immutable = 1;

make_pair(c_736110,quote__93_93_93,NULL);c_736110.hdr.immutable = 1;

make_pair(c_736109,quote_body,&c_736110);c_736109.hdr.immutable = 1;

make_pair(c_736106,&c_736107,&c_736109);c_736106.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735990, Cyc_cdr(data, Cyc_car(data, ((closureN)self_734279)->elements[4])), Cyc_cdr(data, ((closureN)self_734279)->elements[4]), &c_736106);; 
}

static void __lambda_114(void *data, object self_734280, int argc, object *args) /* object self_734280, object r_733103 */
 {
 object r_733103 = args[0];
  
closureN_type c_735992;
object e_736089 [5];
c_735992.hdr.mark = gc_color_red;
 c_735992.hdr.grayed = 0;
c_735992.tag = closureN_tag;
 c_735992.fn = (function_type)__lambda_115;
c_735992.num_args = 1;
c_735992.num_elements = 5;
c_735992.elements = (object *)e_736089;
c_735992.elements[0] = ((closureN)self_734280)->elements[0];
c_735992.elements[1] = ((closureN)self_734280)->elements[1];
c_735992.elements[2] = ((closureN)self_734280)->elements[2];
c_735992.elements[3] = ((closureN)self_734280)->elements[3];
c_735992.elements[4] = ((closureN)self_734280)->elements[5];


make_pair(c_736094,quote__93_93_93,NULL);c_736094.hdr.immutable = 1;

make_pair(c_736093,quote_rest,&c_736094);c_736093.hdr.immutable = 1;

make_pair(c_736096,quote__93_93_93,NULL);c_736096.hdr.immutable = 1;

make_pair(c_736095,quote_body,&c_736096);c_736095.hdr.immutable = 1;

make_pair(c_736092,&c_736093,&c_736095);c_736092.hdr.immutable = 1;

make_pair(c_736091,quote_mlet,&c_736092);c_736091.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735992, ((closureN)self_734280)->elements[4], r_733103, &c_736091);; 
}

static void __lambda_115(void *data, object self_734281, int argc, object *args) /* object self_734281, object r_733099 */
 {
 object r_733099 = args[0];
  
closureN_type c_735994;
object e_736081 [5];
c_735994.hdr.mark = gc_color_red;
 c_735994.hdr.grayed = 0;
c_735994.tag = closureN_tag;
 c_735994.fn = (function_type)__lambda_116;
c_735994.num_args = 1;
c_735994.num_elements = 5;
c_735994.elements = (object *)e_736081;
c_735994.elements[0] = ((closureN)self_734281)->elements[0];
c_735994.elements[1] = ((closureN)self_734281)->elements[1];
c_735994.elements[2] = ((closureN)self_734281)->elements[2];
c_735994.elements[3] = ((closureN)self_734281)->elements[3];
c_735994.elements[4] = ((closureN)self_734281)->elements[4];


make_pair(c_736086,quote__93_93_93,NULL);c_736086.hdr.immutable = 1;

make_pair(c_736085,quote_rest,&c_736086);c_736085.hdr.immutable = 1;

make_pair(c_736088,quote__93_93_93,NULL);c_736088.hdr.immutable = 1;

make_pair(c_736087,quote_body,&c_736088);c_736087.hdr.immutable = 1;

make_pair(c_736084,&c_736085,&c_736087);c_736084.hdr.immutable = 1;

make_pair(c_736083,quote_mlet,&c_736084);c_736083.hdr.immutable = 1;

make_pair(c_736082,&c_736083,NULL);c_736082.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735994, r_733099, NULL, &c_736082);; 
}

static void __lambda_116(void *data, object self_734282, int argc, object *args) /* object self_734282, object r_733097 */
 {
 object r_733097 = args[0];
  
closureN_type c_735996;
object e_736065 [4];
c_735996.hdr.mark = gc_color_red;
 c_735996.hdr.grayed = 0;
c_735996.tag = closureN_tag;
 c_735996.fn = (function_type)__lambda_117;
c_735996.num_args = 1;
c_735996.num_elements = 4;
c_735996.elements = (object *)e_736065;
c_735996.elements[0] = ((closureN)self_734282)->elements[0];
c_735996.elements[1] = ((closureN)self_734282)->elements[1];
c_735996.elements[2] = ((closureN)self_734282)->elements[2];
c_735996.elements[3] = ((closureN)self_734282)->elements[3];








make_pair(c_736078,quote__93_93_93,NULL);c_736078.hdr.immutable = 1;

make_pair(c_736077,quote_rest,&c_736078);c_736077.hdr.immutable = 1;

make_pair(c_736080,quote__93_93_93,NULL);c_736080.hdr.immutable = 1;

make_pair(c_736079,quote_body,&c_736080);c_736079.hdr.immutable = 1;

make_pair(c_736076,&c_736077,&c_736079);c_736076.hdr.immutable = 1;

make_pair(c_736075,quote_mlet,&c_736076);c_736075.hdr.immutable = 1;

make_pair(c_736074,&c_736075,NULL);c_736074.hdr.immutable = 1;

make_pair(c_736073,quote_vars,&c_736074);c_736073.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735996, Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_734282)->elements[4]))), r_733097, &c_736073);; 
}

static void __lambda_117(void *data, object self_734283, int argc, object *args) /* object self_734283, object r_733095 */
 {
 object r_733095 = args[0];
  
closureN_type c_735998;
object e_736054 [3];
c_735998.hdr.mark = gc_color_red;
 c_735998.hdr.grayed = 0;
c_735998.tag = closureN_tag;
 c_735998.fn = (function_type)__lambda_118;
c_735998.num_args = 1;
c_735998.num_elements = 3;
c_735998.elements = (object *)e_736054;
c_735998.elements[0] = ((closureN)self_734283)->elements[0];
c_735998.elements[1] = ((closureN)self_734283)->elements[1];
c_735998.elements[2] = ((closureN)self_734283)->elements[2];


make_pair(c_736062,quote__93_93_93,NULL);c_736062.hdr.immutable = 1;

make_pair(c_736061,quote_rest,&c_736062);c_736061.hdr.immutable = 1;

make_pair(c_736064,quote__93_93_93,NULL);c_736064.hdr.immutable = 1;

make_pair(c_736063,quote_body,&c_736064);c_736063.hdr.immutable = 1;

make_pair(c_736060,&c_736061,&c_736063);c_736060.hdr.immutable = 1;

make_pair(c_736059,quote_mlet,&c_736060);c_736059.hdr.immutable = 1;

make_pair(c_736058,&c_736059,NULL);c_736058.hdr.immutable = 1;

make_pair(c_736057,quote_vars,&c_736058);c_736057.hdr.immutable = 1;

make_pair(c_736056,quote_lambda,&c_736057);c_736056.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735998, ((closureN)self_734283)->elements[3], r_733095, &c_736056);; 
}

static void __lambda_118(void *data, object self_734284, int argc, object *args) /* object self_734284, object r_733091 */
 {
 object r_733091 = args[0];
  
closureN_type c_736000;
object e_736043 [3];
c_736000.hdr.mark = gc_color_red;
 c_736000.hdr.grayed = 0;
c_736000.tag = closureN_tag;
 c_736000.fn = (function_type)__lambda_119;
c_736000.num_args = 1;
c_736000.num_elements = 3;
c_736000.elements = (object *)e_736043;
c_736000.elements[0] = ((closureN)self_734284)->elements[0];
c_736000.elements[1] = ((closureN)self_734284)->elements[1];
c_736000.elements[2] = ((closureN)self_734284)->elements[2];


make_pair(c_736051,quote__93_93_93,NULL);c_736051.hdr.immutable = 1;

make_pair(c_736050,quote_rest,&c_736051);c_736050.hdr.immutable = 1;

make_pair(c_736053,quote__93_93_93,NULL);c_736053.hdr.immutable = 1;

make_pair(c_736052,quote_body,&c_736053);c_736052.hdr.immutable = 1;

make_pair(c_736049,&c_736050,&c_736052);c_736049.hdr.immutable = 1;

make_pair(c_736048,quote_mlet,&c_736049);c_736048.hdr.immutable = 1;

make_pair(c_736047,&c_736048,NULL);c_736047.hdr.immutable = 1;

make_pair(c_736046,quote_vars,&c_736047);c_736046.hdr.immutable = 1;

make_pair(c_736045,quote_lambda,&c_736046);c_736045.hdr.immutable = 1;

make_pair(c_736044,&c_736045,NULL);c_736044.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736000, r_733091, NULL, &c_736044);; 
}

static void __lambda_119(void *data, object self_734285, int argc, object *args) /* object self_734285, object r_733089 */
 {
 object r_733089 = args[0];
  
closureN_type c_736002;
object e_736027 [2];
c_736002.hdr.mark = gc_color_red;
 c_736002.hdr.grayed = 0;
c_736002.tag = closureN_tag;
 c_736002.fn = (function_type)__lambda_120;
c_736002.num_args = 1;
c_736002.num_elements = 2;
c_736002.elements = (object *)e_736027;
c_736002.elements[0] = ((closureN)self_734285)->elements[0];
c_736002.elements[1] = ((closureN)self_734285)->elements[1];


make_pair(c_736032,quote_exp,NULL);c_736032.hdr.immutable = 1;

make_pair(c_736031,NULL,&c_736032);c_736031.hdr.immutable = 1;

make_pair(c_736030,quote_lambda,&c_736031);c_736030.hdr.immutable = 1;

make_pair(c_736040,quote__93_93_93,NULL);c_736040.hdr.immutable = 1;

make_pair(c_736039,quote_rest,&c_736040);c_736039.hdr.immutable = 1;

make_pair(c_736042,quote__93_93_93,NULL);c_736042.hdr.immutable = 1;

make_pair(c_736041,quote_body,&c_736042);c_736041.hdr.immutable = 1;

make_pair(c_736038,&c_736039,&c_736041);c_736038.hdr.immutable = 1;

make_pair(c_736037,quote_mlet,&c_736038);c_736037.hdr.immutable = 1;

make_pair(c_736036,&c_736037,NULL);c_736036.hdr.immutable = 1;

make_pair(c_736035,quote_vars,&c_736036);c_736035.hdr.immutable = 1;

make_pair(c_736034,quote_lambda,&c_736035);c_736034.hdr.immutable = 1;

make_pair(c_736033,&c_736034,NULL);c_736033.hdr.immutable = 1;

make_pair(c_736029,&c_736030,&c_736033);c_736029.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736002, ((closureN)self_734285)->elements[2], r_733089, &c_736029);; 
}

static void __lambda_120(void *data, object self_734286, int argc, object *args) /* object self_734286, object r_733086 */
 {
 object r_733086 = args[0];
  
closureN_type c_736004;
object e_736010 [1];
c_736004.hdr.mark = gc_color_red;
 c_736004.hdr.grayed = 0;
c_736004.tag = closureN_tag;
 c_736004.fn = (function_type)__lambda_121;
c_736004.num_args = 1;
c_736004.num_elements = 1;
c_736004.elements = (object *)e_736010;
c_736004.elements[0] = ((closureN)self_734286)->elements[0];


make_pair(c_736016,quote_exp,NULL);c_736016.hdr.immutable = 1;

make_pair(c_736015,NULL,&c_736016);c_736015.hdr.immutable = 1;

make_pair(c_736014,quote_lambda,&c_736015);c_736014.hdr.immutable = 1;

make_pair(c_736024,quote__93_93_93,NULL);c_736024.hdr.immutable = 1;

make_pair(c_736023,quote_rest,&c_736024);c_736023.hdr.immutable = 1;

make_pair(c_736026,quote__93_93_93,NULL);c_736026.hdr.immutable = 1;

make_pair(c_736025,quote_body,&c_736026);c_736025.hdr.immutable = 1;

make_pair(c_736022,&c_736023,&c_736025);c_736022.hdr.immutable = 1;

make_pair(c_736021,quote_mlet,&c_736022);c_736021.hdr.immutable = 1;

make_pair(c_736020,&c_736021,NULL);c_736020.hdr.immutable = 1;

make_pair(c_736019,quote_vars,&c_736020);c_736019.hdr.immutable = 1;

make_pair(c_736018,quote_lambda,&c_736019);c_736018.hdr.immutable = 1;

make_pair(c_736017,&c_736018,NULL);c_736017.hdr.immutable = 1;

make_pair(c_736013,&c_736014,&c_736017);c_736013.hdr.immutable = 1;

make_pair(c_736012,quote_call_91with_91values,&c_736013);c_736012.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_736004, ((closureN)self_734286)->elements[1], r_733086, &c_736012);; 
}

static void __lambda_121(void *data, object self_734287, int argc, object *args) /* object self_734287, object r_733084 */
 {
 object r_733084 = args[0];
  
pair_type local_736009; 
return_direct_with_clo1(data,  ((closureN)self_734287)->elements[0], (((closure)  ((closureN)self_734287)->elements[0])->fn),  set_pair_as_expr(&local_736009, r_733084, boolean_f));; 
}

static void __lambda_93(void *data, object self_734288, int argc, object *args) /* object self_734288, object k_733119 */
 {
 object k_733119 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_734288)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_734288)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, ((closureN)self_734288)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_734288)->elements[1]))))) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_734288)->elements[1])))))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_734288)->elements[1]))))) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_734288)->elements[1])))))) ){ 
    complex_num_type local_735780; 
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_735780, Cyc_cdr(data, Cyc_car(data, ((closureN)self_734288)->elements[1])))) ){ 
    complex_num_type local_735788; 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_735788, Cyc_cdr(data, ((closureN)self_734288)->elements[1]))) ){ 
  
closureN_type c_735794;
object e_735904 [3];
c_735794.hdr.mark = gc_color_red;
 c_735794.hdr.grayed = 0;
c_735794.tag = closureN_tag;
 c_735794.fn = (function_type)__lambda_94;
c_735794.num_args = 1;
c_735794.num_elements = 3;
c_735794.elements = (object *)e_735904;
c_735794.elements[0] = k_733119;
c_735794.elements[1] = ((closureN)self_734288)->elements[0];
c_735794.elements[2] = ((closureN)self_734288)->elements[1];

return_closcall2(data,  ((closureN)self_734288)->elements[0],  &c_735794, quote_let);
} else { 
  return_direct_with_clo1(data,  k_733119, (((closure)  k_733119)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733119, (((closure)  k_733119)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733119, (((closure)  k_733119)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733119, (((closure)  k_733119)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733119, (((closure)  k_733119)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733119, (((closure)  k_733119)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733119, (((closure)  k_733119)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733119, (((closure)  k_733119)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733119, (((closure)  k_733119)->fn),  boolean_f);}
;; 
}

static void __lambda_94(void *data, object self_734289, int argc, object *args) /* object self_734289, object r_733140 */
 {
 object r_733140 = args[0];
  
closureN_type c_735796;
object e_735893 [4];
c_735796.hdr.mark = gc_color_red;
 c_735796.hdr.grayed = 0;
c_735796.tag = closureN_tag;
 c_735796.fn = (function_type)__lambda_95;
c_735796.num_args = 1;
c_735796.num_elements = 4;
c_735796.elements = (object *)e_735893;
c_735796.elements[0] = ((closureN)self_734289)->elements[0];
c_735796.elements[1] = r_733140;
c_735796.elements[2] = ((closureN)self_734289)->elements[1];
c_735796.elements[3] = ((closureN)self_734289)->elements[2];










make_pair(c_735903,quote_exp,NULL);c_735903.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735796, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_734289)->elements[2])))), NULL, &c_735903);; 
}

static void __lambda_95(void *data, object self_734290, int argc, object *args) /* object self_734290, object r_733157 */
 {
 object r_733157 = args[0];
  
closureN_type c_735798;
object e_735881 [4];
c_735798.hdr.mark = gc_color_red;
 c_735798.hdr.grayed = 0;
c_735798.tag = closureN_tag;
 c_735798.fn = (function_type)__lambda_96;
c_735798.num_args = 1;
c_735798.num_elements = 4;
c_735798.elements = (object *)e_735881;
c_735798.elements[0] = ((closureN)self_734290)->elements[0];
c_735798.elements[1] = ((closureN)self_734290)->elements[1];
c_735798.elements[2] = ((closureN)self_734290)->elements[2];
c_735798.elements[3] = ((closureN)self_734290)->elements[3];










make_pair(c_735892,quote_exp,NULL);c_735892.hdr.immutable = 1;

make_pair(c_735891,quote_var,&c_735892);c_735891.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735798, Cyc_car(data, Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_734290)->elements[3])))), r_733157, &c_735891);; 
}

static void __lambda_96(void *data, object self_734291, int argc, object *args) /* object self_734291, object r_733154 */
 {
 object r_733154 = args[0];
  
closureN_type c_735800;
object e_735877 [4];
c_735800.hdr.mark = gc_color_red;
 c_735800.hdr.grayed = 0;
c_735800.tag = closureN_tag;
 c_735800.fn = (function_type)__lambda_97;
c_735800.num_args = 1;
c_735800.num_elements = 4;
c_735800.elements = (object *)e_735877;
c_735800.elements[0] = ((closureN)self_734291)->elements[0];
c_735800.elements[1] = ((closureN)self_734291)->elements[1];
c_735800.elements[2] = ((closureN)self_734291)->elements[2];
c_735800.elements[3] = ((closureN)self_734291)->elements[3];


make_pair(c_735880,quote_exp,NULL);c_735880.hdr.immutable = 1;

make_pair(c_735879,quote_var,&c_735880);c_735879.hdr.immutable = 1;

make_pair(c_735878,&c_735879,NULL);c_735878.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735800, r_733154, NULL, &c_735878);; 
}

static void __lambda_97(void *data, object self_734292, int argc, object *args) /* object self_734292, object r_733143 */
 {
 object r_733143 = args[0];
  
closureN_type c_735803;
object e_735876 [4];
c_735803.hdr.mark = gc_color_red;
 c_735803.hdr.grayed = 0;
c_735803.tag = closureN_tag;
 c_735803.fn = (function_type)__lambda_98;
c_735803.num_args = 1;
c_735803.num_elements = 4;
c_735803.elements = (object *)e_735876;
c_735803.elements[0] = ((closureN)self_734292)->elements[0];
c_735803.elements[1] = ((closureN)self_734292)->elements[1];
c_735803.elements[2] = r_733143;
c_735803.elements[3] = ((closureN)self_734292)->elements[3];

return_closcall2(data,  ((closureN)self_734292)->elements[2],  &c_735803, quote_mlet);; 
}

static void __lambda_98(void *data, object self_734293, int argc, object *args) /* object self_734293, object r_733149 */
 {
 object r_733149 = args[0];
  
closureN_type c_735805;
object e_735862 [4];
c_735805.hdr.mark = gc_color_red;
 c_735805.hdr.grayed = 0;
c_735805.tag = closureN_tag;
 c_735805.fn = (function_type)__lambda_99;
c_735805.num_args = 1;
c_735805.num_elements = 4;
c_735805.elements = (object *)e_735862;
c_735805.elements[0] = ((closureN)self_734293)->elements[0];
c_735805.elements[1] = ((closureN)self_734293)->elements[1];
c_735805.elements[2] = ((closureN)self_734293)->elements[2];
c_735805.elements[3] = r_733149;








make_pair(c_735873,quote__93_93_93,NULL);c_735873.hdr.immutable = 1;

make_pair(c_735872,quote_rest,&c_735873);c_735872.hdr.immutable = 1;

make_pair(c_735875,quote__93_93_93,NULL);c_735875.hdr.immutable = 1;

make_pair(c_735874,quote_body,&c_735875);c_735874.hdr.immutable = 1;

make_pair(c_735871,&c_735872,&c_735874);c_735871.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735805, Cyc_cdr(data, Cyc_car(data, ((closureN)self_734293)->elements[3])), Cyc_cdr(data, ((closureN)self_734293)->elements[3]), &c_735871);; 
}

static void __lambda_99(void *data, object self_734294, int argc, object *args) /* object self_734294, object r_733150 */
 {
 object r_733150 = args[0];
  
closureN_type c_735807;
object e_735854 [3];
c_735807.hdr.mark = gc_color_red;
 c_735807.hdr.grayed = 0;
c_735807.tag = closureN_tag;
 c_735807.fn = (function_type)__lambda_100;
c_735807.num_args = 1;
c_735807.num_elements = 3;
c_735807.elements = (object *)e_735854;
c_735807.elements[0] = ((closureN)self_734294)->elements[0];
c_735807.elements[1] = ((closureN)self_734294)->elements[1];
c_735807.elements[2] = ((closureN)self_734294)->elements[2];


make_pair(c_735859,quote__93_93_93,NULL);c_735859.hdr.immutable = 1;

make_pair(c_735858,quote_rest,&c_735859);c_735858.hdr.immutable = 1;

make_pair(c_735861,quote__93_93_93,NULL);c_735861.hdr.immutable = 1;

make_pair(c_735860,quote_body,&c_735861);c_735860.hdr.immutable = 1;

make_pair(c_735857,&c_735858,&c_735860);c_735857.hdr.immutable = 1;

make_pair(c_735856,quote_mlet,&c_735857);c_735856.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735807, ((closureN)self_734294)->elements[3], r_733150, &c_735856);; 
}

static void __lambda_100(void *data, object self_734295, int argc, object *args) /* object self_734295, object r_733146 */
 {
 object r_733146 = args[0];
  
closureN_type c_735809;
object e_735846 [3];
c_735809.hdr.mark = gc_color_red;
 c_735809.hdr.grayed = 0;
c_735809.tag = closureN_tag;
 c_735809.fn = (function_type)__lambda_101;
c_735809.num_args = 1;
c_735809.num_elements = 3;
c_735809.elements = (object *)e_735846;
c_735809.elements[0] = ((closureN)self_734295)->elements[0];
c_735809.elements[1] = ((closureN)self_734295)->elements[1];
c_735809.elements[2] = ((closureN)self_734295)->elements[2];


make_pair(c_735851,quote__93_93_93,NULL);c_735851.hdr.immutable = 1;

make_pair(c_735850,quote_rest,&c_735851);c_735850.hdr.immutable = 1;

make_pair(c_735853,quote__93_93_93,NULL);c_735853.hdr.immutable = 1;

make_pair(c_735852,quote_body,&c_735853);c_735852.hdr.immutable = 1;

make_pair(c_735849,&c_735850,&c_735852);c_735849.hdr.immutable = 1;

make_pair(c_735848,quote_mlet,&c_735849);c_735848.hdr.immutable = 1;

make_pair(c_735847,&c_735848,NULL);c_735847.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735809, r_733146, NULL, &c_735847);; 
}

static void __lambda_101(void *data, object self_734296, int argc, object *args) /* object self_734296, object r_733144 */
 {
 object r_733144 = args[0];
  
closureN_type c_735811;
object e_735833 [2];
c_735811.hdr.mark = gc_color_red;
 c_735811.hdr.grayed = 0;
c_735811.tag = closureN_tag;
 c_735811.fn = (function_type)__lambda_102;
c_735811.num_args = 1;
c_735811.num_elements = 2;
c_735811.elements = (object *)e_735833;
c_735811.elements[0] = ((closureN)self_734296)->elements[0];
c_735811.elements[1] = ((closureN)self_734296)->elements[1];


make_pair(c_735838,quote_exp,NULL);c_735838.hdr.immutable = 1;

make_pair(c_735837,quote_var,&c_735838);c_735837.hdr.immutable = 1;

make_pair(c_735836,&c_735837,NULL);c_735836.hdr.immutable = 1;

make_pair(c_735843,quote__93_93_93,NULL);c_735843.hdr.immutable = 1;

make_pair(c_735842,quote_rest,&c_735843);c_735842.hdr.immutable = 1;

make_pair(c_735845,quote__93_93_93,NULL);c_735845.hdr.immutable = 1;

make_pair(c_735844,quote_body,&c_735845);c_735844.hdr.immutable = 1;

make_pair(c_735841,&c_735842,&c_735844);c_735841.hdr.immutable = 1;

make_pair(c_735840,quote_mlet,&c_735841);c_735840.hdr.immutable = 1;

make_pair(c_735839,&c_735840,NULL);c_735839.hdr.immutable = 1;

make_pair(c_735835,&c_735836,&c_735839);c_735835.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735811, ((closureN)self_734296)->elements[2], r_733144, &c_735835);; 
}

static void __lambda_102(void *data, object self_734297, int argc, object *args) /* object self_734297, object r_733141 */
 {
 object r_733141 = args[0];
  
closureN_type c_735813;
object e_735819 [1];
c_735813.hdr.mark = gc_color_red;
 c_735813.hdr.grayed = 0;
c_735813.tag = closureN_tag;
 c_735813.fn = (function_type)__lambda_103;
c_735813.num_args = 1;
c_735813.num_elements = 1;
c_735813.elements = (object *)e_735819;
c_735813.elements[0] = ((closureN)self_734297)->elements[0];


make_pair(c_735825,quote_exp,NULL);c_735825.hdr.immutable = 1;

make_pair(c_735824,quote_var,&c_735825);c_735824.hdr.immutable = 1;

make_pair(c_735823,&c_735824,NULL);c_735823.hdr.immutable = 1;

make_pair(c_735830,quote__93_93_93,NULL);c_735830.hdr.immutable = 1;

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

make_pair(c_735832,quote__93_93_93,NULL);c_735832.hdr.immutable = 1;

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

make_pair(c_735828,&c_735829,&c_735831);c_735828.hdr.immutable = 1;

make_pair(c_735827,quote_mlet,&c_735828);c_735827.hdr.immutable = 1;

make_pair(c_735826,&c_735827,NULL);c_735826.hdr.immutable = 1;

make_pair(c_735822,&c_735823,&c_735826);c_735822.hdr.immutable = 1;

make_pair(c_735821,quote_let,&c_735822);c_735821.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735813, ((closureN)self_734297)->elements[1], r_733141, &c_735821);; 
}

static void __lambda_103(void *data, object self_734298, int argc, object *args) /* object self_734298, object r_733139 */
 {
 object r_733139 = args[0];
  
pair_type local_735818; 
return_direct_with_clo1(data,  ((closureN)self_734298)->elements[0], (((closure)  ((closureN)self_734298)->elements[0])->fn),  set_pair_as_expr(&local_735818, r_733139, boolean_f));; 
}

static void __lambda_82(void *data, object self_734299, int argc, object *args) /* object self_734299, object k_733163 */
 {
 object k_733163 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_734299)->elements[1])) ){ 
    
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_734299)->elements[1]))) ){ 
    
  
  
if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, ((closureN)self_734299)->elements[1])))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_734299)->elements[1]))))) ){ 
    
  
  
  
if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_734299)->elements[1]))))) ){ 
    
  
  
  
  
if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_734299)->elements[1])))))) ){ 
    complex_num_type local_735610; 
  
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_735610, Cyc_cdr(data, Cyc_car(data, ((closureN)self_734299)->elements[1])))) ){ 
    complex_num_type local_735618; 
  
if( (boolean_f != ((inline_function_type)
                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_735618, Cyc_cdr(data, ((closureN)self_734299)->elements[1]))) ){ 
  
closureN_type c_735624;
object e_735703 [3];
c_735624.hdr.mark = gc_color_red;
 c_735624.hdr.grayed = 0;
c_735624.tag = closureN_tag;
 c_735624.fn = (function_type)__lambda_83;
c_735624.num_args = 1;
c_735624.num_elements = 3;
c_735624.elements = (object *)e_735703;
c_735624.elements[0] = k_733163;
c_735624.elements[1] = ((closureN)self_734299)->elements[0];
c_735624.elements[2] = ((closureN)self_734299)->elements[1];

return_closcall2(data,  ((closureN)self_734299)->elements[0],  &c_735624, quote_begin);
} else { 
  return_direct_with_clo1(data,  k_733163, (((closure)  k_733163)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733163, (((closure)  k_733163)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733163, (((closure)  k_733163)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733163, (((closure)  k_733163)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733163, (((closure)  k_733163)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733163, (((closure)  k_733163)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733163, (((closure)  k_733163)->fn),  boolean_f);}
;
} else { 
  return_direct_with_clo1(data,  k_733163, (((closure)  k_733163)->fn),  boolean_f);}
;; 
}

static void __lambda_83(void *data, object self_734300, int argc, object *args) /* object self_734300, object r_733181 */
 {
 object r_733181 = args[0];
  
closureN_type c_735627;
object e_735702 [3];
c_735627.hdr.mark = gc_color_red;
 c_735627.hdr.grayed = 0;
c_735627.tag = closureN_tag;
 c_735627.fn = (function_type)__lambda_84;
c_735627.num_args = 1;
c_735627.num_elements = 3;
c_735627.elements = (object *)e_735702;
c_735627.elements[0] = ((closureN)self_734300)->elements[0];
c_735627.elements[1] = r_733181;
c_735627.elements[2] = ((closureN)self_734300)->elements[2];

return_closcall2(data,  ((closureN)self_734300)->elements[1],  &c_735627, quote_mlet);; 
}

static void __lambda_84(void *data, object self_734301, int argc, object *args) /* object self_734301, object r_733189 */
 {
 object r_733189 = args[0];
  
closureN_type c_735629;
object e_735688 [4];
c_735629.hdr.mark = gc_color_red;
 c_735629.hdr.grayed = 0;
c_735629.tag = closureN_tag;
 c_735629.fn = (function_type)__lambda_85;
c_735629.num_args = 1;
c_735629.num_elements = 4;
c_735629.elements = (object *)e_735688;
c_735629.elements[0] = ((closureN)self_734301)->elements[0];
c_735629.elements[1] = ((closureN)self_734301)->elements[1];
c_735629.elements[2] = r_733189;
c_735629.elements[3] = ((closureN)self_734301)->elements[2];








make_pair(c_735699,quote__93_93_93,NULL);c_735699.hdr.immutable = 1;

make_pair(c_735698,quote_rest,&c_735699);c_735698.hdr.immutable = 1;

make_pair(c_735701,quote__93_93_93,NULL);c_735701.hdr.immutable = 1;

make_pair(c_735700,quote_body,&c_735701);c_735700.hdr.immutable = 1;

make_pair(c_735697,&c_735698,&c_735700);c_735697.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735629, Cyc_cdr(data, Cyc_car(data, ((closureN)self_734301)->elements[2])), Cyc_cdr(data, ((closureN)self_734301)->elements[2]), &c_735697);; 
}

static void __lambda_85(void *data, object self_734302, int argc, object *args) /* object self_734302, object r_733190 */
 {
 object r_733190 = args[0];
  
closureN_type c_735631;
object e_735680 [3];
c_735631.hdr.mark = gc_color_red;
 c_735631.hdr.grayed = 0;
c_735631.tag = closureN_tag;
 c_735631.fn = (function_type)__lambda_86;
c_735631.num_args = 1;
c_735631.num_elements = 3;
c_735631.elements = (object *)e_735680;
c_735631.elements[0] = ((closureN)self_734302)->elements[0];
c_735631.elements[1] = ((closureN)self_734302)->elements[1];
c_735631.elements[2] = ((closureN)self_734302)->elements[3];


make_pair(c_735685,quote__93_93_93,NULL);c_735685.hdr.immutable = 1;

make_pair(c_735684,quote_rest,&c_735685);c_735684.hdr.immutable = 1;

make_pair(c_735687,quote__93_93_93,NULL);c_735687.hdr.immutable = 1;

make_pair(c_735686,quote_body,&c_735687);c_735686.hdr.immutable = 1;

make_pair(c_735683,&c_735684,&c_735686);c_735683.hdr.immutable = 1;

make_pair(c_735682,quote_mlet,&c_735683);c_735682.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735631, ((closureN)self_734302)->elements[2], r_733190, &c_735682);; 
}

static void __lambda_86(void *data, object self_734303, int argc, object *args) /* object self_734303, object r_733186 */
 {
 object r_733186 = args[0];
  
closureN_type c_735633;
object e_735672 [3];
c_735633.hdr.mark = gc_color_red;
 c_735633.hdr.grayed = 0;
c_735633.tag = closureN_tag;
 c_735633.fn = (function_type)__lambda_87;
c_735633.num_args = 1;
c_735633.num_elements = 3;
c_735633.elements = (object *)e_735672;
c_735633.elements[0] = ((closureN)self_734303)->elements[0];
c_735633.elements[1] = ((closureN)self_734303)->elements[1];
c_735633.elements[2] = ((closureN)self_734303)->elements[2];


make_pair(c_735677,quote__93_93_93,NULL);c_735677.hdr.immutable = 1;

make_pair(c_735676,quote_rest,&c_735677);c_735676.hdr.immutable = 1;

make_pair(c_735679,quote__93_93_93,NULL);c_735679.hdr.immutable = 1;

make_pair(c_735678,quote_body,&c_735679);c_735678.hdr.immutable = 1;

make_pair(c_735675,&c_735676,&c_735678);c_735675.hdr.immutable = 1;

make_pair(c_735674,quote_mlet,&c_735675);c_735674.hdr.immutable = 1;

make_pair(c_735673,&c_735674,NULL);c_735673.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735633, r_733186, NULL, &c_735673);; 
}

static void __lambda_87(void *data, object self_734304, int argc, object *args) /* object self_734304, object r_733184 */
 {
 object r_733184 = args[0];
  
closureN_type c_735635;
object e_735654 [2];
c_735635.hdr.mark = gc_color_red;
 c_735635.hdr.grayed = 0;
c_735635.tag = closureN_tag;
 c_735635.fn = (function_type)__lambda_88;
c_735635.num_args = 1;
c_735635.num_elements = 2;
c_735635.elements = (object *)e_735654;
c_735635.elements[0] = ((closureN)self_734304)->elements[0];
c_735635.elements[1] = ((closureN)self_734304)->elements[1];










make_pair(c_735669,quote__93_93_93,NULL);c_735669.hdr.immutable = 1;

make_pair(c_735668,quote_rest,&c_735669);c_735668.hdr.immutable = 1;

make_pair(c_735671,quote__93_93_93,NULL);c_735671.hdr.immutable = 1;

make_pair(c_735670,quote_body,&c_735671);c_735670.hdr.immutable = 1;

make_pair(c_735667,&c_735668,&c_735670);c_735667.hdr.immutable = 1;

make_pair(c_735666,quote_mlet,&c_735667);c_735666.hdr.immutable = 1;

make_pair(c_735665,&c_735666,NULL);c_735665.hdr.immutable = 1;

make_pair(c_735664,quote_exp,&c_735665);c_735664.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735635, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_734304)->elements[2])))), r_733184, &c_735664);; 
}

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


make_pair(c_735651,quote__93_93_93,NULL);c_735651.hdr.immutable = 1;

make_pair(c_735650,quote_rest,&c_735651);c_735650.hdr.immutable = 1;

make_pair(c_735653,quote__93_93_93,NULL);c_735653.hdr.immutable = 1;

make_pair(c_735652,quote_body,&c_735653);c_735652.hdr.immutable = 1;

make_pair(c_735649,&c_735650,&c_735652);c_735649.hdr.immutable = 1;

make_pair(c_735648,quote_mlet,&c_735649);c_735648.hdr.immutable = 1;

make_pair(c_735647,&c_735648,NULL);c_735647.hdr.immutable = 1;

make_pair(c_735646,quote_exp,&c_735647);c_735646.hdr.immutable = 1;

make_pair(c_735645,quote_begin,&c_735646);c_735645.hdr.immutable = 1;
return_direct_with_clo4(data,  __glo_cons_91source_scheme_base, (((closure)  __glo_cons_91source_scheme_base)->fn),  &c_735637, ((closureN)self_734305)->elements[1], r_733182, &c_735645);; 
}

static void __lambda_89(void *data, object self_734306, int argc, object *args) /* object self_734306, object r_733180 */
 {
 object r_733180 = args[0];
  
pair_type local_735642; 
return_direct_with_clo1(data,  ((closureN)self_734306)->elements[0], (((closure)  ((closureN)self_734306)->elements[0])->fn),  set_pair_as_expr(&local_735642, r_733180, boolean_f));; 
}

static void __lambda_53(void *data, object _, int argc, object *args) /* closure _,object k_733019, object elt_123_7363_732254, object v_7364_732255, object maybe_91start_87end_7365_732256_raw, ... */
 {
object k_733019 = args[0]; object elt_123_7363_732254 = args[1]; object v_7364_732255 = args[2];
load_varargs(maybe_91start_87end_7365_732256, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/132.sld:vector-delete-neighbor-dups!");

closureN_type c_735351;
object e_735553 [3];
c_735351.hdr.mark = gc_color_red;
 c_735351.hdr.grayed = 0;
c_735351.tag = closureN_tag;
 c_735351.fn = (function_type)__lambda_54;
c_735351.num_args = 1;
c_735351.num_elements = 3;
c_735351.elements = (object *)e_735553;
c_735351.elements[0] = elt_123_7363_732254;
c_735351.elements[1] = k_733019;
c_735351.elements[2] = v_7364_732255;


closureN_type c_735554;
object e_735558 [2];
c_735554.hdr.mark = gc_color_red;
 c_735554.hdr.grayed = 0;
c_735554.tag = closureN_tag;
 c_735554.fn = (function_type)__lambda_79;
c_735554.num_args = 0;
c_735554.num_elements = 2;
c_735554.elements = (object *)e_735558;
c_735554.elements[0] = maybe_91start_87end_7365_732256;
c_735554.elements[1] = v_7364_732255;

return_direct_with_clo1(data,(closure)&c_735351,__lambda_54,  &c_735554);; 
}

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

static void __lambda_54(void *data, object self_734230, int argc, object *args) /* object self_734230, object r_733020 */
 {
 object r_733020 = args[0];
  
closureN_type c_735353;
object e_735357 [2];
c_735353.hdr.mark = gc_color_red;
 c_735353.hdr.grayed = 0;
c_735353.tag = closureN_tag;
 c_735353.fn = (function_type)__lambda_55;
c_735353.num_args = 1;
c_735353.num_elements = 2;
c_735353.elements = (object *)e_735357;
c_735353.elements[0] = ((closureN)self_734230)->elements[1];
c_735353.elements[1] = r_733020;


closureN_type c_735358;
object e_735552 [2];
c_735358.hdr.mark = gc_color_red;
 c_735358.hdr.grayed = 0;
c_735358.tag = closureN_tag;
 c_735358.fn = (function_type)__lambda_56;
c_735358.num_args = 2;
c_735358.num_elements = 2;
c_735358.elements = (object *)e_735552;
c_735358.elements[0] = ((closureN)self_734230)->elements[0];
c_735358.elements[1] = ((closureN)self_734230)->elements[2];

return_direct_with_clo1(data,(closure)&c_735353,__lambda_55,  &c_735358);; 
}

static void __lambda_56(void *data, object self_734231, int argc, object *args) /* object self_734231, object k_733022, object start_7366_732257, object end_7367_732258 */
 {
 object k_733022 = args[0]; object start_7366_732257 = args[1]; object end_7367_732258 = args[2];
    
if( (boolean_f != Cyc_num_fast_gte_op(data, start_7366_732257, end_7367_732258)) ){ 
  return_direct_with_clo1(data,  k_733022, (((closure)  k_733022)->fn),  end_7367_732258);
} else { 
  
closureN_type c_735363;
object e_735548 [5];
c_735363.hdr.mark = gc_color_red;
 c_735363.hdr.grayed = 0;
c_735363.tag = closureN_tag;
 c_735363.fn = (function_type)__lambda_57;
c_735363.num_args = 1;
c_735363.num_elements = 5;
c_735363.elements = (object *)e_735548;
c_735363.elements[0] = ((closureN)self_734231)->elements[0];
c_735363.elements[1] = end_7367_732258;
c_735363.elements[2] = k_733022;
c_735363.elements[3] = start_7366_732257;
c_735363.elements[4] = ((closureN)self_734231)->elements[1];



return_direct_with_clo1(data,(closure)&c_735363,__lambda_57,  Cyc_vector_ref(data, ((closureN)self_734231)->elements[1], start_7366_732257));}
;; 
}

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

return_direct_with_clo2(data,(closure)&c_735365,__lambda_58,  ((closureN)self_734232)->elements[3], r_733024);; 
}

static void __lambda_58(void *data, object self_734233, int argc, object *args) /* object self_734233, object j_7369_732259, object vj_7370_732260 */
 {
 object j_7369_732259 = args[0]; object vj_7370_732260 = args[1];
  
closureN_type c_735367;
object e_735545 [6];
c_735367.hdr.mark = gc_color_red;
 c_735367.hdr.grayed = 0;
c_735367.tag = closureN_tag;
 c_735367.fn = (function_type)__lambda_59;
c_735367.num_args = 1;
c_735367.num_elements = 6;
c_735367.elements = (object *)e_735545;
c_735367.elements[0] = ((closureN)self_734233)->elements[0];
c_735367.elements[1] = ((closureN)self_734233)->elements[1];
c_735367.elements[2] = j_7369_732259;
c_735367.elements[3] = ((closureN)self_734233)->elements[2];
c_735367.elements[4] = ((closureN)self_734233)->elements[3];
c_735367.elements[5] = vj_7370_732260;

return_direct_with_clo1(data,(closure)&c_735367,__lambda_59,  boolean_f);; 
}

static void __lambda_59(void *data, object self_734234, int argc, object *args) /* object self_734234, object skip_7371_732261 */
 {
 object skip_7371_732261 = args[0];
  
closureN_type c_735369;
object e_735541 [6];
c_735369.hdr.mark = gc_color_red;
 c_735369.hdr.grayed = 0;
c_735369.tag = closureN_tag;
 c_735369.fn = (function_type)__lambda_770;
c_735369.num_args = 1;
c_735369.num_elements = 6;
c_735369.elements = (object *)e_735541;
c_735369.elements[0] = ((closureN)self_734234)->elements[0];
c_735369.elements[1] = ((closureN)self_734234)->elements[1];
c_735369.elements[2] = ((closureN)self_734234)->elements[2];
c_735369.elements[3] = ((closureN)self_734234)->elements[3];
c_735369.elements[4] = ((closureN)self_734234)->elements[4];
c_735369.elements[5] = ((closureN)self_734234)->elements[5];


pair_type local_735544; 
return_direct_with_clo1(data,(closure)&c_735369,__lambda_770,  set_cell_as_expr(&local_735544, skip_7371_732261));; 
}

static void __lambda_770(void *data, object self_734235, int argc, object *args) /* object self_734235, object skip_7371_732261 */
 {
 object skip_7371_732261 = args[0];
  
closureN_type c_735371;
object e_735385 [4];
c_735371.hdr.mark = gc_color_red;
 c_735371.hdr.grayed = 0;
c_735371.tag = closureN_tag;
 c_735371.fn = (function_type)__lambda_60;
c_735371.num_args = 1;
c_735371.num_elements = 4;
c_735371.elements = (object *)e_735385;
c_735371.elements[0] = ((closureN)self_734235)->elements[2];
c_735371.elements[1] = ((closureN)self_734235)->elements[3];
c_735371.elements[2] = skip_7371_732261;
c_735371.elements[3] = ((closureN)self_734235)->elements[5];


closureN_type c_735386;
object e_735540 [4];
c_735386.hdr.mark = gc_color_red;
 c_735386.hdr.grayed = 0;
c_735386.tag = closureN_tag;
 c_735386.fn = (function_type)__lambda_62;
c_735386.num_args = 2;
c_735386.num_elements = 4;
c_735386.elements = (object *)e_735540;
c_735386.elements[0] = ((closureN)self_734235)->elements[0];
c_735386.elements[1] = ((closureN)self_734235)->elements[1];
c_735386.elements[2] = skip_7371_732261;
c_735386.elements[3] = ((closureN)self_734235)->elements[4];

return_direct_with_clo1(data,(closure)&c_735371,__lambda_60,  &c_735386);; 
}

static void __lambda_62(void *data, object self_734236, int argc, object *args) /* object self_734236, object k_733027, object j_7372_732262, object vj_7373_732263 */
 {
 object k_733027 = args[0]; object j_7372_732262 = args[1]; object vj_7373_732263 = args[2];
    
  complex_num_type local_735391; 
if( (boolean_f != Cyc_num_fast_gte_op(data, Cyc_fast_sum(data,&local_735391, j_7372_732262, obj_int2obj(1)), ((closureN)self_734236)->elements[1])) ){ 
  return_direct_with_clo1(data,  k_733027, (((closure)  k_733027)->fn),  ((closureN)self_734236)->elements[1]);
} else { 
  
closureN_type c_735396;
object e_735533 [7];
c_735396.hdr.mark = gc_color_red;
 c_735396.hdr.grayed = 0;
c_735396.tag = closureN_tag;
 c_735396.fn = (function_type)__lambda_63;
c_735396.num_args = 1;
c_735396.num_elements = 7;
c_735396.elements = (object *)e_735533;
c_735396.elements[0] = ((closureN)self_734236)->elements[0];
c_735396.elements[1] = ((closureN)self_734236)->elements[1];
c_735396.elements[2] = j_7372_732262;
c_735396.elements[3] = k_733027;
c_735396.elements[4] = ((closureN)self_734236)->elements[2];
c_735396.elements[5] = ((closureN)self_734236)->elements[3];
c_735396.elements[6] = vj_7373_732263;




complex_num_type local_735539; 
return_direct_with_clo1(data,(closure)&c_735396,__lambda_63,  Cyc_vector_ref(data, ((closureN)self_734236)->elements[3], Cyc_fast_sum(data,&local_735539, j_7372_732262, obj_int2obj(1))));}
;; 
}

static void __lambda_63(void *data, object self_734237, int argc, object *args) /* object self_734237, object vj_871_7375_732265 */
 {
 object vj_871_7375_732265 = args[0];
  
closureN_type c_735399;
object e_735531 [8];
c_735399.hdr.mark = gc_color_red;
 c_735399.hdr.grayed = 0;
c_735399.tag = closureN_tag;
 c_735399.fn = (function_type)__lambda_64;
c_735399.num_args = 1;
c_735399.num_elements = 8;
c_735399.elements = (object *)e_735531;
c_735399.elements[0] = ((closureN)self_734237)->elements[0];
c_735399.elements[1] = ((closureN)self_734237)->elements[1];
c_735399.elements[2] = ((closureN)self_734237)->elements[2];
c_735399.elements[3] = ((closureN)self_734237)->elements[3];
c_735399.elements[4] = ((closureN)self_734237)->elements[4];
c_735399.elements[5] = ((closureN)self_734237)->elements[5];
c_735399.elements[6] = ((closureN)self_734237)->elements[6];
c_735399.elements[7] = vj_871_7375_732265;

return_closcall3(data,  ((closureN)self_734237)->elements[0],  &c_735399, ((closureN)self_734237)->elements[6], vj_871_7375_732265);; 
}

static void __lambda_64(void *data, object self_734238, int argc, object *args) /* object self_734238, object r_733031 */
 {
 object r_733031 = args[0];
  if( (boolean_f != r_733031) ){ 
  
closureN_type c_735401;
object e_735514 [4];
c_735401.hdr.mark = gc_color_red;
 c_735401.hdr.grayed = 0;
c_735401.tag = closureN_tag;
 c_735401.fn = (function_type)__lambda_65;
c_735401.num_args = 3;
c_735401.num_elements = 4;
c_735401.elements = (object *)e_735514;
c_735401.elements[0] = ((closureN)self_734238)->elements[0];
c_735401.elements[1] = ((closureN)self_734238)->elements[1];
c_735401.elements[2] = ((closureN)self_734238)->elements[3];
c_735401.elements[3] = ((closureN)self_734238)->elements[5];


complex_num_type local_735519; 
return_direct_with_clo3(data,(closure)&c_735401,__lambda_65,  ((closureN)self_734238)->elements[2], ((closureN)self_734238)->elements[6], Cyc_fast_sum(data,&local_735519, ((closureN)self_734238)->elements[2], obj_int2obj(2)));
} else { 
  


complex_num_type local_735528; 
return_closcall3(data,  car(((closureN)self_734238)->elements[4]),  ((closureN)self_734238)->elements[3], Cyc_fast_sum(data,&local_735528, ((closureN)self_734238)->elements[2], obj_int2obj(1)), ((closureN)self_734238)->elements[7]);}
;; 
}

static void __lambda_65(void *data, object self_734239, int argc, object *args) /* object self_734239, object j_7377_732266, object vj_7378_732267, object k_7379_732268 */
 {
 object j_7377_732266 = args[0]; object vj_7378_732267 = args[1]; object k_7379_732268 = args[2];
  
closureN_type c_735403;
object e_735513 [7];
c_735403.hdr.mark = gc_color_red;
 c_735403.hdr.grayed = 0;
c_735403.tag = closureN_tag;
 c_735403.fn = (function_type)__lambda_66;
c_735403.num_args = 1;
c_735403.num_elements = 7;
c_735403.elements = (object *)e_735513;
c_735403.elements[0] = ((closureN)self_734239)->elements[0];
c_735403.elements[1] = ((closureN)self_734239)->elements[1];
c_735403.elements[2] = j_7377_732266;
c_735403.elements[3] = ((closureN)self_734239)->elements[2];
c_735403.elements[4] = k_7379_732268;
c_735403.elements[5] = ((closureN)self_734239)->elements[3];
c_735403.elements[6] = vj_7378_732267;

return_direct_with_clo1(data,(closure)&c_735403,__lambda_66,  boolean_f);; 
}

static void __lambda_66(void *data, object self_734240, int argc, object *args) /* object self_734240, object lp2_7380_732269 */
 {
 object lp2_7380_732269 = args[0];
  
closureN_type c_735405;
object e_735509 [7];
c_735405.hdr.mark = gc_color_red;
 c_735405.hdr.grayed = 0;
c_735405.tag = closureN_tag;
 c_735405.fn = (function_type)__lambda_769;
c_735405.num_args = 1;
c_735405.num_elements = 7;
c_735405.elements = (object *)e_735509;
c_735405.elements[0] = ((closureN)self_734240)->elements[0];
c_735405.elements[1] = ((closureN)self_734240)->elements[1];
c_735405.elements[2] = ((closureN)self_734240)->elements[2];
c_735405.elements[3] = ((closureN)self_734240)->elements[3];
c_735405.elements[4] = ((closureN)self_734240)->elements[4];
c_735405.elements[5] = ((closureN)self_734240)->elements[5];
c_735405.elements[6] = ((closureN)self_734240)->elements[6];


pair_type local_735512; 
return_direct_with_clo1(data,(closure)&c_735405,__lambda_769,  set_cell_as_expr(&local_735512, lp2_7380_732269));; 
}

static void __lambda_769(void *data, object self_734241, int argc, object *args) /* object self_734241, object lp2_7380_732269 */
 {
 object lp2_7380_732269 = args[0];
  
closureN_type c_735407;
object e_735422 [5];
c_735407.hdr.mark = gc_color_red;
 c_735407.hdr.grayed = 0;
c_735407.tag = closureN_tag;
 c_735407.fn = (function_type)__lambda_67;
c_735407.num_args = 1;
c_735407.num_elements = 5;
c_735407.elements = (object *)e_735422;
c_735407.elements[0] = ((closureN)self_734241)->elements[2];
c_735407.elements[1] = ((closureN)self_734241)->elements[3];
c_735407.elements[2] = ((closureN)self_734241)->elements[4];
c_735407.elements[3] = lp2_7380_732269;
c_735407.elements[4] = ((closureN)self_734241)->elements[6];


closureN_type c_735423;
object e_735508 [4];
c_735423.hdr.mark = gc_color_red;
 c_735423.hdr.grayed = 0;
c_735423.tag = closureN_tag;
 c_735423.fn = (function_type)__lambda_69;
c_735423.num_args = 3;
c_735423.num_elements = 4;
c_735423.elements = (object *)e_735508;
c_735423.elements[0] = ((closureN)self_734241)->elements[0];
c_735423.elements[1] = ((closureN)self_734241)->elements[1];
c_735423.elements[2] = lp2_7380_732269;
c_735423.elements[3] = ((closureN)self_734241)->elements[5];

return_direct_with_clo1(data,(closure)&c_735407,__lambda_67,  &c_735423);; 
}

static void __lambda_69(void *data, object self_734242, int argc, object *args) /* object self_734242, object k_733035, object j_7381_732270, object vj_7382_732271, object k_7383_732272 */
 {
 object k_733035 = args[0]; object j_7381_732270 = args[1]; object vj_7382_732271 = args[2]; object k_7383_732272 = args[3];
  
closureN_type c_735425;
object e_735507 [7];
c_735425.hdr.mark = gc_color_red;
 c_735425.hdr.grayed = 0;
c_735425.tag = closureN_tag;
 c_735425.fn = (function_type)__lambda_70;
c_735425.num_args = 0;
c_735425.num_elements = 7;
c_735425.elements = (object *)e_735507;
c_735425.elements[0] = ((closureN)self_734242)->elements[0];
c_735425.elements[1] = ((closureN)self_734242)->elements[1];
c_735425.elements[2] = j_7381_732270;
c_735425.elements[3] = k_733035;
c_735425.elements[4] = ((closureN)self_734242)->elements[2];
c_735425.elements[5] = ((closureN)self_734242)->elements[3];
c_735425.elements[6] = vj_7382_732271;

return_direct_with_clo1(data,(closure)&c_735425,__lambda_70,  k_7383_732272);; 
}

static void __lambda_70(void *data, object self_734243, int argc, object *args) /* object self_734243, object k_7385_732273 */
 {
 object k_7385_732273 = args[0];
  
closureN_type c_735427;
object e_735506 [8];
c_735427.hdr.mark = gc_color_red;
 c_735427.hdr.grayed = 0;
c_735427.tag = closureN_tag;
 c_735427.fn = (function_type)__lambda_71;
c_735427.num_args = 1;
c_735427.num_elements = 8;
c_735427.elements = (object *)e_735506;
c_735427.elements[0] = ((closureN)self_734243)->elements[0];
c_735427.elements[1] = ((closureN)self_734243)->elements[1];
c_735427.elements[2] = ((closureN)self_734243)->elements[2];
c_735427.elements[3] = ((closureN)self_734243)->elements[3];
c_735427.elements[4] = k_7385_732273;
c_735427.elements[5] = ((closureN)self_734243)->elements[4];
c_735427.elements[6] = ((closureN)self_734243)->elements[5];
c_735427.elements[7] = ((closureN)self_734243)->elements[6];

return_direct_with_clo1(data,(closure)&c_735427,__lambda_71,  boolean_f);; 
}

static void __lambda_71(void *data, object self_734244, int argc, object *args) /* object self_734244, object lp3_7386_732274 */
 {
 object lp3_7386_732274 = args[0];
  
closureN_type c_735429;
object e_735502 [8];
c_735429.hdr.mark = gc_color_red;
 c_735429.hdr.grayed = 0;
c_735429.tag = closureN_tag;
 c_735429.fn = (function_type)__lambda_768;
c_735429.num_args = 1;
c_735429.num_elements = 8;
c_735429.elements = (object *)e_735502;
c_735429.elements[0] = ((closureN)self_734244)->elements[0];
c_735429.elements[1] = ((closureN)self_734244)->elements[1];
c_735429.elements[2] = ((closureN)self_734244)->elements[2];
c_735429.elements[3] = ((closureN)self_734244)->elements[3];
c_735429.elements[4] = ((closureN)self_734244)->elements[4];
c_735429.elements[5] = ((closureN)self_734244)->elements[5];
c_735429.elements[6] = ((closureN)self_734244)->elements[6];
c_735429.elements[7] = ((closureN)self_734244)->elements[7];


pair_type local_735505; 
return_direct_with_clo1(data,(closure)&c_735429,__lambda_768,  set_cell_as_expr(&local_735505, lp3_7386_732274));; 
}

static void __lambda_768(void *data, object self_734245, int argc, object *args) /* object self_734245, object lp3_7386_732274 */
 {
 object lp3_7386_732274 = args[0];
  
closureN_type c_735431;
object e_735444 [3];
c_735431.hdr.mark = gc_color_red;
 c_735431.hdr.grayed = 0;
c_735431.tag = closureN_tag;
 c_735431.fn = (function_type)__lambda_72;
c_735431.num_args = 1;
c_735431.num_elements = 3;
c_735431.elements = (object *)e_735444;
c_735431.elements[0] = ((closureN)self_734245)->elements[3];
c_735431.elements[1] = ((closureN)self_734245)->elements[4];
c_735431.elements[2] = lp3_7386_732274;


closureN_type c_735445;
object e_735501 [7];
c_735445.hdr.mark = gc_color_red;
 c_735445.hdr.grayed = 0;
c_735445.tag = closureN_tag;
 c_735445.fn = (function_type)__lambda_74;
c_735445.num_args = 1;
c_735445.num_elements = 7;
c_735445.elements = (object *)e_735501;
c_735445.elements[0] = ((closureN)self_734245)->elements[0];
c_735445.elements[1] = ((closureN)self_734245)->elements[1];
c_735445.elements[2] = ((closureN)self_734245)->elements[2];
c_735445.elements[3] = ((closureN)self_734245)->elements[5];
c_735445.elements[4] = lp3_7386_732274;
c_735445.elements[5] = ((closureN)self_734245)->elements[6];
c_735445.elements[6] = ((closureN)self_734245)->elements[7];

return_direct_with_clo1(data,(closure)&c_735431,__lambda_72,  &c_735445);; 
}

static void __lambda_74(void *data, object self_734246, int argc, object *args) /* object self_734246, object k_733038, object k_7387_732275 */
 {
 object k_733038 = args[0]; object k_7387_732275 = args[1];
    
if( (boolean_f != Cyc_num_fast_gte_op(data, k_7387_732275, ((closureN)self_734246)->elements[1])) ){ 
  
complex_num_type local_735452; 
return_direct_with_clo1(data,  k_733038, (((closure)  k_733038)->fn),  Cyc_fast_sum(data,&local_735452, ((closureN)self_734246)->elements[2], obj_int2obj(1)));
} else { 
  
closureN_type c_735455;
object e_735497 [8];
c_735455.hdr.mark = gc_color_red;
 c_735455.hdr.grayed = 0;
c_735455.tag = closureN_tag;
 c_735455.fn = (function_type)__lambda_75;
c_735455.num_args = 1;
c_735455.num_elements = 8;
c_735455.elements = (object *)e_735497;
c_735455.elements[0] = ((closureN)self_734246)->elements[0];
c_735455.elements[1] = ((closureN)self_734246)->elements[2];
c_735455.elements[2] = k_733038;
c_735455.elements[3] = k_7387_732275;
c_735455.elements[4] = ((closureN)self_734246)->elements[3];
c_735455.elements[5] = ((closureN)self_734246)->elements[4];
c_735455.elements[6] = ((closureN)self_734246)->elements[5];
c_735455.elements[7] = ((closureN)self_734246)->elements[6];



return_direct_with_clo1(data,(closure)&c_735455,__lambda_75,  Cyc_vector_ref(data, ((closureN)self_734246)->elements[5], k_7387_732275));}
;; 
}

static void __lambda_75(void *data, object self_734247, int argc, object *args) /* object self_734247, object r_733040 */
 {
 object r_733040 = args[0];
  
closureN_type c_735457;
object e_735492 [7];
c_735457.hdr.mark = gc_color_red;
 c_735457.hdr.grayed = 0;
c_735457.tag = closureN_tag;
 c_735457.fn = (function_type)__lambda_76;
c_735457.num_args = 2;
c_735457.num_elements = 7;
c_735457.elements = (object *)e_735492;
c_735457.elements[0] = ((closureN)self_734247)->elements[0];
c_735457.elements[1] = ((closureN)self_734247)->elements[1];
c_735457.elements[2] = ((closureN)self_734247)->elements[2];
c_735457.elements[3] = ((closureN)self_734247)->elements[4];
c_735457.elements[4] = ((closureN)self_734247)->elements[5];
c_735457.elements[5] = ((closureN)self_734247)->elements[6];
c_735457.elements[6] = ((closureN)self_734247)->elements[7];


complex_num_type local_735495; 
return_direct_with_clo2(data,(closure)&c_735457,__lambda_76,  r_733040, Cyc_fast_sum(data,&local_735495, ((closureN)self_734247)->elements[3], obj_int2obj(1)));; 
}

static void __lambda_76(void *data, object self_734248, int argc, object *args) /* object self_734248, object vk_7388_732276, object k_871_7389_732277 */
 {
 object vk_7388_732276 = args[0]; object k_871_7389_732277 = args[1];
  
closureN_type c_735460;
object e_735490 [7];
c_735460.hdr.mark = gc_color_red;
 c_735460.hdr.grayed = 0;
c_735460.tag = closureN_tag;
 c_735460.fn = (function_type)__lambda_77;
c_735460.num_args = 1;
c_735460.num_elements = 7;
c_735460.elements = (object *)e_735490;
c_735460.elements[0] = ((closureN)self_734248)->elements[1];
c_735460.elements[1] = ((closureN)self_734248)->elements[2];
c_735460.elements[2] = k_871_7389_732277;
c_735460.elements[3] = ((closureN)self_734248)->elements[3];
c_735460.elements[4] = ((closureN)self_734248)->elements[4];
c_735460.elements[5] = ((closureN)self_734248)->elements[5];
c_735460.elements[6] = vk_7388_732276;

return_closcall3(data,  ((closureN)self_734248)->elements[0],  &c_735460, ((closureN)self_734248)->elements[6], vk_7388_732276);; 
}

static void __lambda_77(void *data, object self_734249, int argc, object *args) /* object self_734249, object r_733042 */
 {
 object r_733042 = args[0];
  if( (boolean_f != r_733042) ){ 
  

return_closcall2(data,  car(((closureN)self_734249)->elements[4]),  ((closureN)self_734249)->elements[1], ((closureN)self_734249)->elements[2]);
} else { 
  
closureN_type c_735468;
object e_735480 [5];
c_735468.hdr.mark = gc_color_red;
 c_735468.hdr.grayed = 0;
c_735468.tag = closureN_tag;
 c_735468.fn = (function_type)__lambda_78;
c_735468.num_args = 1;
c_735468.num_elements = 5;
c_735468.elements = (object *)e_735480;
c_735468.elements[0] = ((closureN)self_734249)->elements[0];
c_735468.elements[1] = ((closureN)self_734249)->elements[1];
c_735468.elements[2] = ((closureN)self_734249)->elements[2];
c_735468.elements[3] = ((closureN)self_734249)->elements[3];
c_735468.elements[4] = ((closureN)self_734249)->elements[6];


complex_num_type local_735487; 

object c_735483 = Cyc_vector_set_cps(data,(closure)&c_735468,((closureN)self_734249)->elements[5], Cyc_fast_sum(data,&local_735487, ((closureN)self_734249)->elements[0], obj_int2obj(1)), ((closureN)self_734249)->elements[6]);
return_closcall1(data,(closure)&c_735468,  c_735483);}
;; 
}

static void __lambda_78(void *data, object self_734250, int argc, object *args) /* object self_734250, object r_733044 */
 {

  


complex_num_type local_735476; 
return_closcall4(data,  car(((closureN)self_734250)->elements[3]),  ((closureN)self_734250)->elements[1], Cyc_fast_sum(data,&local_735476, ((closureN)self_734250)->elements[0], obj_int2obj(1)), ((closureN)self_734250)->elements[4], ((closureN)self_734250)->elements[2]);; 
}

static void __lambda_72(void *data, object self_734251, int argc, object *args) /* object self_734251, object r_733037 */
 {
 object r_733037 = args[0];
  
closureN_type c_735433;
object e_735440 [3];
c_735433.hdr.mark = gc_color_red;
 c_735433.hdr.grayed = 0;
c_735433.tag = closureN_tag;
 c_735433.fn = (function_type)__lambda_73;
c_735433.num_args = 1;
c_735433.num_elements = 3;
c_735433.elements = (object *)e_735440;
c_735433.elements[0] = ((closureN)self_734251)->elements[0];
c_735433.elements[1] = ((closureN)self_734251)->elements[1];
c_735433.elements[2] = ((closureN)self_734251)->elements[2];



return_direct_with_clo1(data,(closure)&c_735433,__lambda_73,  Cyc_set_cell(data, ((closureN)self_734251)->elements[2], r_733037));; 
}

static void __lambda_73(void *data, object self_734252, int argc, object *args) /* object self_734252, object r_733036 */
 {

  

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

static void __lambda_67(void *data, object self_734253, int argc, object *args) /* object self_734253, object r_733034 */
 {
 object r_733034 = args[0];
  
closureN_type c_735409;
object e_735418 [5];
c_735409.hdr.mark = gc_color_red;
 c_735409.hdr.grayed = 0;
c_735409.tag = closureN_tag;
 c_735409.fn = (function_type)__lambda_68;
c_735409.num_args = 1;
c_735409.num_elements = 5;
c_735409.elements = (object *)e_735418;
c_735409.elements[0] = ((closureN)self_734253)->elements[0];
c_735409.elements[1] = ((closureN)self_734253)->elements[1];
c_735409.elements[2] = ((closureN)self_734253)->elements[2];
c_735409.elements[3] = ((closureN)self_734253)->elements[3];
c_735409.elements[4] = ((closureN)self_734253)->elements[4];



return_direct_with_clo1(data,(closure)&c_735409,__lambda_68,  Cyc_set_cell(data, ((closureN)self_734253)->elements[3], r_733034));; 
}

static void __lambda_68(void *data, object self_734254, int argc, object *args) /* object self_734254, object r_733033 */
 {

  

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

static void __lambda_60(void *data, object self_734255, int argc, object *args) /* object self_734255, object r_733026 */
 {
 object r_733026 = args[0];
  
closureN_type c_735373;
object e_735381 [4];
c_735373.hdr.mark = gc_color_red;
 c_735373.hdr.grayed = 0;
c_735373.tag = closureN_tag;
 c_735373.fn = (function_type)__lambda_61;
c_735373.num_args = 1;
c_735373.num_elements = 4;
c_735373.elements = (object *)e_735381;
c_735373.elements[0] = ((closureN)self_734255)->elements[0];
c_735373.elements[1] = ((closureN)self_734255)->elements[1];
c_735373.elements[2] = ((closureN)self_734255)->elements[2];
c_735373.elements[3] = ((closureN)self_734255)->elements[3];



return_direct_with_clo1(data,(closure)&c_735373,__lambda_61,  Cyc_set_cell(data, ((closureN)self_734255)->elements[2], r_733026));; 
}

static void __lambda_61(void *data, object self_734256, int argc, object *args) /* object self_734256, object r_733025 */
 {

  

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

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

static void __lambda_37(void *data, object _, int argc, object *args) /* closure _,object k_732998, object elt_123_7340_732237, object v_7341_732238, object maybe_91start_87end_7342_732239_raw, ... */
 {
object k_732998 = args[0]; object elt_123_7340_732237 = args[1]; object v_7341_732238 = args[2];
load_varargs(maybe_91start_87end_7342_732239, args, 3, argc - 3);
  Cyc_st_add(data, "srfi/132.sld:vector-delete-neighbor-dups");

closureN_type c_735224;
object e_735343 [3];
c_735224.hdr.mark = gc_color_red;
 c_735224.hdr.grayed = 0;
c_735224.tag = closureN_tag;
 c_735224.fn = (function_type)__lambda_38;
c_735224.num_args = 1;
c_735224.num_elements = 3;
c_735224.elements = (object *)e_735343;
c_735224.elements[0] = elt_123_7340_732237;
c_735224.elements[1] = k_732998;
c_735224.elements[2] = v_7341_732238;


closureN_type c_735344;
object e_735348 [2];
c_735344.hdr.mark = gc_color_red;
 c_735344.hdr.grayed = 0;
c_735344.tag = closureN_tag;
 c_735344.fn = (function_type)__lambda_52;
c_735344.num_args = 0;
c_735344.num_elements = 2;
c_735344.elements = (object *)e_735348;
c_735344.elements[0] = maybe_91start_87end_7342_732239;
c_735344.elements[1] = v_7341_732238;

return_direct_with_clo1(data,(closure)&c_735224,__lambda_38,  &c_735344);; 
}

static void __lambda_52(void *data, object self_734213, int argc, object *args) /* object self_734213, object k_733016 */
 {
 object k_733016 = args[0];
  return_direct_with_clo3(data,  __glo_vector_91start_87end_srfi_132, (((closure)  __glo_vector_91start_87end_srfi_132)->fn),  k_733016, ((closureN)self_734213)->elements[1], ((closureN)self_734213)->elements[0]);; 
}

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


closureN_type c_735231;
object e_735342 [2];
c_735231.hdr.mark = gc_color_red;
 c_735231.hdr.grayed = 0;
c_735231.tag = closureN_tag;
 c_735231.fn = (function_type)__lambda_40;
c_735231.num_args = 2;
c_735231.num_elements = 2;
c_735231.elements = (object *)e_735342;
c_735231.elements[0] = ((closureN)self_734214)->elements[0];
c_735231.elements[1] = ((closureN)self_734214)->elements[2];

return_direct_with_clo1(data,(closure)&c_735226,__lambda_39,  &c_735231);; 
}

static void __lambda_40(void *data, object self_734215, int argc, object *args) /* object self_734215, object k_733001, object start_7343_732240, object end_7344_732241 */
 {
 object k_733001 = args[0]; object start_7343_732240 = args[1]; object end_7344_732241 = args[2];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, start_7343_732240, end_7344_732241)) ){ 
  
closureN_type c_735235;
object e_735335 [5];
c_735235.hdr.mark = gc_color_red;
 c_735235.hdr.grayed = 0;
c_735235.tag = closureN_tag;
 c_735235.fn = (function_type)__lambda_41;
c_735235.num_args = 1;
c_735235.num_elements = 5;
c_735235.elements = (object *)e_735335;
c_735235.elements[0] = ((closureN)self_734215)->elements[0];
c_735235.elements[1] = end_7344_732241;
c_735235.elements[2] = k_733001;
c_735235.elements[3] = start_7343_732240;
c_735235.elements[4] = ((closureN)self_734215)->elements[1];



return_direct_with_clo1(data,(closure)&c_735235,__lambda_41,  Cyc_vector_ref(data, ((closureN)self_734215)->elements[1], start_7343_732240));
} else { 
  
make_empty_vector(vec_735340);vec_735340.hdr.immutable = 1;
return_direct_with_clo1(data,  k_733001, (((closure)  k_733001)->fn),  &vec_735340);}
;; 
}

static void __lambda_41(void *data, object self_734216, int argc, object *args) /* object self_734216, object x_7347_732242 */
 {
 object x_7347_732242 = args[0];
  
closureN_type c_735237;
object e_735333 [5];
c_735237.hdr.mark = gc_color_red;
 c_735237.hdr.grayed = 0;
c_735237.tag = closureN_tag;
 c_735237.fn = (function_type)__lambda_42;
c_735237.num_args = 2;
c_735237.num_elements = 5;
c_735237.elements = (object *)e_735333;
c_735237.elements[0] = ((closureN)self_734216)->elements[0];
c_735237.elements[1] = ((closureN)self_734216)->elements[1];
c_735237.elements[2] = ((closureN)self_734216)->elements[2];
c_735237.elements[3] = ((closureN)self_734216)->elements[4];
c_735237.elements[4] = x_7347_732242;

return_direct_with_clo2(data,(closure)&c_735237,__lambda_42,  x_7347_732242, ((closureN)self_734216)->elements[3]);; 
}

static void __lambda_42(void *data, object self_734217, int argc, object *args) /* object self_734217, object x_7353_732244, object i_7354_732245 */
 {
 object x_7353_732244 = args[0]; object i_7354_732245 = args[1];
  
closureN_type c_735239;
object e_735332 [7];
c_735239.hdr.mark = gc_color_red;
 c_735239.hdr.grayed = 0;
c_735239.tag = closureN_tag;
 c_735239.fn = (function_type)__lambda_43;
c_735239.num_args = 1;
c_735239.num_elements = 7;
c_735239.elements = (object *)e_735332;
c_735239.elements[0] = ((closureN)self_734217)->elements[0];
c_735239.elements[1] = ((closureN)self_734217)->elements[1];
c_735239.elements[2] = i_7354_732245;
c_735239.elements[3] = ((closureN)self_734217)->elements[2];
c_735239.elements[4] = ((closureN)self_734217)->elements[3];
c_735239.elements[5] = ((closureN)self_734217)->elements[4];
c_735239.elements[6] = x_7353_732244;

return_direct_with_clo1(data,(closure)&c_735239,__lambda_43,  boolean_f);; 
}

static void __lambda_43(void *data, object self_734218, int argc, object *args) /* object self_734218, object recur_7356_732247 */
 {
 object recur_7356_732247 = args[0];
  
closureN_type c_735241;
object e_735328 [7];
c_735241.hdr.mark = gc_color_red;
 c_735241.hdr.grayed = 0;
c_735241.tag = closureN_tag;
 c_735241.fn = (function_type)__lambda_767;
c_735241.num_args = 1;
c_735241.num_elements = 7;
c_735241.elements = (object *)e_735328;
c_735241.elements[0] = ((closureN)self_734218)->elements[0];
c_735241.elements[1] = ((closureN)self_734218)->elements[1];
c_735241.elements[2] = ((closureN)self_734218)->elements[2];
c_735241.elements[3] = ((closureN)self_734218)->elements[3];
c_735241.elements[4] = ((closureN)self_734218)->elements[4];
c_735241.elements[5] = ((closureN)self_734218)->elements[5];
c_735241.elements[6] = ((closureN)self_734218)->elements[6];


pair_type local_735331; 
return_direct_with_clo1(data,(closure)&c_735241,__lambda_767,  set_cell_as_expr(&local_735331, recur_7356_732247));; 
}

static void __lambda_767(void *data, object self_734219, int argc, object *args) /* object self_734219, object recur_7356_732247 */
 {
 object recur_7356_732247 = args[0];
  
closureN_type c_735243;
object e_735268 [5];
c_735243.hdr.mark = gc_color_red;
 c_735243.hdr.grayed = 0;
c_735243.tag = closureN_tag;
 c_735243.fn = (function_type)__lambda_44;
c_735243.num_args = 1;
c_735243.num_elements = 5;
c_735243.elements = (object *)e_735268;
c_735243.elements[0] = ((closureN)self_734219)->elements[2];
c_735243.elements[1] = ((closureN)self_734219)->elements[3];
c_735243.elements[2] = recur_7356_732247;
c_735243.elements[3] = ((closureN)self_734219)->elements[5];
c_735243.elements[4] = ((closureN)self_734219)->elements[6];


closureN_type c_735269;
object e_735327 [4];
c_735269.hdr.mark = gc_color_red;
 c_735269.hdr.grayed = 0;
c_735269.tag = closureN_tag;
 c_735269.fn = (function_type)__lambda_48;
c_735269.num_args = 3;
c_735269.num_elements = 4;
c_735269.elements = (object *)e_735327;
c_735269.elements[0] = ((closureN)self_734219)->elements[0];
c_735269.elements[1] = ((closureN)self_734219)->elements[1];
c_735269.elements[2] = recur_7356_732247;
c_735269.elements[3] = ((closureN)self_734219)->elements[4];

return_direct_with_clo1(data,(closure)&c_735243,__lambda_44,  &c_735269);; 
}

static void __lambda_48(void *data, object self_734220, int argc, object *args) /* object self_734220, object k_733008, object x_7357_732248, object i_7358_732249, object j_7359_732250 */
 {
 object k_733008 = args[0]; object x_7357_732248 = args[1]; object i_7358_732249 = args[2]; object j_7359_732250 = args[3];
    
if( (boolean_f != Cyc_num_fast_lt_op(data, i_7358_732249, ((closureN)self_734220)->elements[1])) ){ 
  
closureN_type c_735275;
object e_735319 [6];
c_735275.hdr.mark = gc_color_red;
 c_735275.hdr.grayed = 0;
c_735275.tag = closureN_tag;
 c_735275.fn = (function_type)__lambda_49;
c_735275.num_args = 1;
c_735275.num_elements = 6;
c_735275.elements = (object *)e_735319;
c_735275.elements[0] = i_7358_732249;
c_735275.elements[1] = j_7359_732250;
c_735275.elements[2] = k_733008;
c_735275.elements[3] = ((closureN)self_734220)->elements[2];
c_735275.elements[4] = ((closureN)self_734220)->elements[3];
c_735275.elements[5] = x_7357_732248;



return_closcall3(data,  ((closureN)self_734220)->elements[0],  &c_735275, x_7357_732248, Cyc_vector_ref(data, ((closureN)self_734220)->elements[3], i_7358_732249));
} else { 
  
object c_735326 = Cyc_make_vector(data,  k_733008,1,j_7359_732250);
return_direct_with_clo1(data,  k_733008, (((closure)  k_733008)->fn),  c_735326);}
;; 
}

static void __lambda_49(void *data, object self_734221, int argc, object *args) /* object self_734221, object r_733012 */
 {
 object r_733012 = args[0];
  if( (boolean_f != r_733012) ){ 
  


complex_num_type local_735284; 
return_closcall4(data,  car(((closureN)self_734221)->elements[3]),  ((closureN)self_734221)->elements[2], ((closureN)self_734221)->elements[5], Cyc_fast_sum(data,&local_735284, ((closureN)self_734221)->elements[0], obj_int2obj(1)), ((closureN)self_734221)->elements[1]);
} else { 
  


closureN_type c_735291;
object e_735306 [4];
c_735291.hdr.mark = gc_color_red;
 c_735291.hdr.grayed = 0;
c_735291.tag = closureN_tag;
 c_735291.fn = (function_type)__lambda_50;
c_735291.num_args = 1;
c_735291.num_elements = 4;
c_735291.elements = (object *)e_735306;
c_735291.elements[0] = ((closureN)self_734221)->elements[0];
c_735291.elements[1] = ((closureN)self_734221)->elements[1];
c_735291.elements[2] = ((closureN)self_734221)->elements[2];
c_735291.elements[3] = ((closureN)self_734221)->elements[4];




complex_num_type local_735313; 

complex_num_type local_735317; 
return_closcall4(data,  car(((closureN)self_734221)->elements[3]),  &c_735291, Cyc_vector_ref(data, ((closureN)self_734221)->elements[4], ((closureN)self_734221)->elements[0]), Cyc_fast_sum(data,&local_735313, ((closureN)self_734221)->elements[0], obj_int2obj(1)), Cyc_fast_sum(data,&local_735317, ((closureN)self_734221)->elements[1], obj_int2obj(1)));}
;; 
}

static void __lambda_50(void *data, object self_734222, int argc, object *args) /* object self_734222, object ansvec_7362_732253 */
 {
 object ansvec_7362_732253 = args[0];
  
closureN_type c_735293;
object e_735297 [2];
c_735293.hdr.mark = gc_color_red;
 c_735293.hdr.grayed = 0;
c_735293.tag = closureN_tag;
 c_735293.fn = (function_type)__lambda_51;
c_735293.num_args = 1;
c_735293.num_elements = 2;
c_735293.elements = (object *)e_735297;
c_735293.elements[0] = ansvec_7362_732253;
c_735293.elements[1] = ((closureN)self_734222)->elements[2];




object c_735300 = Cyc_vector_set_cps(data,(closure)&c_735293,ansvec_7362_732253, ((closureN)self_734222)->elements[1], Cyc_vector_ref(data, ((closureN)self_734222)->elements[3], ((closureN)self_734222)->elements[0]));
return_closcall1(data,(closure)&c_735293,  c_735300);; 
}

static void __lambda_51(void *data, object self_734223, int argc, object *args) /* object self_734223, object r_733014 */
 {

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

static void __lambda_44(void *data, object self_734224, int argc, object *args) /* object self_734224, object r_733007 */
 {
 object r_733007 = args[0];
  
closureN_type c_735245;
object e_735264 [5];
c_735245.hdr.mark = gc_color_red;
 c_735245.hdr.grayed = 0;
c_735245.tag = closureN_tag;
 c_735245.fn = (function_type)__lambda_45;
c_735245.num_args = 1;
c_735245.num_elements = 5;
c_735245.elements = (object *)e_735264;
c_735245.elements[0] = ((closureN)self_734224)->elements[0];
c_735245.elements[1] = ((closureN)self_734224)->elements[1];
c_735245.elements[2] = ((closureN)self_734224)->elements[2];
c_735245.elements[3] = ((closureN)self_734224)->elements[3];
c_735245.elements[4] = ((closureN)self_734224)->elements[4];



return_direct_with_clo1(data,(closure)&c_735245,__lambda_45,  Cyc_set_cell(data, ((closureN)self_734224)->elements[2], r_733007));; 
}

static void __lambda_45(void *data, object self_734225, int argc, object *args) /* object self_734225, object r_733006 */
 {

  


closureN_type c_735250;
object e_735261 [2];
c_735250.hdr.mark = gc_color_red;
 c_735250.hdr.grayed = 0;
c_735250.tag = closureN_tag;
 c_735250.fn = (function_type)__lambda_46;
c_735250.num_args = 1;
c_735250.num_elements = 2;
c_735250.elements = (object *)e_735261;
c_735250.elements[0] = ((closureN)self_734225)->elements[1];
c_735250.elements[1] = ((closureN)self_734225)->elements[3];

return_closcall4(data,  car(((closureN)self_734225)->elements[2]),  &c_735250, ((closureN)self_734225)->elements[4], ((closureN)self_734225)->elements[0], obj_int2obj(1));; 
}

static void __lambda_46(void *data, object self_734226, int argc, object *args) /* object self_734226, object ans_7350_732243 */
 {
 object ans_7350_732243 = args[0];
  
closureN_type c_735252;
object e_735256 [2];
c_735252.hdr.mark = gc_color_red;
 c_735252.hdr.grayed = 0;
c_735252.tag = closureN_tag;
 c_735252.fn = (function_type)__lambda_47;
c_735252.num_args = 1;
c_735252.num_elements = 2;
c_735252.elements = (object *)e_735256;
c_735252.elements[0] = ans_7350_732243;
c_735252.elements[1] = ((closureN)self_734226)->elements[0];


object c_735259 = Cyc_vector_set_cps(data,(closure)&c_735252,ans_7350_732243, obj_int2obj(0), ((closureN)self_734226)->elements[1]);
return_closcall1(data,(closure)&c_735252,  c_735259);; 
}

static void __lambda_47(void *data, object self_734227, int argc, object *args) /* object self_734227, object r_733005 */
 {

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

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

static void __lambda_13(void *data, object _, int argc, object *args) /* closure _,object k_732975, object _123_7322_732221, object lis_7323_732222 */
 {
object k_732975 = args[0]; object _123_7322_732221 = args[1]; object lis_7323_732222 = args[2];
  Cyc_st_add(data, "srfi/132.sld:list-delete-neighbor-dups!");

closureN_type c_735056;
object e_735216 [2];
c_735056.hdr.mark = gc_color_red;
 c_735056.hdr.grayed = 0;
c_735056.tag = closureN_tag;
 c_735056.fn = (function_type)__lambda_14;
c_735056.num_args = 0;
c_735056.num_elements = 2;
c_735056.elements = (object *)e_735216;
c_735056.elements[0] = _123_7322_732221;
c_735056.elements[1] = lis_7323_732222;


closureN_type c_735217;
object e_735221 [2];
c_735217.hdr.mark = gc_color_red;
 c_735217.hdr.grayed = 0;
c_735217.tag = closureN_tag;
 c_735217.fn = (function_type)__lambda_36;
c_735217.num_args = 1;
c_735217.num_elements = 2;
c_735217.elements = (object *)e_735221;
c_735217.elements[0] = k_732975;
c_735217.elements[1] = lis_7323_732222;

return_direct_with_clo1(data,(closure)&c_735056,__lambda_14,  &c_735217);; 
}

static void __lambda_36(void *data, object self_734188, int argc, object *args) /* object self_734188, object r_732976 */
 {

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

static void __lambda_14(void *data, object self_734189, int argc, object *args) /* object self_734189, object k_732977 */
 {
 object k_732977 = args[0];
    
if( (boolean_f != Cyc_is_pair(((closureN)self_734189)->elements[1])) ){ 
  
closureN_type c_735061;
object e_735211 [3];
c_735061.hdr.mark = gc_color_red;
 c_735061.hdr.grayed = 0;
c_735061.tag = closureN_tag;
 c_735061.fn = (function_type)__lambda_15;
c_735061.num_args = 1;
c_735061.num_elements = 3;
c_735061.elements = (object *)e_735211;
c_735061.elements[0] = ((closureN)self_734189)->elements[0];
c_735061.elements[1] = k_732977;
c_735061.elements[2] = ((closureN)self_734189)->elements[1];



return_direct_with_clo1(data,(closure)&c_735061,__lambda_15,  Cyc_car(data, ((closureN)self_734189)->elements[1]));
} else { 
  return_direct_with_clo1(data,  k_732977, (((closure)  k_732977)->fn),  Cyc_VOID);}
;; 
}

static void __lambda_15(void *data, object self_734190, int argc, object *args) /* object self_734190, object r_732979 */
 {
 object r_732979 = args[0];
  
closureN_type c_735063;
object e_735207 [4];
c_735063.hdr.mark = gc_color_red;
 c_735063.hdr.grayed = 0;
c_735063.tag = closureN_tag;
 c_735063.fn = (function_type)__lambda_16;
c_735063.num_args = 1;
c_735063.num_elements = 4;
c_735063.elements = (object *)e_735207;
c_735063.elements[0] = ((closureN)self_734190)->elements[0];
c_735063.elements[1] = ((closureN)self_734190)->elements[1];
c_735063.elements[2] = ((closureN)self_734190)->elements[2];
c_735063.elements[3] = r_732979;



return_direct_with_clo1(data,(closure)&c_735063,__lambda_16,  Cyc_cdr(data, ((closureN)self_734190)->elements[2]));; 
}

static void __lambda_16(void *data, object self_734191, int argc, object *args) /* object self_734191, object r_732980 */
 {
 object r_732980 = args[0];
  
closureN_type c_735065;
object e_735204 [2];
c_735065.hdr.mark = gc_color_red;
 c_735065.hdr.grayed = 0;
c_735065.tag = closureN_tag;
 c_735065.fn = (function_type)__lambda_17;
c_735065.num_args = 3;
c_735065.num_elements = 2;
c_735065.elements = (object *)e_735204;
c_735065.elements[0] = ((closureN)self_734191)->elements[0];
c_735065.elements[1] = ((closureN)self_734191)->elements[1];

return_direct_with_clo3(data,(closure)&c_735065,__lambda_17,  ((closureN)self_734191)->elements[2], ((closureN)self_734191)->elements[3], r_732980);; 
}

static void __lambda_17(void *data, object self_734192, int argc, object *args) /* object self_734192, object prev_7325_732223, object prev_91elt_7326_732224, object lis_7327_732225 */
 {
 object prev_7325_732223 = args[0]; object prev_91elt_7326_732224 = args[1]; object lis_7327_732225 = args[2];
  
closureN_type c_735067;
object e_735203 [5];
c_735067.hdr.mark = gc_color_red;
 c_735067.hdr.grayed = 0;
c_735067.tag = closureN_tag;
 c_735067.fn = (function_type)__lambda_18;
c_735067.num_args = 1;
c_735067.num_elements = 5;
c_735067.elements = (object *)e_735203;
c_735067.elements[0] = ((closureN)self_734192)->elements[0];
c_735067.elements[1] = ((closureN)self_734192)->elements[1];
c_735067.elements[2] = lis_7327_732225;
c_735067.elements[3] = prev_7325_732223;
c_735067.elements[4] = prev_91elt_7326_732224;

return_direct_with_clo1(data,(closure)&c_735067,__lambda_18,  boolean_f);; 
}

static void __lambda_18(void *data, object self_734193, int argc, object *args) /* object self_734193, object lp1_7328_732226 */
 {
 object lp1_7328_732226 = args[0];
  
closureN_type c_735069;
object e_735199 [5];
c_735069.hdr.mark = gc_color_red;
 c_735069.hdr.grayed = 0;
c_735069.tag = closureN_tag;
 c_735069.fn = (function_type)__lambda_766;
c_735069.num_args = 1;
c_735069.num_elements = 5;
c_735069.elements = (object *)e_735199;
c_735069.elements[0] = ((closureN)self_734193)->elements[0];
c_735069.elements[1] = ((closureN)self_734193)->elements[1];
c_735069.elements[2] = ((closureN)self_734193)->elements[2];
c_735069.elements[3] = ((closureN)self_734193)->elements[3];
c_735069.elements[4] = ((closureN)self_734193)->elements[4];


pair_type local_735202; 
return_direct_with_clo1(data,(closure)&c_735069,__lambda_766,  set_cell_as_expr(&local_735202, lp1_7328_732226));; 
}

static void __lambda_766(void *data, object self_734194, int argc, object *args) /* object self_734194, object lp1_7328_732226 */
 {
 object lp1_7328_732226 = args[0];
  
closureN_type c_735071;
object e_735086 [5];
c_735071.hdr.mark = gc_color_red;
 c_735071.hdr.grayed = 0;
c_735071.tag = closureN_tag;
 c_735071.fn = (function_type)__lambda_19;
c_735071.num_args = 1;
c_735071.num_elements = 5;
c_735071.elements = (object *)e_735086;
c_735071.elements[0] = ((closureN)self_734194)->elements[1];
c_735071.elements[1] = ((closureN)self_734194)->elements[2];
c_735071.elements[2] = lp1_7328_732226;
c_735071.elements[3] = ((closureN)self_734194)->elements[3];
c_735071.elements[4] = ((closureN)self_734194)->elements[4];


closureN_type c_735087;
object e_735198 [2];
c_735087.hdr.mark = gc_color_red;
 c_735087.hdr.grayed = 0;
c_735087.tag = closureN_tag;
 c_735087.fn = (function_type)__lambda_21;
c_735087.num_args = 3;
c_735087.num_elements = 2;
c_735087.elements = (object *)e_735198;
c_735087.elements[0] = ((closureN)self_734194)->elements[0];
c_735087.elements[1] = lp1_7328_732226;

return_direct_with_clo1(data,(closure)&c_735071,__lambda_19,  &c_735087);; 
}

static void __lambda_21(void *data, object self_734195, int argc, object *args) /* object self_734195, object k_732983, object prev_7329_732227, object prev_91elt_7330_732228, object lis_7331_732229 */
 {
 object k_732983 = args[0]; object prev_7329_732227 = args[1]; object prev_91elt_7330_732228 = args[2]; object lis_7331_732229 = args[3];
    
if( (boolean_f != Cyc_is_pair(lis_7331_732229)) ){ 
  
closureN_type c_735091;
object e_735194 [6];
c_735091.hdr.mark = gc_color_red;
 c_735091.hdr.grayed = 0;
c_735091.tag = closureN_tag;
 c_735091.fn = (function_type)__lambda_22;
c_735091.num_args = 1;
c_735091.num_elements = 6;
c_735091.elements = (object *)e_735194;
c_735091.elements[0] = ((closureN)self_734195)->elements[0];
c_735091.elements[1] = k_732983;
c_735091.elements[2] = lis_7331_732229;
c_735091.elements[3] = ((closureN)self_734195)->elements[1];
c_735091.elements[4] = prev_7329_732227;
c_735091.elements[5] = prev_91elt_7330_732228;



return_direct_with_clo1(data,(closure)&c_735091,__lambda_22,  Cyc_car(data, lis_7331_732229));
} else { 
  return_direct_with_clo1(data,  k_732983, (((closure)  k_732983)->fn),  Cyc_VOID);}
;; 
}

static void __lambda_22(void *data, object self_734196, int argc, object *args) /* object self_734196, object r_732985 */
 {
 object r_732985 = args[0];
  
closureN_type c_735093;
object e_735190 [7];
c_735093.hdr.mark = gc_color_red;
 c_735093.hdr.grayed = 0;
c_735093.tag = closureN_tag;
 c_735093.fn = (function_type)__lambda_23;
c_735093.num_args = 1;
c_735093.num_elements = 7;
c_735093.elements = (object *)e_735190;
c_735093.elements[0] = ((closureN)self_734196)->elements[0];
c_735093.elements[1] = ((closureN)self_734196)->elements[1];
c_735093.elements[2] = ((closureN)self_734196)->elements[2];
c_735093.elements[3] = ((closureN)self_734196)->elements[3];
c_735093.elements[4] = ((closureN)self_734196)->elements[4];
c_735093.elements[5] = ((closureN)self_734196)->elements[5];
c_735093.elements[6] = r_732985;



return_direct_with_clo1(data,(closure)&c_735093,__lambda_23,  Cyc_cdr(data, ((closureN)self_734196)->elements[2]));; 
}

static void __lambda_23(void *data, object self_734197, int argc, object *args) /* object self_734197, object r_732986 */
 {
 object r_732986 = args[0];
  
closureN_type c_735095;
object e_735188 [6];
c_735095.hdr.mark = gc_color_red;
 c_735095.hdr.grayed = 0;
c_735095.tag = closureN_tag;
 c_735095.fn = (function_type)__lambda_24;
c_735095.num_args = 2;
c_735095.num_elements = 6;
c_735095.elements = (object *)e_735188;
c_735095.elements[0] = ((closureN)self_734197)->elements[0];
c_735095.elements[1] = ((closureN)self_734197)->elements[1];
c_735095.elements[2] = ((closureN)self_734197)->elements[2];
c_735095.elements[3] = ((closureN)self_734197)->elements[3];
c_735095.elements[4] = ((closureN)self_734197)->elements[4];
c_735095.elements[5] = ((closureN)self_734197)->elements[5];

return_direct_with_clo2(data,(closure)&c_735095,__lambda_24,  ((closureN)self_734197)->elements[6], r_732986);; 
}

static void __lambda_24(void *data, object self_734198, int argc, object *args) /* object self_734198, object lis_91elt_7332_732230, object next_7333_732231 */
 {
 object lis_91elt_7332_732230 = args[0]; object next_7333_732231 = args[1];
  
closureN_type c_735098;
object e_735186 [8];
c_735098.hdr.mark = gc_color_red;
 c_735098.hdr.grayed = 0;
c_735098.tag = closureN_tag;
 c_735098.fn = (function_type)__lambda_25;
c_735098.num_args = 1;
c_735098.num_elements = 8;
c_735098.elements = (object *)e_735186;
c_735098.elements[0] = ((closureN)self_734198)->elements[0];
c_735098.elements[1] = ((closureN)self_734198)->elements[1];
c_735098.elements[2] = ((closureN)self_734198)->elements[2];
c_735098.elements[3] = lis_91elt_7332_732230;
c_735098.elements[4] = ((closureN)self_734198)->elements[3];
c_735098.elements[5] = next_7333_732231;
c_735098.elements[6] = ((closureN)self_734198)->elements[4];
c_735098.elements[7] = ((closureN)self_734198)->elements[5];

return_closcall3(data,  ((closureN)self_734198)->elements[0],  &c_735098, ((closureN)self_734198)->elements[5], lis_91elt_7332_732230);; 
}

static void __lambda_25(void *data, object self_734199, int argc, object *args) /* object self_734199, object r_732987 */
 {
 object r_732987 = args[0];
  if( (boolean_f != r_732987) ){ 
  
closureN_type c_735100;
object e_735176 [5];
c_735100.hdr.mark = gc_color_red;
 c_735100.hdr.grayed = 0;
c_735100.tag = closureN_tag;
 c_735100.fn = (function_type)__lambda_26;
c_735100.num_args = 1;
c_735100.num_elements = 5;
c_735100.elements = (object *)e_735176;
c_735100.elements[0] = ((closureN)self_734199)->elements[0];
c_735100.elements[1] = ((closureN)self_734199)->elements[1];
c_735100.elements[2] = ((closureN)self_734199)->elements[4];
c_735100.elements[3] = ((closureN)self_734199)->elements[6];
c_735100.elements[4] = ((closureN)self_734199)->elements[7];

return_direct_with_clo1(data,(closure)&c_735100,__lambda_26,  ((closureN)self_734199)->elements[5]);
} else { 
  

return_closcall4(data,  car(((closureN)self_734199)->elements[4]),  ((closureN)self_734199)->elements[1], ((closureN)self_734199)->elements[2], ((closureN)self_734199)->elements[3], ((closureN)self_734199)->elements[5]);}
;; 
}

static void __lambda_26(void *data, object self_734200, int argc, object *args) /* object self_734200, object lis_7335_732232 */
 {
 object lis_7335_732232 = args[0];
  
closureN_type c_735102;
object e_735175 [6];
c_735102.hdr.mark = gc_color_red;
 c_735102.hdr.grayed = 0;
c_735102.tag = closureN_tag;
 c_735102.fn = (function_type)__lambda_27;
c_735102.num_args = 1;
c_735102.num_elements = 6;
c_735102.elements = (object *)e_735175;
c_735102.elements[0] = ((closureN)self_734200)->elements[0];
c_735102.elements[1] = ((closureN)self_734200)->elements[1];
c_735102.elements[2] = lis_7335_732232;
c_735102.elements[3] = ((closureN)self_734200)->elements[2];
c_735102.elements[4] = ((closureN)self_734200)->elements[3];
c_735102.elements[5] = ((closureN)self_734200)->elements[4];

return_direct_with_clo1(data,(closure)&c_735102,__lambda_27,  boolean_f);; 
}

static void __lambda_27(void *data, object self_734201, int argc, object *args) /* object self_734201, object lp2_7336_732233 */
 {
 object lp2_7336_732233 = args[0];
  
closureN_type c_735104;
object e_735171 [6];
c_735104.hdr.mark = gc_color_red;
 c_735104.hdr.grayed = 0;
c_735104.tag = closureN_tag;
 c_735104.fn = (function_type)__lambda_765;
c_735104.num_args = 1;
c_735104.num_elements = 6;
c_735104.elements = (object *)e_735171;
c_735104.elements[0] = ((closureN)self_734201)->elements[0];
c_735104.elements[1] = ((closureN)self_734201)->elements[1];
c_735104.elements[2] = ((closureN)self_734201)->elements[2];
c_735104.elements[3] = ((closureN)self_734201)->elements[3];
c_735104.elements[4] = ((closureN)self_734201)->elements[4];
c_735104.elements[5] = ((closureN)self_734201)->elements[5];


pair_type local_735174; 
return_direct_with_clo1(data,(closure)&c_735104,__lambda_765,  set_cell_as_expr(&local_735174, lp2_7336_732233));; 
}

static void __lambda_765(void *data, object self_734202, int argc, object *args) /* object self_734202, object lp2_7336_732233 */
 {
 object lp2_7336_732233 = args[0];
  
closureN_type c_735106;
object e_735119 [3];
c_735106.hdr.mark = gc_color_red;
 c_735106.hdr.grayed = 0;
c_735106.tag = closureN_tag;
 c_735106.fn = (function_type)__lambda_28;
c_735106.num_args = 1;
c_735106.num_elements = 3;
c_735106.elements = (object *)e_735119;
c_735106.elements[0] = ((closureN)self_734202)->elements[1];
c_735106.elements[1] = ((closureN)self_734202)->elements[2];
c_735106.elements[2] = lp2_7336_732233;


closureN_type c_735120;
object e_735170 [5];
c_735120.hdr.mark = gc_color_red;
 c_735120.hdr.grayed = 0;
c_735120.tag = closureN_tag;
 c_735120.fn = (function_type)__lambda_30;
c_735120.num_args = 1;
c_735120.num_elements = 5;
c_735120.elements = (object *)e_735170;
c_735120.elements[0] = ((closureN)self_734202)->elements[0];
c_735120.elements[1] = ((closureN)self_734202)->elements[3];
c_735120.elements[2] = lp2_7336_732233;
c_735120.elements[3] = ((closureN)self_734202)->elements[4];
c_735120.elements[4] = ((closureN)self_734202)->elements[5];

return_direct_with_clo1(data,(closure)&c_735106,__lambda_28,  &c_735120);; 
}

static void __lambda_30(void *data, object self_734203, int argc, object *args) /* object self_734203, object k_732990, object lis_7337_732234 */
 {
 object k_732990 = args[0]; object lis_7337_732234 = args[1];
    
if( (boolean_f != Cyc_is_pair(lis_7337_732234)) ){ 
  
closureN_type c_735124;
object e_735162 [7];
c_735124.hdr.mark = gc_color_red;
 c_735124.hdr.grayed = 0;
c_735124.tag = closureN_tag;
 c_735124.fn = (function_type)__lambda_31;
c_735124.num_args = 1;
c_735124.num_elements = 7;
c_735124.elements = (object *)e_735162;
c_735124.elements[0] = ((closureN)self_734203)->elements[0];
c_735124.elements[1] = k_732990;
c_735124.elements[2] = lis_7337_732234;
c_735124.elements[3] = ((closureN)self_734203)->elements[1];
c_735124.elements[4] = ((closureN)self_734203)->elements[2];
c_735124.elements[5] = ((closureN)self_734203)->elements[3];
c_735124.elements[6] = ((closureN)self_734203)->elements[4];



return_direct_with_clo1(data,(closure)&c_735124,__lambda_31,  Cyc_car(data, lis_7337_732234));
} else { 
  
object c_735168 = Cyc_set_cdr_cps(data,  k_732990,((closureN)self_734203)->elements[3], lis_7337_732234);
return_direct_with_clo1(data,  k_732990, (((closure)  k_732990)->fn),  c_735168);}
;; 
}

static void __lambda_31(void *data, object self_734204, int argc, object *args) /* object self_734204, object r_732992 */
 {
 object r_732992 = args[0];
  
closureN_type c_735126;
object e_735158 [8];
c_735126.hdr.mark = gc_color_red;
 c_735126.hdr.grayed = 0;
c_735126.tag = closureN_tag;
 c_735126.fn = (function_type)__lambda_32;
c_735126.num_args = 1;
c_735126.num_elements = 8;
c_735126.elements = (object *)e_735158;
c_735126.elements[0] = ((closureN)self_734204)->elements[0];
c_735126.elements[1] = ((closureN)self_734204)->elements[1];
c_735126.elements[2] = ((closureN)self_734204)->elements[2];
c_735126.elements[3] = ((closureN)self_734204)->elements[3];
c_735126.elements[4] = ((closureN)self_734204)->elements[4];
c_735126.elements[5] = ((closureN)self_734204)->elements[5];
c_735126.elements[6] = ((closureN)self_734204)->elements[6];
c_735126.elements[7] = r_732992;



return_direct_with_clo1(data,(closure)&c_735126,__lambda_32,  Cyc_cdr(data, ((closureN)self_734204)->elements[2]));; 
}

static void __lambda_32(void *data, object self_734205, int argc, object *args) /* object self_734205, object r_732993 */
 {
 object r_732993 = args[0];
  
closureN_type c_735128;
object e_735156 [7];
c_735128.hdr.mark = gc_color_red;
 c_735128.hdr.grayed = 0;
c_735128.tag = closureN_tag;
 c_735128.fn = (function_type)__lambda_33;
c_735128.num_args = 2;
c_735128.num_elements = 7;
c_735128.elements = (object *)e_735156;
c_735128.elements[0] = ((closureN)self_734205)->elements[0];
c_735128.elements[1] = ((closureN)self_734205)->elements[1];
c_735128.elements[2] = ((closureN)self_734205)->elements[2];
c_735128.elements[3] = ((closureN)self_734205)->elements[3];
c_735128.elements[4] = ((closureN)self_734205)->elements[4];
c_735128.elements[5] = ((closureN)self_734205)->elements[5];
c_735128.elements[6] = ((closureN)self_734205)->elements[6];

return_direct_with_clo2(data,(closure)&c_735128,__lambda_33,  ((closureN)self_734205)->elements[7], r_732993);; 
}

static void __lambda_33(void *data, object self_734206, int argc, object *args) /* object self_734206, object lis_91elt_7338_732235, object next_7339_732236 */
 {
 object lis_91elt_7338_732235 = args[0]; object next_7339_732236 = args[1];
  
closureN_type c_735131;
object e_735154 [7];
c_735131.hdr.mark = gc_color_red;
 c_735131.hdr.grayed = 0;
c_735131.tag = closureN_tag;
 c_735131.fn = (function_type)__lambda_34;
c_735131.num_args = 1;
c_735131.num_elements = 7;
c_735131.elements = (object *)e_735154;
c_735131.elements[0] = ((closureN)self_734206)->elements[1];
c_735131.elements[1] = ((closureN)self_734206)->elements[2];
c_735131.elements[2] = lis_91elt_7338_732235;
c_735131.elements[3] = ((closureN)self_734206)->elements[3];
c_735131.elements[4] = ((closureN)self_734206)->elements[4];
c_735131.elements[5] = next_7339_732236;
c_735131.elements[6] = ((closureN)self_734206)->elements[5];

return_closcall3(data,  ((closureN)self_734206)->elements[0],  &c_735131, ((closureN)self_734206)->elements[6], lis_91elt_7338_732235);; 
}

static void __lambda_34(void *data, object self_734207, int argc, object *args) /* object self_734207, object r_732994 */
 {
 object r_732994 = args[0];
  if( (boolean_f != r_732994) ){ 
  

return_closcall2(data,  car(((closureN)self_734207)->elements[4]),  ((closureN)self_734207)->elements[0], ((closureN)self_734207)->elements[5]);
} else { 
  
closureN_type c_735139;
object e_735148 [5];
c_735139.hdr.mark = gc_color_red;
 c_735139.hdr.grayed = 0;
c_735139.tag = closureN_tag;
 c_735139.fn = (function_type)__lambda_35;
c_735139.num_args = 1;
c_735139.num_elements = 5;
c_735139.elements = (object *)e_735148;
c_735139.elements[0] = ((closureN)self_734207)->elements[0];
c_735139.elements[1] = ((closureN)self_734207)->elements[1];
c_735139.elements[2] = ((closureN)self_734207)->elements[2];
c_735139.elements[3] = ((closureN)self_734207)->elements[3];
c_735139.elements[4] = ((closureN)self_734207)->elements[5];


object c_735151 = Cyc_set_cdr_cps(data,(closure)&c_735139,((closureN)self_734207)->elements[6], ((closureN)self_734207)->elements[1]);
return_closcall1(data,(closure)&c_735139,  c_735151);}
;; 
}

static void __lambda_35(void *data, object self_734208, int argc, object *args) /* object self_734208, object r_732995 */
 {

  

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

static void __lambda_28(void *data, object self_734209, int argc, object *args) /* object self_734209, object r_732989 */
 {
 object r_732989 = args[0];
  
closureN_type c_735108;
object e_735115 [3];
c_735108.hdr.mark = gc_color_red;
 c_735108.hdr.grayed = 0;
c_735108.tag = closureN_tag;
 c_735108.fn = (function_type)__lambda_29;
c_735108.num_args = 1;
c_735108.num_elements = 3;
c_735108.elements = (object *)e_735115;
c_735108.elements[0] = ((closureN)self_734209)->elements[0];
c_735108.elements[1] = ((closureN)self_734209)->elements[1];
c_735108.elements[2] = ((closureN)self_734209)->elements[2];



return_direct_with_clo1(data,(closure)&c_735108,__lambda_29,  Cyc_set_cell(data, ((closureN)self_734209)->elements[2], r_732989));; 
}

static void __lambda_29(void *data, object self_734210, int argc, object *args) /* object self_734210, object r_732988 */
 {

  

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

static void __lambda_19(void *data, object self_734211, int argc, object *args) /* object self_734211, object r_732982 */
 {
 object r_732982 = args[0];
  
closureN_type c_735073;
object e_735082 [5];
c_735073.hdr.mark = gc_color_red;
 c_735073.hdr.grayed = 0;
c_735073.tag = closureN_tag;
 c_735073.fn = (function_type)__lambda_20;
c_735073.num_args = 1;
c_735073.num_elements = 5;
c_735073.elements = (object *)e_735082;
c_735073.elements[0] = ((closureN)self_734211)->elements[0];
c_735073.elements[1] = ((closureN)self_734211)->elements[1];
c_735073.elements[2] = ((closureN)self_734211)->elements[2];
c_735073.elements[3] = ((closureN)self_734211)->elements[3];
c_735073.elements[4] = ((closureN)self_734211)->elements[4];



return_direct_with_clo1(data,(closure)&c_735073,__lambda_20,  Cyc_set_cell(data, ((closureN)self_734211)->elements[2], r_732982));; 
}

static void __lambda_20(void *data, object self_734212, int argc, object *args) /* object self_734212, object r_732981 */
 {

  

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

static void __lambda_1(void *data, object _, int argc, object *args) /* closure _,object k_732958, object _123_731_732208, object lis_732_732209 */
 {
object k_732958 = args[0]; object _123_731_732208 = args[1]; object lis_732_732209 = args[2];
  Cyc_st_add(data, "srfi/132.sld:list-delete-neighbor-dups");
  
if( (boolean_f != Cyc_is_pair(lis_732_732209)) ){ 
  
closureN_type c_734957;
object e_735050 [3];
c_734957.hdr.mark = gc_color_red;
 c_734957.hdr.grayed = 0;
c_734957.tag = closureN_tag;
 c_734957.fn = (function_type)__lambda_2;
c_734957.num_args = 1;
c_734957.num_elements = 3;
c_734957.elements = (object *)e_735050;
c_734957.elements[0] = _123_731_732208;
c_734957.elements[1] = k_732958;
c_734957.elements[2] = lis_732_732209;



return_direct_with_clo1(data,(closure)&c_734957,__lambda_2,  Cyc_car(data, lis_732_732209));
} else { 
  return_direct_with_clo1(data,  k_732958, (((closure)  k_732958)->fn),  lis_732_732209);}
;; 
}

static void __lambda_2(void *data, object self_734176, int argc, object *args) /* object self_734176, object x0_735_732210 */
 {
 object x0_735_732210 = args[0];
  
closureN_type c_734959;
object e_735046 [4];
c_734959.hdr.mark = gc_color_red;
 c_734959.hdr.grayed = 0;
c_734959.tag = closureN_tag;
 c_734959.fn = (function_type)__lambda_3;
c_734959.num_args = 1;
c_734959.num_elements = 4;
c_734959.elements = (object *)e_735046;
c_734959.elements[0] = ((closureN)self_734176)->elements[0];
c_734959.elements[1] = ((closureN)self_734176)->elements[1];
c_734959.elements[2] = ((closureN)self_734176)->elements[2];
c_734959.elements[3] = x0_735_732210;



return_direct_with_clo1(data,(closure)&c_734959,__lambda_3,  Cyc_cdr(data, ((closureN)self_734176)->elements[2]));; 
}

static void __lambda_3(void *data, object self_734177, int argc, object *args) /* object self_734177, object xs_738_732211 */
 {
 object xs_738_732211 = args[0];
  
closureN_type c_734961;
object e_735044 [5];
c_734961.hdr.mark = gc_color_red;
 c_734961.hdr.grayed = 0;
c_734961.tag = closureN_tag;
 c_734961.fn = (function_type)__lambda_4;
c_734961.num_args = 2;
c_734961.num_elements = 5;
c_734961.elements = (object *)e_735044;
c_734961.elements[0] = ((closureN)self_734177)->elements[0];
c_734961.elements[1] = ((closureN)self_734177)->elements[1];
c_734961.elements[2] = ((closureN)self_734177)->elements[2];
c_734961.elements[3] = ((closureN)self_734177)->elements[3];
c_734961.elements[4] = xs_738_732211;

return_direct_with_clo2(data,(closure)&c_734961,__lambda_4,  ((closureN)self_734177)->elements[3], xs_738_732211);; 
}

static void __lambda_4(void *data, object self_734178, int argc, object *args) /* object self_734178, object x0_7314_732213, object xs_7315_732214 */
 {
 object x0_7314_732213 = args[0]; object xs_7315_732214 = args[1];
  
closureN_type c_734963;
object e_735043 [7];
c_734963.hdr.mark = gc_color_red;
 c_734963.hdr.grayed = 0;
c_734963.tag = closureN_tag;
 c_734963.fn = (function_type)__lambda_5;
c_734963.num_args = 1;
c_734963.num_elements = 7;
c_734963.elements = (object *)e_735043;
c_734963.elements[0] = ((closureN)self_734178)->elements[0];
c_734963.elements[1] = ((closureN)self_734178)->elements[1];
c_734963.elements[2] = ((closureN)self_734178)->elements[2];
c_734963.elements[3] = x0_7314_732213;
c_734963.elements[4] = ((closureN)self_734178)->elements[3];
c_734963.elements[5] = xs_7315_732214;
c_734963.elements[6] = ((closureN)self_734178)->elements[4];

return_direct_with_clo1(data,(closure)&c_734963,__lambda_5,  boolean_f);; 
}

static void __lambda_5(void *data, object self_734179, int argc, object *args) /* object self_734179, object recur_7316_732215 */
 {
 object recur_7316_732215 = args[0];
  
closureN_type c_734965;
object e_735039 [7];
c_734965.hdr.mark = gc_color_red;
 c_734965.hdr.grayed = 0;
c_734965.tag = closureN_tag;
 c_734965.fn = (function_type)__lambda_764;
c_734965.num_args = 1;
c_734965.num_elements = 7;
c_734965.elements = (object *)e_735039;
c_734965.elements[0] = ((closureN)self_734179)->elements[0];
c_734965.elements[1] = ((closureN)self_734179)->elements[1];
c_734965.elements[2] = ((closureN)self_734179)->elements[2];
c_734965.elements[3] = ((closureN)self_734179)->elements[3];
c_734965.elements[4] = ((closureN)self_734179)->elements[4];
c_734965.elements[5] = ((closureN)self_734179)->elements[5];
c_734965.elements[6] = ((closureN)self_734179)->elements[6];


pair_type local_735042; 
return_direct_with_clo1(data,(closure)&c_734965,__lambda_764,  set_cell_as_expr(&local_735042, recur_7316_732215));; 
}

static void __lambda_764(void *data, object self_734180, int argc, object *args) /* object self_734180, object recur_7316_732215 */
 {
 object recur_7316_732215 = args[0];
  
closureN_type c_734967;
object e_734994 [7];
c_734967.hdr.mark = gc_color_red;
 c_734967.hdr.grayed = 0;
c_734967.tag = closureN_tag;
 c_734967.fn = (function_type)__lambda_6;
c_734967.num_args = 1;
c_734967.num_elements = 7;
c_734967.elements = (object *)e_734994;
c_734967.elements[0] = ((closureN)self_734180)->elements[1];
c_734967.elements[1] = ((closureN)self_734180)->elements[2];
c_734967.elements[2] = recur_7316_732215;
c_734967.elements[3] = ((closureN)self_734180)->elements[3];
c_734967.elements[4] = ((closureN)self_734180)->elements[4];
c_734967.elements[5] = ((closureN)self_734180)->elements[5];
c_734967.elements[6] = ((closureN)self_734180)->elements[6];


closureN_type c_734995;
object e_735038 [2];
c_734995.hdr.mark = gc_color_red;
 c_734995.hdr.grayed = 0;
c_734995.tag = closureN_tag;
 c_734995.fn = (function_type)__lambda_9;
c_734995.num_args = 2;
c_734995.num_elements = 2;
c_734995.elements = (object *)e_735038;
c_734995.elements[0] = ((closureN)self_734180)->elements[0];
c_734995.elements[1] = recur_7316_732215;

return_direct_with_clo1(data,(closure)&c_734967,__lambda_6,  &c_734995);; 
}

static void __lambda_9(void *data, object self_734181, int argc, object *args) /* object self_734181, object k_732966, object x0_7317_732216, object xs_7318_732217 */
 {
 object k_732966 = args[0]; object x0_7317_732216 = args[1]; object xs_7318_732217 = args[2];
    
if( (boolean_f != Cyc_is_pair(xs_7318_732217)) ){ 
  
closureN_type c_734999;
object e_735032 [5];
c_734999.hdr.mark = gc_color_red;
 c_734999.hdr.grayed = 0;
c_734999.tag = closureN_tag;
 c_734999.fn = (function_type)__lambda_10;
c_734999.num_args = 2;
c_734999.num_elements = 5;
c_734999.elements = (object *)e_735032;
c_734999.elements[0] = ((closureN)self_734181)->elements[0];
c_734999.elements[1] = k_732966;
c_734999.elements[2] = ((closureN)self_734181)->elements[1];
c_734999.elements[3] = x0_7317_732216;
c_734999.elements[4] = xs_7318_732217;





return_direct_with_clo2(data,(closure)&c_734999,__lambda_10,  Cyc_car(data, xs_7318_732217), Cyc_cdr(data, xs_7318_732217));
} else { 
  return_direct_with_clo1(data,  k_732966, (((closure)  k_732966)->fn),  xs_7318_732217);}
;; 
}

static void __lambda_10(void *data, object self_734182, int argc, object *args) /* object self_734182, object x1_7319_732218, object x2_87_7320_732219 */
 {
 object x1_7319_732218 = args[0]; object x2_87_7320_732219 = args[1];
  
closureN_type c_735002;
object e_735030 [6];
c_735002.hdr.mark = gc_color_red;
 c_735002.hdr.grayed = 0;
c_735002.tag = closureN_tag;
 c_735002.fn = (function_type)__lambda_11;
c_735002.num_args = 1;
c_735002.num_elements = 6;
c_735002.elements = (object *)e_735030;
c_735002.elements[0] = ((closureN)self_734182)->elements[1];
c_735002.elements[1] = ((closureN)self_734182)->elements[2];
c_735002.elements[2] = ((closureN)self_734182)->elements[3];
c_735002.elements[3] = x1_7319_732218;
c_735002.elements[4] = x2_87_7320_732219;
c_735002.elements[5] = ((closureN)self_734182)->elements[4];

return_closcall3(data,  ((closureN)self_734182)->elements[0],  &c_735002, ((closureN)self_734182)->elements[3], x1_7319_732218);; 
}

static void __lambda_11(void *data, object self_734183, int argc, object *args) /* object self_734183, object r_732970 */
 {
 object r_732970 = args[0];
  if( (boolean_f != r_732970) ){ 
  

return_closcall3(data,  car(((closureN)self_734183)->elements[1]),  ((closureN)self_734183)->elements[0], ((closureN)self_734183)->elements[2], ((closureN)self_734183)->elements[4]);
} else { 
  


closureN_type c_735014;
object e_735027 [4];
c_735014.hdr.mark = gc_color_red;
 c_735014.hdr.grayed = 0;
c_735014.tag = closureN_tag;
 c_735014.fn = (function_type)__lambda_12;
c_735014.num_args = 1;
c_735014.num_elements = 4;
c_735014.elements = (object *)e_735027;
c_735014.elements[0] = ((closureN)self_734183)->elements[0];
c_735014.elements[1] = ((closureN)self_734183)->elements[3];
c_735014.elements[2] = ((closureN)self_734183)->elements[4];
c_735014.elements[3] = ((closureN)self_734183)->elements[5];

return_closcall3(data,  car(((closureN)self_734183)->elements[1]),  &c_735014, ((closureN)self_734183)->elements[3], ((closureN)self_734183)->elements[4]);}
;; 
}

static void __lambda_12(void *data, object self_734184, int argc, object *args) /* object self_734184, object ans_91tail_7321_732220 */
 {
 object ans_91tail_7321_732220 = args[0];
    
if( (boolean_f != Cyc_eq(ans_91tail_7321_732220, ((closureN)self_734184)->elements[2])) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734184)->elements[0], (((closure)  ((closureN)self_734184)->elements[0])->fn),  ((closureN)self_734184)->elements[3]);
} else { 
  
pair_type local_735025; 
return_direct_with_clo1(data,  ((closureN)self_734184)->elements[0], (((closure)  ((closureN)self_734184)->elements[0])->fn),  set_pair_as_expr(&local_735025, ((closureN)self_734184)->elements[1], ans_91tail_7321_732220));}
;; 
}

static void __lambda_6(void *data, object self_734185, int argc, object *args) /* object self_734185, object r_732965 */
 {
 object r_732965 = args[0];
  
closureN_type c_734969;
object e_734990 [7];
c_734969.hdr.mark = gc_color_red;
 c_734969.hdr.grayed = 0;
c_734969.tag = closureN_tag;
 c_734969.fn = (function_type)__lambda_7;
c_734969.num_args = 1;
c_734969.num_elements = 7;
c_734969.elements = (object *)e_734990;
c_734969.elements[0] = ((closureN)self_734185)->elements[0];
c_734969.elements[1] = ((closureN)self_734185)->elements[1];
c_734969.elements[2] = ((closureN)self_734185)->elements[2];
c_734969.elements[3] = ((closureN)self_734185)->elements[3];
c_734969.elements[4] = ((closureN)self_734185)->elements[4];
c_734969.elements[5] = ((closureN)self_734185)->elements[5];
c_734969.elements[6] = ((closureN)self_734185)->elements[6];



return_direct_with_clo1(data,(closure)&c_734969,__lambda_7,  Cyc_set_cell(data, ((closureN)self_734185)->elements[2], r_732965));; 
}

static void __lambda_7(void *data, object self_734186, int argc, object *args) /* object self_734186, object r_732964 */
 {

  


closureN_type c_734974;
object e_734987 [4];
c_734974.hdr.mark = gc_color_red;
 c_734974.hdr.grayed = 0;
c_734974.tag = closureN_tag;
 c_734974.fn = (function_type)__lambda_8;
c_734974.num_args = 1;
c_734974.num_elements = 4;
c_734974.elements = (object *)e_734987;
c_734974.elements[0] = ((closureN)self_734186)->elements[0];
c_734974.elements[1] = ((closureN)self_734186)->elements[1];
c_734974.elements[2] = ((closureN)self_734186)->elements[4];
c_734974.elements[3] = ((closureN)self_734186)->elements[6];

return_closcall3(data,  car(((closureN)self_734186)->elements[2]),  &c_734974, ((closureN)self_734186)->elements[3], ((closureN)self_734186)->elements[5]);; 
}

static void __lambda_8(void *data, object self_734187, int argc, object *args) /* object self_734187, object ans_7311_732212 */
 {
 object ans_7311_732212 = args[0];
    
if( (boolean_f != Cyc_eq(ans_7311_732212, ((closureN)self_734187)->elements[3])) ){ 
  return_direct_with_clo1(data,  ((closureN)self_734187)->elements[0], (((closure)  ((closureN)self_734187)->elements[0])->fn),  ((closureN)self_734187)->elements[1]);
} else { 
  
pair_type local_734985; 
return_direct_with_clo1(data,  ((closureN)self_734187)->elements[0], (((closure)  ((closureN)self_734187)->elements[0])->fn),  set_pair_as_expr(&local_734985, ((closureN)self_734187)->elements[2], ans_7311_732212));}
;; 
}

void c_srfi132_inlinable_lambdas(void *data, object clo, int argc, object *args){ 
object buf[1]; object cont = args[0];
buf[0] = NULL; (((closure)cont)->fn)(data, cont, 1, buf);
 } 
void c_srfi132_entry_pt_first_lambda(void *data, object clo, int argc, object *args){ 
Cyc_set_globals_changed((gc_thread_data *)data);
  quote_vector_91select_67 = find_or_add_symbol("vector-select!");
  quote_list_91sort_67 = find_or_add_symbol("list-sort!");
  quote_list_91stable_91sort = find_or_add_symbol("list-stable-sort");
  quote_list_91stable_91sort_67 = find_or_add_symbol("list-stable-sort!");
  quote_vector_91sort = find_or_add_symbol("vector-sort");
  quote_vector_91sort_67 = find_or_add_symbol("vector-sort!");
  quote_vector_91stable_91sort = find_or_add_symbol("vector-stable-sort");
  quote_vector_91stable_91sort_67 = find_or_add_symbol("vector-stable-sort!");
  quote_assert = find_or_add_symbol("assert");
  quote_vector_91select = find_or_add_symbol("vector-select");
  quote_vars = find_or_add_symbol("vars");
  quote_lambda = find_or_add_symbol("lambda");
  quote_call_91with_91values = find_or_add_symbol("call-with-values");
  quote_var = find_or_add_symbol("var");
  quote_let = find_or_add_symbol("let");
  quote_body = find_or_add_symbol("body");
  quote__93_93_93 = find_or_add_symbol("...");
  quote_rest = find_or_add_symbol("rest");
  quote_mlet = find_or_add_symbol("mlet");
  quote_exp = find_or_add_symbol("exp");
  quote_begin = find_or_add_symbol("begin");

  add_global("__glo_lib_91init_117srfi132_srfi_132", (object *) &__glo_lib_91init_117srfi132_srfi_132);
  add_global("__glo_vector_91stable_91sort_67_srfi_132", (object *) &__glo_vector_91stable_91sort_67_srfi_132);
  add_global("__glo_vector_91stable_91sort_srfi_132", (object *) &__glo_vector_91stable_91sort_srfi_132);
  add_global("__glo_vector_91sort_67_srfi_132", (object *) &__glo_vector_91sort_67_srfi_132);
  add_global("__glo_vector_91sort_srfi_132", (object *) &__glo_vector_91sort_srfi_132);
  add_global("__glo_list_91stable_91sort_67_srfi_132", (object *) &__glo_list_91stable_91sort_67_srfi_132);
  add_global("__glo_list_91stable_91sort_srfi_132", (object *) &__glo_list_91stable_91sort_srfi_132);
  add_global("__glo_list_91sort_67_srfi_132", (object *) &__glo_list_91sort_67_srfi_132);
  add_global("__glo_list_91sort_srfi_132", (object *) &__glo_list_91sort_srfi_132);
  add_global("__glo_assert_srfi_132", (object *) &__glo_assert_srfi_132);
  add_global("__glo_copy_91bigger_67_srfi_132", (object *) &__glo_copy_91bigger_67_srfi_132);
  add_global("__glo_copy_91smaller_67_srfi_132", (object *) &__glo_copy_91smaller_67_srfi_132);
  add_global("__glo_count_91smaller_srfi_132", (object *) &__glo_count_91smaller_srfi_132);
  add_global("__glo__75_75vector_91select2_srfi_132", (object *) &__glo__75_75vector_91select2_srfi_132);
  add_global("__glo__75_75vector_91select_srfi_132", (object *) &__glo__75_75vector_91select_srfi_132);
  add_global("__glo__75vector_91select2_srfi_132", (object *) &__glo__75vector_91select2_srfi_132);
  add_global("__glo__75vector_91select_srfi_132", (object *) &__glo__75vector_91select_srfi_132);
  add_global("__glo_just_91sort_91it_91threshold_srfi_132", (object *) &__glo_just_91sort_91it_91threshold_srfi_132);
  add_global("__glo_vector_91separate_67_srfi_132", (object *) &__glo_vector_91separate_67_srfi_132);
  add_global("__glo_vector_91select_67_srfi_132", (object *) &__glo_vector_91select_67_srfi_132);
  add_global("__glo_vector_91select_srfi_132", (object *) &__glo_vector_91select_srfi_132);
  add_global("__glo_vector_91find_91median_67_srfi_132", (object *) &__glo_vector_91find_91median_67_srfi_132);
  add_global("__glo_vector_91find_91median_srfi_132", (object *) &__glo_vector_91find_91median_srfi_132);
  add_global("__glo__75quick_91sort_67_srfi_132", (object *) &__glo__75quick_91sort_67_srfi_132);
  add_global("__glo_vector_91quick_91sort_srfi_132", (object *) &__glo_vector_91quick_91sort_srfi_132);
  add_global("__glo_vector_91quick_91sort_67_srfi_132", (object *) &__glo_vector_91quick_91sort_67_srfi_132);
  add_global("__glo__75vector_91merge_91sort_67_srfi_132", (object *) &__glo__75vector_91merge_91sort_67_srfi_132);
  add_global("__glo_vector_91merge_91sort_srfi_132", (object *) &__glo_vector_91merge_91sort_srfi_132);
  add_global("__glo_vector_91merge_91sort_67_srfi_132", (object *) &__glo_vector_91merge_91sort_67_srfi_132);
  add_global("__glo__75vector_91merge_67_srfi_132", (object *) &__glo__75vector_91merge_67_srfi_132);
  add_global("__glo_vector_91merge_67_srfi_132", (object *) &__glo_vector_91merge_67_srfi_132);
  add_global("__glo_vector_91merge_srfi_132", (object *) &__glo_vector_91merge_srfi_132);
  add_global("__glo__75vector_91insert_91sort_67_srfi_132", (object *) &__glo__75vector_91insert_91sort_67_srfi_132);
  add_global("__glo_vector_91heap_91sort_67_srfi_132", (object *) &__glo_vector_91heap_91sort_67_srfi_132);
  add_global("__glo_really_91vector_91heap_91sort_67_srfi_132", (object *) &__glo_really_91vector_91heap_91sort_67_srfi_132);
  add_global("__glo_vectors_91start_87end_912_srfi_132", (object *) &__glo_vectors_91start_87end_912_srfi_132);
  add_global("__glo_vector_91start_87end_srfi_132", (object *) &__glo_vector_91start_87end_srfi_132);
  add_global("__glo_list_91ref_91or_91default_srfi_132", (object *) &__glo_list_91ref_91or_91default_srfi_132);
  add_global("__glo_has_91element_srfi_132", (object *) &__glo_has_91element_srfi_132);
  add_global("__glo_vector_91portion_91copy_67_srfi_132", (object *) &__glo_vector_91portion_91copy_67_srfi_132);
  add_global("__glo_vector_91copy_srfi_132", (object *) &__glo_vector_91copy_srfi_132);
  add_global("__glo_vector_91portion_91copy_srfi_132", (object *) &__glo_vector_91portion_91copy_srfi_132);
  add_global("__glo_vector_91sorted_127_srfi_132", (object *) &__glo_vector_91sorted_127_srfi_132);
  add_global("__glo_list_91sorted_127_srfi_132", (object *) &__glo_list_91sorted_127_srfi_132);
  add_global("__glo_list_91merge_67_srfi_132", (object *) &__glo_list_91merge_67_srfi_132);
  add_global("__glo_list_91merge_srfi_132", (object *) &__glo_list_91merge_srfi_132);
  add_global("__glo_list_91merge_91sort_67_srfi_132", (object *) &__glo_list_91merge_91sort_67_srfi_132);
  add_global("__glo_list_91merge_91sort_srfi_132", (object *) &__glo_list_91merge_91sort_srfi_132);
  add_global("__glo_mlet_srfi_132", (object *) &__glo_mlet_srfi_132);
  add_global("__glo_vector_91delete_91neighbor_91dups_67_srfi_132", (object *) &__glo_vector_91delete_91neighbor_91dups_67_srfi_132);
  add_global("__glo_vector_91delete_91neighbor_91dups_srfi_132", (object *) &__glo_vector_91delete_91neighbor_91dups_srfi_132);
  add_global("__glo_list_91delete_91neighbor_91dups_67_srfi_132", (object *) &__glo_list_91delete_91neighbor_91dups_67_srfi_132);
  add_global("__glo_list_91delete_91neighbor_91dups_srfi_132", (object *) &__glo_list_91delete_91neighbor_91dups_srfi_132);
  mclosure0(c_7311689, (function_type)__lambda_756);c_7311689.num_args = 0; 
  __glo_lib_91init_117srfi132_srfi_132 = &c_7311689; 
  mclosure0(c_7311675, (function_type)__lambda_753);c_7311675.num_args = 2; 
  __glo_list_91sort_srfi_132 = &c_7311675; 
  mclosure0(c_7311672, (function_type)__lambda_752);c_7311672.num_args = 1; 
  __glo_assert_srfi_132 = &c_7311672; 
  mclosure0(c_7311624, (function_type)__lambda_749);c_7311624.num_args = 7; 
  __glo_copy_91bigger_67_srfi_132 = &c_7311624; 
  mclosure0(c_7311576, (function_type)__lambda_746);c_7311576.num_args = 7; 
  __glo_copy_91smaller_67_srfi_132 = &c_7311576; 
  mclosure0(c_7311516, (function_type)__lambda_743);c_7311516.num_args = 7; 
  __glo_count_91smaller_srfi_132 = &c_7311516; 
  mclosure0(c_7311286, (function_type)__lambda_725);c_7311286.num_args = 5; 
  __glo__75_75vector_91select2_srfi_132 = &c_7311286; 
  mclosure0(c_7311099, (function_type)__lambda_710);c_7311099.num_args = 5; 
  __glo__75_75vector_91select_srfi_132 = &c_7311099; 
  mclosure0(c_7311022, (function_type)__lambda_705);c_7311022.num_args = 5; 
  __glo__75vector_91select2_srfi_132 = &c_7311022; 
  mclosure0(c_7310948, (function_type)__lambda_700);c_7310948.num_args = 5; 
  __glo__75vector_91select_srfi_132 = &c_7310948; 
  mclosure0(c_7310778, (function_type)__lambda_681);c_7310778.num_args = 3; 
  __glo_vector_91separate_67_srfi_132 = &c_7310778; 
  mclosure0(c_7310732, (function_type)__lambda_676);c_7310732.num_args = 3; 
  __glo_vector_91select_srfi_132 = &c_7310732; 
  mclosure0(c_7310656, (function_type)__lambda_668);c_7310656.num_args = 3; 
  __glo_vector_91find_91median_67_srfi_132 = &c_7310656; 
  mclosure0(c_7310576, (function_type)__lambda_659);c_7310576.num_args = 3; 
  __glo_vector_91find_91median_srfi_132 = &c_7310576; 
  mclosure0(c_739917, (function_type)__lambda_585);c_739917.num_args = 4; 
  __glo__75quick_91sort_67_srfi_132 = &c_739917; 
  mclosure0(c_739869, (function_type)__lambda_576);c_739869.num_args = 2; 
  __glo_vector_91quick_91sort_srfi_132 = &c_739869; 
  mclosure0(c_739849, (function_type)__lambda_571);c_739849.num_args = 2; 
  __glo_vector_91quick_91sort_67_srfi_132 = &c_739849; 
  mclosure0(c_739223, (function_type)__lambda_503);c_739223.num_args = 5; 
  __glo__75vector_91merge_91sort_67_srfi_132 = &c_739223; 
  mclosure0(c_739195, (function_type)__lambda_496);c_739195.num_args = 2; 
  __glo_vector_91merge_91sort_srfi_132 = &c_739195; 
  mclosure0(c_739144, (function_type)__lambda_489);c_739144.num_args = 2; 
  __glo_vector_91merge_91sort_67_srfi_132 = &c_739144; 
  mclosure0(c_738874, (function_type)__lambda_468);c_738874.num_args = 9; 
  __glo__75vector_91merge_67_srfi_132 = &c_738874; 
  mclosure0(c_738826, (function_type)__lambda_459);c_738826.num_args = 4; 
  __glo_vector_91merge_67_srfi_132 = &c_738826; 
  mclosure0(c_738780, (function_type)__lambda_452);c_738780.num_args = 3; 
  __glo_vector_91merge_srfi_132 = &c_738780; 
  mclosure0(c_738646, (function_type)__lambda_435);c_738646.num_args = 4; 
  __glo__75vector_91insert_91sort_67_srfi_132 = &c_738646; 
  mclosure0(c_738626, (function_type)__lambda_430);c_738626.num_args = 2; 
  __glo_vector_91heap_91sort_67_srfi_132 = &c_738626; 
  mclosure0(c_738261, (function_type)__lambda_391);c_738261.num_args = 4; 
  __glo_really_91vector_91heap_91sort_67_srfi_132 = &c_738261; 
  mclosure0(c_738231, (function_type)__lambda_385);c_738231.num_args = 3; 
  __glo_vectors_91start_87end_912_srfi_132 = &c_738231; 
  mclosure0(c_738214, (function_type)__lambda_381);c_738214.num_args = 2; 
  __glo_vector_91start_87end_srfi_132 = &c_738214; 
  mclosure0(c_738194, (function_type)__lambda_376);c_738194.num_args = 3; 
  __glo_list_91ref_91or_91default_srfi_132 = &c_738194; 
  mclosure0(c_738175, (function_type)__lambda_375);c_738175.num_args = 2; 
  __glo_has_91element_srfi_132 = &c_738175; 
  mclosure0(c_738107, (function_type)__lambda_368);c_738107.num_args = 4; 
  __glo_vector_91portion_91copy_67_srfi_132 = &c_738107; 
  mclosure0(c_738098, (function_type)__lambda_366);c_738098.num_args = 1; 
  __glo_vector_91copy_srfi_132 = &c_738098; 
  mclosure0(c_738027, (function_type)__lambda_358);c_738027.num_args = 3; 
  __glo_vector_91portion_91copy_srfi_132 = &c_738027; 
  mclosure0(c_737940, (function_type)__lambda_347);c_737940.num_args = 2; 
  __glo_vector_91sorted_127_srfi_132 = &c_737940; 
  mclosure0(c_737864, (function_type)__lambda_340);c_737864.num_args = 2; 
  __glo_list_91sorted_127_srfi_132 = &c_737864; 
  mclosure0(c_737564, (function_type)__lambda_307);c_737564.num_args = 3; 
  __glo_list_91merge_67_srfi_132 = &c_737564; 
  mclosure0(c_737433, (function_type)__lambda_294);c_737433.num_args = 3; 
  __glo_list_91merge_srfi_132 = &c_737433; 
  mclosure0(c_736751, (function_type)__lambda_198);c_736751.num_args = 2; 
  __glo_list_91merge_91sort_67_srfi_132 = &c_736751; 
  mclosure0(c_736224, (function_type)__lambda_130);c_736224.num_args = 2; 
  __glo_list_91merge_91sort_srfi_132 = &c_736224; 
  mmacro(c_735559, (function_type)__lambda_80);c_735559.num_args = 3; 
  __glo_mlet_srfi_132 = &c_735559; 
  mclosure0(c_735349, (function_type)__lambda_53);c_735349.num_args = 2; 
  __glo_vector_91delete_91neighbor_91dups_67_srfi_132 = &c_735349; 
  mclosure0(c_735222, (function_type)__lambda_37);c_735222.num_args = 2; 
  __glo_vector_91delete_91neighbor_91dups_srfi_132 = &c_735222; 
  mclosure0(c_735054, (function_type)__lambda_13);c_735054.num_args = 2; 
  __glo_list_91delete_91neighbor_91dups_67_srfi_132 = &c_735054; 
  mclosure0(c_734953, (function_type)__lambda_1);c_734953.num_args = 2; 
  __glo_list_91delete_91neighbor_91dups_srfi_132 = &c_734953; 
  __glo_vector_91stable_91sort_67_srfi_132 = boolean_f; 
  __glo_vector_91stable_91sort_srfi_132 = boolean_f; 
  __glo_vector_91sort_67_srfi_132 = boolean_f; 
  __glo_vector_91sort_srfi_132 = boolean_f; 
  __glo_list_91stable_91sort_67_srfi_132 = boolean_f; 
  __glo_list_91stable_91sort_srfi_132 = boolean_f; 
  __glo_list_91sort_67_srfi_132 = boolean_f; 
  __glo_just_91sort_91it_91threshold_srfi_132 = obj_int2obj(50); 
  __glo_vector_91select_67_srfi_132 = boolean_f; 

  mclosure0(clo_7311738, c_srfi132_inlinable_lambdas); make_pair(pair_7311737, find_or_add_symbol("c_srfi132_inlinable_lambdas"), &clo_7311738);
  make_cvar(cvar_7311739, (object *)&__glo_lib_91init_117srfi132_srfi_132);make_pair(pair_7311740, find_or_add_symbol("lib-init:srfi132"), &cvar_7311739);
  make_cvar(cvar_7311741, (object *)&__glo_vector_91stable_91sort_67_srfi_132);make_pair(pair_7311742, find_or_add_symbol("vector-stable-sort!"), &cvar_7311741);
  make_cvar(cvar_7311743, (object *)&__glo_vector_91stable_91sort_srfi_132);make_pair(pair_7311744, find_or_add_symbol("vector-stable-sort"), &cvar_7311743);
  make_cvar(cvar_7311745, (object *)&__glo_vector_91sort_67_srfi_132);make_pair(pair_7311746, find_or_add_symbol("vector-sort!"), &cvar_7311745);
  make_cvar(cvar_7311747, (object *)&__glo_vector_91sort_srfi_132);make_pair(pair_7311748, find_or_add_symbol("vector-sort"), &cvar_7311747);
  make_cvar(cvar_7311749, (object *)&__glo_list_91stable_91sort_67_srfi_132);make_pair(pair_7311750, find_or_add_symbol("list-stable-sort!"), &cvar_7311749);
  make_cvar(cvar_7311751, (object *)&__glo_list_91stable_91sort_srfi_132);make_pair(pair_7311752, find_or_add_symbol("list-stable-sort"), &cvar_7311751);
  make_cvar(cvar_7311753, (object *)&__glo_list_91sort_67_srfi_132);make_pair(pair_7311754, find_or_add_symbol("list-sort!"), &cvar_7311753);
  make_cvar(cvar_7311755, (object *)&__glo_list_91sort_srfi_132);make_pair(pair_7311756, find_or_add_symbol("list-sort"), &cvar_7311755);
  make_cvar(cvar_7311757, (object *)&__glo_assert_srfi_132);make_pair(pair_7311758, find_or_add_symbol("assert"), &cvar_7311757);
  make_cvar(cvar_7311759, (object *)&__glo_copy_91bigger_67_srfi_132);make_pair(pair_7311760, find_or_add_symbol("copy-bigger!"), &cvar_7311759);
  make_cvar(cvar_7311761, (object *)&__glo_copy_91smaller_67_srfi_132);make_pair(pair_7311762, find_or_add_symbol("copy-smaller!"), &cvar_7311761);
  make_cvar(cvar_7311763, (object *)&__glo_count_91smaller_srfi_132);make_pair(pair_7311764, find_or_add_symbol("count-smaller"), &cvar_7311763);
  make_cvar(cvar_7311765, (object *)&__glo__75_75vector_91select2_srfi_132);make_pair(pair_7311766, find_or_add_symbol("%%vector-select2"), &cvar_7311765);
  make_cvar(cvar_7311767, (object *)&__glo__75_75vector_91select_srfi_132);make_pair(pair_7311768, find_or_add_symbol("%%vector-select"), &cvar_7311767);
  make_cvar(cvar_7311769, (object *)&__glo__75vector_91select2_srfi_132);make_pair(pair_7311770, find_or_add_symbol("%vector-select2"), &cvar_7311769);
  make_cvar(cvar_7311771, (object *)&__glo__75vector_91select_srfi_132);make_pair(pair_7311772, find_or_add_symbol("%vector-select"), &cvar_7311771);
  make_cvar(cvar_7311773, (object *)&__glo_just_91sort_91it_91threshold_srfi_132);make_pair(pair_7311774, find_or_add_symbol("just-sort-it-threshold"), &cvar_7311773);
  make_cvar(cvar_7311775, (object *)&__glo_vector_91separate_67_srfi_132);make_pair(pair_7311776, find_or_add_symbol("vector-separate!"), &cvar_7311775);
  make_cvar(cvar_7311777, (object *)&__glo_vector_91select_67_srfi_132);make_pair(pair_7311778, find_or_add_symbol("vector-select!"), &cvar_7311777);
  make_cvar(cvar_7311779, (object *)&__glo_vector_91select_srfi_132);make_pair(pair_7311780, find_or_add_symbol("vector-select"), &cvar_7311779);
  make_cvar(cvar_7311781, (object *)&__glo_vector_91find_91median_67_srfi_132);make_pair(pair_7311782, find_or_add_symbol("vector-find-median!"), &cvar_7311781);
  make_cvar(cvar_7311783, (object *)&__glo_vector_91find_91median_srfi_132);make_pair(pair_7311784, find_or_add_symbol("vector-find-median"), &cvar_7311783);
  make_cvar(cvar_7311785, (object *)&__glo__75quick_91sort_67_srfi_132);make_pair(pair_7311786, find_or_add_symbol("%quick-sort!"), &cvar_7311785);
  make_cvar(cvar_7311787, (object *)&__glo_vector_91quick_91sort_srfi_132);make_pair(pair_7311788, find_or_add_symbol("vector-quick-sort"), &cvar_7311787);
  make_cvar(cvar_7311789, (object *)&__glo_vector_91quick_91sort_67_srfi_132);make_pair(pair_7311790, find_or_add_symbol("vector-quick-sort!"), &cvar_7311789);
  make_cvar(cvar_7311791, (object *)&__glo__75vector_91merge_91sort_67_srfi_132);make_pair(pair_7311792, find_or_add_symbol("%vector-merge-sort!"), &cvar_7311791);
  make_cvar(cvar_7311793, (object *)&__glo_vector_91merge_91sort_srfi_132);make_pair(pair_7311794, find_or_add_symbol("vector-merge-sort"), &cvar_7311793);
  make_cvar(cvar_7311795, (object *)&__glo_vector_91merge_91sort_67_srfi_132);make_pair(pair_7311796, find_or_add_symbol("vector-merge-sort!"), &cvar_7311795);
  make_cvar(cvar_7311797, (object *)&__glo__75vector_91merge_67_srfi_132);make_pair(pair_7311798, find_or_add_symbol("%vector-merge!"), &cvar_7311797);
  make_cvar(cvar_7311799, (object *)&__glo_vector_91merge_67_srfi_132);make_pair(pair_7311800, find_or_add_symbol("vector-merge!"), &cvar_7311799);
  make_cvar(cvar_7311801, (object *)&__glo_vector_91merge_srfi_132);make_pair(pair_7311802, find_or_add_symbol("vector-merge"), &cvar_7311801);
  make_cvar(cvar_7311803, (object *)&__glo__75vector_91insert_91sort_67_srfi_132);make_pair(pair_7311804, find_or_add_symbol("%vector-insert-sort!"), &cvar_7311803);
  make_cvar(cvar_7311805, (object *)&__glo_vector_91heap_91sort_67_srfi_132);make_pair(pair_7311806, find_or_add_symbol("vector-heap-sort!"), &cvar_7311805);
  make_cvar(cvar_7311807, (object *)&__glo_really_91vector_91heap_91sort_67_srfi_132);make_pair(pair_7311808, find_or_add_symbol("really-vector-heap-sort!"), &cvar_7311807);
  make_cvar(cvar_7311809, (object *)&__glo_vectors_91start_87end_912_srfi_132);make_pair(pair_7311810, find_or_add_symbol("vectors-start+end-2"), &cvar_7311809);
  make_cvar(cvar_7311811, (object *)&__glo_vector_91start_87end_srfi_132);make_pair(pair_7311812, find_or_add_symbol("vector-start+end"), &cvar_7311811);
  make_cvar(cvar_7311813, (object *)&__glo_list_91ref_91or_91default_srfi_132);make_pair(pair_7311814, find_or_add_symbol("list-ref-or-default"), &cvar_7311813);
  make_cvar(cvar_7311815, (object *)&__glo_has_91element_srfi_132);make_pair(pair_7311816, find_or_add_symbol("has-element"), &cvar_7311815);
  make_cvar(cvar_7311817, (object *)&__glo_vector_91portion_91copy_67_srfi_132);make_pair(pair_7311818, find_or_add_symbol("vector-portion-copy!"), &cvar_7311817);
  make_cvar(cvar_7311819, (object *)&__glo_vector_91copy_srfi_132);make_pair(pair_7311820, find_or_add_symbol("vector-copy"), &cvar_7311819);
  make_cvar(cvar_7311821, (object *)&__glo_vector_91portion_91copy_srfi_132);make_pair(pair_7311822, find_or_add_symbol("vector-portion-copy"), &cvar_7311821);
  make_cvar(cvar_7311823, (object *)&__glo_vector_91sorted_127_srfi_132);make_pair(pair_7311824, find_or_add_symbol("vector-sorted?"), &cvar_7311823);
  make_cvar(cvar_7311825, (object *)&__glo_list_91sorted_127_srfi_132);make_pair(pair_7311826, find_or_add_symbol("list-sorted?"), &cvar_7311825);
  make_cvar(cvar_7311827, (object *)&__glo_list_91merge_67_srfi_132);make_pair(pair_7311828, find_or_add_symbol("list-merge!"), &cvar_7311827);
  make_cvar(cvar_7311829, (object *)&__glo_list_91merge_srfi_132);make_pair(pair_7311830, find_or_add_symbol("list-merge"), &cvar_7311829);
  make_cvar(cvar_7311831, (object *)&__glo_list_91merge_91sort_67_srfi_132);make_pair(pair_7311832, find_or_add_symbol("list-merge-sort!"), &cvar_7311831);
  make_cvar(cvar_7311833, (object *)&__glo_list_91merge_91sort_srfi_132);make_pair(pair_7311834, find_or_add_symbol("list-merge-sort"), &cvar_7311833);
  make_cvar(cvar_7311835, (object *)&__glo_mlet_srfi_132);make_pair(pair_7311836, find_or_add_symbol("mlet"), &cvar_7311835);
  make_cvar(cvar_7311837, (object *)&__glo_vector_91delete_91neighbor_91dups_67_srfi_132);make_pair(pair_7311838, find_or_add_symbol("vector-delete-neighbor-dups!"), &cvar_7311837);
  make_cvar(cvar_7311839, (object *)&__glo_vector_91delete_91neighbor_91dups_srfi_132);make_pair(pair_7311840, find_or_add_symbol("vector-delete-neighbor-dups"), &cvar_7311839);
  make_cvar(cvar_7311841, (object *)&__glo_list_91delete_91neighbor_91dups_67_srfi_132);make_pair(pair_7311842, find_or_add_symbol("list-delete-neighbor-dups!"), &cvar_7311841);
  make_cvar(cvar_7311843, (object *)&__glo_list_91delete_91neighbor_91dups_srfi_132);make_pair(pair_7311844, find_or_add_symbol("list-delete-neighbor-dups"), &cvar_7311843);
make_pair(c_7311898, &pair_7311737,Cyc_global_variables);
make_pair(c_7311897, &pair_7311740, &c_7311898);
make_pair(c_7311896, &pair_7311742, &c_7311897);
make_pair(c_7311895, &pair_7311744, &c_7311896);
make_pair(c_7311894, &pair_7311746, &c_7311895);
make_pair(c_7311893, &pair_7311748, &c_7311894);
make_pair(c_7311892, &pair_7311750, &c_7311893);
make_pair(c_7311891, &pair_7311752, &c_7311892);
make_pair(c_7311890, &pair_7311754, &c_7311891);
make_pair(c_7311889, &pair_7311756, &c_7311890);
make_pair(c_7311888, &pair_7311758, &c_7311889);
make_pair(c_7311887, &pair_7311760, &c_7311888);
make_pair(c_7311886, &pair_7311762, &c_7311887);
make_pair(c_7311885, &pair_7311764, &c_7311886);
make_pair(c_7311884, &pair_7311766, &c_7311885);
make_pair(c_7311883, &pair_7311768, &c_7311884);
make_pair(c_7311882, &pair_7311770, &c_7311883);
make_pair(c_7311881, &pair_7311772, &c_7311882);
make_pair(c_7311880, &pair_7311774, &c_7311881);
make_pair(c_7311879, &pair_7311776, &c_7311880);
make_pair(c_7311878, &pair_7311778, &c_7311879);
make_pair(c_7311877, &pair_7311780, &c_7311878);
make_pair(c_7311876, &pair_7311782, &c_7311877);
make_pair(c_7311875, &pair_7311784, &c_7311876);
make_pair(c_7311874, &pair_7311786, &c_7311875);
make_pair(c_7311873, &pair_7311788, &c_7311874);
make_pair(c_7311872, &pair_7311790, &c_7311873);
make_pair(c_7311871, &pair_7311792, &c_7311872);
make_pair(c_7311870, &pair_7311794, &c_7311871);
make_pair(c_7311869, &pair_7311796, &c_7311870);
make_pair(c_7311868, &pair_7311798, &c_7311869);
make_pair(c_7311867, &pair_7311800, &c_7311868);
make_pair(c_7311866, &pair_7311802, &c_7311867);
make_pair(c_7311865, &pair_7311804, &c_7311866);
make_pair(c_7311864, &pair_7311806, &c_7311865);
make_pair(c_7311863, &pair_7311808, &c_7311864);
make_pair(c_7311862, &pair_7311810, &c_7311863);
make_pair(c_7311861, &pair_7311812, &c_7311862);
make_pair(c_7311860, &pair_7311814, &c_7311861);
make_pair(c_7311859, &pair_7311816, &c_7311860);
make_pair(c_7311858, &pair_7311818, &c_7311859);
make_pair(c_7311857, &pair_7311820, &c_7311858);
make_pair(c_7311856, &pair_7311822, &c_7311857);
make_pair(c_7311855, &pair_7311824, &c_7311856);
make_pair(c_7311854, &pair_7311826, &c_7311855);
make_pair(c_7311853, &pair_7311828, &c_7311854);
make_pair(c_7311852, &pair_7311830, &c_7311853);
make_pair(c_7311851, &pair_7311832, &c_7311852);
make_pair(c_7311850, &pair_7311834, &c_7311851);
make_pair(c_7311849, &pair_7311836, &c_7311850);
make_pair(c_7311848, &pair_7311838, &c_7311849);
make_pair(c_7311847, &pair_7311840, &c_7311848);
make_pair(c_7311846, &pair_7311842, &c_7311847);
make_pair(c_7311845, &pair_7311844, &c_7311846);
Cyc_global_variables = &c_7311845;
object buf[1]; buf[0] = ((closure1_type *)clo)->element;
(((closure)__glo_lib_91init_117srfi132_srfi_132)->fn)(data, buf[0], 1, buf);
}
void c_srfi132_entry_pt(void *data, object cont, int argc, object value){ 
  register_library("srfi_132");
  c_srfi132_entry_pt_first_lambda(data, cont, argc, value);
}
